[Samp]

Because Zugg put in a bad spell checkerer on his client:

#ALIAS {lookup} {#URL {http://dictionary.reference.com/search?q=%1}}

Basically, if you needed to check a definition or spelling of a word

Quote

lookup tulip

and a browser will popup at dictionary.com seraching for the word tulip.

Feel free to post your own simple scripts

[Samp]

Here's another one, I write a lot so I find this useful

#ALIAS {compare} {#URL {http://thesaurus.reference.com/search?q=%1}}

Exact same, but this is for a thesaurus if you couldn't tell

[Cilsen]

yayayayay, this helps a loooot

[Samp]

That's what I said, thanks Samp!

I'm trying to make one that'll google a search for a picture, but Google doesn't think that's such a good idea

The problem is if I do the #URL through zMUD it won't load it properly, whereas if I just typed in the exact link into my browser it would

So lah tee dah, I might fold and just do it for Yahoo!

[Samp]

#ALIAS {Picture} {#url {http://images.search.yahoo.com/search/images?p=%1+%2+%3+%4+%5}}

Basically, just do

Quote

Picture Happy Duck

And you'll get a return of a yahoo! image search of a happy duck, your search can have anywhere from 1 to 5 words, no more than that though, or else I'm not sure what will happen This URL script doesn't set the filter for yahoo!, so if you don't have a cookie set (to not filter, use strict filtering etc.) it might ask you (if you did a search of something that might be questionable) if you really want to view it.

And for just a plain search:

#ALIAS {Search} {#URL {http://search.yahoo.com/search?p=%1+%2+%3+%4+%5}}

Same exact concept

[Erasmus]

#Trigger {You glance over (%w) and see that {her|his} health is at (%d)~/(%d).} {#math enemydamaged %3-%2;#math enemypercent (%2.0/%3.0)*100.0;#if {%2=%3} {#ec %1 is at full health!} {#ec %1 has taken @enemydamaged damage! (They are at about %int( @enemypercent)~% of their max health)}}

Was bored, its kinda nice.

[Denarii]

#CLASS {Criticals}
#VAR crit {0}
#VAR stag {0}
#VAR crush {0}
#VAR mut {0}
#VAR ann {0}
#VAR hits {0}
#VAR cperc {0} {0}
#VAR sperc {0} {0}
#VAR crperc {0} {0}
#VAR mperc {0} {0}
#VAR aperc {0} {0}
#TRIGGER {You have scored a CRITICAL hit!} {#add crit 1}
#TRIGGER {You have scored a CRUSHING CRITICAL hit!} {#add crush 1}
#TRIGGER {You have scored a STAGGERING CRITICAL hit!} {#add stag 1}
#TRIGGER {You have scored a MUTILATING CRITICAL hit!} {#add mut 1}
#TRIGGER {You have scored an ANNIHILATING CRITICAL hit!!!} {#add ann 1}
#TRIGGER {^You launch a powerful uppercut at *.$} {#add hits 1}
#TRIGGER {^You pump out at * with a powerful side kick.$} {#add hits 1}
#CLASS 0
#ALIAS critsoff {#t- Criticals}
#ALIAS critson {#t+ Criticals}
#ALIAS resetcrits {crit=0;stag=0;crush=0;mut=0;ann=0;cperc=0;sperc=0;crperc=0;mperc=0;aperc=0;hits=0}
#ALIAS showcrits {#math cperc {(@crit*100)/@hits};#math sperc {(@stag*100)/@hits};#math crperc {(@crush*100)/@hits};#math mperc {(@mut*100)/@hits};#math aperc {(@ann*100)/@hits};#math rperc {((@hits-@crit-@stag-@crush-@mut-@ann)*100)/@hits};#math reg {@hits-@crit-@stag-@crush-@mut-@ann};#say;#say %ansi( high, red)+%ansi( high, white)---------------------------------------%ansi( high, red)+;#say %ansi( high, white)| %ansi( high, red)Criticals %ansi( high, white). . . . . . . . . . . . . . |;#say %ansi( high, red)+%ansi( high, white)---------------------------------------%ansi( high, red)+;#say;#say %ansi( high, blue) Hits%ansi( high, white):%ansi( high, blue) @hits;#say;#say %ansi( high, blue) Regular Hits%ansi( high, white)....... %ansi( high, blue)@reg @reg%ansi( high, white)~/%ansi( high, blue)@hits @rperc~.%mod( @reg*100, @hits)%ansi( high, white)~%;#say %ansi( high, green) Critical Hits%ansi( high, white)...... %ansi( high, green)@crit @crit%ansi( high, white)~/%ansi( high, green)@hits @cperc~.%mod( @crit*100, @hits)%ansi( high, white)~%;#say %ansi( high, green) Staggering Hits%ansi( high, white).... %ansi( high, green)@stag @stag%ansi( high, white)~/%ansi( high, green)@hits @sperc~.%mod( @stag*100, @hits)%ansi( high, white)~%;#say %ansi( high, yellow) Crushing Hits%ansi( high, white)...... %ansi( high, yellow)@crush @crush%ansi( high, white)~/%ansi( high, yellow)@hits @crperc~.%mod( @crush*100, @hits)%ansi( high, white)~%;#say %ansi( high, yellow) Mutilating Hits%ansi( high, white).... %ansi( high, yellow)@mut @mut%ansi( high, white)~/%ansi( high, yellow)@hits @mperc~.%mod( @mut*100, @hits)%ansi( high, white)~%;#say %ansi( high, red) Annihilating Hits%ansi( high, white).. %ansi( high, red)@ann @ann%ansi( high, white)~/%ansi( high, red)@hits @aperc~.%mod( @ann*100, @hits)%ansi( high, white)~%}

