y;Skrypt bY SabiK
;zywiolak.txt
;Wersja 1.0
;Gdy ktos nas atakuje lub pojawi sie zywiolak ziemii skrypt zaklada krisa i pawez, po czym wait 30sekund

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

while #true
{
   for %tmp 1 3
   {
      scanjournal %tmp
      if ( zywiolak_ziemi in #journal && #enemyid <> n/a ) || #enemyid <> n/a
      {
         gosub bron2
         wait 600
      }
   }
}

sub bron2
finditem vrh C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz krisa
   goto bron21
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles krisa
bron21:
wait 20
finditem cik C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz pawezy
   return
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles pawez
return