2 Sergiusis

[AvantriX]

Code: Select all

sub bs()
	VAR Exit=0, LastTimer, Forge='0x400D22C9', Cont='0x400F7BC7'
	while Exit<>1
		ToHide()
		UO.DeleteJournal()
		LastTimer=UO.Timer()
		UO.WaitMenu('Blacksmithing','Weapons','Weapons','Fences','Spears','dagger')
		UO.UseType(0x1BEF) ; iron ings

		while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
				wait(500)
		wend

		If UO.InJournal("You have failed") then
			repeat
				wait(100)
			until UO.Timer()>=LastTimer+100 ;time to make a dagger
		EndIf

		UO.FindType('0x0F51',-1,'backpack')
		wait(500)

		If UO.GetQuantity('finditem') then
			UO.WaitTargetObject('finditem')
			UO.UseObject(Forge) ;forge
		Endif

		UO.FindType('0x1BEF',-1,'backpack')
		If UO.GetQuantity('finditem')<10 then
			UO.FindType('0x1BEF','0x0000',Cont)
			wait(1000)
			UO.Grab('200','finditem')
		Endif
		wait(1000)
	wend	
	gong(2)
end sub

to Sergiusis
подскажи как переделать скрипт что бы когда айрон или металл из которого кую заканчивался в паке,он(скрипт) выкидывал даггеры в трэшь, не применяя цикл GoTo!!!!
заранее благодарю!

[Sergiusis]

Все вопросы к Savage

[Savage]

А плавить не помогает что ли?

[AvantriX]

у нас на шарде можно плавить всё что выше бронзы ....а бронза и выше достаточно ходовой товар......мы на этом не качаемся так что трэшь это ед выход ...во вторых я таки сумел его сам переделать)))......воть ну еси что саваж я к тебе обращусь)))))

благодарю за ответы