Помогите со скриптом на хилинг!!!!

PAPACH · Post by **PAPACH** » 2005-03-29 11:19:06

Люди дайте скрипт на инжу!Чтобы чар одевал курсу,ждал пока жизни понизятся и потом сам хилился

Jerry · Post by **Jerry** » 2005-03-30 09:10:24

ты на ДРВ гамаешь?
тогда вот, написал, пытался промывку бинтов ещё вставить, но не получилось, не знаю как сделать, что бы он этими кровавыми бинтами тыкнул в корыто...
[/code]

Jerry · Post by **Jerry** » 2005-03-30 10:46:29

Вот, пробывал сделать промывку бинтов, если кто подскажет как доделать её, то я добавлю её в скрипт...

Code: Select all

         UO.FindType('0x0E20',-1,'my')
            wait(1000)
         UO.UseObject('finditem')
            wait(1000)

вот, вобщем после этого появляется прицел, нужна тока команда, что бы им ткнуть в корыто с водой...

Askaneli · Post by **Askaneli** » 2005-03-30 11:25:24

Code: Select all

UO.FindType(0x0E20,"-1","my") 
      if UO.FindCount() then 
         cheklag()
         uo.waittargettype(0x1008)   # wash basin 
         uo.UseType(0x0E20)   #bloody bandages 
      else 
         cheklag()
         uo.print("You haven't bandages") 
         uo.exec("terminate Train_Healing") 
         Play_Sound(1) 
      endif

Jerry · Post by **Jerry** » 2005-03-30 12:42:48

Code: Select all

###################################################################
##    Прокачка хеллинга и спирит спика на шарде ДРВ www.drw.ru   ##
##         Перед запуском скрипта надо предварительно            ##
##одеть курснутую кирку и подождать, пока хелса будет равна силе.##
##           После запуска просто ткнуть в чан с водой           ##
##Встроеная прокачка спирит спика, на скорость хеллинга не влият.##
##    После каждого сохранения мира, моет бинты, бинтов нужно    ##
##     примерно 400-600, без учёта, что они будут пропадать.     ##
###################################################################

sub Healing()

While True
   UO.SetArm('CWeapon')
   UO.Exec("bandageself")
      wait(500)
   UO.Arm('CWeapon')
      wait(3150)
   
      If UO.InJournal("now")Then
         wait(120000)
         UO.Arm('CWeapon')
         wait(1500)
         UO.DeleteJournal()
         
         UO.FindType(0x0E20,"-1","my") 
         If UO.FindCount() then 
            uo.UseType(0x0E20) ;bloody bandages 
            uo.waittargettype(0x1008) ;wash basin 
            wait(1500)
         else 
            wait(1000) 
            uo.print("You have no bandages") 
            UO.Exec("playwav d:\game\uo\injection\cow") 
         endif
      endif
      
      If UO.InJournal("cure") Then ;иногда может проглючить
         UO.Exec("playwav d:\game\uo\injection\cow")
            wait(5000)
            UO.DeleteJournal()
         endif
         
   UO.Useskill('Spirit Speak')
   wait(500)
wend

end sub

Jerry · Post by **Jerry** » 2005-03-30 12:46:33

почему то у меня с коммандой CheckLag ничё не получилось... заменил на w8

Sfagnum · Post by **Sfagnum** » 2005-03-30 14:14:29

Jerry wrote:почему то у меня с коммандой CheckLag ничё не получилось... заменил на w8

CheckLag - это не команда, это ф-я. И взять можешь её с любого скрипта