Other Clients on SlothMUD

MUSH Client Sounds

Sun, 02 Jun 2013 16:25:48 +0000

Hi guys!

I have decided to contribute to this thread as well, so here are my MUSH Client triggers that make you unable to sleep during chop or to warn you when admin talks to you to see if you’re botting or not (hi Tuk!).

^(.+) is unable to respond right now\.$

Checkboxes: Enable, Keep Evaluating, Regular Expression; Send To: World; Everything else - empty.

Sound: Blood Raven taunt from Diablo 2: <LINK_TEXT text=“https://dl.dropboxusercontent.com/u/721 … aunt_2.wav”>https://dl.dropboxusercontent.com/u/72105811/Blood_Raven_Taunt_2.wav</LINK_TEXT>

^(.+) tells you \'(.+)\'(.*)$

Checkboxes - same as previous.

Sound: Battlecruiser from StarCraft: <LINK_TEXT text=“https://dl.dropboxusercontent.com/u/721 … ission.wav”>https://dl.dropboxusercontent.com/u/72105811/Starcraft_Battlecruiser_Receiving_Transmission.wav</LINK_TEXT>

^The \'(aegis|sanctuary|wall of flesh)\' spell on you is about to wear off\.$

Checkboxes - same as in first one.

Sound: Bloodlust from Warcraft 2: <LINK_TEXT text=“https://dl.dropboxusercontent.com/u/721 … odlust.wav”>https://dl.dropboxusercontent.com/u/72105811/Warcraft_2_Bloodlust.wav</LINK_TEXT>

^(.+) is unable to respond right now\.$

Checkboxes: same + Repeat on same line; Send To: Script; Send: “ActivateClient;”.

Not making any sound, but if you browse pron in another window - it will bring MUSH Client in front of you so you can see who’s died leaving the channel. Smart!

Enjoy. (c)

processing MSDP spells in tintin++

Fri, 21 Dec 2012 01:03:33 +0000

here’s an example to add a line to your status bar prompt thingie listing spells you’re affected by and their duration. (this would go somewhere in your msdp event handler)

	#format {aprompt} {};

	#foreach {$MSDP_AFFECTS[]} {affect} {
		#var key $affect;
		#var val $MSDP_AFFECTS[$affect];
		
		#if {$val > 0} {
			#format {aff} {<bbf>%s<g08>:<bbf>%s } {$affect} {$val};
			#format {aprompt} {$aprompt%s } {$aff};
		}
	};
	
	#line ignore #showme {$aprompt} {1};

tintin++ syntax highlighting for textmate (mac osx)

Thu, 20 Dec 2012 02:39:25 +0000

create a tintin bundle and add this grammar to it

{	patterns = (
		{	name = 'keyword.control';
			match = '#(if|case|continue|default|while|else|elseif|endif|break|for|foreach|forall|return)\b';
		},
		{	name = 'support.function';
			match = '#(action|alias|all|bell|buffer|chat|class|config|cr|cursor|debug|default|delay|echo|end|event|function|gag|greeting|grep|help|highlight|history|ignore|info|kill|line|list|log|loop|macro|map|math|message|parse|path|pathdir|prompt|read|regexp|replace|return|run|scan|script|send|session|showme|substitute|suspend|switch|system|tab|textin|ticker|variable|var|write|zap)\b';
		},
		{	name = 'comment.line';
			begin = '^#nop';
			end = '$';
		},
		{	name = 'variable.other';
			match = '\$(\w+)';
		},
		{	name = 'constant.other';
			match = '<...>';
		},
		{	name = 'constant.numeric';
			match = '\b(\d+)\b';
		},
		{	name = 'variable.parameter';
			match = '%([\-\+\w+|\.]+)';
		},
	);
}

misc tinyfugue triggers

Wed, 19 Dec 2012 23:10:51 +0000

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; config
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/set charname Raincrab
/set gjob bonyx jet
/set channel russian
/set weapon dagger
/set container sack
/set wcontainer Specialization
/set kcontainer tube
/set gcontainer chest
/set ccontainer backpack
/set drink keg
/set title %s
/set mywarcry WITTY WARCRY GOES HERE

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; aliases
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/hook send k * = /set target %2 %; /bstab %target
/hook send k = /bstab %target
/hook send lt = look %target
/hook send sac = sac corpse
/hook send gac = get all corpse
/hook send ws = wake %; stand
/hook send bs * = backstab %2
/hook send q * = quaff %2
/hook send mb = man back
/hook send gt * = grouptell %-1
/hook send c * = cast '%-1'
/hook send c = circle
/hook send ss = sing stop
/hook send g = group
/hook send rr = |%;cast 'word of recall'
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; container management
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

; iget/iput uses container in inventory
; wget/wput uses worn container
; kget/kput uses key container inside worn container
; gget/gput uses gem container inside worn container
; cget/cput uses cp container inside worn container

/def iput = put %{*} %container
/def iget = get %{*} %container

/def wget = remove %wcontainer %; get %{*} %wcontainer %; wear %wcontainer
/def wput = remove %wcontainer %; put %{*} %wcontainer %; wear %wcontainer

/def kget = /wget %kcontainer %; get %{*} %kcontainer %; /wput %kcontainer
/def kput = /wget %kcontainer %; put %{*} %kcontainer %; /wput %kcontainer

/def gget = /wget %gcontainer %; get %{*} %gcontainer %; /wput %gcontainer
/def gput = /wget %gcontainer %; put %{*} %gcontainer %; /wput %gcontainer

/def cget = /wget %ccontainer %; get %{*} %ccontainer %; /wput %ccontainer
/def cput = /wget %ccontainer %; put %{*} %ccontainer %; /wput %ccontainer

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; movement
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def -mregexp -t"^The (\S+) to the (\S+) seems to be closed\." = \
	open %P1 %P2 %; /set barrier %P1 %; /set barrierdir %P2

/def -mregexp -t"^The (\S+) (\S+)wards seems to be closed\." = \
	open %P1 %P2 %; /set barrier %P1 %; /set barrierdir %P2

/def -mregexp -t"^It seems to be locked\." = \
	pick %barrier %barrierdir
	
/def -mregexp -t"^You board" = /set boat 1 %; where

/def -mregexp -t"^The ship has arrived at*" = \
	/if ({boat} == 1) \
		/if ({sleeping} == 1) \
			wake %; stand %; \
		/endif %; \
		exit %; \
		/set boat 0 %; \
		cast 'word of recall' %; \
	/endif

/def -mregexp -t"^(.+) arrives at the dock, ties up and puts out a plank\." = \
	/if ({boat} == 1) \
		/if ({sleeping} == 1) \
			wake %; stand %; \
		/endif %; \
		exit %; \
		/set boat 0 %; \
	/endif
	
; tracking
/def -mregexp -t"^Tracks to (.+) lead (\S+)ward" = \
	%P2 %; \
	/if ({stab} == 1) \
		/bstab %; \
	/endif

/def -mregexp -t"^The white aura around your body fades\." = \
	/if ({group} == 1) \
		gt *** lites out *** %; \
	/endif %; \
	/if ({autobuff} == 1) \
		/if ({sleeping} == 0) \
			/if ({reading} == 0) \
				cast 'sanctuary' %; \
			/endif %; \
		/endif %; \
	/endif

/def -p1 -mregexp -t"^You start glowing" = \
	/if ({group} == 1) \
		gt *** lites on *** %; \
	/endif

/def -p1 -mregexp -t"^You are surrounded by a radiant light." = \
	/if ({group} == 1) \
		gt *** lites on *** %; \
	/endif

/def -p1 -mregexp -t"^The radiant sphere around your body fades" = \
	/if ({group} == 1) \
		gt *** lites out *** %; \
	/endif

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; spells
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def aegis = cast 'aegis'
/def armor = cast 'armor'
/def bset = cast 'lloyds beacon' set
/def bback = cast 'lloyds beacon' return
/def bless = cast 'bless'
/def dark = cast 'darkness' %charname
/def darksi = cast 'darksight'
/def detinv = cast 'detect invis'
/def embalm = cast 'embalm' %{*}
/def feast = cast 'feast'
/def fluid = cast 'fluid'
/def fly = cast 'fly'
/def gate = cast 'gate' %{*}
/def ham = cast 'spiritual hammer'
/def heal = cast 'greater heal' %{*}
/def invis = cast 'invis'
/def locate = cast 'locate' %{*}
/def mfly = cast 'mass fly'
/def mwb = cast 'mass water breath'
/def quake = cast 'earthquake'
/def rec = cast 'word of recall' %; /set target null
/def refresh = cast 'refresh'
/def sanc = cast 'sanctuary'
/def shield = cast 'shield'
/def stone = cast 'stone skin'
/def supp = cast 'supp' %{*}
/def visage = cast 'undead visage'
/def wb = cast 'water breath'
/def web = cast 'web' %target
/def rempois = cast 'remove poison' raincrab
/def resfire = cast 'resist fire'
/def rescold = cast 'resist cold'

/def bro = sing 'brothers'
/def lion = sing 'lion'
/def dreams = sing 'dreams'

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; healing
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def in = /set inforheals 1 %; gt im in for heals with %cma mana
/def out = /set inforheals 0 %; gt im out of heals
/def ht = /heal %tank

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; combat
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def -mregexp -ag -t"^You miss (.+) with your (.+)"
/def -mregexp -ag -t"^(.+) misses (.+) with (his|her|its) (.+)"

/def -mregexp -t"^You are knocked off your feet*" = stand
/def -mregexp -t"^You try to stand\, but are beaten back" = stand
/def -mregexp -t"^You attempt to (.+) but bounce off" = stand
/def -mregexp -t"^(.+) disarms you with a quick parry\." = wield %weapon

/def -mregexp -t"^Total exp for kill is *" = \
	/set target null %; \
	/if ({autowarcry} == 1) \
		warcry %mywarcry %; \
	/endif

/set hammer 0
/def hammer = \
	/if ({hammer} == 1) \
		rem hammer %; \
		wield %weapon %; \
		/set hammer 0 %; \
	/else \
		rem %weapon %; \
		wield hammer %; \
		/set hammer 1 %; \
	/endif

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; food & drink
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/set sleeping 0
/set reading 0

/def -mregexp -t"^You are hungry\." = \
	/if ({sleeping} == 1) \
		/let wassleeping 1 %; \
		wake %; stand %; \
	/endif %; \
	/if ({reading} == 0) \
		eat food %; \
	/endif %; \
	/if ({wassleeping} == 1) \
		/let wassleeping 0 %; \
		sleep %; \
	/endif

/def -mregexp -t"^You are starting to get a little peckish\." = \
	/if ({sleeping} == 1) \
		/let wassleeping 1 %; \
		wake %; stand %; \
	/endif %; \
	/if ({reading} == 0) \
		eat food %; \
	/endif %; \
	/if ({wassleeping} == 1) \
		/let wassleeping 0 %; \
		sleep %; \
	/endif
	
/def -mregexp -t"^You are thirsty\." = \
	/if ({sleeping} == 1) \
		/let wassleeping 1 %; \
		wake %; stand %; \
	/endif %; \
	/if ({reading} == 0) \
		drink %drink %; drink %drink %; \
	/endif %; \
	/if ({wassleeping} == 1) \
		/let wassleeping 0 %; \
		sleep %; \
	/endif
	
