Originally posted by Naermkoth
e la fatica allora?
giusto per capire

sub bandageself() UO.Say(" ") UO.Say(",terminate bandages") UO.Say(",exec bandages") end sub sub bandages() Var Time IF UO.GetMaxHP("self") > UO.Life THEN IF UO.B >= 1 THEN UO.DeleteJournal() UO.Bandageself() Time = 0 Repeat Wait(1000) Time = Time + 1 UO.Print(STR(Time) + (" sec")) Until UO.InJournal("cliloc# 0xA4E9") ENDIF ELSE UO.Print("Full PF. No need for heal") ENDIF end sub
sub bandageself() UO.Say(" ") UO.Say(",terminate bandages") UO.Say(",exec bandages") end sub sub bandages() Var Time IF UO.GetMaxHP("self") > UO.Life THEN IF UO.B >= 1 THEN UO.DeleteJournal() UO.Bandageself() Time = 0 Repeat Wait(1000) Time = Time + 1 UO.Print(STR(Time) + (" sec")) Until UO.InJournal("cliloc# 0xA4E9") ENDIF ELSE UO.Print("Full PF. No need for heal") ENDIF end sub
Commenta