gosub showMenu
set %starttime #scnt
IGNOREITEM reset
gosub pauseScript

main:
     gosub updateTime
     gosub checkmenu
     gosub Attack
     gosub findtyp
     gosub checkButton
goto main

Sub Attack
{
enemyloop:

   FINDITEM !_creature G_ , !_range
   IF #FINDKIND <> -1
   {
     SET #LTARGETID #FINDID
     EVENT macro 27
 	   menu Delete status
     menu Text status 91 87 Znaleziono cel. Atakowanie!
   }
   else
   {
 	   menu Delete status
     menu Text status 91 87 Szukanie...
   }
   ;WAIT 10
return
}

Sub findtyp
{
      if #enemyID = N/A
      {
         return
      }
      finditem #ltargetid G
      menu Delete typ
      menu Font Size 20
      menu Text typ 260 42 #findtype
      return
}

Sub checkmenu
{
set !_creature
menu get orzel
if #menures <> 0
 set !_creature TC_
menu get koziol
if #menures <> 0
 set !_creature !_creature , ZF_
menu get krowa
if #menures <> 0
 set !_creature !_creature , NG_IG_
menu get lania
if #menures <> 0
 set !_creature !_creature , TG_
menu get wielkijelen
if #menures <> 0
 set !_creature !_creature , AH_
menu get wilk
if #menures <> 0
 set !_creature !_creature , PG_
menu get siwywilk
if #menures <> 0
 set !_creature !_creature , VD_
menu get niedzwiedz
if #menures <> 0
 set !_creature !_creature , BG_
menu get byk
if #menures <> 0
 set !_creature !_creature , XG_
menu get bandyta
if #menures <> 0
 set !_creature !_creature , IS_

  ; kolumna dróga
menu get malpiarz
if #menures <> 0
 set !_creature !_creature , BE_
menu get waz
if #menures <> 0
 set !_creature !_creature , QE_
menu get zaba
if #menures <> 0
 set !_creature !_creature , BB_
menu get wielkaropucha
if #menures <> 0
 set !_creature !_creature , CB_
menu get dzik
if #menures <> 0
 set !_creature !_creature , CO_
menu get harpia
if #menures <> 0
 set !_creature !_creature , UD_
menu get niedzwiedzgrizli
if #menures <> 0
 set !_creature !_creature , WF_
menu get worg
if #menures <> 0
 set !_creature !_creature , LD_
menu get chicki
if #menures <> 0
 set !_creature !_creature , OE_
menu get bandytalucznik
if #menures <> 0
 set !_creature !_creature , HS_

     ; kolumna trzecia
menu get ettin
if #menures <> 0
 set !_creature !_creature , QD_
menu get trolwojownik
if #menures <> 0
 set !_creature !_creature , RE_
menu get ogr
if #menures <> 0
 set !_creature !_creature , XC_
menu get wodzogrow
if #menures <> 0
 set !_creature !_creature , DB_
menu get klebowisko
if #menures <> 0
 set !_creature !_creature , WGB_
menu get padliniak
if #menures <> 0
 set !_creature !_creature , GD_

menu get zasieg
SET !_range #menures
return
}