/def -mregexp -t"^Your throat is starting to get dry\." = \
	/if ({sleeping} == 1) \
		/let wassleeping 1 %; \
		wake %; stand %; \
	/endif %; \
	/if ({reading} == 0) \
		drink %drink %; drink %drink %; \
	/endif %; \
	/if ({wassleeping} == 1) \
		/let wassleeping 0 %; \
		sleep %; \
	/endif
	
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; refills
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def -mregexp -t"^A pool of water gushes from a fountain*" = fill %drink
/def -mregexp -t"^A large wishing well\, with a bench*" = fill %drink
/def -mregexp -t"^A large fountain is here gurgling out an*" = fill %drink
/def -mregexp -t"^The large central well of Settlestone*" = fill %drink
/def -mregexp -t"^A stone well stands in the middle of the*" = fill %drink

/def food = c create food %; get food 
/def drink = drink %drink %; drink %drink
/def fill = cast 'create water' %drink
/def refill = fill %drink
/def eat = eat food

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; grouping
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def gjob = \
	/set gjob %{*} %; \
	gjob %gjob

/def t = /set target %{*} %; \
	/if ({group} == 1) \
		gt target %target %; \
	/endif

/def group = \
	/if ({group} == 1) \
		/set group 0 %; \
	/else \
		/set group 1 %; \
	/endif

/def leader = /set leader %{*}

/def -mregexp -t"^You now follow (\S+)\." = \
	/set group 1 %; \
	/set leader %P1 %; \
	gjob %gjob

/def -mregexp -t"^The group has disbanded\." = \
	/set group 0 %; \
	/set leader %charname %; \
	group %charname

/def -mregexp -t"^You disband your group\." = \
	/set group 0 %; \
	/set leader %charname %; \
	group %charname

/def -mregexp -t"^(\S+) starts following you\." = \
	/if ({group} == 0) \
		/set group 1 %; \
		gjob %gjob %; \
	/endif
	
/def -mregexp -t"^You are now leading*" = \
	/set group 1 %; \
	/set leader %charname %; \
	gjob %gjob

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; stab
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def bstab = /if ({target} !~ "null") backstab %target %; /endif

/def -mregexp -t"You follow*" = \
	/if ({group} == 1) \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

/def stab = \
	/if ({stab} == 0) \
		/set stab 1 %; \
		gt stab on %; \
	/else \
		/set stab 0 %; \
		gt stab off %; \
	/endif
	
/def allup = wake %; stand %; gt all up
/def regen = sleep %; gt regen
/def pos = /set position %{*}
/def ass = assist %tank

/def spin = /wget wheel %; spin wheel %; /wput wheel

/def -mregexp -t"^Your front line collapses*" = \
	/if ({position} =~ "back") \
		 man back %; \
	 /endif
	 
/def -mregexp -t"^You stumble as you try to move*" = man back

/def -mregexp -t"^(\S+) yells \'(.+)\'" = \
	/if ({group} == 1) \
		warcry %P2 %; \
	/endif

/def -mregexp -t"^You are covered in sticky webs\!" = \
	/set webbed 1 %; \
	/if ({group} == 1) \
		gt im webbed %; \
	/endif

/def -mregexp -t"^The webs tighten about you\." = squirm
/def -mregexp -t"^You struggle to break free from the webs" = squirm
/def -mregexp -t"You break free of the webs\!" = /set webbed 0

/hook send n = \
	/if ({webbed} == 1) \
		/if ({group} == 1) \
			gt im still webbed %; \
		/endif %; \
		squirm %; \
	/else \
		north %; \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

/hook send s = \
	/if ({webbed} == 1) \
		/if ({group} == 1) \
			gt im still webbed %; \
		/endif %; \
		squirm %; \
	/else \
		south %; \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

/hook send e = \
	/if ({webbed} == 1) \
		/if ({group} == 1) \
			gt im still webbed %; \
		/endif %; \
		squirm %; \
	/else \
		east %; \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

/hook send w = \
	/if ({webbed} == 1) \
		/if ({group} == 1) \
			gt im still webbed %; \
		/endif %; \
		squirm %; \
	/else \
		west %; \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

/hook send u = \
	/if ({webbed} == 1) \
		/if ({group} == 1) \
			gt im still webbed %; \
		/endif %; \
		squirm %; \
	/else \
		up %; \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

/hook send d = \
	/if ({webbed} == 1) \
		/if ({group} == 1) \
			gt im still webbed %; \
		/endif %; \
		squirm %; \
	/else \
		down %; \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; group
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def -mregexp -t"^(\S+) \-\- \'all up\'" = \
	/if ({leader} =~ {P1}) \
		wake %; stand %; salute %leader %; \
	/endif

/def -mregexp -t"^(\S+) \-\- \'regen\'" = \
	/if ({leader} =~ {P1}) \
		sleep %; \
	/endif
	
/def -mregexp -t"^(\S+) \-\- \'catch\'" = \
	/if ({leader} =~ {P1}) \
		sleep %; \
	/endif
	
/def -mregexp -t"^(\S+) \-\- \'visage\'" = \
	/if ({leader} =~ {P1}) \
			cast 'undead visage' %; \
	/endif
	
/def -mregexp -t"^(\S+) \-\- \'recall\'" = \
	/if ({leader} =~ {P1}) \
			wake %; stand %; salute %leader %; \
	/endif
	
/def -mregexp -t"^(\S+) \-\- \'all up\'" = \
	/if ({leader} =~ {P1}) \
			wake %; stand %; salute %leader %; \
	/endif

/def -mregexp -t"^(\S+) \-\- \'target (.+)\'" = \
	/if ({group} == 1) \
		/if ({leader} =~ {P1}) \
			/set target %P2 %; \
			sneak %; \
			/if ({stab} == 1) \
				/bstab %; \
			/endif %; \
		/endif %; \
	/endif

/def -mregexp -t"^(\S+) \-\- \'qstab\'" = \
	/if ({leader} =~ {P1}) \
		/if ({stab} == 1) \
			/bstab %; \
		/endif %; \
	/endif

/def -mregexp -t"^(\S+) has just entered the portal\." = \
	/if ({leader} =~ {P1}) \
		enter portal %; \
	/endif

/def -mregexp -t"^(\S+) disappears into a large diamond\." = \
	/if ({leader} =~ {P1}) \
		open diamond %; \
	/endif
	
/def -mregexp -t"^(\S+) enters the archway*" = \
	/if ({leader} =~ {P1}) \
		enter archway %; \
	/endif

/def -mregexp -t"^(\S+) enters the glowing archway*" = \
	/if ({leader} =~ {P1}) \
		enter archway %; \
	/endif

/def -mregexp -t"^(\S+) picks up a feather quill from an ink flask*" = \
	/if ({leader} =~ {P1}) \
		sign ledger %; \
	/endif
	
/def -mregexp -t"^(\S+) steps toward the red portal\." = \
	/if ({leader} =~ {P1}) \
		enter red %; \
	/endif
	
/def -mregexp -t"^You feel yourself suddenly dragged through the ether\!" = \
	salute %leader

/def -mregexp -t"^(\S+) heroically rescues (\S+)\." = \
	/if ({P1} =~ {tank}) \
		assist %P1 %; \
	/endif

/def -mregexp -t"^(\S+) circles around (.+) and expertly puts (\S+) in a deathgrip\." = \
	/if ({group} == 1) \
		assist %P1 %; \
	/endif

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; chop
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

/def -mregexp -t"^As you swing your weapon\, it slips and slices through (\S+)\'s neck\!" = \
	gt i chopped %P1 %; get head
	
/def -mregexp -t"^(\S+) wildly swings (.+)\, and accidentally cuts off (\S+) own head\!" = \
	gt %P1 took the easy way out

/def -mregexp -t"^(\S+) wildly swings (.+)\, and accidentally cuts off (\S+)\'s head\!" = \
	gt %P1 chopped %P3 %; highfive %P1

/def -mregexp -t"^As (\S+) hits (.+) with (.+) it shatters into thousands of pieces\." = \
	gt %P1 broke %P3 %; slap %P1
	
/def -mregexp -t"^(\S+) shatters the handle of (\S+) (\S+)\!" = \
	gt %P1 broke %P3 %; slap %P1

/def -mregexp -t"^Your weapon shatters as it hits your victim\." = \
	gt i just broke my chopper %; wield chopper

Good job Rain!

Especially channel name :-)

tinyfugue syntax highlighting for textmate (mac osx)

Wed, 19 Dec 2012 22:55:28 +0000

create a new bundle in tm, add this to it

{	patterns = (
		{	name = 'keyword.control.untitled';
			match = '\/(if|endif|else|elseif|for|while)\b';
		},
		{	name = 'entity.name.function';
			match = '\/(addworld|at|bamf|beep|bind|break|cat|changes|connect|dc|def|dokey|echo|edit|escape|eval|not|exit|export|expr|features|fg|finger|for|gag|getfile|grab|help|hilite|histsize|hook|if|input|kill|lcd|let|limit|list|listsockets|liststreams|listvar|listworlds|load|localecho|log|more|nohilite|partial|paste|ps|purge|purgeworld|putfile|quit|quote|recall|recordline|repeat|replace|restrict|return|runtime|save|saveworld|send|set|setenv|sh|shift|sub|substitute|suspend|telnet|test|tick|time|toggle|tr|trig|trigger|unbind|undef|undefn|undeft|unhook|unset|untrig|unworld|version|watchtdog|watchname|while|world)\b';
		},
		{	name = 'comment';
			match = '^;.+';
		},
		{	name = 'constant.numeric';
			match = '\b([0-9]+)\b';
		},
		{	name = 'invalid';
			match = '\b([\t ]+)$';
		},
		{	name = 'constant.language';
			match = '\b(yes|no)\b';
		},
		{	name = 'support.type';
			match = '\-(\w+)\b';
		},
		{	name = 'support.variable';
			match = '(%?\{(\S+)\}|%(\w+))';
		},
		{	name = 'string.regexp';
			begin = '"';
			end = '"';
			patterns = (
				{	name = 'constant.character.escape.untitled';
					match = '\\.';
				},
			);
		},
	);
}

edit: replaced xml with textmate grammar

msdp with tinyfugue

Wed, 19 Dec 2012 21:31:01 +0000

Using a copy of tf patched with msdp support, http://www.mudbytes.net/file-2875, you can access the msdp variables. They are automatically updated, and you can grab the msdp variable change events as well.

First request them when connected (run the macro /enablemsdp or have it triggered to run when you enter the game):

