Lara Craft

Napsal: **ned bře 18, 2018 10:28 pm**

Barelstaves neboli boky:

#---------------------------------------------------------------
sub barelstaves()
#---------------------------------------------------------------
UO.AddObject("bedna")
While UO.Targeting()
   Wait(100)
Wend
UO.Print('Otviram bednu...')
UO.UseObject("bedna")
Wait(1000)
UO.Print('Pracuji..')
While NOT UO.Dead()
   If UO.Count('0x1BDD','0x0000','backpack') < 3 then
      If UO.Count("0x1EB1")>0 then
         UO.Print("Uklizim skruze")
         UO.FindType("0x1EB1", -1, "backpack")
         UO.MoveItem("finditem", -1, "bedna")
         Wait(500)
      EndIf
      UO.Print("Doplnuji logy!")
      UO.FindType("0x1BDD",-1,"bedna")
      If NOT UO.FindCount() then
         UO.Print("Nejsou logy.")
	   Return
      EndIf
	#repeat
      UO.Moveitem("finditem", 100, "backpack")
      Wait(500)
	#until uo.weight==610
      
   Endif
   UO.DeleteJournal()
   UO.waitmenu ('Carpentry', 'Containers & Cont. parts','Containers & Cont. parts','Barrel Staves')
   UO.usetype("0x1035","0x000")
	repeat
	wait(600)
   until uo.inJournal('fail to create|You put') 
   uo.print(str(UO.Count('0x1EB1','0x0000','backpack')))
wait(500)
Wend
UO.exec('terminate afkalarm')
end sub

Barely víka (potřebujete prkna):

Kód: Vybrat vše

#---------------------------------------------------------------
sub barellids2()
#---------------------------------------------------------------
UO.AddObject("bedna")
While UO.Targeting()
   Wait(100)
Wend
UO.Print('Otviram bednu...')
UO.UseObject("bedna")
Wait(1000)
UO.Print('Pracuji..')
If UO.Count('0x1BDD') < 3 then
     UO.Print("Doplnuji logy!")
    UO.FindType('0x1BDD',-1,"bedna")
	UO.MoveItem("finditem", 10, "backpack")
    Wait(800)
 endif
While NOT UO.Dead()
	If UO.Count('0x1BD7') < 2 then
      UO.FindType("0x1BD7",-1,"bedna")
	  If NOT UO.FindCount() then
		 UO.Print("Nejsou prkna.")
		 UO.exec('terminate afkalarm')
		 Return
	  Else
		UO.Print("Doplnuji prkna!")
		UO.Moveitem("finditem", 30, "backpack")
		Wait(500)
      EndIf
	Endif
    If UO.Count('0x1DB8') >= 10 then
      UO.Print("Uklizim vika")
      UO.FindType("0x1DB8", -1, "backpack")
      UO.MoveItem("finditem", -1, "bedna")
      Wait(500)
    EndIf 
	     
   UO.DeleteJournal()
   UO.waitmenu ('Carpentry', 'Containers & Cont. parts','Containers & Cont. parts','Barrel Lid')
   UO.Usetype("0x1035")
   Repeat
      Wait(100)
   Until UO.InJournal("You put|You fail to create")
   uo.print(str(UO.Count('0x1DB8','0x0000','backpack')))
   Wait(500)
Wend
If UO.Count("0x1DB8") then
         UO.Print("Uklizim vika")
         UO.FindType("0x1DB8", -1, "backpack")
         UO.MoveItem("finditem", -1, "bedna")
         Wait(500)
      EndIf 
end sub

A nyní výroba samotných form (potřebujete carpentry alespoň 90), ale rozhodně doporučuji max, formy se balí do velkého balení, takže si do truhly dejte pár logů navíc:

Kód: Vybrat vše

#---------------------------------------------------------------
sub formy()
#---------------------------------------------------------------
var konec=0
uo.exec('exec afkalarm')
UO.AddObject('bedna')
while UO.targeting()
	wait(200)
wend
UO.UseObject('bedna')
wait(500)
if UO.Count('0x1BDD','0x0000')<10 then
	UO.FindType('0x1BDD','0x0000','bedna')
	UO.MoveItem('finditem','10','backpack')
	wait(1000)
endif
while NOT UO.Dead() AND konec==0
IF UO.Count('0x1EB1','0x0000','backpack')<2 then
	UO.Print("Doplnuji skruze!")
      UO.FindType('0x1EB1','0x0000','bedna')
      If NOT UO.FindCount() then
         UO.Print("Nejsou skruze.")
	UO.exec('terminate afkalarm')
         konec=1
	else
	UO.MoveItem('finditem',20,'backpack')
	wait(1000)
      EndIf
endif
if UO.Count('0x1DB8','0x0000','backpack')<2 then
	UO.Print("Doplnuji vika!")
      UO.FindType('0x1DB8','0x0000','bedna')
      If NOT UO.FindCount() then
         UO.Print("Nejsou vika.")
	konec=1
	UO.exec('terminate afkalarm')
      else
	UO.MoveItem('finditem',20,'backpack')
	wait(1000)
      EndIf
endif
while UO.Count('0x1EB1','0x0000','backpack')>1 AND UO.Count('0x1DB8','0x0000','backpack')>1
	UO.DeleteJournal()
	UO.waitmenu ('Carpentry', 'Containers & Cont. parts','Containers & Cont. parts','Forma na lahve')
	UO.usetype("0x1035","0x000")
	repeat
		wait(900)
	until uo.inJournal('fail to create|You put') 
	uo.print(str(UO.Count('0x0E7F','0x0909')))
		wait(800)
	if UO.Count('0x0E7F','0x0909')>=10 then
		if UO.Count('0x1BDD','0x0000')<10 then
			UO.FindType('0x1BDD','0x0000','bedna')
			UO.MoveItem('finditem','10','backpack')
			wait(1000)
		endif
		UO.DeleteJournal()
		UO.waitmenu ('Carpentry', 'Containers & Cont. parts','Containers & Cont. parts','Bedna forem')
		UO.usetype("0x1035","0x000")
		repeat
		wait(300)
		until uo.inJournal('fail to create|You put') 
		uo.print(str(UO.Count('0x0E7F','0x0909')))
		wait(800)
		UO.FindType('0x0FAE','0x0909','backpack')
		UO.MoveItem('finditem',-1,'bedna')
		wait(1000)
	endif
wend
wend
uo.Print('Uklizim zbyle formy...')
	repeat
		UO.FindType('0x0E7F','0x0909','backpack')
		UO.MoveItem('finditem',-1,'bedna')
	wait(1000)
	until uo.count('0x0E7F','0x0909','backpack')==0
end sub

Lara Craft

Výroba barrel částí a forem na kádě

Výroba barrel částí a forem na kádě