#CLASS {Map} #ALIAS recall {#RECALL;recal} #ALIAS mapingon {#VAR pos {};#VAR newDoor {};#VAR desc {};#VAR exits {};#VAR oldexits {};#VAR name {};#VAR t_desc {};#T- exit2;#T+ exit;#T+ description} #ALIAS mapingoff {#T+ exit2;#T- description;#T- exit;#ECHO Follow Mode.} #ALIAS createDoors {#WHILE (%pos( "(", @oldExits) > 0) {#VAR pos %pos( "(", @oldExits);#VAR oldexits %delete( @oldExits, @pos, 1);#VAR newDoor %copy( @oldExits, @pos, %pos( ")", @oldExits) - @pos);#DOOR @newDoor;#VAR oldexits %delete( @oldExits, %pos( ")", @oldExits), 1)}} #ALIAS searchexits {#VAR counter {1};#VAR searchexits {north|east|south|west|up|down};#WHILE (@counter <= %numwords( @exits)) {#DELITEM searchexits %word( @exits, @counter);#ADD counter 1};counter = 1;#WHILE (@counter <= %numitems( @searchexits)) {search %item( @searchexits, @counter);#ADD counter 1};#UNVAR counter;#UNVAR searchexits;look;explored area} #VAR DESC {} #VAR t_desc {} #VAR name {} #VAR exits {} #VAR oldexits {} #VAR pos {} #VAR newDoor {} #TRIGGER {~[NEWBIE ALERT~]} {#NOMAP} #TRIGGER {~[Music~]} {#NOMAP} #TRIGGER {~[Answer~]} {#NOMAP} #TRIGGER {~[Grats~]} {#NOMAP} #TRIGGER {~[Newbie~]} {#NOMAP} #TRIGGER {~[ ? ~]} {#NOMAP} #TRIGGER {~((*)~)} {#NOMAP} "" {disable} #TRIGGER {~[OOC~]} {#NOMAP} #TRIGGER {You have to climb to go in that direction.} {#NODIR;#NOMAP} #TRIGGER {You need a boat to go there.} {#NODIR;#NOMAP} #TRIGGER {You aren't allowed in there.} {#NODIR;#NOMAP} #TRIGGER {The %1 is closed.} {#NODIR;#NOMAP} #TRIGGER {Alas, you cannot go that way.} {#NODIR;#NOMAP} #TRIGGER {Nah... You feel too relaxed...} {#NODIR;#NOMAP} #TRIGGER {In your dreams, or what?} {#NODIR;#NOMAP} #TRIGGER {You climb the} {#OK} #TRIGGER {It's already open.} {#OK} #TRIGGER {Bids start at} {#NOMAP} #TRIGGER {You rest.} {#NOMAP} #TRIGGER {~[AUCTION~] (*)} {#NOMAP} #TRIGGER {~[AFK~]} {#NOMAP} #TRIGGER {~[IC~]} {#NOMAP} #TRIGGER {^~((*)~|(*)~|(*)~)} {#TAG prompt} #TRIGGER {^~((*)~|(*)~|(*)~|(*)~|(*)~|(*)~|(*)~)} {#TAG prompt} #TRIGGER "description" {^~[&9~]} {#VAR name {};name = %line2;#TAG name {@name};#VAR desc {};#T- description;#T+ description2} "" {disable} #TRIGGER "exit" {^~[Exits: (*)~]} {#T- description2;#SUB {%ansi( high, cyan)~(%ansi( white)Exits: %ansi( grey)%1%ansi( high, cyan)~)};#VAR oldexits "%1";#VAR exits %replace( %replace( "%1", "(", ""), ")", "");#TAG desc,exit {@desc} {@exits};#T+ description} "" {disable} #TRIGGER "description2" {^&12&{t_desc}} {#ADD desc {@t_desc %cr%lf}} "" {disable} #TRIGGER {You discover an entrance to the%s(%w)} {#SUB {%ansi( high, red)You discover an entrance to the %ansi( grey)"%1"}} #TRIGGER {^You attempt to go east but the exit is blocked.} {#NODIR;#NOMAP} #TRIGGER {^You can't fly.} {#NODIR;#NOMAP} #KEY F6 {createDoors} #KEY F7 {list;searchexits} #CLASS 0 #CLASS {Map|exit2} #TRIGGER {^~[Exits: (*)~]} {#SUB {%ansi( high, cyan)~(%ansi( white)Exits: %ansi( grey)%1%ansi( high, cyan)~)};#OK} #CLASS 0