/def enablemsdp = \
	/msdp REPORT =CHARACTER_NAME %; \
	/msdp REPORT =SERVER_ID %; \
	/msdp REPORT =SERVER_TIME %; \
	/msdp REPORT =SNIPPET_VERSION %; \
	/msdp REPORT =AFFECTS %; \
	/msdp REPORT =ALIGNMENT %; \
	/msdp REPORT =EXPERIENCE %; \
	/msdp REPORT =EXPERIENCE_MAX %; \
	/msdp REPORT =EXPERIENCE_TNL %; \
	/msdp REPORT =HEALTH %; \
	/msdp REPORT =HEALTH_MAX %; \
	/msdp REPORT =HEALTH_REGEN %; \
	/msdp REPORT =LEVEL %; \
	/msdp REPORT =LEVEL_SEC %; \
	/msdp REPORT =LEVEL_TER %; \
	/msdp REPORT =LEVEL_QUA %; \
	/msdp REPORT =LEVEL_QUI %; \
	/msdp REPORT =LEVEL_HEX %; \
	/msdp REPORT =LEVEL_SEP %; \
	/msdp REPORT =LEVEL_OCT %; \
	/msdp REPORT =LEVEL_AVA %; \
	/msdp REPORT =CITIZEN %; \
	/msdp REPORT =CLASS %; \
	/msdp REPORT =CLASS_SEC %; \
	/msdp REPORT =CLASS_TER %; \
	/msdp REPORT =CLASS_QUA %; \
	/msdp REPORT =CLASS_QUI %; \
	/msdp REPORT =CLASS_HEX %; \
	/msdp REPORT =CLASS_SEP %; \
	/msdp REPORT =CLASS_OCT %; \
	/msdp REPORT =CLASS_AVA %; \
	/msdp REPORT =MANA %; \
	/msdp REPORT =MANA_MAX %; \
	/msdp REPORT =MANA_REGEN %; \
	/msdp REPORT =BANK %; \
	/msdp REPORT =PRACTICE %; \
	/msdp REPORT =MONEY %; \
	/msdp REPORT =HONOR %; \
	/msdp REPORT =DRACHMA %; \
	/msdp REPORT =MOVEMENT %; \
	/msdp REPORT =MOVEMENT_MAX %; \
	/msdp REPORT =MOVEMENT_REGEN %; \
	/msdp REPORT =HITROLL %; \
	/msdp REPORT =DAMROLL %; \
	/msdp REPORT =AC %; \
	/msdp REPORT =STR %; \
	/msdp REPORT =INT %; \
	/msdp REPORT =WIS %; \
	/msdp REPORT =DEX %; \
	/msdp REPORT =CON %; \
	/msdp REPORT =STR_PERM %; \
	/msdp REPORT =INT_PERM %; \
	/msdp REPORT =WIS_PERM %; \
	/msdp REPORT =DEX_PERM %; \
	/msdp REPORT =CON_PERM %; \
	/msdp REPORT =OPPONENT_HEALTH %; \
	/msdp REPORT =OPPONENT_HEALTH_MAX %; \
	/msdp REPORT =OPPONENT_LEVEL %; \
	/msdp REPORT =OPPONENT_NAME %; \
	/msdp REPORT =TANK_HEALTH %; \
	/msdp REPORT =TANK_HEALTH_MAX %; \
	/msdp REPORT =TANK_LEVEL %; \
	/msdp REPORT =TANK_NAME %; \
	/msdp REPORT =AREA_NAME %; \
	/msdp REPORT =ROOM_EXITS %; \
	/msdp REPORT =ROOM_NAME %; \
	/msdp REPORT =ROOM_VNUM %; \
	/msdp REPORT =TERRAIN %; \
	/msdp REPORT =CONTINENT %; \
	/msdp REPORT =WORLD_TIME %; \
	/msdp REPORT =CLIENT_ID %; \
	/msdp REPORT =CLIENT_VERSION %; \
	/msdp REPORT =PLUGIN_ID %; \
	/msdp REPORT =ANSI_COLORS %; \
	/msdp REPORT =XTERM_256_COLORS %; \
	/msdp REPORT =UTF_8 %; \
	/msdp REPORT =SOUND %; \
	/msdp REPORT =MXP %; \
	/msdp REPORT =WEAPON_DAM %; \
	/msdp REPORT =STAB_DAM %; \
	/msdp REPORT =STAB_DAM_CAP %; \
	/msdp REPORT =UNDEAD_CONT %; \
	/msdp REPORT =UNDEAD_CONT_CAP %; \
	/msdp REPORT =SPELL_BONUS %; \
	/msdp REPORT =SPELL_BONUS_CAP %; \
	/msdp REPORT =HEAL_BONUS %; \
	/msdp REPORT =HEAL_BONUS_CAP %; \
	/msdp REPORT =CHARISMA %; \
	/msdp REPORT =CHARISMA_CAP %; \
	/msdp REPORT =FLAILDAM %; \
	/msdp REPORT =KICKDAM %; \
	/msdp REPORT =HAND_DAM %; \
	/msdp REPORT =HAND_DAM_CAP %; \
	/msdp REPORT =DAM_RED %; \
	/msdp REPORT =DAM_RED_CAP %; \
	/msdp REPORT =SEX %; \
	/msdp REPORT =GROUP_LEADER

Then access the variable names with the convention MSDP__. for example:

/def whoami = /echo i am %MSDP__CHARACTER_NAME

Hooking the events is a little different, as hooks are not used as they are for other events, instead a trigger is used:

/def -mglob -t"MSDP *" msdp_update = /echo achtung! %{*} was set

BUGS

Since there is no native array support in tf, list variables are named with the convention MSDP___ which creates unaccessible variable names when contains spaces; Spell names like “stone skin” for example are troublesome.

Direction variables are being set, (their value is zero), i.e. from BH inn north and south get set, after going south, east and west get set, going back north to the inn, all 4 direction variables remain set, as there is no mechanism unsetting the variables.

Also any variable returning -1 should be ignored.

If you’re still having trouble, turn on debugging with /set msdp_dbg 1 and it will spew all msdp variable changes to the world window.

tf logging

Tue, 11 Dec 2012 23:53:23 +0000

autologging with log rotation with date in filename

/def logger = /log off %; \
	/log SlothMUD.$[ftime("%F")].log %; \
	/at 00:01 /logger

/hook CONNECT = /logger %; /set connected 1
/hook CONFAIL|ICONFAIL * = /log off %; /set connected 0

tf afk script

Tue, 11 Dec 2012 23:51:20 +0000

defines a /afk macro that toggles afk, updates title, and auto lurks.

/set title %s
/set isafk 0

/def afk = \
	/if ({isafk} == 0) \
		/set isafk 1 %; \
		lurk on %; \
		title %title \\d10<<\\d09A.F.K\\d10>> %; \
	/elseif ({isafk} == 1) \
		/set isafk 0 %; \
		lurk off %; \
		title %title %; \
	/endif

/def doafk = \
	/if ({connected} == 1) \
		/if ({isafk} == 1) \
			yawn %; \
		/endif %; \
	/endif

/repeat -60 i /doafk

Can you post your Ruby dropping script? :P :shock: :twisted:

tf prompt grabber

Tue, 11 Dec 2012 23:26:17 +0000

Someone asked for this on the newbie channel, here it is.

For whatever reason the prompt hook in tf doesnt always trigger regardless if lp is set or whether the prompt ends with a newline. What does work is just treating the prompt as a trigger, gagging and processing it that way. In sloth i have my prompt set as ‘PROMPT $h/$H $m/$M $v/$V$nPROMPT $g $x $a $I $D $c $Z’, splitting the prompt in 2 lines and prefixing each line with ‘PROMPT’.

This code will gag the prompt, setup 3 status lines (actually 4, keeping the top one blank to keep a space between status bar and mud output). Hp/ma/mv variables are colorized, auto reporting from you or others is also gagged, to ungag just remove the ‘-ag’ from the trigger definitions.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; prompt
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

; to set prompt in game do:
; prompt PROMPT $h/$H $m/$M $v/$V$nPROMPT $g $x $a $I $D $c $Z

/set status_pad= 
/set status_height=4

/status_add -c
/status_add -c -r1 stattopleft:32
/status_add -r1 stattopright:-0
/status_add -c -r2 statbottomleft:64
/status_add -r2 statbottomright:-0
/status_add -c -r3 statgroupleft:64

; multiply vars by 1.0 to force floating point division
/def updatestatus = \
	/if (({chp} * 1.0) / {mhp} <= .33) \
		/test hpstat := decode_attr("@{Cbrightred}%chp@{Cgray}/@{Cbrightred}%mhp@{Cgray}hp") %; \
	/endif %; \
	/if (({cma} * 1.0) / {mma} <= .33) \
		/test mastat := decode_attr("@{Cbrightred}%cma@{Cgray}/@{Cbrightred}%mma@{Cgray}ma") %; \
	/endif %; \
	/if (({cmv} * 1.0) / {mmv} <= .33) \
		/test mvstat := decode_attr("@{Cbrightred}%cmv@{Cgray}/@{Cbrightred}%mmv@{Cgray}mv") %; \
	/endif %; \
	/if (({chp} * 1.0) / {mhp} > .33) \
		/test hpstat := decode_attr("@{Cbrightyellow}%chp@{Cgray}/@{Cbrightyellow}%mhp@{Cgray}hp") %; \
	/endif %; \
	/if (({cma} * 1.0) / {mma} > .33) \
		/test mastat := decode_attr("@{Cbrightyellow}%cma@{Cgray}/@{Cbrightyellow}%mma@{Cgray}ma") %; \
	/endif %; \
	/if (({cmv} * 1.0) / {mmv} > .33) \
		/test mvstat := decode_attr("@{Cbrightyellow}%cmv@{Cgray}/@{Cbrightyellow}%mmv@{Cgray}mv") %; \
	/endif %; \
	/if (({chp} * 1.0) / {mhp} > .66) \
		/test hpstat := decode_attr("@{Cbrightgreen}%chp@{Cgray}/@{Cbrightgreen}%mhp@{Cgray}hp") %; \
	/endif %; \
	/if (({cma} * 1.0) / {mma} > .66) \
		/test mastat := decode_attr("@{Cbrightgreen}%cma@{Cgray}/@{Cbrightgreen}%mma@{Cgray}ma") %; \
	/endif %; \
	/if (({cmv} * 1.0) / {mmv} > .66) \
		/test mvstat := decode_attr("@{Cbrightgreen}%cmv@{Cgray}/@{Cbrightgreen}%mmv@{Cgray}mv") %; \
	/endif %; \
	/if (({tchp} * 1.0) / {tmhp} <= .33) \
		/test tstat := decode_attr("@{Cgray}Leader: @{Cbrightgreen}%leader @{Cgray}Tank: @{Cbrightred}%tank @{Cbrightred}%tchp@{Cgray}/@{Cbrightred}%tmhp @{Cbrightgreen}%tspells@{Cgray} Target: @{Cbrightgreen}%target") %; \
	/endif %; \
	/if (({tchp} * 1.0) / {tmhp} > .33) \
		/test tstat := decode_attr("@{Cgray}Leader: @{Cbrightgreen}%leader @{Cgray}Tank: @{Cbrightyellow}%tank @{Cbrightyellow}%tchp@{Cgray}/@{Cbrightyellow}%tmhp @{Cbrightgreen}%tspells@{Cgray} Target: @{Cbrightgreen}%target") %; \
	/endif %; \
	/if (({tchp} * 1.0) / {tmhp} > .66) \
		/test tstat := decode_attr("@{Cgray}Leader: @{Cbrightgreen}%leader @{Cgray}Tank: @{Cbrightgreen}%tank @{Cbrightgreen}%tchp@{Cgray}/@{Cbrightgreen}%tmhp @{Cbrightgreen}%tspells@{Cgray} Target: @{Cbrightgreen}%target") %; \
	/endif %; \
	/test exitstr := decode_attr("@{Cbrightgreen}%exits") %; \
	/set statgroupleft %tstat %; \
	/test statgroupleftlen := strlen(strip_attr(statgroupleft)) %; \
	/status_edit statgroupleft:%{statgroupleftlen} %; \
	/set stattopleft %hpstat %mastat %mvstat %; \
	/test stattopleftlen := strlen(strip_attr(stattopleft)) %; \
	/status_edit stattopleft:%{stattopleftlen} %; \
	/set statbottomright %exitstr %; \
	/set stattopright %loc %cont %; \
	/test stattoprightlen := $[ strlen(strip_attr(stattopright)) * -1 ] %; \
	/set statbottomleft %gold %exp %ac %hit %dam %; \
	/test statbottomleftlen := strlen(strip_attr(statbottomleft)) %; \
	/status_edit statbottomleft:%{statbottomleftlen}

