Всем Привет ! Помогите выяснить проблему в скрипте на одеаание со столбов на сервере пвпальфа, не одевает армор с хаос столба и не берет сресторки чар - берс, заранее ильно благодарен:"
sub Dress_Amazon() UO.Print('Dress Amazon: Start ') UO.Set('norbcheck', '1') UO.Set('norbcalc', '1') UO.Set('finddistance', '3') UO.FindType('0x0ED4', '0x08BB', 1) var ArmorStone = UO.GetSerial('finditem') UO.FindType('0x0ED4', '0x079B', 1) var ItemStone = UO.GetSerial('finditem') UO.UseObject('backpack') CheckLag() if not UO.ObjAtLayer('Torso') then AmaArmor() end if if not UO.ObjAtLayer('Horse') then UO.Recall(ItemStone, 34) CheckLag() end if UO.Recall(ItemStone, 2) CheckLag() UO.Recall(ItemStone, 5) CheckLag() UO.Recall(ItemStone, 9) CheckLag() UO.Recall(ItemStone, 27) CheckLag() UO.Recall(ItemStone, 14) CheckLag() UO.UseType('0x1F06') UO.UseType('0x1F08') UO.UseType('0x1C09') UO.UseType('0x1087') UO.UseType('0x1FFD') UO.UseType('0x1F03') UO.UseType('0x1545') UO.UseType('0x1538') UO.Msg('.arm') UO.Set('norbcheck', '0') UO.Set('norbcalc', '0') UO.Print('Dress: FINISH') end sub
sub checklag() deljournal("backpack") uo.click("backpack") repeat wait(50) until uo.injournal("backpack") endsub
Sub DelJournal(msg) var nom = UO.InJournal(msg) If nom>0 Then UO.SetJournalLine(Nom - 1," -- replaced -- ") DelJournal(msg) EndIf endsub
sub bye() UO.Exec('warmode 0') var Stone='0x1183' uo.usefromground(Stone) uo.cast('Invisibility','self') wait (500) uo.msg('') wait (1100) uo.msg('') wait (1100) uo.msg('') wait (50) uo.msg('') end sub
sub checklag() deljournal("backpack") uo.click("backpack") repeat wait(50) until uo.injournal("backpack") endsub
Sub DelJournal(msg) var nom = UO.InJournal(msg) If nom>0 Then UO.SetJournalLine(Nom - 1," -- replaced -- ") DelJournal(msg) EndIf endsub
|