attack.zabstr

<FLAGS-AND-DEFAULTS (("WORD-FLAGS-IN-TABLE" T)) ()>

<FILE-FLAGS SENTENCE-ENDS?> 
<BEGIN-SEGMENT NINJA> 
<BEGIN-SEGMENT YOKOHAMA> 
<OBJECT PISTOL (OWNER BLACKTHORNE) (DESC "pistol") (SYNONYM PISTOL GUN) (FLAGS
TAKEBIT WEAPONBIT) (ACTION PISTOL-F)> 
<DEFINE-ROUTINE PISTOL-F> 
<END-SEGMENT> 
<BEGIN-SEGMENT NINJA> 
<OBJECT POWDER-HORN (LOC BLACKTHORNE-QUARTERS) (DESC "powder horn") (SYNONYM
HORN POWDER) (ADJECTIVE POWDER) (FLAGS TAKEBIT) (ACTION POWDER-HORN-F)> 
<DEFINE-ROUTINE POWDER-HORN-F> 
<DEFINE-ROUTINE I-LOAD-PISTOL> 
<GLOBAL LOAD-PISTOL-CNT 0 %<> WORD> 
<DEFINE-ROUTINE MARIKO-FOLLOW-ME> 
<DEFINE-ROUTINE NINJA-TALK-TO-YABU> 
<DEFINE-ROUTINE NINJA-INTERRUPT-YABU> 
<DEFINE-ROUTINE NINJA-FOLLOW-YABU> 
<DEFINE-ROUTINE EXAMINE-MARIKO> 
<DEFINE-ROUTINE NINJA-TAKE-MARIKO> 
<ROOM PRIVATE-QUARTERS (LOC ROOMS) (SCENE S-NINJA) (DESC "Mariko's Quarters") (
OWNER MARIKO) (SYNONYM QUARTERS) (SCORE 6) (FDESC
"It is early in the morning of the day after Mariko's confrontation, two
or three hours before dawn.  After she woke, you and Mariko had an hour
alone together.  \"I still cannot believe that Ishido gave in,\" she
said.  \"I knew it was my karma to bring the hostages out of Osaka.  Only I could
do that for Lord Toranaga.  And now it's done.  But at what a cost,
neh?  Madonna forgive me.\"|
|
Now you, Mariko, Kiri, Lady Etsu, and Achiko, the granddaughter of Kiyama, are
together in Mariko's quarters.  You are still suspicious enough of Ishido's
intentions to be carrying your pistol.") (AFTER ETSU-AFTER-F) (NORTH TO
SECRET-REDOUBT IF SECRET-REDOUBT-DOOR IS OPEN) (IN TO SECRET-REDOUBT IF
SECRET-REDOUBT-DOOR IS OPEN) (SOUTH TO OUTER-ROOM IF NORTH-SHOJI IS OPEN) (OUT
TO OUTER-ROOM IF NORTH-SHOJI IS OPEN) (WEST TO PRIVATE-QUARTERS-2) (EAST TO
BLACKTHORNE-QUARTERS) (GLOBAL NORTH-SHOJI SECRET-REDOUBT-DOOR LG-NINJA LG-WOMEN
) (FLAGS ONBIT NOTHEBIT NOABIT) (ACTION PRIVATE-QUARTERS-F)> 
<DEFINE-ROUTINE PRIVATE-QUARTERS-F> 
<GLOBAL MARIKO-PLAN? <>> 
<OBJECT PLAN (LOC GENERIC-OBJECTS) (DESC "plan") (SYNONYM PLAN) (ADJECTIVE
SECRET) (FLAGS SCOREBIT)> 
<OBJECT CHIMMOKO (LOC OUTER-ROOM) (OWNER MARIKO) (DESC "Chimmoko") (SYNONYM
CHIMMOKO MAID) (FLAGS PERSON JAPANESEBIT FEMALE NOABIT NOTHEBIT) (ACTION
CHIMMOKO-F)> 
<DEFINE-ROUTINE CHIMMOKO-F> 
<DEFINE-ROUTINE I-CHIMMOKO> 
<OBJECT ETSU (LOC PRIVATE-QUARTERS-2) (DESC "Lady Etsu") (SYNONYM LADY ETSU) (
ADJECTIVE LADY OLD) (FLAGS PERSON JAPANESEBIT FEMALE NOABIT NOTHEBIT) (ACTION
ETSU-F)> 
<DEFINE-ROUTINE ETSU-F> 
<OBJECT ACHIKO (LOC PRIVATE-QUARTERS) (DESC "Achiko") (SYNONYM ACHIKO GIRL) (
ADJECTIVE LADY YOUNG KIYAMA) (FLAGS PERSON JAPANESEBIT FEMALE NOABIT NOTHEBIT)
(ACTION ACHIKO-F)> 
<DEFINE-ROUTINE ACHIKO-F> 
<DEFINE-ROUTINE I-WOMEN> 
<DEFINE-ROUTINE CHOREOGRAPH> 
<DEFINE-ROUTINE I-MARIKO-FOLLOW> 
<ROOM PRIVATE-QUARTERS-2 (LOC ROOMS) (SCENE S-NINJA) (DESC "Private Quarters")
(ADJECTIVE PRIVATE) (SYNONYM QUARTERS) (LDESC
"This is a smaller room, part of Mariko's quarters.  The Lady Etsu has
been staying here.") (EAST TO PRIVATE-QUARTERS) (FLAGS ONBIT) (GLOBAL LG-NINJA
LG-WOMEN)> 
<ROOM BLACKTHORNE-QUARTERS (LOC ROOMS) (SCENE S-NINJA) (DESC "Your Quarters") (
OWNER BLACKTHORNE) (SYNONYM QUARTERS ROOM) (ADJECTIVE SMALL) (LDESC
"This is a small room in which you are quartered.") (WEST TO PRIVATE-QUARTERS)
(OUT TO PRIVATE-QUARTERS) (FLAGS ONBIT) (GLOBAL LG-NINJA LG-WOMEN)> 
<ROOM SECRET-REDOUBT (LOC ROOMS) (SCENE S-NINJA) (DESC "Secret Redoubt") (
SYNONYM REDOUBT BOLTHOLE HOLE HAVEN) (ADJECTIVE SECRET BOLT) (SOUTH TO
PRIVATE-QUARTERS IF SECRET-REDOUBT-DOOR IS OPEN) (NORTH TO BALCONY IF
BALCONY-DOOR IS OPEN) (OUT TO BALCONY IF BALCONY-DOOR IS OPEN) (GLOBAL
SECRET-REDOUBT-DOOR BALCONY-DOOR LG-NINJA LG-WOMEN) (FLAGS ONBIT) (ACTION
SECRET-REDOUBT-F)> 
<DEFINE-ROUTINE SECRET-REDOUBT-F> 
<DEFINE-ROUTINE BOLT-STATE> 
<DEFINE-ROUTINE BOLTS-REMAINING> 
<OBJECT BOLTS (LOC SECRET-REDOUBT) (DESC "bolt") (SYNONYM BOLT BOLTS) (
ADJECTIVE IRON FIRST SECOND THIRD) (FLAGS NDESCBIT OPENBIT OPENABLE) (COUNT 7)
(ACTION BOLTS-F)> 
<DEFINE-ROUTINE BOLTS-F> 
<OBJECT SECRET-REDOUBT-DOOR (LOC LOCAL-GLOBALS) (DESC "secret door") (LDESC
"The iron-bound door lies shattered in a corner.") (SYNONYM DOOR) (ADJECTIVE
SECRET HIDDEN IRON-FORTIFIED IRON) (FLAGS INVISIBLE DOORBIT LOCKABLE) (ACTION
SECRET-REDOUBT-DOOR-F)> 
<DEFINE-ROUTINE SECRET-REDOUBT-DOOR-F> 
<OBJECT BALCONY-DOOR (LOC LOCAL-GLOBALS) (DESC "balcony door") (SYNONYM DOOR) (
ADJECTIVE BALCONY) (FLAGS DOORBIT LOCKABLE TRYTAKEBIT) (ACTION BALCONY-DOOR-F)>

