set %dzwiek c:\SUCCESS.wav

set %juka 0
set %ji #jindex
set #lpc 1000
set %j 0
set %p 1
set *STOP 0

repeat
{
      if #contname = generic_gump && #contsize notin 400_220 , #spc , 400_320 , #spc , 400_420 , #spc , 400_520 , #spc , 400_380 , #spc , 447_545 , #spc , 380_200 , #spc , 410_190 , #spc , 500_360 , #spc , 500_340 , #spc , 640_650
         sound %dzwiek
      if %ji < #jindex
      {
         set %ji %ji + 1
         scanjournal %ji
         if rozpada in #journal
         {
            set *STOP 1
            set #sysmsgcol 45
            event sysmessage stypiesz sie !!!
            set %ji #jindex
         }
         if Czujesz_sie_dobrze in #journal
         {
            event #sysmsgcol 55
            event sysmessage ZJEDZ COS!!
            event sysmessage Jestes glodny!!
            sound %dzwiek
            set %ji #jindex
         }
         if Nie_masz_miejsca_w_plecaku in #journal
         {
            event #sysmsgcol 45 NIE MASZ MIEJSCA W PLECAKU!!!
            sound %dzwiek
            Set *PLECAK 1
            set %ji #jindex
         }
         if Valarowie in #journal || #charname , : in #journal
         {
            if #charname , : in #journal
               continue
            if , #charname in #journal
               continue
            sound %dzwiek
            set %ji #jindex
         }
         if Zywiolak_ in #journal || szlam in #journal && %juka = 1
         {
            event macro 4 0 STRAZ POMOCY!!!!!!
            Event macro 4 0 STRAZNIK RATUNKU!!!!!
            sound %dzwiek
            set %ji #jindex
         }
      }
      if %juka = 1
      {
         if %j < #scnt
         {
            event macro 4 0 PODEJDZCIE!!!
            event macro 4 0 ZA MNA WSZYSCY!!!!!!
            set %j #scnt + 30
            set %ji #jindex
         }
      }
}
until #false