;Autor: odzi:)
;ver. 1.0.3
;Skrypt na dobijanie, połączony z grabieniem by. odzi: ver. 1.0.0
set #sysmsgcol 75
event sysmessage Skrypt na dobijanie powered by Odzi:) (ver. 1.0.3)
set #lpc 1000
set %ji #jindex
deletejournal
repeat
{
      onhotkey d alt
      {
               event sysmessage ZATRZYMANO!!
               wait 1s
               repeat
               {
                     onhotkey d alt
                     {
                              event sysmessage WZNOWIONO!
                              wait 1s
                              break
                     }
               }
               until #false
      }
      if *grabie = 1
                {
                   repeat
                   until *grabie = 0
                }
      if #enemyid <> %enemy
                {
                   set *grab 1
                   set *atack 0
                   if *atack = 1
                   {
                      repeat
                            set *atack 0
                      until *atack = 0
                   }
                }
      if *medyt = 1 || *bles = 1 || *czar = 1
                                 {
                                    repeat
                                    until *medyt = 0 && *bles = 0 && *czar = 0
                                 }
      while #hits > 60 && #enemyid <> N/A
      {
            if *grabie = 1
            {
               repeat
               until *grabie = 0
            }
            set *atack 1
            if *atack = 0
            {
               repeat
                     set *atack 1
               until *atack = 1
            }
            onhotkey d alt
            {
                     event sysmessage ZATRZYMANO!!
                     set *zatrz 1
                     wait 1s
                     repeat
                     {
                           onhotkey d alt
                           {
                                    event sysmessage WZNOWIONO!
                                    set *zatrz 0
                                    wait 1s
                                    break
                           }
                     }
                     until #false
            }
            finditem #enemyid
            if #findid <> #enemyid
            {
               repeat
                     onhotkey d alt
                              break
                     finditem #enemyid
                     if *grabie = 1
                {
                   repeat
                   until *grabie = 0
                }
               until #enemyid = #findid
            }
            ;for #findindex 1 #findcnt
            ;{
                ;if #findid = #enemyid
                ;{
                set %enemy #findid
                set *enemy #enemyid
                if *enemy <> #findid
                {
                   repeat
                         set *enemy #enemyid
                   until *enemy = #enemyid
                }
                if #enemyid <> %enemy
                {
                            set *grab 1
                             wait 6s
                }
                if *grabie = 1
                {
                   repeat
                   until *grabie = 0
                }
                if *medyt = 1 || *bles = 1 || *czar = 1
                {
                   repeat
                   until *medyt = 0 && *bles = 0 && *czar = 0
                }
                      ;finditem %enemy
                      ;if #findid <> %enemy
                      ;{
                         ;repeat
                               ;finditem %enemy
                         ;until %enemy = #findid
                      ;}
                      ;for #findindex 1 #findcnt
                      ;{
                           if #finddist <= 1
                                    break
                             set %i 0
                             for %i 1 17
                             {
                                 if *medyt = 1 || *bles = 1 || *czar = 1
                                 {
                                    repeat
                                    until *medyt = 0 && *bles = 0 && *czar = 0
                                 }
                                 if *grabie = 1
                                 {
                                    repeat
                                    until *grabie = 0
                                 }
                                 set %findz #charposz - %i
                                 set %findzz #charposz + %i
                                 event property #findid
                                 set %czas #scnt + 2
                                 repeat
                                 {
                                       if #property = N/A
                                          event property #findid
                                 }
                                 until #property <> N/A
                                 if robotnik in #property && #finddist > 1 && #finddist < 23 && #findz = #charposz || robotnik in #property && #finddist > 1 && #finddist < 23 && #findz = %findzz || robotnik in #property && %enemy = #findid && #finddist > 1 && #finddist < 23 && #findz = %findz || padliniak in #property && #finddist > 1 && #finddist < 23 && #findz = #charposz || padliniak in #property && #finddist > 1 && #finddist < 23 && #findz = %findzz || padliniak in #property && %enemy = #findid && #finddist > 1 && #finddist < 23 && #findz = %findz || #findrep = 3 && %enemy = #findid && #finddist > 1 && #finddist < 23 && #findz = #charposz || #findrep = 3 && %enemy = #findid && #finddist > 1 && #finddist < 23 && #findz = %findzz || #findrep = 3 && %enemy = #findid && #finddist > 1 && #finddist < 23 && #findz = %findz || #findrep = 6 && #finddist > 1 && #finddist < 7 && #findz = #charposz || #findrep = 6 && #finddist > 1 && #finddist < 10 && #findz = %findzz || #findrep = 6 && #finddist > 1 && #finddist < 10 && #findz = %findz
                                 {
                                    set %charposx #charposx
                                    set %charposy #charposy
                                    event pathfind #findx #findy #findz
                                    set %czas #scnt + 2
                                    if *grabie = 1
                                    {
                                       repeat
                                       until *grabie = 0
                                    }
                                    repeat
                                    {
                                          if %czas < #scnt
                                             break
                                          if #charposx <> #findx && #charposy <> #findy || #charposx = #findx && #charposy <> #findy || #charposx <> #findx && #charposy = #findy
                                             event pathfind #findx #findy #findz
                                          if #enemyid <> %enemy
                                          {
                                             set *grab 1
                                             break
                                          }
                                          onhotkey d alt
                                          {
                                                   event sysmessage ZATRZYMANO!!
                                                   set *zatrz 1
                                                   wait 1s
                                                   repeat
                                                   {
                                                         onhotkey d alt
                                                         {
                                                                  event sysmessage WZNOWIONO!
                                                                  set *zatrz 0
                                                                  wait 1s
                                                                  break
                                                         }
                                                   }
                                                   until #false
                                          }
                                          if %ji < #jindex
                                          {
                                             set %ji %ji + 1
                                             scanjournal %ji
                                             if Can't_get_there in #journal
                                             {
                                                ignoreitem #enemyid
                                                set #sysmsgcol 75
                                                event sysmessage Omijam Moba
                                                set *atack 0
                                                break
                                             }
                                          }
                                    }
                                    until #charposx <> %charposx || #charposy <> %charposy ;|| #charposx = %charposx && #charposy <> %charposy || #charposx <> %charposx && #charposy = %charposy || #hits < 60
                                    set %i 17
                                    if #enemyid <> %enemy
                                    {
                                       set *grab 1 ;&& #finddist <= 1
                                       break
                                    }
                                    if *grabie = 1
                                    {
                                       repeat
                                       until *grabie = 0
                                    }
                                    if #charghost = YES
                                    {
                                       set #sysmsgcol 1080
                                       event sysmessage Jestes martwy! Wylaczono skrypt [dobijanie]
                                       halt
                                    }
                                 }
                                 onhotkey d alt
                                          break
                             }
                          ;}
                      onhotkey d alt
                      {
                               event sysmessage ZATRZYMANO!!
                               set *zatrz 1
                               wait 1s
                               repeat
                               {
                                     onhotkey d alt
                                     {
                                              event sysmessage WZNOWIONO!
                                              set *zatrz 0
                                              wait 1s
                                              break
                                     }
                               }
                               until #false
                      ;}
                ;}
                onhotkey d alt
                {
                         event sysmessage ZATRZYMANO!!
                         set *zatrz 1
                         wait 1s
                         repeat
                         {
                               onhotkey d alt
                               {
                                        event sysmessage WZNOWIONO!
                                        set *zatrz 0
                                        wait 1s
                                        break
                               }
                         }
                         until #false
                }
                if #enemyid <> %enemy
                {
                            set *grab 1
                         wait 40
                }
                set *atack 0
                if *atack = 1
                {
                      repeat
                            set *atack 0
                      until *atack = 0
                }
                }
            }
      }
}
until #false