Yoko
http://forum.yoko.com.ua/

Help
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3749		 Page 1 of 1
Author:  tushkan1986 [ 2005-04-21 08:23:26 ]
Post subject:  Help
Помогите пожлалуйста вставить в скрипт Checklag, а то вылетаем при первом ВС и спирит, если можно.
sub BS()
VAR Cont='0x4020d571'
var ing='0x1bef' ; type of ingot
var color='0x0590' ;color
UO.CancelMenu()
UO.SetReceivingContainer('backpack')
UO.Automenu("Blacksmithing","Armor")
UO.Automenu("Armor","Weapons")
UO.Automenu("Weapons","Swords")
UO.Automenu("Swords","Dagger")
; UO.Automenu("Swords","Dagger")
while True
UO.DeleteJournal()
if UO.Count(ing,color)<=10 then
UO.FindType(ing,color,Cont)
UO.Grab('100','finditem')
wait(2000)
endif
UO.UseType(ing,color)
Repeat
wait(1000)
Until UO.InJournal("You put") OR UO.InJournal("fail")
if UO.Count('0x0f51')>0 then ;0x0f51 òèï äàããåðà, ïåðåïðîâåðüòå
UO.FindType('0x0f51',-1,-1) ;0x0f51 òèï äàããåðà, ïåðåïðîâåðüòå
UO.useobject('0x402b96af'); ID ôîðæû
UO.WaitTargetObject('finditem')
wait(1000)
endif
Wend
Author:  Destruction [ 2005-04-21 12:00:51 ]
Post subject: 
На заметку - waitmenu работает лучше (сколько раз замечал!)
Author:  tushkan1986 [ 2005-04-21 13:27:34 ]
Post subject: 
Ну так что, никто не поможет? :cry:
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/