Page 1 of 1

На крафт

Posted: 2006-02-02 07:40:54
by Dominator
Мнеб нужен скриптик на крафт горгетов из цветных ингов (сам чтот несооброжу как его сделать), чтобы можно было менять тип ингов в скрипте если я вдруг захочу ковать из других ингов.

Posted: 2006-02-02 07:48:14
by Savage

Code: Select all

sub gorget()
	VAR IngName, IngColor

	IngName="Shadow"
	IngColor='0x096B'

	UO.AutoMenu(IngName+' Plate','Platemail Gorget')
	UO.AutoMenu(IngName+' Armor','Plate')
	UO.AutoMenu('Colored','Armor')
	UO.AutoMenu('Blacksmithing','Colored')

	UO.FindType('0x1BEF',IngColor,'backpack')
	While UO.GetQuantity('finditem')>=10
		UO.DeleteJournal()
		UO.UseObject('finditem')

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

Posted: 2006-02-03 07:36:06
by Dominator
Спасиб Savage ,очень выручил

Posted: 2006-02-03 07:38:48
by Savage
После очередного удешевления метала при продаже его НПС на дрв, я сделал это, но долго крафтать, проще еще одного копальщика подключить :)

Posted: 2006-02-03 07:43:15
by Dominator
Да знам вкурсах ,но у меня тачка непотянет прогу чтоб 2 чара запускать. Ктомуж 1 проблемка есть я на ДРВ зайти немогу сам - Терминайтед окно выскакивает, а зайти могу ток после того как ктонить за моего чара зайдёт