/def -ag -mregexp -t"^PROMPT (\d+) (\d+) (\S+) (\S+) (\S+) (\S+) (.+)" = \
	/test gold := decode_attr("@{Cbrightgreen}%P1@{Cgray}g") %; \
	/test exp := decode_attr("@{Cbrightgreen}%P2@{Cgray}x") %; \
	/test ac := decode_attr("@{Cbrightgreen}%P3@{Cgray}ac") %; \
	/test hit := decode_attr("@{Cbrightgreen}%P4@{Cgray}hit") %; \
	/test dam := decode_attr("@{Cbrightgreen}%P5@{Cgray}dam") %; \
	/test cont := decode_attr("@{Cgray}(@{Cbrightgreen}%P6@{Cgray})") %; \
	/test loc := decode_attr("@{Cbrightgreen}%P7") %; \
	/test prompt("> ") %; \
	/updatestatus

; for lowbies who cant see ac or hit/dam
/def -ag -mregexp -t"^PROMPT (\d+) (\d+) (\S+) (.+)" = \
	/test gold := decode_attr("@{Cbrightgreen}%P1@{Cgray}g") %; \
	/test exp := decode_attr("@{Cbrightgreen}%P2@{Cgray}x") %; \
	/test ac := decode_attr("@{Cbrightgreen}0@{Cgray}ac") %; \
	/test hit := decode_attr("@{Cbrightgreen}0@{Cgray}hit") %; \
	/test dam := decode_attr("@{Cbrightgreen}0@{Cgray}dam") %; \
	/test cont := decode_attr("@{Cgray}(@{Cbrightgreen}%P6@{Cgray})") %; \
	/test loc := decode_attr("@{Cbrightgreen}%P7") %; \
	/test prompt("> ") %; \
	/updatestatus

/def -ag -mregexp -t"^PROMPT (\S+)/(\S+) (\S+)/(\S+) (\S+)/(\S+)$" = \
	/test chp := strip_attr("%P1") %; \
	/test mhp := strip_attr("%P2") %; \
	/test cma := strip_attr("%P3") %; \
	/test mma := strip_attr("%P4") %; \
	/test cmv := strip_attr("%P5") %; \
	/test mmv := strip_attr("%P6") %; \
	/updatestatus

/def -mregexp -t"^Exits: (.+) " = \
	/set exits %P1 %; \
	/updatestatus

/def -ag -mregexp -t"^(\S+) reports (\d+)/(\d+) (.+) Spells: (.+)\." = \
	/set tank %P1 %; \
	/set tchp %P2 %; \
	/set tmhp %P3 %; \
	/set tspells %P5 %; \
	/updatestatus

/def -ag -mregexp -t"^(\S+) report (\d+)/(\d+) (.+)" = \
	/set tank %charname %; \
	/set tchp %P2 %; \
	/set tmhp %P3 %; \
	/set tspells= %; \
	/updatestatus
	
/def -mregexp -t"^You are rescued by (\S+)\, you are confused\!" = \
	/set tank %P1 %; assist %P1 %; /updatestatus

zmud to tinyfugue speedwalk translator

Sat, 24 Nov 2012 07:54:40 +0000

heres a perl script to translate zmud style speedwalks into tinyfugue commands

#!/usr/bin/env perl

#convert zmud speedwalks into tinyfugue commands

# usage: z2tf.pl '3nes2we;open door;'

use strict;
use warnings;

my $zwalk = shift;
my @chars = split //, $zwalk;
my $count = 1;
my $iscmd = 0;
my $cmd = '';

foreach my $char (@chars) {
	if ($char =~ /\;/) {
		if ($iscmd) {
			print $cmd;
			print '%;';
			$cmd = '';
			$iscmd = 0;
		} else {
			$iscmd = 1;
		}
	} elsif ($iscmd) {
		$cmd = "${cmd}${char}";
	} elsif ($char =~ /[nsewud]/) {
		while ($count > 0) {
			print $char;
			print '%;';
			$count--;
		}
		$count = 1;
	} elsif ($char =~ /\d+/) {
		$count = $char;
	}
}

you can just use the output in a macro definition for your speedwalk

tintin EXP counter

Wed, 05 May 2010 18:46:07 +0000

You need to set your prompt to include exp as one of the fields. I use a variation on the following:

prompt <$hhp $mma $vmv xp:$x cn:$g ac:$a>

which results in something like:

<395hp 214ma 207mv xp:1152578 cn:14651 ac:-2.1>

The only part we’re concerned with is the ‘xp:1152578’

This script works once you have levels in all 8 classes .. I’m still working on converting my OOOLD tintin v1.86 scripts as well as adjusting for the new sloth that is and haven’t gotten that working without resorting to using a perl or shell script to find and set the right variables.

[code:2hsdm60t]/showme TURNING EXP COUNTER ON;

/alias reset-exp {/var {cntexp} {0}}

/var {cntexp} {0}[/code:2hsdm60t]

This first action will set unused experience from your score. pretty standard fare, but requires that you type in score every so often.

[code:2hsdm60t]/action {^You have %1 unused experience points.} {

/var expunused %1;

domathexp;

}[/code:2hsdm60t]

This second action is the one that requires your prompt to be set. The benefit of doing it this way is that your $expunused variable is always accurate. If, however, you don’t want to show exp in your prompt, then use the first action above.

[code:2hsdm60t]/action {^<%* xp:%2 cn:%*} {

/if {$expunused != %2} {

 /math newexp {%2 - $expunused};

 /math cntexp {$cntexp + $newexp};

 /math expunused %2;

};

}[/code:2hsdm60t]

This alias is the only one you’ll ever need to type in - typing ’exp’ will show you a table either capped at 20 or 40 of classes you can still gain experience in.

[code:2hsdm60t]/alias exp {

domathexp;

/showme $cntexp Experience since reset;

/if {$Lvl1 <= 20 }{exp2}{exp4}

}

This determines classes and levels in each - as previously noted, this only currently works once you have levels in all 8 classes.

/action {^Your levels: %1: %2 %3: %4 %5: %6 %7: %8 %9: %10 %11: %12 %13: %14 %15: %16} {
 /var pri %1 ; /var Lvl1 %2 ; check1;
 /var sec %3 ; /var Lvl2 %4 ; check2;
 /var ter %5 ; /var Lvl3 %6 ; check3;
 /var qua %7 ; /var Lvl4 %8 ; check4;
 /var qui %9 ; /var Lvl5 %10 ; check5;
 /var hex %11 ; /var Lvl6 %12 ; check6;
 /var sep %13 ; /var Lvl7 %14 ; check7;
 /var oct %15 ; /var Lvl8 %16 ; check8;
}

From here on out, we have all ‘behind-the-scenes’ aliases for calculation purposes.

/alias domathexp {
 /math nxtpri {$Lvl1 + 1};
 /math nxtsec {$Lvl2 + 1};
 /math nxtter {$Lvl3 + 1};
 /math nxtqua {$Lvl4 + 1};
 /math nxtqui {$Lvl5 + 1};
 /math nxthex {$Lvl6 + 1};
 /math nxtsep {$Lvl7 + 1};
 /math nxtoct {$Lvl8 + 1};
 /math expneedpri {$ExpLvl1 - $expunused};
 /math expneedsec {$ExpLvl2 - $expunused};
 /math expneedter {$ExpLvl3 - $expunused};
 /math expneedqua {$ExpLvl4 - $expunused};
 /math expneedqui {$ExpLvl5 - $expunused};
 /math expneedhex {$ExpLvl6 - $expunused};
 /math expneedsep {$ExpLvl7 - $expunused};
 /math expneedoct {$ExpLvl8 - $expunused};
}

/alias exp4 {
 /showme (Class) Unused Exp Needed / required;
 /if {$Lvl1 != 40} {/showme ($pri$nxtpri) - $expunused $expneedpri / $ExpLvl1};
 /if {$Lvl2 != 40} {/showme ($sec$nxtsec) - $expunused $expneedsec / $ExpLvl2};
 /if {$Lvl3 != 40} {/showme ($ter$nxtter) - $expunused $expneedter / $ExpLvl3};
 /if {$Lvl4 != 40} {/showme ($qua$nxtqua) - $expunused $expneedqua / $ExpLvl4};
 /if {$Lvl5 != 40} {/showme ($qui$nxtqui) - $expunused $expneedqui / $ExpLvl5};
 /if {$Lvl6 != 40} {/showme ($hex$nxthex) - $expunused $expneedhex / $ExpLvl6};
 /if {$Lvl7 != 40} {/showme ($sep$nxtsep) - $expunused $expneedsep / $ExpLvl7};
 /if {$Lvl8 != 40} {/showme ($oct$nxtoct) - $expunused $expneedoct / $ExpLvl8};
}
/alias exp2 {
 /showme (Class) Unused Exp Needed / required;
 /if {$Lvl1 != 20} {/showme ($pri$nxtpri) - $expunused $expneedpri / $ExpLvl1};
 /if {$Lvl2 != 20} {/showme ($sec$nxtsec) - $expunused $expneedsec / $ExpLvl2};
 /if {$Lvl3 != 20} {/showme ($ter$nxtter) - $expunused $expneedter / $ExpLvl3};
 /if {$Lvl4 != 20} {/showme ($qua$nxtqua) - $expunused $expneedqua / $ExpLvl4};
 /if {$Lvl5 != 20} {/showme ($qui$nxtqui) - $expunused $expneedqui / $ExpLvl5};
 /if {$Lvl6 != 20} {/showme ($hex$nxthex) - $expunused $expneedhex / $ExpLvl6};
 /if {$Lvl7 != 20} {/showme ($sep$nxtsep) - $expunused $expneedsep / $ExpLvl7};
 /if {$Lvl8 != 20} {/showme ($oct$nxtoct) - $expunused $expneedoct / $ExpLvl8};
}

/NOP PRIME EXPERIENCE