<DEFINE-ROUTINE BALCONY-DOOR-F> 
<NEW-ADD-WORD "CATCHES" NOUN <VOC "CATCH"> ,PLURAL-FLAG> 
<OBJECT TOP-CATCH (LOC SECRET-REDOUBT) (DESC "top catch") (SYNONYM CATCH) (
ADJECTIVE UPPER TOP RUSTY IRON) (FLAGS NDESCBIT OPENABLE LOCKED) (ACTION
CATCH-F)> 
<OBJECT BOTTOM-CATCH (LOC SECRET-REDOUBT) (DESC "bottom catch") (SYNONYM CATCH)
(ADJECTIVE LOWER BOTTOM RUSTY IRON) (FLAGS NDESCBIT OPENABLE LOCKED) (ACTION
CATCH-F)> 
<DEFINE-ROUTINE CATCH-F> 
<ROOM BALCONY (LOC ROOMS) (DESC "Balcony") (SYNONYM BALCONY) (LDESC
"This is a small balcony surrounded by a low battlement.  The night air
is cool and sweet here after the smoke and confusion inside.  The only
exit is back into the redoubt.  This is as far as you can retreat.") (IN TO
SECRET-REDOUBT IF BALCONY-DOOR IS OPEN) (SOUTH TO SECRET-REDOUBT IF
BALCONY-DOOR IS OPEN) (FLAGS ONBIT OUTSIDE) (GLOBAL BALCONY-DOOR LG-NINJA
LG-WOMEN) (ACTION BALCONY-F)> 
<DEFINE-ROUTINE BALCONY-F> 
<OBJECT NORTH-SHOJI (LOC LOCAL-GLOBALS) (DESC "inner shoji") (SYNONYM SHOJI
DOOR) (ADJECTIVE INNER) (FLAGS DOORBIT)> 
<OBJECT SOUTH-SHOJI (LOC LOCAL-GLOBALS) (DESC "outer shoji") (SYNONYM SHOJI
DOOR) (ADJECTIVE OUTER) (FLAGS DOORBIT)> 
<ROOM OUTER-ROOM (LOC ROOMS) (DESC "Outer Room") (SYNONYM ROOM) (ADJECTIVE
OUTER) (LDESC "This is a waiting room outside Mariko's quarters.  There are shoji
screens all around.  One opens north to the private rooms, and one
south to the inner corridor.") (NORTH TO PRIVATE-QUARTERS IF NORTH-SHOJI IS
OPEN) (IN TO PRIVATE-QUARTERS IF NORTH-SHOJI IS OPEN) (OUT TO INNER-CORRIDOR IF
SOUTH-SHOJI IS OPEN) (SOUTH TO INNER-CORRIDOR IF SOUTH-SHOJI IS OPEN) (FLAGS
ONBIT) (GLOBAL LG-NINJA NORTH-SHOJI SOUTH-SHOJI LG-WOMEN) (ACTION OUTER-ROOM-F)
> 
<DEFINE-ROUTINE OUTER-ROOM-F> 
<DEFINE-ROUTINE I-YABU-LEAVES> 
<GLOBAL FOLLOW-FLAG <>> 
<DEFINE-ROUTINE SETUP-FOLLOW-YABU> 
<DEFINE-ROUTINE I-FOLLOW-YABU> 
<GLOBAL YABU-BETRAYED? <>> 
<DEFINE-ROUTINE I-YABU> 
<GLOBAL YABU-CNT 0 %<> WORD> 
<ROOM STAIRS (LOC ROOMS) (DESC "Winding Stairs") (SYNONYM STAIRS) (ADJECTIVE
WINDING) (LDESC "This is the main staircase leading from the tower to the cellars of Toranaga's
keep at Osaka.") (UP TO OUTER-CORRIDOR) (DOWN TO SERVANTS-QUARTERS) (FLAGS
ONBIT) (ACTION STAIRS-F)> 
<DEFINE-ROUTINE STAIRS-F> 
<ROOM SERVANTS-QUARTERS (LOC ROOMS) (SCENE S-NINJA) (DESC "Servants' Quarters")
(SYNONYM QUARTERS) (ADJECTIVE SERVANTS) (LDESC
"This is a crowded, narrow room full of servants.  Many of them are
asleep.  Others are kneeling, head to flagstones.  A stairway leads
down to the cellars from here.") (UP TO STAIRS) (DOWN TO CELLARS) (FLAGS ONBIT)
(ACTION SERVANTS-QUARTERS-F)> 
<DEFINE-ROUTINE SERVANTS-QUARTERS-F> 
<OBJECT SERVANTS (LOC SERVANTS-QUARTERS) (DESC "servants") (SYNONYM SERVANTS
SERVANT) (FLAGS NDESCBIT PERSON JAPANESEBIT PLURAL OPENBIT CONTBIT SEARCHBIT) (
ACTION SERVANTS-F)> 
<DEFINE-ROUTINE SERVANTS-F> 
<ROOM CELLARS (LOC ROOMS) (DESC "Cellars") (SYNONYM CELLAR CELLARS) (UP TO
SERVANTS-QUARTERS) (GLOBAL CELLAR-DOOR) (FLAGS ONBIT SCOREBIT) (ACTION
CELLARS-F)> 
<DEFINE-ROUTINE CELLARS-F> 
<OBJECT BARRELS (LOC CELLARS) (DESC "crates, barrels, and boxes") (SYNONYM
CRATE BARREL BOX CRATES BARRELS BOXES PILE STACK) (FLAGS NDESCBIT FURNITURE
SURFACEBIT VEHBIT SCOREBIT) (ACTION BARRELS-F)> 
<DEFINE-ROUTINE BARRELS-F> 
<OBJECT CELLAR-DOOR (LOC LOCAL-GLOBALS) (DESC "iron-bound door") (SYNONYM DOOR)
(ADJECTIVE CELLAR IRON-BOUND IRON BOUND) (FLAGS AN DOORBIT LOCKABLE) (ACTION
CELLAR-DOOR-F)> 
<DEFINE-ROUTINE CELLAR-DOOR-F> 
<ROOM INNER-CORRIDOR (LOC ROOMS) (DESC "Inner Corridor") (SYNONYM CORRIDOR) (
ADJECTIVE INNER) (LDESC
"This inner corridor is between the Audience Chamber to the west, and
the inner apartments of the keep to the north.  A sturdy iron-barred door
separates the Audience Chamber and the corridor.") (NORTH TO OUTER-ROOM IF
SOUTH-SHOJI IS OPEN) (IN TO OUTER-ROOM IF SOUTH-SHOJI IS OPEN) (WEST TO
AUDIENCE-CHAMBER IF INNER-DOOR IS OPEN) (OUT TO AUDIENCE-CHAMBER IF INNER-DOOR
IS OPEN) (GLOBAL INNER-DOOR LG-NINJA SOUTH-SHOJI GUARDS) (FLAGS ONBIT) (ACTION
INNER-CORRIDOR-F)> 
<DEFINE-ROUTINE INNER-CORRIDOR-F> 
<DEFINE-ROUTINE YABU-LISTENS> 
<GLOBAL YABU-HEARD? <>> 
<ROOM SECRET-ROOM (LOC ROOMS) (DESC "Secret Room") (SYNONYM ROOM) (ADJECTIVE
SECRET) (LDESC "This is a secret room south of the Audience Chamber. A dark and narrow
stairway leads down as well.") (NORTH TO AUDIENCE-CHAMBER IF SECRET-ROOM-DOOR
IS OPEN) (GLOBAL SECRET-ROOM-DOOR LG-NINJA) (FLAGS ONBIT) (ACTION SECRET-ROOM-F
)> 
<DEFINE-ROUTINE SECRET-ROOM-F> 
<OBJECT SECRET-ROOM-DOOR (LOC LOCAL-GLOBALS) (DESC "secret door") (SYNONYM DOOR
) (ADJECTIVE SECRET) (FLAGS INVISIBLE DOORBIT LOCKABLE)> 
<OBJECT INNER-DOOR (LOC LOCAL-GLOBALS) (DESC "iron-barred inner door") (SYNONYM
DOOR) (ADJECTIVE IRON-BARRED IRON-BOUND INNER STURDY) (FLAGS DOORBIT OPENBIT
LOCKABLE) (ACTION INNER-DOOR-F)> 
<DEFINE-ROUTINE INNER-DOOR-F> 
<OBJECT IRON-BAR (LOC INNER-CORRIDOR) (DESC "iron bar") (SYNONYM BAR) (
ADJECTIVE IRON) (FLAGS NDESCBIT OPENBIT OPENABLE) (ACTION IRON-BAR-F)> 
<DEFINE-ROUTINE IRON-BAR-F> 
<OBJECT OUTER-DOOR (LOC LOCAL-GLOBALS) (DESC "outer door") (SYNONYM DOOR) (
ADJECTIVE OUTER) (FLAGS AN LOCKABLE DOORBIT OPENBIT)> 
<DEFINE-ROUTINE I-ATTACK> 
<GLOBAL ATTACK-CNT 0 %<> WORD> 
<BEGIN-SEGMENT PRISON> 
<OBJECT GRAY-CAPTAIN (SCENE S-NINJA S-PRISON) (OWNER <>) (DESC "Gray Captain")
(SYNONYM CAPTAIN) (ADJECTIVE GRAY) (FLAGS PERSON) (HEALTH 4) (GENERIC
GENERIC-CAPTAIN-F) (ACTION GRAY-CAPTAIN-F)> 
<DEFINE-ROUTINE GRAY-CAPTAIN-F> 
<END-SEGMENT> 
<BEGIN-SEGMENT NINJA> 
<CONSTANT J-PLUNGE 170> 
<CONSTANT J-CELLAR 171> 
<CONSTANT J-SHOOT 172> 
<CONSTANT J-FOLLOW-CLOSE 173> 
<CONSTANT J-REAR-GUARD 174> 
<CONSTANT J-KILL-CAPTAIN 175> 
<CONSTANT J-KILL-GUARDS 176> 
<CONSTANT J-CALTROPS 177> 
<OBJECT GUARDS (DESC "guards") (SYNONYM GUARDS GUARD) (ADJECTIVE SAMURAI GRAY
BROWN) (FLAGS PERSON JAPANESEBIT PLURAL NOABIT) (GENERIC GENERIC-SAMURAI-F) (
DESCFCN GUARDS-DESC) (ACTION GUARDS-F)> 
<DEFINE-ROUTINE GUARDS-DESC> 
<DEFINE-ROUTINE GUARDS-F> 
<OBJECT LG-NINJA (LOC LOCAL-GLOBALS) (DESC "ninja") (SYNONYM NINJA FIGURE MEN)
(ADJECTIVE RED SPOT BLACK CLAD) (FLAGS INVISIBLE PERSON) (GENERIC
GENERIC-NINJA-F) (ACTION LG-NINJA-F)> 
<DEFINE-ROUTINE LG-NINJA-F> 
<OBJECT NINJA-LEADER (LOC SECRET-ROOM) (DESC "ninja leader") (SYNONYM LEADER
MAN) (ADJECTIVE RED SPOT NINJA) (FLAGS NDESCBIT PERSON JAPANESEBIT SCOREBIT) (
ACTION NINJA-F)> 
<OBJECT NINJA (LOC SECRET-ROOM) (DESC "ninja") (SYNONYM NINJA FIGURE MEN) (
ADJECTIVE RED SPOT BLACK CLAD) (FLAGS PERSON JAPANESEBIT SCOREBIT PLURAL) (
COUNT 5) (DESCFCN NINJA-DESC) (GENERIC GENERIC-NINJA-F) (ACTION NINJA-F)> 
<DEFINE-ROUTINE GENERIC-NINJA-F> 
<DEFINE-ROUTINE NINJA-DESC> 
<DEFINE-ROUTINE NINJA-F> 
<DEFINE-ROUTINE I-CAPTAIN-RETURNS> 
<DEFINE-ROUTINE I-NINJA> 
<GLOBAL NINJA-COWED-CNT 0 %<> WORD> 
<GLOBAL CAPTURE-CNT 0 %<> WORD> 
<GLOBAL CAPTURE-CNT 0 %<> WORD> 
<GLOBAL KNOCKOUT-CNT 0 %<> WORD> 
<DEFINE-ROUTINE SETUP-FOLLOW-NINJA> 
<DEFINE-ROUTINE I-FOLLOW-NINJA> 
<DEFINE-ROUTINE I-MARIKO-STRUGGLES> 
<DEFINE-ROUTINE I-NINJA-TAKE-MARIKO> 
<OBJECT CALTROPS (LOC NINJA) (DESC "caltrops") (SYNONYM CALTROPS CALTROP BALLS
BALL) (ADJECTIVE TINY SPIKED METAL) (FLAGS TAKEBIT PLURAL) (ACTION CALTROPS-F)>

<GLOBAL AVOID-CALTROPS? <>> 
<DEFINE-ROUTINE CALTROPS-F> 
<OBJECT SMOKE-BOMB (LOC NINJA) (DESC "smoke") (SYNONYM BOMB SMOKE) (ADJECTIVE
SMOKE) (FLAGS NDESCBIT) (ACTION SMOKE-BOMB-F)> 
<DEFINE-ROUTINE SMOKE-BOMB-F> 
<DEFINE-ROUTINE I-REMOVE-SMOKE> 
<OBJECT FIRE-BOMB (LOC NINJA) (DESC "fire bomb") (SYNONYM BOMB FIRE) (ADJECTIVE
FIRE) (FLAGS NDESCBIT) (ACTION FIRE-BOMB-F)> 
<DEFINE-ROUTINE FIRE-BOMB-F> 
<DEFINE-ROUTINE I-REMOVE-FIRE> 
<CONSTANT MARIKO-STRUGGLES <LTABLE 0 "dragging a struggling Mariko with them."
"pulling Mariko along." "several manhandling Mariko into step with them."
"Mariko being pushed along ahead of them.">> 
<GLOBAL NINJA-ATTACKING-CUL-DE-SAC? <>> 
<DEFINE-ROUTINE I-NINJA-COWED> 
<DEFINE-ROUTINE I-NINJA-VS-INNER-DOOR> 
<GLOBAL DOOR-CNT 0 %<> WORD> 
<OBJECT DOOR-CRACK (DESC "crack") (SYNONYM CRACK) (FLAGS NDESCBIT) (ACTION
DOOR-CRACK-F)> 
<DEFINE-ROUTINE DOOR-CRACK-F> 
<DEFINE-ROUTINE I-NINJA-VS-SECRET-DOOR> 
<GLOBAL DOOR-CNT 0 %<> WORD> 
<DEFINE-ROUTINE ETSU-AFTER-F> 
<OBJECT ROSARY (DESC "rosary") (SYNONYM ROSARY CROSS) (ADJECTIVE GOLD TINY
GOLDEN) (FLAGS TAKEBIT WEARBIT) (ACTION ROSARY-F)> 
<DEFINE-ROUTINE ROSARY-F> 
<END-SEGMENT> 
<BEGIN-SEGMENT YOKOHAMA> 
<CONSTANT J-GRAB-PISTOL 180> 
<ROOM YOKOHAMA (LOC ROOMS) (SCENE S-YOKOHAMA) (DESC "Yokohama") (FDESC
"You recuperate for a few days, and then, to your surprise, your guards are
gone.  You are taken down to the dock, where you are met by the Captain-General
of the Black Ship, Ferriera, and dell'Aqua, the Father-Visitor of the Jesuits.|
|
Dell'Aqua says, \"Pilot, I'm taking you to your galley.  Are you all right?\"|
|
\"You're really letting me go?  Why?\"|
|
\"Because the Lady Mariko asked us to protect you.\"|
|
\"But that's no reason!  You wouldn't do that just because she asked you.\"|
|
\"I agree,\" Ferriera says.  \"Eminence, why not tell him the whole truth?\"|
|
\"It doesn't make sense.  You know I'm going to destroy you.  I'll take your
Black Ship.\"|
|
Ferriera laughs scornfully.  \"With what, Ingeles?  You have no ship!\"") (
FLAGS OUTSIDE ONBIT SCOREBIT) (SCORE 1) (GLOBAL LG-ERASMUS LG-SEA) (ACTION
YOKOHAMA-F)> 
<DEFINE-ROUTINE YOKOHAMA-F> 
<OBJECT HEADS (LOC YOKOHAMA) (DESC "severed heads") (SYNONYM HEADS HEAD POLE
POLES REMAINS) (ADJECTIVE SEVERED GRISLY DEAD) (FLAGS NDESCBIT) (ACTION HEADS-F
)> 
<DEFINE-ROUTINE HEADS-F> 
<DEFINE-ROUTINE I-VINCK-NUTS> 
<GLOBAL VINCK-CNT 0 %<> WORD> 
<END-SEGMENT> 
<BEGIN-SEGMENT AFTERMATH> 
<ROOM STABLE (LOC ROOMS) (SCENE S-AFTERMATH) (SCORE 3) (AFTER NEVER-AFTER-F) (
FDESC "Toranaga is checking the girths of his saddle.  Deftly he knees the
horse in the belly, her stomach muscles relax, and he tightens the
strap another two notches.  Rotten animal, he thinks, despising horses
for their constant trickeries and treacheries and ill-tempered
dangerousness.  He waits a moment and knees the horse hard again.  The
horse grunts and rattles her bridle and he tightens the straps completely.|
|
\"Good, Sire!  Very good,\" the Hunt Master says with admiration.  \"Many
would have been satisfied the first time.\"") (DESC "Stable") (SYNONYM STABLE)
(LDESC "This is the stable area of the camp at Anjiro.") (FLAGS ONBIT OUTSIDE)
(GLOBAL LG-SHIP LG-NINJA CELLAR-DOOR) (ACTION STABLE-F)> 
<DEFINE-ROUTINE STABLE-F> 
<DEFINE-ROUTINE I-STABLE> 
<GLOBAL STABLE-CNT 0 %<> WORD> 
<DEFINE-ROUTINE TORANAGA-LOSES-PATIENCE> 
<DEFINE-ROUTINE BUILD-ANOTHER-SHIP> 
<DEFINE-ROUTINE AFTERMATH-ANSWERS> 
<DEFINE-ROUTINE YABU-BETRAYED-YOU> 
<DEFINE-ROUTINE YABU-LET-IN-NINJA?> 
<GLOBAL AFTERMATH-QUESTION <>> 
<OBJECT SEALED-SCROLL (SDESC "sealed scroll") (OWNER MARIKO) (SCENE S-AFTERMATH
) (SYNONYM SCROLL LETTER MESSAGE SEAL) (ADJECTIVE SEALED RICE-PAPER) (FLAGS
CONTBIT SEARCHBIT TAKEBIT READBIT SCOREBIT OPENABLE) (ACTION SEALED-SCROLL-F)> 
<DEFINE-ROUTINE SEALED-SCROLL-F> 
<OBJECT PEDESTAL (DESC "pedestal") (SCENE S-AFTERMATH) (SYNONYM PEDESTAL SPIKE)
(ADJECTIVE SMALL) (FLAGS OPENBIT CONTBIT SEARCHBIT TAKEBIT) (ACTION YABU-HEAD-F
)> 
<OBJECT YABU-HEAD (LOC PEDESTAL) (DESC "head") (SCENE S-AFTERMATH) (OWNER YABU)
(SYNONYM HEAD MASK) (ADJECTIVE DEATH) (FLAGS PERSON DEAD TAKEBIT) (ACTION
YABU-HEAD-F)> 
<DEFINE-ROUTINE YABU-HEAD-F> 
<DEFINE-ROUTINE NEVER-AFTER-F> 
<END-SEGMENT> 
<BEGIN-SEGMENT SEKIGAHARA> 
<ROOM SEKIGAHARA (LOC ROOMS) (SCENE S-EPILOGUE) (DESC "Sekigahara") (FLAGS
ONBIT) (SCORE 0) (ACTION SEKIGAHARA-F)> 
<DEFINE-ROUTINE SEKIGAHARA-F> 
<END-SEGMENT>