VAR Char1='0x003668CA' # ID первого чара VAR Char2='0x0035152A' # ID второго чара VAR MinLife=90 # минимальная жизнь VAR TazikType='0x1008' # Тип тазика с водой VAR BloodBndg='0x0E20' # тип кровавых бинтов
################################################################## # VAR Enemy, GO, STOP # VAR GO1= 'GOO-1' # VAR GO2= 'GOO-2' # VAR STOP1='STOP-1' # VAR STOP2='STOP-2' # # ##################################################################
sub Start() ##################################################### uo.DeleteJournal() if UO.GetSerial('self')==Char1 then Enemy=Char2 GO=GO2 STOP=STOP2 else Enemy=Char1 GO=GO1 STOP=STOP1 endif uo.DeleteJournal() wait(4000) While not uo.InJournal(GO1) or not uo.InJournal(GO2) uo.say(GO) wait(3000) wend
IF uo.InJournal('Ready') then wait(3200) Sparring() else uo.Say('Ready') wait(5000) Sparring()
end sub ########################################################
sub Sparring() #################################################
UO.Exec('warmode 1') uo.DeleteJournal() uo.DeleteJournal() REPEAT if uo.InJournal('apply bandages to self') then StopWar() else wait(5000) UO.Attack(Enemy) end if until uo.Life<=MinLife or uo.InJournal(STOP1) or uo.InJournal(STOP2) or uo.InJournal('apply bandages to self') StopWar()
end sub ########################################################
sub StopWar() ##################################################
IF uo.InJournal(STOP1) or uo.InJournal(STOP2) then UO.Exec("warmode 0") wait(1000) UO.Exec("warmode 0") Heling() else
# While not uo.InJournal('apply bandages to self') # UO.Say(STOP) # UO.Exec("warmode 0") # wait(2000) # wend
end sub ########################################################
sub Heling() ##################################################
UO.FindType('0x0E21','0x0000','backpack') If UO.GetQuantity('finditem')<50 Then UO.FindType('0x0E20','0x0000','backpack') UO.WaitTargetType(TazikType) UO.UseObject('finditem') wait(1000) Endif
while uo.Life uo.SetArm('armset') uo.disarm() wait(200) while uo.Life uo.bandageself() wait(3000) UO.Exec("warmode 0") wend uo.arm('armset') wait(2000) wend UO.Exec("warmode 0") wait(200)
Start()
end sub ######################################################