Not only counts your crits, but displays them in a nice chart with percentages.
You would, of course, have to change the attack triggers to fit your class.

[Illiad]

My front end for mpg123 with learning word completion!
-Can play radio streams
-Can repeat/random play any combination of files
-Can support an internal play list
-Not all of these features are even supported by mpg123 itself, so it takes some code.

/def -i _complete_from_list = \
/let _prefix=%1%;\
/shift%;\
/let _len=$[strlen(_prefix)]%;\
/let _match=%;\
/while ({#}) \
/if (strncmp({1}, _prefix, _len) == 0) \
/let _match=%{_match} %{1}%;\
/endif%;\
/shift%;\
/done%;\
/if (_need_unique) \
/let _match=$(/unique %{_match})%;\
/endif%;\
/let _match=$[regmatch('^ *(.*?) *$', _match), {P1}]%;\
/if (_match =~ "") \
/beep 1%;\
/elseif (_match !/ "{*}") \
/beep 1%;\
/@test input(substr($$(/common_prefix %%{_len} %%{_match}), _len))%;\
/if (_match =~ _prev_match) \
/echo - %{_match}%;\
/endif%; \
/set _prev_match=%_match%; \
/else \

/@test _match := strcat(_match, _completion_suffix)%;\
/if (_match =/ "*[A-Za-z0-9_]") \
/@test _match := strcat(_match, " ")%;\
/endif%;\
/@test input(substr(_match, _len))%;\
/endif%;\
/unset _completion_suffix%;\
/unset _need_unique
/def -i complete_user_defined = \
/_complete_from_list %1 %completion_list

/def -i ~input_history_list = \
/let _input=$(/recall -i #1)%;\
/recall -i 1-$[substr(_input, 0, strchr(_input, ":")) - 1]

/def -i complete_input_history = \
/let _need_unique=1%;\
/_complete_from_list %1 $(/~input_history_list)

/def -i complete_dynamic = \
/let _need_unique=1%;\
/_complete_from_list %1 %completion_list $(/~input_history_list)


/def -i complete_filename = \
/quote -S /_complete_from_list $[filename({1})] !\
echo `/bin/ls -dq $[filename({1})]* 2>/dev/null | \
while read f; do \ test -d $$f && echo $$f/ || echo $$f; done`


/def -i complete_hostname = \
/let _need_unique=1%;\
/let _pf=$[substr({1}, strrchr({1}, "@") + 1)]%;\
/quote -S /_complete_from_list %{_pf} !\
echo `cat /etc/hosts %HOME/etc/hosts 2>/dev/null | \
sed -n '/^[^#].*[ ][ ]*\\\\(%{_pf}[^ ]*\\\\).*/s//\\\\1/p'`


/def -i complete_variable = \
/let _part=$[substr({1}, strrchr({1}, '%') + 1)]%;\
/if (strncmp(_part, '{', 1) == 0) \
/let _part=$[substr(_part, 1)]%;\
/let _completion_suffix=}%;\
/endif%;\
/_complete_from_list %_part $(/@listvar -s)


/def -i complete_macroname = \
/let _word=%1%;\
/let _i=$[strrchr({1}, '$')]%;\
/if (_i >= 0) \
/if (substr(_word, _i+1, 1) =~ '{') \
/@test ++_i%;\
/let _completion_suffix=}%;\
/endif%;\
/let _word=$[substr(_word, _i+1)]%;\
/elseif (strncmp(_word, '/', 1) == 0) \
/let _word=$[substr(_word, 1)]%;\
/endif%;\
/_complete_from_list %{_word} $(/quote -S /last `/@list -s -i - %{_word}*)


/def -i complete_worldname = \
/_complete_from_list %1 $(/@listworlds -s %{1}*)

/def -i complete_sockname = \
/_complete_from_list %1 $(/@listsockets -s %{1}*)

/def -i complete_context = \
/let _head=$[kbhead()]%;\
/let _word=%1%;\
/if (strchr(_word, "@") >= 0) \
/complete_hostname %1%;\
/elseif (strchr(_word, "%%") >= 0) \
/complete_variable %1%;\
/elseif (strchr(_word, "$$") >= 0) \
/complete_macroname %1%;\
; /elseif (_head =/ "{/*}") \
; /complete_command %1%;\
/elseif (_head =/ "{/*}") \
/complete_macroname %1%;\
/elseif (regmatch("-w(.+)$$", _head)) \
/complete_worldname %P1%;\
/elseif (_head =/ "*{/[sl]et|/setenv|/unset|/listvar|/edvar} {*}") \
/complete_variable %1%;\
/elseif (_head =/ "*{/load*|/save*|/lcd|/cd|/log} {*}") \
/complete_filename %1%;\
/elseif (_head =/ "*{/def|/edit|/edmac|/reedit|/undef|/list} {*}*") \
/complete_macroname %1%;\
; /elseif (_head =/ "{wh*|page|tel*|kill} {*}") \
; /complete_playername %1%;\
/elseif (regmatch(`/quote .*'("?)(.+)$$`, _head)) \
/let _completion_suffix=%P1%;\
/complete_filename %P2%;\
; /elseif (regmatch('/quote .*`("?)(.+)$$', _head)) \
; /let _completion_suffix=%P1%;\
; /complete_command %P2%;\
/elseif (regmatch('/quote .*`("?)(.+)$$', _head)) \
/let _completion_suffix=%P1%;\
/complete_macroname %P2%;\
/elseif (_head =/ "*{/world|/connect|/edworld} {*}") \
/complete_worldname %1%;\
/elseif (_head =/ "*{/fg} {*}") \
/complete_sockname %1%;\
/elseif (_head =/ "*{/telnet} {*}") \
/complete_hostname %1%;\
/elseif (_head =/ "*/quote *!*") \
/complete_filename %1%;\
/elseif (_head =/ "*{/@test|/expr} *") \
/complete_variable %1%;\
/elseif (_head =/ "*{*/*|.*|tiny.*}") \
/complete_filename %1%;\
/else \
/complete_dynamic %1%;\
/endif
/def -i common_prefix = \
/let _min=%1%;\
/shift%;\
/let _prefix=%1%;\
/let _len=$[strlen(_prefix)]%;\
/while /shift%; /@test {#} & _len > _min%; /do \
/let _i=%_min%;\
/while (_i < _len & strncmp(_prefix, {1}, _i+1) == 0) \
/@test ++_i%;\
/done%;\
/let _len=%_i%;\
/done%;\
/echo - $[substr(_prefix, 0, _len)]

/def -Fp0 -mglob -t'* tells you, \"Music.\"' musicbot=/if (playing =~ 'none') tell %{1} Sadly I'm not listening to anything now! %;\
/else tell %{1} Music??? I love it! I'm currently listening to: \
$(/idmp3)%;/endif

/def sys_fg = /quote -S -decho \\!!%{*-:} >/dev/null 2>/dev/null</dev/null & :
/def startm = /stopm%;/sys_fg mpg123 /home/perlfu/mp3/%{1}%;/echo *********** Now Playing: %{1} **************%;/set playing=%{1}
/def stopm = /sys killall mpg123%;/set playing=none
/def rp = /stopm%;/sys_fg mpg123 -Z /home/perlfu/mp3/*.mp3
/def radio=/stopm%;/sys_fg cd /home/perlfu && ./rst%;/echo ******************* STARTING RADIO STREAM **************************%;/set playing=Di.Fm
/def rpm=/sys killall mpg123%;/startm %{playing}

[Illiad]

It's neat... and little compared to some of the stuff I've got going, so I figured it belonged here!

[Erasmus]

Seeing that makes me really want to try TF... I think I might switch over when I get my laptop. I'll miss my GUI though

[Irruel]

For when you need a calculator for something, but don't have one at your desk, and can't be bothered opening up the windows one.
#AL calc {#SHOW %ansi( 14) %float( %eval( %-1))}

Just type in "calc 3100*1.15" as an example.
--------------------------------------------------------

#TRIGGER {Enter NLIST (%w) (%d) to continue.} {#INPUT {nlist %lower( %1) %2}}

Automatically creates the next nlist entry in the command line, ready for you to hit enter to move on. Had the same for messages before the wonderful, wonderful RM command.

[Erasmus]

or you can just do
#eval (whatever)

[Irruel]

Well there ya go

[Borscin]

Owned.

[Illiad]

I'm sure you could do that pretty easily with an array. Not sure how it would go in Zmud, but the gist would be like...

soandso, soandso2, soandso3, soandso4

@array[0]=soandso
@array[1]=soandso2
@array[2]=soandso3
@array[3]=soandso4

then just enemy from the array. I didn't even bother with a syntax example, I don't know zmud coding at all.