Code:
#==============================================================
# Poison() - cast poison on laststatus if target-char not
# poisoned and your char have enought mana
#--------------------------------------------------------------
sub Poison()
VAR ManaNeed=9
VAR ScrollManaNeed=4
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F40',-1,'my')
If UO.GetQuantity('finditem')>0 Then
If UO.Mana>=ScrollManaNeed Then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
Else
UO.Print("Low mana!!! Scroll!")
Endif
Else
If UO.Mana>=ManaNeed Then
UO.Cast('Poison','laststatus')
Else
UO.Print("Low mana!!!")
Endif
Endif
end sub