sub showMenu
    menu Clear
    menu Window Title Auto Attack by Brada
    menu Window Color Black
    menu Window Size 409 335
    menu Font Transparent #true
    menu Font Align Right
    menu Shape EUOShape1 -128 -4 485 85 3 1 1 Black 7 3DDkShadow
    menu Shape EUOShape2 322 16 69 65 2 1 1 Black 7 3DDkShadow
    menu Shape EUOShape3 250 -28 141 81 3 1 1 Black 7 3DDkShadow
    menu Shape EUOShape4 45 109 493 300 3 1 1 Black 7 3DDkShadow
    menu Shape EUOShape5 13 109 69 65 2 1 1 Black 7 3DDkShadow
    menu Shape EUOShape6 13 137 141 300 3 1 1 Black 7 3DDkShadow
    menu Shape EUOShape8 302 22 29 29 1 1 1 Black 7 3DDkShadow
    menu Shape EUOShape10 35 153 350 177 4 7 1 Black 7 3DDkShadow    ; zwierzaki
   ; menu Shape EUOShape11 217 153 169 177 4 7 1 Black 7 3DDkShadow
    menu Font Name Arial
    menu Font Size 14
    menu Font Style b
    menu Font Color Lime
    menu Font Align Left
    menu Font BGColor Black
    menu Text EUOLabel1 42 18 AutoAttack
    menu Text EUOLabel5 42 54 Brada
     menu Font Size 8
    menu Font Color Silver
    menu Text EUOLabel4 32 6 Operation:
    menu Text EUOLabel6 32 42 By:
   menu Font Name MS Sans Serif
    menu Font Size 8
    menu Font Color WindowText
    menu Font Transparent #false
    menu Font BGColor 3DDkShadow
    menu Text EUOLabel23 81 147 Zwierzeta
 ;   menu Text EUOLabel24 248 147 Ustawienia
    menu Text EUOLabel25 235 16 Zasieg :
    menu Font Name Arial
    menu Font Style
    menu Font Color Lime
    menu Font Transparent #true
    menu Font BGColor Black
    menu Text EUOLabel48 46 87 Status:
         ; kolumna pierwsza
    menu Text EUOLabel7 68 164 Orze3
    menu Text EUOLabel8 68 179 Kozio3
    menu Text EUOLabel9 68 194 Krowa
    menu Text EUOLabel10 68 209 Lania
    menu Text EUOLabel11 68 224 Wielki jelen
    menu Text EUOLabel12 68 239 Wilk
    menu Text EUOLabel12 68 254 Siwy wilk
    menu Text EUOLabel13 68 269 NiedYwiedY
    menu Text EUOLabel21 68 284 Byk
    menu Text EUOLabel25 68 299 Bandyta
         ; kolumna dróga
    menu Text EUOLabel7 175 164 Ma3piarz
    menu Text EUOLabel7 175 179 W1?
    menu Text EUOLabel7 175 194 —aba
    menu Text EUOLabel7 175 209 Wielka ropucha
    menu Text EUOLabel7 175 224 Dzik
    menu Text EUOLabel7 175 239 Harpia
    menu Text EUOLabel7 175 254 NiedYwiedY grizli
    menu Text EUOLabel7 175 269 Worg
    menu Text EUOLabel7 175 284 Chicki
    menu Text EUOLabel7 175 299 Bandyta 3ucznik
         ; kolumna trzecia
    menu Text EUOLabel7 282 164 Ettin
    menu Text EUOLabel7 282 179 Trol wojownik
    menu Text EUOLabel7 282 194 Ogr
    menu Text EUOLabel7 282 209 Wódz ogrów
    menu Text EUOLabel7 282 224 K3ebowisko
    menu Text EUOLabel7 282 239 Padliniak
    menu Text EUOLabel7 282 254 -
    menu Text EUOLabel7 282 269 -
    menu Text EUOLabel7 282 284 -
    menu Text EUOLabel7 282 299 -

    menu Text EUOLabel46 97 125 Run Time:
    menu Font Color Lime
    menu Text status 91 87 Initializing...

    menu Font BGColor WindowText
    
    menu Edit zasieg 290 10 50 20
          ; kolumna pierwsza
    menu Check orzel 48 164 13 13 #true Orze3
    menu Check koziol 48 179 13 13 #true Kozio3
    menu Check krowa 48 194 13 13 #true Krowa
    menu Check lania 48 209 13 13 #true Lania
    menu Check wielkijelen 48 224 13 13 #true Wielki jelen
    menu Check wilk 48 239 13 13 #true Wilk
    menu Check siwywilk 48 254 13 13 #true Siwy wilk
    menu Check niedzwiedz 48 269 13 13 #true NiedYwiedY
    menu Check byk 48 284 13 13 #false Byk
    menu Check bandyta 48 299 13 13 #false Bandyta
          ; kolumna dróga
    menu Check malpiarz 155 164 13 13 #false Ma3piarz
    menu Check waz 155 179 13 13 #false W1?
    menu Check zaba 155 194 13 13 #false —aba
    menu Check wielkaropucha 155 209 13 13 #false Wielka ropucha
    menu Check dzik 155 224 13 13 #false Dzik
    menu Check harpia 155 239 13 13 #false Harpia
    menu Check niedzwiedzgrizli 155 254 13 13 #false NiedYwiedY grizli
    menu Check worg 155 269 13 13 #false Worg
    menu Check chicki 155 284 13 13 #false Chicki
    menu Check bandytalucznik 155 299 13 13 #false Bandyta 3ucznik
           ; kolumna trzecia
    menu Check ettin 262 164 13 13 #false Ettin
    menu Check trolwojownik 262 179 13 13 #false Trol wojownik
    menu Check ogr 262 194 13 13 #false Ogr
    menu Check wodzogrow 262 209 13 13 #false Wódz ogrów
    menu Check klebowisko 262 224 13 13 #false K3ebowisko
    menu Check padliniak 262 239 13 13 #false Padliniak
    menu Check nic 262 254 13 13 #false nic
    menu Check nic 262 269 13 13 #false nic
    menu Check nic 262 284 13 13 #false nic
    menu Check nic 262 299 13 13 #false nic

    menu Font Name MS Sans Serif
    menu Font Size 8
    menu Font Color WindowText
    menu Font BGColor BtnFace
    menu Button pause 36 122 49 21 pause
    menu Text time 148 125 %time

    menu Show 820 10
return

sub updateTime
  set %time #scnt - %starttime
	set %seconds %time % 60
	set %minutes ( %time / 60 ) % 60
	set %hours %time / 3600

	if %seconds < 10
		 set %timeresult : , 0 , %seconds
	else
		set %timeresult : , %seconds
	if %minutes < 10
		set %timeresult : , 0 , %minutes , %timeresult
	else
		set %timeresult : , %minutes , %timeresult
	if %hours < 10
		set %timeresult 0 , %hours , %timeresult
	else
		set %timeresult %hours , %timeresult

	menu Font Transparent #true
	menu Font Name Arial
	menu Font Align Left
	menu Font BGColor None
	menu Font Color Lime
	menu Font Size 8
	menu Delete time
	menu Text time 155 125 %timeresult
return

sub checkButton
    if #menubutton = pause
    {
       gosub pauseScript
    }
return

sub pauseScript
       menu Font Name Arial
       menu Font Style
       menu Font Size 8
       menu Font Color Lime
       menu Font Transparent #true
       menu Delete status
       menu Text status 91 87 Pauza...
    menu Delete pause
    menu Font Name MS Sans Serif
    menu Font Size 8
    menu Font Color WindowText
    menu Font BGColor BtnFace
    menu Button resume 36 122 49 21 Start
    set #menubutton n/a
    _pause:
    if #menubutton  = resume
    {
       menu Font Name Arial
       menu Font Style
       menu Font Size 8
       menu Font Color Lime
       menu Font Transparent #true
       menu Delete status
       menu Text status 91 87 W31czanie...
       menu Delete resume
       menu Font Name MS Sans Serif
       menu Font Size 8
       menu Font Color WindowText
       menu Font BGColor BtnFace
       menu Button pause 36 122 49 21 Pause
       set #menubutton n/a
       return
    }
    wait 2 ;takes a load off the cpu
    gosub updateTime
    goto _pause
return