; Non-path alias file

/alias pp 0%;enthrall %*%;enthrall %*%;cast placate on %*%;
/alias ppp 0%;enthrall %*%;enthrall %*%;cast placate on %*%;\
enthrall %*%;enthrall %* 2%;cast placate on %* 2%;\
enthrall %*%;enthrall %* 3%;cast placate on %* 3%;\
enthrall %*%;enthrall %* 4%;cast placate on %* 4%;\
enthrall %*%;enthrall %* 5%;cast placate on %* 5%;\
enthrall %*%;enthrall %* 6%;cast placate on %* 6%;

/def u = /send us2
/alias dh /send defensive harmony %*%;
/alias afk1 /send afk 3str,6int,5con,5wis all boot 100K
/alias afk2 /send afk 3str,6int,5con,5wis all boot 50K
/alias pad /send put all in disc%;
/require lisp.tf
/alias kq keep all equip%;keep harp%;keep powerstone%;keep ph%;
/def dwd = perform devil went down to georgia %*%;
/alias dev perform devil went down to georgia %*%;
/alias sbard bchat 70 %*

;/def -t"^You can now 'choose' which stats to apply the blessing to\.$" chooseboon = /choose
/def choose = #10 choose dexterity%;# 10 choose constitution%;# 10 choose wisdom%;# 10 chooose charisma%;# 10 chooose intelligence%;

/def reload = /purge%;/load .tfrc
/alias reload /reload

; /alias nostrboost emote something somethin%;emote will be performing tonight for a whole three minutes.%;cast cure on %*%;heal %*%;hlaf%;perform hero for %*%;rhythmic actions 60 be for %*/mem for %*/emote has left the building.  

/def recruit = \
        talk 'bchat bard' is used to chat on the main line.  'info' is your guild help.  Type 'info bchat'.%;\
        talk setpanic is your guild contingency for automated healing.%;\
        talk please type: 'setpanic bandage at 200' so that you don't die as I spam instructions at you.%;\
        talk You can judge the power of foes with the spell 'thought wave', your first corpse ability is the song 'dirge'%;\
		  talk To cast spells you type 'cast thought wave', to perform songs you type 'perform dirge'%;\
        talk Makes aliases for 'perform' and 'cast', to save alias space you may want to utilize nicknames later on for less commonly used songs and spells.%;\
        talk rhythmic actions is the flexible guild-repeat command, info it.%;\
        /send talk alias bb rhythmic actions 1 bandage \$1:49/bb \$1%;\
        talk Use the above as a model for building other flexible looped commands.  This is useful for setting up song loops so that you don't have to keep typing 'perform acid rock' every 9 rounds.%;\
        talk Type 'songs','powers', and 'spells'.  These give a list of all your guild abilities.  Info them.%;\
        
        
/alias mama perform mama said knock you out %*
/alias tb perform toxic blades %*
/alias hyp cast hypnotic pattern %*
/alias bard30 bchat 30 %*
/alias ba cbrief monster
/alias black perform black %*
/alias see cast clairvoyance at %*

/alias healsmile nickname smilee %{1}%;/repeat -2 3 cast cure%;/repeat -6 1 perform smile for smilee%;

/alias bards /send bwho
/def buyarmour = smithy%;buy cloak%;buy platemail%;buy helmet%;buy boots%;buy gauntlets%;buy two-handed sword%;/send home%;wear all%;
/alias hy buy water%;drink water
/alias v la %1 %2 %3 %4 %5%;search %1 %2 %3 %4 %5 

/alias lbolt cast lightning bolt %*

/alias panichi  /eval /send cast mystic guardian at hp/$[maxhps-trunc(maxhps*.15)]/cast cure%;setpanic bandage at $[maxhps-trunc(maxhps*.15)]%;
/alias panichi2  /eval /send cast mystic guardian at hp/$[maxhps-trunc(maxhps*.25)]/cast cure%;setpanic bandage at $[maxhps-trunc(maxhps*.25)]%;
/alias paniclow /eval /send cast mystic guardian at hp/$[maxhps*3/4-100]/cast cure%;setpanic bandage at $[maxhps*3/4-40]
/alias paniclower /eval /send cast mystic guardian at hp/$[maxhps*3/4-250]/cast cure%;setpanic bandage at $[maxhps*3/4-40]
/alias panictb  /eval /send cast mystic guardian at hp/$[maxhps*3/4-55]/bandage%;setpanic thunderous bellow at 9999
/alias panicpeace cast mystic guardian at hp/$[maxhps*3/4-40]/bandage%;setpanic enthrall at $[maxhps*3/4-300]

