выывпыци

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
son
Posts: 43
Joined: 2006-12-16 14:44:01

выывпыци

Post by son »

ывивыивыив
Last edited by son on 2011-05-19 14:39:03, edited 4 times in total.
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

в основном скрипте перед
UO.DeleteJournal()

добавь
ToHide()

И ниже своего скрипта вот это добавь.
Можно сделать проверку хайда при каждом шаге. Тогда ToHide() перед press добавляй.

Code: Select all

Sub ToHide()
VAR LastTimer, HidFlag=1
    if UO.Hidden() then
        HidFlag=0
    else
    end if
    while HidFlag
        DeleteJournal("can't seem to hide|to perform|stop trying|прекратили|не удалось|удачно|You have hidden yourself well")
        LastTimer=UO.Timer()
        UO.Exec('warmode 0')
        UO.UseSkill('Hiding')
        repeat
            wait(50)
        until UO.InJournal("can't seem to hide|to perform|stop trying|прекратили|не удалось|удачно|You have hidden yourself well") || LastTimer+50<UO.Timer()
        if UO.InJournal("0xA5F8|удачно|You have hidden yourself well") then
            HidFlag=0
        end if
    wend
end sub

Sub DeleteJournal(msg)
 While UO.InJournal(msg)
     UO.SetJournalLine(UO.InJournal(msg) - 1,'')
 wend
endsub
son
Posts: 43
Joined: 2006-12-16 14:44:01

орьпрбер

Post by son »

амьараьар
Post Reply