Yoko

Code: Select all

#плавка железа
#подходим к форже и запускаем скрипт
var 1 = '****'#тайп железки1#
var 2 = '****'#тайп железки2#
var 3 = '****'#тайп железки3#
var 4 = '****'#тайп железки4#
var 5 = '****'#тайп железки5#
var 6 = '****'#тайп железки6#
sub main()       
while uo.count(1)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(1)
wait(200)
wend
while uo.count(2)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(2))
wait(200)
wend
while uo.count(3)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(3))
wait(200)
wend
while uo.count(4)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(4))
wait(200)
wend
while uo.count(5)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(5))
wait(200)
wend
while uo.count(6)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(6))
wait(200)
wend
end sub

Code: Select all

sub SmeltTrush()
var tType, cType, Forge='0x4015F387'
	UO.Print('Откуда тырим?')
	uo.addobject('objFrom') 
	while uo.Targeting() 
		wait(200) 
	wend
	UO.UseObject('objFrom')
	CheckLag()
	UO.Print('Что брать то?')
	uo.addobject('objType') 
	while uo.Targeting() 
		wait(200) 
	wend
	tType = uo.GetGraphic('objType')
	cType = uo.GetColor('objType')
	UO.Findtype(tType,cType,'objFrom')
	while UO.GetQuantity('finditem')>0
		UO.MoveItem('finditem',-1,'backpack')		
		CheckLag()
		UO.FindType(tType,cType,'backpack') 
		If UO.GetQuantity('finditem') then 
			UO.WaitTargetObject('finditem') 
			UO.UseObject(Forge)
			wait(3000)
			CheckLag()
		Endif
		if UO.Weight > UO.STR*4 then
			UO.FindType('0x1BEF','0x0000','backpack') 
			UO.MoveItem('finditem',-1,'objFrom')
			CheckLag()
		end if
		UO.Findtype(tType,cType,'objFrom')
	wend
end sub