/alias check1 {

/if {$Lvl1 == 1}{/var ExpLvl1 {2000}};

/if {$Lvl1 == 2}{/var ExpLvl1 {4000}};

/if {$Lvl1 == 3}{/var ExpLvl1 {9000}};

/if {$Lvl1 == 4}{/var ExpLvl1 {15000}};

/if {$Lvl1 == 5}{/var ExpLvl1 {20000}};

/if {$Lvl1 == 6}{/var ExpLvl1 {30000}};

/if {$Lvl1 == 7}{/var ExpLvl1 {40000}};

/if {$Lvl1 == 8}{/var ExpLvl1 {80000}};

/if {$Lvl1 == 9}{/var ExpLvl1 {120000}};

/if {$Lvl1 == 10}{/var ExpLvl1 {150000}};

/if {$Lvl1 == 11}{/var ExpLvl1 {200000}};

/if {$Lvl1 == 12}{/var ExpLvl1 {250000}};

/if {$Lvl1 == 13}{/var ExpLvl1 {300000}};

/if {$Lvl1 == 14}{/var ExpLvl1 {400000}};

/if {$Lvl1 == 15}{/var ExpLvl1 {450000}};

/if {$Lvl1 == 16}{/var ExpLvl1 {500000}};

/if {$Lvl1 == 17}{/var ExpLvl1 {550000}};

/if {$Lvl1 == 18}{/var ExpLvl1 {600000}};

/if {$Lvl1 == 19}{/var ExpLvl1 {700000}};

/if {$Lvl1 == 20}{/var ExpLvl1 {800000}};

/if {$Lvl1 == 21}{/var ExpLvl1 {1000000}};

/if {$Lvl1 == 22}{/var ExpLvl1 {1500000}};

/if {$Lvl1 == 23}{/var ExpLvl1 {2000000}};

/if {$Lvl1 == 24}{/var ExpLvl1 {2500000}};

/if {$Lvl1 == 25}{/var ExpLvl1 {3500000}};

/if {$Lvl1 == 26}{/var ExpLvl1 {4700000}};

/if {$Lvl1 == 27}{/var ExpLvl1 {6000000}};

/if {$Lvl1 == 28}{/var ExpLvl1 {7300000}};

/if {$Lvl1 == 29}{/var ExpLvl1 {8600000}};

/if {$Lvl1 == 30}{/var ExpLvl1 {9900000}};

/if {$Lvl1 == 31}{/var ExpLvl1 {11000000}};

/if {$Lvl1 == 32}{/var ExpLvl1 {13000000}};

/if {$Lvl1 == 33}{/var ExpLvl1 {15000000}};

/if {$Lvl1 == 34}{/var ExpLvl1 {18300000}};

/if {$Lvl1 == 35}{/var ExpLvl1 {21500000}};

/if {$Lvl1 == 36}{/var ExpLvl1 {25000000}};

/if {$Lvl1 == 37}{/var ExpLvl1 {30000000}};

/if {$Lvl1 == 38}{/var ExpLvl1 {35000000}};

/if {$Lvl1 == 39}{/var ExpLvl1 {40000000}};

/if {$Lvl1 == 40}{/var ExpLvl1 {0}}

}

/NOP SECONDARY EXPERIENCE

/alias check2 {

/if {$Lvl2 == 0}{/var ExpLvl2 {4000}};

/if {$Lvl2 == 1}{/var ExpLvl2 {8000}};

/if {$Lvl2 == 2}{/var ExpLvl2 {16000}};

/if {$Lvl2 == 3}{/var ExpLvl2 {32000}};

/if {$Lvl2 == 4}{/var ExpLvl2 {45000}};

/if {$Lvl2 == 5}{/var ExpLvl2 {70000}};

/if {$Lvl2 == 6}{/var ExpLvl2 {100000}};

/if {$Lvl2 == 7}{/var ExpLvl2 {140000}};

/if {$Lvl2 == 8}{/var ExpLvl2 {280000}};

/if {$Lvl2 == 9}{/var ExpLvl2 {360000}};

/if {$Lvl2 == 10}{/var ExpLvl2 {550000}};

/if {$Lvl2 == 11}{/var ExpLvl2 {800000}};

/if {$Lvl2 == 12}{/var ExpLvl2 {1000000}};

/if {$Lvl2 == 13}{/var ExpLvl2 {1200000}};

/if {$Lvl2 == 14}{/var ExpLvl2 {1600000}};

/if {$Lvl2 == 15}{/var ExpLvl2 {1800000}};

/if {$Lvl2 == 16}{/var ExpLvl2 {2000000}};

/if {$Lvl2 == 17}{/var ExpLvl2 {2200000}};

/if {$Lvl2 == 18}{/var ExpLvl2 {2400000}};

/if {$Lvl2 == 19}{/var ExpLvl2 {2800000}};

/if {$Lvl2 == 20}{/var ExpLvl2 {3200000}};

/if {$Lvl2 == 21}{/var ExpLvl2 {4000000}};

/if {$Lvl2 == 22}{/var ExpLvl2 {6000000}};

/if {$Lvl2 == 23}{/var ExpLvl2 {8000000}};

/if {$Lvl2 == 24}{/var ExpLvl2 {10000000}};

/if {$Lvl2 == 25}{/var ExpLvl2 {12000000}};

/if {$Lvl2 == 26}{/var ExpLvl2 {14800000}};

/if {$Lvl2 == 27}{/var ExpLvl2 {18000000}};

/if {$Lvl2 == 28}{/var ExpLvl2 {21000000}};

/if {$Lvl2 == 29}{/var ExpLvl2 {28000000}};

/if {$Lvl2 == 30}{/var ExpLvl2 {32000000}};

/if {$Lvl2 == 31}{/var ExpLvl2 {36000000}};

/if {$Lvl2 == 32}{/var ExpLvl2 {39000000}};

/if {$Lvl2 == 33}{/var ExpLvl2 {45000000}};

/if {$Lvl2 == 34}{/var ExpLvl2 {50800000}};

/if {$Lvl2 == 35}{/var ExpLvl2 {60500000}};

/if {$Lvl2 == 36}{/var ExpLvl2 {65000000}};

/if {$Lvl2 == 37}{/var ExpLvl2 {70000000}};

/if {$Lvl2 == 38}{/var ExpLvl2 {85000000}};

/if {$Lvl2 == 39}{/var ExpLvl2 {90000000}};

/if {$Lvl2 == 40}{/var ExpLvl2 {0}}

}

/NOP TERTIARY EXPERIENCE

/alias check3 {

/if {$Lvl3 == 0}{/var ExpLvl3 {12000}};

/if {$Lvl3 == 1}{/var ExpLvl3 {24000}};

/if {$Lvl3 == 2}{/var ExpLvl3 {48000}};

/if {$Lvl3 == 3}{/var ExpLvl3 {96000}};

/if {$Lvl3 == 4}{/var ExpLvl3 {135000}};

/if {$Lvl3 == 5}{/var ExpLvl3 {210000}};

/if {$Lvl3 == 6}{/var ExpLvl3 {300000}};

/if {$Lvl3 == 7}{/var ExpLvl3 {420000}};

/if {$Lvl3 == 8}{/var ExpLvl3 {840000}};

/if {$Lvl3 == 9}{/var ExpLvl3 {1080000}};

/if {$Lvl3 == 10}{/var ExpLvl3 {1650000}};

/if {$Lvl3 == 11}{/var ExpLvl3 {2400000}};

/if {$Lvl3 == 12}{/var ExpLvl3 {3000000}};

/if {$Lvl3 == 13}{/var ExpLvl3 {3600000}};

/if {$Lvl3 == 14}{/var ExpLvl3 {4800000}};

/if {$Lvl3 == 15}{/var ExpLvl3 {5400000}};

/if {$Lvl3 == 16}{/var ExpLvl3 {6000000}};

/if {$Lvl3 == 17}{/var ExpLvl3 {6600000}};

/if {$Lvl3 == 18}{/var ExpLvl3 {7200000}};

/if {$Lvl3 == 19}{/var ExpLvl3 {8400000}};

/if {$Lvl3 == 20}{/var ExpLvl3 {9600000}};

/if {$Lvl3 == 21}{/var ExpLvl3 {12000000}};

/if {$Lvl3 == 22}{/var ExpLvl3 {18000000}};

/if {$Lvl3 == 23}{/var ExpLvl3 {24000000}};

/if {$Lvl3 == 24}{/var ExpLvl3 {30000000}};

/if {$Lvl3 == 25}{/var ExpLvl3 {36000000}};

/if {$Lvl3 == 26}{/var ExpLvl3 {44400000}};

/if {$Lvl3 == 27}{/var ExpLvl3 {54000000}};

/if {$Lvl3 == 28}{/var ExpLvl3 {63000000}};

/if {$Lvl3 == 29}{/var ExpLvl3 {84000000}};

/if {$Lvl3 == 30}{/var ExpLvl3 {96000000}};

/if {$Lvl3 == 31}{/var ExpLvl3 {108000000}};

/if {$Lvl3 == 32}{/var ExpLvl3 {117000000}};

/if {$Lvl3 == 33}{/var ExpLvl3 {135000000}};

/if {$Lvl3 == 34}{/var ExpLvl3 {152400000}};

/if {$Lvl3 == 35}{/var ExpLvl3 {181500000}};

/if {$Lvl3 == 36}{/var ExpLvl3 {195000000}};

/if {$Lvl3 == 37}{/var ExpLvl3 {210000000}};

/if {$Lvl3 == 38}{/var ExpLvl3 {255000000}};

/if {$Lvl3 == 39}{/var ExpLvl3 {270000000}};

/if {$Lvl3 == 40}{/var ExpLvl3 {0}}

}

/NOP QUAD EXPERIENCE

/alias check4 {

/if {$Lvl4 == 0}{/var ExpLvl4 {40000}};

/if {$Lvl4 == 1}{/var ExpLvl4 {80000}};

/if {$Lvl4 == 2}{/var ExpLvl4 {160000}};

/if {$Lvl4 == 3}{/var ExpLvl4 {320000}};

/if {$Lvl4 == 4}{/var ExpLvl4 {450000}};

/if {$Lvl4 == 5}{/var ExpLvl4 {700000}};

/if {$Lvl4 == 6}{/var ExpLvl4 {1000000}};

/if {$Lvl4 == 7}{/var ExpLvl4 {1400000}};

/if {$Lvl4 == 8}{/var ExpLvl4 {2800000}};

/if {$Lvl4 == 9}{/var ExpLvl4 {3600000}};

/if {$Lvl4 == 10}{/var ExpLvl4 {5500000}};

/if {$Lvl4 == 11}{/var ExpLvl4 {8000000}};

/if {$Lvl4 == 12}{/var ExpLvl4 {10000000}};

/if {$Lvl4 == 13}{/var ExpLvl4 {12000000}};

/if {$Lvl4 == 14}{/var ExpLvl4 {16000000}};

/if {$Lvl4 == 15}{/var ExpLvl4 {18000000}};

/if {$Lvl4 == 16}{/var ExpLvl4 {20000000}};

/if {$Lvl4 == 17}{/var ExpLvl4 {22000000}};

/if {$Lvl4 == 18}{/var ExpLvl4 {24000000}};

/if {$Lvl4 == 19}{/var ExpLvl4 {28000000}};

/if {$Lvl4 == 20}{/var ExpLvl4 {32000000}};

/if {$Lvl4 == 21}{/var ExpLvl4 {40000000}};

/if {$Lvl4 == 22}{/var ExpLvl4 {60000000}};

/if {$Lvl4 == 23}{/var ExpLvl4 {80000000}};

/if {$Lvl4 == 24}{/var ExpLvl4 {100000000}};

/if {$Lvl4 == 25}{/var ExpLvl4 {120000000}};

/if {$Lvl4 == 26}{/var ExpLvl4 {148000000}};

/if {$Lvl4 == 27}{/var ExpLvl4 {180000000}};

/if {$Lvl4 == 28}{/var ExpLvl4 {210000000}};

/if {$Lvl4 == 29}{/var ExpLvl4 {280000000}};

/if {$Lvl4 == 30}{/var ExpLvl4 {320000000}};

/if {$Lvl4 == 31}{/var ExpLvl4 {360000000}};

/if {$Lvl4 == 32}{/var ExpLvl4 {390000000}};

/if {$Lvl4 == 33}{/var ExpLvl4 {450000000}};

/if {$Lvl4 == 34}{/var ExpLvl4 {508000000}};

/if {$Lvl4 == 35}{/var ExpLvl4 {605000000}};

/if {$Lvl4 == 36}{/var ExpLvl4 {650000000}};

/if {$Lvl4 == 37}{/var ExpLvl4 {700000000}};

/if {$Lvl4 == 38}{/var ExpLvl4 {850000000}};

/if {$Lvl4 == 39}{/var ExpLvl4 {900000000}};

/if {$Lvl4 == 40}{/var ExpLvl4 {0}}

}

