;Autor: odzi:)
;Ver. 1.0.0
;Skrypt na automatyczne chodzenie, bez dwóch skryptów na dobijanie oraz auto atack jest bezuzyteczny
;Pod klawiszem F6 Można zatrzymać i wznowić skrypt
;Polecam szukanie grup mobów a nastepnie uruchamianie skryptu klawiszem
;Nie jest to sztuczna inteligencja, wiec jak na standard EUO jest dosc i tak sprytny
;Skrypt dziala w kazdym rejonie swiata, omija nam wode, drzewa, i inne tego typu rzeczy
;po ktorych nie mozemy chodzic.
;Skrypt nie wymaga zadnych ustawien, odpalamy go i sam dziala.
;Bez skryptu na dobijanie jest raczej uposledzony.
;Wymagane skrypty:
;-Dobijanie by odzi
;-Auto atack by odzi
;-grabienie by odzi
;-Auto - Chodzenie by odzi
set #lpc 20000
set %x_poczatek #charposx - 18
set %y_poczatek #charposy - 10
set %x_koniec #charposx + 18
set %y_koniec #charposy + 10
set *automat 1
set %ji #jindex
repeat
{
                tile init
                for %ii 1 18
                {
                    ;set %xx . %ii #charposx
                    ;set %yy . %ii #charposy
                for %x %x_poczatek %x_koniec
                {
                    if *atack = 1
                       break
                    for %y %y_poczatek %y_koniec
                    {
                        if *atack = 1
                           break
                        onhotkey q alt
                                     {
                                            event sysmessage ZATRZYMANO!!
                                            set *automat 0
                                            wait 1s
                                            repeat
                                            {
                                                  onhotkey q alt
                                                  {
                                                           event sysmessage WZNOWIONO!
                                                           set *automat 1
                                                           wait 1s
                                                           break
                                                  }
                                            }
                                            until #false
                                     }
                        tile cnt %x %y
                        for %i 1 #tilecnt
                        {
                            if *atack = 1
                               break
                            if %i > #tilecnt
                               break
                            tile Get %x %y %i
                            if #tileflags in Impassable
                               continue
                            for %iii 1 %ii
                            {
                                if *medyt = 1 || *bles = 1 || *czar = 1
                                {
                                   repeat
                                   until *medyt = 0 && *bles = 0 && *czar = 0
                                }
                                if *atack = 1
                                   break
                                if #charghost = YES
                                   halt
                                if #tileflags in GenericStackable && #tileflags notin Impassable && #tileflags in Background || #tileflags in Background || #tileflags in GenericStackable
                                {
                                   if %xx . %iii = #charposx && %yy . %iii <> #charposy && %xx . %iii <> %x && %yy . %iii <> %y || %xx . %iii <> #charposx && %yy . %iii = #charposy && %xx . %iii <> %x && %yy . %iii <> %y || %xx . %iii <> #charposx && %yy . %iii <> #charposy && %xx . %iii <> %x && %yy . %iii <> %y || %xx . %iii = #charposx && %yy . %iii <> #charposy && %xx . %iii = %x && %yy . %iii <> %y || %xx . %iii <> #charposx && %yy . %iii = #charposy && %xx . %iii <> %x && %yy . %iii = %y || %xx . %iii = #charposx && %yy . %iii <> #charposy && %xx . %iii <> %x && %yy . %iii = %y || %xx . %iii <> #charposx && %yy . %iii = #charposy && %xx . %iii = %x && %yy . %iii <> %y ||
                                   {
                                      if *atack = 1
                                         break
                                      event pathfind %x %y #tilez
                                      set %czas #scnt + 4
                                      repeat
                                      {
                                            if %czas < #scnt
                                               break
                                            onhotkey q alt
                                            {
                                                     event sysmessage ZATRZYMANO!!
                                                     set *automat 0
                                                     wait 1s
                                                     repeat
                                                     {
                                                           onhotkey q alt
                                                           {
                                                                    event sysmessage WZNOWIONO!
                                                                    set *automat 1
                                                                    set %ji #jindex
                                                                    wait 1s
                                                                    break
                                                           }
                                                     }
                                                     until #false
                                            }
                                            if %ji < #jindex
                                            {
                                               set %ji %ji + 1
                                               scanjournal %ji
                                               If Can't_get_there in #journal
                                                  break
                                            }
                                            if *atack = 1
                                               break
                                      }
                                      until #charposx = %x && #charposy = %y || #charposx = %x + 1 && #charposy = %y || #charposx = %x && #charposy = %y + 1 || #charposx = %x + 1 && #charposy = %y + 1
                                      onhotkey q alt
                                      {
                                               event sysmessage ZATRZYMANO!!
                                               set *automat 0
                                               wait 1s
                                               repeat
                                               {
                                                     onhotkey q alt
                                                     {
                                                              event sysmessage WZNOWIONO!
                                                              set *automat 1
                                                              wait 1s
                                                              break
                                                     }
                                               }
                                               until #false
                                      }
                                      set %x_poczatek #charposx - 18
                                      set %y_poczatek #charposy - 10
                                      set %x_koniec #charposx + 18
                                      set %y_koniec #charposy + 10
                                      set %xx . %i %x
                                      set %yy . %i %y
                                   }
                                }
                            }
                            }
                            if *atack = 1
                               break
                        }
                        if *atack = 1
                               break
                    }
                    if *atack = 1
                               break
                }
             }
             if *atack = 1
             {
                set #sysmsgcol 75
                event sysmessage Jestem atakowany, przerywam chodzenie
                repeat
                onhotkey q alt
                                     {
                                            event sysmessage ZATRZYMANO!!
                                            set *automat 0
                                            wait 1s
                                            repeat
                                            {
                                                  onhotkey q alt
                                                  {
                                                           event sysmessage WZNOWIONO!
                                                           set *automat 1
                                                           wait 1s
                                                           break
                                                  }
                                            }
                                            until #false
                                     }
                until *atack = 0
                event sysmessage Przestalem byc atakowany, chodzenie: ON
                wait 2s
                set %x_poczatek #charposx - 18
                set %y_poczatek #charposy - 10
                set %x_koniec #charposx + 18
                set %y_koniec #charposy + 10
             }
         ;}
}
until #false