The Green System: Six-Pact

Green Stardisc, in the Six-Pact System (dbref #9453)

@dig Green Stardisc, in the Six-Pact System
@field #9453 = exit_0 : 9528
@field #9453 = exit_1 : 10904
@field #9453 = nexits : 4
@field #9453 = exit_2 : 11317
@field #9453 = exit_3 : 11318
@zone #9453 = #10719
@desc #9453 = @tell("%#","Walls of faux green brick, floor-to-ceiling
 mirrors, and brown plastic plants combine to give the green stardisc
 a cheerless character. A recent attempt to enliven the room with helium
 balloons and droopy crepe decorations hasn't helped. It's sad, really.
 Like attending a high school prom in a low-rent hotel lobby in Las Vegas.");
 @call(10633,"each_turn");

northwest (dbref #9528)

@open northwest;nw;white gate = #9075
@odrop #9528 = arrives from the Six-Pact System.
@field #9528 = exitto : white gate to Spaceport Eon
@osucc #9528 = catches a shuttle back to the spaceport.
@succe #9528 = You catch the next shuttle back to the spaceport...
@desc #9528 = @tell("%#","The white gate to the northwest has an animated hologram of Spaceport Eon
 floating above its archway."); @call(10633,"each_turn");

east (dbref #10904)

@open east;e = #10903
@odrop #10904 = enters from the west portal.
@field #10904 = exitto : to TeleBox(tm)
@osucc #10904 = goes east into the TeleBox(tm).
@succe #10904 = You walk east...
@desc #10904 =

north (dbref #11317)

@open north;n;yellow gate = #9385
@odrop #11317 = arrives from the Six-Pact System.
@field #11317 = exitto : yellow gate to Rings
@osucc #11317 = exits north through the yellow gate.
@succe #11317 = You catch a shuttle to...
@desc #11317 = @tell("%#","The yellow gate to the north has an animated hologram of the Rings system
 floating above its archway."); @call(10633,"each_turn");

southwest (dbref #11318)

@open southwest;sw;blue gate = #9474
@odrop #11318 = arrives from the Six-Pact System.
@field #11318 = exitto : blue gate to Spiral
@osucc #11318 = exits southwest through the blue gate.
@succe #11318 = You catch a shuttle to...
@desc #11318 = @tell("%#","The blue gate to the southwest has an animated hologram of the Spiral system
 floating above its archway."); @call(10633,"each_turn");

Invisibles comic book (dbref #10941)

@create Invisibles comic book;comic book;comic;book;Icb
@field #10941 = ohomemsg : is suddenly picked up by a cleaning robot! -- Zoom! -- The robot and comic book are gone.
@succe #10941 = @tell("%#","You pick up the Invisibles comic book."); @tellroom(@location("%#"),
"%#","%n picks up the Invisibles comic book."); @call(10633,"each_turn");
@field #10941 = reset : @move(10941,9453)
@desc #10941 = @tell("%#","The Invisibles, volume two, issue 13, written by Grant Morrison for DC's Vertigo imprint.
 In this issue, King Mob's Invisibles rescue their friend, Boy, from Cell 23. They succeed, but not before
 experiencing words from a secret language, from an alphabet with 64 letters. Words that can hijack their brains'
 language centers, make them see the unseen, or simply shut off their conscious minds. The cover copy reads, in part:
 \"For Sale! Anarchy For The Masses!\" \"So what exactly is our revolutionary agenda, Boss?\" \"BUY!\" \"CONSUME!\"");
 @call(10633,"each_turn")

TeleBox(tm) - "getting you where we want you to go" (dbref #10903)

@dig TeleBox(tm) - "getting you where we want you to go"
@zone #10903 = #10719
@field #10903 = exit_0 : 10911
@field #10903 = nexits : 7
@field #10903 = exit_1 : 10905
@field #10903 = exit_2 : 10906
@field #10903 = exit_3 : 10907
@field #10903 = exit_4 : 10908
@field #10903 = exit_5 : 10909
@field #10903 = exit_6 : 10910
@desc #10903 = @tell("%#","Set into the side of the green stardisc like
 a gemstone, the TeleBox's crystalline walls provide framed views of
 the six nearby planets. And portals in the walls provide simple
 access to each of them."); @call(10633,"each_turn");

northwest (dbref #10905)

@open northwest;nw = #10380
@field #10905 = exitto : to Neuzürich
@odrop #10905 = arrives from the TeleBox(tm).
@osucc #10905 = enters the northwest portal.
@succe #10905 = You enter the northwest portal...
@desc #10905 =

north (dbref #10906)

@open north;n = #10381
@field #10906 = exitto : to Wilkinson
@odrop #10906 = arrives from the TeleBox(tm).
@osucc #10906 = enters the north portal.
@succe #10906 = You enter the north portal...
@desc #10906 =

northeast (dbref #10907)

@open northeast;ne = #10382
@field #10907 = exitto : to Fortuna
@odrop #10907 = arrives from the TeleBox(tm).
@osucc #10907 = enters the northeast portal.
@succe #10907 = You enter the northeast portal...
@desc #10907 =

southwest (dbref #10908)

@open southwest;sw = #10383
@field #10908 = exitto : to Yipplopoly
@odrop #10908 = arrives from the TeleBox(tm).
@osucc #10908 = enters the southwest portal.
@succe #10908 = You enter the southwest portal...
@desc #10908 =

south (dbref #10909)

@open south;s = #10384
@field #10909 = exitto : to Carolino
@odrop #10909 = arrives from the TeleBox(tm).
@osucc #10909 = enters the south portal.
@succe #10909 = You enter the south portal...
@desc #10909 =

southeast (dbref #10910)

@open southeast;se = #10385
@field #10910 = exitto : to Revolution
@odrop #10910 = arrives from the TeleBox(tm).
@osucc #10910 = enters the southeast portal.
@succe #10910 = You enter the southeast portal...
@desc #10910 =

west (dbref #10911)

@open west;w;out;exit = #9453
@odrop #10911 = arrives from the TeleBox(tm).
@field #10911 = exitto : to Green StarDisc
@osucc #10911 = enters the west portal.
@succe #10911 = You enter the west portal...
@desc #10911 =

Willkommen Square, Neuzürich (dbref #10380)

@dig Willkommen Square, Neuzürich
@field #10380 = exit_0 : 10392
@field #10380 = nexits : 1
@zone #10380 = #10719
@desc #10380 = @tell("%#","TODO: Room Description."); @call(10633,"each_turn");

southeast (dbref #10392)

@open southeast;se;out;exit = #10903
@odrop #10392 = enters from the northwest portal.
@field #10392 = exitto : to TeleBox(tm)
@osucc #10392 = goes southeast into the TeleBox(tm).
@succe #10392 = You walk southeast...
@desc #10392 =

Greensward, Wilkinson (dbref #10381)

@dig Greensward, Wilkinson
@field #10381 = exit_0 : 10393
@field #10381 = nexits : 1
@zone #10381 = #10719
@desc #10381 = @tell("%#","TODO: Room Description."); @call(10633,"each_turn");

south (dbref #10393)

@open south;s;out;exit = #10903
@odrop #10393 = enters from the north portal.
@field #10393 = exitto : to TeleBox(tm)
@osucc #10393 = goes south into the TeleBox(tm).
@succe #10393 = You walk south...
@desc #10393 =

Eternity Casino Atrium, Fortuna (dbref #10382)

@dig Eternity Casino Atrium, Fortuna
@field #10382 = exit_0 : 10394
@field #10382 = nexits : 1
@zone #10382 = #10719
@desc #10382 = @tell("%#","TODO: Room Description."); @call(10633,"each_turn");

southwest (dbref #10394)

@open southwest;sw;out;exit = #10903
@odrop #10394 = enters from the northeast portal.
@field #10394 = exitto : to TeleBox(tm)
@osucc #10394 = goes southwest into the TeleBox(tm).
@succe #10394 = You walk southwest...
@desc #10394 =

Hexality Centre, Yipplopoly (dbref #10383)

@dig Hexality Centre, Yipplopoly
@field #10383 = exit_0 : 10395
@field #10383 = nexits : 1
@zone #10383 = #10719
@desc #10383 = @tell("%#","TODO: Room Description."); @call(10633,"each_turn");

northeast (dbref #10395)

@open northeast;ne;out;exit = #10903
@odrop #10395 = enters from the southwest portal.
@field #10395 = exitto : to TeleBox(tm)
@osucc #10395 = goes northeast into the TeleBox(tm).
@succe #10395 = You walk northeast...
@desc #10395 =

Admissions Bldg, Xenos College, Carolino (dbref #10384)

@dig Admissions Bldg, Xenos College, Carolino
@field #10384 = exit_0 : 10396
@field #10384 = nexits : 1
@zone #10384 = #10719
@desc #10384 = @tell("%#","TODO: Room Description."); @call(10633,"each_turn");

north (dbref #10396)

@open north;n;out;exit = #10903
@odrop #10396 = enters from the south portal.
@field #10396 = exitto : to TeleBox(tm)
@osucc #10396 = goes north into the TeleBox(tm).
@succe #10396 = You walk north...
@desc #10396 =

Blamways, Revolution (dbref #10385)

@dig Blamways, Revolution
@field #10385 = exit_0 : 10397
@field #10385 = nexits : 1
@zone #10385 = #10719
@desc #10385 = @tell("%#","TODO: Room Description."); @call(10633,"each_turn");

northwest (dbref #10397)

@open northwest;nw;out;exit = #10903
@odrop #10397 = enters from the southeast portal.
@field #10397 = exitto : to TeleBox(tm)
@osucc #10397 = goes northwest into the TeleBox(tm).
@succe #10397 = You walk northwest...
@desc #10397 =