/alias check5 {

/if {$Lvl5 == 0}{/var ExpLvl5 {80000}};

/if {$Lvl5 == 1}{/var ExpLvl5 {160000}};

/if {$Lvl5 == 2}{/var ExpLvl5 {320000}};

/if {$Lvl5 == 3}{/var ExpLvl5 {640000}};

/if {$Lvl5 == 4}{/var ExpLvl5 {900000}};

/if {$Lvl5 == 5}{/var ExpLvl5 {1400000}};

/if {$Lvl5 == 6}{/var ExpLvl5 {2000000}};

/if {$Lvl5 == 7}{/var ExpLvl5 {2800000}};

/if {$Lvl5 == 8}{/var ExpLvl5 {5600000}};

/if {$Lvl5 == 9}{/var ExpLvl5 {7200000}};

/if {$Lvl5 == 10}{/var ExpLvl5 {11000000}};

/if {$Lvl5 == 11}{/var ExpLvl5 {16000000}};

/if {$Lvl5 == 12}{/var ExpLvl5 {20000000}};

/if {$Lvl5 == 13}{/var ExpLvl5 {24000000}};

/if {$Lvl5 == 14}{/var ExpLvl5 {32000000}};

/if {$Lvl5 == 15}{/var ExpLvl5 {36000000}};

/if {$Lvl5 == 16}{/var ExpLvl5 {40000000}};

/if {$Lvl5 == 17}{/var ExpLvl5 {44000000}};

/if {$Lvl5 == 18}{/var ExpLvl5 {48000000}};

/if {$Lvl5 == 19}{/var ExpLvl5 {56000000}};

/if {$Lvl5 == 20}{/var ExpLvl5 {64000000}};

/if {$Lvl5 == 21}{/var ExpLvl5 {80000000}};

/if {$Lvl5 == 22}{/var ExpLvl5 {120000000}};

/if {$Lvl5 == 23}{/var ExpLvl5 {160000000}};

/if {$Lvl5 == 24}{/var ExpLvl5 {200000000}};

/if {$Lvl5 == 25}{/var ExpLvl5 {240000000}};

/if {$Lvl5 == 26}{/var ExpLvl5 {296000000}};

/if {$Lvl5 == 27}{/var ExpLvl5 {360000000}};

/if {$Lvl5 == 28}{/var ExpLvl5 {420000000}};

/if {$Lvl5 == 29}{/var ExpLvl5 {560000000}};

/if {$Lvl5 == 30}{/var ExpLvl5 {640000000}};

/if {$Lvl5 == 31}{/var ExpLvl5 {720000000}};

/if {$Lvl5 == 32}{/var ExpLvl5 {780000000}};

/if {$Lvl5 == 33}{/var ExpLvl5 {900000000}};

/if {$Lvl5 == 34}{/var ExpLvl5 {1016000000}};

/if {$Lvl5 == 35}{/var ExpLvl5 {1210000000}};

/if {$Lvl5 == 36}{/var ExpLvl5 {1300000000}};

/if {$Lvl5 == 37}{/var ExpLvl5 {1400000000}};

/if {$Lvl5 == 38}{/var ExpLvl5 {1700000000}};

/if {$Lvl5 == 39}{/var ExpLvl5 {1800000000}};

/if {$Lvl5 == 40}{/var ExpLvl5 {0}}

}

/alias check6 {

/if {$Lvl6 == 0}{/var ExpLvl6 {120000}};

/if {$Lvl6 == 1}{/var ExpLvl6 {240000}};

/if {$Lvl6 == 2}{/var ExpLvl6 {480000}};

/if {$Lvl6 == 3}{/var ExpLvl6 {960000}};

/if {$Lvl6 == 4}{/var ExpLvl6 {1350000}};

/if {$Lvl6 == 5}{/var ExpLvl6 {2100000}};

/if {$Lvl6 == 6}{/var ExpLvl6 {3000000}};

/if {$Lvl6 == 7}{/var ExpLvl6 {4200000}};

/if {$Lvl6 == 8}{/var ExpLvl6 {8400000}};

/if {$Lvl6 == 9}{/var ExpLvl6 {10800000}};

/if {$Lvl6 == 10}{/var ExpLvl6 {16500000}};

/if {$Lvl6 == 11}{/var ExpLvl6 {24000000}};

/if {$Lvl6 == 12}{/var ExpLvl6 {30000000}};

/if {$Lvl6 == 13}{/var ExpLvl6 {36000000}};

/if {$Lvl6 == 14}{/var ExpLvl6 {48000000}};

/if {$Lvl6 == 15}{/var ExpLvl6 {54000000}};

/if {$Lvl6 == 16}{/var ExpLvl6 {60000000}};

/if {$Lvl6 == 17}{/var ExpLvl6 {66000000}};

/if {$Lvl6 == 18}{/var ExpLvl6 {72000000}};

/if {$Lvl6 == 19}{/var ExpLvl6 {84000000}};

/if {$Lvl6 == 20}{/var ExpLvl6 {96000000}};

/if {$Lvl6 == 21}{/var ExpLvl6 {120000000}};

/if {$Lvl6 == 22}{/var ExpLvl6 {180000000}};

/if {$Lvl6 == 23}{/var ExpLvl6 {240000000}};

/if {$Lvl6 == 24}{/var ExpLvl6 {300000000}};

/if {$Lvl6 == 25}{/var ExpLvl6 {360000000}};

/if {$Lvl6 == 26}{/var ExpLvl6 {444000000}};

/if {$Lvl6 == 27}{/var ExpLvl6 {540000000}};

/if {$Lvl6 == 28}{/var ExpLvl6 {630000000}};

/if {$Lvl6 == 29}{/var ExpLvl6 {840000000}};

/if {$Lvl6 == 30}{/var ExpLvl6 {960000000}};

/if {$Lvl6 == 31}{/var ExpLvl6 {1080000000}};

/if {$Lvl6 == 32}{/var ExpLvl6 {1170000000}};

/if {$Lvl6 == 33}{/var ExpLvl6 {1350000000}};

/if {$Lvl6 == 34}{/var ExpLvl6 {1524000000}};

/if {$Lvl6 == 35}{/var ExpLvl6 {1815000000}};

/if {$Lvl6 == 36}{/var ExpLvl6 {1950000000}};

/if {$Lvl6 == 37}{/var ExpLvl6 {2100000000}};

/if {$Lvl6 == 38}{/var ExpLvl6 {2550000000}};

/if {$Lvl6 == 39}{/var ExpLvl6 {2700000000}};

/if {$Lvl6 == 40}{/var ExpLvl6 {0}}

}

/alias check7 {

/if {$Lvl7 == 0}{/var ExpLvl7 {240000}};

/if {$Lvl7 == 1}{/var ExpLvl7 {480000}};

/if {$Lvl7 == 2}{/var ExpLvl7 {960000}};

/if {$Lvl7 == 3}{/var ExpLvl7 {1920000}};

/if {$Lvl7 == 4}{/var ExpLvl7 {2700000}};

/if {$Lvl7 == 5}{/var ExpLvl7 {4200000}};

/if {$Lvl7 == 6}{/var ExpLvl7 {6000000}};

/if {$Lvl7 == 7}{/var ExpLvl7 {8400000}};

/if {$Lvl7 == 8}{/var ExpLvl7 {16800000}};

/if {$Lvl7 == 9}{/var ExpLvl7 {21600000}};

/if {$Lvl7 == 10}{/var ExpLvl7 {33000000}};

/if {$Lvl7 == 11}{/var ExpLvl7 {48000000}};

/if {$Lvl7 == 12}{/var ExpLvl7 {60000000}};

/if {$Lvl7 == 13}{/var ExpLvl7 {72000000}};

/if {$Lvl7 == 14}{/var ExpLvl7 {96000000}};

/if {$Lvl7 == 15}{/var ExpLvl7 {108000000}};

/if {$Lvl7 == 16}{/var ExpLvl7 {120000000}};

/if {$Lvl7 == 17}{/var ExpLvl7 {132000000}};

/if {$Lvl7 == 18}{/var ExpLvl7 {144000000}};

/if {$Lvl7 == 19}{/var ExpLvl7 {168000000}};

/if {$Lvl7 == 20}{/var ExpLvl7 {192000000}};

/if {$Lvl7 == 21}{/var ExpLvl7 {240000000}};

/if {$Lvl7 == 22}{/var ExpLvl7 {360000000}};

/if {$Lvl7 == 23}{/var ExpLvl7 {480000000}};

/if {$Lvl7 == 24}{/var ExpLvl7 {600000000}};

/if {$Lvl7 == 25}{/var ExpLvl7 {720000000}};

/if {$Lvl7 == 26}{/var ExpLvl7 {888000000}};

/if {$Lvl7 == 27}{/var ExpLvl7 {1080000000}};

/if {$Lvl7 == 28}{/var ExpLvl7 {1260000000}};

/if {$Lvl7 == 39}{/var ExpLvl7 {1680000000}};

/if {$Lvl7 == 30}{/var ExpLvl7 {1920000000}};

/if {$Lvl7 == 31}{/var ExpLvl7 {2160000000}};

/if {$Lvl7 == 32}{/var ExpLvl7 {2340000000}};

/if {$Lvl7 == 33}{/var ExpLvl7 {2700000000}};

/if {$Lvl7 == 34}{/var ExpLvl7 {3048000000}};

/if {$Lvl7 == 35}{/var ExpLvl7 {3630000000}};

/if {$Lvl7 == 36}{/var ExpLvl7 {3900000000}};

/if {$Lvl7 == 37}{/var ExpLvl7 {4200000000}};

/if {$Lvl7 == 38}{/var ExpLvl7 {5100000000}};

/if {$Lvl7 == 39}{/var ExpLvl7 {5400000000}};

/if {$Lvl7 == 40}{/var ExpLvl7 {0}}

}

