/def -i blueecho    = /echo -aCbgblue %*
/def -i redecho     = /echo -aCbgred %*
/def -i greenecho   = /echo -aCbggreen %*
/def -i cyanecho    = /echo -aCbgcyan %*
/def -i magentaecho = /echo -aCbgmagenta %*

/alias swap remove %1%; wear %*
/alias swapsword unwield sword%;wield sword %*
/alias gemchant remove %1 %2%;/send gemchant gem into %1 %2%;wear %1 %2
/alias kq keep all corpse%;keep all equip%;keep all torch%;keep all flashlight%;keep all box%;keep all bag%;keep all pack%;keep all scroll%;

/unset enemy
/alias kill /if (!({1} =~ '')) /set enemy %1%;/endif%;ak %2
/alias k     /eval /kill %{pid__stepping}%;    /kwon%;    /if (!({1} =~ '')) /set enemy %1%;/endif%;    /if (followmob) follow %{enemy} %2%;/endif%;    /if (alookmob) /send look at %{enemy} %2%;/endif%;    /guild_pre_kill_hook%;    /if (!combat)          ak %2%;    /endif%;    /guild_post_kill_hook%;
/alias ak     /if (enemy !~ "")           /send kill %{enemy} %1%;/killall%;    /endif%;    passist p

/def killall = /_killall %{enemies}
/def _killall =   /if ({1} !~ '' ) /send kill %1%;/endif%;  /if ({2} !~ '' ) /send kill %2%;/endif%;  /if ({3} !~ '' ) /send kill %3%;/endif%;  /if ({4} !~ '' ) /send kill %4%;/endif%;  /if ({5} !~ '' ) /send kill %5%;/endif%;  /if ({6} !~ '' ) /send kill %6%;/endif%;  /if ({7} !~ '' ) /send kill %7%;/endif%;

/def reload = /purge%;/load .tfrc
/alias reload /reload
/alias sq skillquests %*
/alias ex explorer %*
/alias pab put all in bag %*
/alias dosearch search

/alias kb keep blood red gloves%;keep blood red helmet%;keep spiderskin codpiece%;keep precious stone%;keep titanium breastplate%;keep rod of garnthax

/def -t"^ # Item *$" reset_inventory_nums =         /set boxnum 0%;        /set necrobags 0%;        /set bagnum 0%;        /set packnum 0%;        /set coffin 0%;        /set autowrangle 0%;        /set gemcount 0%;

/alias # /irepeat %1 %{-1}

/onoffvar parse 1
/def -F -h"SEND ;" multicmd =   /set cmd %* %;  /if (parse)  	  /while (cmd !~ "") 	 	  /if (regmatch("^([^;]*);?(.*)$$", {cmd})) 	    	  /eval %P1 %;	    	  /set cmd=%P2 %;	    /else 	    	  /eval %{cmd} %;	    	  /set cmd "" %;	  	/endif %;	  /done %;  /else 	  /eval %{cmd} %;  /endif 


/def -PCgreen -t"^ (\d+) \*?(Crude|Poor|Average|Good|Superior|Legendary) gem of ([^(]+)\(([.0-9]+)%\)\.$" gem_counter =     /set autowrangle 1%;    /eval /set gemcount $[gemcount + {P1}]%;    /if ({P3} == 100) /set autowrangle 0%;/endif%;

; 1 An enchanted coffin (5 corpses) [.|....] [Moderately Full].
/def -PCred -t"^ \d+ An enchanted coffin \((\d+) corpses?\) \[[^]]+\] \[[ A-Za-z]+\]\." coffin_watch =     /eval /set coffin 1%;    /eval /set coffin_corpses %{P1};



/def -PCcyan -t"^ (\d+) \*An autostacking backpack \[\d+% full\]\.$" gentechpack =         /eval /set packnum $[packnum + {P1}]%;

/def -t"^The arms finish their labors and have stacked as efficiently as possible\.$" bagempty =     /set bagsfull 0%;

/def -t"^The arms stack as efficiently as possible, but are unable to retrieve everything\.$" bagfull =    /set bagsfull 1%;

/def -PCcyan -t"^ (\d+) \*Bag of (Holding|Stretching)\.$" setbagnum2 =         /eval /set bagnum $[bagnum + {P1}]%;

/def -PCcyan -t"^\*A Jedi Backpack \[([0-9]+)\]$" setbagnum =         /eval /set bagnum $[bagnum + {P1}]%;

/def -PCcyan -t"^ (\d+) \*a velvet bag, \d+\% full\.$" setbagnum =         /eval /set necrobags $[necrobags + {P1}]%;

