hiding:
wait 2s
event macro 13 21
wait 3s
gosub connect
if H = #CharStatus
{
finditem HND
set #LObjectID #FindID
event macro 17 0
goto stealth
}
goto hiding

stealth:
wait s
event macro 13 47
wait 2s
gosub connect
if H = #CharStatus
goto stealth
goto hiding

sub connect
connectbegin:
if #ContKind = STOB
{
key enter
connectfaza1:
wait 30s
if #ContKind = STOB
goto connectbegin
if #ContKind <> CTU
goto connectfaza1
msg Ввести пароль
key enter
connectfaza2:
wait 5s
if #ContKind = STOB
key enter
if #ContKind = CTU
key enter
if #ContKind <> ACFC
goto connectfaza2
key enter
connectfaza3:
wait 5s
if #ContKind <> QUTB
goto connectfaza3
click 617 455
connectfaza4:
wait 5s
if #ContKind <> SHYB
goto connectfaza4
}
if #ContKind = CTU
goto connectfaza1
connectend:
return