/alias check8 {

/if {$Lvl8 == 0}{/var ExpLvl8 {320000}};

/if {$Lvl8 == 1}{/var ExpLvl8 {640000}};

/if {$Lvl8 == 2}{/var ExpLvl8 {1280000}};

/if {$Lvl8 == 3}{/var ExpLvl8 {2560000}};

/if {$Lvl8 == 4}{/var ExpLvl8 {3600000}};

/if {$Lvl8 == 5}{/var ExpLvl8 {5600000}};

/if {$Lvl8 == 6}{/var ExpLvl8 {8000000}};

/if {$Lvl8 == 7}{/var ExpLvl8 {11200000}};

/if {$Lvl8 == 8}{/var ExpLvl8 {22400000}};

/if {$Lvl8 == 9}{/var ExpLvl8 {28800000}};

/if {$Lvl8 == 10}{/var ExpLvl8 {44000000}};

/if {$Lvl8 == 11}{/var ExpLvl8 {64000000}};

/if {$Lvl8 == 12}{/var ExpLvl8 {80000000}};

/if {$Lvl8 == 13}{/var ExpLvl8 {96000000}};

/if {$Lvl8 == 14}{/var ExpLvl8 {128000000}};

/if {$Lvl8 == 15}{/var ExpLvl8 {144000000}};

/if {$Lvl8 == 16}{/var ExpLvl8 {160000000}};

/if {$Lvl8 == 17}{/var ExpLvl8 {176000000}};

/if {$Lvl8 == 18}{/var ExpLvl8 {192000000}};

/if {$Lvl8 == 19}{/var ExpLvl8 {224000000}};

/if {$Lvl8 == 20}{/var ExpLvl8 {256000000}};

/if {$Lvl8 == 21}{/var ExpLvl8 {320000000}};

/if {$Lvl8 == 22}{/var ExpLvl8 {480000000}};

/if {$Lvl8 == 23}{/var ExpLvl8 {640000000}};

/if {$Lvl8 == 24}{/var ExpLvl8 {800000000}};

/if {$Lvl8 == 25}{/var ExpLvl8 {960000000}};

/if {$Lvl8 == 26}{/var ExpLvl8 {1184000000}};

/if {$Lvl8 == 27}{/var ExpLvl8 {1440000000}};

/if {$Lvl8 == 28}{/var ExpLvl8 {1680000000}};

/if {$Lvl8 == 29}{/var ExpLvl8 {2240000000}};

/if {$Lvl8 == 30}{/var ExpLvl8 {2560000000}};

/if {$Lvl8 == 31}{/var ExpLvl8 {2880000000}};

/if {$Lvl8 == 32}{/var ExpLvl8 {3120000000}};

/if {$Lvl8 == 33}{/var ExpLvl8 {3600000000}};

/if {$Lvl8 == 34}{/var ExpLvl8 {4064000000}};

/if {$Lvl8 == 35}{/var ExpLvl8 {4840000000}};

/if {$Lvl8 == 36}{/var ExpLvl8 {5200000000}};

/if {$Lvl8 == 37}{/var ExpLvl8 {5600000000}};

/if {$Lvl8 == 38}{/var ExpLvl8 {6800000000}};

/if {$Lvl8 == 39}{/var ExpLvl8 {7200000000}};

/if {$Lvl8 == 40}{/var ExpLvl8 {0}}

}

[/code:2hsdm60t]

Tinyfugue combat spam compactor

Fri, 27 Nov 2009 14:41:56 +0000

[code:3jzqlsio]******

a fat merchant: 1 miss 3 very 1 fragments – 17 damage

you: 3 miss – 0 damage

a pregnant teacher: 4 miss 1 tickle 6 hard 6 very 5 extremely – 51 damage

Skyv: 1 fragments – 8 damage

Rogue: 1 brutal 1 fragments – 14 damage

a male red dragon: 1 hard 1 critical – 11 damage

Combat Report: 2 miss (28%) 1 hard (14%) 3 very (42%) 1 fragments (14%) – 19 damage

Circlestab: 1 circle (100%) 1 hilt (100%)

[/code:3jzqlsio]

Damage calculations are completely off, I used made-up numbers until I find the actual damage per message - however it’s as trivial as setting the values near the top of the file.

http://welp.gs/~harik/sloth/ combat.tf

If anyone still uses the ‘fugue, let me know if this works for you.

(Obviously dragons and teachers are in different zones! I just cut&pasted combat messages from my logfile for testing purposes.)

need a little help

Fri, 28 Aug 2009 02:56:17 +0000

i run cmud and need help makeing an autostaber and joining warcry thanks for any help that can be given

find me online

NEED ADMIN HELP

Fri, 04 Apr 2008 17:19:58 +0000

okay i have come across a difficult problem ….the school computer have been blocking alot of things lately in my area this include websites,downloading,and even email i have bypass most of that but it seems i am unable to connect to slothmud possibly because of the blocking and i never played this before ill really appreciate it if someone can help me bypass this problem…. :?: :?: :?: :? :? :roll:

note i have been useing telnet :!:

Telnet / SSH

Tue, 06 Nov 2007 13:26:16 +0000

I have a new internet tablet device which is great for me as I travel a lot, its a Nokia N800, web browsing and internet connectivity is great, however it dosen’t have telnet on it.

This means I’d have to either take my laptop instead which I was hoping this would mean I could avoid, or I can’t use to play sloth when e.g. bored on a long train journey.

I can’t find a way to install a telnet client on it without (a) a linux box available and (b) a ot more understanding of how linux works.

I have managed to install an ssh client, but am floudering as to whether this can be used to connect to sloth.

Can anyone enlighten me as to whether this is possible or come up with a suggestion?

Thraxas

Damage Done Script

Sun, 18 Feb 2007 22:46:50 +0000

Up front I’ll say I found creating this more fun than the product will be useful.

No one seems to have posted many scripts for a while so I thought I would.

This is a little bit of scripting that I’ve created and works nicely to whine the actual and exact damage you do in each round of combat

It will accurately calculate the damage done by any anything you do that you get xp for

This includes weapon damage, spell damage, proc damage, chop damage, kicks, bashes, broadsides, flails, deathblows etc.

This does not include damage done by pets

This is inaccurate in last round of battle when mob may not have all the hp to lose that you damage does.

The basis of this script is that xp gained from damage done = mob level * actual damage done

Therefore you need to know mob level, this script works out this calc for all levels and sees which levels show damage as a whole number.

if a decimal is found on the damage done, this level is deemed wrong and discarded for the calcs in the next round, thereby it will iteratively work out the mobs level during combat.

Note: If a mob is level 40 then all whole divisors of 40 (20 10 8 5 4 2 1) could also be right to this method, for this reason I limit the script to looking at mob levels 20+

I’ve used it sucessfully in my client (AL Client) the bare bones are below and should be enough for you to reconstruct, they rely on you having your current xp in your prompt.

The effect is a whine somthing like:

Damage Report: [20]: 14 [30] 21

where the 20 and 30 are the possible levels the mob could be, this normally starts in round one at 3-5 levels after 3 rounds is reduced down to one, the mobs actual level. (the 14 and 21 are the damage done)

Let me know if you find useful or any additions I could make to it.

Thraxas

alias (triggered at start of fight) _fightstart:

#if (autodam = 1) {_gainreset}

Note: I have a load of other stuff in _fightstart this is only pertinent bit, autodam is a toggle variable to switch whole process on and off.

alias _gainreset:

#set gd[20] = 1;

#set gd[21] = 1;

… etc …

#set gd[44] = 1;

#set gd[45] = 1

Note: I’d love to use a for loop here but my client dosen’t support them

alias (triggered at prompt) _gainprom:

#set myxpprom = (myxp - myxplast)/1;

Note: myxpprom is xp gain between this and last prompt, myxp is xp shown in prompt this round, myxplast is xp from prompt in previous round

#if (autodam = 1)

{#set gdrep Damage Report: ;

#if (myxp > myxplast)

{#if (gd[20] = 1) {_gaindam myxplast myxp 20};

#if (gd[21] = 1) {_gaindam myxplast myxp 21};

… etc …

#if (gd[44] = 1) {_gaindam myxplast myxp 44};

#if (gd[45] = 1) {_gaindam myxplast myxp 45};

};

#print $gdrep$

}

alias _gaindam:

#set num1 = %1;

#set num2 = %2;

#set lvl1 = %3;

#set dnum = num2 - num1;

#set dnumdiv = dnum / lvl1;

#set dnummul = dnumdiv * lvl1;

#set ddnum = dnum - dnummul;

#if (ddnum > 0) {#set gd[%3] = 0};

#else {

#set ddam = dnumdiv;

#strcat(gdrep," [");

#strcat(gdrep,lvl1);

#strcat(gdrep,"]: “);

#strcat(gdrep,ddam)

}

Additional Notes:

#strcat is a string concatenation function to build a string up with text variables
#print sends a string to my client as though its come from the mud
#set and #unset are to set variable values
#if #else well if you don’t know I ain’t going to teach you in this post

all other stuff here is standard stuff I think

Script Triggers

Wed, 08 Nov 2006 10:49:39 +0000

I have some good group scripts, for tank whining, rescue on sing, autoprotecting over a dead protectee, rescuing a stabber, taking over as tank if I’m 2.tank and tank dies, a toggled mob condition reporter (inc spells that take effect), rescue on mob engages.

If anyone would like me to post any of these on here please let me know (while the mud is down is a good time)

The things I’m missing are:

A good script for dealing with grippers (I currently have a bad one mainly as I’ve never played monk and don’t really know how gripping works or what it does)

A good script for rescuing a damner if they initiate the battle.

Elsie

Potion Type Helper

Wed, 12 Jul 2006 21:17:57 +0000

It should not be hard to convert this to a script that is usable by other clients, I have written it for tt++.

used to see: yellow potion

now see: yellow potion (detect invisibility)

[code:3l54d76q]/sub {acrid orange potion} {<829>acrid orange potion (imbuewith 3x flamestrike)<899>}

/sub {amethyst potion} {<829>amethyst potion (infravision / detect invis / sense life)<899>}

/sub {aquamarine potion.} {<829>aquamarine potion. (cure minor)<899>}

/sub {black potion with a red glowing center} {<829>black potion with a red glowing center (dispel magic)<899>}

/sub {blood red potion} {<829>blood red potion (level 30 refresh)<899>}

/sub {blue-green potion} {<829>blue-green potion (level 25 cure serious)<899>}

/sub {bright blue potion} {<829>bright blue potion (lvl 40 greater heal)<899>}

/sub {bright orange potion} {<829>bright orange potion (+6 to dam for 10 hrs.)<899>}

/sub {bright red potion} {<829>bright red potion (l15 cure critic)<899>}

/sub {brown misty potion {succor}} {<829>brown misty potion {succor} (regeneration (level 40))<899>}

/sub {bubbling green potion} {<829>bubbling green potion (cure critic/invis/phase door)<899>}

/sub {bubbling maroon potion} {<829>bubbling maroon potion (armor)<899>}

/sub {bubbling maroon potion} {<829>bubbling maroon potion (level 15 armor)<899>}

/sub {bubbling violet potion } {<829>bubbling violet potion (lvl 40 knock)<899>}

/sub {cerise potion} {<829>cerise potion (armor/cure light)<899>}

/sub {chartreuse potion} {<829>chartreuse potion (l40 remove disaese)<899>}

/sub {chilled black potion} {<829>chilled black potion (telepathy)<899>}

/sub {chocolate potion} {<829>chocolate potion (invisibility, remove poison, remove curse)<899>}

/sub {churning orange potion} {<829>churning orange potion (imbue 3x lvl 40 disintegrate)<899>}

/sub {clear blue potion} {<829>clear blue potion (fly, water breathing, refresh)<899>}

