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

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 - это не команда, это ф-я. И взять можешь её с любого скрипта