;Skrypt bY SabiK
;zakradanie.txt
;Wersja 1.0
;Po nacisnieciu klawisza '%key' skrypt sie wylacza

;U W A G A !!! USTAW PONIZSZE ZMIENNE PRZED WLACZENIEM SKRYPTU !!!
set %key X       ;Tu ustaw klawisz pod ktorym bedziesz mogl wylaczyc skrypt
;-------------------------------------------------------------------------------------

set #sysmsgcol 63
event sysmessage Skrypt [zakradanie] odpalony (bY SabiK)
wait 1

zakradanie:
if H in #charstatus
   goto stealth
set %tmp #scnt2 + 8
event macro 1 0 .um ukrywanie
repeat
if %tmp < #scnt2
   goto zakradanie
until H in #charstatus
set %tmp #scnt2 + 87
repeat
onhotkey %key
{
   set #sysmsgcol 1080
   event sysmessage Wylaczono skrypt [zakradanie]
   halt
}
until %tmp < #scnt2
stealth:
if H notin #charstatus
   goto zakradanie
set %tmp #scnt2 + 8
event macro 1 0 .um zakradanie
repeat
scanjournal 1
if %tmp < #scnt2
   goto zakradanie
until Teraz_poruszasz_sie_po_kryjomu in #journal || s_siebie! in #journal
deletejournal
set %tmp #scnt2 + 108
repeat
onhotkey %key
{
   set #sysmsgcol 1080
   event sysmessage Wylaczono skrypt [zakradanie]
   halt
}
until %tmp < #scnt2
goto zakradanie