commit daad2bd710bbb2a5595990b27c0eeeefb1943d9a Author: historicalsource Date: Sat Apr 13 21:14:02 2019 -0400 Revision 13 (Original Source) diff --git a/README.md b/README.md new file mode 100644 index 0000000..c32282d --- /dev/null +++ b/README.md @@ -0,0 +1 @@ +# sorcerer diff --git a/belboz.zil b/belboz.zil new file mode 100644 index 0000000..78c8fc4 --- /dev/null +++ b/belboz.zil @@ -0,0 +1,1704 @@ +"BELBOZ for + SORCERER + (c) Copyright 1984 by Infocom Inc. All Rights Reserved." + +> + + + + + ) + ( + ) + ( + + ) + ( + + + )>> + + + + + + + + )>> + +> + + + ) + (T + + )>) + ( + ) + (T + + > + )>> + + + + + + ) + (T + )> + ) + ( + > + )>> + + + ) + (T + )> + + > + + + + + )>> + +> + + + ) + (,BOA-WARNING + ) + (T + + )>) + (T + > + > + )>> + + + + + )>> + + + + + + >> WARNING <<< !!! ***| + This path is protected by a| + Magic Mine Field| + installed by the| + Frobozz Magic Mine Field Company" CR> + )>> + + + + + > + ,FOREST-EDGE) + (T + )> + + )>> + + + + + )>> + + + )>> + + + + + >>> + )>> + + + ) + (T + >)>> + + + + + + + ) + ( + )>> + + + + + > + ) + ( + + + ) + (T + )> + )>> + + + +> + > + ) + ( + + )>> + + + + + + )>> + + + +> + > + + ) + ( + > + ) + ( + > + ) + (T + + )>> + + + + + + + + ) + (T + )> + ) + ( + + > + ) + (T + + + > + )>)>)>> + + + CR>)>> + +> + + + ) + (T + + )>> + + + + + ) + (,RIVER-EVAPORATED + ) + ( + + ) + ( + + + > + ) + (T + )>) + ( + ) + ( + > + + ) + ( + )>> + +> + + > + )>> + +> + + + + + + ) + ( + ) + ( + )>> + +> + + )> + > + > + )> + + ) + (T + )>>> + + + + + )>> + + + + + )>> + + + + + + ) + (T + )>) + ( + + ) + (T + )>)>> + + + + + + )>> + + + ) + ( + + + )>> + + + )>> + + + +) + (T + )> + + > + + + + + ) + (T + )> + > + +) + (T + )> + > + + + ) + ( + )>> + + + )>> + + + + + ) + ( + > + > + + ) + ( + > + )>> + + + + + >> + >) + ( + + + )> + )>> + + + + + >> + + + + + + )>> + + + + + + + )>> + + + + + >> + ) + ( + ) + ( + + + )> + > + + + ) + ( + + ) + ( + > + )>> + +> + +> + + >)> + + + )> + > + + + + + +> + +> + > + + + > + ) + ( + ) + ( + ) + (T + )> + + )>> + +;"FORT-ENTRANCE and beyond is in FORT.ZIL" + + + +> + + + > + + + ) + (T + )>) + (T + + )>) + ( + + ) + (T + )> + + ) + (T + )> + )>> + + + > + + + + + ) + ( + + ) + ( + ) + ( + )>> + + + + + + ) + ( + )>> + + + + + + + + ) + ( + ) + (T + )>) + ( + + ) + (T + )>) + ( + > + > + + )>> + + + + + + + )>> + + + + + + + )>> + + + + + >> + ) + ( + ) + ( + + + + )> + ) + ( + + ) + ( + > + )>> + + + + + +) + (T + )> + > + + + ) + ( + )>> + + + ) + ( + )>> + + + + + + + ,OUTSIDE-STORE) + (,FLYING + + ) + (T + + )>> + + + + + + ) + (T + )>) + ( + + ) + (,GNOME-SLEEPING + > + > + ) + (T + + )>) + ( + )>> + + + + + + ) + (T + )>) + ( + + ) + (T + + )>)>> + + + + + +) + (T + )>> + + + + ) + ( + > + ) + (T + + )>) + ( + ,GNOME-SLEEPING> + + ) + ( + ,GNOME-SLEEPING> + ) + ( + + ) + ( + ) + (,GNOME-ANNOYED + ) + (T + > + > + )>) + ( + ,GNOME-SLEEPING> + ) + ( + + + > + + + ) + ( + > + + + )> + + + + > + > + ) + ( + ) + (T + )>)>> + +> + +> + + + +> + +> + + > + + + > + + ) + (T + )>) + (T + + + > + )>> + + + + + + + )>> + + + + ) + (T + )>) + ( + + ) + (T + )>) + ( + + ) + (T + )>)>> + + + + + + + + ) + (,FWEEPED + ) + ( + ) + ( + > + + ) + (T + + ,VEHBIT> + ) + (T + )> + )>) + ( + )>> + +;"END OF HIGHWAY and beyond is in MAZE.ZIL" + + + + + + + + + + ) + (T + )> + )>> + + + > + + + ) + (T + + )>> + + + + ) + ( + ) + ( + ) + ( + ) + (T + )>) + ( + ) + ( + + ) + (T + )>)>> + + + + + + ,EDGE-OF-CHASM) + (T + ,BARE-PASSAGE)>) + (T + + )>> + + + + + + ) + (T + + ) + (T + )>)>)>> + + + + + + + + )>> + + + + + ) + ( + ) + ( + )>> + + + + + + > + + ) + ( + > + + + + + > + ) + ( + > + ) + ( + ) + ( + ) + ( + + + )>> + + + +;"PARK-ENTRANCE and beyond is in PARK.ZIL" + + + + + + ) + (T + )> + )>> + +> + +> + + + + + ) + (T + + )>) + (T + )>)>> + +;"SOOTY-ROOM and beyond is in COAL.ZIL" \ No newline at end of file diff --git a/coal.zil b/coal.zil new file mode 100644 index 0000000..cd107e9 --- /dev/null +++ b/coal.zil @@ -0,0 +1,1137 @@ +"COAL for + SORCERER + (c) Copyright 1984 by Infocom Inc. All Rights Reserved" + + + + + )>> + + + + + >> + >)>> + + + + ) + (T + ,COAL-BIN-ROOM)>> + + + )>> + + + + + > + > + + + > + ) + (T + > + )> + ) + (,GOLMACKED + > + + + )> + + )> + >)>) + ( + > + )>> + +> + +> + +> + + + ) + (T + + > + )>> + + + + + ) + ( + )>> + + + + + + + + ) + (T + )>) + ( + + ) + (T + )>) + ( + + ) + (T + )>) + ( + > + + + ,ROPE-TO-BEAM> + + + > + + + ) + ( + ,ROPE-TO-BEAM> + + )> + + + + + ) + (T + 20> + ) + (T + )> + )>) + ( + )>) + ( + + )>> + + + + ) + (T + )>) + ( + + ) + (T + )>) + ( + > + + + ,ROPE-TO-BEAM> + + + > + + ) + ( + ,ROPE-TO-BEAM> + + )> + + + + ) + (T + + + > + )> + )>) + ( + )>) + ( + + )>> + + + + ) + (T + )>> + +> + +> + +> + + + + + + ) + ( + ) + ( + > + + + ) + ( + ,TWIN-FOLLOW> + ) + ( + ) + ( + )>> + +;> + +> + +> + +> + + + +> + +> + + + +> + > + + + + )> + + + + ) + ( + ) + (T + > + )>) + ( + + + + + + )> + + + > + )> + ) + (T + )>) + ( + + + + + )> + + + + + + + > + ) + ( + + + ) + (T + )>) + (T + + + )>) + (T + + > + + > + )> + + )>> + +> + +> + +> + > + + + + > + + + + + +> + + + + > + + )> + ) + ( + + + > + ) + (T + + )>) + ( + ) + ( + ) + ( + + + )> + )>> + + + ) + ( + ) + (T + )> + + + ) + (T + )>) + (T + + + )> + )>> + + + ) + ( + ) + ( + ) + (T + )> + ,SPELL-BOOK> + ,OLDER-SELF> + ,V?GIVE>> + ,OLDER-SELF> + ,SPELL-BOOK> + ,V?SGIVE>>> + ) + (T + )>> + + + +> + > + ) + ( + > + ) + ( + ) + ( + ) + ( + )>> + +> + )> + > + )> + ,OLDER-SELF> + ) + ( ,ME> + )> + ,OLDER-SELF> + ) + ( ,ME> + )> + + ,SPELL-BOOK> + ,YOU-OBJECT> + ,V?GIVE>> + ,YOU-OBJECT> + ,SPELL-BOOK> + ,V?SGIVE>>> + + + ) + ( ,V?VERBOSE ,V?BRIEF ,V?SUPER-BRIEF> + ,V?SCORE ,V?SCRIPT ,V?UNSCRIPT>> + ) + ( ,V?ANSWER ,V?REPLY ,V?CURSE> + ,V?HELLO ,V?TELL ,V?ASK-FOR> + ,V?SAY ,V?THANK ,V?YELL> + ,V?ASK-ABOUT>> + ) + ( ,V?CAST ,V?GNUSTO ,V?FROTZ> + ,V?REZROV ,V?IZYUK ,V?FWEEP> + ,V?AIMFIZ ,V?SWANZO ,V?VARDIK> + ,V?MEEF ,V?PULVER ,V?GOLMAC> + ,V?YOMIN ,V?VEZZA ,V?GASPAR> + ,V?YONK ,V?MALYON>> + ) + ( ,V?INVENTORY> + ) + ( ,V?DIAGNOSE> + ) + ( ,V?WAIT> + ) + ( ,V?SLEEP> + ) + ( ,V?LEARN> + ) + ( ,V?SPELLS> + ) + ( ,V?LOOK> + ) + ( ,V?LEAP ,V?SKIP> + ) + ( ,V?WALK ,V?WALK-AROUND ,V?WALK-TO> + ) + ( ,V?GIVE> + +
> + +
> + ) + ( ,V?SHOW> + +
> + +
> + ) + ( ,V?RAISE ,V?LOWER ,V?RUB> + ,V?MOVE ,V?SHAKE ,V?PUSH> + ,V?KICK ,V?PUT-ON ,V?PUSH-TO> + ,V?PUT ,V?PUT-UNDER ,V?PUT-BEHIND>> + ,V?PUT> + ,SPELL-BOOK> + ,LOWER-CHUTE>> + )> + +
> + ) + ( ,V?EXAMINE ,V?LOOK-INSIDE> + ,V?LOOK-BEHIND ,V?LOOK-UNDER>> + +
> + ) + ( ,V?BOARD ,V?ENTER ,V?THROUGH> + +
> + ) + ( ,V?THROW ,V?THROW-OFF> + +
> + ) + ( ,V?WHAT ,V?WHERE ,V?WHO> + +
> + ) + ( ,V?ATTACK ,V?KILL ,V?MUNG> + +
T> + ) + ( ,V?EAT ,V?DRINK> + +
> + ) + ( ,V?CLIMB-ON ,V?CLIMB-UP ,V?CLIMB-FOO> + ,V?CLIMB-DOWN ,V?CLIMB-OVER>> + +
T> + ) + ( ,V?READ> + +
> + ) + ( ,V?SMELL> + +
> + ) + ( ,V?LISTEN> + +
> + ) + ( ,V?KISS> + +
> + ) + ( ,V?OPEN> + +
> + ) + ( ,V?CLOSE> + +
> + ) + ( ,V?EXIT ,V?DISEMBARK> + +
> + ) + ( ,V?TAKE> + +
> + ) + ( ,V?DROP> + +
> + ) + (T + )>> + + + + + + )>> + + + + + + + >> + + > + + ) + (T + )>) + ( + + ) + ( + )>> + +;"the object DIAL also contains all objects that have no current LOC. This + allows MOBY-FIND to find these LOC-less objects. Yes, this is bizarre." + + + + + ) + ( + ) + ( + >> + ) + ( + ) + (T + + + + + )> + )>)>> + + + +> + + ;"set-up by COAL-BIN-ROOM's M-ENTER" + + + +> + +> + +> + + + >> + ) + ( + > + + )> + + ) + ( + > + ) + ( + ,ROPE-TO-BEAM> + > + ) + ( + + > + ) + (T + )>) + ( + ) + ( + + ) + (,ROPE-TO-BEAM + )>)>> + + + + + > + + )>> + + + + + + ) + (T + )>) + ( + + ) + (T + )>) + ( + > + ) + ( + > + + ,ROPE-TO-BEAM> + ) + (T + + )>)>> + + + + + > + + ) + ( + ,ROPE-PLACED> + ) + ( + ) + (,ROPE-TO-BEAM + )>)>> + + + + + + + + + + + > + + > + + > + )>> + + + + + > + )>> + +> + +> + > + + + + + + ) + ( + ,TROG-FOLLOW> + ) + ( + ) + ( + )>> + + + + + + + ,COAL-BIN-ROOM) + (> + + + + ,COAL-BIN-ROOM) + (T + + > + + ,SLANTED-ROOM)>) + (T + + + + + ,COAL-BIN-ROOM)>> + + + ) + (T + )> + > + + + + + )>> + +> + > + + ) + ( + ,GOLMACKED> + + ) + (T + + ,COAL-BIN-ROOM)>> + + + + + + )> + > + + + ) + ( + ) + ( + )>> + + + + + + + + + +> + +) + (T + )> + + > + +)) + + ) + (T + )> + > \ No newline at end of file diff --git a/end.zil b/end.zil new file mode 100644 index 0000000..e605d44 --- /dev/null +++ b/end.zil @@ -0,0 +1,888 @@ +"END for + SORCERER + (c) Copyright 1984 by Infocom, Inc. All Rights Reserved" + + + +> + +)) + + >> + )> + + > + > + > + > + > + ) + ( + + + )> + + + )> + + + )> + + + )> + )>)> + )>> + + + + > + + + + + + + + ) + (T + )> + + + ) + (T + )> + )>> + + + + + + + ) + ( + + + ) + ( + + ) + ( + ) + ( + ) + ( + > + + ) + ( + )>> + + + ) + (T + )>)>> + + + + + + ) + (T + )>) + ( + > + > + + + > + )> + ) + ( + ) + ( + + ) + ( + )>> + + + + + > + + > + )> + >) + (T + )>>) + ( + + ) + (T + )> + )>> + + + ) + (T + ,LAGOON-FLOOR)>> + + + + + ) + (T + + + )>> + + + + + + + > + )>> + + + )> + > + + ) + ( + ) + ( + + + ) + (T + )>) + (T + + > + )>> + + + > + )>> + + + + + + + + ) + ( + )>> + + + + + > + + > + ) + ( + + + )>> + +> + + + + + + + + + ) + (T + )> + )>> + + + + + ) + (T + )>) + ( + > + ) + ( + + ) + (T + + > + )> + + )>)>> + +> + +> + +> + > + + + + + + + ) + (T + )> + ) + ( + + > + + + ) + (T + )> + )>> + + + + + + ) + ( + ) + ( + )>> + + + + ) + (T + ,GRUE-LAIR)>> + + + + + + >> + + ) + (T + )>)>> + + + + + ) + ( + + )>> + + + + ) + ( + + ) + (T + + )>) + (T + )>> + + + )>> + + + + + > + + )>> + + + + + + + ) + ( + )>> + + + + + > + > + > + >> + + ) + ( + )>> + +> + + + + + > + > + > + >> + + ) + ( + )>> + +> + +> + + + + + + + + + + + > + > + > + + )>> + + + + + + + > + > + > + + )>> + + + + + + + + + )> + > + + + > + )>> + +> + +> + > + +> + +> + +> + + + ) + (T + + + )>> + + + ) + (T + )> + + + + ) + (T + + + )> + + > + + + + + > + )> + )>) + (T + + + )>> + +> + )> + + + > + > + > + + > \ No newline at end of file diff --git a/fort.zil b/fort.zil new file mode 100644 index 0000000..c7a73ea --- /dev/null +++ b/fort.zil @@ -0,0 +1,382 @@ +"FORT.ZIL for + SORCERER + (c) Copyright 1984 Infocom, Inc. All Rights Reserved" + + + + + + > + ) + ( + ) + (T + )>) + ( + + ) + ( + ) + (T + )>) + ( + )>> + + + + + + + + ) + ( + ,SLEEPING> + > + )>> + + + + ) + ( + )>> + + + + + ) + ( + )>> + + + + + +> + +) + (T + )>> + + + + )> + + ) + ( + > + + + ) + ( + ) + ( + + )> + ) + ( + + )>) + (T + + + + + + + ) + (T + )>) + ( + ) + ( + ) + ( + ) + ( + > + + + +