/sub {clear potion} {<829>clear potion (cast vision 7 x as lv 25)<899>}

/sub {clear potion with a lot of dirt sediment} {<829>clear potion with a lot of dirt sediment (stone skin)<899>}

/sub {clear white potion} {<829>clear white potion (dispel/stone skin/sanc)<899>}

/sub {cloudy purple potion} {<829>cloudy purple potion (level 15 str)<899>}

/sub {cloudy red potion} {<829>cloudy red potion (level 35 stone skin)<899>}

/sub {cold blue potion} {<829>cold blue potion (+40 mana for 1 hr)<899>}

/sub {creamy pink potion} {<829>creamy pink potion (lvl 25 mindbar x1)<899>}

/sub {dark yellow potion} {<829>dark yellow potion (5x magic missile (lvl15))<899>}

/sub {deep blue potion} {<829>deep blue potion (regeneration/refresh/cure serious)<899>}

/sub {deep purple potion} {<829>deep purple potion (str (level 35))<899>}

/sub {dull copper potion} {<829>dull copper potion (+5 to hit, 10 hours)<899>}

/sub {dull gold potion} {<829>dull gold potion (lvl 12 cure light)<899>}

/sub {dull gold potion} {<829>dull gold potion ()<899>}

/sub {dull gold potion} {<829>dull gold potion (+5 to hit for 10 hrs)<899>}

/sub {dull gray potion} {<829>dull gray potion (lloyds beacon x2 at level 35)<899>}

/sub {effervescent potion} {<829>effervescent potion (det. evil/det. invisible/det. magic)<899>}

/sub {fizzy ochre potion} {<829>fizzy ochre potion (imbue l40 magic missile x30)<899>}

/sub {flecked gold potion } {<829>flecked gold potion (bless, strength, stone skin)<899>}

/sub {frothy violet potion} {<829>frothy violet potion (lvl 40 corona x1)<899>}

/sub {frothy violet potion} {<829>frothy violet potion (corona)<899>}

/sub {glimmering green potion} {<829>glimmering green potion (greater heal x3)<899>}

/sub {glowing golden potion} {<829>glowing golden potion (lvl 45 talshans tribute)<899>}

/sub {grainy black potion} {<829>grainy black potion (level 35 teleport)<899>}

/sub {green potion} {<829>green potion (teleport)<899>}

/sub {green potion} {<829>green potion (blindness & teleport & cure blind)<899>}

/sub {hissing blue potion} {<829>hissing blue potion (+20 mana for 1 hour)<899>}

/sub {matte-black potion} {<829>matte-black potion (word of recall/heal)<899>}

/sub {metallic red potion} {<829>metallic red potion (iron skin)<899>}

/sub {midnight blue potion} {<829>midnight blue potion (cure normal (1x))<899>}

/sub {milky lavender potion} {<829>milky lavender potion (l35 perception)<899>}

/sub {milky white potion} {<829>milky white potion ()<899>}

/sub {milky white potion} {<829>milky white potion (word of recall)<899>}

/sub {moldy orange potion} {<829>moldy orange potion (+3 damage for 10 hrs)<899>}

/sub {moldy orange potion} {<829>moldy orange potion (+3 dam for 10 hours)<899>}

/sub {navy blue potion} {<829>navy blue potion (cure light)<899>}

/sub {olive potion} {<829>olive potion (dispel evil/ curse/ heal)<899>}

/sub {orange potion} {<829>orange potion ()<899>}

/sub {orange potion} {<829>orange potion (3x strength)<899>}

/sub {pale purple potion} {<829>pale purple potion (lvl 25 water breathing)<899>}

/sub {pale rose potion} {<829>pale rose potion (resist fire/resist cold)<899>}

/sub {pale violet potion} {<829>pale violet potion (infravision)<899>}

/sub {pale violet potion} {<829>pale violet potion (level 15 infravision)<899>}

/sub {pearlescent potion} {<829>pearlescent potion (lvl 44 grace)<899>}

/sub {potion crackling with magical energy} {<829>potion crackling with magical energy (resistance to all spells targeting the user)<899>}

/sub {potion of accuracy} {<829>potion of accuracy (+5 to hit)<899>}

/sub {potion of desperation} {<829>potion of desperation (recall)<899>}

/sub {potion of destruction} {<829>potion of destruction (bless, +3 damage)<899>}

/sub {potion of endurance} {<829>potion of endurance (vitality)<899>}

/sub {potion of flames} {<829>potion of flames (3 casts of hellfire)<899>}

/sub {potion of insight} {<829>potion of insight (det invis lvl 12)<899>}

/sub {potion of knitting} {<829>potion of knitting (?)<899>}

/sub {potion of legendary memory} {<829>potion of legendary memory (bestows lloyd’s beacon 6 times)<899>}

/sub {potion of lesser sanctuary} {<829>potion of lesser sanctuary (sanctuary)<899>}

/sub {potion of pure darkness} {<829>potion of pure darkness (dark cloak)<899>}

/sub {potion of refreshment} {<829>potion of refreshment (refresh x2)<899>}

/sub {potion of speed} {<829>potion of speed (quicken)<899>}

/sub {potion of stones} {<829>potion of stones (lvl 43 dispel fly)<899>}

/sub {potion of the essence of a mind flayer} {<829>potion of the essence of a mind flayer (aptitude)<899>}

/sub {potion of wispy prayers} {<829>potion of wispy prayers (insight)<899>}

/sub {potion of youth} {<829>potion of youth (subtracts from age)<899>}

/sub {pungent indigo potion} {<829>pungent indigo potion (fly)<899>}

/sub {purple potion} {<829>purple potion (cure poison)<899>}

/sub {radiant white potion} {<829>radiant white potion (imbue with 1x raise dead lvl 40)<899>}

/sub {red orange potion} {<829>red orange potion ( -100 ac for 3 ticks)<899>}

/sub {red potion} {<829>red potion (armor)<899>}

/sub {roiling blue potion} {<829>roiling blue potion (lvl 25 regenatation x1 )<899>}

/sub {ruby red potion} {<829>ruby red potion (lvl 35 sanctuary x1)<899>}

/sub {russet potion} {<829>russet potion (+0 to immune_magic for 5 hrs)<899>}

/sub {rusty red potion} {<829>rusty red potion (apply 0 bonus to immune magic for 10 hrs.)<899>}

/sub {sea-green potion} {<829>sea-green potion (remove disease/remove poison)<899>}

/sub {shiny golden potion} {<829>shiny golden potion (+20 to hit for 10 hours)<899>}

/sub {shiny golden potion} {<829>shiny golden potion (apply a bonus of 20 to the drinker’s hitroll for 10 hours.)<899>}

/sub {silver potion} {<829>silver potion (call lightning/cure critic)<899>}

/sub {sizzling yellow potion} {<829>sizzling yellow potion (8x lightning bolt (imbued))<899>}

/sub {slate-grey potion} {<829>slate-grey potion (l25 word of recall)<899>}

/sub {sloshing blue potion} {<829>sloshing blue potion (adds 150 mana for 1 hour)<899>}

/sub {smoky green potion} {<829>smoky green potion (remove poison)<899>}

/sub {sparking yellow potion} {<829>sparking yellow potion (lvl 25 call lightning x3)<899>}

/sub {sparkling blue potion} {<829>sparkling blue potion (restores 35 mana )<899>}

/sub {steaming black potion} {<829>steaming black potion (4x demon bind, level 35)<899>}

/sub {translucent purple potion} {<829>translucent purple potion (level 25 detect invis.)<899>}

/sub {turquoise potion} {<829>turquoise potion (level 40 cure plague)<899>}

/sub {vaporous white potion} {<829>vaporous white potion (3x level 20 cure critic)<899>}

/sub {viscous purple potion} {<829>viscous purple potion (strength)<899>}

/sub {warm coral potion} {<829>warm coral potion (lev 40 resist webs)<899>}

/sub {yellow potion} {<829>yellow potion (detect invisibility)<899>}[/code:3l54d76q]

AL Client

Wed, 02 Nov 2005 09:47:17 +0000

Does anyone else here use AL Client?

I use it because its got a good programming interface, all the normal features you’d expect, (multi-windows, aliasing, triggers/actions, delays, hotkey control, stats reporting) but mostly because its completely free.

I have some decent scripts to share if anyone else does

Everyone here uses Zmud or wintin pretty much.

I would recommend wintin since it was written for Sloth

for the most part.

targetting for Mushclient

Sun, 24 Jul 2005 12:24:22 +0000

Targeting for Mushclient

I have found the mushclient help to be very comprehensive but not always easy to follow. I have written what I hope is an easy to follow guide for implementing targeting and some other triggers and aliases useful for grouping. Please let me know if you find this useful and if there is anything I can add or make clearer. A big thank you to my friends who patiently helped me test this out and who offered suggestions.

Targetting

The aim is to have an alias that changes automatically when the leader changes the target.

make 2 variables:

name : leader

contents: leave blank

name : target

contents: leave blank

Make 2 triggers

Trigger: @leader * ’target *'

Send: %2

Send to: Variable

At bottom of screen enter target in box Variable

Trigger:You now follow *.

Send: %1

Send to: Variable

At bottom of screen enter leader in box Variable

for both triggers:

Tick enabled, ignore case and expand variables in menu on left-hand side.

Aliases

make an alias, for example:

Alias: as

Send: assist @leader

Send To:World

Alias: cu

Send: cast ‘curse’ @target

Send To: World

Ensure that in the left-hand side menu Enabled and expand Variables are ticked

Ok Now when you follow a new leader any aliases with @leader are automatically updated with leaders name and any aliases with @target will automatically target the mob announced by the leader (and only the leader)

Other suggestions to make grouping easier

Make a trigger to respond to leaders order ‘all up’

Trigger: @leader – ‘all up’

Send: Wake

 Stand

Make a variable ’tank’ for bigger groups when leader and tank are different and set up an alias to change the variable when leader announces who is the tank. Being a cleric I have also made aliases (and macros) to heal leader and tank.

Hope this is helpful

Salan

tiny fugue

Wed, 29 Jun 2005 08:52:58 +0000

I have some tf scripts.. if anyone need it

Pi, the longest char

One last request….

If U want more info about my >tf< scripts ask me on-line or send an e-mail to:

smig1o"at"wp.pl

Pi, the longest one

Anyone Have a tt++ TNL Reported

Tue, 11 Jan 2005 13:47:46 +0000

I have found the documentation on tintin++ to be a little lacking, as compared to say ZMud. I might just be missing something.

I am looking for an TNL reporter similar to what is listed in the ZMud section. If anyone has one could you post the code here?

Thanks a lot!

Dan (aka Strago)

tt++

Sat, 09 Oct 2004 01:00:17 +0000

If anyone is lookin for tintin scripts I have a few that work with tintin++ v1.86 or later.

ash/xylene/etc…

I’m looking for some tintin++ scripts! :D

Mush Client - Jscript Plugins

Mon, 05 Jan 2004 11:30:28 +0000

Hey guys,

I am not sure how many of you guys use Mush client or not, but I just wanted to post up that I have quite a few plugins, and I am willing to make them available if anyone is interested. I will be cleaning them up over the next week or so, and I will start posting links for them. Let me know what kind of stuff you are looking for, and I will try to post it :)

Also, these plugins are Jscript.