@9
~24
&0
Arrival Room
0
20
19
4
-1
-1
19
294912
>52
-1
-35
>6
-1
You are standing in a small white room appearing much like a doctors office. A single door offers an exit to the north. On the left of the door is a large sign.
<
0
0
\
&1
Boss
0
0
-1
-1
6
3
1
16810504
10/40/y/2/y/3/y/4/y/5/=/6/</7/y/8/y/9/y/10/y/11/y/12/y/13/y/14/=/15/y/16/</17/y/18/y/19/</20/y/22/y/23/y/24/=/25/</27/y/28/y/29/</26/y/30/y/31/y/32/y/33/y/34/y/35/y/36/y/37/y/38/y/39/y/41/y/0
>42
-1
god
>52
-1
1283
>5
-1
mike
>6
-1
The main honcho, powers exceeding that of any other player on the mush, this is the main director.
>30
-1
716871833
>129
-1
#1
>100
-1
#16
>140
-1
nafoich
<
0
0
\
&2
Long Hallway
2
20
-1
7
-1
-1
19
32768
>6
-1
You are standing in a long hallway. Along the walls are doors entering various laboritories.
<
0
0
\
&3
Large Sign
0
0
-1
-1
0
-1
19
32769
>2
-1
tugs on the large sign.
>3
-1
Sorry, this sign is firmly attached to the wall.
>6
-1
Welcome to a generic TinyMUSE test facility. Various labs can be found through the door to the north.
>52
-1
1
>129
-1
#1&!#1
<
0
0
\
&4
Door;north door;n;north;out;leave;exit
0
0
-1
-1
2
-1
19
32770
>1
-1
opens the door and steps out of the room.
>4
-1
You open the door and step through.
>8
-1
steps out of a door labeled, "Arrival Room."
<
0
0
\
&5
South Door;door;s;south;out;leave;exit
2
0
-1
-1
0
-1
19
32770
>8
-1
steps out of a door on the north wall.
>4
-1
You step through the door and leave the hallway.
>1
-1
enters the Arrival Room.
<
0
0
\
&6
Lab #1
6
20
-1
8
-1
-1
19
32768
>6
-1
This is Lab #1. Most of the new TinyMUSE code has been tested here.
<
0
0
\
&7
Lab #1;#1;1;lab1;lab 1;lab
2
0
-1
-1
6
5
19
32770
>8
-1
enters from the hallway.
>4
-1
You step through the door into lab #1.
>1
-1
steps into lab #1
<
0
0
\
&8
Door;out;leave;exit;hall;hallway
6
0
-1
-1
2
-1
19
32770
>8
-1
enters from lab #1.
<
0
0
\
&9
p1
-1
-1
-1
-1
-1
-1
1
16385
<
0
0
\
&10
p2
-1
-1
-1
-1
-1
9
1
16385
<
0
0
\
&11
Jin
-1
-1
-1
-1
-1
10
1
16385
<
0
0
\
&12
Erk
-1
-1
-1
-1
-1
11
1
16385
<
0
0
\
&13
moom
-1
-1
-1
-1
-1
12
1
16385
<
0
0
\
&14
one
-1
-1
-1
-1
-1
13
1
16385
<
0
0
\
&15
one
-1
-1
-1
-1
-1
14
1
16385
<
0
0
\
&16
one
-1
-1
-1
-1
-1
15
1
16385
<
0
0
\
&17
one
-1
-1
-1
-1
-1
16
1
16385
<
0
0
\
&18
one
-1
-1
-1
-1
-1
17
1
16385
<
0
0
\
&19
Wizard
0
-1
-1
-1
0
1
19
32776
10/40/y/2/y/3/y/4/y/5/=/6/</7/y/8/y/9/y/10/y/11/y/12/y/13/y/14/=/15/y/16/</17/y/18/y/19/</20/y/22/y/23/y/24/=/25/</27/y/28/y/29/</26/y/30/y/31/y/32/y/33/y/34/y/35/y/36/y/37/y/38/y/39/y/41/y/0
>140
-1
nafoich
>50
-1
public
>38
-1
20
>52
-1
1960
>5
-1
XXGSJ3t9oOO2U
>30
-1
716871836
>42
-1
wiz
<
0
0
\
&20
Universal Zone
20
20
20
-1
0
-1
19
18391105
>12
20
$@@_* *=*:%# @defattr strcat(v(1),strcat(/,v(0)))=inherit;%# @set v(1)=%[v(0)%]:%[v(2)%]
>14
20
$date:%# @echo Your wrist communicator quietly says "The date is %[time()%]"
>58
-1
600
>13
20
$@echo *:@fo me=@set %#=q;%# @pemit me=v(0);@switch pos(q,flags(v(#)))=0,@fo me=@set %#=!q
>121
-1
$protect-internal * *:@switch controls(%#,%1,modify)=0,{@pemit %#=That's not yours to fiddle with.},#-1,{@pemit %#=I don't know what that is.},{@switch %0=protect,{@doomsday %1=-1},unprotect,@doomsday %1;@pemit %#=The object is now %0ed.}
>120
-1
$@unprotect:@pemit %#=Unprotect what?
>101
-1
$&*:@remit loc(%#)=%[v(0)%] --%n.(%#)
>113
-1
$@poof *:@fo %#=poof-internal %[num(%0)%]
>115
-1
$@poof:@pemit %#=What object do you want to get rid of?
>108
-1
$@getalias *:@fo %#=getalias-internal %[num(strcat(*,%0))%]
>109
-1
$getalias-internal *:@pemit %#=The alias for [name(v(0))] is: %[get(%0/alias)%]
>11
20
$@_* *:@swi v(1)=*=*,{%# @@_%%%[v(0)%%%] %%%[v(1)%%%]},{%# @defattr strcat(%%%[v(1)%%%],strcat(/,%%%[v(0)%%%]))}
>15
20
$!help *:@pemit %#=Officials have been notified that you need help.;@pemit %#=They've heard [v(0)];%# +com _pr=<in need of assistance>: [v(0)]
>16
20
$!help:@pemit %#=You can use the !help command to send a message to Officials.;@pemit %#=To use the !help command, type: !help <message>
>52
-1
1
>138
-1
@foreach *wizard =@pemit v(0)=-- %n has disconnected.
>136
-1
@foreach *wizard =@pemit v(0)=-- %n has connected from [host(v(n))].
>18
20
$@bamf * * * *: @Pemit %# = #### Please reconnect to %0@%2 %% %%(%1) port %3 ####
>114
-1
$poof-internal *:@switch controls(%#,%0,modify) = 1, {@tel %0=%0; @destroy %0; @pemit %#=Okay, %%%[name(%%0)%%%](%0) has disappeared.}, {@pemit %#=That's not yours to fiddle with.}
>17
20
$@recycle *:%# @destroy %0
>57
-1
-5:y
>6
-1
Universal Zone Object
>103
-1
$@entrances *:@fo %#=entrances-internal %[entrances(%0)%]
>104
-1
$@entrances:@pemit %#=List the @entrances for which room or object?
>105
-1
$entrances-internal:@pemit %#=No entrances, or permission denied.
>102
-1
$entrances-internal *:@foreach v(0)={@vz me=num(v(0));@pemit %#=%%%[name(%%vz)%%%](%%%[%%vz%%%]%%%[flags(%%vz)%%%]) (from %%%[name(loc(%%vz))%%%](%%%[loc(%%vz)%%%]%%%[flags(loc(%%vz))%%%]))
>117
-1
$@protect *:@fo %#=protect-internal protect %[num(%0)%]
>118
-1
$@unprotect *:@fo %#=protect-internal unprotect %[num(%0)%]
>119
-1
$@protect:@pemit %#=Protect what?
>125
-1
#5
>9
20
$@cpattr */*=*:%# @%%1 %%0=_%%2
>10
20
$@selfboot:@swi type(v(#))=Player,{@pemit v(#)=Okay, you will be booted three times in a row, in 5 seconds.;@wait 5={@boot [v(#)];@boot [v(#)]; @boot [v(#)]}; @wait 30=@pemit v(#)=Welcome back.},@pemit v(#)=Only players can be booted.
>2
20
$searchobj-internal *=*=*:@searchvar me;@foreach v(1)={@swi get(s(%0/%%0))={%2},{@searchvar me=%%%[get(me/searchvar)] %%0}};@wait 4=@pemit %#=List of matching attributes: %%%[get(me/searchvar)]
>1
20
$@searchobj *=*:@force %#=searchobj-internal %[num(%0)]=%[lattr(%0)]=%%1
>6
20
$@relink:@pemit %#=Relink what?
>5
20
$@relink *:@swi v(0)={*=*},,{@fo %#=@unlink %0}
>4
20
$relink_internal *=*:@swi flags(v(0))=*L*,{@fo %#={@unlink %0;@link %0=%1}},{@swi controls(v(0),v(1),modify)=1,{@fo %#={@unlink %0;@link %0=%1}},{@pemit %#=Permission Denied.}}}
>3
20
$@relink *=*:@fo %#=relink_internal %[num(%0)]=%[num(%1)]
>7
20
$@searchobj *:@swi v(0)={*=*},,{@pemit %#=Search %0 for what?}
>8
20
$@searchobj:@pemit %#=Search which object for what?
<
1
22
0
/64
20
searchvar
/64
20
searchcmd
/64
20
searchcmd2
/64
20
relink_cmd
/64
20
relink_cmd2
/64
20
relink_cmd3
/64
20
relink_cmd4
/64
20
searchcmd3
/64
20
searchcmd4
/64
20
cpattrcmd
/64
20
selfboot
/0
20
mkatrcmd
/0
20
mkatrcmdint
/0
20
echocmd
/0
20
timecmd
/0
20
whinecmd
/0
20
whinecmd2
/0
20
recyclecmd
/68
20
bamf_cmd
\
&21
foo
-1
-1
-1
-1
-1
18
1
16385
<
0
0
\
&22
Universal Functions
22
-1
22
-1
0
-1
19
32769
>21
22
[controls(v(0),#2,v(1))]
>19
22
[ifelse(gt(strlen(v(0)),v(1)),mid(v(0),div(sub(strlen(v(0)),v(1)),2),v(1)),ljust(strcat(spc(div(sub(v(1),strlen(v(0))),2)),v(0)),v(1)))]
>13
22
[ifelse(match(loc(v(0)),#-1),#-1,ifelse(match(loc(v(1)),#-1),#-1,nearby2(num(v(0)),num(v(1)))))]
>14
22
[ifelse(match(loc(v(0)),v(1)),1,ifelse(match(loc(v(1)),v(0)),1,ifelse(match(loc(v(0)),loc(v(1))),1,0)))]
>17
22
[ifelse(match(mid(get(s(%0/sex)),0,1),m),his,ifelse(match(mid(get(s(%0/sex)),0,1),f),her,its))]
>12
22
[if(lnot(match(v(0),1)),v(1))]
>11
22
[ifelse(match(mid(v(0),0,1),a),an,ifelse(match(mid(v(0),0,1),e),an,ifelse(match(mid(v(0),0,1),i),an,ifelse(match(mid(v(0),0,1),o),an,ifelse(match(mid(v(0),0,1),u),an,a)))))]
>10
22
[ifelse(match(type(loc(loc(loc(loc(loc(loc(loc(loc(loc(loc(v(0)))))))))))),Room),loc(loc(loc(loc(loc(loc(loc(loc(loc(loc(v(0))))))))))),#-1)]
>9
22
3.141593
>6
22
[ifelse(mid(v(0),sub(strlen(v(0)),1),1),v(0),ifelse(mid(v(0),sub(strlen(v(0)),2),1),mid(v(0),0,sub(strlen(v(0)),1)),ifelse(mid(v(0),sub(strlen(v(0)),3),1),mid(v(0),0,sub(strlen(v(0)),2)),ifelse(mid(v(0),sub(strlen(v(0)),4),1),mid(v(0),0,sub(strlen(v(0)),3)),ifelse(mid(v(0),sub(strlen(v(0)),5),1),mid(v(0),0,sub(strlen(v(0)),4)),ifelse(mid(v(0),sub(strlen(v(0)),6),1),mid(v(0),0,sub(strlen(v(0)),5)),if(mid(v(0),sub(strlen(v(0)),7),1),mid(v(0),0,sub(strlen(v(0)),7)))))))))]
>5
22
[simp2(fadd(v(0),0))]
>4
22
[s(ifelse(match(mid(extract(time(D,v(0)),4,1),0,2),<12),ifelse(match(mid(extract(time(D,v(0)),4,1),0,2),<1),strcat(12,strcat(mid(extract(time(D,v(0)),4,1),2,6),% AM)),strcat(extract(time(D,v(0)),4,1),% AM)),strcat(ifelse(match(sub(mid(extract(time(D,v(0)),4,1),0,2),12),0),12,if(match(sub(mid(extract(time(D,v(0)),4,1),0,2),12),<10),0)),strcat(if(match(mid(extract(time(D,v(0)),4,1),0,2),>12),sub(mid(extract(time(D,v(0)),4,1),0,2),12)),strcat(mid(extract(time(D,v(0)),4,1),2,6),% PM)))))]
>3
22
[ifelse(match(v(0),),rtime2(xtime()),rtime2(v(0)))]
>2
22
[objlist(exit(v(0)))]
>1
22
[objlist(con(v(0)))]
>23
22
[mod(v(0),2)]
>8
22
[ifelse(fcomp(fsub(v(0),v(1)),abs(fsub(v(0),v(1)))),ifelse(fsub(v(0),v(1)),1,0),0)]
>7
22
[ifelse(fcomp(fsub(v(0),v(1)),abs(fsub(v(0),v(1)))),0,ifelse(fsub(v(0),v(1)),1,0))]
>52
-1
1
>22
22
[lnot(mod(v(0),2))]
>20
22
[truth(pos(mid(v(1),0,1),flags(v(0))))]
>16
22
[ifelse(match(mid(get(s(%0/sex)),0,1),m),him,ifelse(match(mid(get(s(%0/sex)),0,1),f),her,it))]
>15
22
[ifelse(match(mid(get(s(%0/sex)),0,1),m),he,ifelse(match(mid(get(s(%0/sex)),0,1),f),she,it))]
>0
22
[time(D,v(0))]
>24
22
[mid(v(0),0,sub(v(2),1))][v(1)][mid(v(0),v(2),sub(strlen(v(0)),sub(v(2),1)))]
>18
22
[fsqrt(fadd(pow(fsub(v(0),v(2)),2),pow(fsub(v(1),v(3)),2)))]
>25
22
[fsqrt(fadd(fadd(pow(fsub(v(0),v(3)),2),pow(fsub(v(1),v(4)),2)),pow(fsub(v(2),v(5)),2)))]
<
0
1
20
/320
22
stime
/320
22
lcon
/320
22
lexit
/320
22
rtime
/320
22
rtime2
/320
22
simp
/320
22
simp2
/320
22
gt
/320
22
lt
/320
22
pi
/320
22
room
/320
22
art
/320
22
plural
/320
22
nearby
/320
22
nearby2
/320
22
subj
/320
22
objn
/320
22
poss
/320
22
dist2d
/320
22
cjust
/320
22
hasflag
/320
22
haspow
/320
22
even
/320
22
odd
/320
22
change
/320
22
fdist3d
\
&23
Second Large Sign
-1
-1
-1
-1
-1
21
1
16385
<
0
0
\
***END OF DUMP***