Tailoring

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 #

tailor.sc #

sub main()
  aaa:
  
  UO.Exec("waittargettype cloth")
	wait(4000)
	UO.Exec("useobject sewingkit")
		wait(4000)
	
	UO.LDblClick(242,70)
		wait(1000)
		UO.LDblClick(108,58)
     wait(40000)
		
  goto aaa
end sub

tailor 2.sc #

sub main() 
uo.say(".autoloop 1")
start:

UO.Exec("waitmenu 'What' 'Misc' 'What' 'Pillow'")
UO.Exec('waittargettype cloth')
UO.Exec('usetype sewkit') 
wait(3000)
uo.lclick('55,86')

GOTO start 
end sub 

tailor 3.sc #

sub main() 
uo.say(".autoloop 1")
start:

UO.Exec("waitmenu 'What' 'Studded' 'What' 'Tunic'")
UO.Exec('waittargettype hide')
UO.Exec('usetype sewkit') 
wait(8000)
UO.LClick(60,82)
wait(2000)

GOTO start 
end sub 

tailoring.sc #

sub main()
	UO.Set("quiet", "1")

	var i = 0
	Repeat
		UO.DeleteJournal()
		UO.WaitTargetType(0x1765)
		UO.WaitMenu('What', 'Carpet', 'What', 'Carpet')
		UO.OnGump('anygump', '1')
		UO.UseType(0x0f9d)
		Repeat
			wait(200)
		Until UO.InJournal("destroy|make|create|moved|full")
		If UO.InJournal("create") Then
			i = i + 1
		End If
	Until i > 130
end sub

tailoring 2.sc #

sub main()
	var currentBag, bagType, i
	
	UO.UnsetReceivingContainer()
	UO.Set("quiet", "0")
	
	#Select Bag of bags
	UO.AddObject('Bags')
	While UO.Targeting()
		Wait(500)
	Wend
	
	bagType = UO.GetGraphic('Bags')
	
	UO.Set("quiet", "1")
	
	Repeat
		#grab one bag from bag and set it as the receiving container
		UO.FindType("bagType", -1, 'Bags')
		If UO.FindCount() Then
			currentBag = UO.GetSerial('finditem')
		Else
			armsLore()
		End If
		
		UO.SetReceivingContainer(currentBag)
		UO.MoveItem(currentBag,'0','ground')

		#Make carpet
		i = 0
		Repeat
			UO.DeleteJournal()
			UO.WaitTargetType(0x1765)
			UO.WaitMenu('What', 'Carpet', 'What', 'Carpet')
			UO.OnGump('anygump', '1')
			UO.UseType(0x0f9d)
			Repeat
				wait(200)
			Until UO.InJournal("destroy|make|create|moved|full")
			If UO.InJournal("create|make") Then
				i = i + 1
				grabItem()
			End If
			UO.FindType("0x0AD1", -1, currentBag)
		Until UO.FindCount() > 147
	Until FALSE
end sub

sub grabItem()
	var count = UO.Count(0x0AD1)
	var i
	For i = 1 To count
		UO.FindType("0x0AD1", -1, 'my')
		UO.Grab(0, 'finditem')
		UO.Ignore('finditem')
	Next
	UO.IgnoreReset()
end sub

sub armsLore()
	Repeat
		UO.WaitTargetType(0x13E3)
		UO.UseSkill("Arms Lore")
		Wait(5000)
	Until FALSE
end sub

tailoring Pillow.sc #

sub main()
	makePillowShell()
	#getPillows()
end sub

sub makePillowShell()
	var pillowType = 0x163A
	
	UO.IgnoreReset()
	
	UO.FindType(pillowType, -1, 'my')
	
	var pillowCount = UO.FindCount()
	If pillowCount < 27 Then
		UO.Print('Not enough pillows.')
		Return
	End If

	dim pillows[27]
	var i
	
	For i = 0 to 26 
		UO.FindType(pillowType, -1, 'my')
		pillows[i] = UO.GetSerial('finditem')
		UO.Ignore('finditem')
	Next
	
	var myX = UO.GetX()
	var myY = UO.GetY()
	var myZ = UO.GetZ()
	
	var x, y, z
	
	i = 0
	
	For x = myX - 1 To myX + 1
		For y = myY - 1 To myY + 1
			If x <> myX || y <> myY Then
				For z = myZ To myZ + 2
					UO.MoveItem(pillows[i], 1, 'ground', x, y, z)
					i = i + 1
					Wait(100)
				Next
			End If
		Next
	Next
end sub

sub getPillows()
	var pillowType = 0x163A
	
	UO.IgnoreReset()
	UO.Set('finddistance', 2)
	
	UO.FindType(pillowType, -1, 'ground')
	var pillowCount = UO.FindCount()
	
	dim pillows[Val(Str(pillowCount ))]
	var i
	
	For i = 0 To pillowCount - 1 
		UO.FindType(pillowType, -1, 'ground')
		pillows[i] = UO.GetSerial('finditem')
		UO.Ignore('finditem')
	Next
	
	For i = 0 To pillowCount - 1
		UO.MoveItem(pillows[i], 1, 'my')
		Wait(200)
	Next
end sub

sub journalWait(journalPattern, timeOut)
	var time = 0
		
	UO.DeleteJournal()
	
	Repeat
		time = time + 200
		Wait(200)
	Until UO.InJournal(journalPattern) || time > timeOut
end sub