/def -F -PCcyan -t"^ ?([0-9]+) \*?A Music Box" setboxnum =         /set tmp %{P1}%;        /eval /set boxnum $[boxnum + tmp]%;

/def -ag -t"Too heavy\.$$" gagbox
/def -F -ag -t"<FULL>\.$$" gagbox2
/def -ag -t"getting the crystal\!$$" gagbox3

; irepeat is /repeat for inline macros, as /repeat -0 will still delay execution
; until the end of tthe macro and fuck everything up.
/def irepeat =   /set irep 1%;  /while (irep <= {1})     /eval %{-1}%;    /set irep $[irep+1]%;  /done%;

/alias bags         /if (aget) g%;/endif%;        /set bagi 1%;         /if ((acorpse | pcorpse) & corpseinroom) y%;di%;/endif%;        /if (necrobags) gather%;/endif%;        /set boxi 1%;         /while (bagi <= bagnum)                 g%;/eval /send put all in bag %{bagi}%;                /set bagi $[bagi+1]%;        /done%;         /set boxi 1%;         /while (boxi <= boxnum)                 g%;/eval /send put all in box %{boxi}%;                /set boxi $[boxi+1]%;        /done%;        /if (bagnum | boxnum ) drop remains%;/endif%;        /set boxi 1%;         /while (boxi <= packnum)                 /eval /send stack %{boxi}%;                /set boxi $[boxi+1]%;        /done%;        /if ((acorpse | pcorpse) & aget) g%;/endif%;


/def bag = /set j 0%;/while (j < {1}) g%;pab $[{1} - j]%;/set j $[j+1]%;/done
/def sab = keep all%;/set j 0%;/while (j < {1}) sell all from bag $[j+1]%;/set j $[j+1]%;/done
/alias sab sell all from box %*%;sell all from bag %*
; bag 1 for holding saber sells.
/alias sbags         /if ({1}) /set boxi %1%;/else /set boxi 1%;/endif%;        /while (bagi <= bagnum+necrobags) 		        /eval /send sell all from bag %{bagi}%;            /set bagi $[bagi+1]%;        /done%;         /if ({1}) /set boxi %1%;/else /set boxi 1%;/endif%;        /while (boxi <= boxnum) 		        /eval /send sell all from box %{boxi}%;            /set boxi $[boxi+1]%;        /done%;        /if ({1}) /set boxi %1%;/else /set boxi 1%;/endif%;        /while (boxi <= packnum) 		        /eval /send sell all from pack %{boxi}%;            /set boxi $[boxi+1]%;        /done


/alias dbags         /set bagi 1%;         /while (bagi <= bagnum+necrobags) 		      /eval /send donate all from bag %{bagi}%;          /eval /set bagi $[bagi+1]%;        /done%;         /set boxi 1%;         /while (boxi <= boxnum) 		      /eval /send donate all from box %{boxi}%;          /eval /set boxi $[boxi+1]%;        /done%;        /while (boxi <= packnum) 		      /eval /send donate all from pack %{boxi}%;          /set boxi $[boxi+1]%;        /done

/alias tbags         /set bagi 1%;         /while (bagi <= bagnum) 		      /eval /send trash all from bag %{bagi}%;          /eval /set bagi $[bagi+1]%;        /done%;         /set boxi 1%;         /while (boxi <= boxnum) 		      /eval /send trash all from box %{boxi}%;          /eval /set boxi $[boxi+1]%;        /done%;        /set boxi 1%;         /while (boxi <= packnum) 		      /eval /send trash all from pack %{boxi}%;          /eval /set boxi $[boxi+1]%;        /done


/alias gbags         /set bagi 1%;         /while (bagi <= bagnum) 		/eval /send get all from bag %{bagi}%;		/eval /send give all to %1%;                /eval /set bagi $[bagi+1]%;        /done%;         /set boxi 1%;         /while (boxi <= boxnum) 		/eval /send get all from box %{boxi}%;		/eval give all to %1%;                /eval /set boxi $[boxi+1]%;        /done

; let's boot up our autobagger :P
/send mi


/alias keepeq keep stone%;keep all equip
/alias armorup 	wear ring%;wear ring 2%;wear armour%;wear cloak%;	wear boots%;wear gloves%;wear amulet%;wear shield%;	wear aura%;wear other%;wear helmet%;keepeq


/eval /set looktyped %{looktyped-0}
/alias l /set looktyped 1%;/send l
/alias look /set looktyped 1%;/send look %*
/alias gl /set looktyped 1%;/send gl
/alias glance /set looktyped 1%;/send glance