Healing

Details #

All scripts have been collected over the years and if available will still contain the creators details, these scripts may run well or not.

Scripts #

heal.sc #

sub main()
aaa:
UO.exec("bandageself")
  wait(10000)
goto aaa
end sub

heal2.sc #

sub main()
	Repeat
		While UO.Life > 50
			Wait(1000)
		Wend
		UO.BandageSelf()
		Wait(6000)
	Until FALSE
end sub

autoheal.sc #

sub main()
  aaa:
	If UO.Life>(UO.STR-30)
        UO.Say(",bandageself") 
        wait(3000)
	end If
  goto aaa
end sub

Heal Other.sc #

sub main()
  La:
	UO.Waittargetlast()
	UO.Usetype(0x0e21)
	Wait(6500)
	UO.Waittargetlast()
	UO.Usetype(0x0e21)
	Wait(60000)
  GOTO La:
end sub

healdress.sc #

sub heal()
	UO.Print("You have 15 seconds to set your dress")
	wait(15000)
	UO.Say(",setdress 1")
	UO.Say(",setarm 1")
	UO.Say(",disarm")
	UO.Say(",undress")
	start:
	IF UO.Life < 50 THEN
		UO.Say(",dress 1")
		UO.Say(",arm 1")
		# Check health at 500 intervals
		WHILE (UO.Life < 50)
			UO.Say(",bandageself")
			wait(5000)
		WEND
		UO.Say(",undress")
		UO.Say(",disarm")
	ENDIF
	wait(500)
	goto start
end sub 

healingandanlore.sc #

sub main()
La:
    Repeat
      UO.Waittargetobject("animal")
	  UO.Useskill("Animal Lore")
	  Wait(10000)
	  Until UO.life < 30
	Repeat
	  UO.bandageself()
	  Wait(5000)
	Until UO.Life > 45
Goto La
end sub

healingandattack.sc #

sub main()
	Repeat
		While UO.Life > 35
			UO.Attack(0x00068369)
			Wait(1000)
		Wend
		UO.Warmode(0)
		UO.BandageSelf()
		Wait(2000)
	Until FALSE
end sub

healing4.sc #

sub heal()
	UO.Print("Setting dress and arms")
	UO.Say(",setdress 1")
	UO.Say(",setarm 1")
	UO.Print("Set your weapon with no shield within 10 seconds")
	wait(10000)
	UO.Say(",setarm 2")
	UO.Say(",disarm")
	UO.Say(",undress")
	start:
	IF UO.Life < 37 THEN
		UO.Say(",dress 1")
		UO.Say(",arm 1")
		# Check health at 500 intervals
		WHILE (UO.Life < 37)
			UO.Say(",bandageself")
			wait(5000)
		WEND
		UO.Say(",undress")
		UO.Say(",disarm")
		UO.Say(",arm 2") #Arm weapon with no shield
	ENDIF
	wait(500)
	goto start
end sub

healinganatomy.sc #

sub main()
	Repeat
		UO.WaitTargetSelf()
		UO.UseSkill("Anatomy")
		Wait(2500)
		While UO.Health < 60 Then
			UO.BandageSelf()
			Wait(6500)
		Wend
	Until FALSE
end sub

healing and equip.sc #

sub main()
	Repeat
		While UO.Life > (UO.STR/2)
			IF UO.ObjAtLayer('Rhand') == '' Then
				UO.Equipt('Rhand', '0x0EC4')
			End IF
			Wait(1000)
		Wend
		UO.BandageSelf()
		Wait(6000)
	Until FALSE
end sub

healing from other attack.sc #

sub main()
	var warrior
	warrior = UO.GetSerial()
	While UO.Targeting()
		Wait(200)
	Wend
	UO.Print(warrior)
	goto end
	Repeat
		While UO.Life > 35
			UO.Attack(0x001A4931)
			Wait(1000)
		Wend
		UO.Warmode(0)
		UO.DeleteJournal()
		Repeat
			UO.Say("heal me")
			Wait(2000)
		Until UO.InJournal("Tingle starts to heal you") OR UO.Life == UO.Str
		Repeat
			Wait(500)
		Until UO.Life > 40
		UO.Say("heal complete")
	Until FALSE
	end:
end sub

healing other anatomy #

sub main()
	Repeat
		UO.WaitTargetObject(0x001A4933)
		UO.UseSkill("Anatomy")
		Wait(2500)
		If UO.InJournal("heal me") Then
			Repeat
				UO.DeleteJournal()
				UO.WaitTargetObject(0x001A4933)
				UO.UseType(0x0E21)
				Wait(1000)
			Until UO.InJournal("heal complete")
		End If
	Until FALSE
end sub

healing other eval int.sc #

sub main()
	Repeat
		UO.WaitTargetObject(0x001A4933)
		UO.UseSkill("Evaluating Intelligence")
		wait(5000)
		If UO.InJournal("heal me")Then
			Repeat
				UO.DeleteJournal()
				UO.WaitTargetObject(0x001A4933)
				UO.UseType(0x0E21)
				Wait(1000)
			Until UO.InJournal ("heal complete")
		End If
	Until FALSE
end sub

healing+anatomy.sc #

sub main()
	Repeat
		While UO.Life > 40
			UO.WaitTargetObject("0x001A492B")
			UO.UseSkill("Anatomy")
			#IF UO.ObjAtLayer('Rhand') == '' Then
				#UO.Equipt('Rhand', '0x0EC4')
			#End IF
			Wait(5000)
		Wend
		UO.BandageSelf()
		Wait(6000)
	Until FALSE
end sub