put flag killgroup
start:
put stand
MATCH stand1 You are already standing.
MATCH stand2 You stand back up.
MATCH stand3 You struggle, but fail to stand.
MATCHWAIT
stand1:
put look
MATCH tsc \[Town Square Central]
MATCH inn \[Raging Thrak Inn, Front Desk]
MATCH well \[Town Well]
MATCH garden \[Town Square, Garden Niche]
MATCH smallpark \[Town Square, Small Park]
MATCHWAIT
stand2:
MATCH stand2a Roundtime: [rt] sec.
MATCHWAIT 1
goto stand1
stand2a:
pause [rt]
goto stand1
stand3:
waitfor Roundtime: [rt] sec.
pause [rt]
goto start
tsc:
move w
goto begin
inn:
move n
move o
move s
goto begin
well:
put se
put sw
pause 1
move s
move w
goto begin
garden:
move e
move n
move n
goto begin
smallpark:
move n
move n
goto begin
begin:
COUNTER RANDOM 5
if %c = 0 goto ant
if %c = 1 goto ant
if %c = 2 goto rat
if %c = 3 goto rat
if %c = 4 goto rat
rat:
move e
move e
move e
move e
move n
move e
move e
move s
move s
move go open
move e
move go hole
move go open
move e
move n
move go grate
rathunt:
random:
COUNTER RANDOM 8
if %c = 0 goto north
if %c = 1 goto northeast
if %c = 2 goto east
if %c = 3 goto southeast
if %c = 4 goto south
if %c = 5 goto southwest
if %c = 6 goto west
if %c = 7 goto northwest
north:
if [last] = "north" goto random
save [last] north
northa:
save [rid] northa
counter add 1
save [dir] n
goto moved
east:
if [last] = "east" goto random
save [last] east
easta:
save [rid] easta
counter add 1
save [dir] e
goto moved
south:
if [last] = "south" goto random
save [last] south
southa:
save [rid] southa
counter add 1
save [dir] s
goto moved
west:
if [last] = "west" goto random
save [last] west
westa:
save [rid] westa
counter add 1
save [dir] w
goto moved
northeast:
if [last] = "northeast" goto random
save [last] northeast
northeasta:
save [rid] northeasta
counter add 1
save [dir] ne
goto moved
southeast:
if [last] = "southeast" goto random
save [last] southeast
southeasta:
save [rid] southeasta
counter add 1
save [dir] se
goto moved
southwest:
if [last] = "southwest" goto random
save [last] southwest
southwesta:
save [rid] southwesta
counter add 1
save [dir] sw
goto moved
northwest:
if [last] = "northwest" goto random
save [last] northwest
northwesta:
save [rid] northwesta
counter add 1
save [dir] nw
goto moved
deadend:
pause 1
put look
MATCH northa Obvious exits: north.
MATCH southa Obvious exits: south.
MATCH easta Obvious exits: east.
MATCH westa Obvious exits: west.
MATCH northeasta Obvious exits: northeast.
MATCH southeasta Obvious exits: southeast.
MATCH southwesta Obvious exits: southwest.
MATCH northwesta Obvious exits: northwest.
MATCHWAIT
checkexp:
put exp
MATCH random Your mind is as clear as a bell
MATCH random Your mind is fresh and clear.
MATCH random Your mind is clear.
MATCH random Your mind is muddled.
MATCH random Your mind is becoming numbed.
MATCH random Your mind is numbed.
MATCH restrat must rest!
MATCHWAIT
moved:
COUNTER ADD 1
cadd:
put [dir]
moveda:
MATCH checkexp \[Wehnimer's Sewer, Nexus]
MATCH moveda1 wait
MATCH deadend You can't go there.
MATCH dead You are a ghost
MATCH alonerat giant rat,
MATCH alonerat giant rat.
MATCH alonerat giant rat and
MATCH [rid] Obvious
MATCHWAIT
moveda1:
pause 1
goto cadd
alonerat:
MATCH [rid] Also here:
MATCH [rid] Also in the room:
MATCH attackrat Obvious
MATCHWAIT
attackrat:
put stance off
waitfor You are now
attrat:
put at rat
MATCH [rid] I could not find what you were referring to.
MATCH deadrata is already dead.
MATCH deadrat and dies
MATCH pauserat ...wait
MATCH attackrata Roundtime: [rt] sec.
MATCHWAIT
deadrata:
put search rat
waitfor You search
put stance def
waitfor You are now
goto ratlook
deadrat:
waitfor Roundtime: [rt] sec.
pause [rt]
put search rat
waitfor You search
put stance def
waitfor You are now
goto ratlook
pauserat:
pause 1
goto attackrat
attackrata:
pause [rt]
goto attrat
ratlook:
put look
goto moveda
restrat:
move go grate
move s
move w
move go open
move go hole
move w
move go open
move n
move n
move w
move w
move s
move w
move w
move w
move w
goto randrest
ant:
move w
move w
move climb hole
room1:
counter set 1
save [dir] se
goto checkant
room2:
save [dir] se
goto checkant
room3:
save [dir] s
goto checkant
room4:
save [dir] s
goto checkant
room5:
save [dir] se
goto checkant
room6:
save [dir] e
goto checkant
room7:
save [dir] e
goto checkant
room8:
save [dir] se
goto checkant
room9:
save [dir] s
goto checkant
room10:
save [dir] s
goto checkant
room11:
save [dir] ne
goto checkant
room12:
save [dir] sw
goto checkant
room13:
save [dir] n
goto checkant
room14:
save [dir] n
goto checkant
room15:
save [dir] nw
goto checkant
room16:
save [dir] w
goto checkant
room17:
save [dir] w
goto checkant
room18:
save [dir] nw
goto checkant
room19:
save [dir] n
goto checkant
room20:
save [dir] n
goto checkant
room21:
save [dir] ne
goto checkant
room22:
save [dir] n
goto checkant
room23:
save [dir] n
goto checkant
room24:
save [dir] s
goto checkant
room25:
save [dir] s
goto checkant
room26:
save [dir] go hole
goto checkant
room27:
save [dir] nw
goto checkant
room28:
save [dir] nw
goto checkant
room29:
save [dir] e
goto checkant
room30:
save [dir] e
goto checkant
room31:
save [dir] nw
goto checkant
room32:
save [dir] nw
goto checkant
room33:
save [dir] sw
goto checkant
room34:
save [dir] sw
goto checkant
room35:
save [dir] se
goto checkant
room36:
save [dir] se
goto checkant
room37:
save [dir] ne
goto checkant
room38:
save [dir] w
goto checkant
room39:
save [dir] w
goto checkant
room40:
save [dir] n
goto checkant
room41:
save [dir] n
goto checkant
room42:
save [dir] e
goto checkant
room43:
save [dir] e
goto checkant
room44:
save [dir] s
goto checkant
room45:
save [dir] s
goto checkant
room46:
save [dir] se
goto checkant
room47:
save [dir] go hole
goto checkant
room48:
save [dir] sw
goto checkant
room49:
save [dir] nw
goto checkant
room50:
save [dir] nw
goto checkant
room51:
put exp
MATCH room1 Your mind is as clear as a bell
MATCH room1 Your mind is fresh and clear.
MATCH room1 Your mind is clear.
MATCH room1 Your mind is muddled.
MATCH room1 Your mind is becoming numbed.
MATCH room1 Your mind is numbed.
MATCH restant must rest!
MATCHWAIT
checkant:
counter add 1
anta:
put [dir]
antb:
MATCH antc wait
MATCH dead You are a ghost
MATCH aloneantcheck giant ant,
MATCH aloneantcheck giant ant.
MATCH aloneantcheck giant ant and
MATCH room%C Obvious
MATCHWAIT
antc:
pause 1
put anta
aloneant:
put stance off
waitfor You are now
attant:
put at ant
MATCH room%C I could not find what you were referring to.
MATCH deadanta is already dead.
MATCH deadant and dies
MATCH pauseant ...wait
MATCH attackant Roundtime: [rt] sec.
MATCHWAIT
deadanta:
put search ant
waitfor You search
put stance def
waitfor You are now
goto antlook
deadant:
waitfor Roundtime: [rt] sec.
pause [rt]
put search ant
waitfor You search
put stance def
waitfor You are now
goto antlook
antlook:
put look
goto antb
pauseant:
pause 1
goto aloneant
attackant:
pause [rt]
goto attant
restant:
move climb rubble
move e
move e
goto randrest
aloneantcheck:
MATCH room%c Also here:
MATCH room%c Also in the room:
MATCH aloneant Obvious
MATCHWAIT
randrest:
COUNTER RANDOM 7
if %c = 0 goto well1
if %c = 1 goto well2
if %c = 2 goto well3
if %c = 3 goto well4
if %c = 4 goto inn1
if %c = 5 goto smallpark1
if %c = 6 goto garden1
well1:
move e
move go well
goto rester
well2:
move e
move go well
move ne
goto rester
well3:
move e
move go well
move ne
move nw
goto rester
well4:
move e
move go well
move nw
goto rester
inn1:
move n
move go inn
move s
goto rester
smallpark1:
move s
move s
goto rester
garden1:
move s
move s
move w
goto rester
rester:
COUNTER RANDOM 4
if %c = 0 goto rest0
if %c = 1 goto rest1
if %c = 2 goto rest2
rest0:
pause 30
put exp
MATCH dead Exp. until next lvl: -
MATCH start Your mind is as clear as a bell
MATCH start Your mind is fresh and clear.
MATCH start Your mind is clear.
MATCH rest0 Your mind is muddled.
MATCH rest0 Your mind is becoming numbed.
MATCH rest0 Your mind is numbed.
MATCH rest0 must rest!
MATCHWAIT
rest1:
pause 30
put exp
MATCH dead Exp. until next lvl: -
MATCH start Your mind is as clear as a bell
MATCH start Your mind is fresh and clear.
MATCH start Your mind is clear.
MATCH start Your mind is muddled.
MATCH rest1 Your mind is becoming numbed.
MATCH rest1 Your mind is numbed.
MATCH rest1 must rest!
MATCHWAIT
rest2:
pause 30
put exp
MATCH dead Exp. until next lvl: -
MATCH start Your mind is as clear as a bell
MATCH start Your mind is fresh and clear.
MATCH start Your mind is clear.
MATCH start Your mind is muddled.
MATCH start Your mind is becoming numbed.
MATCH rest2 Your mind is numbed.
MATCH rest2 must rest!
MATCHWAIT
dead:
put exit
exit
[This message has been edited by Pirub9 (edited 08-04-2001).] reg