Page 1 of 1

Magery скрипт перевести в стелс клиент.

Posted: 09.01.2010 21:24
by Twee
Привет ребятки, у меня большая просьба ктото может перевести этот скрипт инжи в скрипт стелса вот:

sub main()
repeat

if UO.Life<(UO.Str) then
UO.waittargetobject('self')
uo.cast('Heal')
wait(3000) ;
endif

If UO.mana>=5 Then
UO.Exec("cast 'Magic Arrow' self")
wait(2100)
Else
while uo.mana<(UO.INT)
UO.useskill('Meditation')
wait(10000)
wend
EndIf
until false
end sub

Каст на себя меджик эроу, хил, медитация, ну вроде там всё видно, огромное спасибо кто поможет !

Posted: 09.01.2010 23:59
by Vizit0r

Code: Select all

Program test; 

BEGIN
while True do
begin
  if HP < Str then
    begin
      WaitTargetObject(Self);
      Cast('Heal');
      wait(3000);{плохо, очень плохо. надо ставить динамическую задержку, с тебя информация о смысле этого трехсекундного ожидания.}
    end;

  if mana >= 5 then
    begin
      WaitTargetObject(Self);
      Cast('Magic Arrow');
      wait(2100);{здесь то же самое про задержку}
    end
  else
    while mana < int do
      begin
         Useskill('Meditation');
         wait(10000);
      end;
end;
END.
не проверял, писал прямо на форум.

Posted: 10.01.2010 16:02
by Twee
Большое спасибо !

Posted: 10.01.2010 16:16
by Vizit0r
спасибо-то спасибо, но ты комментарии в скрипте почитай