Yoko

Нарисуйте плиз скрипт на медитацию и на Еволющку вместе чтобы качалось под Дрв плз !

1. читаем.
2. смотрим и думаем.

Вот:

sub medit()
VAR cursa=0x144F
VAR j, tekmana
uo.undress() 
wait(1000) 
uo.print('Выбери цель')
uo.exec('addobject body')
while uo.targeting()
wait(100)
wend
repeat 
      tekmana=uo.int 
      wait(100) 
      checklag() 
      uo.usetype(cursa); Cursed Hat 
      uo.useskill ("Spirit Speak") 
      wait(2000) 
      j=0 
      repeat 
      wait(10) 
      j=j+1 
      until (uo.mana <= tekmana-1) or (j>1000) 
      checklag() 
      uo.undress() 
      wait(100) 
      checklag() 
      uo.useskill ("Meditation") 
      Wait(3000) 
      uo.waittargetobject(body)
      wait(200)
      uo.useskill('Evalute Intelligence')
      wait(3000)
until uo.dead() 
end sub

sub checklag() 
uo.deletejournal() 
uo.click('backpack') 
Repeat 
wait(100) 
Until UO.InJournal("backpack") 
end sub 

Спасибо за скрипт но я еще не доконца доделал он все делает но на дракона таргет автомотически не падает хз вот посматри



sub medit()
VAR cursa=0x1713
VAR j, tekmana
uo.undress()
wait(1000)
uo.print('0x6A3EC')
uo.exec('addobject body')
while uo.targeting()
wait(100)
wend
repeat
tekmana=uo.int
wait(100)
checklag()
uo.usetype(cursa); Cursed Hat
j=0
repeat
wait(10)
j=j+1
until (uo.mana <= tekmana-1) or (j>1000)
checklag()
uo.undress()
wait(100)
checklag()
uo.useskill ("Meditation")
Wait(3000)
uo.waittargetobject()
wait(200)
uo.useskill('Evaluating Intelligence')
wait(3000)
until uo.dead()
end sub

sub checklag()
uo.deletejournal()
uo.click('backpack')
Repeat
wait(100)
Until UO.InJournal("backpack")
end sub

все зароботал спасибо огромное !!!