////////////////////////////////////////////
@canceltarget
////////////////////////////////////////////
/////////////// TIMERS /////////////////////
////////////////////////////////////////////
if not timerexists 'ASB'
  createtimer 'ASB'
  settimer 'ASB' 600000
endif
if not timerexists 'Bandage Timer'
  createtimer 'Bandage Timer'
  settimer 'Bandage Timer' 15000
endif
////////////////////////////////////////////
/////////////// RESTOCK ////////////////////
////////////////////////////////////////////
if skill 'magery' > 69
  if not listexists 'regs'
    createlist 'regs'
    pushlist 'regs' 0xf86 //mandrake
    pushlist 'regs' 0xf7a //pearl
    pushlist 'regs' 0xf7b //bloodmoss
    pushlist 'regs' 0xf84 //garlic
    pushlist 'regs' 0xf8d //silk
    pushlist 'regs' 0xf85 //ginseng
    pushlist 'regs' 0xf8c //ash
    pushlist 'regs' 0xf88 //shade
    pushlist 'regs' 0xe21 //bandages
  endif
  for 1 to regs
    if not @findtype regs[] 'any' 'backpack' 3
      msg 'bank guards'
      pause 200
      @organizer 'magery' 'bank' 'backpack'
      while organizing
        pause 100
      endwhile
    endif
  endfor
  for 1 to regs
    if not @findtype regs[] 'any' 'backpack' 1
      headmsg 'OUT OF REGS'
    endif
  endfor
endif
////////////////////////////////////////////
//////////////// ALIAS /////////////////////
////////////////////////////////////////////
if not findalias 'birdspot'
  headmsg 'TARGET BIRD RUNE'
  msg 'bank'
  promptalias 'birdspot'
endif
if not findalias 'home'
  headmsg 'TARGET BANK RUNE'
  promptalias 'home'
endif
if not findalias 'Dummy'
  headmsg 'TARGET Dummy'
  promptalias 'Dummy'
endif
////////////////////////////////////////////
//////// Active Skillgain Bonus ////////////
////////////////////////////////////////////
if not listexists 'birds'
  createlist 'birds'
endif
if timer 'ASB' >= 600000
  if mana < 40
    useskill 'meditation'
    pause 12000
  else
    walk 'South'
    pause 500
    walk 'South'
    pause 500
    walk 'South'
    pause 500
    msg 'bank'
    pause 200
    cast 'recall'
    waitfortarget 10000
    target! 'birdspot'
    pause 500
    while not dead
      for 0 to 'birds'
        pushlist 'birds' 0x6
        if not targetexists
          cast 'Lightning'
          pause 1250
        elseif @findtype birds[] 'any' 'ground' 1 12
          if innocent 'found'
            @ignoreobject 'found'
          else
            target! 'found'
            pause 3000
            if injournal 'fame' 'system'
              settimer 'ASB' 0
              @clearjournal
            endif
          endif
        endif
        if timer 'ASB' < 600000
          cast 'recall'
          waitfortarget 10000
          target! 'home'
          replay
        endif
        @clearlist 'birds'
      endfor
    endwhile
  endif
endif
////////////////////////////////////////////
///////////////// Magery ///////////////////
////////////////////////////////////////////
if hits < 85 and timer 'Bandage Timer' >= 15000
  bandageself
  waitfortarget 1500
  target! 'self'
  settimer 'Bandage Timer' 0
endif
pause 1000
if not @findtype 0xe21 'any' 'backpack' 3
  msg 'bank guards'
  pause 200
  organizer 'bandages'
  while organizing
    pause 100
  endwhile
endif
pause 500
attack! 'dummy'
pause 4500