/alias fal /eval 0%;enthrall %1%;enthrall %1 2%;enthrall %1 3%;enthrall %1 4%;
/alias cco cast cats claw at off%;
;/def afk = afk +5 con for 10k coins.  Big bucks and no whammies! 
/def afk = afk I'm busy, but not so much to turn down money.  Boosts: %* 

; aliases for powers
/alias startsongs /repeat -34 4000 tbb%;/repeat -40 4000 dff
/alias tbb   /if (combat) tb%;/endif%;
/alias dff   /if (combat) df%;/endif%;
/alias acidd /if (combat) acid%;/endif%;
/alias csa called shot ALWAYS ON
/alias cso called shot OFF
/alias f /send cease%;/send enthrall %*

/def close = view 1 close%;view 2 close%;view 3 close%;view 4 close%;view 5 close%;view 6 close%;view 7 close%;
/def open = view 1 open%;view 2 open%;view 3 open%;view 4 open%;view 5 open%;view 6 open%;view 7 open%;

; corpse aliases
/alias dy drop corpse%;cease%;/send y%;
/alias sdy drop corpse%;/send y

/set shield 0
/def -mregexp -t"^Shield:       ([A-Za-z ]+)$" shield = \
        /if ({P1} =~ 'none') \
                /set shield 0%;\
        /else \
                /set shield 1%;\
        /endif%;

/onoffvar acease 0
/alias y \
         /if (acease) cease%;/endif%;\
        /if (shield)\
           	/send remove shield%;\
        /endif%;\
        /if (corpsesinroom) \
		      /if (nex & karma > (maxkarma-100)) \
		  		   /eval /repeat -0 %{corpsesinroom} orare%;\
			      /set corpsesinroom 0%;\
		      /else \
		  		   /eval /repeat -0 %{corpsesinroom} /send y%;\
	     		   /set corpsesinroom 0%;\
		      /endif%;\
        /endif%;\
		  /if (karma > (maxkarma-50) & hps < maxhps & sps < maxsps) \
		  		soothe%;\
		  /endif%;\
        /send y%;di%;\
        /if (acorpse | pcorpse) \
         	/qrepeat _corpse -3 1 /send y%;\
         	/if (adivvy) \
            	/qrepeat _divvy -4 1 di%;\
         	/endif%;\
        /endif%;\
        /if (shield)\
        		/send wear shield%;\
        /endif%;\

; macros to guild
/alias tochest tobard%;s%;/sw%;wn%;
/alias fromchest se%;/ne%;n4es7e%;portal%;home
/alias toadv  tobard%;n%;/nw%;ws%;
 
/alias ltadd \
	disname all%;\
	/def -p100000 -1 -t"^[\~]+\$" mwgrep = \
	  /def -t"^([A-Za-z]*) *: On for " addnametrig = \
	    /if ({P1} !~ "Fjord") addname $$$[tolower({P1})]%%%;/endif%%;\
	  /def -p100000 -1 -t"^[\~]+\\\$" killmwgrep = \
	    /undef addnametrig%;\

/alias ptell /if ({1} =~ "-h") /send ptell -h%; /else /send ptell %* %;/endif
/alias pt ptell %*
/alias ct /if ({1} =~ "-h") /send ctell -h%; /else /send cemote Bjot : %* %;/endif
/alias retox /send retox%;holome

/alias rcost divvy%;/send rcost

/alias depositall \
	/def -F -t'^You are carrying ?([0-9]+) coins' moneygrab =\
	  /set coins %%{P1}%%;deposit $$[coins - 15]%%;h%%;/undef moneygrab%;\
	bank%;coins

/alias dfix wear earmuffs%;earmuffs 75%;wear shades%;keep earmuffs%;keep shades%;hold wand%;keep wand%;wield %{weapon}

/eval /set hptyped %{hptyped-0}
/alias hp /send hp%;/set hptyped 1

/alias getall get all

/alias dmglistlen /circlist dmglist %1

;/alias afollow \
;	/def -t"You stop following ([A-Za-z]+)" refollow = follow %%P1