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:спс огромное давно мечтал о таком скрипте
:shock:

Re: AutoSell

Posted: 16.03.2013 5:25
by avismd
а как поставить такую строку в скрипте

if (Life < MaxHP) then
begin
Disconnect;
end;

и самое интересное чтоб это работало :D :D :D

Re: AutoSell

Posted: 16.03.2013 8:46
by Vizit0r
так и поставить. визуально ошибок нет.