sh1th3ad
Newbie
Joined: 24 Jul 2002
Posts: 1
Location: USA
|
 Posted: Wed Jul 24, 2002 1:43 am
SCRIPT: GemStone 3 Rat Hunter
|
Here is something i threw together in an afternoon for everyone to mess around with.
Feel free to improve upon/change the script all you want.
TO Install you need : zMUD 6.16+.. just cut and paste this into a .TXT file and import into zMUD..
--- BEGIN RATSCRIPT.TXT ---
#CLASS {System|Automapper}
#CLASS {System} {enable}
#CLASS {System|Keypad} {enable}
#CLASS {Autolog} {enable}
#CLASS {System|AutomapperAll} {enable}
#CLASS {System|Directions} {enable}
#CLASS {System|DirectionsDiag} {enable}
#CLASS {System|KeypadDiag} {enable}
#CLASS {Rats}
#CLASS {SlowWalk}
#CLASS 0
#ALIAS checkexp {#ECHO Checking experience...;#IF (@fried = 1) {#ECHO Heading back to town...;#VAR resting 1;#SLOW nex2town} {tunnelsweep}} "Rats"
#ALIAS tunnelsweep {#ECHO Sweeping tunnels...;#SLOW %item( {6n12s6nq|6h12l6hq|6j12k6jq|6w12e6wq}, %random( 1, 4))} "Rats"
#ALIAS killmode {#ECHO Entering kill mode...;#VAR killmode 1;#WHILE (@killmode == 1) {kill rat;#WAIT 2500}} "Rats"
#ALIAS installdirs {#CLASS {System|Directions} {"enable"};#DIRECTION ns {n|north} n;#DIRECTION sn {s|south} s;#DIRECTION we {w|west} w;#DIRECTION ew {e|east} e;#DIRECTION ud {u|up} u;#DIRECTION du {d|down} d;#CLASS {System|DirectionsDiag} {"enable"};#DIRECTION hl {nw|northwest} nw;#DIRECTION jk {ne|northeast} ne;#DIRECTION kj {sw|southwest} sw;#DIRECTION lh {se|southeast} se} "System"
#VAR objects {} {_nodef} "Rats"
#VAR fried {1} {_nodef} "Rats"
#VAR people {} {_nodef} "Rats"
#VAR resting {1} {0} "Rats"
#VAR kills {56} {0} "Rats"
#VAR room {Town Square, NE} {_nodef} "Rats"
#VAR killmode {0} {_nodef} "Rats"
#VAR 0 {1} {_nodef} "System|DirectionsDiag"
#PATH town2nex {3e2se2sxeyxenzq}
#PATH nex2town {zswxywx2nw2n3w}
#TRIGGER {*You notice &%*objects} {} "Rats"
#TRIGGER {~[&%*room~]$} {#COLOR %eval( %color( bright)+%color( white));@objects = "";@people = ""} "Rats"
#TRIGGER {{Also here|Also in the room}: &%*people} {} "Rats"
#TRIGGER {{Your mind is as clear as a bell.|Your mind is fresh and clear.|Your mind is clear.}} {#VAR fried 0;#IF (@room == "Town Square, NE" & @resting == 1) {#ECHO Goin' fishing...;#VAR resting 0;#SLOW town2nex}} "Rats"
#TRIGGER {^Obvious {paths|exits}:} {#IF (@objects =~ "giant rat" and @people == "") {#PAUSE;killmode} {#ECHO Nothing here;#OK}} "Rats"
#TRIGGER {giant rat collapses to the ground} {#ADD kills 1} "Rats"
#TRIGGER {Your mind can't take much more of this! You must rest!} {#VAR fried 1} "Rats"
#TRIGGER {A giant rat is already dead.} {search rat} "Rats"
#TRIGGER {I could not find what you were referring to.} {#ECHO Exiting kill mode...;#VAR killmode 0;#ECHO Walking...;#STEP} "Rats"
#DIR xx {go opening} other
#DIR yy {go hole} other
#DIR zz {go grate} other
#DIR qq {#OK;checkexp} other
#DIR ns {n|north} n "System|Directions"
#DIR sn {s|south} s "System|Directions"
#DIR we {w|west} w "System|Directions"
#DIR ew {e|east} e "System|Directions"
#DIR ud {u|up} u "System|Directions"
#DIR du {d|down} d "System|Directions"
#DIR hl {nw|northwest} nw "System|DirectionsDiag"
#DIR jk {ne|northeast} ne "System|DirectionsDiag"
#DIR kj {sw|southwest} sw "System|DirectionsDiag"
#DIR lh {se|southeast} se "System|DirectionsDiag"
#STW {room = '@room';objects = '@objects';people = '@people';kills = '@kills';fried = '@fried';resting = '@resting'} "Rats"
--- END RATSCRIPT.TXT ---
NOTE: You need to set the TICK TIMER to 120 seconds with command "exp" for the script to correctly work.
Cheers.
Open your mind and your brains fall out. |
|
