Page 1 of 1
					
				AutoSell
				Posted: 07.03.2013 5:48
				by avismd
				привет всем у меня такая проблема нужен скрипт на продажу под дрв а в скриптах куплю-продам я полный ноль я попробовал что то замутить но ничего не получилось. Помогите пожалуйста 
  
  
  
 
program UseSkillDemo;
Begin
while true do
begin  
uosay('Tak Sell');  
wait(3000);
SetSilentMode(False) ;
  procedure AutoSell(ItemType : $0F0E; ItemColor : $0964; Quantity : 100);
  Wait(4000);
  end;
 
			 
			
					
				Re: AutoSell
				Posted: 07.03.2013 8:18
				by nah nah
				Code: Select all
program UseSkillDemo;
Begin
while count($0F0E) do
    begin 
    uosay('Tak Sell'); 
    wait(300);
    SetSilentMode(False) ;
    AutoSell($0F0E, $0964, 100);
    Wait(4000);
end;
end.
 
			 
			
					
				Re: AutoSell
				Posted: 07.03.2013 14:04
				by avismd
				спасибо за скрипт работает только если вместо
while count($0F0E) do
поставить
while true do
спс огромное давно мечтал о таком скрипте
			 
			
					
				Re: AutoSell
				Posted: 07.03.2013 15:13
				by nah nah
				наверное правилнее будет вместо 
while count($0F0E) do вставить 
while count($0F0E) > 0 do
avismd wrote:спс огромное давно мечтал о таком скрипте
 
 
			 
			
					
				Re: AutoSell
				Posted: 16.03.2013 5:25
				by avismd
				а как поставить такую строку в скрипте 
if (Life < MaxHP) then
begin
Disconnect;
end;
и самое интересное чтоб это работало 
  
  
 
			 
			
					
				Re: AutoSell
				Posted: 16.03.2013 8:46
				by Vizit0r
				так и поставить. визуально ошибок нет.