Yoko

Code: Select all

sub dessanct()
var scroll=

uo.waittargetobject('laststatus')
uo.fintype(scroll)
if uo.findcount() then
uo.useobject('finditem')
else
uo.cast('Weaken')
end if
end sub

Code: Select all

Sub AutoWeaken()
	if uo.getglobal('AutoWeaken')<>'on' then
		uo.setglobal('AutoWeaken','on')
		uo.print('Auto Weaken cast is on')
	else
		uo.setglobal('AutoWeaken','off')
		uo.print('Auto Weaken cast is off')
	end if
end sub

sub Weaken()
	var loop=1,scroll=TYPE
	while loop==2
		if uo.getglobal('AutoWeaken')=='on' then
			repeat
				uo.deletejournal()
				uo.waittargetobject('laststatus') 
				uo.findtype(scroll) 
				if uo.findcount() then 
					uo.useobject('finditem') 
				else 
					uo.cast('Weaken') 
				end if
				if uo.injournal('An anti-magic field disturbs the spells.') then
					uo.setglobal('Weaken','off')
					uo.print('Auto Weaken cast is off')
				end if
				Casted()
			until uo.getglobal('AutoWeaken')<>'on'
		end if
		wait(100)
	wend
end sub

sub Casted()
	var PrevMana=uo.mana,n
		if uo.getglobal('AutoWeaken')=='on' then
			repeat
				wait(100)
			until uo.mana<PrevMana or uo.injournal('The spell fizzles') or uo.injournal('Target is not in line of sight') or uo.injournal('You can`t see the target') or uo.getglobal('AutoWeaken')<>'on'
		end if
end sub

Code: Select all

sub gh()
VAR ManaNeed=11
VAR ManaNeedScroll=5
If UO.Life<UO.Str Then
UO.FindType('0x1F49',-1,'my')
If UO.FindCount()>0 Then
If UO.Mana>=ManaNeedScroll Then
UO.WaitTargetSelf()
UO.UseObject('finditem')
UO.Print("Greater Heal: "+STR(UO.Count("0x1F49")))
Else
UO.Print("Unsufficient mana")
Endif
Else
If UO.Mana>=ManaNeed Then
UO.Cast('Greater Heal','self')
UO.Print("SpellBook")
Else
UO.Print("Unsufficient mana")
Endif
Endif
Else
UO.Print("Your hit points is full")
Endif
end sub