Výroba CB

[Lara Craft]

Budeme potřebovat: 5x gold ingot a 5x silver wire, kde x je počet požadovaných crystal ballů děleno úspěšností 90%.
Např. 20ks / 0.9 (90%) = 22 cb, tj 110 gold ingotů a 100 silverwire. Dále pytlík nebo bedničku, kam si odložíme hotová CB.

Kód: Vybrat vše

#---------------------------------------------------------------
sub CB()
#---------------------------------------------------------------
UO.AddObject('pytlik')
	While UO.Targeting()
	wait(200)
	wend
  UO.SetCatchBag('pytlik')
 While NOT UO.Dead() and UO.Count("0x1BE9,0x0000") >= 5 AND UO.Count("0x1877,0x0000") >= 5 AND UO.Count("0x1BEF,0x0000") > 3
    UO.deleteJournal()
        UO.waitmenu ('Tinkering', 'Special Items', 'Special Items', 'Crystal Ball')
        UO.Exec("usetype 0x1EBC")
	repeat
        wait(400)
    	until UO.Injournal('You put the Crystal ball|Tinkering failed|Targetting Cancelled|Unexpected target info')
wend
uo.unsetcatchbag()
UO.Print('Uz nemas potrebne suroviny')
end sub

Jak můžete vidět, skript je poměrně jednoduchý.