| |
— | jmc:jmc_set_2 [2021-02-06 14:04] (current) – created - external edit 127.0.0.1 |
---|
| ====== JMC Set 2 ====== |
| |
| <code basic mume.set> |
| #nop ---==== ALIASES ===--- |
| #alias {log} {#log mume.log append} {log} |
| #alias {mume} {#connect mume.pvv.org 4242} {default} |
| #alias {rep} {#group enable report;score} {default} |
| #alias {tnl} {#group enable tnl;info TNL: %X xp %T tp} {default} |
| #alias {g-} {#group disable group} {default} |
| #alias {g+} {#group enable group} {default} |
| #alias {tt} {tell $TellPlayer %0} {default} |
| #alias {tt+} {#group enable tellplayer} {default} |
| #alias {tt-} {#group disable tellplayer} {default} |
| #alias {l+} {#group enable autoloot} {default} |
| #alias {l-} {#group disable autoloot} {default} |
| #alias {b+} {#group enable autobash} {default} |
| #alias {b-} {#group disable autobash} {default} |
| #alias {kit} {/kit $KitPlayer} {default} |
| #alias {kit?} {whois $KitPlayer} {default} |
| |
| #nop ---==== ACTIONS ===--- |
| #action {%0 prays '%1'} #script var pray = "%1"; var player = "%0"; if(pray.search("kit") != -1) jmc.Parse("#var KitPlayer " + player); {newbiekit} |
| |
| #action {Never forget! Try to role-play...} {#log $DATE.log append} {default} |
| |
| #action {WARNING: inactivity timeout in 10 seconds.} {score} {default} |
| |
| #action {%0/%1 hit, %2/%3 mana, and %4/%5 moves.}{emote reports: %0/%1 hit %2/%3 mana %4/%5 moves;#group disable report} {report} |
| #action {%0/%1 hit, and %4/%5 moves.}{emote reports: %0/%1 hit %4/%5 moves;#group disable report} {report} |
| |
| #action {TNL: %0 xp %1 tp}{emote reports %0 xp and %1 tp to next level.;#group disable tnl} {tnl} |
| |
| #action {You are now a member of %0's group.} {#var Leader %0} {group} |
| #action {$Leader picks up} {ride} {group} |
| #action {$Leader dismounts} {lead} {group} |
| #action {%0 joins $Leader's fight} {assist $Leader} {group} |
| |
| #action {%0 tells you} {#var TellPlayer %0} {tellplayer} |
| |
| #action {R.I.P.} {get all.coins all.corpse} {autoloot} |
| |
| #action {seems to have recovered} {bash} {autobash} |
| #action {avoids your bash, you topple over and fall to the ground.} {stand} {autobash} |
| |
| #nop ---==== HIGHLIGHTS ===--- |
| #highlight {light red,b black} {You feel less protected.} {mage} |
| #highlight {light red,b black} {Your magical shield wears off.} {mage} |
| |
| #nop ---==== MISCELLANIOUS ===--- |
| #speedwalk OFF |
| #group disable report |
| #group disable tnl |
| #group disable flee |
| #group disable group |
| #group disable tellplayer |
| #group disable autoloot |
| #group disable autobash |
| #ticksize 60 |
| |
| </code> |
| |
| <code> |
| #savefile-version 6 |
| #delim normal |
| #setvar mem=1048576 |
| |
| #alias #compact={#if ($(1)=="on") #option +compact; #else #if ($(1)=="off") #option -compact; #else #option compact} |
| #alias #debug={#if ($(1)=="on") #option +debug; #else #if ($(1)=="off") #option -debug; #else #option debug} |
| #alias #echo={#if ($(1)=="on") #option +echo; #else #if ($(1)=="off") #option -echo; #else #option echo} |
| #alias #info={#if ($(1)=="on") #option +info; #else #if ($(1)=="off") #option -info; #else #option info} |
| #alias #keyecho={#if ($(1)=="on") #option +keyecho; #else #if ($(1)=="off") #option -keyecho; #else #option keyecho} |
| #alias #lines=#setvar lines=$0 |
| #alias #settimer=#setvar timer=$0 |
| #alias #speedwalk={#if ($(1)=="on") #option +speedwalk; #else #if ($(1)=="off") #option -speedwalk; #else #option speedwalk} |
| #alias #wrap={#if ($(1)=="on") #option +wrap; #else #if ($(1)=="off") #option -wrap; #else #option wrap} |
| |
| #("Chant Set") |
| #alias .c={stand|buy ash|chant arrow} |
| #alias .e={stand|cast 'create food'|eat food|cast 'create food'|eat food|rest|wait} |
| #alias .d={stand|cast 'create water'|rest|wait} |
| #alias .a={stand|cast 'armour'|rest|wait} |
| #alias .s={stand|cast 'shield'|rest|wait} |
| #alias .r={rest|wait} |
| #action >+casted An ash arrow glows blue.={#print|#print (" --> Y E E H A W ! <--")|con arrow|put arrow quiver|rest|wait} |
| |
| #("MUME Set") |
| #alias loot+={#action -xp2|#action +loot} |
| #alias loot-={#action +xp2|#action -loot} |
| #alias tt+={#action +tell1|#action +tell2} |
| #alias tt-={#action -tell1|#action -tell2} |
| #alias bot+={#action +botbash1|#action +botbash2|#action +botride|#action +botlead|#action +botjoin} |
| #alias first+={#action +firstaid|first self} |
| #alias bot-={#action -botbash1|#action -botbash2|#action -botride|#action -botlead|#action -botjoin} |
| #alias bash+={#action +botbash1|#action +botbash2} |
| #alias bash-={#action -botbash1|#action -botbash2} |
| #alias lead+={#exe ("ride+")} |
| #alias lead-={#exe ("ride-")} |
| #alias ride+={#action +botride|#action +botlead|#action +zblam} |
| #alias ride-={#action -botride|#action -botlead|#action -zblam} |
| #alias xp+={#action +xp2} |
| #alias xp-={#action -xp2} |
| #alias split+={#action +splitmoney1|#action +splitmoney2|#action +splitmoney3|#action +splitmoney4|#action +splitmoney5|#action +splitmoney6|#action +splitmoney7|#action +splitmoney1e|#action +splitmoney2e|#action +splitmoney3e|#action +splitmoney4e|#action +splitmoney5e|#action +splitmoney6e|#action +splitmoney7e} |
| #alias split-={#action -splitmoney1|#action -splitmoney2|#action -splitmoney3|#action -splitmoney4|#action -splitmoney5|#action -splitmoney6|#action -splitmoney7|#action -splitmoney1e|#action -splitmoney2e|#action -splitmoney3e|#action -splitmoney4e|#action -splitmoney5e|#action -splitmoney6e|#action -splitmoney7e} |
| #alias assist+={#action +botjoin} |
| #alias assist-={#action -botjoin} |
| |
| #alias /leather={rem all.metal|wear shield|gp all.leather|wear all.leather|pp all.metal} |
| #alias /metal={rem all.leather|gp all.metal|wear all.metal|pp all.leather} |
| #alias /forest={rem fur|pp fur|gp forest|wear forest} |
| #alias /cloak={rem cloak|pp cloak|gp 2.cloak|wear cloak} |
| #alias /fur={rem cloak|pp cloak|gp fur|wear fur} |
| #alias /boots={rem boots|gp boots|wear boots|pp boots} |
| #alias /shield={rem shield|gp shield|wear shield|pp shield} |
| #alias /%j={change editor line|/room description|%j|%e|change editor mume|look} |
| #alias /pipe={get pipe backpack|sheath|hold pipe|rest|smoke|stand|draw|put pipe backpack} |
| #alias /ring={remove ring|put ring pouch|get 2.ring pouch|wear ring} |
| |
| #alias bnreveal={reveal belt|wear belt|reveal dagger|wield dagger|reveal lantern|wear lantern belt|snuff lantern|#2 reveal cup|reveal knife|wear knife belt|reveal shield|wear shield|reveal blanket|wear blanket|get all|get all all.sack|drop sack|put all sack|reveal quiver|wear quiver|reveal bow|wear bow|#8 reveal arrow|put all.arrow in quiver|inventory} |
| #alias set_up_character={alias ll light lantern|alias sl snuff lantern|alias dw drink water|alias ds drink &skin|alias pws pour water &skin|alias x exa|alias lp look in &backpack|alias gp get & in backpack|alias pp put & in backpack|alias ls look in &pouch|alias ps put & in pouch|alias gs get & in pouch|alias sq reveal quickly|alias fq flush quickly|alias / look in &corpse|alias . get all in &corpse|alias gac get all &chest|alias gc get all.& in all.corpse|alias pyre burn all.corpse|alias bc butcher &corpse|alias lm label & mount|alias re lead mount|alias rr ride mount|alias ld label & DEAD|alias kd kill DEAD|alias o open exit|alias c close exit|alias oe open exit|alias ce close exit|alias pe pick exit|alias ue unlock exit|alias le lock exit|alias gg get all.coins in all.corpse|alias ggg get all.coins|alias so say Open|alias agg cha moo agg|alias wim cha moo wim|alias nor cha ale nor|alias par cha ale par|alias p get all.arrow|alias [ get all.arrow all.corpse|alias ] put all.arrow &quiver|alias ; recover|alias sp cha SPELLCASTING &|alias wh whois|cha col all def|cha col weather cyan|cha col norm white|cha col enemy bold black|cha col status none|brief|prompt all|alias mr map room|alias wl weather local|alias lt listen tales} |
| |
| #alias b2f={n|n|n|n|n|n|n|n|e|e|e|n|n|e|n|n|n|n|n|n|n|e|n|n|n|w|n|n|n|n|n|n|n|n|n|n|n|n|e|n|n|n|n|n|n|n|n|e|n|n|n|n|n|n|n|n|n|n|e|n|n} |
| #alias f2b={s|s|w|s|s|s|s|s|s|s|s|s|s|w|s|s|s|s|s|s|s|s|w|s|s|s|s|s|s|s|s|s|s|s|s|e|s|s|s|w|s|s|s|s|s|s|s|w|s|s|w|w|w|s|s|s|s|s|s|s|s} |
| |
| #alias b2gh={#print ::: B2GH is split into B2GH1 (Bree to MD) and B2GH2 (MD to GH)} |
| #alias gh2b={#print ::: GH2B is split into GH2B1 (GH to MD) and GH2B2 (MD to Bree)} |
| #alias b2gh1={w|w|w|n|w|w|n|w|w|w|w|w|w|n|w|w|w|w|w|s|w|w|w|w|s|w|s|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|w|s|w|w|w|s|w|s|w|s|w|w|w|s|w|s|w|w|w|w|w|s|w|w|w|s|w|w|w|w|w|w|w|w|w|s|w|w|w} |
| #alias b2gh2={w|w|w|w|w|w|s|w|w|w|w|w|s|w|w|w|w|w|s|w|w|w|w|w|w|w|n|w|w|w|w|w|n|w|w|w|n|w|w|w|w|w|n|w|w|w|n|w|w|w|n|w|w|w|w|n|n|w|w|n|w|w|w|n|w|w|n|w|w|w|s|w|s|w|w|w|w|n|w|w|n|w|w|w|n|w|w|w|n|w|w|n} |
| #alias gh2b1={s|e|e|s|e|e|e|s|e|e|e|s|e|e|s|e|e|e|e|n|e|n|e|e|e|s|e|e|s|e|e|e|s|e|e|s|s|e|e|e|e|s|e|e|e|s|e|e|e|s|e|e|e|e|e|s|e|e|e|s|e|e|e|e|e|s|e|e|e|e|e|e|e|n|e|e|e|e|e|n|e|e|e|e|e|n|e|e|e|e|e|e} |
| #alias gh2b2={e|e|e|n|e|e|e|e|e|e|e|e|e|n|e|e|e|n|e|e|e|e|e|n|e|n|e|e|e|n|e|n|e|n|e|e|e|n|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|e|n|e|n|e|e|e|e|n|e|e|e|e|e|s|e|e|e|e|e|e|s|e|e|s|e|e|e} |
| |
| #alias bm2gh={#print ::: BM2GH is split into BM2GH1 (BM to SSAR) and B2GH2 (SSAR to GH)} |
| #alias gh2bm={#print ::: GH2BM is split into GH2BM1 (GH to SSAR) and GH2B2 (SSAR to BM)} |
| #alias gh2bm1={n|n|e|n|n|w|n|n|n|n|n|n|n|n|e|n|n|n|n|n|e|n|n|e|n|n|e|n|e|n|e|n|n|e|n|n|w|w|w|s|w|w|s|w|w|n|n|w|w|w|n|n|w|n|n|n|e|n|w|w|lead|w} |
| #alias gh2bm2={w|ride|s|d|w|n|w|w|s|s|e|e|s|s|s|w|n|w|w|s|s|w|w|w|w|w|w|w|s|s|w|w|w|n|w|n|w|n|w|n|w|w|n|w|w|n|w|w|n} |
| #alias bm2gh1={e|e|s|e|e|s|e|e|s|e|s|e|s|e|s|e|e|e|n|n|e|e|e|e|e|e|e|n|n|e|e|s|e|n|n|n|w|w|n|n|e|e|s|e|u|n|lead|e} |
| #alias bm2gh2={e|ride|e|e|s|w|s|s|s|e|s|s|e|e|e|s|s|e|e|n|e|e|n|e|e|e|s|s|w|s|s|w|s|w|s|w|s|s|w|s|s|w|s|s|s|s|s|w|s|s|s|s|s|s|s|s|e|s|s|w|s|s} |
| |
| #alias bmzone={#print|#print --> Quick-Docs for Nirnaeth Arnoediad/Battle of Unnumbered Tears|#print|#print --> Mistletoe - Wedding|#print --> Tree - Hunt|#print --> Flame - Battle|#print --> Cloud - River|#print --> Star - Mountain|#print --> Harp - Feast|#print --> Crown - Funeral|#print} |
| |
| #alias statbar={#print ("Trip: " + $sessxp + " xp, " + $sesstp + " tp. " + $Log + "Playing: " + $Character + ". Leader: " + $Leader + ". Group:" + $-40 + ".\015")} |
| #alias trip={#send ("emote has received " + $sessxp + " xp and " + $sesstp + " tp on this trip.")} |
| #alias gain={#send ("emote received " + $gainxp + " xp and " + $gaintp + " tp from the last kill.")} |
| |
| #($Character = "N/A") |
| #($Leader = "N/A") |
| #action >-Character This ranks you as $1={#print|#var $Character=$1} |
| #alias log={#if ("$0" != ""){#exe ("#capture _" + \$0 + ".log")|#var $Log=("Logging: _$0.log . ")|#print ("#current character: "+$Character)|#print ("#capturing to file: _$0.log")|#time|#print ("")}|#if ("$0" == ""){#print ("#ending capture")|#print ("")|#var $Log=("")|#capture}} |
| #alias leader={#var $Leader=$0} |
| #alias character={#var $Character=$0} |
| |
| #action >+linkdrop WARNING: inactivity timeout in 10 seconds.={#print|score} |
| #action >+manarep $1/$2 hits, $3/$4 mana, and $5/$6 moves.={#print|#alias rep=emote reports: $1/$2 hits $3/$4 mana $5/$6 moves} |
| #action >+hprep $1/$2 hits and $3/$4 moves.={#print|#alias rep=emote reports: $1/$2 hits $3/$4 moves} |
| #action >+tnl Needed: $1 xp, $2 tp.={#print|#alias tnl=emote needs $1 xp and $2 tp to gain the next level.|statbar} |
| #action >+tell1 \033[32m$1\033[32m tells you &2\033[0m={#print|#alias tt=tell $1 \$0} |
| #action >+tell2 \033[32m$1 tells you &2\033[0m={#print|#alias tt=tell $1 \$0} |
| #action >-loot You receive your share of experience.={#print|get all.coins all.corpse|xp|#var $xpcal=1} |
| #action >+loli key: '$1'={#print|#alias bakk={cast normal 'teleport' $1}|#alias sbak={#send ("backup\$1" + " $1 &2")}} |
| |
| #action >+personflee1 \015$1 panics, and attempts to flee.={#print|#var $fleeperson=$1|#action +personflee2|#action +personflee3} |
| #action >-personflee2 $1 leaves $2.={#print|#if ($fleeperson == \$1) {#action -personflee2|#action -personflee3|#exe ("#alias ff=tell $1 You fled $2")}} |
| #action >-personflee3 $1 leaves $2 &3={#print|#if ($fleeperson == \$1) {#action -personflee2|#action -personflee3|#exe ("#alias ff=tell $1 You fled $2")}} |
| |
| #action >-botbash1 seems to have recovered={#print|bash} |
| #action >-botbash2 you topple over and lose your balance.={#print|bash} |
| #action >-botride &1 picks up &2'&3reins, and starts riding $4.={#print|#if ($Leader==\$1) #send ("ride")} |
| #action >-botlead \015&1 dismounts from &2, and stops riding $3.\015={#print|#if ($Leader==\$1) #send ("lead")} |
| #action >-botjoin joins &1'&2fight.={#print|#if ($Leader==\$1) #send ("assist")} |
| #action >-firstaid You fail to bind your wound.={#print|first self} |
| #action >-zblam ZBLAM! &1doesn't want you riding={#print|stand|ride} |
| |
| #action &1You feel less protected.&2\015={#print ("$1\033[0m\033[1m\033[34mYou feel less protected.\033[0m$2")} |
| #action &1Your magical shield wears off.&2\015={#print ("$1\033[0m\033[1m\033[34mYour magical shield wears off.\033[0m$2")} |
| #action &1Your legs feel heavier.&2\015={#print ("$1\033[0m\033[1m\033[34mYour legs feel heavier.\033[0m$2")} |
| |
| #("Time Checker") |
| #action >+time ^$1, the $2 of $3, Year $4 of the Third Age.\015={#print|#var $realtime=$2|#var $checkmonth=$3|#var @checktime=-1|checkdate} |
| #action >+timeam $1am on $2, the $3 of $4, Year $5 of the Third Age.\015={#print|#var $realtime=$1am|#var $checkmonth=$4|#if ($1 == 12) #var @checktime=(%($1+12))|#else #var @checktime=$1|checkdate} |
| #action >+timepm $1pm on $2, the $3 of $4, Year $5 of the Third Age.\015={#print|#var $realtime=$1pm|#var $checkmonth=$4|#if ($1 == 12) #var @checktime=$1|#else #var @checktime=(%($1+12))|checkdate} |
| #alias checkdate={#if ($checkmonth == "Astron") {#var @dawn=7|#var @night=7|#var $season=Early Spring}|#if ($checkmonth == "Thrimidge") {#var @dawn=7|#var @night=8|#var $season=Spring}|#if ($checkmonth == "Forelithe") {#var @dawn=6|#var @night=8|#var $season=Late Spring}|#if ($checkmonth == "Afterlithe") {#var @dawn=5|#var @night=9|#var $season=Early Summer}|#if ($checkmonth == "Wedmath") {#var @dawn=4|#var @night=10|#var $season=Summer}|#if ($checkmonth == "Halimath") {#var @dawn=5|#var @night=9|#var $season=Late Summer}|#if ($checkmonth == "Winterfilth") {#var @dawn=6|#var @night=8|#var $season=Early Autumn}|#if ($checkmonth == "Blotmath") {#var @dawn=7|#var @night=8|#var $season=Autumn}|#if ($checkmonth == "Foreyule") {#var @dawn=7|#var @night=7|#var $season=Late Autumn}|#if ($checkmonth == "Afteryule") {#var @dawn=8|#var @night=6|#var $season=Early Winter}|#if ($checkmonth == "Solmath") {#var @dawn=9|#var @night=5|#var $season=Winter}|#if ($checkmonth == "Rethe") {#var @dawn=8|#var @night=6|#var $season=Late Winter}|#if (@checktime!=-1) {printtime}} |
| #alias printtime={#print ("")|#if (@checktime < @dawn) {#print ("It is currently \033[34mNIGHT\033[0m, "+$realtime+"\011\011\011Dawn: "+%(@dawn)+"am, Night: "+%(@night)+"pm")|#var @timeleft=(@dawn-@checktime)|#var $timeofday=DAWN|#print ("Time left until "+$timeofday+" is "+%(@timeleft)+" tick\(s\)\011\011"+$season+": "+$checkmonth)}|#if (@checktime >= (@night + 12)) {#print ("It is currently \033[34mNIGHT\033[0m, "+$realtime+"\011\011\011Dawn: "+%(@dawn)+"am, Night: "+%(@night)+"pm")|#var @timeleft=(24 + @dawn - @checktime)|#var $timeofday=DAWN|#print ("Time left until "+$timeofday+" is "+%(@timeleft)+" tick\(s\)\011\011"+$season+": "+$checkmonth)}|#if (@checktime == @dawn) {#print ("It is currently \033[31mDAWN\033[0m, "+$realtime+"\011\011\011Dawn: "+%(@dawn)+"am, Night: "+%(@night)+"pm")|#var @timeleft=1|#var $timeofday=DAY|#print ("Time left until "+$timeofday+" is "+%(@timeleft)+" tick\(s\)\011\011"+$season+": "+$checkmonth)}|#if (@checktime > @dawn && @checktime < (@night + 12) && @checktime >= 12 ) {#print ("It is currently \033[33mDAY\033[0m, "+$realtime+"\011\011\011Dawn: "+%(@dawn)+"am, Night: "+%(@night)+"pm")|#var @timeleft=(@night+12-@checktime)|#var $timeofday=NIGHT|#print ("Time left until "+$timeofday+" is "+%(@timeleft)+" tick\(s\)\011\011"+$season+": "+$checkmonth)}|#if (@checktime > @dawn && @checktime < (@night + 12) && @checktime < 12 ) {#print ("It is currently \033[33mDAY\033[0m, "+$realtime+"\011\011\011Dawn: "+%(@dawn)+"am, Night: "+%(@night)+"pm")|#var @timeleft=(@night+12-@checktime)|#var $timeofday=NIGHT|#print ("Time left until "+$timeofday+" is "+%(@timeleft)+" tick\(s\)\011\011"+$season+": "+$checkmonth)}|#print ("")} |
| #alias dwatch={#if (@timeleft == 1) #send ("emote 's digital watch displays "+$realtime+", which leaves only "+%(@timeleft)+" tick left until "+$timeofday+"!")|#else #send ("emote 's digital watch displays "+$realtime+", which leaves "+%(@timeleft)+" ticks left until "+$timeofday+"!")} |
| #alias month={#print ("")|#print ($realtime+", "+$checkmonth+"\011 ("+$season+") Dawn: "+%(@dawn)+"am, Night: "+%(@night)+"pm")|#print ("")} |
| |
| #("Money Splitter- Needs Dorien's Grouptell") |
| #alias add_up_money={#(@money += $1 + $2 * 100 + $3 * 2000)} |
| |
| #action >-splitmoney1 There was $1 copper $4.={#print|#exe ("add_up_money $1 0 0")} |
| #action >-splitmoney2 There was $2 silver $4.={#print|#exe ("add_up_money 0 $2 0")} |
| #action >-splitmoney3 There was $3 gold $4.={#print|#exe ("add_up_money 0 0 $3")} |
| #action >-splitmoney4 There was $3 gold $4 and $2 silver $5.={#print|#exe ("add_up_money 0 $2 $3")} |
| #action >-splitmoney5 There was $3 gold $4 and $1 copper $5.={#print|#exe ("add_up_money $1 0 $3")} |
| #action >-splitmoney6 There was $2 silver $4 and $1 copper $5.={#print|#exe ("add_up_money $1 $2 0")} |
| #action >-splitmoney7 There was $3 gold $4, $2 silver $5, and $1 copper $6.={#print|#exe ("add_up_money $1 $2 $3")} |
| #alias split={#($-42=%(@money / (:?$-40 +1) ))|#(@money = 0)|#for (\@1=1| \@1<=(:?$-40)| \@1++) #send ("give "+\$-42+" copper "+(\$-40:\@1))} |
| |
| #action >-splitmoney1e There was $1 busc $4.={#print|#exe ("add_up_money $1 0 0")} |
| #action >-splitmoney2e There was $2 celeb $4.={#print|#exe ("add_up_money 0 $2 0")} |
| #action >-splitmoney3e There was $3 lauren $4.={#print|#exe ("add_up_money 0 0 $3")} |
| #action >-splitmoney4e There was $3 lauren $4 and $2 celeb $5.={#print|#exe ("add_up_money 0 $2 $3")} |
| #action >-splitmoney5e There was $3 lauren $4 and $1 busc $5.={#print|#exe ("add_up_money $1 0 $3")} |
| #action >-splitmoney6e There was $2 celeb $4 and $1 busc $5.={#print|#exe ("add_up_money $1 $2 0")} |
| #action >-splitmoney7e There was $3 lauren $4, $2 celeb $5, and $1 busc $6.={#print|#exe ("add_up_money $1 $2 $3")} |
| #alias splite={#($-42=%(@money / (:?$-40 +1) ))|#(@money = 0)|#for (\@1=1| \@1<=(:?$-40)| \@1++) #send ("give "+\$-42+" busc "+(\$-40:\@1))} |
| |
| #("Modifications/Additions") |
| #alias gt={#if ("$0" != "") gtell $0} |
| #alias gt+={#action +graddall1|#action +graddall2|#action +group1|#action +group2|#action +nogroup1|#action +nogroup2|#action +nogroup3|#action +nogroup4|#action +Character|info} |
| #alias gt-={#action -graddall1|#action -graddall2|#action -group1|#action -group2|#action -nogroup1|#action -nogroup2|#action -nogroup3|#action -nogroup4} |
| #alias gcheck+={#action -graddall1|#action -graddall2|#action +grcheck1|#action +grcheck2} |
| #alias gcheck-={#action -grcheck1|#action -grcheck2} |
| #alias gadd+={#action -grcheck1|#action -grcheck2|#action +graddall1|#action +graddall2} |
| #alias gadd-={#action -graddall1|#action -graddall2} |
| #alias gclear={gclean} |
| #alias gremchar={#(@-40=0)|#($-41=\$Character)|gremsub1|#if (\@-40!=0) {gremsub2|#($-40=\$-42)}} |
| #action >-group1 You are now a member of $1's group.={#print|#var $Leader=$1|gadd $1} |
| #action >-group2 \015$1 is now a group member.={#print|gadd $1} |
| #action >-nogroup1 You leave the group.={#($-40="")|#print ("You leave the group. (Memberslist cleaned.)")} |
| #action >-nogroup2 Group disbanded.={#($-40="")|#print ("Group disbanded. (Memberslist cleaned.)")} |
| #action >-nogroup3 What group?!={#($-40="")|#print ("What group?! (Memberslist cleaned.)")} |
| #action >-nogroup4 $1 has left the group!={#print|grem $1} |
| #action >-graddall1 ^ $1 (Head of group)\015={#(@-40=0)|#($-41=\$1)|gremsub1|#if (\@-40!=0) #print (" +$1 (Head of group)")| #else {#print (" -$1 (Head of group)")|#if (\$1!=\$Character) #($-40=\$-40+" "+\$1)}|gremchar} |
| #action >-graddall2 ^ $1\015={#(@-40=0)|#($-41=\$1)|gremsub1|#if (\@-40!=0) #print (" +$1")| #else {#print (" -$1")|#if (\$1!=\$Character) #($-40=\$-40+" "+\$1)}|gremchar} |
| #action >-grcheck1 ^ $1 (Head of group)\015={#(@-40=0)|#($-41=\$1)|gremsub1|#if (\@-40!=0) #print (" +$1 (Head of group)")| #else #print (" -$1 (Head of group)")} |
| #action >-grcheck2 ^ $1\015={#(@-40=0)|#($-41=\$1)|gremsub1|#if (\@-40!=0) #print (" +$1")| #else #print (" -$1")} |
| |
| #("Dorien's Additions") |
| #alias gadd={#($-40=\$-40+" "+\$1)|#print ("Name "+\$1+" added.")} |
| #alias gcheck={#(@-40=0)|#($-41=\$1)|gremsub1|#if (\@-40!=0) #print ("Ok. "+\$-41+" is a member.")| #else #print ("Member not found.")} |
| #alias gclean={#($-40="")|#print ("Memberslist cleaned. No members now.")} |
| #alias ghelp={#print|#print ("Quick-Docs for GTell by Dorien (christian@glunet.se)")|#print ("Syntaxes:")|#print ("gadd <name> - to add a member, gcheck <name> - to check if <name> is a member,")|#print ("gclean - to clean the members list, glist - to list current members,")|#print ("glistv - same as glist but another format, grem <name> - to remove a member")|#print ("gtell <string> - the <string> you wish to tell all your members")|#print ("grep - tell the current group to all members")|#print|#print ("gcheck+/- gt+/- gadd+/-")|#print} |
| #alias glist=#print ("Members:"+($-40)) |
| #alias glistv={#print ("Members:")|#for (\@1=1| \@1<=(:?$-40)| \@1++) #print (\$-40:\@1)} |
| #alias grem={#(@-40=0)|#($-41=\$1)|gremsub1|#if (\@-40!=0) {#print ("Ok. Member "+\$-41+" removed.")|gremsub2|#($-40=\$-42)}| #else #print ("Member not found.")} |
| #alias gremsub1={#for (\@1=1| \@1<=(:?$-40)| \@1++) #if (\$-40:\@1==\$-41) #(@-40=\@1)} |
| #alias gremsub2={#($-42="")|#for (\@1=1| \@1<=(:?$-40)| \@1++) #if (\$-40:\@1!=\$-41) #($-42=\$-42+" "+(\$-40:\@1))} |
| #alias grep={#($-42=\$0)|#for (\@1=1| \@1<=(:?$-40)| \@1++) #send ("tell "+(\$-40:\@1)+" (GROUPTELL) Current members:"+(\$-40))} |
| #alias gtell={#($-42=\$0)|#for (\@1=1| \@1<=(:?$-40)| \@1++) #send ("tell "+(\$-40:\@1)+" (GROUPTELL) "+\$-42)} |
| #alias gxinfo={#print ("$-40=member string : $-41=member name")|#print ("$-42 = Member string temp : @-40 = Found Flag/Number")} |
| |
| #("Modified for Powtty: Axel's Target System") |
| #alias tar={#exe ("tr $0")} |
| #alias tr={#if ("$0"==""){#print ("#target set as: "+$tr)|#send ("track " + $tr)}|#else {#var $tr=$0|#print ("#target set to: "+$tr)}} |
| #alias hittar=#send ("hit "+$tr) |
| #alias warrior={#bi f5 ^[[15~=#send ("bash "+$tr)|#bi f6 ^[[17~=hittar|#($char="warrior")|#print ("#bindings set to: warrior")} |
| #alias mage={#bi f5 ^[[15~=#send ("cast 'lightning' "+$tr)|#bi f6 ^[[17~=hittar|#bi f7 ^[[18~=#send ("cast 'colour' "+$tr)|#bi f8 ^[[19~=#send ("cast 'fireball' "+$tr)|#($char="mage")|#print ("#bindings set to: mage")} |
| #alias cleric={#bi f5 ^[[15~=#send ("cast 'dispel evil' "+$tr)|#bi f6 ^[[17~=hittar|#bi f7 ^[[18~=#send ("cast 'blind' "+$tr)|#bi f8 ^[[19~=#send ("cast 'harm' "+$tr)|#($char="cleric")|#print ("#bindings set to: cleric")} |
| #alias thief={#bi f5 ^[[15~=ba ($tr)|#bi f6 ^[[17~=hittar|#bi f7 ^[[18~=#send ("shoot "+$tr)|#($char="thief")|#print ("# bindings set to: thief")} |
| |
| #("Herb List") |
| #("ATHELAS") |
| #action &1A small plant grows here, with long, pointed leaves and flowers at its top&2\015=#print ("$1A small plant grows here, with long, pointed leaves and flowers at its top$2 (Athelas)") |
| #action &1some long, slender green leaves&2\015=#print ("$1some long, slender green leaves$2 (Athelas)") |
| #("BANEBERRIES") |
| #action &1A dark green, foul-smelling shrub grows to about a foot in height&2\015=#print ("$1A dark green, foul-smelling shrub grows to about a foot in height$2 (Baneberries)") |
| #action &1some white, egg-shaped berries&2\015=#print ("$1some white, egg-shaped berries$2 (Baneberries)") |
| #("BELLADONNA") |
| #action &1A large shrub covered with dark violet berries grow here&2\015=#print ("$1A large shrub covered with dark violet berries grow here$2 (Belladonna)") |
| #action &1some violet berries&2\015=#print ("$1some violet berries$2 (Belladonna)") |
| #("BLACKBERRIES") |
| #action &1A large thorny branched shrub is growing here&2\015=#print ("$1A large thorny branched shrub is growing here$2 (Blackberries)") |
| #("BLACKCURRANT") |
| #action &1A shrub with maple-like leaves is growing here&2\015=#print ("$1A shrub with maple-like leaves is growing here$2 (Blackcurrant)") |
| #action &1a handful of blackcurrant berries&2\015=#print ("$1a handful of blackcurrant berries$2 (Blackcurrant)") |
| #("BLUEBERRIES") |
| #action &1A low shrub with bright green, oblong leaves is growing here&2\015=#print ("$1A low shrub with bright green, oblong leaves is growing here$2 (Blueberries)") |
| #("CARDAMON") |
| #action &1A small flower grows here, with a purple bloom and wide leaves&2\015=#print ("$1A small flower grows here, with a purple bloom and wide leaves$2 (Cardamom)") |
| #action &1grey-brown powder&2\015=#print ("$1grey-brown powder$2 (Cardamom)") |
| #("CHERRIES") |
| #action &1A large shrub grows here, its branches loosely spreading&2\015=#print ("$1A large shrub grows here, its branches loosely spreading$2 (Cherries)") |
| #("COMFREY") |
| #action &1A sturdy plant grows to a height of almost a yard&2\015=#print ("$1A sturdy plant grows to a height of almost a yard$2 (Comfrey)") |
| #action &1a bulbous root&2\015=#print ("$1a bulbous root$2 (Comfrey)") |
| #("CORIANDER") |
| #action &1A man's-waist high evergreen shrub grows here, with bright green branches&2\015=#print ("$1A man's-waist high evergreen shrub grows here, with bright green branches$2 (Coriander)") |
| #action &1several splayed leaves&2\015=#print ("$1several splayed leaves$2 (Coriander)") |
| #("FIGWORT") |
| #action &1A tall plant grows here, with grey-green leaves and grey flowers&2\015=#print ("$1A tall plant grows here, with grey-green leaves and grey flowers$2 (Figwort)") |
| #action &1a tall, grey-green plant&2\015=#print ("$1a tall, grey-green plant$2 (Figwort)") |
| #action &1some grey petals&2\015=#print ("$1some grey petals$2 (Figwort)") |
| #action &1Some grey petals have been scattered about.&2\015=#print ("$1Some grey petals have been scattered about.$2 (Figwort)") |
| #action &1 piles of grey petals&2\015=#print ("$1 piles of grey petals$2 (Figwort)") |
| #("FOXGLOVE") |
| #action &1A slender plant, with white flowers at the top, grows here&2\015=#print ("$1A slender plant, with white flowers at the top, grows here$2 (Foxglove)") |
| #action &1some white petals&2\015=#print ("$1some white petals$2 (Foxglove)") |
| #("FOXTAIL") |
| #action &1A bushy plant grows here, with tall clusters of yellow flowers&2\015=#print ("$1A bushy plant grows here, with tall clusters of yellow flowers$2 (Foxtail)") |
| #action &1some yellow petals&2\015=#print ("$1some yellow petals$2 (Foxtail)") |
| #("GINSENG") |
| #action &1A slender plant grows here, a single cluster of flowers atop its narrow stem&2\015=#print ("$1A slender plant grows here, a single cluster of flowers atop its narrow stem$2 (Ginseng)") |
| #action &1a man-like root&2\015=#print ("$1a man-like root$2 (Ginseng)") |
| #("GOOSEGRASS") |
| #action &1A small and tough weed grows here&2\015=#print ("$1A small and tough weed grows here$2 (Goosegrass)") |
| #action &1a crushed stem&2\015=#print ("$1a crushed stem$2 (Goosegrass)") |
| #("HEMLOCK") |
| #action &1A tall plant with a perfectly smooth stem gracefully marks the landscape&2\015=#print ("$1A tall plant with a perfectly smooth stem gracefully marks the landscape$2 (Hemlock)") |
| #("HONEYSUCKLE") |
| #action &1A large shrub grows here, filling the air with a heavy scent&2\015=#print ("$1A large shrub grows here, filling the air with a heavy scent$2 (Honeysuckle)") |
| #action &1a handful of fragile flower&2\015=#print ("$1a handful of fragile flower$2 (Honeysuckle)") |
| #("INKBERRIES") |
| #action &1A holly bush with dark green leaves is growing here&2\015=#print ("$1A holly bush with dark green leaves is growing here$2 (Inkberries)") |
| #("JUNIPER") |
| #action &1A short evergreen plant, with slightly bluish needles, grows here&2\015=#print ("$1A short evergreen plant, with slightly bluish needles, grows here$2 (Juniper)") |
| #action &1a cluster of hard, round, black berries&2\015=#print ("$1a cluster of hard, round, black berries$2 (Juniper)") |
| #("MARJORAM") |
| #action &1A thin, hairy plant, with small, oval leaves, grows here&2\015=#print ("$1A thin, hairy plant, with small, oval leaves, grows here$2 (Marjoram)") |
| #action &1a pinch of pale-green, crushed leaves&2\015=#print ("$1a pinch of pale-green, crushed leaves$2 (Marjoram)") |
| #("MILKWEED") |
| #action &1A slender plant grows here, with clusters of tiny pink flowers&2\015=#print ("$1A slender plant grows here, with clusters of tiny pink flowers$2 (Milkweed)") |
| #action &1a sticky mass of stems, leaves and sap&2\015=#print ("$1a sticky mass of stems, leaves and sap$2 (Milkweed)") |
| #("MINT") |
| #action &1A clean fragrance drifts up from a thick clump of leaves&2\015=#print ("$1A clean fragrance drifts up from a thick clump of leaves$2 (Mint)") |
| #("PAPRIKA (PEPPER)") |
| #action &1A small pile of pungent red powder lies here&2\015=#print ("$1A small pile of pungent red powder lies here$2 (Paprika, Pepper)") |
| #("POPPY") |
| #action &1Some orange-red blossoms grow amid grey-green foliage&2\015=#print ("$1Some orange-red blossoms grow amid grey-green foliage$2 (Poppy)") |
| #("ROSEMARY") |
| #action &1A woody evergreen plant grows here, with many stems reaching upward&2\015=#print ("$1A woody evergreen plant grows here, with many stems reaching upward$2 (Rosemary)") |
| #action &1a woody, many-stemmed plant&2\015=#print ("$1a woody, many-stemmed plant$2 (Rosemary)") |
| #action &1several needlelike leaves&2\015=#print ("$1several needlelike leaves$2 (Rosemary)") |
| #("SAGE") |
| #action &1A waist-high evergreen shrub grows here, with thick, reaching branches&2\015=#print ("$1A waist-high evergreen shrub grows here, with thick, reaching branches$2 (Sage)") |
| #action &1some grey-green leaves&2\015=#print ("$1some grey-green leaves$2 (Sage)") |
| #("TARRAGON") |
| #action &1A small evergreen plant grows here, its woody stems reaching two feet&2\015=#print ("$1A small evergreen plant grows here, its woody stems reaching two feet$2 (Tarragon)") |
| #action &1a handful of narrow leaves&2\015=#print ("$1a handful of narrow leaves$2 (Tarragon)") |
| #action &1woody, stemmed plants&2\015=#print ("$1woody, stemmed plants$2 (Tarragon)") |
| #("THYME") |
| #action &1A low, many-branched shrub covers the ground here&2\015=#print ("$1A low, many-branched shrub covers the ground here$2 (Thyme)") |
| #action &1some scented crushed leaves&2\015=#print ("$1some scented crushed leaves$2 (Thyme)") |
| #("VELERIAN") |
| #action &1A flowering plant grows here, its fern-like foliage dancing in the breeze&2\015=#print ("$1A flowering plant grows here, its fern-like foliage dancing in the breeze$2 (Velerian)") |
| #action &1a foul-smelling root&2\015=#print ("$1a foul-smelling root$2 (Velerian)") |
| #("VANILLA") |
| #action &1A long brown bean, emitting a pleasant scent, is here&2\015=#print ("$1A long brown bean, emitting a pleasant scent, is here$2 (Vanilla)") |
| #("OTHERS") |
| #action &1short, moist tail&2\015=#print ("$1short, moist tail$2 (Salamander)") |
| #action &1short, black fur&2\015=#print ("$1short, black fur$2 (Bat Fur)") |
| #action &1small fluid-sack&2\015=#print ("$1small fluid-sack$2 (Venom)") |
| #action &1grey fluid-sack&2\015=#print ("$1grey-fluid$2 (Arachnia)") |
| |
| #("Axel's Additions") |
| #action >+LockPicks1 &1A couple of lockpicks have a small bump near the tip.&2\015=#print ("$1A couple of lockpicks have a small bump near the tip.$2 (Master Assassin)") |
| #action >+LockPicks2 &1Two of the lockpicks have shallow notches on them.&2\015=#print ("$1Two of the lockpicks have shallow notches on them.$2 (Assassin Guildmaster)") |
| #action >+LockPicks3 &1The lockpicks are extremely well tempered.&2\015=#print ("$1The lockpicks are extremely well tempered.$2 (Blue Mountains)") |
| #action >+LockPicks4 &1Several of the picks have long, smooth grooves along their length.&2\015=#print ("$1Several of the picks have long, smooth grooves along their length.$2 (Cut-Throat)") |
| #action >+LockPicks5 &1There is a strange lockpick, with a sharp protrusion on one side, in the set.&2\015=#print ("$1There is a strange lockpick, with a sharp protrusion on one side, in the set. (Kraksh)") |
| #action >+LockPicks6 &1The lockpicks feel oddly light in your hand.&2\015=#print ("$1The lockpicks feel oddly light in your hand.$2 (Grey-cloaked Man)") |
| #action >+LockPicks7 &1The edges of most picks have been carefully sharpened.&2\015=#print ("$1The edges of most picks have been carefully sharpened.$2 (Angdil)") |
| #alias picks={#print|#emu A couple of lockpicks have a small bump near the tip.|#emu Two of the lockpicks have shallow notches on them.|#emu The lockpicks are extremely well tempered.|#emu Several of the picks have long, smooth grooves along their length.|#emu There is a strange lockpick, with a sharp protrusion on one side, in the set.|#emu The lockpicks feel oddly light in your hand.|#emu The edges of most picks have been carefully sharpened.|#print} |
| |
| #("AutoLogging") |
| #action >+datelog1 ^Never forget! Try to role-play...={#print|#action -datelog1|#action +datelog3|#action +datelog4|time} |
| #action >+datelog2 ^Reconnecting.={#print|#action -datelog2|#action +datelog3|#action +datelog4|time} |
| #action >-datelog3 ^Real time is $1 $2 $3 $4:$5:$6 $7 GMT.={#print|#exe ("#capture " + \$2 + " " + \$3 + " " + \$7 + " - " + \$4 + "." + \$5 + "." + \$6 + ".log")|#print (attr "yellow" + "### Currently logging to: " + \$2 + " " + \$3 + " " + \$7 + " - " + \$4 + "." + \$5 + "." + \$6 + ".log" + noattr)|#action -datelog3|#action -datelog4|#var $Log=("Logging: autolog . ")} |
| #action >-datelog4 ^Real time is $1 $2 $3 $4:$5:$6 $7 GMT.={#print|#exe ("#capture " + \$2 + " " + \$3 + " " + \$7 + " - " + \$4 + "." + \$5 + "." + \$6 + ".log")|#print (attr "yellow" + "### Currently logging to: " + \$2 + " " + \$3 + " " + \$7 + " - " + \$4 + "." + \$5 + "." + \$6 + ".log" + noattr)|#action -datelog3|#action -datelog4|#var $Log=("Logging: autolog . ")} |
| |
| #($gaintp = "0") |
| #($gainxp = "0") |
| #($sesstp = "0") |
| #($sessxp = "0") |
| #($xpcal = "0") |
| #(@oldtp = 0) |
| #(@oldxp = 0) |
| #al xp=info XPCOUNTER: %x %t %X %T. |
| #al xpreset={#var $sessxp=0|#var @oldxp=0} |
| #al tpreset={#var $sesstp=0|#var @oldtp=0} |
| #al xpcalc={#var $gainxp=($1-@oldxp)|#var $gaintp=($2-@oldtp)|#if (@oldxp==0) {#var $gainxp=0|#var $sessxp=0}|#if (@oldtp==0) {#var $gaintp=0|#var $sesstp=0}|#var $sessxp=((%($sessxp))+(%($gainxp)))|#var $sesstp=((%($sesstp))+(%($gaintp)))|#var @oldxp=$1|#var @oldtp=$2} |
| #al xpprint={#print ("\015--> Gained xp: " + $gainxp + "\015\011\011\011\011tp: "+ $gaintp )|#print ("--> Trip xp: " + $sessxp + "\015\011\011\011\011tp: " + $sesstp)|#print ("--> Needed xp: $3\015\011\011\011\011tp: $4")|#alias tnl={emote needs $3 xp and $4 tp to gain the next level.}} |
| #ac >+xp0 Welcome to the land of Middle Earth.={#print|xpreset|tpreset|xp|#var $xpcal=1} |
| #ac >+xp1 XPCOUNTER: &1 &2 &3 &4.={#if ($xpcal=="1") {xpcalc $1 $2|#var $xpcal=0}|xpprint $1 $2 $3 $4} |
| #ac >+xp2 ^You receive your share of experience.={#print|xp|#var $xpcal=1} |
| #ac >+xp3 Reconnecting.={#print|xpreset|tpreset|xp|#var $xpcal=1} |
| |
| #bind C-n ^N=&next-line |
| #bind C-p ^P=&prev-line |
| #bind Up ^[[A=&prev-line |
| #bind Down ^[[B=&next-line |
| #bind KP0 ^[Op=flee |
| #bind KP2 ^[Or=s |
| #bind KP3 ^[Os=d |
| #bind KP4 ^[Ot=w |
| #bind KP5 ^[Ou=say Open |
| #bind KP6 ^[Ov=e |
| #bind KP7 ^[Ow=open exit |
| #bind KP8 ^[Ox=n |
| #bind KP9 ^[Oy=u |
| #bind Tab ^I=&complete-word |
| |
| #option -exit -history -words -compact -debug +echo -info +keyecho -speedwalk |
| #option +wrap -autoprint -reprint +sendsize +autoclear |
| |
| </code> |