diff --git a/Lynne Simulator.inform/Build/Debug log.txt b/Lynne Simulator.inform/Build/Debug log.txt
deleted file mode 100644
index 27b8f26..0000000
--- a/Lynne Simulator.inform/Build/Debug log.txt
+++ /dev/null
@@ -1,198 +0,0 @@
-Debugging log of Inform 7
-Inform called as: /usr/libexec/gnome-inform7/ni -internal /usr/share/gnome-inform7 -format=ulx -project /home/lynne/Nextcloud/Projects/games/lynne-simulator/Lynne Simulator.inform
-Found language bundle 'Swedish' (built in)
-Found language bundle 'Spanish' (built in)
-Found language bundle 'French' (built in)
-Found language bundle 'German' (built in)
-Found language bundle 'English' (built in)
-Found language bundle 'Italian' (built in)
-Reading language definition from
-720 declarations read (14183 words)
-
-
------------------------------------------------------
-Phase I ... Lexical analysis
------------------------------------------------------
-
-I've now read your source text, which is 325 words long.
-
-
------------------------------------------------------
-Phase II ... Semantic analysis Ia
------------------------------------------------------
-
-I've also read Standard Rules by Graham Nelson, which is 42655 words long.
-I've also read English Language by Graham Nelson, which is 2297 words long.
-
-
------------------------------------------------------
-Phase III ... Initialise language semantics
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase IV ... Semantic analysis Ib
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase V ... Semantic analysis II
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase VI ... Semantic analysis III
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase VII ... First pass through assertions
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase VIII ... Second pass through assertions
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase IX ... Making the model world
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase X ... Tables and grammar
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase XI ... Phrases and rules
------------------------------------------------------
-
-
-
------------------------------------------------------
-Phase XII ... Code generation
------------------------------------------------------
-
-
-
-==== Phase XII.1 ... Compiling the storage for the model world ====
-
-
-
-==== Phase XII.2 ... Compiling the tables ====
-
-
-
-==== Phase XII.3 ... Compiling the equations ====
-
-
-
-==== Phase XII.4 ... Compiling the named action patterns ====
-
-
-
-==== Phase XII.5 ... Compiling the action routines ====
-
-
-
-==== Phase XII.6 ... Compiling first block of phrases ====
-
-
-
-==== Phase XII.7 ... Compiling the rulebooks ====
-
-
-
-==== Phase XII.8 ... Compiling scene details ====
-
-
-
-==== Phase XII.9 ... CTNL ====
-
-
-
-==== Phase XII.10 ... Slashing grammar (G1) ====
-
-
-
-==== Phase XII.11 ... Determining grammar (G2) ====
-
-
-
-==== Phase XII.12 ... Compiling GPR tokens for parsing various kinds of value ====
-
-
-
-==== Phase XII.13 ... Compiling second block of phrases ====
-
-
-
-==== Phase XII.14 ... Compiling noun and scope filter tokens ====
-
-
-
-==== Phase XII.15 ... Compiling chronology ====
-
-
-
-==== Phase XII.16 ... Compiling I6 Verb directives ====
-
-
-
-==== Phase XII.17 ... Slashing grammar (G1) ====
-
-
-
-==== Phase XII.18 ... Determining grammar (G2) ====
-
-
-
-==== Phase XII.19 ... Sorting and compiling non-value grammar (G3, G4) ====
-
-
-
-==== Phase XII.20 ... Compiling noun and scope filter tokens ====
-
-
-
-==== Phase XII.21 ... Compiling routines from predicate calculus ====
-
-Providing for a total heap of 8192, given requirement of 8192
-
-
------------------------------------------------------
-Phase XIII ... Compilation now complete
------------------------------------------------------
-
-Total of 102 files written as streams.
-CPU time: 207 centiseconds
-
-
-That concludes the debugging log from this run of Inform.
-Its contents were as follows, and can be changed by placing
-text like 'Include property creations in the debugging log.'
-or 'Omit everything from the debugging log.' in the source.
-
-Included:
- debugging log contents debugging log inclusions
-Omitted:
- action creations action pattern compilation action pattern parsing assemblies assertions case insensitive filehandling
- conditions constructed past participles constructed plurals description compilation excerpt meanings excerpt parsing
- expressions extensions census figure creations grammar grammar construction headings
- implications inferences kind changes kind checking kind creations lexical output
- local variables matching meaning list allocation memory allocation noun resolution object compilation
- object creations object tree phrase comparisons phrase compilation phrase creations phrase registration
- phrase usage predicate calculus predicate calculus workings pronouns property creations property provision
- property translations relation definitions rule attachments rulebook compilation spatial map spatial map workings
- specification permissions specification usage specificities table construction template reading text substitutions
- time periods variable creations verifications vocabulary
diff --git a/Lynne Simulator.inform/Build/Problems.html b/Lynne Simulator.inform/Build/Problems.html
deleted file mode 100644
index fdb3ee2..0000000
--- a/Lynne Simulator.inform/Build/Problems.html
+++ /dev/null
@@ -1,320 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
Report on Translation: Succeeded
-
Produced by Inform 7 (build 6M62)
-
-
-
-
-
-
-
-
-
-
-
-
(Each time Go or Replay is clicked, Inform tries to translate the source text into a working story, and updates this report.)
-
- The 325-word source text has successfully been translated into a world with 1 room and 15 things, and the index has been brought up to date.
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Lynne Simulator.inform/Build/auto.inf b/Lynne Simulator.inform/Build/auto.inf
deleted file mode 100644
index 8ec1a52..0000000
--- a/Lynne Simulator.inform/Build/auto.inf
+++ /dev/null
@@ -1,56630 +0,0 @@
-!% -s
-!% $ALLOC_CHUNK_SIZE=32000
-!% $MAX_ARRAYS=10000
-!% $MAX_CLASSES=200
-!% $MAX_VERBS=255
-!% $MAX_LABELS=200000
-!% $MAX_ZCODE_SIZE=500000
-!% $MAX_STATIC_DATA=180000
-!% $MAX_PROP_TABLE_SIZE=200000
-!% $MAX_INDIV_PROP_TABLE_SIZE=20000
-!% $MAX_STACK_SIZE=65536
-!% $MAX_SYMBOLS=20000
-!% $MAX_EXPRESSION_NODES=256
-!% $MAX_LOCAL_VARIABLES=256
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Other Configuration
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant Grammar__Version 2;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Identification
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! This file was compiled by Inform 7: the build number and version of the
-! I6 template layer used are as follows.
-Constant NI_BUILD_COUNT "6M62";
-
-Constant LibSerial = "080126";
-Constant LibRelease = "6/12N";
-Constant LIBRARY_VERSION = 612;
-
-Constant PLUGIN_FILES;
-
-
-Array UUID_ARRAY string "UUID://13511FF2-E72F-11E9-9B9B-0811963CEDC0//";
-
-Global Story = BC_0;
-Constant Headline BC_1;
-Constant Story_Author BC_2;
-Release 1;
-Serial "191005";
-
-Default Story 0;
-Default Headline 0;
-
-[ ShowExtensionVersions ;
- print "Standard Rules version 3/120430 by Graham Nelson^";
-];
-[ ShowFullExtensionVersions ;
- print "Standard Rules version 3/120430 by Graham Nelson^";
- print "English Language version 1 by Graham Nelson^";
-];
-[ ShowOneExtension
- id ! Implied call parameter
- ;
- if (id == 1) print "Standard Rules version 3/120430 by Graham Nelson";
- if (id == 2) print "English Language version 1 by Graham Nelson";
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Use options
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! Use option:
- Constant DynamicMemoryAllocation = 8192;
-! Use option:
- Constant TEXT_TY_BufferSize = 1024+3;
-! Use option:
- Constant MAX_FIGURE_THUMBNAILS_IN_INDEX = 50;
-! Use option:
- Constant MATCH_LIST_WORDS = 100;
-! Use option:
- Constant DEFAULT_BRIEF_DESCRIPTIONS;
-
-
-#Ifndef USE_SCORING;
-Constant USE_SCORING = 0;
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Constants
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: VM Target Constants
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifndef WORDSIZE; ! compiling with Z-code only compiler
-Constant TARGET_ZCODE;
-Constant WORDSIZE 2;
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Wordsize-Dependent Definitions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Iftrue (WORDSIZE == 2);
-Constant NULL = $ffff;
-Constant WORD_HIGHBIT = $8000;
-Constant WORD_NEXTTOHIGHBIT = $4000;
-Constant IMPROBABLE_VALUE = $7fe3;
-Constant MAX_POSITIVE_NUMBER 32767;
-Constant MIN_NEGATIVE_NUMBER -32768;
-Constant REPARSE_CODE = 10000;
-#Endif;
-
-#Iftrue (WORDSIZE == 4);
-Constant NULL = $ffffffff;
-Constant WORD_HIGHBIT = $80000000;
-Constant WORD_NEXTTOHIGHBIT = $40000000;
-Constant IMPROBABLE_VALUE = $deadce11;
-Constant MAX_POSITIVE_NUMBER 2147483647;
-Constant MIN_NEGATIVE_NUMBER -2147483648;
-Constant REPARSE_CODE = $40000000;
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Z-Machine Definitions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef TARGET_ZCODE;
-
-Global max_z_object;
-
-Constant INDIV_PROP_START 64;
-
-! Offsets into Z-machine header:
-
-Constant HDR_ZCODEVERSION = $00; ! byte
-Constant HDR_TERPFLAGS = $01; ! byte
-Constant HDR_GAMERELEASE = $02; ! word
-Constant HDR_HIGHMEMORY = $04; ! word
-Constant HDR_INITIALPC = $06; ! word
-Constant HDR_DICTIONARY = $08; ! word
-Constant HDR_OBJECTS = $0A; ! word
-Constant HDR_GLOBALS = $0C; ! word
-Constant HDR_STATICMEMORY = $0E; ! word
-Constant HDR_GAMEFLAGS = $10; ! word
-Constant HDR_GAMESERIAL = $12; ! six ASCII characters
-Constant HDR_ABBREVIATIONS = $18; ! word
-Constant HDR_FILELENGTH = $1A; ! word
-Constant HDR_CHECKSUM = $1C; ! word
-Constant HDR_TERPNUMBER = $1E; ! byte
-Constant HDR_TERPVERSION = $1F; ! byte
-Constant HDR_SCREENHLINES = $20; ! byte
-Constant HDR_SCREENWCHARS = $21; ! byte
-Constant HDR_SCREENWUNITS = $22; ! word
-Constant HDR_SCREENHUNITS = $24; ! word
-Constant HDR_FONTWUNITS = $26; ! byte
-Constant HDR_FONTHUNITS = $27; ! byte
-Constant HDR_ROUTINEOFFSET = $28; ! word
-Constant HDR_STRINGOFFSET = $2A; ! word
-Constant HDR_BGCOLOUR = $2C; ! byte
-Constant HDR_FGCOLOUR = $2D; ! byte
-Constant HDR_TERMCHARS = $2E; ! word
-Constant HDR_PIXELSTO3 = $30; ! word
-Constant HDR_TERPSTANDARD = $32; ! two bytes
-Constant HDR_ALPHABET = $34; ! word
-Constant HDR_EXTENSION = $36; ! word
-Constant HDR_UNUSED = $38; ! two words
-Constant HDR_INFORMVERSION = $3C; ! four ASCII characters
-
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Glulx Definitions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF TARGET_GLULX;
-
-Global unicode_gestalt_ok; ! Set if interpreter supports Unicode
-
-! Offsets into Glulx header and start of ROM:
-
-Constant HDR_MAGICNUMBER = $00; ! long word
-Constant HDR_GLULXVERSION = $04; ! long word
-Constant HDR_RAMSTART = $08; ! long word
-Constant HDR_EXTSTART = $0C; ! long word
-Constant HDR_ENDMEM = $10; ! long word
-Constant HDR_STACKSIZE = $14; ! long word
-Constant HDR_STARTFUNC = $18; ! long word
-Constant HDR_DECODINGTBL = $1C; ! long word
-Constant HDR_CHECKSUM = $20; ! long word
-Constant ROM_INFO = $24; ! four ASCII characters
-Constant ROM_MEMORYLAYOUT = $28; ! long word
-Constant ROM_INFORMVERSION = $2C; ! four ASCII characters
-Constant ROM_COMPVERSION = $30; ! four ASCII characters
-Constant ROM_GAMERELEASE = $34; ! short word
-Constant ROM_GAMESERIAL = $36; ! six ASCII characters
-
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Powers of Two
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array PowersOfTwo_TB
- --> $$100000000000
- $$010000000000
- $$001000000000
- $$000100000000
- $$000010000000
- $$000001000000
- $$000000100000
- $$000000010000
- $$000000001000
- $$000000000100
- $$000000000010
- $$000000000001;
-
-Array IncreasingPowersOfTwo_TB
- --> $$0000000000000001
- $$0000000000000010
- $$0000000000000100
- $$0000000000001000
- $$0000000000010000
- $$0000000000100000
- $$0000000001000000
- $$0000000010000000
- $$0000000100000000
- $$0000001000000000
- $$0000010000000000
- $$0000100000000000
- $$0001000000000000
- $$0010000000000000
- $$0100000000000000
- $$1000000000000000;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Text Styles
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant NORMAL_VMSTY = 0;
-Constant HEADER_VMSTY = 3;
-Constant SUBHEADER_VMSTY = 4;
-Constant ALERT_VMSTY = 5;
-Constant NOTE_VMSTY = 6;
-Constant BLOCKQUOTE_VMSTY = 7;
-Constant INPUT_VMSTY = 8;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Colour Numbers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant CLR_DEFAULT = 1;
-Constant CLR_BLACK = 2;
-Constant CLR_RED = 3;
-Constant CLR_GREEN = 4;
-Constant CLR_YELLOW = 5;
-Constant CLR_BLUE = 6;
-Constant CLR_MAGENTA = 7; Constant CLR_PURPLE = 7;
-Constant CLR_CYAN = 8; Constant CLR_AZURE = 8;
-Constant CLR_WHITE = 9;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Window Numbers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant WIN_ALL = 0; ! Both windows at once
-Constant WIN_STATUS = 1;
-Constant WIN_MAIN = 2;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Paragraphing Flags
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant PARA_COMPLETED = 1;
-Constant PARA_PROMPTSKIP = 2;
-Constant PARA_SUPPRESSPROMPTSKIP = 4;
-Constant PARA_NORULEBOOKBREAKS = 8;
-Constant PARA_CONTENTEXPECTED = 16;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Descriptors in the Language of Play
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant POSSESS_PK = $100;
-Constant DEFART_PK = $101;
-Constant INDEFART_PK = $102;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Run-Time Problem Numbers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RTP_BACKDROP = 1;
-Constant RTP_EXITDOOR = 2;
-Constant RTP_NOEXIT = 3;
-Constant RTP_CANTCHANGE = 4;
-Constant RTP_IMPREL = 5;
-Constant RTP_RULESTACK = 6; ! Now out of use
-Constant RTP_TOOMANYRULEBOOKS = 7;
-Constant RTP_TOOMANYEVENTS = 8;
-Constant RTP_BADPROPERTY = 9;
-Constant RTP_UNPROVIDED = 10;
-Constant RTP_UNSET = 11;
-Constant RTP_TOOMANYACTS = 12;
-Constant RTP_CANTABANDON = 13;
-Constant RTP_CANTEND = 14;
-Constant RTP_CANTMOVENOTHING = 15;
-Constant RTP_CANTREMOVENOTHING = 16;
-Constant RTP_DIVZERO = 17;
-Constant RTP_BADVALUEPROPERTY = 18;
-Constant RTP_NOTBACKDROP = 19;
-Constant RTP_TABLE_NOCOL = 20;
-Constant RTP_TABLE_NOCORR = 21;
-Constant RTP_TABLE_NOROW = 22;
-Constant RTP_TABLE_NOENTRY = 23;
-Constant RTP_TABLE_NOTABLE = 24;
-Constant RTP_TABLE_NOMOREBLANKS = 25;
-Constant RTP_TABLE_NOROWS = 26;
-Constant RTP_TABLE_CANTSORT = 27;
-Constant RTP_NOTINAROOM = 28;
-Constant RTP_BADTOPIC = 29;
-Constant RTP_ROUTELESS = 30;
-Constant RTP_PROPOFNOTHING = 31;
-Constant RTP_DECIDEONWRONGKIND = 32;
-Constant RTP_DECIDEONNOTHING = 33;
-Constant RTP_TABLE_CANTSAVE = 34;
-Constant RTP_TABLE_WONTFIT = 35;
-Constant RTP_TABLE_BADFILE = 36;
-Constant RTP_LOWLEVELERROR = 37;
-Constant RTP_DONTIGNORETURNSEQUENCE = 38;
-Constant RTP_SAYINVALIDSNIPPET = 39;
-Constant RTP_SPLICEINVALIDSNIPPET = 40;
-Constant RTP_INCLUDEINVALIDSNIPPET = 41;
-Constant RTP_LISTWRITERMEMORY = 42;
-Constant RTP_CANTREMOVEPLAYER = 43;
-Constant RTP_CANTREMOVEDOORS = 44;
-Constant RTP_CANTCHANGEOFFSTAGE = 45;
-Constant RTP_MSTACKMEMORY = 46;
-Constant RTP_TYPECHECK = 47;
-Constant RTP_FILEIOERROR = 48;
-Constant RTP_HEAPERROR = 49;
-Constant RTP_LISTRANGEERROR = 50;
-Constant RTP_REGEXPSYNTAXERROR = 51;
-Constant RTP_NOGLULXUNICODE = 52;
-Constant RTP_BACKDROPONLY = 53;
-Constant RTP_NOTTHING = 54;
-Constant RTP_SCENEHASNTSTARTED = 55;
-Constant RTP_SCENEHASNTENDED = 56;
-Constant RTP_NEGATIVEROOT = 57;
-Constant RTP_TABLE_CANTRUNTHROUGH = 58;
-Constant RTP_CANTITERATE = 59;
-Constant RTP_WRONGASSIGNEDKIND = 60;
-Constant RTP_CANTBEOFFSTAGE = 61;
-Constant RTP_RELKINDVIOLATION = 62;
-Constant RTP_CANTMAKEPART = 63;
-Constant RTP_TEXTTOKENTOOHARD = 64;
-Constant RTP_TABLE_NOTABLE2 = 65;
-Constant RTP_RELATIONCHANGEIMPOSSIBLE = 66;
-Constant RTP_RELMINIMAL = 67;
-Constant RTP_LISTSIZENEGATIVE = 68;
-Constant RTP_REGIONSNOTADJACENT = 69;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Template Activities
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant PRINTING_THE_NAME_ACT = 0;
-Constant PRINTING_THE_PLURAL_NAME_ACT = 1;
-Constant PRINTING_A_NUMBER_OF_ACT = 2;
-Constant PRINTING_ROOM_DESC_DETAILS_ACT = 3;
-Constant PRINTING_INVENTORY_DETAILS_ACT = 4;
-Constant LISTING_CONTENTS_ACT = 5;
-Constant GROUPING_TOGETHER_ACT = 6;
-Constant WRITING_A_PARAGRAPH_ABOUT_ACT = 7;
-Constant LISTING_NONDESCRIPT_ITEMS_ACT = 8;
-
-Constant PRINTING_NAME_OF_DARK_ROOM_ACT = 9;
-Constant PRINTING_DESC_OF_DARK_ROOM_ACT = 10;
-Constant PRINTING_NEWS_OF_DARKNESS_ACT = 11;
-Constant PRINTING_NEWS_OF_LIGHT_ACT = 12;
-Constant REFUSAL_TO_ACT_IN_DARK_ACT = 13;
-
-Constant CONSTRUCTING_STATUS_LINE_ACT = 14;
-Constant PRINTING_BANNER_TEXT_ACT = 15;
-
-Constant READING_A_COMMAND_ACT = 16;
-Constant DECIDING_SCOPE_ACT = 17;
-Constant DECIDING_CONCEALED_POSSESS_ACT = 18;
-Constant DECIDING_WHETHER_ALL_INC_ACT = 19;
-Constant CLARIFYING_PARSERS_CHOICE_ACT = 20;
-Constant ASKING_WHICH_DO_YOU_MEAN_ACT = 21;
-Constant PRINTING_A_PARSER_ERROR_ACT = 22;
-Constant SUPPLYING_A_MISSING_NOUN_ACT = 23;
-Constant SUPPLYING_A_MISSING_SECOND_ACT = 24;
-Constant IMPLICITLY_TAKING_ACT = 25;
-Constant STARTING_VIRTUAL_MACHINE_ACT = 26;
-
-Constant AMUSING_A_VICTORIOUS_PLAYER_ACT = 27;
-Constant PRINTING_PLAYERS_OBITUARY_ACT = 28;
-Constant DEALING_WITH_FINAL_QUESTION_ACT = 29;
-
-Constant PRINTING_LOCALE_DESCRIPTION_ACT = 30;
-Constant CHOOSING_NOTABLE_LOCALE_OBJ_ACT = 31;
-Constant PRINTING_LOCALE_PARAGRAPH_ACT = 32;
-
-Constant PRINTING_RESPONSE_ACT = 33;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Template Rulebooks
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant STARTUP_RB = 0;
-Constant TURN_SEQUENCE_RB = 1;
-Constant SHUTDOWN_RB = 2;
-
-Constant WHEN_PLAY_BEGINS_RB = 4;
-Constant WHEN_PLAY_ENDS_RB = 5;
-Constant WHEN_SCENE_BEGINS_RB = 6;
-Constant WHEN_SCENE_ENDS_RB = 7;
-
-Constant ACTION_PROCESSING_RB = 9;
-Constant SETTING_ACTION_VARIABLES_RB = 10;
-Constant SPECIFIC_ACTION_PROCESSING_RB = 11;
-
-Constant ACCESSIBILITY_RB = 13;
-Constant REACHING_INSIDE_RB = 14;
-Constant REACHING_OUTSIDE_RB = 15;
-Constant VISIBLE_RB = 16;
-
-Constant PERSUADE_RB = 17;
-Constant UNSUCCESSFUL_ATTEMPT_RB = 18;
-
-Constant AFTER_RB = 23;
-Constant REPORT_RB = 24;
-
-Constant MULTIPLE_ACTION_PROCESSING_RB = 26;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Kind IDs
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant UNKNOWN_TY = -2147483602;
-Constant VALUE_TY = 2;
-Constant POINTER_VALUE_TY = 3;
-Constant WORD_VALUE_TY = 4;
-Constant ARITHMETIC_VALUE_TY = 5;
-Constant REAL_ARITHMETIC_VALUE_TY = 6;
-Constant ENUMERATED_VALUE_TY = 7;
-Constant SAYABLE_VALUE_TY = 8;
-Constant COMBINED_VALUE_TY = 9;
-Constant OBJECT_TY = 10;
-Constant NUMBER_TY = 11;
-Constant REAL_NUMBER_TY = 12;
-Constant TRUTH_STATE_TY = 13;
-Constant TEXT_TY = 14;
-Constant UNICODE_CHARACTER_TY = 15;
-Constant USE_OPTION_TY = 16;
-Constant RESPONSE_TY = 17;
-Constant VERB_TY = 18;
-Constant SNIPPET_TY = 19;
-Constant TABLE_TY = 20;
-Constant EQUATION_TY = 21;
-Constant RULEBOOK_OUTCOME_TY = 22;
-Constant UNDERSTANDING_TY = 23;
-Constant INTERMEDIATE_TY = 24;
-Constant NIL_TY = 25;
-Constant KIND_VARIABLE_TY = 26;
-Constant PHRASE_TY = 27;
-Constant TUPLE_ENTRY_TY = 28;
-Constant VARIABLE_TY = 29;
-Constant RELATION_TY = 30;
-Constant RULE_TY = 31;
-Constant RULEBOOK_TY = 32;
-Constant ACTIVITY_TY = 33;
-Constant LIST_OF_TY = 34;
-Constant DESCRIPTION_OF_TY = 35;
-Constant PROPERTY_TY = 36;
-Constant TABLE_COLUMN_TY = 37;
-Constant COMBINATION_TY = 38;
-Constant DESCRIPTION_OF_ACTION_TY = 39;
-Constant STORED_ACTION_TY = 40;
-Constant ACTION_NAME_TY = 41;
-Constant TIME_TY = 42;
-Constant SCENE_TY = 43;
-Constant FIGURE_NAME_TY = 44;
-Constant SOUND_NAME_TY = 45;
-Constant EXTERNAL_FILE_TY = 46;
-Constant BASE_KIND_HWM = 53; ! Base kind high-water-mark
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Parser Error Numbers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant STUCK_PE = 1;
-Constant UPTO_PE = 2;
-Constant NUMBER_PE = 3;
-Constant ANIMA_PE = 4;
-Constant CANTSEE_PE = 5;
-Constant TOOLIT_PE = 6;
-Constant NOTHELD_PE = 7;
-Constant MULTI_PE = 8;
-Constant MMULTI_PE = 9;
-Constant VAGUE_PE = 10;
-Constant EXCEPT_PE = 11;
-Constant VERB_PE = 12;
-Constant SCENERY_PE = 13;
-Constant ITGONE_PE = 14;
-Constant JUNKAFTER_PE = 15;
-Constant TOOFEW_PE = 16;
-Constant NOTHING_PE = 17;
-Constant ASKSCOPE_PE = 18;
-Constant NOTINCONTEXT_PE = 19;
-Constant BLANKLINE_PE = 20; ! Not formally a parser error, but used by I7 as if
-Constant ANIMAAGAIN_PE = 21;
-Constant COMMABEGIN_PE = 22;
-Constant MISSINGPERSON_PE = 23;
-Constant ANIMALISTEN_PE = 24;
-Constant TOTALK_PE = 25;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Scope Searching Reasons
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant PARSING_REASON = 0;
-Constant TALKING_REASON = 1;
-Constant EACH_TURN_REASON = 2;
-Constant LOOPOVERSCOPE_REASON = 5;
-Constant TESTSCOPE_REASON = 6;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Token Types
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant ILLEGAL_TT = 0; ! Types of grammar token: illegal
-Constant ELEMENTARY_TT = 1; ! (one of those below)
-Constant PREPOSITION_TT = 2; ! e.g. 'into'
-Constant ROUTINE_FILTER_TT = 3; ! e.g. noun=CagedCreature
-Constant ATTR_FILTER_TT = 4; ! e.g. edible
-Constant SCOPE_TT = 5; ! e.g. scope=Spells
-Constant GPR_TT = 6; ! a general parsing routine
-
-Constant NOUN_TOKEN = 0; ! The elementary grammar tokens, and
-Constant HELD_TOKEN = 1; ! the numbers compiled by I6 to
-Constant MULTI_TOKEN = 2; ! encode them
-Constant MULTIHELD_TOKEN = 3;
-Constant MULTIEXCEPT_TOKEN = 4;
-Constant MULTIINSIDE_TOKEN = 5;
-Constant CREATURE_TOKEN = 6;
-Constant SPECIAL_TOKEN = 7;
-Constant NUMBER_TOKEN = 8;
-Constant TOPIC_TOKEN = 9;
-Constant ENDIT_TOKEN = 15; ! Value used to mean "end of grammar line"
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: GPR Return Values
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant GPR_FAIL = -1; ! Return values from General Parsing
-Constant GPR_PREPOSITION = 0; ! Routines
-Constant GPR_NUMBER = 1;
-Constant GPR_MULTIPLE = 2;
-Constant GPR_REPARSE = REPARSE_CODE;
-Constant GPR_NOUN = -256; ! Reparse, but as |NOUN_TOKEN| this time
-Constant GPR_HELD = GPR_NOUN + 1; ! And so on
-Constant GPR_MULTI = GPR_NOUN + 2;
-Constant GPR_MULTIHELD = GPR_NOUN + 3;
-Constant GPR_MULTIEXCEPT = GPR_NOUN + 4;
-Constant GPR_MULTIINSIDE = GPR_NOUN + 5;
-Constant GPR_CREATURE = GPR_NOUN + 6;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: List Styles
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant NEWLINE_BIT = $$0000000000000001; ! New-line after each entry
-Constant INDENT_BIT = $$0000000000000010; ! Indent each entry by depth
-Constant FULLINV_BIT = $$0000000000000100; ! Full inventory information after entry
-Constant ENGLISH_BIT = $$0000000000001000; ! English sentence style, with commas and and
-Constant RECURSE_BIT = $$0000000000010000; ! Recurse downwards with usual rules
-Constant ALWAYS_BIT = $$0000000000100000; ! Always recurse downwards
-Constant TERSE_BIT = $$0000000001000000; ! More terse English style
-Constant PARTINV_BIT = $$0000000010000000; ! Only brief inventory information after entry
-Constant DEFART_BIT = $$0000000100000000; ! Use the definite article in list
-Constant WORKFLAG_BIT = $$0000001000000000; ! At top level (only), only list objects
- ! which have the "workflag" attribute
-Constant ISARE_BIT = $$0000010000000000; ! Print " is" or " are" before list
-Constant CONCEAL_BIT = $$0000100000000000; ! Omit objects with "concealed" or "scenery":
- ! if WORKFLAG_BIT also set, then does not
- ! apply at top level, but does lower down
-Constant NOARTICLE_BIT = $$0001000000000000; ! Print no articles, definite or not
-Constant EXTRAINDENT_BIT = $$0010000000000000; ! New in I7: extra indentation of 1 level
-Constant CFIRSTART_BIT = $$0100000000000000; ! Capitalise first article in list
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Lengths Of Time
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant QUARTER_HOUR = 15;
-Constant HALF_HOUR = 30;
-Constant ONE_HOUR = 60;
-Constant TWELVE_HOURS = 720;
-Constant TWENTY_FOUR_HOURS = 1440;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Empty Text
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant EMPTY_TEXT_PACKED "";
-Array EMPTY_TEXT_VALUE --> CONSTANT_PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Empty Table
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array TheEmptyTable --> 0 0;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Empty Set
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Prop_Falsity reason obj; return 0; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Score and Rankings Table
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-#Ifndef MAX_SCORE;
-Global MAX_SCORE = 0;
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Template Attributes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Attribute absent; ! Used to mark objects removed from play
-Attribute animate; ! I6-level marker for I7 kind "person"
-Attribute clothing; ! = I7 "wearable"
-Attribute concealed; ! = I7 "undescribed"
-Attribute container; ! I6-level marker for I7 kind "container"
-Attribute door; ! I6-level marker for I7 kind "door"
-Attribute edible; ! = I7 "edible" vs "inedible"
-Attribute enterable; ! = I7 "enterable"
-Attribute light; ! = I7 "lighted" vs "dark"
-Attribute lockable; ! = I7 "lockable"
-Attribute locked; ! = I7 "locked"
-Attribute moved; ! = I7 "handled"
-Attribute on; ! = I7 "switched on" vs "switched off"
-Attribute open; ! = I7 "open" vs "closed"
-Attribute openable; ! = I7 "openable"
-Attribute scenery; ! = I7 "scenery"
-Attribute static; ! = I7 "fixed in place" vs "portable"
-Attribute supporter; ! I6-level marker for I7 kind "supporter"
-Attribute switchable; ! I6-level marker for I7 kind "device"
-Attribute talkable; ! Not currently used by I7, but retained for possible future use
-Attribute transparent; ! = I7 "transparent" vs "opaque"
-Attribute visited; ! = I7 "visited"
-Attribute worn; ! marks that an object tree edge represents wearing
-
-Attribute male; ! not directly used by I7, but available for languages with genders
-Attribute female; ! = I7 "female" vs "male"
-Attribute neuter; ! = I7 "neuter"
-Attribute pluralname; ! = I7 "plural-named"
-Attribute ambigpluralname; ! = I7 "ambiguously plural"
-Attribute proper; ! = I7 "proper-named"
-Attribute remove_proper; ! remember to remove proper again when using ChangePlayer next
-
-Attribute privately_named; ! New in I7
-Attribute mentioned; ! New in I7
-Attribute pushable; ! New in I7
-
-Attribute mark_as_room; ! Used in I7 to speed up testing "ofclass K1_room"
-Attribute mark_as_thing; ! Used in I7 to speed up testing "ofclass K2_thing"
-
-Attribute workflag; ! = I7 "marked for listing", but basically temporary workspace
-Attribute workflag2; ! new in I7 and also temporary workspace
-Constant list_filter_permits = privately_named; ! another I7 listwriter convenience
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Template Properties
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Property add_to_scope; ! used as in I6 to place component parts in scope
-Property article "a"; ! used as in I6 to implement articles
-Property capacity 100; ! = I7 "carrying capacity"
-Property component_child; ! new in I7: forest structure holding "part of" relation
-Property component_parent; ! new in I7
-Property component_sibling; ! new in I7
-Property description; ! = I7 "description"
-Property door_dir; ! used to implement two-sided doors, but holds direction object, not a property
-Property door_to; ! used as in I6 to implement two-sided doors
-Property found_in; ! used as in I6 to implement two-sided doors and backdrops
-Property initial; ! = I7 "initial description"
-Property list_together; ! used as in I6 to implement "grouping together" activity
-Property map_region; ! new in I7
-Property parse_name 0; ! used as in I6 to implement "Understand... as..." grammars
-Property plural; ! used as in I6 to implement plural names for duplicate objects
-Property regional_found_in; ! new in I7
-Property room_index; ! new in I7: storage for route-finding
-Property short_name 0; ! = I7 "printed name"
-Property vector; ! new in I7: storage for route-finding
-Property with_key; ! = I7 "matching key"
-
-Property KD_Count; ! Instance count of the kind of the current object
-Property IK1_Count; ! These are instance counts within kinds K1, K2, ...
-Property IK2_Count; ! and it is efficient to declare the common ones with Property
-Property IK4_Count; ! since this results in a slightly smaller story file
-Property IK5_Count;
-Property IK6_Count;
-Property IK8_Count;
-
-Property IK1_link; ! These are for linked lists used to make searches faster
-Property IK2_link; ! and again it's memory-efficient to declare the common ones
-Property IK5_link; !
-Property IK6_link; !
-Property IK8_link; !
-
-Property articles; ! not used by I7, but an interesting hook in the parser
-Property grammar; ! not used by I7, but an interesting hook in the parser
-Property inside_description; ! not used by I7, but an interesting hook in the locale code
-Property short_name_indef 0; ! not used by I7, but an interesting hook in the listmaker
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Loss of Life
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant life = NULL;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Action Count
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant ActionCount = 77;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Fake Actions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Fake_Action ListMiscellany;
-Fake_Action Miscellany;
-Fake_Action PluralFound;
-Fake_Action TheSame;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Definitions.i6t: Formal Parameters
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global formal_rv;
-Global formal_par0;
-Global formal_par1;
-Global formal_par2;
-Global formal_par3;
-Global formal_par4;
-Global formal_par5;
-Global formal_par6;
-Global formal_par7;
-Global unicode_temp;
-
- Constant RUCKSACK_CLASS = K15_player_s_holdall;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Global Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! [1]
-Global location = InformLibrary; ! does not = I7 "location": see below
-Global sline1; Global sline2;
-
-! [2]
-Global say__p = 1; Global say__pc = 0; Global say__pc_save = 0;
-Global say__n; Global say__comp;
-Global los_rv = false;
-Global parameter_object; ! = I7 "parameter-object" = I7 "container in question"
-Global parameter_value; ! not typesafe in I7
-Array deferred_calling_list --> 27;
-Global property_to_be_totalled; ! used to implement "total P of..."
-Global property_loop_sign; ! $+1$ for increasing order, $-1$ for decreasing
-Global suppress_scope_loops;
-Global temporary_value; ! can be used anywhere side-effects can't occur
-
-#ifdef TARGET_ZCODE;
-Constant BLOCKV_STACK_SIZE = 224;
-#ifnot;
-Constant BLOCKV_STACK_SIZE = DynamicMemoryAllocation/4;
-#endif;
-
-Array blockv_stack --> BLOCKV_STACK_SIZE;
-Global I7SFRAME;
-
-Global TEXT_TY_RE_Err = 0;
-
-Array LocalParking --> 64;
-
-! [3]
-Global standard_interpreter = 0;
-Global undo_flag;
-
-! [4]
-Global deadflag = 0;
-Global story_complete = 0;
-Global resurrect_please = false;
-
-! [5]
-Global not_yet_in_play = true; ! set false when first command received
-Global turns = 1; ! = I7 "turn count"
-Global the_time = NULL; ! = I7 "time of day"
-Global time_rate = 1;
-
-Constant NUMBER_SCENES_CREATED = 1;
-Constant SCENE_ARRAY_SIZE = (NUMBER_SCENES_CREATED+2);
-Array scene_started --> SCENE_ARRAY_SIZE;
-Array scene_ended --> SCENE_ARRAY_SIZE;
-Array scene_status --> SCENE_ARRAY_SIZE;
-Array scene_endings --> SCENE_ARRAY_SIZE;
-Array scene_latest_ending --> SCENE_ARRAY_SIZE;
-
-! [6]
-Global score; ! = I7 "score"
-Global last_score; ! = I7 "last notified score"
-Global notify_mode = 1; ! score notification on or off
-Global left_hand_status_line = T_SL_Location; ! = I7 "left hand status line"
-Global right_hand_status_line = T_SL_Score_Moves; ! = I7 "right hand status line"
-
-! [7]
-Global player; ! = I7 "player"
-Global real_location; ! = I7 "location"
-Global visibility_ceiling; ! highest object in tree visible to player
-Global visibility_levels; ! distance in tree to that
-
-Global SACK_OBJECT; ! current player's holdall item in use
-
-! [8]
-Global act_requester;
-Global actor; ! = I7 "person asked" = I7 "person reaching"
-Global actors_location; ! like real_location, but for the actor
-Global actor_location; ! = I7 "actor-location"
-Global action;
-Global meta; ! action is out of world
-Global inp1;
-Global inp2;
-Array multiple_object --> MATCH_LIST_WORDS; ! multiple-object list (I6 table array)
-Global toomany_flag; ! multiple-object list overflowed
-Global multiflag; ! multiple-object being processed
-Global multiple_object_item; ! item currently being processed in multiple-object list
-Global noun; ! = I7 "noun"
-Global second; ! = I7 "second noun"
-Global keep_silent; ! true if current action is being tried silently
-Global etype; ! parser error number if command not recognised
-Global trace_actions = 0;
-
-Global untouchable_object;
-Global untouchable_silence;
-Global touch_persona;
-
-Global special_word; ! dictionary address of first word in "[text]" token
-Global consult_from; ! word number of start of "[text]" token
-Global consult_words; ! number of words in "[text]" token
-Global parsed_number; ! value from any token not an object
-Global special_number1; ! first value, if token not an object
-Global special_number2; ! second value, if token not an object
-
-Array parser_results --> 16; ! for parser to write its results in
-Global parser_trace = 0; ! normally 0, but 1 to 5 traces parser workings
-Global pronoun_word; ! records which pronoun ("it", "them", ...) caused an error
-Global pronoun_obj; ! and what object it was thought to refer to
-
-Global players_command = 100; ! = I7 "player's command"
-Global matched_text; ! = I7 "matched text"
-Global reason_the_action_failed; ! = I7 "reason the action failed"
-Global understand_as_mistake_number; ! which form of "Understand... as a mistake"
-Global particular_possession; ! = I7 "particular possession"
-
-! [9]
-Global parser_action; ! written by the parser for the benefit of GPRs
-Global parser_one;
-Global parser_two;
-Global parameters; ! number of I7 tokens parsed on the current line
-Global action_to_be; ! (if the current line were accepted)
-Global action_reversed; ! (parameters would be reversed in order)
-Global wn; ! word number within "parse" buffer (from 1)
-Global num_words; ! number of words in buffer
-Global verb_word; ! dictionary address of command verb
-Global verb_wordnum; ! word number of command verb
-
-! [10]
-Global scope_reason = PARSING_REASON; ! current reason for searching scope
-Global scope_token; ! for "scope=Routine" grammar tokens
-Global scope_error;
-Global scope_stage; ! 1, 2 then 3
-Global advance_warning; ! what a later-named thing will be
-Global reason_code = NULL; ! for the I6 veneer
-
-Global ats_flag = 0; ! for AddToScope routines
-Global ats_hls;
-
-! [11]
-Global move_pushing;
-Global move_from;
-Global move_to;
-Global move_by;
-Global move_through;
-
-! [12]
-#Ifdef DEFAULT_BRIEF_DESCRIPTIONS;
-Global lookmode = 1; ! 1 = BRIEF, 2 = VERBOSE, 3 = SUPERBRIEF
-#Endif;
-#Ifdef DEFAULT_VERBOSE_DESCRIPTIONS;
-Global lookmode = 2; ! 1 = BRIEF, 2 = VERBOSE, 3 = SUPERBRIEF
-#Endif;
-#Ifdef DEFAULT_SUPERBRIEF_DESCRIPTIONS;
-Global lookmode = 3; ! 1 = BRIEF, 2 = VERBOSE, 3 = SUPERBRIEF
-#Endif;
-#Ifndef lookmode;
-Global lookmode = 2; ! 1 = BRIEF, 2 = VERBOSE, 3 = SUPERBRIEF
-#Endif;
-Global c_style; ! current list-writer style
-Global c_depth; ! current recursion depth
-Global c_iterator; ! current iteration function
-Global lt_value = EMPTY_TEXT_VALUE; ! common value of list_together
-Global listing_together; ! object number of one member of a group being listed together
-Global listing_size; ! size of such a group
-Global c_margin; ! current level of indentation printed by WriteListFrom()
-Global inventory_stage = 1; ! 1 or 2 according to the context in which list_together uses
-Global prior_named_noun; ! for adaptive text generation
-Global prior_named_list; ! ditto: length of list of items
-Global prior_named_list_gender; ! ditto: common gender of list of items, or -1
-Global story_tense = 1; ! ditto: present tense
-Global story_viewpoint = 2; ! ditto: second person singular
-
-! [13]
-Global clr_fg = 1; ! foreground colour
-Global clr_bg = 1; ! background colour
-Global clr_fgstatus = 1; ! foreground colour of statusline
-Global clr_bgstatus = 1; ! background colour of statusline
-Global clr_on; ! has colour been enabled by the player?
-Global statuswin_current; ! if writing to top window
-
-! [14]
-Global statuswin_cursize = 0;
-Global statuswin_size = 1;
-
-! [16]
-Global debug_flag = 0;
-Global debug_rules = 0;
-Global debug_scenes = 0;
-Global debug_rule_nesting;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: VM-Specific Code
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef TARGET_GLULX;
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Summary
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Variables and Arrays
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array gg_event --> 4;
-Array gg_arguments buffer 28;
-Global gg_mainwin = 0;
-Global gg_statuswin = 0;
-Global gg_quotewin = 0;
-Global gg_scriptfref = 0;
-Global gg_scriptstr = 0;
-Global gg_savestr = 0;
-Global gg_commandstr = 0;
-Global gg_command_reading = 0; ! true if gg_commandstr is being replayed
-Global gg_foregroundchan = 0;
-Global gg_backgroundchan = 0;
-
-Constant GLK_NULL 0;
-
-Constant INPUT_BUFFER_LEN = 260; ! No extra byte necessary
-Constant MAX_BUFFER_WORDS = 20;
-Constant PARSE_BUFFER_LEN = 61;
-
-Array buffer buffer INPUT_BUFFER_LEN;
-Array buffer2 buffer INPUT_BUFFER_LEN;
-Array buffer3 buffer INPUT_BUFFER_LEN;
-Array parse --> PARSE_BUFFER_LEN;
-Array parse2 --> PARSE_BUFFER_LEN;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Infglk
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! infglk.h -- auto-generated by parse_dispatch.py.
-! Generated for Glk API version 0.7.4
-
-Constant evtype_Arrange = 5;
-Constant evtype_CharInput = 2;
-Constant evtype_Hyperlink = 8;
-Constant evtype_LineInput = 3;
-Constant evtype_MouseInput = 4;
-Constant evtype_None = 0;
-Constant evtype_Redraw = 6;
-Constant evtype_SoundNotify = 7;
-Constant evtype_Timer = 1;
-Constant evtype_VolumeNotify = 9;
-Constant filemode_Read = 2;
-Constant filemode_ReadWrite = 3;
-Constant filemode_Write = 1;
-Constant filemode_WriteAppend = 5;
-Constant fileusage_BinaryMode = 0;
-Constant fileusage_Data = 0;
-Constant fileusage_InputRecord = 3;
-Constant fileusage_SavedGame = 1;
-Constant fileusage_TextMode = 256;
-Constant fileusage_Transcript = 2;
-Constant fileusage_TypeMask = 15;
-Constant gestalt_CharInput = 1;
-Constant gestalt_CharOutput = 3;
-Constant gestalt_CharOutput_ApproxPrint = 1;
-Constant gestalt_CharOutput_CannotPrint = 0;
-Constant gestalt_CharOutput_ExactPrint = 2;
-Constant gestalt_DateTime = 20;
-Constant gestalt_DrawImage = 7;
-Constant gestalt_Graphics = 6;
-Constant gestalt_GraphicsCharInput = 23;
-Constant gestalt_GraphicsTransparency = 14;
-Constant gestalt_HyperlinkInput = 12;
-Constant gestalt_Hyperlinks = 11;
-Constant gestalt_LineInput = 2;
-Constant gestalt_LineInputEcho = 17;
-Constant gestalt_LineTerminatorKey = 19;
-Constant gestalt_LineTerminators = 18;
-Constant gestalt_MouseInput = 4;
-Constant gestalt_ResourceStream = 22;
-Constant gestalt_Sound = 8;
-Constant gestalt_Sound2 = 21;
-Constant gestalt_SoundMusic = 13;
-Constant gestalt_SoundNotify = 10;
-Constant gestalt_SoundVolume = 9;
-Constant gestalt_Timer = 5;
-Constant gestalt_Unicode = 15;
-Constant gestalt_UnicodeNorm = 16;
-Constant gestalt_Version = 0;
-Constant imagealign_InlineCenter = 3;
-Constant imagealign_InlineDown = 2;
-Constant imagealign_MarginLeft = 4;
-Constant imagealign_MarginRight = 5;
-Constant imagealign_InlineUp = 1;
-Constant keycode_Delete = 4294967289;
-Constant keycode_Down = 4294967291;
-Constant keycode_End = 4294967283;
-Constant keycode_Escape = 4294967288;
-Constant keycode_Func1 = 4294967279;
-Constant keycode_Func10 = 4294967270;
-Constant keycode_Func11 = 4294967269;
-Constant keycode_Func12 = 4294967268;
-Constant keycode_Func2 = 4294967278;
-Constant keycode_Func3 = 4294967277;
-Constant keycode_Func4 = 4294967276;
-Constant keycode_Func5 = 4294967275;
-Constant keycode_Func6 = 4294967274;
-Constant keycode_Func7 = 4294967273;
-Constant keycode_Func8 = 4294967272;
-Constant keycode_Func9 = 4294967271;
-Constant keycode_Home = 4294967284;
-Constant keycode_Left = 4294967294;
-Constant keycode_MAXVAL = 28;
-Constant keycode_PageDown = 4294967285;
-Constant keycode_PageUp = 4294967286;
-Constant keycode_Return = 4294967290;
-Constant keycode_Right = 4294967293;
-Constant keycode_Tab = 4294967287;
-Constant keycode_Unknown = 4294967295;
-Constant keycode_Up = 4294967292;
-Constant seekmode_Current = 1;
-Constant seekmode_End = 2;
-Constant seekmode_Start = 0;
-Constant style_Alert = 5;
-Constant style_BlockQuote = 7;
-Constant style_Emphasized = 1;
-Constant style_Header = 3;
-Constant style_Input = 8;
-Constant style_NUMSTYLES = 11;
-Constant style_Normal = 0;
-Constant style_Note = 6;
-Constant style_Preformatted = 2;
-Constant style_Subheader = 4;
-Constant style_User1 = 9;
-Constant style_User2 = 10;
-Constant stylehint_BackColor = 8;
-Constant stylehint_Indentation = 0;
-Constant stylehint_Justification = 2;
-Constant stylehint_NUMHINTS = 10;
-Constant stylehint_Oblique = 5;
-Constant stylehint_ParaIndentation = 1;
-Constant stylehint_Proportional = 6;
-Constant stylehint_ReverseColor = 9;
-Constant stylehint_Size = 3;
-Constant stylehint_TextColor = 7;
-Constant stylehint_Weight = 4;
-Constant stylehint_just_Centered = 2;
-Constant stylehint_just_LeftFlush = 0;
-Constant stylehint_just_LeftRight = 1;
-Constant stylehint_just_RightFlush = 3;
-Constant winmethod_Above = 2;
-Constant winmethod_Below = 3;
-Constant winmethod_Border = 0;
-Constant winmethod_BorderMask = 256;
-Constant winmethod_DirMask = 15;
-Constant winmethod_DivisionMask = 240;
-Constant winmethod_Fixed = 16;
-Constant winmethod_Left = 0;
-Constant winmethod_NoBorder = 256;
-Constant winmethod_Proportional = 32;
-Constant winmethod_Right = 1;
-Constant wintype_AllTypes = 0;
-Constant wintype_Blank = 2;
-Constant wintype_Graphics = 5;
-Constant wintype_Pair = 1;
-Constant wintype_TextBuffer = 3;
-Constant wintype_TextGrid = 4;
-
-[ glk_exit _vararg_count;
- ! glk_exit()
- @glk 1 _vararg_count 0;
- return 0;
-];
-
-[ glk_tick _vararg_count;
- ! glk_tick()
- @glk 3 _vararg_count 0;
- return 0;
-];
-
-[ glk_gestalt _vararg_count ret;
- ! glk_gestalt(uint, uint) => uint
- @glk 4 _vararg_count ret;
- return ret;
-];
-
-[ glk_gestalt_ext _vararg_count ret;
- ! glk_gestalt_ext(uint, uint, uintarray, arraylen) => uint
- @glk 5 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_iterate _vararg_count ret;
- ! glk_window_iterate(window, &uint) => window
- @glk 32 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_get_rock _vararg_count ret;
- ! glk_window_get_rock(window) => uint
- @glk 33 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_get_root _vararg_count ret;
- ! glk_window_get_root() => window
- @glk 34 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_open _vararg_count ret;
- ! glk_window_open(window, uint, uint, uint, uint) => window
- @glk 35 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_close _vararg_count;
- ! glk_window_close(window, &{uint, uint})
- @glk 36 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_get_size _vararg_count;
- ! glk_window_get_size(window, &uint, &uint)
- @glk 37 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_set_arrangement _vararg_count;
- ! glk_window_set_arrangement(window, uint, uint, window)
- @glk 38 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_get_arrangement _vararg_count;
- ! glk_window_get_arrangement(window, &uint, &uint, &window)
- @glk 39 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_get_type _vararg_count ret;
- ! glk_window_get_type(window) => uint
- @glk 40 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_get_parent _vararg_count ret;
- ! glk_window_get_parent(window) => window
- @glk 41 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_clear _vararg_count;
- ! glk_window_clear(window)
- @glk 42 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_move_cursor _vararg_count;
- ! glk_window_move_cursor(window, uint, uint)
- @glk 43 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_get_stream _vararg_count ret;
- ! glk_window_get_stream(window) => stream
- @glk 44 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_set_echo_stream _vararg_count;
- ! glk_window_set_echo_stream(window, stream)
- @glk 45 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_get_echo_stream _vararg_count ret;
- ! glk_window_get_echo_stream(window) => stream
- @glk 46 _vararg_count ret;
- return ret;
-];
-
-[ glk_set_window _vararg_count;
- ! glk_set_window(window)
- @glk 47 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_get_sibling _vararg_count ret;
- ! glk_window_get_sibling(window) => window
- @glk 48 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_iterate _vararg_count ret;
- ! glk_stream_iterate(stream, &uint) => stream
- @glk 64 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_get_rock _vararg_count ret;
- ! glk_stream_get_rock(stream) => uint
- @glk 65 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_open_file _vararg_count ret;
- ! glk_stream_open_file(fileref, uint, uint) => stream
- @glk 66 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_open_memory _vararg_count ret;
- ! glk_stream_open_memory(nativechararray, arraylen, uint, uint) => stream
- @glk 67 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_close _vararg_count;
- ! glk_stream_close(stream, &{uint, uint})
- @glk 68 _vararg_count 0;
- return 0;
-];
-
-[ glk_stream_set_position _vararg_count;
- ! glk_stream_set_position(stream, int, uint)
- @glk 69 _vararg_count 0;
- return 0;
-];
-
-[ glk_stream_get_position _vararg_count ret;
- ! glk_stream_get_position(stream) => uint
- @glk 70 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_set_current _vararg_count;
- ! glk_stream_set_current(stream)
- @glk 71 _vararg_count 0;
- return 0;
-];
-
-[ glk_stream_get_current _vararg_count ret;
- ! glk_stream_get_current() => stream
- @glk 72 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_open_resource _vararg_count ret;
- ! glk_stream_open_resource(uint, uint) => stream
- @glk 73 _vararg_count ret;
- return ret;
-];
-
-[ glk_fileref_create_temp _vararg_count ret;
- ! glk_fileref_create_temp(uint, uint) => fileref
- @glk 96 _vararg_count ret;
- return ret;
-];
-
-[ glk_fileref_create_by_name _vararg_count ret;
- ! glk_fileref_create_by_name(uint, string, uint) => fileref
- @glk 97 _vararg_count ret;
- return ret;
-];
-
-[ glk_fileref_create_by_prompt _vararg_count ret;
- ! glk_fileref_create_by_prompt(uint, uint, uint) => fileref
- @glk 98 _vararg_count ret;
- return ret;
-];
-
-[ glk_fileref_destroy _vararg_count;
- ! glk_fileref_destroy(fileref)
- @glk 99 _vararg_count 0;
- return 0;
-];
-
-[ glk_fileref_iterate _vararg_count ret;
- ! glk_fileref_iterate(fileref, &uint) => fileref
- @glk 100 _vararg_count ret;
- return ret;
-];
-
-[ glk_fileref_get_rock _vararg_count ret;
- ! glk_fileref_get_rock(fileref) => uint
- @glk 101 _vararg_count ret;
- return ret;
-];
-
-[ glk_fileref_delete_file _vararg_count;
- ! glk_fileref_delete_file(fileref)
- @glk 102 _vararg_count 0;
- return 0;
-];
-
-[ glk_fileref_does_file_exist _vararg_count ret;
- ! glk_fileref_does_file_exist(fileref) => uint
- @glk 103 _vararg_count ret;
- return ret;
-];
-
-[ glk_fileref_create_from_fileref _vararg_count ret;
- ! glk_fileref_create_from_fileref(uint, fileref, uint) => fileref
- @glk 104 _vararg_count ret;
- return ret;
-];
-
-[ glk_put_char _vararg_count;
- ! glk_put_char(uchar)
- @glk 128 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_char_stream _vararg_count;
- ! glk_put_char_stream(stream, uchar)
- @glk 129 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_string _vararg_count;
- ! glk_put_string(string)
- @glk 130 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_string_stream _vararg_count;
- ! glk_put_string_stream(stream, string)
- @glk 131 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_buffer _vararg_count;
- ! glk_put_buffer(nativechararray, arraylen)
- @glk 132 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_buffer_stream _vararg_count;
- ! glk_put_buffer_stream(stream, nativechararray, arraylen)
- @glk 133 _vararg_count 0;
- return 0;
-];
-
-[ glk_set_style _vararg_count;
- ! glk_set_style(uint)
- @glk 134 _vararg_count 0;
- return 0;
-];
-
-[ glk_set_style_stream _vararg_count;
- ! glk_set_style_stream(stream, uint)
- @glk 135 _vararg_count 0;
- return 0;
-];
-
-[ glk_get_char_stream _vararg_count ret;
- ! glk_get_char_stream(stream) => int
- @glk 144 _vararg_count ret;
- return ret;
-];
-
-[ glk_get_line_stream _vararg_count ret;
- ! glk_get_line_stream(stream, nativechararray, arraylen) => uint
- @glk 145 _vararg_count ret;
- return ret;
-];
-
-[ glk_get_buffer_stream _vararg_count ret;
- ! glk_get_buffer_stream(stream, nativechararray, arraylen) => uint
- @glk 146 _vararg_count ret;
- return ret;
-];
-
-[ glk_char_to_lower _vararg_count ret;
- ! glk_char_to_lower(uchar) => uchar
- @glk 160 _vararg_count ret;
- return ret;
-];
-
-[ glk_char_to_upper _vararg_count ret;
- ! glk_char_to_upper(uchar) => uchar
- @glk 161 _vararg_count ret;
- return ret;
-];
-
-[ glk_stylehint_set _vararg_count;
- ! glk_stylehint_set(uint, uint, uint, int)
- @glk 176 _vararg_count 0;
- return 0;
-];
-
-[ glk_stylehint_clear _vararg_count;
- ! glk_stylehint_clear(uint, uint, uint)
- @glk 177 _vararg_count 0;
- return 0;
-];
-
-[ glk_style_distinguish _vararg_count ret;
- ! glk_style_distinguish(window, uint, uint) => uint
- @glk 178 _vararg_count ret;
- return ret;
-];
-
-[ glk_style_measure _vararg_count ret;
- ! glk_style_measure(window, uint, uint, &uint) => uint
- @glk 179 _vararg_count ret;
- return ret;
-];
-
-[ glk_select _vararg_count;
- ! glk_select(&{uint, window, uint, uint})
- @glk 192 _vararg_count 0;
- return 0;
-];
-
-[ glk_select_poll _vararg_count;
- ! glk_select_poll(&{uint, window, uint, uint})
- @glk 193 _vararg_count 0;
- return 0;
-];
-
-[ glk_request_line_event _vararg_count;
- ! glk_request_line_event(window, nativechararray, arraylen, uint)
- @glk 208 _vararg_count 0;
- return 0;
-];
-
-[ glk_cancel_line_event _vararg_count;
- ! glk_cancel_line_event(window, &{uint, window, uint, uint})
- @glk 209 _vararg_count 0;
- return 0;
-];
-
-[ glk_request_char_event _vararg_count;
- ! glk_request_char_event(window)
- @glk 210 _vararg_count 0;
- return 0;
-];
-
-[ glk_cancel_char_event _vararg_count;
- ! glk_cancel_char_event(window)
- @glk 211 _vararg_count 0;
- return 0;
-];
-
-[ glk_request_mouse_event _vararg_count;
- ! glk_request_mouse_event(window)
- @glk 212 _vararg_count 0;
- return 0;
-];
-
-[ glk_cancel_mouse_event _vararg_count;
- ! glk_cancel_mouse_event(window)
- @glk 213 _vararg_count 0;
- return 0;
-];
-
-[ glk_request_timer_events _vararg_count;
- ! glk_request_timer_events(uint)
- @glk 214 _vararg_count 0;
- return 0;
-];
-
-[ glk_image_get_info _vararg_count ret;
- ! glk_image_get_info(uint, &uint, &uint) => uint
- @glk 224 _vararg_count ret;
- return ret;
-];
-
-[ glk_image_draw _vararg_count ret;
- ! glk_image_draw(window, uint, int, int) => uint
- @glk 225 _vararg_count ret;
- return ret;
-];
-
-[ glk_image_draw_scaled _vararg_count ret;
- ! glk_image_draw_scaled(window, uint, int, int, uint, uint) => uint
- @glk 226 _vararg_count ret;
- return ret;
-];
-
-[ glk_window_flow_break _vararg_count;
- ! glk_window_flow_break(window)
- @glk 232 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_erase_rect _vararg_count;
- ! glk_window_erase_rect(window, int, int, uint, uint)
- @glk 233 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_fill_rect _vararg_count;
- ! glk_window_fill_rect(window, uint, int, int, uint, uint)
- @glk 234 _vararg_count 0;
- return 0;
-];
-
-[ glk_window_set_background_color _vararg_count;
- ! glk_window_set_background_color(window, uint)
- @glk 235 _vararg_count 0;
- return 0;
-];
-
-[ glk_schannel_iterate _vararg_count ret;
- ! glk_schannel_iterate(schannel, &uint) => schannel
- @glk 240 _vararg_count ret;
- return ret;
-];
-
-[ glk_schannel_get_rock _vararg_count ret;
- ! glk_schannel_get_rock(schannel) => uint
- @glk 241 _vararg_count ret;
- return ret;
-];
-
-[ glk_schannel_create _vararg_count ret;
- ! glk_schannel_create(uint) => schannel
- @glk 242 _vararg_count ret;
- return ret;
-];
-
-[ glk_schannel_destroy _vararg_count;
- ! glk_schannel_destroy(schannel)
- @glk 243 _vararg_count 0;
- return 0;
-];
-
-[ glk_schannel_create_ext _vararg_count ret;
- ! glk_schannel_create_ext(uint, uint) => schannel
- @glk 244 _vararg_count ret;
- return ret;
-];
-
-[ glk_schannel_play_multi _vararg_count ret;
- ! glk_schannel_play_multi(schannelarray, arraylen, uintarray, arraylen, uint) => uint
- @glk 247 _vararg_count ret;
- return ret;
-];
-
-[ glk_schannel_play _vararg_count ret;
- ! glk_schannel_play(schannel, uint) => uint
- @glk 248 _vararg_count ret;
- return ret;
-];
-
-[ glk_schannel_play_ext _vararg_count ret;
- ! glk_schannel_play_ext(schannel, uint, uint, uint) => uint
- @glk 249 _vararg_count ret;
- return ret;
-];
-
-[ glk_schannel_stop _vararg_count;
- ! glk_schannel_stop(schannel)
- @glk 250 _vararg_count 0;
- return 0;
-];
-
-[ glk_schannel_set_volume _vararg_count;
- ! glk_schannel_set_volume(schannel, uint)
- @glk 251 _vararg_count 0;
- return 0;
-];
-
-[ glk_sound_load_hint _vararg_count;
- ! glk_sound_load_hint(uint, uint)
- @glk 252 _vararg_count 0;
- return 0;
-];
-
-[ glk_schannel_set_volume_ext _vararg_count;
- ! glk_schannel_set_volume_ext(schannel, uint, uint, uint)
- @glk 253 _vararg_count 0;
- return 0;
-];
-
-[ glk_schannel_pause _vararg_count;
- ! glk_schannel_pause(schannel)
- @glk 254 _vararg_count 0;
- return 0;
-];
-
-[ glk_schannel_unpause _vararg_count;
- ! glk_schannel_unpause(schannel)
- @glk 255 _vararg_count 0;
- return 0;
-];
-
-[ glk_set_hyperlink _vararg_count;
- ! glk_set_hyperlink(uint)
- @glk 256 _vararg_count 0;
- return 0;
-];
-
-[ glk_set_hyperlink_stream _vararg_count;
- ! glk_set_hyperlink_stream(stream, uint)
- @glk 257 _vararg_count 0;
- return 0;
-];
-
-[ glk_request_hyperlink_event _vararg_count;
- ! glk_request_hyperlink_event(window)
- @glk 258 _vararg_count 0;
- return 0;
-];
-
-[ glk_cancel_hyperlink_event _vararg_count;
- ! glk_cancel_hyperlink_event(window)
- @glk 259 _vararg_count 0;
- return 0;
-];
-
-[ glk_buffer_to_lower_case_uni _vararg_count ret;
- ! glk_buffer_to_lower_case_uni(uintarray, arraylen, uint) => uint
- @glk 288 _vararg_count ret;
- return ret;
-];
-
-[ glk_buffer_to_upper_case_uni _vararg_count ret;
- ! glk_buffer_to_upper_case_uni(uintarray, arraylen, uint) => uint
- @glk 289 _vararg_count ret;
- return ret;
-];
-
-[ glk_buffer_to_title_case_uni _vararg_count ret;
- ! glk_buffer_to_title_case_uni(uintarray, arraylen, uint, uint) => uint
- @glk 290 _vararg_count ret;
- return ret;
-];
-
-[ glk_buffer_canon_decompose_uni _vararg_count ret;
- ! glk_buffer_canon_decompose_uni(uintarray, arraylen, uint) => uint
- @glk 291 _vararg_count ret;
- return ret;
-];
-
-[ glk_buffer_canon_normalize_uni _vararg_count ret;
- ! glk_buffer_canon_normalize_uni(uintarray, arraylen, uint) => uint
- @glk 292 _vararg_count ret;
- return ret;
-];
-
-[ glk_put_char_uni _vararg_count;
- ! glk_put_char_uni(uint)
- @glk 296 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_string_uni _vararg_count;
- ! glk_put_string_uni(unicode)
- @glk 297 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_buffer_uni _vararg_count;
- ! glk_put_buffer_uni(uintarray, arraylen)
- @glk 298 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_char_stream_uni _vararg_count;
- ! glk_put_char_stream_uni(stream, uint)
- @glk 299 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_string_stream_uni _vararg_count;
- ! glk_put_string_stream_uni(stream, unicode)
- @glk 300 _vararg_count 0;
- return 0;
-];
-
-[ glk_put_buffer_stream_uni _vararg_count;
- ! glk_put_buffer_stream_uni(stream, uintarray, arraylen)
- @glk 301 _vararg_count 0;
- return 0;
-];
-
-[ glk_get_char_stream_uni _vararg_count ret;
- ! glk_get_char_stream_uni(stream) => int
- @glk 304 _vararg_count ret;
- return ret;
-];
-
-[ glk_get_buffer_stream_uni _vararg_count ret;
- ! glk_get_buffer_stream_uni(stream, uintarray, arraylen) => uint
- @glk 305 _vararg_count ret;
- return ret;
-];
-
-[ glk_get_line_stream_uni _vararg_count ret;
- ! glk_get_line_stream_uni(stream, uintarray, arraylen) => uint
- @glk 306 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_open_file_uni _vararg_count ret;
- ! glk_stream_open_file_uni(fileref, uint, uint) => stream
- @glk 312 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_open_memory_uni _vararg_count ret;
- ! glk_stream_open_memory_uni(uintarray, arraylen, uint, uint) => stream
- @glk 313 _vararg_count ret;
- return ret;
-];
-
-[ glk_stream_open_resource_uni _vararg_count ret;
- ! glk_stream_open_resource_uni(uint, uint) => stream
- @glk 314 _vararg_count ret;
- return ret;
-];
-
-[ glk_request_char_event_uni _vararg_count;
- ! glk_request_char_event_uni(window)
- @glk 320 _vararg_count 0;
- return 0;
-];
-
-[ glk_request_line_event_uni _vararg_count;
- ! glk_request_line_event_uni(window, uintarray, arraylen, uint)
- @glk 321 _vararg_count 0;
- return 0;
-];
-
-[ glk_set_echo_line_event _vararg_count;
- ! glk_set_echo_line_event(window, uint)
- @glk 336 _vararg_count 0;
- return 0;
-];
-
-[ glk_set_terminators_line_event _vararg_count;
- ! glk_set_terminators_line_event(window, uintarray, arraylen)
- @glk 337 _vararg_count 0;
- return 0;
-];
-
-[ glk_current_time _vararg_count;
- ! glk_current_time(&{int, uint, int})
- @glk 352 _vararg_count 0;
- return 0;
-];
-
-[ glk_current_simple_time _vararg_count ret;
- ! glk_current_simple_time(uint) => int
- @glk 353 _vararg_count ret;
- return ret;
-];
-
-[ glk_time_to_date_utc _vararg_count;
- ! glk_time_to_date_utc(&{int, uint, int}, &{int, int, int, int, int, int, int, int})
- @glk 360 _vararg_count 0;
- return 0;
-];
-
-[ glk_time_to_date_local _vararg_count;
- ! glk_time_to_date_local(&{int, uint, int}, &{int, int, int, int, int, int, int, int})
- @glk 361 _vararg_count 0;
- return 0;
-];
-
-[ glk_simple_time_to_date_utc _vararg_count;
- ! glk_simple_time_to_date_utc(int, uint, &{int, int, int, int, int, int, int, int})
- @glk 362 _vararg_count 0;
- return 0;
-];
-
-[ glk_simple_time_to_date_local _vararg_count;
- ! glk_simple_time_to_date_local(int, uint, &{int, int, int, int, int, int, int, int})
- @glk 363 _vararg_count 0;
- return 0;
-];
-
-[ glk_date_to_time_utc _vararg_count;
- ! glk_date_to_time_utc(&{int, int, int, int, int, int, int, int}, &{int, uint, int})
- @glk 364 _vararg_count 0;
- return 0;
-];
-
-[ glk_date_to_time_local _vararg_count;
- ! glk_date_to_time_local(&{int, int, int, int, int, int, int, int}, &{int, uint, int})
- @glk 365 _vararg_count 0;
- return 0;
-];
-
-[ glk_date_to_simple_time_utc _vararg_count ret;
- ! glk_date_to_simple_time_utc(&{int, int, int, int, int, int, int, int}, uint) => int
- @glk 366 _vararg_count ret;
- return ret;
-];
-
-[ glk_date_to_simple_time_local _vararg_count ret;
- ! glk_date_to_simple_time_local(&{int, int, int, int, int, int, int, int}, uint) => int
- @glk 367 _vararg_count ret;
- return ret;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Rocks
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant GG_MAINWIN_ROCK 201;
-Constant GG_STATUSWIN_ROCK 202;
-Constant GG_QUOTEWIN_ROCK 203;
-Constant GG_SAVESTR_ROCK 301;
-Constant GG_SCRIPTSTR_ROCK 302;
-Constant GG_COMMANDWSTR_ROCK 303;
-Constant GG_COMMANDRSTR_ROCK 304;
-Constant GG_SCRIPTFREF_ROCK 401;
-Constant GG_FOREGROUNDCHAN_ROCK 410;
-Constant GG_BACKGROUNDCHAN_ROCK 411;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Stubs
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Stub HandleGlkEvent 2;
-#Stub IdentifyGlkObject 4;
-#Stub InitGlkWindow 1;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Starting Up
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_PreInitialise res;
- @gestalt 4 2 res; ! Test if this interpreter has Glk...
- if (res == 0) quit; ! ...without which there would be nothing we could do
-
- unicode_gestalt_ok = false;
- if (glk_gestalt(gestalt_Unicode, 0))
- unicode_gestalt_ok = true;
-
- ! Set the VM's I/O system to be Glk.
- @setiosys 2 0;
-];
-
-[ VM_Initialise res sty i;
- @gestalt 4 2 res; ! Test if this interpreter has Glk...
- if (res == 0) quit; ! ...without which there would be nothing we could do
-
- ! First, we must go through all the Glk objects that exist, and see
- ! if we created any of them. One might think this strange, since the
- ! program has just started running, but remember that the player might
- ! have just typed "restart".
-
- GGRecoverObjects();
-
- ! Sound channel initialisation, and RNG fixing, must be done now rather
- ! than later in case InitGlkWindow() returns a non-zero value.
-
- if (glk_gestalt(gestalt_Sound, 0)) {
- if (gg_foregroundchan == 0)
- gg_foregroundchan = glk_schannel_create(GG_FOREGROUNDCHAN_ROCK);
- if (gg_backgroundchan == 0)
- gg_backgroundchan = glk_schannel_create(GG_BACKGROUNDCHAN_ROCK);
- }
-
- #ifdef FIX_RNG;
- @random 10000 i;
- i = -i-2000;
- print "[Random number generator seed is ", i, "]^";
- @setrandom i;
- #endif; ! FIX_RNG
-
- res = InitGlkWindow(0);
- if (res ~= 0) return;
-
- ! Now, gg_mainwin and gg_storywin might already be set. If not, set them.
-
- if (gg_mainwin == 0) {
- ! Open the story window.
- res = InitGlkWindow(GG_MAINWIN_ROCK);
- if (res == 0) {
- ! Left-justify the header style
- glk_stylehint_set(wintype_TextBuffer, style_Header, stylehint_Justification, 0);
- ! Try to make emphasized type in italics and not boldface
- glk_stylehint_set(wintype_TextBuffer, style_Emphasized, stylehint_Weight, 0);
- glk_stylehint_set(wintype_TextBuffer, style_Emphasized, stylehint_Oblique, 1);
- gg_mainwin = glk_window_open(0, 0, 0, wintype_TextBuffer, GG_MAINWIN_ROCK);
- }
- if (gg_mainwin == 0) quit; ! If we can't even open one window, give in
- } else {
- ! There was already a story window. We should erase it.
- glk_window_clear(gg_mainwin);
- }
-
- if (gg_statuswin == 0) {
- res = InitGlkWindow(GG_STATUSWIN_ROCK);
- if (res == 0) {
- statuswin_cursize = statuswin_size;
- for (sty=0: sty0 = 0;
-];
-
-[ GGRecoverObjects id;
- ! If GGRecoverObjects() has been called, all these stored IDs are
- ! invalid, so we start by clearing them all out.
- ! (In fact, after a restoreundo, some of them may still be good.
- ! For simplicity, though, we assume the general case.)
- gg_mainwin = 0;
- gg_statuswin = 0;
- gg_quotewin = 0;
- gg_scriptfref = 0;
- gg_scriptstr = 0;
- gg_savestr = 0;
- statuswin_cursize = 0;
- gg_foregroundchan = 0;
- gg_backgroundchan = 0;
- #Ifdef DEBUG;
- gg_commandstr = 0;
- gg_command_reading = false;
- #Endif; ! DEBUG
- ! Also tell the game to clear its object references.
- IdentifyGlkObject(0);
-
- id = glk_stream_iterate(0, gg_arguments);
- while (id) {
- switch (gg_arguments-->0) {
- GG_SAVESTR_ROCK: gg_savestr = id;
- GG_SCRIPTSTR_ROCK: gg_scriptstr = id;
- #Ifdef DEBUG;
- GG_COMMANDWSTR_ROCK: gg_commandstr = id;
- gg_command_reading = false;
- GG_COMMANDRSTR_ROCK: gg_commandstr = id;
- gg_command_reading = true;
- #Endif; ! DEBUG
- default: IdentifyGlkObject(1, 1, id, gg_arguments-->0);
- }
- id = glk_stream_iterate(id, gg_arguments);
- }
-
- id = glk_window_iterate(0, gg_arguments);
- while (id) {
- switch (gg_arguments-->0) {
- GG_MAINWIN_ROCK: gg_mainwin = id;
- GG_STATUSWIN_ROCK: gg_statuswin = id;
- GG_QUOTEWIN_ROCK: gg_quotewin = id;
- default: IdentifyGlkObject(1, 0, id, gg_arguments-->0);
- }
- id = glk_window_iterate(id, gg_arguments);
- }
-
- id = glk_fileref_iterate(0, gg_arguments);
- while (id) {
- switch (gg_arguments-->0) {
- GG_SCRIPTFREF_ROCK: gg_scriptfref = id;
- default: IdentifyGlkObject(1, 2, id, gg_arguments-->0);
- }
- id = glk_fileref_iterate(id, gg_arguments);
- }
-
- if (glk_gestalt(gestalt_Sound, 0)) {
- id = glk_schannel_iterate(0, gg_arguments);
- while (id) {
- switch (gg_arguments-->0) {
- GG_FOREGROUNDCHAN_ROCK: gg_foregroundchan = id;
- GG_BACKGROUNDCHAN_ROCK: gg_backgroundchan = id;
- default: IdentifyGlkObject(1, 3, id, gg_arguments-->0);
- }
- id = glk_schannel_iterate(id, gg_arguments);
- }
- if (gg_foregroundchan ~= 0) { glk_schannel_stop(gg_foregroundchan); }
- if (gg_backgroundchan ~= 0) { glk_schannel_stop(gg_backgroundchan); }
- }
-
- ! Tell the game to tie up any loose ends.
- IdentifyGlkObject(2);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Enable Acceleration
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ENABLE_GLULX_ACCEL_R addr res;
- @gestalt 9 0 res;
- if (res == 0) return;
- addr = #classes_table;
- @accelparam 0 addr;
- @accelparam 1 INDIV_PROP_START;
- @accelparam 2 Class;
- @accelparam 3 Object;
- @accelparam 4 Routine;
- @accelparam 5 String;
- addr = #globals_array + WORDSIZE * #g$self;
- @accelparam 6 addr;
- @accelparam 7 NUM_ATTR_BYTES;
- addr = #cpv__start;
- @accelparam 8 addr;
- @accelfunc 1 Z__Region;
- @accelfunc 2 CP__Tab;
- @accelfunc 3 RA__Pr;
- @accelfunc 4 RL__Pr;
- @accelfunc 5 OC__Cl;
- @accelfunc 6 RV__Pr;
- @accelfunc 7 OP__Pr;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Release Number
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Describe_Release i;
- print "Release ";
- @aloads ROM_GAMERELEASE 0 i;
- print i;
- print " / Serial number ";
- for (i=0 : i<6 : i++) print (char) ROM_GAMESERIAL->i;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Keyboard Input
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_KeyChar win nostat done res ix jx ch;
- jx = ch; ! squash compiler warnings
- if (win == 0) win = gg_mainwin;
- if (gg_commandstr ~= 0 && gg_command_reading ~= false) {
- done = glk_get_line_stream(gg_commandstr, gg_arguments, 31);
- if (done == 0) {
- glk_stream_close(gg_commandstr, 0);
- gg_commandstr = 0;
- gg_command_reading = false;
- ! fall through to normal user input.
- } else {
- ! Trim the trailing newline
- if (gg_arguments->(done-1) == 10) done = done-1;
- res = gg_arguments->0;
- if (res == '\') {
- res = 0;
- for (ix=1 : ixix;
- if (ch >= '0' && ch <= '9') {
- @shiftl res 4 res;
- res = res + (ch-'0');
- } else if (ch >= 'a' && ch <= 'f') {
- @shiftl res 4 res;
- res = res + (ch+10-'a');
- } else if (ch >= 'A' && ch <= 'F') {
- @shiftl res 4 res;
- res = res + (ch+10-'A');
- }
- }
- }
- jump KCPContinue;
- }
- }
- done = false;
- glk_request_char_event(win);
- while (~~done) {
- glk_select(gg_event);
- switch (gg_event-->0) {
- 5: ! evtype_Arrange
- if (nostat) {
- glk_cancel_char_event(win);
- res = $80000000;
- done = true;
- break;
- }
- DrawStatusLine();
- 2: ! evtype_CharInput
- if (gg_event-->1 == win) {
- res = gg_event-->2;
- done = true;
- }
- }
- ix = HandleGlkEvent(gg_event, 1, gg_arguments);
- if (ix == 2) {
- res = gg_arguments-->0;
- done = true;
- } else if (ix == -1) done = false;
- }
- if (gg_commandstr ~= 0 && gg_command_reading == false) {
- if (res < 32 || res >= 256 || (res == '\' or ' ')) {
- glk_put_char_stream(gg_commandstr, '\');
- done = 0;
- jx = res;
- for (ix=0 : ix<8 : ix++) {
- @ushiftr jx 28 ch;
- @shiftl jx 4 jx;
- ch = ch & $0F;
- if (ch ~= 0 || ix == 7) done = 1;
- if (done) {
- if (ch >= 0 && ch <= 9) ch = ch + '0';
- else ch = (ch - 10) + 'A';
- glk_put_char_stream(gg_commandstr, ch);
- }
- }
- } else {
- glk_put_char_stream(gg_commandstr, res);
- }
- glk_put_char_stream(gg_commandstr, 10); ! newline
- }
- .KCPContinue;
- return res;
-];
-
-[ VM_KeyDelay tenths key done ix;
- glk_request_char_event(gg_mainwin);
- glk_request_timer_events(tenths*100);
- while (~~done) {
- glk_select(gg_event);
- ix = HandleGlkEvent(gg_event, 1, gg_arguments);
- if (ix == 2) {
- key = gg_arguments-->0;
- done = true;
- }
- else if (ix >= 0 && gg_event-->0 == 1 or 2) {
- key = gg_event-->2;
- done = true;
- }
- }
- glk_cancel_char_event(gg_mainwin);
- glk_request_timer_events(0);
- return key;
-];
-
-[ VM_ReadKeyboard a_buffer a_table done ix;
- if (gg_commandstr ~= 0 && gg_command_reading ~= false) {
- done = glk_get_line_stream(gg_commandstr, a_buffer+WORDSIZE,
- (INPUT_BUFFER_LEN-WORDSIZE)-1);
- if (done == 0) {
- glk_stream_close(gg_commandstr, 0);
- gg_commandstr = 0;
- gg_command_reading = false;
- }
- else {
- ! Trim the trailing newline
- if ((a_buffer+WORDSIZE)->(done-1) == 10) done = done-1;
- a_buffer-->0 = done;
- VM_Style(INPUT_VMSTY);
- glk_put_buffer(a_buffer+WORDSIZE, done);
- VM_Style(NORMAL_VMSTY);
- print "^";
- jump KPContinue;
- }
- }
- done = false;
- glk_request_line_event(gg_mainwin, a_buffer+WORDSIZE, INPUT_BUFFER_LEN-WORDSIZE, 0);
- while (~~done) {
- glk_select(gg_event);
- switch (gg_event-->0) {
- 5: ! evtype_Arrange
- DrawStatusLine();
- 3: ! evtype_LineInput
- if (gg_event-->1 == gg_mainwin) {
- a_buffer-->0 = gg_event-->2;
- done = true;
- }
- }
- ix = HandleGlkEvent(gg_event, 0, a_buffer);
- if (ix == 2) done = true;
- else if (ix == -1) done = false;
- }
- if (gg_commandstr ~= 0 && gg_command_reading == false) {
- glk_put_buffer_stream(gg_commandstr, a_buffer+WORDSIZE, a_buffer-->0);
- glk_put_char_stream(gg_commandstr, 10); ! newline
- }
- .KPContinue;
- VM_Tokenise(a_buffer,a_table);
- ! It's time to close any quote window we've got going.
- if (gg_quotewin) {
- glk_window_close(gg_quotewin, 0);
- gg_quotewin = 0;
- }
- #ifdef ECHO_COMMANDS;
- print "** ";
- for (ix=WORDSIZE: ix<(a_buffer-->0)+WORDSIZE: ix++) print (char) a_buffer->ix;
- print "^";
- #endif; ! ECHO_COMMANDS
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Buffer Functions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_CopyBuffer bto bfrom i;
- for (i=0: ii = bfrom->i;
-];
-
-[ VM_PrintToBuffer buf len a b c;
- if (b) {
- if (metaclass(a) == Object && a.#b == WORDSIZE
- && metaclass(a.b) == String)
- buf-->0 = Glulx_PrintAnyToArray(buf+WORDSIZE, len, a.b);
- else if (metaclass(a) == Routine)
- buf-->0 = Glulx_PrintAnyToArray(buf+WORDSIZE, len, a, b, c);
- else
- buf-->0 = Glulx_PrintAnyToArray(buf+WORDSIZE, len, a, b);
- }
- else if (metaclass(a) == Routine)
- buf-->0 = Glulx_PrintAnyToArray(buf+WORDSIZE, len, a, b, c);
- else
- buf-->0 = Glulx_PrintAnyToArray(buf+WORDSIZE, len, a);
- if (buf-->0 > len) buf-->0 = len;
- return buf-->0;
-];
-
-[ VM_Tokenise buf tab
- cx numwords len bx ix wx wpos wlen val res dictlen entrylen;
- len = buf-->0;
- buf = buf+WORDSIZE;
-
- ! First, split the buffer up into words. We use the standard Infocom
- ! list of word separators (comma, period, double-quote).
-
- cx = 0;
- numwords = 0;
- while (cx < len) {
- while (cx < len && buf->cx == ' ') cx++;
- if (cx >= len) break;
- bx = cx;
- if (buf->cx == '.' or ',' or '"') cx++;
- else {
- while (cx < len && buf->cx ~= ' ' or '.' or ',' or '"') cx++;
- }
- tab-->(numwords*3+2) = (cx-bx);
- tab-->(numwords*3+3) = WORDSIZE+bx;
- numwords++;
- if (numwords >= MAX_BUFFER_WORDS) break;
- }
- tab-->0 = numwords;
-
- ! Now we look each word up in the dictionary.
-
- dictlen = #dictionary_table-->0;
- entrylen = DICT_WORD_SIZE + 7;
-
- for (wx=0 : wx(wx*3+2);
- wpos = tab-->(wx*3+3);
-
- ! Copy the word into the gg_tokenbuf array, clipping to DICT_WORD_SIZE
- ! characters and lower case.
- if (wlen > DICT_WORD_SIZE) wlen = DICT_WORD_SIZE;
- cx = wpos - WORDSIZE;
- for (ix=0 : ixix = VM_UpperToLowerCase(buf->(cx+ix));
- for (: ixix = 0;
-
- val = #dictionary_table + WORDSIZE;
- @binarysearch gg_tokenbuf DICT_WORD_SIZE val entrylen dictlen 1 1 res;
- tab-->(wx*3+1) = res;
- }
-];
-
-[ LTI_Insert i ch b y;
-
- ! Protect us from strict mode, as this isn't an array in quite the
- ! sense it expects
- b = buffer;
-
- ! Insert character ch into buffer at point i.
- ! Being careful not to let the buffer possibly overflow:
- y = b-->0;
- if (y > INPUT_BUFFER_LEN) y = INPUT_BUFFER_LEN;
-
- ! Move the subsequent text along one character:
- for (y=y+WORDSIZE : y>i : y--) b->y = b->(y-1);
- b->i = ch;
-
- ! And the text is now one character longer:
- if (b-->0 < INPUT_BUFFER_LEN) (b-->0)++;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Dictionary Functions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_InvalidDictionaryAddress addr;
- if (addr < 0) rtrue;
- rfalse;
-];
-
-[ VM_DictionaryAddressToNumber w; return w; ];
-[ VM_NumberToDictionaryAddress n; return n; ];
-
-Array gg_tokenbuf -> DICT_WORD_SIZE;
-
-[ GGWordCompare str1 str2 ix jx;
- for (ix=0 : ixix) - (str2->ix);
- if (jx ~= 0) return jx;
- }
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: SHOWVERB support
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef DEBUG;
-[ DebugAction a str;
- if (a >= 4096) { print ""; return; }
- if (a < 0 || a >= #identifiers_table-->7) print "";
- else {
- str = #identifiers_table-->6;
- str = str-->a;
- if (str) print (string) str; else print "";
- }
-];
-
-[ DebugAttribute a str;
- if (a < 0 || a >= NUM_ATTR_BYTES*8) print "";
- else {
- str = #identifiers_table-->4;
- str = str-->a;
- if (str) print (string) str; else print "";
- }
-];
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Command Tables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_CommandTableAddress i;
- return (#grammar_table)-->(i+1);
-];
-
-[ VM_PrintCommandWords i wd j dictlen entrylen;
- dictlen = #dictionary_table-->0;
- entrylen = DICT_WORD_SIZE + 7;
- for (j=0 : j
-! Glulx_PrintAnything(0)
-! Glulx_PrintAnything("string"); print (string) "string";
-! Glulx_PrintAnything('word') print (address) 'word';
-! Glulx_PrintAnything(obj) print (name) obj;
-! Glulx_PrintAnything(obj, prop) obj.prop();
-! Glulx_PrintAnything(obj, prop, args...) obj.prop(args...);
-! Glulx_PrintAnything(func) func();
-! Glulx_PrintAnything(func, args...) func(args...);
-
-[ Glulx_PrintAnything _vararg_count obj mclass;
- if (_vararg_count == 0) return;
- @copy sp obj;
- _vararg_count--;
- if (obj == 0) return;
-
- if (obj->0 == $60) {
- ! Dictionary word. Metaclass() can't catch this case, so we do it manually
- print (address) obj;
- return;
- }
-
- mclass = metaclass(obj);
- switch (mclass) {
- nothing:
- return;
- String:
- print (string) obj;
- return;
- Routine:
- ! Call the function with all the arguments which are already
- ! on the stack.
- @call obj _vararg_count 0;
- return;
- Object:
- if (_vararg_count == 0) {
- print (name) obj;
- }
- else {
- ! Push the object back onto the stack, and call the
- ! veneer routine that handles obj.prop() calls.
- @copy obj sp;
- _vararg_count++;
- @call CA__Pr _vararg_count 0;
- }
- return;
- }
-];
-
-[ Glulx_PrintAnyToArray _vararg_count arr arrlen str oldstr len;
- @copy sp arr;
- @copy sp arrlen;
- _vararg_count = _vararg_count - 2;
-
- oldstr = glk_stream_get_current();
- str = glk_stream_open_memory(arr, arrlen, 1, 0);
- if (str == 0) return 0;
-
- glk_stream_set_current(str);
-
- @call Glulx_PrintAnything _vararg_count 0;
-
- glk_stream_set_current(oldstr);
- @copy $ffffffff sp;
- @copy str sp;
- @glk $0044 2 0; ! stream_close
- @copy sp len;
- @copy sp 0;
- return len;
-];
-
-Constant GG_ANYTOSTRING_LEN 66;
-Array AnyToStrArr -> GG_ANYTOSTRING_LEN+1;
-
-[ Glulx_ChangeAnyToCString _vararg_count ix len;
- ix = GG_ANYTOSTRING_LEN-2;
- @copy ix sp;
- ix = AnyToStrArr+1;
- @copy ix sp;
- ix = _vararg_count+2;
- @call Glulx_PrintAnyToArray ix len;
- AnyToStrArr->0 = $E0;
- if (len >= GG_ANYTOSTRING_LEN)
- len = GG_ANYTOSTRING_LEN-1;
- AnyToStrArr->(len+1) = 0;
- return AnyToStrArr;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: The Screen
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_ClearScreen window;
- if (window == WIN_ALL or WIN_MAIN) {
- glk_window_clear(gg_mainwin);
- if (gg_quotewin) {
- glk_window_close(gg_quotewin, 0);
- gg_quotewin = 0;
- }
- }
- if (gg_statuswin && window == WIN_ALL or WIN_STATUS) glk_window_clear(gg_statuswin);
-];
-
-[ VM_ScreenWidth id;
- id=gg_mainwin;
- if (gg_statuswin && statuswin_current) id = gg_statuswin;
- glk_window_get_size(id, gg_arguments, 0);
- return gg_arguments-->0;
-];
-
-[ VM_ScreenHeight;
- glk_window_get_size(gg_mainwin, 0, gg_arguments);
- return gg_arguments-->0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Window Colours
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_SetWindowColours f b window doclear i fwd bwd swin;
- if (clr_on && f && b) {
- if (window) swin = 5-window; ! 4 for TextGrid, 3 for TextBuffer
-
- fwd = MakeColourWord(f);
- bwd = MakeColourWord(b);
- for (i=0 : i 9) return c;
- c = c-2;
- return $ff0000*(c&1) + $ff00*(c&2 ~= 0) + $ff*(c&4 ~= 0);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Main Window
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_MainWindow;
- glk_set_window(gg_mainwin); ! set_window
- statuswin_current=0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Status Line
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_StatusLineHeight hgt;
- if (gg_statuswin == 0) return;
- if (hgt == statuswin_cursize) return;
- glk_window_set_arrangement(glk_window_get_parent(gg_statuswin), $12, hgt, 0);
- statuswin_cursize = hgt;
-];
-
-[ VM_MoveCursorInStatusLine line column;
- if (gg_statuswin == 0) return;
- glk_set_window(gg_statuswin);
- if (line == 0) { line = 1; column = 1; }
- glk_window_move_cursor(gg_statuswin, column-1, line-1);
- statuswin_current=1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Quotation Boxes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Box__Routine maxwid arr ix lines lastnl parwin;
- maxwid = 0; ! squash compiler warning
- lines = arr-->0;
-
- if (gg_quotewin == 0) {
- gg_arguments-->0 = lines;
- ix = InitGlkWindow(GG_QUOTEWIN_ROCK);
- if (ix == 0)
- gg_quotewin =
- glk_window_open(gg_mainwin, winmethod_Fixed + winmethod_Above,
- lines, wintype_TextBuffer, GG_QUOTEWIN_ROCK);
- } else {
- parwin = glk_window_get_parent(gg_quotewin);
- glk_window_set_arrangement(parwin, $12, lines, 0);
- }
-
- lastnl = true;
- if (gg_quotewin) {
- glk_window_clear(gg_quotewin);
- glk_set_window(gg_quotewin);
- lastnl = false;
- }
-
- VM_Style(BLOCKQUOTE_VMSTY);
- for (ix=0 : ix(ix+1);
- if (ix < lines-1 || lastnl) new_line;
- }
- VM_Style(NORMAL_VMSTY);
-
- if (gg_quotewin) glk_set_window(gg_mainwin);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: GlkList Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef DEBUG;
-[ GlkListSub id val;
- id = glk_window_iterate(0, gg_arguments);
- while (id) {
- print "Window ", id, " (", gg_arguments-->0, "): ";
- val = glk_window_get_type(id);
- switch (val) {
- 1: print "pair";
- 2: print "blank";
- 3: print "textbuffer";
- 4: print "textgrid";
- 5: print "graphics";
- default: print "unknown";
- }
- val = glk_window_get_parent(id);
- if (val) print ", parent is window ", val;
- else print ", no parent (root)";
- val = glk_window_get_stream(id);
- print ", stream ", val;
- val = glk_window_get_echo_stream(id);
- if (val) print ", echo stream ", val;
- print "^";
- id = glk_window_iterate(id, gg_arguments);
- }
- id = glk_stream_iterate(0, gg_arguments);
- while (id) {
- print "Stream ", id, " (", gg_arguments-->0, ")^";
- id = glk_stream_iterate(id, gg_arguments);
- }
- id = glk_fileref_iterate(0, gg_arguments);
- while (id) {
- print "Fileref ", id, " (", gg_arguments-->0, ")^";
- id = glk_fileref_iterate(id, gg_arguments);
- }
- if (glk_gestalt(gestalt_Sound, 0)) {
- id = glk_schannel_iterate(0, gg_arguments);
- while (id) {
- print "Soundchannel ", id, " (", gg_arguments-->0, ")^";
- id = glk_schannel_iterate(id, gg_arguments);
- }
- }
-];
-
-Verb meta 'glklist'
-
- * -> Glklist;
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Undo
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Undo result_code;
- @restoreundo result_code;
- return (~~result_code);
-];
-
-[ VM_Save_Undo result_code;
- @saveundo result_code;
- if (result_code == -1) { GGRecoverObjects(); return 2; }
- return (~~result_code);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Quit The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ QUIT_THE_GAME_R;
- if (actor ~= player) rfalse;
- if ((actor == player) && (untouchable_silence == false))
- QUIT_THE_GAME_RM('A');
- if (YesOrNo()~=0) quit;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Restart The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RESTART_THE_GAME_R;
- if (actor ~= player) rfalse;
- RESTART_THE_GAME_RM('A');
- if (YesOrNo()~=0) {
- @restart;
- RESTART_THE_GAME_RM('B'); new_line;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Restore The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RESTORE_THE_GAME_R res fref;
- if (actor ~= player) rfalse;
- fref = glk_fileref_create_by_prompt($01, $02, 0);
- if (fref == 0) jump RFailed;
- gg_savestr = glk_stream_open_file(fref, $02, GG_SAVESTR_ROCK);
- glk_fileref_destroy(fref);
- if (gg_savestr == 0) jump RFailed;
- @restore gg_savestr res;
- glk_stream_close(gg_savestr, 0);
- gg_savestr = 0;
- .RFailed;
- RESTORE_THE_GAME_RM('A'); new_line;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Save The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SAVE_THE_GAME_R res fref;
- if (actor ~= player) rfalse;
- fref = glk_fileref_create_by_prompt($01, $01, 0);
- if (fref == 0) jump SFailed;
- gg_savestr = glk_stream_open_file(fref, $01, GG_SAVESTR_ROCK);
- glk_fileref_destroy(fref);
- if (gg_savestr == 0) jump SFailed;
- @save gg_savestr res;
- if (res == -1) {
- ! The player actually just typed "restore". We first have to recover
- ! all the Glk objects; the values in our global variables are all wrong.
- GGRecoverObjects();
- glk_stream_close(gg_savestr, 0); ! stream_close
- gg_savestr = 0;
- RESTORE_THE_GAME_RM('B'); new_line;
- rtrue;
- }
- glk_stream_close(gg_savestr, 0); ! stream_close
- gg_savestr = 0;
- if (res == 0) { SAVE_THE_GAME_RM('B'); new_line; rtrue; }
- .SFailed;
- SAVE_THE_GAME_RM('A'); new_line;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Verify The Story File Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VERIFY_THE_STORY_FILE_R res;
- if (actor ~= player) rfalse;
- @verify res;
- if (res == 0) { VERIFY_THE_STORY_FILE_RM('A'); new_line; rtrue; }
- VERIFY_THE_STORY_FILE_RM('B'); new_line;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Switch Transcript On Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SWITCH_TRANSCRIPT_ON_R;
- if (actor ~= player) rfalse;
- if (gg_scriptstr ~= 0) { SWITCH_TRANSCRIPT_ON_RM('A'); new_line; rtrue; }
- if (gg_scriptfref == 0) {
- gg_scriptfref = glk_fileref_create_by_prompt($102, $05, GG_SCRIPTFREF_ROCK);
- if (gg_scriptfref == 0) jump S1Failed;
- }
- ! stream_open_file
- gg_scriptstr = glk_stream_open_file(gg_scriptfref, $05, GG_SCRIPTSTR_ROCK);
- if (gg_scriptstr == 0) jump S1Failed;
- glk_window_set_echo_stream(gg_mainwin, gg_scriptstr);
- SWITCH_TRANSCRIPT_ON_RM('B'); new_line;
- VersionSub();
- return;
- .S1Failed;
- SWITCH_TRANSCRIPT_ON_RM('C'); new_line;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Switch Transcript Off Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SWITCH_TRANSCRIPT_OFF_R;
- if (actor ~= player) rfalse;
- if (gg_scriptstr == 0) { SWITCH_TRANSCRIPT_OFF_RM('A'); new_line; rtrue; }
- SWITCH_TRANSCRIPT_OFF_RM('B'); new_line;
- glk_stream_close(gg_scriptstr, 0); ! stream_close
- gg_scriptstr = 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Announce Story File Version Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ANNOUNCE_STORY_FILE_VERSION_R ix;
- if (actor ~= player) rfalse;
- Banner();
- print "Identification number: ";
- for (ix=6: ix <= UUID_ARRAY->0: ix++) print (char) UUID_ARRAY->ix;
- print "^";
- @gestalt 1 0 ix;
- print "Interpreter version ", ix / $10000, ".", (ix & $FF00) / $100,
- ".", ix & $FF, " / ";
- @gestalt 0 0 ix;
- print "VM ", ix / $10000, ".", (ix & $FF00) / $100, ".", ix & $FF, " / ";
- print "Library serial number ", (string) LibSerial, "^";
- #Ifdef LanguageVersion;
- print (string) LanguageVersion, "^";
- #Endif; ! LanguageVersion
- ShowExtensionVersions();
- say__p = 1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Descend To Specific Action Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DESCEND_TO_SPECIFIC_ACTION_R;
- indirect(#actions_table-->(action+1));
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Glulx.i6t: Veneer
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Unsigned__Compare x y;
- @jleu x y ?lesseq;
- return 1;
- .lesseq;
- @jeq x y ?equal;
- return -1;
- .equal;
- return 0;
-];
-
-[ RT__ChLDW x y;
- @aload x y sp;
- @return sp;
-];
-
-[ RT__ChLDB x y;
- @aloadb x y sp;
- @return sp;
-];
-
-#Endif;
-
-#Ifdef TARGET_ZCODE;
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Summary
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Variables and Arrays
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global top_object; ! largest valid number of any tree object
-Global xcommsdir; ! true if command recording is on
-Global transcript_mode; ! true if game scripting is on
-
-Constant INPUT_BUFFER_LEN = 120; ! Length of buffer array
-
-Array buffer -> 123; ! Buffer for parsing main line of input
-Array buffer2 -> 123; ! Buffers for supplementary questions
-Array buffer3 -> 123; ! Buffer retaining input for "again"
-Array parse buffer 63; ! Parse table mirroring it
-Array parse2 buffer 63; !
-
-Global dict_start;
-Global dict_entry_size;
-Global dict_end;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Starting Up
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Initialise i;
- standard_interpreter = HDR_TERPSTANDARD-->0;
- transcript_mode = ((HDR_GAMEFLAGS-->0) & 1);
-
- dict_start = HDR_DICTIONARY-->0;
- dict_entry_size = dict_start->(dict_start->0 + 1);
- dict_start = dict_start + dict_start->0 + 4;
- dict_end = dict_start + ((dict_start - 2)-->0) * dict_entry_size;
-
- buffer->0 = INPUT_BUFFER_LEN;
- buffer2->0 = INPUT_BUFFER_LEN;
- buffer3->0 = INPUT_BUFFER_LEN;
- parse->0 = 15;
- parse2->0 = 15;
-
- top_object = #largest_object-255;
-
- #ifdef FIX_RNG;
- @random 10000 -> i;
- i = -i-2000;
- print "[Random number generator seed is ", i, "]^";
- @random i -> i;
- #endif; ! FIX_RNG
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Enable Acceleration
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ENABLE_GLULX_ACCEL_R;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Release Number
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Describe_Release i;
- print "Release ", (HDR_GAMERELEASE-->0) & $03ff, " / Serial number ";
- for (i=0 : i<6 : i++) print (char) HDR_GAMESERIAL->i;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Keyboard Input
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_KeyChar win key;
- if (win) @set_window win;
- @read_char 1 -> key;
- return key;
-];
-
-[ VM_KeyDelay tenths key;
- @read_char 1 tenths VM_KeyDelay_Interrupt -> key;
- return key;
-];
-[ VM_KeyDelay_Interrupt; rtrue; ];
-
-[ VM_ReadKeyboard a_buffer a_table i;
- read a_buffer a_table;
- #ifdef ECHO_COMMANDS;
- print "** ";
- for (i=2: i<=(a_buffer->1)+1: i++) print (char) a_buffer->i;
- print "^";
- #ifnot;
- i=0; ! suppress compiler warning
- #endif;
-
- #Iftrue (#version_number == 6);
- @output_stream -1;
- @loadb a_buffer 1 -> sp;
- @add a_buffer 2 -> sp;
- @print_table sp sp;
- new_line;
- @output_stream 1;
- #Endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Buffer Functions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_CopyBuffer bto bfrom i;
- for (i=0: ii = bfrom->i;
-];
-
-[ VM_PrintToBuffer buf len a b c;
- @output_stream 3 buf;
- switch (metaclass(a)) {
- String: print (string) a;
- Routine: a(b, c);
- Object, Class: if (b) PrintOrRun(a, b, true); else print (name) a;
- }
- @output_stream -3;
- if (buf-->0 > len) print "Error: Overflow in VM_PrintToBuffer.^";
- return buf-->0;
-];
-
-[ VM_Tokenise b p; b->(2 + b->1) = 0; @tokenise b p; ];
-
-[ LTI_Insert i ch b y;
- ! Protect us from strict mode, as this isn't an array in quite the
- ! sense it expects
- b = buffer;
-
- ! Insert character ch into buffer at point i.
- ! Being careful not to let the buffer possibly overflow:
- y = b->1;
- if (y > b->0) y = b->0;
-
- ! Move the subsequent text along one character:
- for (y=y+2 : y>i : y--) b->y = b->(y-1);
- b->i = ch;
-
- ! And the text is now one character longer:
- if (b->1 < b->0) (b->1)++;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Dictionary Functions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_InvalidDictionaryAddress addr;
- if ((UnsignedCompare(addr, dict_start) < 0) ||
- (UnsignedCompare(addr, dict_end) >= 0) ||
- ((addr - dict_start) % dict_entry_size ~= 0)) rtrue;
- rfalse;
-];
-
-[ VM_DictionaryAddressToNumber w; return (w-(HDR_DICTIONARY-->0 + 7))/9; ];
-[ VM_NumberToDictionaryAddress n; return HDR_DICTIONARY-->0 + 7 + 9*n; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Command Tables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_CommandTableAddress i;
- return (HDR_STATICMEMORY-->0)-->i;
-];
-
-[ VM_PrintCommandWords i da j;
- da = HDR_DICTIONARY-->0;
- for (j=0 : j<(da+5)-->0 : j++)
- if (da->(j*9 + 14) == $ff-i)
- print "'", (address) VM_NumberToDictionaryAddress(j), "' ";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: SHOWVERB support
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef DEBUG;
-[ DebugAction a anames;
- if (a >= 4096) { print ""; return; }
- anames = #identifiers_table;
- anames = anames + 2*(anames-->0) + 2*48;
- print (string) anames-->a;
-];
-
-[ DebugAttribute a anames;
- if (a < 0 || a >= 48) print "";
- else {
- anames = #identifiers_table; anames = anames + 2*(anames-->0);
- print (string) anames-->a;
- }
-];
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: RNG
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Seed_RNG n;
- if (n > 0) n = -n;
- @random n -> n;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Memory Allocation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_AllocateMemory amount;
- return 0;
-];
-
-[ VM_FreeMemory address;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Audiovisual Resources
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Picture resource_ID;
- #IFTRUE #version_number == 6; ! Z-machine version 6
- @draw_picture resource_ID;
- #ENDIF;
-];
-
-[ VM_SoundEffect resource_ID;
- #IFTRUE #version_number == 6; ! Z-machine version 6
- @sound_effect resource_ID;
- #ENDIF;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Typography
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Style sty;
- switch (sty) {
- NORMAL_VMSTY, NOTE_VMSTY: style roman;
- HEADER_VMSTY, SUBHEADER_VMSTY, ALERT_VMSTY: style bold;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Character Casing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_UpperToLowerCase c;
- switch (c) {
- 'A' to 'Z': c = c + 32;
- 202, 204, 212, 214, 221: c--;
- 217, 218: c = c - 2;
- 158 to 160, 167 to 168, 208 to 210: c = c - 3;
- 186 to 190, 196 to 200: c = c - 5 ;
- 175 to 180: c = c - 6;
- }
- return c;
-];
-
-[ VM_LowerToUpperCase c;
- switch (c) {
- 'a' to 'z': c = c - 32;
- 201, 203, 211, 213, 220: c++;
- 215, 216: c = c + 2;
- 155 to 157, 164 to 165, 205 to 207: c = c + 3;
- 181 to 185, 191 to 195: c = c + 5 ;
- 169 to 174: c = c + 6;
- }
- return c;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: The Screen
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_ClearScreen window;
- switch (window) {
- WIN_ALL: @erase_window -1; statuswin_cursize = 0;
- WIN_STATUS: @erase_window 1;
- WIN_MAIN: @erase_window 0;
- }
-];
-
-#Iftrue (#version_number == 6);
-[ VM_ScreenWidth width charw;
- @get_wind_prop 1 3 -> width;
- @get_wind_prop 1 13 -> charw;
- charw = charw & $FF;
- return (width+charw-1) / charw;
-];
-#Ifnot;
-[ VM_ScreenWidth; return (HDR_SCREENWCHARS->0); ];
-#Endif;
-
-[ VM_ScreenHeight; return (HDR_SCREENHLINES->0); ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Window Colours
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_SetWindowColours f b window;
- if (clr_on && f && b) {
- if (window == 0) { ! if setting both together, set reverse
- clr_fgstatus = b;
- clr_bgstatus = f;
- }
- if (window == 1) {
- clr_fgstatus = f;
- clr_bgstatus = b;
- }
- if (window == 0 or 2) {
- clr_fg = f;
- clr_bg = b;
- }
- if (statuswin_current)
- @set_colour clr_fgstatus clr_bgstatus;
- else
- @set_colour clr_fg clr_bg;
- }
-];
-
-[ VM_RestoreWindowColours; ! compare I6 library patch L61007
- if (clr_on) { ! check colour has been used
- VM_SetWindowColours(clr_fg, clr_bg, 2); ! make sure both sets of variables are restored
- VM_SetWindowColours(clr_fgstatus, clr_bgstatus, 1, true);
- VM_ClearScreen();
- }
- #Iftrue (#version_number == 6); ! request screen update
- (0-->8) = (0-->8) | $$00000100;
- #Endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Main Window
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_MainWindow;
- if (statuswin_current) {
- if (clr_on && clr_bgstatus > 1) @set_colour clr_fg clr_bg;
- else style roman;
- @set_window 0;
- }
- statuswin_current = false;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Status Line
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_MoveCursorInStatusLine line column; ! 1-based position on text grid
- if (~~statuswin_current) {
- @set_window 1;
- if (clr_on && clr_bgstatus > 1) @set_colour clr_fgstatus clr_bgstatus;
- else style reverse;
- }
- if (line == 0) {
- line = 1;
- column = 1;
- }
- #Iftrue (#version_number == 6);
- Z6_MoveCursor(line, column);
- #Ifnot;
- @set_cursor line column;
- #Endif;
- statuswin_current = true;
-];
-
-#Iftrue (#version_number == 6);
-[ Z6_MoveCursor line column charw charh; ! 1-based position on text grid
- @get_wind_prop 1 13 -> charw; ! font size
- @log_shift charw $FFF8 -> charh;
- charw = charw / $100;
- line = 1 + charh*(line-1);
- column = 1 + charw*(column-1);
- @set_cursor line column;
-];
-#Endif;
-
-#Iftrue (#version_number == 6);
-[ VM_StatusLineHeight height wx wy x y charh;
- ! Split the window. Standard 1.0 interpreters should keep the window 0
- ! cursor in the same absolute position, but older interpreters,
- ! including Infocom's don't - they keep the window 0 cursor in the
- ! same position relative to its origin. We therefore compensate
- ! manually.
- @get_wind_prop 0 0 -> wy; @get_wind_prop 0 1 -> wx;
- @get_wind_prop 0 13 -> charh; @log_shift charh $FFF8 -> charh;
- @get_wind_prop 0 4 -> y; @get_wind_prop 0 5 -> x;
- height = height * charh;
- @split_window height;
- y = y - height + wy - 1;
- if (y < 1) y = 1;
- x = x + wx - 1;
- @set_cursor y x 0;
- statuswin_cursize = height;
-];
-#Ifnot;
-[ VM_StatusLineHeight height;
- if (statuswin_cursize ~= height)
- @split_window height;
- statuswin_cursize = height;
-];
-#Endif;
-
-#Iftrue (#version_number == 6);
-[ Z6_DrawStatusLine width x charw scw;
- (0-->8) = (0-->8) &~ $$00000100;
- @push say__p; @push say__pc;
- BeginActivity(CONSTRUCTING_STATUS_LINE_ACT);
- VM_StatusLineHeight(statuswin_size);
- ! Now clear the window. This isn't totally trivial. Our approach is to select the
- ! fixed space font, measure its width, and print an appropriate
- ! number of spaces. We round up if the screen isn't a whole number
- ! of characters wide, and rely on window 1 being set to clip by default.
- VM_MoveCursorInStatusLine(1, 1);
- @set_font 4 -> x;
- width = VM_ScreenWidth();
- spaces width;
- ClearParagraphing(8);
- if (ForActivity(CONSTRUCTING_STATUS_LINE_ACT) == false) {
- ! Back to standard font for the display. We use output_stream 3 to
- ! measure the space required, the aim being to get 50 characters
- ! worth of space for the location name.
- VM_MoveCursorInStatusLine(1, 2);
- @set_font 1 -> x;
- TEXT_TY_Say(left_hand_status_line);
- @get_wind_prop 1 3 -> width;
- @get_wind_prop 1 13 -> charw;
- charw = charw & $FF;
- @output_stream 3 StorageForShortName;
- TEXT_TY_Say(right_hand_status_line);
- @output_stream -3; scw = HDR_PIXELSTO3-->0 + charw;
- x = 1+width-scw;
- @set_cursor 1 x; TEXT_TY_Say(right_hand_status_line);
- }
- ! Reselect roman, as Infocom's interpreters go funny if reverse is selected twice.
- VM_MainWindow();
- ClearParagraphing(8);
- EndActivity(CONSTRUCTING_STATUS_LINE_ACT);
- @pull say__pc; @pull say__p;
-];
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Quotation Boxes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Undo
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VM_Undo result_code;
- @restore_undo result_code;
- return result_code;
-];
-
-[ VM_Save_Undo result_code;
- @save_undo result_code;
- return result_code;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Quit The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ QUIT_THE_GAME_R;
- if (actor ~= player) rfalse;
- QUIT_THE_GAME_RM('A');
- if (YesOrNo()~=0) quit;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Restart The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RESTART_THE_GAME_R;
- if (actor ~= player) rfalse;
- RESTART_THE_GAME_RM('A');
- if (YesOrNo()~=0) {
- @restart;
- RESTART_THE_GAME_RM('B'); new_line;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Restore The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RESTORE_THE_GAME_R;
- if (actor ~= player) rfalse;
- restore Rmaybe;
- RESTORE_THE_GAME_RM('A'); new_line;
- rtrue;
- .RMaybe; RESTORE_THE_GAME_RM('B'); new_line;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Save The Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SAVE_THE_GAME_R flag;
- if (actor ~= player) rfalse;
- #IFV5;
- @save -> flag;
- switch (flag) {
- 0: SAVE_THE_GAME_RM('A'); new_line;
- 1: SAVE_THE_GAME_RM('B'); new_line;
- 2: RESTORE_THE_GAME_RM('B'); new_line;
- }
- #IFNOT;
- save Smaybe;
- SAVE_THE_GAME_RM('A'); new_line; rtrue;
- .SMaybe; SAVE_THE_GAME_RM('B'); new_line;
- #ENDIF;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Verify The Story File Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VERIFY_THE_STORY_FILE_R;
- if (actor ~= player) rfalse;
- @verify ?Vmaybe;
- jump Vwrong;
- .Vmaybe; VERIFY_THE_STORY_FILE_RM('A'); new_line; rtrue;
- .Vwrong;
- VERIFY_THE_STORY_FILE_RM('B'); new_line;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Switch Transcript On Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SWITCH_TRANSCRIPT_ON_R;
- if (actor ~= player) rfalse;
- transcript_mode = ((0-->8) & 1);
- if (transcript_mode) { SWITCH_TRANSCRIPT_ON_RM('A'); new_line; rtrue; }
- @output_stream 2;
- if (((0-->8) & 1) == 0) { SWITCH_TRANSCRIPT_ON_RM('C'); new_line; rtrue; }
- SWITCH_TRANSCRIPT_ON_RM('B'); new_line; VersionSub();
- transcript_mode = true;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Switch Transcript Off Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SWITCH_TRANSCRIPT_OFF_R;
- if (actor ~= player) rfalse;
- transcript_mode = ((0-->8) & 1);
- if (transcript_mode == false) { SWITCH_TRANSCRIPT_OFF_RM('A'); new_line; rtrue; }
- SWITCH_TRANSCRIPT_OFF_RM('B'); new_line;
- @output_stream -2;
- if ((0-->8) & 1) { SWITCH_TRANSCRIPT_ON_RM('C'); new_line; rtrue; }
- transcript_mode = false;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Announce Story File Version Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ANNOUNCE_STORY_FILE_VERSION_R ix;
- if (actor ~= player) rfalse;
- Banner();
- print "Identification number: ";
- for (ix=6: ix <= UUID_ARRAY->0: ix++) print (char) UUID_ARRAY->ix;
- print "^";
- ix = 0; ! shut up compiler warning
- if (standard_interpreter > 0) {
- print "Standard interpreter ",
- standard_interpreter/256, ".", standard_interpreter%256,
- " (", HDR_TERPNUMBER->0;
- #Iftrue (#version_number == 6);
- print (char) '.', HDR_TERPVERSION->0;
- #Ifnot;
- print (char) HDR_TERPVERSION->0;
- #Endif;
- print ") / ";
- } else {
- print "Interpreter ", HDR_TERPNUMBER->0, " Version ";
- #Iftrue (#version_number == 6);
- print HDR_TERPVERSION->0;
- #Ifnot;
- print (char) HDR_TERPVERSION->0;
- #Endif;
- print " / ";
- }
- print "Library serial number ", (string) LibSerial, "^";
- #Ifdef LanguageVersion;
- print (string) LanguageVersion, "^";
- #Endif; ! LanguageVersion
- #ifdef ShowExtensionVersions;
- ShowExtensionVersions();
- #endif;
- say__p = 1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Descend To Specific Action Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DESCEND_TO_SPECIFIC_ACTION_R;
- indirect(#actions_table-->action);
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ZMachine.i6t: Veneer
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ OC__Cl obj cla j a n objflag;
-
- @jl obj 1 ?NotObj;
- @jg obj max_z_object ?NotObj;
- @inc objflag;
- @je cla K1_room ?~NotRoom;
- @test_attr obj mark_as_room ?rtrue;
- @rfalse;
- .NotRoom;
- @je cla K2_thing ?~NotObj;
- @test_attr obj mark_as_thing ?rtrue;
- @rfalse;
- .NotObj;
-
- @je cla Object Class ?ObjOrClass;
- @je cla Routine String ?RoutOrStr;
-
- @jin cla 1 ?~Mistake;
-
- @jz objflag ?rfalse;
- @get_prop_addr obj 2 -> a;
- @jz a ?rfalse;
- @get_prop_len a -> n;
-
- @div n 2 -> n;
- .Loop;
- @loadw a j -> sp;
- @je sp cla ?rtrue;
- @inc j;
- @jl j n ?Loop;
- @rfalse;
-
- .ObjOrClass;
- @jz objflag ?rfalse;
- @je cla Object ?JustObj;
-
- ! So now cla is Class
- @jg obj String ?~rtrue;
- @jin obj Class ?rtrue;
- @rfalse;
-
- .JustObj;
- ! So now cla is Object
- @jg obj String ?~rfalse;
- @jin obj Class ?rfalse;
- @rtrue;
-
- .RoutOrStr;
- @jz objflag ?~rfalse;
- @call_2s Z__Region obj -> sp;
- @inc sp;
- @je sp cla ?rtrue;
- @rfalse;
-
- .Mistake;
- RT__Err("apply 'ofclass' for", cla, -1);
- rfalse;
-];
-
-[ Unsigned__Compare x y u v;
- @je x y ?rfalse; ! i.e., return 0
- @jl x 0 ?XNegative;
- ! So here x >= 0 and x ~= y
- @jl y 0 ?XPosYNeg;
-
- ! Here x >=0, y >= 0, x ~= y
-
- @jg x y ?rtrue; ! i.e., return 1
- @ret -1;
-
- .XPosYNeg;
- ! Here x >= 0, y < 0, x ~= y
- @ret -1;
-
- .XNegative;
- @jl y 0 ?~rtrue; ! if x < 0, y >= 0, return 1
-
- ! Here x < 0, y < 0, x ~= y
- @jg x y ?rtrue;
- @ret -1;
-];
-
-[ RT__ChLDW base offset;
- @loadw base offset -> sp;
- @ret sp;
-];
-
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Compass
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Object Compass "compass" has concealed;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Language of Play
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Vocabulary
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant AGAIN1__WD = 'again';
-Constant AGAIN2__WD = 'g//';
-Constant AGAIN3__WD = 'again';
-Constant OOPS1__WD = 'oops';
-Constant OOPS2__WD = 'o//';
-Constant OOPS3__WD = 'oops';
-Constant UNDO1__WD = 'undo';
-Constant UNDO2__WD = 'undo';
-Constant UNDO3__WD = 'undo';
-
-Constant ALL1__WD = 'all';
-Constant ALL2__WD = 'each';
-Constant ALL3__WD = 'every';
-Constant ALL4__WD = 'everything';
-Constant ALL5__WD = 'both';
-Constant AND1__WD = 'and';
-Constant AND2__WD = 'and';
-Constant AND3__WD = 'and';
-Constant BUT1__WD = 'but';
-Constant BUT2__WD = 'except';
-Constant BUT3__WD = 'but';
-Constant ME1__WD = 'me';
-Constant ME2__WD = 'myself';
-Constant ME3__WD = 'self';
-Constant OF1__WD = 'of';
-Constant OF2__WD = 'of';
-Constant OF3__WD = 'of';
-Constant OF4__WD = 'of';
-Constant OTHER1__WD = 'another';
-Constant OTHER2__WD = 'other';
-Constant OTHER3__WD = 'other';
-Constant THEN1__WD = 'then';
-Constant THEN2__WD = 'then';
-Constant THEN3__WD = 'then';
-
-Constant NO1__WD = 'n//';
-Constant NO2__WD = 'no';
-Constant NO3__WD = 'no';
-Constant YES1__WD = 'y//';
-Constant YES2__WD = 'yes';
-Constant YES3__WD = 'yes';
-
-Constant AMUSING__WD = 'amusing';
-Constant FULLSCORE1__WD = 'fullscore';
-Constant FULLSCORE2__WD = 'full';
-Constant QUIT1__WD = 'q//';
-Constant QUIT2__WD = 'quit';
-Constant RESTART__WD = 'restart';
-Constant RESTORE__WD = 'restore';
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Pronouns
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array LanguagePronouns table
-
- ! word possible GNAs connected
- ! to follow: to:
- ! a i
- ! s p s p
- ! mfnmfnmfnmfn
-
- 'it' $$001000111000 NULL
- 'him' $$100000000000 NULL
- 'her' $$010000000000 NULL
- 'them' $$000111000111 NULL;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Descriptors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array LanguageDescriptors table
-
- ! word possible GNAs descriptor connected
- ! to follow: type: to:
- ! a i
- ! s p s p
- ! mfnmfnmfnmfn
-
- 'my' $$111111111111 POSSESS_PK 0
- 'this' $$111111111111 POSSESS_PK 0
- 'these' $$000111000111 POSSESS_PK 0
- 'that' $$111111111111 POSSESS_PK 1
- 'those' $$000111000111 POSSESS_PK 1
- 'his' $$111111111111 POSSESS_PK 'him'
- 'her' $$111111111111 POSSESS_PK 'her'
- 'their' $$111111111111 POSSESS_PK 'them'
- 'its' $$111111111111 POSSESS_PK 'it'
- 'the' $$111111111111 DEFART_PK NULL
- 'a//' $$111000111000 INDEFART_PK NULL
- 'an' $$111000111000 INDEFART_PK NULL
- 'some' $$000111000111 INDEFART_PK NULL
- 'lit' $$111111111111 light NULL
- 'lighted' $$111111111111 light NULL
- 'unlit' $$111111111111 (-light) NULL;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Numbers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array LanguageNumbers table
- 'one' 1 'two' 2 'three' 3 'four' 4 'five' 5
- 'six' 6 'seven' 7 'eight' 8 'nine' 9 'ten' 10
- 'eleven' 11 'twelve' 12 'thirteen' 13 'fourteen' 14 'fifteen' 15
- 'sixteen' 16 'seventeen' 17 'eighteen' 18 'nineteen' 19 'twenty' 20
- 'twenty-one' 21 'twenty-two' 22 'twenty-three' 23 'twenty-four' 24
- 'twenty-five' 25 'twenty-six' 26 'twenty-seven' 27 'twenty-eight' 28
- 'twenty-nine' 29 'thirty' 30
-;
-
-[ LanguageNumber n f;
- if (n == 0) { print "zero"; rfalse; }
- if (n < 0) { print "minus "; n = -n; }
-#Iftrue (WORDSIZE == 4);
- if (n >= 1000000000) {
- if (f == 1) print ", ";
- print (LanguageNumber) n/1000000000, " billion"; n = n%1000000000; f = 1;
- }
- if (n >= 1000000) {
- if (f == 1) print ", ";
- print (LanguageNumber) n/1000000, " million"; n = n%1000000; f = 1;
- }
-#Endif;
- if (n >= 1000) {
- if (f == 1) print ", ";
- print (LanguageNumber) n/1000, " thousand"; n = n%1000; f = 1;
- }
- if (n >= 100) {
- if (f == 1) print ", ";
- print (LanguageNumber) n/100, " hundred"; n = n%100; f = 1;
- }
- if (n == 0) rfalse;
- #Ifdef DIALECT_US;
- if (f == 1) print " ";
- #Ifnot;
- if (f == 1) print " and ";
- #Endif;
- switch (n) {
- 1: print "one";
- 2: print "two";
- 3: print "three";
- 4: print "four";
- 5: print "five";
- 6: print "six";
- 7: print "seven";
- 8: print "eight";
- 9: print "nine";
- 10: print "ten";
- 11: print "eleven";
- 12: print "twelve";
- 13: print "thirteen";
- 14: print "fourteen";
- 15: print "fifteen";
- 16: print "sixteen";
- 17: print "seventeen";
- 18: print "eighteen";
- 19: print "nineteen";
- 20 to 99: switch (n/10) {
- 2: print "twenty";
- 3: print "thirty";
- 4: print "forty";
- 5: print "fifty";
- 6: print "sixty";
- 7: print "seventy";
- 8: print "eighty";
- 9: print "ninety";
- }
- if (n%10 ~= 0) print "-", (LanguageNumber) n%10;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Time
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LanguageTimeOfDay hours mins i;
- i = hours%12;
- if (i == 0) i = 12;
- if (i < 10) print " ";
- print i, ":", mins/10, mins%10;
- if ((hours/12) > 0) print " pm"; else print " am";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Directions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LanguageDirection d;
- print (name) d;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Translation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LanguageToInformese; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Articles
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant LanguageAnimateGender = male;
-Constant LanguageInanimateGender = neuter;
-
-Constant LanguageContractionForms = 2; ! English has two:
- ! 0 = starting with a consonant
- ! 1 = starting with a vowel
-
-[ LanguageContraction text;
- if (text->0 == 'a' or 'e' or 'i' or 'o' or 'u'
- or 'A' or 'E' or 'I' or 'O' or 'U') return 1;
- return 0;
-];
-
-Array LanguageArticles -->
-
- ! Contraction form 0: Contraction form 1:
- ! Cdef Def Indef Cdef Def Indef
-
- "The " "the " "a " "The " "the " "an " ! Articles 0
- "The " "the " "some " "The " "the " "some "; ! Articles 1
-
- ! a i
- ! s p s p
- ! m f n m f n m f n m f n
-
-Array LanguageGNAsToArticles --> 0 0 0 1 1 1 0 0 0 1 1 1;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Language.i6t: Commands
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LanguageVerb i;
- switch (i) {
- 'i//','inv','inventory':
- print "take inventory";
- 'l//': print "look";
- 'x//': print "examine";
- 'z//': print "wait";
- default: rfalse;
- }
- rtrue;
-];
-
-[ LanguageVerbLikesAdverb w;
- if (w == 'look' or 'go' or 'push' or 'walk')
- rtrue;
- rfalse;
-];
-
-[ LanguageVerbMayBeName w;
- if (w == 'long' or 'short' or 'normal' or 'brief' or 'full' or 'verbose')
- rtrue;
- rfalse;
-];
-
-
-Default LanguageCases 1;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: The Old Library
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Darkness
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Object thedark "(darkness object)";
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Light Measurement
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ OffersLight obj j;
- while (obj) {
- if (obj has light) rtrue;
- objectloop (j in obj) if (HasLightSource(j)) rtrue;
- if ((obj has container) && (obj hasnt open) && (obj hasnt transparent)) rfalse;
- if ((obj provides component_parent) && (obj.component_parent))
- obj = obj.component_parent;
- else
- obj = parent(obj);
- }
- rfalse;
-];
-
-[ HasLightSource i j ad sr po;
- if (i == 0) rfalse;
- if (i has light) rtrue;
- if ((IsSeeThrough(i)) && (~~(HidesLightSource(i))))
- objectloop (j in i)
- if (HasLightSource(j)) rtrue;
- ad = i.&add_to_scope;
- if (parent(i) ~= 0 && ad ~= 0) {
- if (metaclass(ad-->0) == Routine) {
- ats_hls = 0; ats_flag = 1;
- sr = scope_reason; po = parser_one;
- scope_reason = LOOPOVERSCOPE_REASON; parser_one = 0;
- RunRoutines(i, add_to_scope);
- scope_reason = sr; parser_one = po;
- ats_flag = 0; if (ats_hls == 1) rtrue;
- }
- else {
- for (j=0 : (WORDSIZE*j)j) && (HasLightSource(ad-->j) == 1)) rtrue;
- }
- }
- if (ComponentHasLight(i)) rtrue;
- rfalse;
-];
-
-[ ComponentHasLight o obj next_obj;
- if (o provides component_child) {
- obj = o.component_child;
- while (obj) {
- next_obj = obj.component_sibling;
- if (obj has light) rtrue;
- if (HasLightSource(obj)) rtrue;
- if ((obj provides component_child) && (ComponentHasLight(obj))) rtrue;
- obj = next_obj;
- }
- }
- rfalse;
-];
-
-[ HidesLightSource obj;
- if (obj == player) rfalse;
- if (obj has transparent or supporter) rfalse;
- if (obj has animate) rfalse;
- if (obj has container) return (obj hasnt open);
- return (obj hasnt enterable);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Invariant
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global lightflag = false;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Adjust Light Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ADJUST_LIGHT_R previous_light_condition;
- previous_light_condition = lightflag;
- lightflag = OffersLight(parent(player));
-
- if ((previous_light_condition == false) && (lightflag == false)) {
- location = thedark;
- rfalse;
- }
-
- if ((previous_light_condition == false) && (lightflag == true)) {
- location = real_location;
- CarryOutActivity(PRINTING_NEWS_OF_LIGHT_ACT);
- rfalse;
- }
-
- if ((previous_light_condition == true) && (lightflag == false)) {
- location = thedark;
- DivideParagraphPoint();
- BeginActivity(PRINTING_NEWS_OF_DARKNESS_ACT);
- if (ForActivity(PRINTING_NEWS_OF_DARKNESS_ACT) == false) {
- ADJUST_LIGHT_RM('A'); new_line;
- }
- EndActivity(PRINTING_NEWS_OF_DARKNESS_ACT);
- rfalse;
- }
-
- if ((previous_light_condition == true) && (lightflag == true)) {
- location = real_location;
- rfalse;
- }
-
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Silent Light Consideration
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SilentlyConsiderLight;
- lightflag = OffersLight(parent(player));
- if (lightflag) location = real_location; else location = thedark;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Translucency
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IsSeeThrough obj;
- if ((obj has supporter)
- || (obj has transparent)
- || (obj has animate)
- || ((obj has container) && (obj has open)))
- rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Visibility Parent
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VisibilityParent o;
- if (o && (o has container) && (o hasnt open) && (o hasnt transparent)) return nothing;
- if (o) o = CoreOfParentOfCoreOf(o);
- return o;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Find Visibility Levels
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FindVisibilityLevels lc up;
- if (location == thedark) {
- visibility_ceiling = thedark;
- visibility_levels = 0;
- } else {
- visibility_ceiling = player;
- while (true) {
- up = VisibilityParent(visibility_ceiling);
- if (up == 0) break;
- visibility_ceiling = up;
- lc++;
- }
- visibility_levels = lc;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Touchability Ceiling
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TouchabilityCeiling original o p;
- o = original;
- while (o) {
- p = CoreOfParentOfCoreOf(o);
- if (p ofclass K1_room) return p;
- if (p == nothing) return o;
- if ((FollowRulebook(REACHING_OUTSIDE_RB, p)) && (RulebookFailed()))
- return p;
- o = p;
- }
- return o;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Scope Ceiling
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ScopeCeiling pos c;
- if (pos == player && location == thedark) return thedark;
- c = parent(pos);
- if (c == 0) return pos;
- while (VisibilityParent(c)) c = VisibilityParent(c);
- return c;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Object Is Untouchable
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ObjectIsUntouchable item silent_flag p save_sp decision moving x;
- if (LocationOf(p) ~= real_location) {
- for (x = CoreOf(item): x: x = CoreOfParentOfCoreOf(x)) {
- if (x ofclass K4_door or K7_backdrop) {
- moving = true;
- MoveFloatingObjects(LocationOf(p));
- break;
- }
- }
- }
- untouchable_object = item; untouchable_silence = silent_flag;
- touch_persona = p; if (p == actor) touch_persona = 0;
- save_sp = say__p; say__p = 0;
- @push actor; actor = p;
- if (FollowRulebook(ACCESSIBILITY_RB, 0, true)) {
- if (RulebookSucceeded()) decision = false;
- else decision = true;
- } else decision = false;
- @pull actor;
- if (say__p == false) say__p = save_sp;
- if (moving) MoveFloatingObjects();
- untouchable_silence = 0;
- return decision;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Access Through Barriers Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ACCESS_THROUGH_BARRIERS_R ancestor i j external p;
- p = touch_persona; if (p == 0) p = actor;
-
- ancestor = CommonAncestor(p, untouchable_object);
- if ((ancestor == 0) && (LocationOf(untouchable_object) == nothing)
- && ((untouchable_object ofclass K4_door or K7_backdrop) == false)) {
- if (touch_persona == 0) {
- if ((actor == player) && (untouchable_silence == false)) {
- ACCESS_THROUGH_BARRIERS_RM('A', untouchable_object);
- new_line;
- }
- }
- RulebookFails();
- rtrue;
- }
-
- ! First, a barrier between the player and the ancestor.
-
- if (CoreOf(p) ~= ancestor) {
- i = parent(CoreOf(p)); j = CoreOf(i); external = false;
- if (j ~= i) { i = j; external = true; }
- while (i~=ancestor && i) {
- if ((external == false)
- && (FollowRulebook(REACHING_OUTSIDE_RB, i))
- && (RulebookFailed())) rtrue; ! Barrier
- i = parent(CoreOf(i)); external = false;
- if (~~(i ofclass K5_container)) {
- j = CoreOf(i);
- if (j ~= i) { i = j; external = true; }
- }
- }
- }
-
- ! Second, a barrier between the item and the ancestor.
-
- if (CoreOf(untouchable_object) ~= ancestor) {
- ! We can always get to the core of the item.
- i = CoreOf(untouchable_object);
- ! This will be on the inside of its parent, if its parent is a
- ! container, so there should be no exemption.
- i = parent(i); external = false;
- while (i~=ancestor && i) {
- if ((external == false) &&
- (FollowRulebook(REACHING_INSIDE_RB, i)) &&
- (RulebookFailed())) rtrue; ! Barrier
- i = CoreOf(i);
- if (i == ancestor) break;
- i = parent(i); external = false;
- if (~~(i ofclass K5_container)) {
- j = CoreOf(i);
- if (j ~= i) { i = j; external = true; }
- }
- }
- }
-
- RulebookSucceeds(); ! No barrier
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Can't Reach Inside Closed Containers Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CANT_REACH_INSIDE_CLOSED_R;
- if (parameter_value has container && parameter_value hasnt open) {
- if (touch_persona == 0) {
- if ((actor == player) && (untouchable_silence == false)) {
- CANT_REACH_INSIDE_CLOSED_RM('A', parameter_value);
- new_line;
- }
- }
- RulebookFails(); rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Can't Reach Outside Closed Containers Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CANT_REACH_OUTSIDE_CLOSED_R;
- if (parameter_value has container && parameter_value hasnt open) {
- if (touch_persona == 0) {
- if ((actor == player) && (untouchable_silence == false)) {
- CANT_REACH_OUTSIDE_CLOSED_RM('A', parameter_value);
- new_line;
- }
- }
- RulebookFails(); rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Light.i6t: Can't Reach Inside Rooms Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CANT_REACH_INSIDE_ROOMS_R;
- if (parameter_value && parameter_value ofclass K1_room) {
- if (touch_persona == 0) {
- if ((actor == player) && (untouchable_silence == false)) {
- CANT_REACH_INSIDE_ROOMS_RM('A', parameter_value);
- new_line;
- }
- }
- RulebookFails(); rtrue;
- }
- rfalse;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Specification
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Memory
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant REQUISITION_STACK_SIZE = 3*28;
-Array requisition_stack --> REQUISITION_STACK_SIZE;
-Global requisition_stack_pointer = 0;
-
-[ RequisitionStack len top addr;
- top = requisition_stack_pointer + len;
- if (top > REQUISITION_STACK_SIZE) return false;
- addr = requisition_stack + requisition_stack_pointer*WORDSIZE;
- ! print "Allocating ", addr, " at pointer ", requisition_stack_pointer, "^";
- requisition_stack_pointer = top;
- return addr;
-];
-
-[ FreeStack addr;
- if (addr == 0) return;
- requisition_stack_pointer = (addr - requisition_stack)/WORDSIZE;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: WriteListOfMarkedObjects
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global MarkedObjectArray = 0;
-Global MarkedObjectLength = 0;
-
-[ WriteListOfMarkedObjects style
- obj common_parent first mixed_parentage length g gc;
-
- gc = -2;
- objectloop (obj ofclass Object && obj has workflag2) {
- length++;
- if (first == nothing) { first = obj; common_parent = parent(obj); }
- else { if (parent(obj) ~= common_parent) mixed_parentage = true; }
- g = GetGNAOfObject(obj); g = g%3;
- if (gc == -2) gc = g;
- else if (gc ~= g) gc = -1;
- }
- if (mixed_parentage) common_parent = nothing;
-
- if (length == 0) {
- if (style & ISARE_BIT ~= 0) LIST_WRITER_INTERNAL_RM('W');
- else if (style & CFIRSTART_BIT ~= 0) LIST_WRITER_INTERNAL_RM('X');
- else LIST_WRITER_INTERNAL_RM('Y');
- } else {
- @push MarkedObjectArray; @push MarkedObjectLength;
- MarkedObjectArray = RequisitionStack(length);
- MarkedObjectLength = length;
- if (MarkedObjectArray == 0) return RunTimeProblem(RTP_LISTWRITERMEMORY);
-
- if (common_parent) {
- ObjectTreeCoalesce(child(common_parent));
- length = 0;
- objectloop (obj in common_parent) ! object tree order
- if (obj has workflag2) MarkedObjectArray-->length++ = obj;
- } else {
- length = 0;
- objectloop (obj ofclass Object) ! object number order
- if (obj has workflag2) MarkedObjectArray-->length++ = obj;
- }
-
- WriteListFrom(first, style, 0, false, MarkedListIterator);
-
- FreeStack(MarkedObjectArray);
- @pull MarkedObjectLength; @pull MarkedObjectArray;
- }
- prior_named_list = length;
- prior_named_list_gender = gc;
- return;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: List Number and Gender
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RegardingMarkedObjects
- obj length g gc;
- gc = -2;
- objectloop (obj ofclass Object && obj has workflag2) {
- length++;
- g = GetGNAOfObject(obj); g = g%3;
- if (gc == -2) {
- gc = g;
- prior_named_noun = obj;
- } else if (gc ~= g) gc = -1;
- }
- prior_named_list = length;
- prior_named_list_gender = gc;
- if (length == 0) { prior_named_noun = nothing; prior_named_list_gender = -1; }
- return;
-];
-
-[ RegardingSingleObject obj;
- prior_named_list = 1;
- prior_named_list_gender = -1;
- prior_named_noun = obj;
-];
-
-[ RegardingNumber n;
- prior_named_list = n;
- prior_named_list_gender = -1;
- prior_named_noun = nothing;
-];
-
-[ PNToVP gna;
- if (prior_named_noun == player) return story_viewpoint;
- if (prior_named_noun) gna = GetGNAOfObject(prior_named_noun);
- if (((gna%6)/3 == 1) || (prior_named_list >= 2)) return 6;
- return 3;
-];
-
-[ PrintVerbAsValue vb;
- if (vb == 0) print "(no verb)";
- else { print "verb "; vb(1); }
-];
-
-[ VerbIsMeaningful vb;
- if ((vb) && (BlkValueCompare(vb(CV_MEANING), Rel_Record_0) ~= 0)) rtrue;
- rfalse;
-];
-
-[ VerbIsModal vb;
- if ((vb) && (vb(CV_MODAL))) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: List Writer Regard Storage
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array LWI_Storage --> 1 (-1) nothing;
-[ SetLWI a b c;
- LWI_Storage-->0 = a;
- LWI_Storage-->1 = b;
- LWI_Storage-->2 = c;
-];
-[ RegardingLWI;
- prior_named_list = LWI_Storage-->0;
- prior_named_list_gender = LWI_Storage-->1;
- prior_named_noun = LWI_Storage-->2;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Response Printing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ResponseViaActivity R;
- @push prior_named_noun; @push prior_named_list; @push prior_named_list_gender;
- RegardingSingleObject(nothing);
- CarryOutActivity(PRINTING_RESPONSE_ACT, R);
- @pull prior_named_list_gender; @pull prior_named_list; @pull prior_named_noun;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: About Iterator Functions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant SEEK_ITF = 0;
-Constant ADVANCE_ITF = 1;
-Constant COALESCE_ITF = 2;
-Constant START_ITF = 3;
-
-! Constant DBLW; ! Uncomment this to provide debugging information at run-time
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Marked List Iterator
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MarkedListIterator obj depth required_lt function i;
- if (obj == nothing) return nothing;
- if (required_lt == 0) required_lt = EMPTY_TEXT_VALUE;
- switch(function) {
- START_ITF: return MarkedObjectArray-->0;
- COALESCE_ITF: return MarkedListCoalesce();
- SEEK_ITF, ADVANCE_ITF:
- for (i=0: ii == obj) {
- if (function == ADVANCE_ITF) i++;
- for (:ii;
- if ((LT_Compare(required_lt, EMPTY_TEXT_VALUE) ~= 0) &&
- (LT_Compare(obj.list_together, required_lt) ~= 0)) continue;
- if ((c_style & WORKFLAG_BIT) && (depth==0) && (obj hasnt workflag))
- continue;
- if ((c_style & CONCEAL_BIT) && (ConcealedFromLists(obj))) continue;
- return obj;
- }
- return nothing;
- }
- }
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Concealment
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ConcealedFromLists obj c;
- if ((obj has concealed) || (obj has scenery)) rtrue;
- c = parent(obj);
- if ((c) && (c ofclass K5_container or K6_supporter) && (TestConcealment(c, obj))) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Coalesce Marked List
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MarkedListCoalesce o i lt l swap m;
- for (i=0: ii).list_together;
- if (LT_Compare(lt, EMPTY_TEXT_VALUE) ~= 0) {
- ! Find first object in list after contiguous run with this list_together value:
- for (i++: (ii).list_together, lt) == 0): i++) ;
- ! If the contiguous run extends to end of list, the list is now perfect:
- if (i == MarkedObjectLength) return MarkedObjectArray-->0;
- ! And otherwise we look to see if any future entries belong in the earlier run:
- for (l=i+1: ll).list_together, lt) == 0) {
- ! Yes, they do: so we perform a rotation to insert it before element i:
- swap = MarkedObjectArray-->l;
- for (m=l: m>i: m--) MarkedObjectArray-->m = MarkedObjectArray-->(m-1);
- MarkedObjectArray-->i = swap;
- ! And now the run is longer:
- i++;
- if (i == MarkedObjectLength) return MarkedObjectArray-->0;
- }
- i--;
- }
- }
- return MarkedObjectArray-->0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Object Tree Iterator
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global list_filter_routine;
-
-[ ObjectTreeIterator obj depth required_lt function;
- if ((obj == nothing) || (parent(obj) == nothing)) return nothing;
- if (function == START_ITF) obj = child(parent(obj));
- if (function == COALESCE_ITF) return ObjectTreeCoalesce(obj);
- if (function == ADVANCE_ITF) obj = sibling(obj);
- if (required_lt == 0) required_lt = EMPTY_TEXT_VALUE;
- for (:: obj = sibling(obj)) {
- if (obj == nothing) return nothing;
-!if (function == ADVANCE_ITF) print "Considering ", (the) obj, ": ", (TEXT_TY_Say) obj.list_together, ": ", (TEXT_TY_Say) required_lt, ": ", ": ", (TEXT_TY_Say) lt_value, ": ", LT_Compare(obj.list_together, required_lt), "^";
- if ((LT_Compare(required_lt, EMPTY_TEXT_VALUE) ~= 0) &&
- (LT_Compare(obj.list_together, required_lt) ~= 0)) continue;
- if ((c_style & WORKFLAG_BIT) && (depth==0) && (obj hasnt workflag)) continue;
- if (obj hasnt list_filter_permits) continue;
- if ((c_style & CONCEAL_BIT) && (ConcealedFromLists(obj))) continue;
- return obj;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Coalesce Object Tree
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ObjectTreeCoalesce obj memb lt later;
- #Ifdef DBLW; print "^^Sorting out: "; DiagnoseSortList(obj); #Endif;
- .StartAgain;
- for (memb=obj: memb~=nothing: memb=sibling(memb)) {
- lt = memb.list_together;
- if (LT_Compare(lt, EMPTY_TEXT_VALUE) ~= 0) {
- ! Find first object in list after contiguous run with this list_together value:
- for (memb=sibling(memb):
- (memb) && (LT_Compare(memb.list_together, lt) == 0): memb = sibling(memb)) ;
- ! If the contiguous run extends to end of list, the list is now perfect:
- if (memb == 0) return obj;
- ! And otherwise we look to see if any future entries belong in the earlier run:
- for (later=sibling(memb): later: later=sibling(later))
- if (LT_Compare(later.list_together, lt) == 0) {
- ! Yes, they do: so we perform a regrouping of the list and start again:
- obj = GroupChildren(parent(obj), lt);
- #Ifdef DBLW; print "^^Sorted to: "; DiagnoseSortList(obj); #Endif;
- jump StartAgain;
- }
- }
- }
- return obj;
-];
-#Ifdef DBLW;
-[ DiagnoseSortList obj memb;
- for (memb=child(obj): memb~=nothing: memb=sibling(memb)) print memb, " --> "; new_line;
-];
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: WriteListFrom
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WriteListFrom first style depth noactivity iter a ol;
- @push c_iterator; @push c_style; @push c_depth; @push c_margin;
- if (iter) c_iterator = iter; else c_iterator = ObjectTreeIterator;
- c_style = style; c_depth = depth;
- c_margin = 0; if (style & EXTRAINDENT_BIT) c_margin = 1;
-
- objectloop (a ofclass Object) {
- give a list_filter_permits;
- if ((list_filter_routine) && (list_filter_routine(a) == false))
- give a ~list_filter_permits;
- }
-
- first = c_iterator(first, depth, 0, START_ITF);
- if (first == nothing) {
- if (style & ISARE_BIT ~= 0) LIST_WRITER_INTERNAL_RM('W');
- else LIST_WRITER_INTERNAL_RM('Y');
- if (style & NEWLINE_BIT ~= 0) new_line;
- } else {
- if ((noactivity) || (iter)) {
- WriteListR(first, c_depth, true);
- say__p = 1;
- } else {
- objectloop (ol provides list_together)
- BlkValueCopy(ol.list_together, EMPTY_TEXT_VALUE);
- CarryOutActivity(LISTING_CONTENTS_ACT, parent(first));
- }
- }
-
- @pull c_margin; @pull c_depth; @pull c_style; @pull c_iterator;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Standard Contents Listing Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STANDARD_CONTENTS_LISTING_R;
- WriteListFrom(child(parameter_value), c_style, c_depth, true);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Partitioning
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef DBLW;
-Global DBLW_no_classes; Global DBLW_no_objs;
-[ DebugPartition partition_class_sizes partition_classes first depth i k o;
- print "[Length of list is ", DBLW_no_objs, " with ", k, " plural.]^";
- print "[Partitioned into ", DBLW_no_classes, " equivalence classes.]^";
- for (i=1: i<=DBLW_no_classes : i++) {
- print "Class ", i, " has size ", partition_class_sizes->i, "^";
- }
- for (k=0, o=first: kk,
- " represented by ", o, " with L=", o.list_together, "^";
- }
-];
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Partition List
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PartitionList first no_objs depth partition_classes partition_class_sizes
- i k l n m;
- for (i=0: ii = 0;
- n = 1;
- for (i=first, k=0: kk == 0) {
- partition_classes->k = n; partition_class_sizes->n = 1;
- for (l=c_iterator(i, depth, lt_value, ADVANCE_ITF), m=k+1:
- (l~=0) && (mm == 0) && (ListEqual(i, l))) {
- if (partition_class_sizes->n < 255) (partition_class_sizes->n)++;
- partition_classes->m = n;
- }
- }
- if (n < 255) n++;
- }
- n--;
- #Ifdef DBLW;
- DBLW_no_classes = n; DBLW_no_objs = no_objs;
- DebugPartition(partition_class_sizes, partition_classes, first, depth);
- #Endif;
- return n;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Equivalence Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ListEqual o1 o2;
- if ((o1.plural == 0) || (o2.plural == 0)) rfalse;
- if (child(o1) ~= 0 && WillRecurs(o1) ~= 0) rfalse;
- if (child(o2) ~= 0 && WillRecurs(o2) ~= 0) rfalse;
- if (c_style & (FULLINV_BIT + PARTINV_BIT) ~= 0) {
- if ((o1 hasnt worn && o2 has worn) || (o2 hasnt worn && o1 has worn)) rfalse;
- if ((o1 hasnt light && o2 has light) || (o2 hasnt light && o1 has light)) rfalse;
- if (o1 has container) {
- if (o2 hasnt container) rfalse;
- if ((o1 has open && o2 hasnt open) || (o2 has open && o1 hasnt open))
- rfalse;
- }
- else if (o2 has container)
- rfalse;
- }
- return Identical(o1, o2);
-];
-
-[ WillRecurs o;
- if (c_style & ALWAYS_BIT ~= 0) rtrue;
- if (c_style & RECURSE_BIT == 0) rfalse;
- if ((o has supporter) || ((o has container) && (o has open or transparent))) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Grouping
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NumberOfGroupsInList o no_classes depth partition_classes partition_class_sizes
- no_groups cl memb k current_lt lt;
- current_lt = EMPTY_TEXT_VALUE;
- lt = EMPTY_TEXT_VALUE;
- no_groups = no_classes;
- for (cl=1, memb=o, k=0: cl<=no_classes: cl++) {
- ! Advance to first member of class number cl
- while (partition_classes->k ~= cl) {
- k++; memb = c_iterator(memb, depth, lt_value, ADVANCE_ITF);
- }
- if (memb) { ! In case of accidents, but should always happen
- lt = memb.list_together;
- if ((LT_Compare(lt, lt_value) ~= 0) &&
- (LT_Compare(lt, EMPTY_TEXT_VALUE) ~= 0) &&
- (LT_Compare(lt, current_lt) == 0)) {
- no_groups--;
- }
- current_lt = lt;
- }
- }
- #Ifdef DBLW; print "[There are ", no_groups, " groups.]^"; #Endif;
- return no_groups;
-];
-
-[ LT_Compare lt1 lt2;
- if (lt1 == lt2) return 0;
- if (lt1 == 0) lt1 = EMPTY_TEXT_VALUE;
- if (lt2 == 0) lt2 = EMPTY_TEXT_VALUE;
- if (TEXT_TY_IsSubstituted(lt1) == false) {
- if (TEXT_TY_IsSubstituted(lt2) == false) return (lt1-->1)-(lt2-->1);
- return -1;
- }
- if (TEXT_TY_IsSubstituted(lt2) == false) {
- return -1;
- }
- return BlkValueCompare(lt1, lt2);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Write List Recursively
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WriteListR o depth from_start
- partition_classes partition_class_sizes
- cl memb index k2 l m no_classes q groups_to_do current_lt;
- if (o == nothing) return; ! An empty list: no output
-
- if (from_start) {
- o = c_iterator(o, depth, 0, COALESCE_ITF); ! Coalesce list and choose new start
- }
- o = c_iterator(o, depth, 0, SEEK_ITF); ! Find first entry in list from o
- if (o == nothing) return;
-
- ! Count index = length of list
- for (memb=o, index=0: memb: memb=c_iterator(memb, depth, lt_value, ADVANCE_ITF)) index++;
-
- if (c_style & ISARE_BIT ~= 0) {
- SetLWI(index, -1, o);
- LIST_WRITER_INTERNAL_RM('V', o);
- if (c_style & NEWLINE_BIT ~= 0) print ":^";
- else print (char) ' ';
- c_style = c_style - ISARE_BIT;
- }
-
- partition_classes = RequisitionStack(index/WORDSIZE + 2);
- partition_class_sizes = RequisitionStack(index/WORDSIZE + 2);
- if ((partition_classes == 0) || (partition_class_sizes == 0))
- return RunTimeProblem(RTP_LISTWRITERMEMORY);
-
- no_classes =
- PartitionList(o, index, depth, partition_classes, partition_class_sizes);
-
- groups_to_do =
- NumberOfGroupsInList(o, no_classes, depth, partition_classes, partition_class_sizes);
-
- for (cl=1, memb=o, index=0, current_lt=EMPTY_TEXT_VALUE: groups_to_do>0: cl++) {
- ! Set memb to first object of partition class cl
- while (partition_classes->index ~= cl) {
- index++; memb=c_iterator(memb, depth, lt_value, ADVANCE_ITF);
- if (memb==0) { print "*** Error in list-writer ***^"; return; }
- }
-
- #Ifdef DBLW;
- ! DebugPartition(partition_class_sizes, partition_classes, o, depth);
- print "^[Class ", cl, " of ", no_classes, ": first object ", memb,
- " (", memb.list_together, "); groups_to_do ", groups_to_do, ",
- current_lt=", current_lt, " listing_size=", listing_size,
- " lt_value=", lt_value, " memb.list_together=", memb.list_together, "]^";
- #Endif;
-
- if ((LT_Compare(memb.list_together, lt_value) == 0) ||
- (LT_Compare(memb.list_together, EMPTY_TEXT_VALUE) == 0)) current_lt = EMPTY_TEXT_VALUE;
- else {
- if (LT_Compare(memb.list_together, current_lt) == 0) continue;
-
- ! Otherwise this class begins a new group
- @push listing_size;
- q = memb; listing_size = 1; l = index; m = cl;
- while (m < no_classes &&
- (LT_Compare(q.list_together, memb.list_together) == 0)) {
- m++;
- while (partition_classes->l ~= m) {
- l++; q = c_iterator(q, depth, lt_value, ADVANCE_ITF);
- }
- if (LT_Compare(q.list_together, memb.list_together) == 0)
- listing_size++;
- }
-
- if (listing_size > 1) {
- ! The new group contains more than one partition class
- WriteMultiClassGroup(cl, memb, depth, partition_class_sizes);
- current_lt = memb.list_together;
- jump GroupComplete;
- }
- current_lt = EMPTY_TEXT_VALUE;
- @pull listing_size;
- }
-
- WriteSingleClassGroup(cl, memb, depth, partition_class_sizes->cl);
-
- .GroupComplete;
- groups_to_do--;
- if (c_style & ENGLISH_BIT ~= 0) {
- if (groups_to_do == 1) {
- #ifdef SERIAL_COMMA; if (cl > 1) print ","; #endif;
- LIST_WRITER_INTERNAL_RM('C');
- }
- if (groups_to_do > 1) print ", ";
- }
- }
-
- FreeStack(partition_class_sizes);
- FreeStack(partition_classes);
-]; ! end of WriteListR
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Write Multiple Class Group
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WriteMultiClassGroup cl memb depth partition_class_sizes pv q k2 l;
- ! Save the style, because the activity below is allowed to change it
- q = c_style;
- if (c_style & INDENT_BIT ~= 0) PrintSpaces(2*(depth+c_margin));
-
- BeginActivity(GROUPING_TOGETHER_ACT, memb);
-
- if (ForActivity(GROUPING_TOGETHER_ACT, memb)) {
- c_style = c_style &~ NEWLINE_BIT;
- } else {
- pv = memb.list_together;
- if (TEXT_TY_IsSubstituted(pv) == false) {
- inventory_stage = 1;
- parser_one = memb; parser_two = depth + c_margin;
- if ((pv-->1)() == 1) jump Omit__Sublist2;
- } else if (pv) {
- ! Set k2 to the number of objects covered by the group
- k2 = 0;
- for (l=0 : l(l+cl);
- EnglishNumber(k2); print " ";
- print (TEXT_TY_Say) pv;
- if (c_style & ENGLISH_BIT ~= 0) print " (";
- if (c_style & INDENT_BIT ~= 0) print ":^";
- }
-
- c_margin++;
- @push lt_value; @push listing_together; @push listing_size;
-
- lt_value = memb.list_together; listing_together = memb;
- #Ifdef DBLW; print "^^DOWN lt_value = ", lt_value, " listing_together = ", memb, "^^";
- @push DBLW_no_classes; @push DBLW_no_objs; #Endif;
- WriteListR(memb, depth, false);
- #Ifdef DBLW; print "^^UP^^"; @pull DBLW_no_objs; @pull DBLW_no_classes; #Endif;
-
- @pull listing_size; @pull listing_together; @pull lt_value;
- c_margin--;
-
- pv = memb.list_together;
- if (TEXT_TY_IsSubstituted(pv) == false) {
- inventory_stage = 2;
- parser_one = memb; parser_two = depth+c_margin;
- (pv-->1)();
- } else if (LT_Compare(pv, EMPTY_TEXT_VALUE) ~= 0) {
- if (q & ENGLISH_BIT ~= 0) print ")";
- }
- .Omit__Sublist2;
- }
-
- EndActivity(GROUPING_TOGETHER_ACT, memb);
-
- ! If the NEWLINE_BIT has been forced by the activity, act now
- ! before it vanishes...
- if (q & NEWLINE_BIT ~= 0 && c_style & NEWLINE_BIT == 0) new_line;
-
- ! ...when the original style is restored again:
- c_style = q;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Write Single Class Group
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WriteSingleClassGroup cl memb depth size q;
- q = c_style;
- if (c_style & INDENT_BIT) PrintSpaces(2*(depth+c_margin));
- if (size == 1) {
- if (c_style & NOARTICLE_BIT ~= 0) print (name) memb;
- else {
- if (c_style & DEFART_BIT) {
- if ((cl == 1) && (c_style & CFIRSTART_BIT)) print (The) memb;
- else print (the) memb;
- } else {
- if ((cl == 1) && (c_style & CFIRSTART_BIT)) print (CIndefArt) memb;
- else print (a) memb;
- }
- }
- } else {
- if (c_style & DEFART_BIT) {
- if ((cl == 1) && (c_style & CFIRSTART_BIT)) PrefaceByArticle(memb, 0, size);
- else PrefaceByArticle(memb, 1, size);
- }
- @push listing_size; listing_size = size;
- CarryOutActivity(PRINTING_A_NUMBER_OF_ACT, memb);
- @pull listing_size;
- }
- if ((size > 1) && (memb hasnt pluralname)) {
- give memb pluralname;
- WriteAfterEntry(memb, depth);
- give memb ~pluralname;
- } else WriteAfterEntry(memb, depth);
- c_style = q;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Write After Entry
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WriteAfterEntry o depth
- p recurse_flag parenth_flag eldest_child child_count combo;
-
- inventory_stage = 2;
- if (c_style & PARTINV_BIT) {
- BeginActivity(PRINTING_ROOM_DESC_DETAILS_ACT, o);
- if (ForActivity(PRINTING_ROOM_DESC_DETAILS_ACT, o) == false) {
- combo = 0;
- if (o has light && location hasnt light) combo=combo+1;
- if (o has container && o hasnt open) combo=combo+2;
- if ((o has container && (o has open || o has transparent))
- && (child(o)==0)) combo=combo+4;
- if (combo) LIST_WRITER_INTERNAL_RM('A'); ! space and open bracket
- switch (combo) {
- 1: LIST_WRITER_INTERNAL_RM('D', o);
- 2: LIST_WRITER_INTERNAL_RM('E', o);
- 3: LIST_WRITER_INTERNAL_RM('H', o);
- 4: LIST_WRITER_INTERNAL_RM('F', o);
- 5: LIST_WRITER_INTERNAL_RM('I', o);
- 6: LIST_WRITER_INTERNAL_RM('G', o);
- 7: LIST_WRITER_INTERNAL_RM('J', o);
- }
- if (combo) LIST_WRITER_INTERNAL_RM('B'); ! close bracket
- }
- EndActivity(PRINTING_ROOM_DESC_DETAILS_ACT, o);
- } ! end of PARTINV_BIT processing
-
- if (c_style & FULLINV_BIT) {
- BeginActivity(PRINTING_INVENTORY_DETAILS_ACT, o);
- if (ForActivity(PRINTING_INVENTORY_DETAILS_ACT, o) == false) {
- if (o has light && o has worn) { LIST_WRITER_INTERNAL_RM('A'); LIST_WRITER_INTERNAL_RM('K', o); parenth_flag = true; }
- else {
- if (o has light) { LIST_WRITER_INTERNAL_RM('A'); LIST_WRITER_INTERNAL_RM('D', o); parenth_flag = true; }
- if (o has worn) { LIST_WRITER_INTERNAL_RM('A'); LIST_WRITER_INTERNAL_RM('L', o); parenth_flag = true; }
- }
-
- if (o has container)
- if (o has openable) {
- if (parenth_flag) {
- #Ifdef SERIAL_COMMA; print ","; #Endif;
- LIST_WRITER_INTERNAL_RM('C');
- } else LIST_WRITER_INTERNAL_RM('A', o);
- if (o has open)
- if (child(o)) LIST_WRITER_INTERNAL_RM('M', o);
- else LIST_WRITER_INTERNAL_RM('N', o);
- else
- if (o has lockable && o has locked) LIST_WRITER_INTERNAL_RM('P', o);
- else LIST_WRITER_INTERNAL_RM('O', o);
- parenth_flag = true;
- }
- else
- if (child(o)==0 && o has transparent)
- if (parenth_flag) { LIST_WRITER_INTERNAL_RM('C'); LIST_WRITER_INTERNAL_RM('F'); }
- else { LIST_WRITER_INTERNAL_RM('A'); LIST_WRITER_INTERNAL_RM('F'); LIST_WRITER_INTERNAL_RM('B'); }
-
- if (parenth_flag) LIST_WRITER_INTERNAL_RM('B');
- }
- EndActivity(PRINTING_INVENTORY_DETAILS_ACT, o);
- } ! end of FULLINV_BIT processing
-
- child_count = 0;
- eldest_child = nothing;
- objectloop (p in o)
- if ((c_style & CONCEAL_BIT == 0) || (ConcealedFromLists(p) == false))
- if (p has list_filter_permits) {
- child_count++;
- if (eldest_child == nothing) eldest_child = p;
- }
-
- if (child_count && (c_style & ALWAYS_BIT)) {
- if (c_style & ENGLISH_BIT) { print " "; LIST_WRITER_INTERNAL_RM('Q', o); print " "; }
- recurse_flag = true;
- }
-
- if (child_count && (c_style & RECURSE_BIT)) {
- if (o has supporter) {
- if (c_style & ENGLISH_BIT) {
- if (c_style & TERSE_BIT) {
- LIST_WRITER_INTERNAL_RM('A', o);
- LIST_WRITER_INTERNAL_RM('R', o);
- } else LIST_WRITER_INTERNAL_RM('S', o);
- }
- recurse_flag = true;
- }
- if (o has container && (o has open || o has transparent)) {
- if (c_style & ENGLISH_BIT) {
- if (c_style & TERSE_BIT) {
- LIST_WRITER_INTERNAL_RM('A', o);
- LIST_WRITER_INTERNAL_RM('T', o);
- } else LIST_WRITER_INTERNAL_RM('U', o);
- }
- recurse_flag = true;
- }
- }
-
- if (recurse_flag && (c_style & ENGLISH_BIT)) {
- SetLWI(child_count, -1, eldest_child);
- LIST_WRITER_INTERNAL_RM('V', o); print " ";
- }
-
- if (c_style & NEWLINE_BIT) new_line;
-
- if (recurse_flag) {
- o = child(o);
- @push lt_value; @push listing_together; @push listing_size;
- @push c_iterator;
- c_iterator = ObjectTreeIterator;
- lt_value = EMPTY_TEXT_VALUE; listing_together = 0; listing_size = 0;
- WriteListR(o, depth+1, true);
- @pull c_iterator;
- @pull listing_size; @pull listing_together; @pull lt_value;
- if (c_style & TERSE_BIT) LIST_WRITER_INTERNAL_RM('B');
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! ListWriter.i6t: Internal Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_WRITER_INTERNAL_R;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: Saying Phrases
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SayPhraseName closure;
- if (closure == 0) print "nothing";
- else print (string) closure-->2;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: Kinds
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ KindAtomic kind;
- if ((kind >= 0) && (kind < BASE_KIND_HWM)) return kind;
- return kind-->0;
-];
-
-[ KindBaseArity kind;
- if ((kind >= 0) && (kind < BASE_KIND_HWM)) return 0;
- return kind-->1;
-];
-
-[ KindBaseTerm kind n;
- if ((kind >= 0) && (kind < BASE_KIND_HWM)) return UNKNOWN_TY;
- return kind-->(2+n);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: DigitToValue
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DigitToValue c n;
- n = c-'0';
- if ((n<0) || (n>9)) return -1;
- return n;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: GenerateRandomNumber
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GenerateRandomNumber n m s;
- if (n==m) return n;
- if (n>m) { s = n; n = m; m = s; }
- n--;
- return random(m-n) + n;
-];
-Constant R_DecimalNumber = GenerateRandomNumber;
-Constant R_PrintTimeOfDay = GenerateRandomNumber;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: GroupChildren
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GroupChildren par value;
- while (child(par) ~= 0) {
- if (LT_Compare(child(par).list_together, value) ~= 0)
- move child(par) to out_obj;
- else
- move child(par) to in_obj;
- }
- while (child(in_obj) ~= 0) move child(in_obj) to par;
- while (child(out_obj) ~= 0) move child(out_obj) to par;
- return child(par);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: PrintSpaces
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintSpaces n;
- while (n > 0) {
- print " ";
- n = n - 1;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: RunRoutines
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RunRoutines obj prop;
- if (obj == thedark) obj = real_location;
- if ((obj.&prop == 0) && (prop >= INDIV_PROP_START)) rfalse;
- return obj.prop();
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: SwapWorkflags
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SwapWorkflags obj lst;
- objectloop (obj ofclass Object) {
- lst = false;
- if (obj has workflag2) lst = true;
- give obj ~workflag2;
- if (obj has workflag) give obj workflag2;
- give obj ~workflag;
- if (lst) give obj workflag;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: TestUseOption
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant NO_USE_OPTIONS = 28;
-[ TestUseOption
- UO ! Implied call parameter
- ;
- if (UO == 1) rtrue;
- if (UO == 2) rtrue;
- if (UO == 3) rtrue;
- if (UO == 4) rtrue;
- if (UO == 26) rtrue;
- rfalse;
-];
-[ PrintUseOption
- UO ! Implied call parameter
- ;
- switch(UO) {
- 0: print "ineffectual option";
- 1: print "dynamic memory allocation option [8192]";
- 2: print "maximum text length option [1024]";
- 3: print "index figure thumbnails option [50]";
- 4: print "maximum things understood at once option [100]";
- 5: print "American dialect option";
- 6: print "serial comma option";
- 7: print "full-length room descriptions option";
- 8: print "abbreviated room descriptions option";
- 9: print "memory economy option";
- 10: print "authorial modesty option";
- 11: print "scoring option";
- 12: print "no scoring option";
- 13: print "engineering notation option";
- 14: print "unabbreviated object names option";
- 15: print "command line echoing option";
- 16: print "manual pronouns option";
- 17: print "undo prevention option";
- 18: print "predictable randomisation option";
- 19: print "fast route-finding option";
- 20: print "slow route-finding option";
- 21: print "numbered rules option";
- 22: print "telemetry recordings option";
- 23: print "no deprecated features option";
- 24: print "gn testing version option";
- 25: print "VERBOSE room descriptions option";
- 26: print "BRIEF room descriptions option";
- 27: print "SUPERBRIEF room descriptions option";
- }
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: IntegerDivide
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IntegerDivide A B;
- if (B == 0) { RunTimeProblem(RTP_DIVZERO); rfalse; }
- return A/B;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: IntegerRemainder
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IntegerRemainder A B;
- if (B == 0) { RunTimeProblem(RTP_DIVZERO); rfalse; }
- return A%B;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: UnsignedCompare
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ UnsignedCompare x y u v;
- #Ifdef TARGET_GLULX;
- @jleu x y ?lesseq;
- return 1;
- .lesseq;
- @jeq x y ?equal;
- return -1;
- .equal;
- return 0;
- #Ifnot;
- if (x == y) return 0;
- if (x < 0 && y >= 0) return 1;
- if (x >= 0 && y < 0) return -1;
- u = x&~WORD_HIGHBIT; v= y&~WORD_HIGHBIT;
- if (u > v) return 1;
- return -1;
- #Endif;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: SignedCompare
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SignedCompare x y;
- if (x > y) return 1;
- if (x == y) return 0;
- return -1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: ZRegion
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ZRegion addr;
- switch (metaclass(addr)) {
- nothing: return 0;
- Object, Class: return 1;
- Routine: return 2;
- String: return 3;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: Memcpy
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Memcpy to_addr from_addr size n;
-#Ifdef TARGET_ZCODE;
- for (n = size/WORDSIZE: (n--) > 0: ) to_addr-->n = from_addr-->n;
- for (n = size: ((n--) % WORDSIZE ~= 0): ) to_addr->n = from_addr->n;
-#Ifnot; ! TARGET_GLULX
- @mcopy size from_addr to_addr;
-#Endif; ! TARGET_
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Utilities.i6t: Arrcpy
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Arrcpy to_array to_entry_size from_array from_entry_size no_entries n val;
- if (to_entry_size == from_entry_size)
- Memcpy(to_array, from_array, to_entry_size*no_entries);
- else if ((to_entry_size == 2) && (from_entry_size == 4)) {
- for (n = 0: nn;
- to_array->0 = (val/256)%256; to_array->1 = val%256;
- to_array = to_array + 2;
- }
- } else "*** Arrcpy doesn't support this ***";
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Parser
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Object InformParser "(Inform Parser)" has proper;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Grammar Line Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global best_etype; ! Preferred error number so far
-Global nextbest_etype; ! Preferred one, if ASKSCOPE_PE disallowed
-
-Global parser_inflection; ! A property (usually "name") to find object names in
-
-Array pattern --> 32; ! For the current pattern match
-Global pcount; ! and a marker within it
-Array pattern2 --> 32; ! And another, which stores the best match
-Global pcount2; ! so far
-
-Array line_ttype-->32; ! For storing an analysed grammar line
-Array line_tdata-->32;
-Array line_token-->32;
-
-Global nsns; ! Number of special_numbers entered so far
-
-Global params_wanted; ! Number of parameters needed (which may change in parsing)
-
-Global inferfrom; ! The point from which the rest of the command must be inferred
-Global inferword; ! And the preposition inferred
-Global dont_infer; ! Another dull flag
-
-Global cobj_flag = 0;
-
-Global oops_from; ! The "first mistake" word number
-Global saved_oops; ! Used in working this out
-Array oops_workspace -> 64; ! Used temporarily by "oops" routine
-
-Global held_back_mode; ! Flag: is there some input from last time
-Global hb_wn; ! left over? (And a save value for wn.)
- ! (Used for full stops and "then".)
-
-Global usual_grammar_after; ! Point from which usual grammar is parsed (it may vary from
- ! the above if user's routines match multi-word verbs)
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Grammar Token Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant PATTERN_NULL = $ffff; ! Entry for a token producing no text
-
-Global found_ttype; ! Used to break up tokens into type
-Global found_tdata; ! and data (by AnalyseToken)
-Global token_filter; ! For noun filtering by user routines
-
-Global length_of_noun; ! Set by NounDomain to no of words in noun
-
-Global lookahead; ! The token after the one now being matched
-
-Global multi_mode; ! Multiple mode
-Global multi_wanted; ! Number of things needed in multitude
-Global multi_had; ! Number of things actually found
-Global multi_context; ! What token the multi-obj was accepted for
-
-Global indef_mode; ! "Indefinite" mode - ie, "take a brick"
- ! is in this mode
-Global indef_type; ! Bit-map holding types of specification
-Global indef_wanted; ! Number of items wanted (INDEF_ALL_WANTED for all)
-Constant INDEF_ALL_WANTED = 32767;
-Global indef_guess_p; ! Plural-guessing flag
-Global indef_owner; ! Object which must hold these items
-Global indef_cases; ! Possible gender and numbers of them
-Global indef_possambig; ! Has a possibly dangerous assumption
- ! been made about meaning of a descriptor?
-Global indef_nspec_at; ! Word at which a number like "two" was parsed
- ! (for backtracking)
-Global allow_plurals; ! Whether plurals presently allowed or not
-
-Global take_all_rule; ! Slightly different rules apply to "take all" than other uses
- ! of multiple objects, to make adjudication produce more
- ! pragmatically useful results
- ! (Not a flag: possible values 0, 1, 2)
-
-Global dict_flags_of_noun; ! Of the noun currently being parsed
- ! (a bitmap in #dict_par1 format)
-Global pronoun__word; ! Saved value
-Global pronoun__obj; ! Saved value
-
-Constant comma_word = 'comma,'; ! An "untypeable word" used to substitute
- ! for commas in parse buffers
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Match List Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array match_list --> MATCH_LIST_WORDS; ! An array of matched objects so far
-Array match_classes --> MATCH_LIST_WORDS; ! An array of equivalence classes for them
-Array match_scores --> MATCH_LIST_WORDS; ! An array of match scores for them
-Global number_matched; ! How many items in it? (0 means none)
-Global number_of_classes; ! How many equivalence classes?
-Global match_length; ! How many words long are these matches?
-Global match_from; ! At what word of the input do they begin?
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Words
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef TARGET_ZCODE;
-[ WordCount; return parse->1; ];
-[ WordAddress wordnum; return buffer + parse->(wordnum*4+1); ];
-[ WordLength wordnum; return parse->(wordnum*4); ];
-#Ifnot;
-[ WordCount; return parse-->0; ];
-[ WordAddress wordnum; return buffer + parse-->(wordnum*3); ];
-[ WordLength wordnum; return parse-->(wordnum*3-1); ];
-#Endif;
-
-[ WordFrom w p i j wc;
- #Ifdef TARGET_ZCODE; wc = p->1; i = w*2-1;
- #Ifnot; wc = p-->0; i = w*3-2; #Endif;
- if ((w < 1) || (w > wc)) return 0;
- j = p-->i;
- if (j == ',//') j = comma_word;
- if (j == './/') j = THEN1__WD;
- return j;
-];
-
-[ NextWord i j wc;
- #Ifdef TARGET_ZCODE; wc = parse->1; i = wn*2-1;
- #Ifnot; wc = parse-->0; i = wn*3-2; #Endif;
- wn++;
- if ((wn < 2) || (wn > wc+1)) return 0;
- j = parse-->i;
- if (j == ',//') j = comma_word;
- if (j == './/') j = THEN1__WD;
- return j;
-];
-
-[ NextWordStopped wc;
- #Ifdef TARGET_ZCODE; wc = parse->1; #Ifnot; wc = parse-->0; #Endif;
- if ((wn < 1) || (wn > wc)) { wn++; return -1; }
- return NextWord();
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Snippets
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintSnippet snip from to i w1 w2;
- w1 = snip/100; w2 = w1 + (snip%100) - 1;
- if ((w2WordCount())) {
- if ((w1 == 1) && (w2 == 0)) rfalse;
- return RunTimeProblem(RTP_SAYINVALIDSNIPPET, w1, w2);
- }
- from = WordAddress(w1); to = WordAddress(w2) + WordLength(w2) - 1;
- for (i=from: i<=to: i++) print (char) i->0;
-];
-
-[ SpliceSnippet snip t i w1 w2 nextw at endsnippet newlen;
- w1 = snip/100; w2 = w1 + (snip%100) - 1;
- if ((w20 = 120;
- newlen = VM_PrintToBuffer(buffer2, 120, SpliceSnippet__TextPrinter, t, endsnippet);
- for (i=0: (i(at+i) = buffer2->(WORDSIZE+i);
- #Ifdef TARGET_ZCODE; buffer->1 = at+i; #ifnot; buffer-->0 = at+i; #endif;
- for (:at+i<120:i++) buffer->(at+i) = ' ';
- VM_Tokenise(buffer, parse);
- players_command = 100 + WordCount();
- @pull say__pc; @pull say__p;
-];
-
-[ SpliceSnippet__TextPrinter t endsnippet;
- TEXT_TY_Say(t);
- if (endsnippet) { print " "; PrintSnippet(endsnippet); }
-];
-
-[ SnippetIncludes test snippet w1 w2 wlen i j;
- w1 = snippet/100; w2 = w1 + (snippet%100) - 1;
- if ((w20: i++, j--) {
- if (((test)(i, 0)) ~= GPR_FAIL) return i*100+wn-i;
- }
- }
- rfalse;
-];
-
-[ SnippetMatches snippet topic_gpr rv;
- wn=1;
- if (topic_gpr == 0) rfalse;
- if (metaclass(topic_gpr) == Routine) {
- rv = (topic_gpr)(snippet/100, snippet%100);
- if (rv ~= GPR_FAIL) rtrue;
- rfalse;
- }
- RunTimeProblem(RTP_BADTOPIC);
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Unpacking Grammar Lines
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ UnpackGrammarLine line_address i size;
- for (i=0 : i<32 : i++) {
- line_token-->i = ENDIT_TOKEN;
- line_ttype-->i = ELEMENTARY_TT;
- line_tdata-->i = ENDIT_TOKEN;
- }
-#Ifdef TARGET_ZCODE;
- action_to_be = 256*(line_address->0) + line_address->1;
- action_reversed = ((action_to_be & $400) ~= 0);
- action_to_be = action_to_be & $3ff;
- line_address--;
- size = 3;
-#Ifnot; ! GLULX
- @aloads line_address 0 action_to_be;
- action_reversed = (((line_address->2) & 1) ~= 0);
- line_address = line_address - 2;
- size = 5;
-#Endif;
- params_wanted = 0;
- for (i=0 : : i++) {
- line_address = line_address + size;
- if (line_address->0 == ENDIT_TOKEN) break;
- line_token-->i = line_address;
- AnalyseToken(line_address);
- if (found_ttype ~= PREPOSITION_TT) params_wanted++;
- line_ttype-->i = found_ttype;
- line_tdata-->i = found_tdata;
- }
- return line_address + 1;
-];
-
-[ AnalyseToken token;
- if (token == ENDIT_TOKEN) {
- found_ttype = ELEMENTARY_TT;
- found_tdata = ENDIT_TOKEN;
- return;
- }
- found_ttype = (token->0) & $$1111;
- found_tdata = (token+1)-->0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Extracting Verb Numbers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DictionaryWordToVerbNum dword verbnum;
-#Ifdef TARGET_ZCODE;
- verbnum = $ff-(dword->#dict_par2);
-#Ifnot; ! GLULX
- dword = dword + #dict_par2 - 1;
- @aloads dword 0 verbnum;
- verbnum = $ffff-verbnum;
-#Endif;
- return verbnum;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Keyboard Primitive
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ KeyboardPrimitive a_buffer a_table;
-#Ifdef DEBUG; #Iftrue (0 > 0);
- return TestKeyboardPrimitive(a_buffer, a_table);
-#Endif; #Endif;
- return VM_ReadKeyboard(a_buffer, a_table);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Reading the Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Keyboard a_buffer a_table nw i w w2 x1 x2;
- sline1 = score; sline2 = turns;
-
- while (true) {
- ! Save the start of the buffer, in case "oops" needs to restore it
- for (i=0 : i<64 : i++) oops_workspace->i = a_buffer->i;
-
- ! In case of an array entry corruption that shouldn't happen, but would be
- ! disastrous if it did:
- #Ifdef TARGET_ZCODE;
- a_buffer->0 = INPUT_BUFFER_LEN;
- a_table->0 = 15; ! Allow to split input into this many words
- #Endif; ! TARGET_
-
- ! Print the prompt, and read in the words and dictionary addresses
- PrintPrompt();
- DrawStatusLine();
- KeyboardPrimitive(a_buffer, a_table);
-
- ! Set nw to the number of words
- #Ifdef TARGET_ZCODE; nw = a_table->1; #Ifnot; nw = a_table-->0; #Endif;
-
- ! If the line was blank, get a fresh line
- if (nw == 0) {
- @push etype; etype = BLANKLINE_PE;
- players_command = 100;
- BeginActivity(PRINTING_A_PARSER_ERROR_ACT);
- if (ForActivity(PRINTING_A_PARSER_ERROR_ACT) == false) {
- PARSER_ERROR_INTERNAL_RM('X', noun); new_line;
- }
- EndActivity(PRINTING_A_PARSER_ERROR_ACT);
- @pull etype;
- continue;
- }
-
- ! Unless the opening word was OOPS, return
- ! Conveniently, a_table-->1 is the first word on both the Z-machine and Glulx
-
- w = a_table-->1;
- if (w == OOPS1__WD or OOPS2__WD or OOPS3__WD) {
- if (oops_from == 0) { PARSER_COMMAND_INTERNAL_RM('A'); new_line; continue; }
- if (nw == 1) { PARSER_COMMAND_INTERNAL_RM('B'); new_line; continue; }
- if (nw > 2) { PARSER_COMMAND_INTERNAL_RM('C'); new_line; continue; }
-
- ! So now we know: there was a previous mistake, and the player has
- ! attempted to correct a single word of it.
-
- for (i=0 : ii = a_buffer->i;
- #Ifdef TARGET_ZCODE;
- x1 = a_table->9; ! Start of word following "oops"
- x2 = a_table->8; ! Length of word following "oops"
- #Ifnot; ! TARGET_GLULX
- x1 = a_table-->6; ! Start of word following "oops"
- x2 = a_table-->5; ! Length of word following "oops"
- #Endif; ! TARGET_
-
- ! Repair the buffer to the text that was in it before the "oops"
- ! was typed:
- for (i=0 : i<64 : i++) a_buffer->i = oops_workspace->i;
- VM_Tokenise(a_buffer,a_table);
-
- ! Work out the position in the buffer of the word to be corrected:
- #Ifdef TARGET_ZCODE;
- w = a_table->(4*oops_from + 1); ! Start of word to go
- w2 = a_table->(4*oops_from); ! Length of word to go
- #Ifnot; ! TARGET_GLULX
- w = a_table-->(3*oops_from); ! Start of word to go
- w2 = a_table-->(3*oops_from - 1); ! Length of word to go
- #Endif; ! TARGET_
-
- ! Write spaces over the word to be corrected:
- for (i=0 : i(i+w) = ' ';
-
- if (w2 < x2) {
- ! If the replacement is longer than the original, move up...
- for (i=INPUT_BUFFER_LEN-1 : i>=w+x2 : i--)
- a_buffer->i = a_buffer->(i-x2+w2);
-
- ! ...increasing buffer size accordingly.
- #Ifdef TARGET_ZCODE;
- a_buffer->1 = (a_buffer->1) + (x2-w2);
- #Ifnot; ! TARGET_GLULX
- a_buffer-->0 = (a_buffer-->0) + (x2-w2);
- #Endif; ! TARGET_
- }
-
- ! Write the correction in:
- for (i=0 : i(i+w) = buffer2->(i+x1);
-
- VM_Tokenise(a_buffer, a_table);
- #Ifdef TARGET_ZCODE; nw = a_table->1; #Ifnot; nw = a_table-->0; #Endif;
-
- return nw;
- }
-
- ! Undo handling
-
- if ((w == UNDO1__WD or UNDO2__WD or UNDO3__WD) && (nw==1)) {
- Perform_Undo();
- continue;
- }
- i = VM_Save_Undo();
- #ifdef PREVENT_UNDO; undo_flag = 0; #endif;
- #ifndef PREVENT_UNDO; undo_flag = 2; #endif;
- if (i == -1) undo_flag = 0;
- if (i == 0) undo_flag = 1;
- if (i == 2) {
- VM_RestoreWindowColours();
- VM_Style(SUBHEADER_VMSTY);
- SL_Location(); print "^";
- ! print (name) location, "^";
- VM_Style(NORMAL_VMSTY);
- IMMEDIATELY_UNDO_RM('E'); new_line;
- continue;
- }
- return nw;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Proper
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Parser__parse
- syntax line num_lines line_address i j k token l m inferred_go;
- cobj_flag = 0;
- parser_results-->ACTION_PRES = 0;
- parser_results-->NO_INPS_PRES = 0;
- parser_results-->INP1_PRES = 0;
- parser_results-->INP2_PRES = 0;
- meta = false;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter A
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- if (held_back_mode) {
- held_back_mode = false; wn = hb_wn;
- if (verb_wordnum > 0) i = WordAddress(verb_wordnum); else i = WordAddress(1);
- j = WordAddress(wn);
- if (i<=j) for (: i0 = ' ';
- i = NextWord();
- if (i == AGAIN1__WD or AGAIN2__WD or AGAIN3__WD) {
- ! Delete the words "then again" from the again buffer,
- ! in which we have just realised that it must occur:
- ! prevents an infinite loop on "i. again"
-
- i = WordAddress(wn-2)-buffer;
- if (wn > num_words) j = INPUT_BUFFER_LEN-1;
- else j = WordAddress(wn)-buffer;
- for (: ii = ' ';
- }
-
- VM_Tokenise(buffer, parse);
- jump ReParse;
- }
-
- .ReType;
-
- cobj_flag = 0;
- actors_location = ScopeCeiling(player);
- BeginActivity(READING_A_COMMAND_ACT); if (ForActivity(READING_A_COMMAND_ACT)==false) {
- Keyboard(buffer,parse);
- num_words = WordCount(); players_command = 100 + num_words;
- } if (EndActivity(READING_A_COMMAND_ACT)) jump ReType;
-
- .ReParse;
-
- parser_inflection = name;
-
- ! Initially assume the command is aimed at the player, and the verb
- ! is the first word
-
- num_words = WordCount(); players_command = 100 + num_words;
- wn = 1; inferred_go = false;
-
- #Ifdef LanguageToInformese;
- LanguageToInformese();
- ! Re-tokenise:
- VM_Tokenise(buffer,parse);
- #Endif; ! LanguageToInformese
-
- num_words = WordCount(); players_command = 100 + num_words;
-
- k=0;
- #Ifdef DEBUG;
- if (parser_trace >= 2) {
- print "[ ";
- for (i=0 : i(i*2 + 1);
- #Ifnot; ! TARGET_GLULX
- j = parse-->(i*3 + 1);
- #Endif; ! TARGET_
- k = WordAddress(i+1);
- l = WordLength(i+1);
- print "~"; for (m=0 : mm; print "~ ";
-
- if (j == 0) print "?";
- else {
- #Ifdef TARGET_ZCODE;
- if (UnsignedCompare(j, HDR_DICTIONARY-->0) >= 0 &&
- UnsignedCompare(j, HDR_HIGHMEMORY-->0) < 0)
- print (address) j;
- else print j;
- #Ifnot; ! TARGET_GLULX
- if (j->0 == $60) print (address) j;
- else print j;
- #Endif; ! TARGET_
- }
- if (i ~= num_words-1) print " / ";
- }
- print " ]^";
- }
- #Endif; ! DEBUG
- verb_wordnum = 1;
- actor = player;
- actors_location = ScopeCeiling(player);
- usual_grammar_after = 0;
-
- .AlmostReParse;
-
- scope_token = 0;
- action_to_be = NULL;
-
- ! Begin from what we currently think is the verb word
-
- .BeginCommand;
-
- wn = verb_wordnum;
- verb_word = NextWordStopped();
-
- ! If there's no input here, we must have something like "person,".
-
- if (verb_word == -1) {
- best_etype = STUCK_PE; jump GiveError;
- }
- if (verb_word == comma_word) {
- best_etype = COMMABEGIN_PE; jump GiveError;
- }
-
- ! Now try for "again" or "g", which are special cases: don't allow "again" if nothing
- ! has previously been typed; simply copy the previous text across
-
- if (verb_word == AGAIN2__WD or AGAIN3__WD) verb_word = AGAIN1__WD;
- if (verb_word == AGAIN1__WD) {
- if (actor ~= player) {
- best_etype = ANIMAAGAIN_PE;
- jump GiveError;
- }
- #Ifdef TARGET_ZCODE;
- if (buffer3->1 == 0) {
- PARSER_COMMAND_INTERNAL_RM('D'); new_line;
- jump ReType;
- }
- #Ifnot; ! TARGET_GLULX
- if (buffer3-->0 == 0) {
- PARSER_COMMAND_INTERNAL_RM('D'); new_line;
- jump ReType;
- }
- #Endif; ! TARGET_
- for (i=0 : ii = buffer3->i;
- VM_Tokenise(buffer,parse);
- num_words = WordCount(); players_command = 100 + num_words;
- jump ReParse;
- }
-
- ! Save the present input in case of an "again" next time
-
- if (verb_word ~= AGAIN1__WD)
- for (i=0 : ii = buffer->i;
-
- if (usual_grammar_after == 0) {
- j = verb_wordnum;
- i = RunRoutines(actor, grammar);
- #Ifdef DEBUG;
- if (parser_trace >= 2 && actor.grammar ~= 0 or NULL)
- print " [Grammar property returned ", i, "]^";
- #Endif; ! DEBUG
-
- if ((i ~= 0 or 1) && (VM_InvalidDictionaryAddress(i))) {
- usual_grammar_after = verb_wordnum; i=-i;
- }
-
- if (i == 1) {
- parser_results-->ACTION_PRES = action;
- parser_results-->NO_INPS_PRES = 0;
- parser_results-->INP1_PRES = noun;
- parser_results-->INP2_PRES = second;
- if (noun) parser_results-->NO_INPS_PRES = 1;
- if (second) parser_results-->NO_INPS_PRES = 2;
- rtrue;
- }
- if (i ~= 0) { verb_word = i; wn--; verb_wordnum--; }
- else { wn = verb_wordnum; verb_word = NextWord(); }
- }
- else usual_grammar_after = 0;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter B
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- #Ifdef LanguageIsVerb;
- if (verb_word == 0) {
- i = wn; verb_word = LanguageIsVerb(buffer, parse, verb_wordnum);
- wn = i;
- }
- #Endif; ! LanguageIsVerb
-
- ! If the first word is not listed as a verb, it must be a direction
- ! or the name of someone to talk to
-
- if (verb_word == 0 || ((verb_word->#dict_par1) & 1) == 0) {
-
- ! So is the first word an object contained in the special object "compass"
- ! (i.e., a direction)? This needs use of NounDomain, a routine which
- ! does the object matching, returning the object number, or 0 if none found,
- ! or REPARSE_CODE if it has restructured the parse table so the whole parse
- ! must be begun again...
-
- wn = verb_wordnum; indef_mode = false; token_filter = 0; parameters = 0;
- @push actor; @push action; @push action_to_be;
- actor = player; meta = false; action = ##Go; action_to_be = ##Go;
- l = NounDomain(compass, 0, 0);
- @pull action_to_be; @pull action; @pull actor;
- if (l == REPARSE_CODE) jump ReParse;
-
- ! If it is a direction, send back the results:
- ! action=GoSub, no of arguments=1, argument 1=the direction.
-
- if ((l~=0) && (l ofclass K3_direction)) {
- parser_results-->ACTION_PRES = ##Go;
- parser_results-->NO_INPS_PRES = 1;
- parser_results-->INP1_PRES = l;
- inferred_go = true;
- jump LookForMore;
- }
-
- } ! end of first-word-not-a-verb
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter C
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! Only check for a comma (a "someone, do something" command) if we are
- ! not already in the middle of one. (This simplification stops us from
- ! worrying about "robot, wizard, you are an idiot", telling the robot to
- ! tell the wizard that she is an idiot.)
-
- if (actor == player) {
- for (j=2 : j<=num_words : j++) {
- i=NextWord();
- if (i == comma_word) jump Conversation;
- }
- }
- jump NotConversation;
-
- ! NextWord nudges the word number wn on by one each time, so we've now
- ! advanced past a comma. (A comma is a word all on its own in the table.)
-
- .Conversation;
-
- j = wn - 1;
-
- ! Use NounDomain (in the context of "animate creature") to see if the
- ! words make sense as the name of someone held or nearby
-
- wn = 1; lookahead = HELD_TOKEN;
- scope_reason = TALKING_REASON;
- l = NounDomain(player,actors_location,6);
- scope_reason = PARSING_REASON;
- if (l == REPARSE_CODE) jump ReParse;
- if (l == 0) {
- if (verb_word && ((verb_word->#dict_par1) & 1)) jump NotConversation;
- best_etype = MISSINGPERSON_PE; jump GiveError;
- }
-
- .Conversation2;
-
- ! The object addressed must at least be "talkable" if not actually "animate"
- ! (the distinction allows, for instance, a microphone to be spoken to,
- ! without the parser thinking that the microphone is human).
-
- if (l hasnt animate && l hasnt talkable) {
- best_etype = ANIMALISTEN_PE; noun = l; jump GiveError;
- }
-
- ! Check that there aren't any mystery words between the end of the person's
- ! name and the comma (eg, throw out "dwarf sdfgsdgs, go north").
-
- if (wn ~= j) {
- if (verb_word && ((verb_word->#dict_par1) & 1)) jump NotConversation;
- best_etype = TOTALK_PE; jump GiveError;
- }
-
- ! The player has now successfully named someone. Adjust "him", "her", "it":
-
- PronounNotice(l);
-
- ! Set the global variable "actor", adjust the number of the first word,
- ! and begin parsing again from there.
-
- verb_wordnum = j + 1;
-
- ! Stop things like "me, again":
-
- if (l == player) {
- wn = verb_wordnum;
- if (NextWordStopped() == AGAIN1__WD or AGAIN2__WD or AGAIN3__WD) {
- best_etype = ANIMAAGAIN_PE;
- jump GiveError;
- }
- }
-
- actor = l;
- actors_location = ScopeCeiling(l);
- #Ifdef DEBUG;
- if (parser_trace >= 1)
- print "[Actor is ", (the) actor, " in ", (name) actors_location, "]^";
- #Endif; ! DEBUG
- jump BeginCommand;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter D
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- .NotConversation;
- if (verb_word == 0 || ((verb_word->#dict_par1) & 1) == 0) {
- verb_word = UnknownVerb(verb_word);
- if (verb_word ~= 0) jump VerbAccepted;
- best_etype = VERB_PE;
- jump GiveError;
- }
- .VerbAccepted;
-
- ! We now definitely have a verb, not a direction, whether we got here by the
- ! "take ..." or "person, take ..." method. Get the meta flag for this verb:
-
- meta = ((verb_word->#dict_par1) & 2)/2;
-
- ! You can't order other people to "full score" for you, and so on...
-
- if (meta == 1 && actor ~= player) {
- best_etype = VERB_PE;
- meta = 0;
- jump GiveError;
- }
-
- ! Now let i be the corresponding verb number...
-
- i = DictionaryWordToVerbNum(verb_word);
-
- ! ...then look up the i-th entry in the verb table, whose address is at word
- ! 7 in the Z-machine (in the header), so as to get the address of the syntax
- ! table for the given verb...
-
- #Ifdef TARGET_ZCODE;
- syntax = (HDR_STATICMEMORY-->0)-->i;
- #Ifnot; ! TARGET_GLULX
- syntax = (#grammar_table)-->(i+1);
- #Endif; ! TARGET_
-
- ! ...and then see how many lines (ie, different patterns corresponding to the
- ! same verb) are stored in the parse table...
-
- num_lines = (syntax->0) - 1;
-
- ! ...and now go through them all, one by one.
- ! To prevent pronoun_word 0 being misunderstood,
-
- pronoun_word = NULL; pronoun_obj = NULL;
-
- #Ifdef DEBUG;
- if (parser_trace >= 1)
- print "[Parsing for the verb '", (address) verb_word, "' (", num_lines+1, " lines)]^";
- #Endif; ! DEBUG
-
- best_etype = STUCK_PE; nextbest_etype = STUCK_PE;
- multiflag = false;
-
- ! "best_etype" is the current failure-to-match error - it is by default
- ! the least informative one, "don't understand that sentence".
- ! "nextbest_etype" remembers the best alternative to having to ask a
- ! scope token for an error message (i.e., the best not counting ASKSCOPE_PE).
- ! multiflag is used here to prevent inappropriate MULTI_PE errors
- ! in addition to its unrelated duties passing information to action routines
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter E
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- line_address = syntax + 1;
-
- for (line=0 : line<=num_lines : line++) {
-
- ! Unpack the syntax line from Inform format into three arrays; ensure that
- ! the sequence of tokens ends in an ENDIT_TOKEN.
-
- line_address = UnpackGrammarLine(line_address);
-
- #Ifdef DEBUG;
- if (parser_trace >= 1) {
- if (parser_trace >= 2) new_line;
- print "[line ", line; DebugGrammarLine();
- print "]^";
- }
- #Endif; ! DEBUG
-
- ! We aren't in "not holding" or inferring modes, and haven't entered
- ! any parameters on the line yet, or any special numbers; the multiple
- ! object is still empty.
-
- inferfrom = 0;
- parameters = 0;
- nsns = 0; special_word = 0;
- multiple_object-->0 = 0;
- multi_context = 0;
- etype = STUCK_PE;
-
- ! Put the word marker back to just after the verb
-
- wn = verb_wordnum+1;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter F
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- advance_warning = -1; indef_mode = false;
- for (i=0,m=false,pcount=0 : line_token-->pcount ~= ENDIT_TOKEN : pcount++) {
- scope_token = 0;
-
- if (line_ttype-->pcount ~= PREPOSITION_TT) i++;
-
- if (line_ttype-->pcount == ELEMENTARY_TT) {
- if (line_tdata-->pcount == MULTI_TOKEN) m = true;
- if (line_tdata-->pcount == MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN && i == 1) {
- ! First non-preposition is "multiexcept" or
- ! "multiinside", so look ahead.
-
- #Ifdef DEBUG;
- if (parser_trace >= 2) print " [Trying look-ahead]^";
- #Endif; ! DEBUG
-
- ! We need this to be followed by 1 or more prepositions.
-
- pcount++;
- if (line_ttype-->pcount == PREPOSITION_TT) {
- ! skip ahead to a preposition word in the input
- do {
- l = NextWord();
- } until ((wn > num_words) ||
- (l && (l->#dict_par1) & 8 ~= 0));
-
- if (wn > num_words) {
- #Ifdef DEBUG;
- if (parser_trace >= 2)
- print " [Look-ahead aborted: prepositions missing]^";
- #Endif;
- jump EmptyLine;
- }
-
- do {
- if (PrepositionChain(l, pcount) ~= -1) {
- ! advance past the chain
- if ((line_token-->pcount)->0 & $20 ~= 0) {
- pcount++;
- while ((line_token-->pcount ~= ENDIT_TOKEN) &&
- ((line_token-->pcount)->0 & $10 ~= 0))
- pcount++;
- } else {
- pcount++;
- }
- } else {
- ! try to find another preposition word
- do {
- l = NextWord();
- } until ((wn >= num_words) ||
- (l && (l->#dict_par1) & 8 ~= 0));
-
- if (l && (l->#dict_par1) & 8) continue;
-
- ! lookahead failed
- #Ifdef DEBUG;
- if (parser_trace >= 2)
- print " [Look-ahead aborted: prepositions don't match]^";
- #endif;
- jump LineFailed;
- }
- if (wn <= num_words) l = NextWord();
- } until (line_ttype-->pcount ~= PREPOSITION_TT);
-
- .EmptyLine;
- ! put back the non-preposition we just read
- wn--;
-
- if ((line_ttype-->pcount == ELEMENTARY_TT) &&
- (line_tdata-->pcount == NOUN_TOKEN)) {
- l = Descriptors(); ! skip past THE etc
- if (l~=0) etype=l; ! don't allow multiple objects
- k = parser_results-->INP1_PRES; @push k; @push parameters;
- parameters = 1; parser_results-->INP1_PRES = 0;
- l = NounDomain(actors_location, actor, NOUN_TOKEN, true);
- @pull parameters; @pull k; parser_results-->INP1_PRES = k;
- #Ifdef DEBUG;
- if (parser_trace >= 2) {
- print " [Advanced to ~noun~ token: ";
- if (l == REPARSE_CODE) print "re-parse request]^";
- else {
- if (l == 1) print "but multiple found]^";
- if (l == 0) print "error ", etype, "]^";
- if (l >= 2) print (the) l, "]^";
- }
- }
- #Endif; ! DEBUG
- if (l == REPARSE_CODE) jump ReParse;
- if (l >= 2) advance_warning = l;
- }
- }
- break;
- }
- }
- }
-
- ! Slightly different line-parsing rules will apply to "take multi", to
- ! prevent "take all" behaving correctly but misleadingly when there's
- ! nothing to take.
-
- take_all_rule = 0;
- if (m && params_wanted == 1 && action_to_be == ##Take)
- take_all_rule = 1;
-
- ! And now start again, properly, forearmed or not as the case may be.
- ! As a precaution, we clear all the variables again (they may have been
- ! disturbed by the call to NounDomain, which may have called outside
- ! code, which may have done anything!).
-
- inferfrom = 0;
- parameters = 0;
- nsns = 0; special_word = 0;
- multiple_object-->0 = 0;
- etype = STUCK_PE;
- wn = verb_wordnum+1;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter G
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- m = true;
- for (pcount=1 : : pcount++)
- if (line_token-->(pcount-1) == ENDIT_TOKEN) {
- if (pcount >= 2) {
- while ((((line_token-->(pcount-2))->0) & $10) ~= 0) pcount--;
- AnalyseToken(line_token-->(pcount-2));
- if (found_ttype == PREPOSITION_TT) {
- l = -1;
- while (true) {
- m = NextWordStopped();
- if (m == -1) break;
- l = m;
- }
- if (PrepositionChain(l, pcount-2) == -1) {
- m = false;
- #Ifdef DEBUG;
- if (parser_trace >= 2)
- print "[line rejected for not ending with correct preposition]^";
- #Endif; ! DEBUG
- } else m = true;
- }
- }
- break;
- }
- wn = verb_wordnum+1;
-
- if (m) for (pcount=1 : : pcount++) {
- pattern-->pcount = PATTERN_NULL; scope_token = 0;
-
- token = line_token-->(pcount-1);
- lookahead = line_token-->pcount;
-
- #Ifdef DEBUG;
- if (parser_trace >= 2)
- print " [line ", line, " token ", pcount, " word ", wn, " : ", (DebugToken) token,
- "]^";
- #Endif; ! DEBUG
-
- if (token ~= ENDIT_TOKEN) {
- scope_reason = PARSING_REASON;
- AnalyseToken(token);
-
- l = ParseToken(found_ttype, found_tdata, pcount-1, token);
- while ((l >= GPR_NOUN) && (l < -1)) l = ParseToken(ELEMENTARY_TT, l + 256);
- scope_reason = PARSING_REASON;
-
- if (l == GPR_PREPOSITION) {
- if (found_ttype~=PREPOSITION_TT && (found_ttype~=ELEMENTARY_TT ||
- found_tdata~=TOPIC_TOKEN)) params_wanted--;
- l = true;
- }
- else
- if (l < 0) l = false;
- else
- if (l ~= GPR_REPARSE) {
- if (l == GPR_NUMBER) {
- if (nsns == 0) special_number1 = parsed_number;
- else special_number2 = parsed_number;
- nsns++; l = 1;
- }
- if (l == GPR_MULTIPLE) l = 0;
- parser_results-->(parameters+INP1_PRES) = l;
- parameters++;
- pattern-->pcount = l;
- l = true;
- }
-
- #Ifdef DEBUG;
- if (parser_trace >= 3) {
- print " [token resulted in ";
- if (l == REPARSE_CODE) print "re-parse request]^";
- if (l == 0) print "failure with error type ", etype, "]^";
- if (l == 1) print "success]^";
- }
- #Endif; ! DEBUG
-
- if (l == REPARSE_CODE) jump ReParse;
- if (l == false) break;
- }
- else {
-
- ! If the player has entered enough already but there's still
- ! text to wade through: store the pattern away so as to be able to produce
- ! a decent error message if this turns out to be the best we ever manage,
- ! and in the mean time give up on this line
-
- ! However, if the superfluous text begins with a comma or "then" then
- ! take that to be the start of another instruction
-
- if (wn <= num_words) {
- l = NextWord();
- if (l == THEN1__WD or THEN2__WD or THEN3__WD or comma_word) {
- held_back_mode = true; hb_wn = wn-1;
- } else {
- for (m=0 : m<32 : m++) pattern2-->m = pattern-->m;
- pcount2 = pcount;
- etype = UPTO_PE;
- break;
- }
- }
-
- ! Now, we may need to revise the multiple object because of the single one
- ! we now know (but didn't when the list was drawn up).
-
- if (parameters >= 1) {
- if (parser_results-->INP1_PRES == 0) {
- l = ReviseMulti(parser_results-->INP2_PRES);
- if (l ~= 0) { etype = l; parser_results-->ACTION_PRES = action_to_be; break; }
- }
- }
- if (parameters >= 2) {
- if (parser_results-->INP2_PRES == 0) {
- l = ReviseMulti(parser_results-->INP1_PRES);
- if (l ~= 0) { etype = l; break; }
- } else {
- k = parser_results-->INP1_PRES; l = parser_results-->INP2_PRES;
- if (k && l) {
- if ((multi_context==MULTIEXCEPT_TOKEN && k == l) ||
- ((multi_context==MULTIINSIDE_TOKEN && k notin l && l notin k))) {
- best_etype = NOTHING_PE;
- parser_results-->ACTION_PRES = action_to_be; jump GiveError;
- }
- }
- }
- }
-
- ! To trap the case of "take all" inferring only "yourself" when absolutely
- ! nothing else is in the vicinity...
-
- if (take_all_rule == 2 && parser_results-->INP1_PRES == actor) {
- best_etype = NOTHING_PE;
- jump GiveError;
- }
-
- #Ifdef DEBUG;
- if (parser_trace >= 1) print "[Line successfully parsed]^";
- #Endif; ! DEBUG
-
- ! The line has successfully matched the text. Declare the input error-free...
-
- oops_from = 0;
-
- ! ...explain any inferences made (using the pattern)...
-
- if (inferfrom ~= 0) {
- PrintInferredCommand(inferfrom);
- ClearParagraphing(20);
- }
-
- ! ...copy the action number, and the number of parameters...
-
- parser_results-->ACTION_PRES = action_to_be;
- parser_results-->NO_INPS_PRES = parameters;
-
- ! ...reverse first and second parameters if need be...
-
- if (action_reversed && parameters == 2) {
- i = parser_results-->INP1_PRES;
- parser_results-->INP1_PRES = parser_results-->INP2_PRES;
- parser_results-->INP2_PRES = i;
- if (nsns == 2) {
- i = special_number1; special_number1 = special_number2;
- special_number2 = i;
- }
- }
-
- ! ...and to reset "it"-style objects to the first of these parameters, if
- ! there is one (and it really is an object)...
-
- if (parameters > 0 && parser_results-->INP1_PRES >= 2)
- PronounNotice(parser_results-->INP1_PRES);
-
- ! ...and return from the parser altogether, having successfully matched
- ! a line.
-
- if (held_back_mode) {
- wn=hb_wn;
- jump LookForMore;
- }
- rtrue;
-
- } ! end of if(token ~= ENDIT_TOKEN) else
- } ! end of for(pcount++)
-
- .LineFailed;
- ! The line has failed to match.
- ! We continue the outer "for" loop, trying the next line in the grammar.
-
- if (etype > best_etype) best_etype = etype;
- if (etype ~= ASKSCOPE_PE && etype > nextbest_etype) nextbest_etype = etype;
-
- ! ...unless the line was something like "take all" which failed because
- ! nothing matched the "all", in which case we stop and give an error now.
-
- if (take_all_rule == 2 && etype==NOTHING_PE) break;
-
- } ! end of for(line++)
-
- ! The grammar is exhausted: every line has failed to match.
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter H
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- .GiveError;
-
- etype = best_etype;
- if (actor ~= player) {
- if (usual_grammar_after ~= 0) {
- verb_wordnum = usual_grammar_after;
- jump AlmostReParse;
- }
- wn = verb_wordnum;
- special_word = NextWord();
- if (special_word == comma_word) {
- special_word = NextWord();
- verb_wordnum++;
- }
- parser_results-->ACTION_PRES = ##Answer;
- parser_results-->NO_INPS_PRES = 2;
- parser_results-->INP1_PRES = actor;
- parser_results-->INP2_PRES = 1; special_number1 = special_word;
- actor = player;
- consult_from = verb_wordnum; consult_words = num_words-consult_from+1;
- rtrue;
- }
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter I
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! If the player was the actor (eg, in "take dfghh") the error must be printed,
- ! and fresh input called for. In three cases the oops word must be jiggled.
-
- if ((etype ofclass Routine) || (etype ofclass String)) {
- if (ParserError(etype) ~= 0) jump ReType;
- } else {
- if (verb_wordnum == 0 && etype == CANTSEE_PE) etype = VERB_PE;
- players_command = 100 + WordCount(); ! The snippet variable "player's command"
- BeginActivity(PRINTING_A_PARSER_ERROR_ACT);
- if (ForActivity(PRINTING_A_PARSER_ERROR_ACT)) jump SkipParserError;
- }
- pronoun_word = pronoun__word; pronoun_obj = pronoun__obj;
-
- if (etype == STUCK_PE) { PARSER_ERROR_INTERNAL_RM('A'); new_line; oops_from = 1; }
- if (etype == UPTO_PE) {
- if (inferred_go) PARSER_ERROR_INTERNAL_RM('C');
- else PARSER_ERROR_INTERNAL_RM('B');
- for (m=0 : m<32 : m++) pattern-->m = pattern2-->m;
- pcount = pcount2; PrintCommand(0);
- print ".^";
- }
- if (etype == NUMBER_PE) { PARSER_ERROR_INTERNAL_RM('D'); new_line; }
- if (etype == CANTSEE_PE) { PARSER_ERROR_INTERNAL_RM('E'); new_line; oops_from=saved_oops; }
- if (etype == TOOLIT_PE) { PARSER_ERROR_INTERNAL_RM('F'); new_line; }
- if (etype == NOTHELD_PE) { PARSER_ERROR_INTERNAL_RM('G'); new_line; oops_from=saved_oops; }
- if (etype == MULTI_PE) { PARSER_ERROR_INTERNAL_RM('H'); new_line; }
- if (etype == MMULTI_PE) { PARSER_ERROR_INTERNAL_RM('I'); new_line; }
- if (etype == VAGUE_PE) { PARSER_ERROR_INTERNAL_RM('J'); new_line; }
- if (etype == ITGONE_PE) {
- if (pronoun_obj == NULL) { PARSER_ERROR_INTERNAL_RM('J'); new_line; }
- else { PARSER_ERROR_INTERNAL_RM('K', noun); new_line; }
- }
- if (etype == EXCEPT_PE) { PARSER_ERROR_INTERNAL_RM('L'); new_line; }
- if (etype == ANIMA_PE) { PARSER_ERROR_INTERNAL_RM('M'); new_line; }
- if (etype == VERB_PE) { PARSER_ERROR_INTERNAL_RM('N'); new_line; }
- if (etype == SCENERY_PE) { PARSER_ERROR_INTERNAL_RM('O'); new_line; }
- if (etype == JUNKAFTER_PE) { PARSER_ERROR_INTERNAL_RM('P'); new_line; }
- if (etype == TOOFEW_PE) { PARSER_ERROR_INTERNAL_RM('Q', multi_had); new_line; }
- if (etype == NOTHING_PE) {
- if (parser_results-->ACTION_PRES == ##Remove &&
- parser_results-->INP2_PRES ofclass Object) {
- noun = parser_results-->INP2_PRES; ! ensure valid for messages
- if (noun has animate) { PARSER_N_ERROR_INTERNAL_RM('C', noun); new_line; }
- else if (noun hasnt container or supporter) { PARSER_N_ERROR_INTERNAL_RM('D', noun); new_line; }
- else if (noun has container && noun hasnt open) { PARSER_N_ERROR_INTERNAL_RM('E', noun); new_line; }
- else if (children(noun)==0) { PARSER_N_ERROR_INTERNAL_RM('F', noun); new_line; }
- else parser_results-->ACTION_PRES = 0;
- }
- if (parser_results-->ACTION_PRES ~= ##Remove) {
- if (multi_wanted==100) { PARSER_N_ERROR_INTERNAL_RM('A'); new_line; }
- else { PARSER_N_ERROR_INTERNAL_RM('B'); new_line; }
- }
- }
- if (etype == NOTINCONTEXT_PE) { PARSER_ERROR_INTERNAL_RM('R'); new_line; }
- if (etype == ANIMAAGAIN_PE) { PARSER_ERROR_INTERNAL_RM('S'); new_line; }
- if (etype == COMMABEGIN_PE) { PARSER_ERROR_INTERNAL_RM('T'); new_line; }
- if (etype == MISSINGPERSON_PE) { PARSER_ERROR_INTERNAL_RM('U'); new_line; }
- if (etype == ANIMALISTEN_PE) { PARSER_ERROR_INTERNAL_RM('V', noun); new_line; }
- if (etype == TOTALK_PE) { PARSER_ERROR_INTERNAL_RM('W'); new_line; }
- if (etype == ASKSCOPE_PE) {
- scope_stage = 3;
- if (indirect(scope_error) == -1) {
- best_etype = nextbest_etype;
- if (~~((etype ofclass Routine) || (etype ofclass String)))
- EndActivity(PRINTING_A_PARSER_ERROR_ACT);
- jump GiveError;
- }
- }
-
- .SkipParserError;
- if ((etype ofclass Routine) || (etype ofclass String)) jump ReType;
- say__p = 1;
- EndActivity(PRINTING_A_PARSER_ERROR_ACT);
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter J
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! And go (almost) right back to square one...
-
- jump ReType;
-
- ! ...being careful not to go all the way back, to avoid infinite repetition
- ! of a deferred command causing an error.
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parser Letter K
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! At this point, the return value is all prepared, and we are only looking
- ! to see if there is a "then" followed by subsequent instruction(s).
-
- .LookForMore;
-
- if (wn > num_words) rtrue;
-
- i = NextWord();
- if (i == THEN1__WD or THEN2__WD or THEN3__WD or comma_word) {
- if (wn > num_words) {
- held_back_mode = false;
- return;
- }
- hb_wn = wn;
- held_back_mode = true;
- return;
- }
- best_etype = UPTO_PE;
- jump GiveError;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: End of Parser Proper
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-]; ! end of Parser__parse
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Internal Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PARSER_ERROR_INTERNAL_R; ];
-[ PARSER_N_ERROR_INTERNAL_R; ];
-[ PARSER_COMMAND_INTERNAL_R; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parse Token
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ParseTokenStopped x y;
- if (wn>WordCount()) return GPR_FAIL;
- return ParseToken(x,y);
-];
-
-Global parsetoken_nesting = 0;
-[ ParseToken given_ttype given_tdata token_n token i t rv;
- if (parsetoken_nesting > 0) {
- ! save match globals
- @push match_from; @push token_filter; @push match_length;
- @push number_of_classes; @push oops_from;
- for (i=0: ii; @push t;
- t = match_classes-->i; @push t;
- t = match_scores-->i; @push t;
- }
- @push number_matched;
- }
-
- parsetoken_nesting++;
- rv = ParseToken__(given_ttype, given_tdata, token_n, token);
- parsetoken_nesting--;
-
- if (parsetoken_nesting > 0) {
- ! restore match globals
- @pull number_matched;
- for (i=number_matched-1: i>=0: i--) {
- @pull t; match_scores-->i = t;
- @pull t; match_classes-->i = t;
- @pull t; match_list-->i = t;
- }
- @pull oops_from; @pull number_of_classes;
- @pull match_length; @pull token_filter; @pull match_from;
- }
- return rv;
-];
-
-[ ParseToken__ given_ttype given_tdata token_n token
- l o i j k and_parity single_object desc_wn many_flag
- token_allows_multiple prev_indef_wanted;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parse Token Letter A
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- token_filter = 0;
- parser_inflection = name;
-
- switch (given_ttype) {
- ELEMENTARY_TT:
- switch (given_tdata) {
- SPECIAL_TOKEN:
- l = TryNumber(wn);
- special_word = NextWord();
- #Ifdef DEBUG;
- if (l ~= -1000)
- if (parser_trace >= 3) print " [Read special as the number ", l, "]^";
- #Endif; ! DEBUG
- if (l == -1000) {
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Read special word at word number ", wn, "]^";
- #Endif; ! DEBUG
- l = special_word;
- }
- parsed_number = l;
- return GPR_NUMBER;
-
- NUMBER_TOKEN:
- l=TryNumber(wn++);
- if (l == -1000) {
- etype = NUMBER_PE;
- return GPR_FAIL;
- }
- #Ifdef DEBUG;
- if (parser_trace>=3) print " [Read number as ", l, "]^";
- #Endif; ! DEBUG
- parsed_number = l;
- return GPR_NUMBER;
-
- CREATURE_TOKEN:
- if (action_to_be == ##Answer or ##Ask or ##AskFor or ##Tell)
- scope_reason = TALKING_REASON;
-
- TOPIC_TOKEN:
- consult_from = wn;
- if ((line_ttype-->(token_n+1) ~= PREPOSITION_TT) &&
- (line_token-->(token_n+1) ~= ENDIT_TOKEN)) {
- RunTimeProblem(RTP_TEXTTOKENTOOHARD);
- return GPR_PREPOSITION;
- }
- do o = NextWordStopped();
- until (o == -1 || PrepositionChain(o, token_n+1) ~= -1);
- wn--;
- consult_words = wn-consult_from;
- if (consult_words == 0) return GPR_FAIL;
- if (action_to_be == ##Ask or ##Answer or ##Tell) {
- o = wn; wn = consult_from; parsed_number = NextWord();
- wn = o; return 1;
- }
- if (o==-1 && (line_ttype-->(token_n+1) == PREPOSITION_TT))
- return GPR_FAIL; ! don't infer if required preposition is absent
- return GPR_PREPOSITION;
- }
-
- PREPOSITION_TT:
- ! Is it an unnecessary alternative preposition, when a previous choice
- ! has already been matched?
- if ((token->0) & $10) return GPR_PREPOSITION;
-
- ! If we've run out of the player's input, but still have parameters to
- ! specify, we go into "infer" mode, remembering where we are and the
- ! preposition we are inferring...
-
- if (wn > num_words) {
- if (inferfrom==0 && parameterspcount = REPARSE_CODE + VM_DictionaryAddressToNumber(given_tdata);
- }
-
- ! If we are not inferring, then the line is wrong...
-
- if (inferfrom == 0) return -1;
-
- ! If not, then the line is right but we mark in the preposition...
-
- pattern-->pcount = REPARSE_CODE + VM_DictionaryAddressToNumber(given_tdata);
- return GPR_PREPOSITION;
- }
-
- o = NextWord();
-
- pattern-->pcount = REPARSE_CODE + VM_DictionaryAddressToNumber(o);
-
- ! Whereas, if the player has typed something here, see if it is the
- ! required preposition... if it's wrong, the line must be wrong,
- ! but if it's right, the token is passed (jump to finish this token).
-
- if (o == given_tdata) return GPR_PREPOSITION;
- if (PrepositionChain(o, token_n) ~= -1) return GPR_PREPOSITION;
- return -1;
-
- GPR_TT:
- l = indirect(given_tdata);
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Outside parsing routine returned ", l, "]^";
- #Endif; ! DEBUG
- return l;
-
- SCOPE_TT:
- scope_token = given_tdata;
- scope_stage = 1;
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Scope routine called at stage 1]^";
- #Endif; ! DEBUG
- l = indirect(scope_token);
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Scope routine returned multiple-flag of ", l, "]^";
- #Endif; ! DEBUG
- if (l == 1) given_tdata = MULTI_TOKEN; else given_tdata = NOUN_TOKEN;
-
- ATTR_FILTER_TT:
- token_filter = 1 + given_tdata;
- given_tdata = NOUN_TOKEN;
-
- ROUTINE_FILTER_TT:
- token_filter = given_tdata;
- given_tdata = NOUN_TOKEN;
-
- } ! end of switch(given_ttype)
-
- token = given_tdata;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parse Token Letter B
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! There are now three possible ways we can be here:
- ! parsing an elementary token other than "special" or "number";
- ! parsing a scope token;
- ! parsing a noun-filter token (either by routine or attribute).
- !
- ! In each case, token holds the type of elementary parse to
- ! perform in matching one or more objects, and
- ! token_filter is 0 (default), an attribute + 1 for an attribute filter
- ! or a routine address for a routine filter.
-
- token_allows_multiple = false;
- if (token == MULTI_TOKEN or MULTIHELD_TOKEN or MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN)
- token_allows_multiple = true;
-
- many_flag = false; and_parity = true; dont_infer = false;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parse Token Letter C
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! We expect to find a list of objects next in what the player's typed.
-
- .ObjectList;
-
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Object list from word ", wn, "]^";
- #Endif; ! DEBUG
-
- ! Take an advance look at the next word: if it's "it" or "them", and these
- ! are unset, set the appropriate error number and give up on the line
- ! (if not, these are still parsed in the usual way - it is not assumed
- ! that they still refer to something in scope)
-
- o = NextWord(); wn--;
-
- pronoun_word = NULL; pronoun_obj = NULL;
- l = PronounValue(o);
- if (l ~= 0) {
- pronoun_word = o; pronoun_obj = l;
- if (l == NULL) {
- ! Don't assume this is a use of an unset pronoun until the
- ! descriptors have been checked, because it might be an
- ! article (or some such) instead
-
- for (l=1 : l<=LanguageDescriptors-->0 : l=l+4)
- if (o == LanguageDescriptors-->l) jump AssumeDescriptor;
- pronoun__word = pronoun_word; pronoun__obj = pronoun_obj;
- etype = VAGUE_PE;
- if (parser_trace >= 3) print " [Stop: unset pronoun]^";
- return GPR_FAIL;
- }
- }
-
- .AssumeDescriptor;
-
- if (o == ME1__WD or ME2__WD or ME3__WD) { pronoun_word = o; pronoun_obj = player; }
-
- allow_plurals = true; desc_wn = wn;
-
- .TryAgain;
-
- ! First, we parse any descriptive words (like "the", "five" or "every"):
- l = Descriptors(token_allows_multiple);
- if (l ~= 0) { etype = l; return 0; }
-
- .TryAgain2;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parse Token Letter D
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! This is an actual specified object, and is therefore where a typing error
- ! is most likely to occur, so we set:
-
- oops_from = wn;
-
- ! So, two cases. Case 1: token not equal to "held" (so, no implicit takes)
- ! but we may well be dealing with multiple objects
-
- ! In either case below we use NounDomain, giving it the token number as
- ! context, and two places to look: among the actor's possessions, and in the
- ! present location. (Note that the order depends on which is likeliest.)
-
- if (token ~= HELD_TOKEN) {
- i = multiple_object-->0;
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Calling NounDomain on location and actor]^";
- #Endif; ! DEBUG
- l = NounDomain(actors_location, actor, token);
- if (l == REPARSE_CODE) return l; ! Reparse after Q&A
- if (indef_wanted == INDEF_ALL_WANTED && l == 0 && number_matched == 0)
- l = 1; ! ReviseMulti if TAKE ALL FROM empty container
-
- if (token_allows_multiple && ~~multiflag) {
- if (best_etype==MULTI_PE) best_etype=STUCK_PE;
- multiflag = true;
- }
- if (l == 0) {
- if (indef_possambig) {
- ResetDescriptors();
- wn = desc_wn;
- jump TryAgain2;
- }
- if (etype == MULTI_PE && multiflag) etype = STUCK_PE;
- etype=CantSee();
- jump FailToken;
- } ! Choose best error
-
- #Ifdef DEBUG;
- if (parser_trace >= 3) {
- if (l > 1) print " [ND returned ", (the) l, "]^";
- else {
- print " [ND appended to the multiple object list:^";
- k = multiple_object-->0;
- for (j=i+1 : j<=k : j++)
- print " Entry ", j, ": ", (The) multiple_object-->j,
- " (", multiple_object-->j, ")^";
- print " List now has size ", k, "]^";
- }
- }
- #Endif; ! DEBUG
-
- if (l == 1) {
- if (~~many_flag) many_flag = true;
- else { ! Merge with earlier ones
- k = multiple_object-->0; ! (with either parity)
- multiple_object-->0 = i;
- for (j=i+1 : j<=k : j++) {
- if (and_parity) MultiAdd(multiple_object-->j);
- else MultiSub(multiple_object-->j);
- }
- #Ifdef DEBUG;
- if (parser_trace >= 3)
- print " [Merging ", k-i, " new objects to the ", i, " old ones]^";
- #Endif; ! DEBUG
- }
- }
- else {
- ! A single object was indeed found
-
- if (match_length == 0 && indef_possambig) {
- ! So the answer had to be inferred from no textual data,
- ! and we know that there was an ambiguity in the descriptor
- ! stage (such as a word which could be a pronoun being
- ! parsed as an article or possessive). It's worth having
- ! another go.
-
- ResetDescriptors();
- wn = desc_wn;
- jump TryAgain2;
- }
-
- if ((token == CREATURE_TOKEN) && (CreatureTest(l) == 0)) {
- etype = ANIMA_PE;
- jump FailToken;
- } ! Animation is required
-
- if (~~many_flag) single_object = l;
- else {
- if (and_parity) MultiAdd(l); else MultiSub(l);
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Combining ", (the) l, " with list]^";
- #Endif; ! DEBUG
- }
- }
- }
-
- else {
-
- ! Case 2: token is "held" (which fortunately can't take multiple objects)
- ! and may generate an implicit take
-
- l = NounDomain(actor,actors_location,token); ! Same as above...
- if (l == REPARSE_CODE) return l;
- if (l == 0) {
- if (indef_possambig) {
- ResetDescriptors();
- wn = desc_wn;
- jump TryAgain2;
- }
- etype = CantSee(); jump FailToken; ! Choose best error
- }
-
- ! ...until it produces something not held by the actor. Then an implicit
- ! take must be tried. If this is already happening anyway, things are too
- ! confused and we have to give up (but saving the oops marker so as to get
- ! it on the right word afterwards).
- ! The point of this last rule is that a sequence like
- !
- ! > read newspaper
- ! (taking the newspaper first)
- ! The dwarf unexpectedly prevents you from taking the newspaper!
- !
- ! should not be allowed to go into an infinite repeat - read becomes
- ! take then read, but take has no effect, so read becomes take then read...
- ! Anyway for now all we do is record the number of the object to take.
-
- o = parent(l);
- if (o ~= actor) {
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Allowing object ", (the) l, " for now]^";
- #Endif; ! DEBUG
- }
- single_object = l;
- } ! end of if (token ~= HELD_TOKEN) else
-
- ! The following moves the word marker to just past the named object...
-
-! if (match_from ~= oops_from) print match_from, " vs ", oops_from, "^";
-
-! wn = oops_from + match_length;
- wn = match_from + match_length;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parse Token Letter E
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! Object(s) specified now: is that the end of the list, or have we reached
- ! "and", "but" and so on? If so, create a multiple-object list if we
- ! haven't already (and are allowed to).
-
- .NextInList;
-
- o = NextWord();
-
- if (o == AND1__WD or AND2__WD or AND3__WD or BUT1__WD or BUT2__WD or BUT3__WD or comma_word) {
-
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Read connective '", (address) o, "']^";
- #Endif; ! DEBUG
-
- if (~~token_allows_multiple) {
- if (multiflag) jump PassToken; ! give UPTO_PE error
- etype=MULTI_PE;
- jump FailToken;
- }
-
- if (o == BUT1__WD or BUT2__WD or BUT3__WD) and_parity = 1-and_parity;
-
- if (~~many_flag) {
- multiple_object-->0 = 1;
- multiple_object-->1 = single_object;
- many_flag = true;
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Making new list from ", (the) single_object, "]^";
- #Endif; ! DEBUG
- }
- dont_infer = true; inferfrom=0; ! Don't print (inferences)
- jump ObjectList; ! And back around
- }
-
- wn--; ! Word marker back to first not-understood word
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parse Token Letter F
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
- ! Happy or unhappy endings:
-
- .PassToken;
- if (many_flag) {
- single_object = GPR_MULTIPLE;
- multi_context = token;
- }
- else {
- if (indef_mode == 1 && indef_type & PLURAL_BIT ~= 0) {
- if (token == MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN) multi_context = token;
- if (indef_wanted < INDEF_ALL_WANTED && indef_wanted > 1) {
- multi_had = 1; multi_wanted = indef_wanted;
- etype = TOOFEW_PE;
- jump FailToken;
- }
- }
- }
- return single_object;
-
- .FailToken;
-
- ! If we were only guessing about it being a plural, try again but only
- ! allowing singulars (so that words like "six" are not swallowed up as
- ! Descriptors)
-
- if (allow_plurals && indef_guess_p == 1) {
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " [Retrying singulars after failure ", etype, "]^";
- #Endif;
- prev_indef_wanted = indef_wanted;
- allow_plurals = false;
- wn = desc_wn;
- jump TryAgain;
- }
-
- if ((indef_wanted > 0 || prev_indef_wanted > 0) && (~~multiflag)) etype = MULTI_PE;
-
- return GPR_FAIL;
-
-]; ! end of ParseToken__
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Descriptors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant OTHER_BIT = 1; ! These will be used in Adjudicate()
-Constant MY_BIT = 2; ! to disambiguate choices
-Constant THAT_BIT = 4;
-Constant PLURAL_BIT = 8;
-Constant LIT_BIT = 16;
-Constant UNLIT_BIT = 32;
-
-[ ResetDescriptors;
- indef_mode = 0; indef_type = 0; indef_wanted = 0; indef_guess_p = 0;
- indef_possambig = false;
- indef_owner = nothing;
- indef_cases = $$111111111111;
- indef_nspec_at = 0;
-];
-
-[ ArticleDescriptors o x flag cto type n;
- if (wn > num_words) return 0;
-
- for (flag=true : flag :) {
- o = NextWordStopped(); flag = false;
-
- for (x=1 : x<=LanguageDescriptors-->0 : x=x+4)
- if (o == LanguageDescriptors-->x) {
- type = LanguageDescriptors-->(x+2);
- if (type == DEFART_PK or INDEFART_PK) flag = true;
- }
- }
- wn--;
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parsing Descriptors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Descriptors o x flag cto type n;
- ResetDescriptors();
- if (wn > num_words) return 0;
-
- for (flag=true : flag :) {
- o = NextWordStopped(); flag = false;
-
- for (x=1 : x<=LanguageDescriptors-->0 : x=x+4)
- if (o == LanguageDescriptors-->x) {
- flag = true;
- type = LanguageDescriptors-->(x+2);
- if (type ~= DEFART_PK) indef_mode = true;
- indef_possambig = true;
- indef_cases = indef_cases & (LanguageDescriptors-->(x+1));
-
- if (type == POSSESS_PK) {
- cto = LanguageDescriptors-->(x+3);
- switch (cto) {
- 0: indef_type = indef_type | MY_BIT;
- 1: indef_type = indef_type | THAT_BIT;
- default:
- indef_owner = PronounValue(cto);
- if (indef_owner == NULL) indef_owner = InformParser;
- }
- }
-
- if (type == light) indef_type = indef_type | LIT_BIT;
- if (type == -light) indef_type = indef_type | UNLIT_BIT;
- }
-
- if (o == OTHER1__WD or OTHER2__WD or OTHER3__WD) {
- indef_mode = 1; flag = 1;
- indef_type = indef_type | OTHER_BIT;
- }
- if (o == ALL1__WD or ALL2__WD or ALL3__WD or ALL4__WD or ALL5__WD) {
- indef_mode = 1; flag = 1; indef_wanted = INDEF_ALL_WANTED;
- if (take_all_rule == 1) take_all_rule = 2;
- indef_type = indef_type | PLURAL_BIT;
- }
- if (allow_plurals) {
- if (NextWordStopped() ~= -1 or THEN1__WD) { wn--; n = TryNumber(wn-1); } else { n=0; wn--; }
- if (n == 1) { indef_mode = 1; flag = 1; }
- if (n > 1) {
- indef_guess_p = 1;
- indef_mode = 1; flag = 1; indef_wanted = n;
- indef_nspec_at = wn-1;
- indef_type = indef_type | PLURAL_BIT;
- }
- }
- if (flag == 1 && NextWordStopped() ~= OF1__WD or OF2__WD or OF3__WD or OF4__WD)
- wn--; ! Skip 'of' after these
- }
- wn--;
- return 0;
-];
-
-[ SafeSkipDescriptors;
- @push indef_mode; @push indef_type; @push indef_wanted;
- @push indef_guess_p; @push indef_possambig; @push indef_owner;
- @push indef_cases; @push indef_nspec_at;
-
- Descriptors();
-
- @pull indef_nspec_at; @pull indef_cases;
- @pull indef_owner; @pull indef_possambig; @pull indef_guess_p;
- @pull indef_wanted; @pull indef_type; @pull indef_mode;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Preposition Chain
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrepositionChain wd index;
- if (line_tdata-->index == wd) return wd;
- if ((line_token-->index)->0 & $20 == 0) return -1;
- do {
- if (line_tdata-->index == wd) return wd;
- index++;
- } until ((line_token-->index == ENDIT_TOKEN) || (((line_token-->index)->0 & $10) == 0));
- return -1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Creature
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CreatureTest obj;
- if (obj has animate) rtrue;
- if (obj hasnt talkable) rfalse;
- if (action_to_be == ##Ask or ##Answer or ##Tell or ##AskFor) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Noun Domain
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NounDomain domain1 domain2 context dont_ask
- first_word i j k l answer_words marker;
- #Ifdef DEBUG;
- if (parser_trace >= 4) {
- print " [NounDomain called at word ", wn, "^";
- print " ";
- if (indef_mode) {
- print "seeking indefinite object: ";
- if (indef_type & OTHER_BIT) print "other ";
- if (indef_type & MY_BIT) print "my ";
- if (indef_type & THAT_BIT) print "that ";
- if (indef_type & PLURAL_BIT) print "plural ";
- if (indef_type & LIT_BIT) print "lit ";
- if (indef_type & UNLIT_BIT) print "unlit ";
- if (indef_owner ~= 0) print "owner:", (name) indef_owner;
- new_line;
- print " number wanted: ";
- if (indef_wanted == INDEF_ALL_WANTED) print "all"; else print indef_wanted;
- new_line;
- print " most likely GNAs of names: ", indef_cases, "^";
- }
- else print "seeking definite object^";
- }
- #Endif; ! DEBUG
-
- match_length = 0; number_matched = 0; match_from = wn;
-
- SearchScope(domain1, domain2, context);
-
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " [ND made ", number_matched, " matches]^";
- #Endif; ! DEBUG
-
- wn = match_from+match_length;
-
- ! If nothing worked at all, leave with the word marker skipped past the
- ! first unmatched word...
-
- if (number_matched == 0) { wn++; rfalse; }
-
- ! Suppose that there really were some words being parsed (i.e., we did
- ! not just infer). If so, and if there was only one match, it must be
- ! right and we return it...
-
- if (match_from <= num_words) {
- if (number_matched == 1) {
- i=match_list-->0;
- return i;
- }
-
- ! ...now suppose that there was more typing to come, i.e. suppose that
- ! the user entered something beyond this noun. If nothing ought to follow,
- ! then there must be a mistake, (unless what does follow is just a full
- ! stop, and or comma)
-
- if (wn <= num_words) {
- i = NextWord(); wn--;
- if (i ~= AND1__WD or AND2__WD or AND3__WD or comma_word
- or THEN1__WD or THEN2__WD or THEN3__WD
- or BUT1__WD or BUT2__WD or BUT3__WD) {
- if (lookahead == ENDIT_TOKEN) rfalse;
- }
- }
- }
-
- ! Now look for a good choice, if there's more than one choice...
-
- number_of_classes = 0;
-
- if (number_matched == 1) {
- i = match_list-->0;
- if (indef_mode == 1 && indef_type & PLURAL_BIT ~= 0) {
- if (context == MULTI_TOKEN or MULTIHELD_TOKEN or
- MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN or
- NOUN_TOKEN or HELD_TOKEN or CREATURE_TOKEN) {
- BeginActivity(DECIDING_WHETHER_ALL_INC_ACT, i);
- if ((ForActivity(DECIDING_WHETHER_ALL_INC_ACT, i)) &&
- (RulebookFailed())) rfalse;
- EndActivity(DECIDING_WHETHER_ALL_INC_ACT, i);
- }
- }
- }
- if (number_matched > 1) {
- i = true;
- if (number_matched > 1)
- for (j=0 : jj, match_list-->(j+1)) == false)
- i = false;
- if (i) dont_infer = true;
- i = Adjudicate(context);
- if (i == -1) rfalse;
- if (i == 1) rtrue; ! Adjudicate has made a multiple
- ! object, and we pass it on
- }
-
- ! If i is non-zero here, one of two things is happening: either
- ! (a) an inference has been successfully made that object i is
- ! the intended one from the user's specification, or
- ! (b) the user finished typing some time ago, but we've decided
- ! on i because it's the only possible choice.
- ! In either case we have to keep the pattern up to date,
- ! note that an inference has been made and return.
- ! (Except, we don't note which of a pile of identical objects.)
-
- if (i ~= 0) {
- if (dont_infer) return i;
- if (inferfrom == 0) inferfrom=pcount;
- pattern-->pcount = i;
- return i;
- }
-
- if (dont_ask) return match_list-->0;
-
- ! If we get here, there was no obvious choice of object to make. If in
- ! fact we've already gone past the end of the player's typing (which
- ! means the match list must contain every object in scope, regardless
- ! of its name), then it's foolish to give an enormous list to choose
- ! from - instead we go and ask a more suitable question...
-
- if (match_from > num_words) jump Incomplete;
-
- ! Now we print up the question, using the equivalence classes as worked
- ! out by Adjudicate() so as not to repeat ourselves on plural objects...
-
- BeginActivity(ASKING_WHICH_DO_YOU_MEAN_ACT);
- if (ForActivity(ASKING_WHICH_DO_YOU_MEAN_ACT)) jump SkipWhichQuestion;
- j = 1; marker = 0;
- for (i=1 : i<=number_of_classes : i++) {
- while (((match_classes-->marker) ~= i) && ((match_classes-->marker) ~= -i))
- marker++;
- if (match_list-->marker hasnt animate) j = 0;
- }
- if (j) PARSER_CLARIF_INTERNAL_RM('A');
- else PARSER_CLARIF_INTERNAL_RM('B');
-
- j = number_of_classes; marker = 0;
- for (i=1 : i<=number_of_classes : i++) {
- while (((match_classes-->marker) ~= i) && ((match_classes-->marker) ~= -i)) marker++;
- k = match_list-->marker;
-
- if (match_classes-->marker > 0) print (the) k; else print (a) k;
-
- if (i < j-1) print ", ";
- if (i == j-1) {
- #Ifdef SERIAL_COMMA;
- if (j ~= 2) print ",";
- #Endif; ! SERIAL_COMMA
- PARSER_CLARIF_INTERNAL_RM('H');
- }
- }
- print "?^";
-
- .SkipWhichQuestion; EndActivity(ASKING_WHICH_DO_YOU_MEAN_ACT);
-
- ! ...and get an answer:
-
- .WhichOne;
- #Ifdef TARGET_ZCODE;
- for (i=2 : ii = ' ';
- #Endif; ! TARGET_ZCODE
- answer_words=Keyboard(buffer2, parse2);
-
- ! Conveniently, parse2-->1 is the first word in both ZCODE and GLULX.
- first_word = (parse2-->1);
-
- ! Take care of "all", because that does something too clever here to do
- ! later on:
-
- if (first_word == ALL1__WD or ALL2__WD or ALL3__WD or ALL4__WD or ALL5__WD) {
- if (context == MULTI_TOKEN or MULTIHELD_TOKEN or MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN) {
- l = multiple_object-->0;
- for (i=0 : ii;
- multiple_object-->(i+1+l) = k;
- }
- multiple_object-->0 = i+l;
- rtrue;
- }
- PARSER_CLARIF_INTERNAL_RM('C');
- jump WhichOne;
- }
-
- ! Look for a comma, and interpret this as a fresh conversation command
- ! if so:
-
- for (i=1 : i<=answer_words : i++)
- if (WordFrom(i, parse2) == comma_word) {
- VM_CopyBuffer(buffer, buffer2);
- jump RECONSTRUCT_INPUT;
- }
-
- ! If the first word of the reply can be interpreted as a verb, then
- ! assume that the player has ignored the question and given a new
- ! command altogether.
- ! (This is one time when it's convenient that the directions are
- ! not themselves verbs - thus, "north" as a reply to "Which, the north
- ! or south door" is not treated as a fresh command but as an answer.)
-
- #Ifdef LanguageIsVerb;
- if (first_word == 0) {
- j = wn; first_word = LanguageIsVerb(buffer2, parse2, 1); wn = j;
- }
- #Endif; ! LanguageIsVerb
- if (first_word ~= 0) {
- j = first_word->#dict_par1;
- if ((0 ~= j&1) && ~~LanguageVerbMayBeName(first_word)) {
- VM_CopyBuffer(buffer, buffer2);
- jump RECONSTRUCT_INPUT;
- }
- }
-
- ! Now we insert the answer into the original typed command, as
- ! words additionally describing the same object
- ! (eg, > take red button
- ! Which one, ...
- ! > music
- ! becomes "take music red button". The parser will thus have three
- ! words to work from next time, not two.)
-
- #Ifdef TARGET_ZCODE;
- k = WordAddress(match_from) - buffer; l=buffer2->1+1;
- for (j=buffer + buffer->0 - 1 : j>=buffer+k+l : j--) j->0 = 0->(j-l);
- for (i=0 : i(k+i) = buffer2->(2+i);
- buffer->(k+l-1) = ' ';
- buffer->1 = buffer->1 + l;
- if (buffer->1 >= (buffer->0 - 1)) buffer->1 = buffer->0;
- #Ifnot; ! TARGET_GLULX
- k = WordAddress(match_from) - buffer;
- l = (buffer2-->0) + 1;
- for (j=buffer+INPUT_BUFFER_LEN-1 : j>=buffer+k+l : j--) j->0 = j->(-l);
- for (i=0 : i(k+i) = buffer2->(WORDSIZE+i);
- buffer->(k+l-1) = ' ';
- buffer-->0 = buffer-->0 + l;
- if (buffer-->0 > (INPUT_BUFFER_LEN-WORDSIZE)) buffer-->0 = (INPUT_BUFFER_LEN-WORDSIZE);
- #Endif; ! TARGET_
-
- ! Having reconstructed the input, we warn the parser accordingly
- ! and get out.
-
- .RECONSTRUCT_INPUT;
-
- num_words = WordCount(); players_command = 100 + num_words;
- wn = 1;
- #Ifdef LanguageToInformese;
- LanguageToInformese();
- ! Re-tokenise:
- VM_Tokenise(buffer,parse);
- #Endif; ! LanguageToInformese
- num_words = WordCount(); players_command = 100 + num_words;
- actors_location = ScopeCeiling(player);
- FollowRulebook(Activity_after_rulebooks-->READING_A_COMMAND_ACT);
-
- return REPARSE_CODE;
-
- ! Now we come to the question asked when the input has run out
- ! and can't easily be guessed (eg, the player typed "take" and there
- ! were plenty of things which might have been meant).
-
- .Incomplete;
-
- if (context == CREATURE_TOKEN) PARSER_CLARIF_INTERNAL_RM('D', actor);
- else PARSER_CLARIF_INTERNAL_RM('E', actor);
- new_line;
-
- #Ifdef TARGET_ZCODE;
- for (i=2 : ii=' ';
- #Endif; ! TARGET_ZCODE
- answer_words = Keyboard(buffer2, parse2);
-
- ! Look for a comma, and interpret this as a fresh conversation command
- ! if so:
-
- for (i=1 : i<=answer_words : i++)
- if (WordFrom(i, parse2) == comma_word) {
- VM_CopyBuffer(buffer, buffer2);
- jump RECONSTRUCT_INPUT;
- }
-
- first_word=(parse2-->1);
- #Ifdef LanguageIsVerb;
- if (first_word==0) {
- j = wn; first_word=LanguageIsVerb(buffer2, parse2, 1); wn = j;
- }
- #Endif; ! LanguageIsVerb
-
- ! Once again, if the reply looks like a command, give it to the
- ! parser to get on with and forget about the question...
-
- if (first_word ~= 0) {
- j = first_word->#dict_par1;
- if ((0 ~= j&1) && ~~LanguageVerbMayBeName(first_word)) {
- VM_CopyBuffer(buffer, buffer2);
- jump RECONSTRUCT_INPUT;
- }
- }
-
- ! ...but if we have a genuine answer, then:
- !
- ! (1) we must glue in text suitable for anything that's been inferred.
-
- if (inferfrom ~= 0) {
- for (j=inferfrom : jj == PATTERN_NULL) continue;
- #Ifdef TARGET_ZCODE;
- i = 2+buffer->1; (buffer->1)++; buffer->(i++) = ' ';
- #Ifnot; ! TARGET_GLULX
- i = WORDSIZE + buffer-->0;
- (buffer-->0)++; buffer->(i++) = ' ';
- #Endif; ! TARGET_
-
- #Ifdef DEBUG;
- if (parser_trace >= 5)
- print "[Gluing in inference with pattern code ", pattern-->j, "]^";
- #Endif; ! DEBUG
-
- ! Conveniently, parse2-->1 is the first word in both ZCODE and GLULX.
-
- parse2-->1 = 0;
-
- ! An inferred object. Best we can do is glue in a pronoun.
- ! (This is imperfect, but it's very seldom needed anyway.)
-
- if (pattern-->j >= 2 && pattern-->j < REPARSE_CODE) {
- PronounNotice(pattern-->j);
- for (k=1 : k<=LanguagePronouns-->0 : k=k+3)
- if (pattern-->j == LanguagePronouns-->(k+2)) {
- parse2-->1 = LanguagePronouns-->k;
- #Ifdef DEBUG;
- if (parser_trace >= 5)
- print "[Using pronoun '", (address) parse2-->1, "']^";
- #Endif; ! DEBUG
- break;
- }
- }
- else {
- ! An inferred preposition.
- parse2-->1 = VM_NumberToDictionaryAddress(pattern-->j - REPARSE_CODE);
- #Ifdef DEBUG;
- if (parser_trace >= 5)
- print "[Using preposition '", (address) parse2-->1, "']^";
- #Endif; ! DEBUG
- }
-
- ! parse2-->1 now holds the dictionary address of the word to glue in.
-
- if (parse2-->1 ~= 0) {
- k = buffer + i;
- #Ifdef TARGET_ZCODE;
- @output_stream 3 k;
- print (address) parse2-->1;
- @output_stream -3;
- k = k-->0;
- for (l=i : ll = buffer->(l+2);
- i = i + k; buffer->1 = i-2;
- #Ifnot; ! TARGET_GLULX
- k = Glulx_PrintAnyToArray(buffer+i, INPUT_BUFFER_LEN-i, parse2-->1);
- i = i + k; buffer-->0 = i - WORDSIZE;
- #Endif; ! TARGET_
- }
- }
- }
-
- ! (2) we must glue the newly-typed text onto the end.
-
- #Ifdef TARGET_ZCODE;
- i = 2+buffer->1; (buffer->1)++; buffer->(i++) = ' ';
- for (j=0 : j1 : i++,j++) {
- buffer->i = buffer2->(j+2);
- (buffer->1)++;
- if (buffer->1 == INPUT_BUFFER_LEN) break;
- }
- #Ifnot; ! TARGET_GLULX
- i = WORDSIZE + buffer-->0;
- (buffer-->0)++; buffer->(i++) = ' ';
- for (j=0 : j0 : i++,j++) {
- buffer->i = buffer2->(j+WORDSIZE);
- (buffer-->0)++;
- if (buffer-->0 == INPUT_BUFFER_LEN) break;
- }
- #Endif; ! TARGET_
-
- ! (3) we fill up the buffer with spaces, which is unnecessary, but may
- ! help incorrectly-written interpreters to cope.
-
- #Ifdef TARGET_ZCODE;
- for (: ii = ' ';
- #Endif; ! TARGET_ZCODE
-
- jump RECONSTRUCT_INPUT;
-
-]; ! end of NounDomain
-
-[ PARSER_CLARIF_INTERNAL_R; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Adjudicate
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Adjudicate context i j k good_ones last n ultimate flag offset;
- #Ifdef DEBUG;
- if (parser_trace >= 4) {
- print " [Adjudicating match list of size ", number_matched,
- " in context ", context, "^";
- print " ";
- if (indef_mode) {
- print "indefinite type: ";
- if (indef_type & OTHER_BIT) print "other ";
- if (indef_type & MY_BIT) print "my ";
- if (indef_type & THAT_BIT) print "that ";
- if (indef_type & PLURAL_BIT) print "plural ";
- if (indef_type & LIT_BIT) print "lit ";
- if (indef_type & UNLIT_BIT) print "unlit ";
- if (indef_owner ~= 0) print "owner:", (name) indef_owner;
- new_line;
- print " number wanted: ";
- if (indef_wanted == INDEF_ALL_WANTED) print "all"; else print indef_wanted;
- new_line;
- print " most likely GNAs of names: ", indef_cases, "^";
- }
- else print "definite object^";
- }
- #Endif; ! DEBUG
-
- j = number_matched-1; good_ones = 0; last = match_list-->0;
- for (i=0 : i<=j : i++) {
- n = match_list-->i;
- match_scores-->i = good_ones;
- ultimate = ScopeCeiling(n);
-
- if (context==HELD_TOKEN && parent(n)==actor)
- { good_ones++; last=n; }
- if (context==MULTI_TOKEN && ultimate==ScopeCeiling(actor)
- && n~=actor && n hasnt concealed && n hasnt scenery)
- { good_ones++; last=n; }
- if (context==MULTIHELD_TOKEN && parent(n)==actor)
- { good_ones++; last=n; }
-
- if (context==MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN)
- { if (advance_warning==-1)
- { if (context==MULTIEXCEPT_TOKEN)
- { good_ones++; last=n;
- }
- if (context==MULTIINSIDE_TOKEN)
- { if (parent(n)~=actor) { good_ones++; last=n; }
- }
- }
- else
- { if (context==MULTIEXCEPT_TOKEN && n~=advance_warning)
- { good_ones++; last=n; }
- if (context==MULTIINSIDE_TOKEN && n in advance_warning)
- { good_ones++; last=n; }
- }
- }
- if (context==CREATURE_TOKEN && CreatureTest(n)==1)
- { good_ones++; last=n; }
-
- match_scores-->i = 1000*(good_ones - match_scores-->i);
- }
- if (good_ones == 1) {
- if (indef_mode == 1 && indef_type & PLURAL_BIT ~= 0 &&
- context == MULTI_TOKEN or MULTIHELD_TOKEN or
- MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN) {
- BeginActivity(DECIDING_WHETHER_ALL_INC_ACT, last);
- if ((ForActivity(DECIDING_WHETHER_ALL_INC_ACT, last)) &&
- (RulebookFailed())) good_ones = 0;
- EndActivity(DECIDING_WHETHER_ALL_INC_ACT, last);
- if (good_ones == 1) return last;
- } else {
- return last;
- }
- }
-
- ! If there is ambiguity about what was typed, but it definitely wasn't
- ! animate as required, then return anything; higher up in the parser
- ! a suitable error will be given. (This prevents a question being asked.)
-
- if (context == CREATURE_TOKEN && good_ones == 0) return match_list-->0;
-
- if (indef_mode == 0) indef_type=0;
-
- ScoreMatchL(context);
- if (number_matched == 0) return -1;
-
- if (indef_mode == 0) {
- ! Is there now a single highest-scoring object?
- i = SingleBestGuess();
- if (i >= 0) {
-
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Single best-scoring object returned.]^";
- #Endif; ! DEBUG
- return i;
- }
- }
-
- if (indef_mode == 1 && indef_type & PLURAL_BIT ~= 0) {
- if (context ~= MULTI_TOKEN or MULTIHELD_TOKEN or MULTIEXCEPT_TOKEN
- or MULTIINSIDE_TOKEN) {
- etype = MULTI_PE;
- return -1;
- }
- i = 0; offset = multiple_object-->0;
- for (j=BestGuess(): j~=-1 && i(i+offset) = j;
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Accepting it^";
- #Endif; ! DEBUG
- }
- else {
- i = i;
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Rejecting it^";
- #Endif; ! DEBUG
- }
- }
- if (i < indef_wanted && indef_wanted < INDEF_ALL_WANTED) {
- etype = TOOFEW_PE; multi_wanted = indef_wanted;
- if (parser_trace >= 4) print "Too few found^";
- multi_had=i;
- return -1;
- }
- multiple_object-->0 = i+offset;
- multi_context = context;
- #Ifdef DEBUG;
- if (parser_trace >= 4)
- print " Made multiple object of size ", i, "]^";
- #Endif; ! DEBUG
- return 1;
- }
-
- for (i=0 : ii = 0;
-
- n = 1;
- for (i=0 : ii == 0) {
- match_classes-->i = n++; flag = 0;
- for (j=i+1 : jj == 0 && Identical(match_list-->i, match_list-->j) == 1) {
- flag=1;
- match_classes-->j = match_classes-->i;
- }
- if (flag == 1) match_classes-->i = 1-n;
- }
- n--; number_of_classes = n;
-
- #Ifdef DEBUG;
- if (parser_trace >= 4) {
- print " Grouped into ", n, " possibilities by name:^";
- for (i=0 : ii > 0)
- print " ", (The) match_list-->i, " (", match_list-->i, ") --- group ",
- match_classes-->i, "^";
- }
- #Endif; ! DEBUG
-
- if (indef_mode == 0) {
- if (n > 1) {
- k = -1;
- for (i=0 : ii > k) {
- k = match_scores-->i;
- j = match_classes-->i; j = j*j;
- flag = 0;
- }
- else
- if (match_scores-->i == k) {
- if ((match_classes-->i) * (match_classes-->i) ~= j)
- flag = 1;
- }
- }
-
- if (flag) {
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Unable to choose best group, so ask player.]^";
- #Endif; ! DEBUG
- return 0;
- }
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Best choices are all from the same group.^";
- #Endif; ! DEBUG
- }
- }
-
- ! When the player is really vague, or there's a single collection of
- ! indistinguishable objects to choose from, choose the one the player
- ! most recently acquired, or if the player has none of them, then
- ! the one most recently put where it is.
-
- if (n == 1) dont_infer = true;
- return BestGuess();
-
-]; ! Adjudicate
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: ReviseMulti
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ReviseMulti second_p i low;
- #Ifdef DEBUG;
- if (parser_trace >= 4)
- print " Revising multiple object list of size ", multiple_object-->0,
- " with 2nd ", (name) second_p, "^";
- #Endif; ! DEBUG
-
- if (multi_context == MULTIEXCEPT_TOKEN or MULTIINSIDE_TOKEN) {
- for (i=1,low=0 : i<=multiple_object-->0 : i++) {
- if ( (multi_context==MULTIEXCEPT_TOKEN && multiple_object-->i ~= second_p) ||
- (multi_context==MULTIINSIDE_TOKEN && multiple_object-->i in second_p)) {
- low++;
- multiple_object-->low = multiple_object-->i;
- }
- }
- multiple_object-->0 = low;
- }
-
- if (multi_context == MULTI_TOKEN && action_to_be == ##Take) {
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Token 2 plural case: number with actor ", low, "^";
- #Endif; ! DEBUG
- if (take_all_rule == 2) {
- for (i=1,low=0 : i<=multiple_object-->0 : i++) {
- if (ScopeCeiling(multiple_object-->i) == ScopeCeiling(actor)) {
- low++;
- multiple_object-->low = multiple_object-->i;
- }
- }
- multiple_object-->0 = low;
- }
- }
-
- i = multiple_object-->0;
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Done: new size ", i, "^";
- #Endif; ! DEBUG
- if (i == 0) return NOTHING_PE;
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Match List
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MakeMatch obj quality i;
- #Ifdef DEBUG;
- if (parser_trace >= 6) print " Match with quality ",quality,"^";
- #Endif; ! DEBUG
- if (token_filter ~= 0 && ConsultNounFilterToken(obj) == 0) {
- #Ifdef DEBUG;
- if (parser_trace >= 6) print " Match filtered out: token filter ", token_filter, "^";
- #Endif; ! DEBUG
- rtrue;
- }
- if (quality < match_length) rtrue;
- if (quality > match_length) { match_length = quality; number_matched = 0; }
- else {
- if (number_matched >= MATCH_LIST_WORDS) rtrue;
- for (i=0 : ii == obj) rtrue;
- }
- match_list-->number_matched++ = obj;
- #Ifdef DEBUG;
- if (parser_trace >= 6) print " Match added to list^";
- #Endif; ! DEBUG
-];
-
-[ ConsultNounFilterToken obj sn rv;
- if (token_filter ofclass Routine) {
- sn = noun;
- noun = obj;
- rv = indirect(token_filter);
- noun = sn;
- return rv;
- }
- if (obj has (token_filter-1)) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: ScoreMatchL
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant SCORE__CHOOSEOBJ = 1000;
-Constant SCORE__IFGOOD = 500;
-Constant SCORE__UNCONCEALED = 100;
-Constant SCORE__BESTLOC = 60;
-Constant SCORE__NEXTBESTLOC = 40;
-Constant SCORE__NOTCOMPASS = 20;
-Constant SCORE__NOTSCENERY = 10;
-Constant SCORE__NOTACTOR = 5;
-Constant SCORE__GNA = 1;
-Constant SCORE__DIVISOR = 20;
-
-Constant PREFER_HELD;
-[ ScoreMatchL context its_owner its_score obj i j threshold met a_s l_s;
-! if (indef_type & OTHER_BIT ~= 0) threshold++;
- if (indef_type & MY_BIT ~= 0) threshold++;
- if (indef_type & THAT_BIT ~= 0) threshold++;
- if (indef_type & LIT_BIT ~= 0) threshold++;
- if (indef_type & UNLIT_BIT ~= 0) threshold++;
- if (indef_owner ~= nothing) threshold++;
-
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " Scoring match list: indef mode ", indef_mode, " type ",
- indef_type, ", satisfying ", threshold, " requirements:^";
- #Endif; ! DEBUG
-
- #ifdef PREFER_HELD;
- a_s = SCORE__BESTLOC; l_s = SCORE__NEXTBESTLOC;
- if (action_to_be == ##Take or ##Remove) {
- a_s = SCORE__NEXTBESTLOC; l_s = SCORE__BESTLOC;
- }
- context = context; ! silence warning
- #ifnot;
- a_s = SCORE__NEXTBESTLOC; l_s = SCORE__BESTLOC;
- if (context == HELD_TOKEN or MULTIHELD_TOKEN or MULTIEXCEPT_TOKEN) {
- a_s = SCORE__BESTLOC; l_s = SCORE__NEXTBESTLOC;
- }
- #endif; ! PREFER_HELD
-
- for (i=0 : ii; its_owner = parent(obj); its_score=0; met=0;
-
- ! if (indef_type & OTHER_BIT ~= 0
- ! && obj ~= itobj or himobj or herobj) met++;
- if (indef_type & MY_BIT ~= 0 && its_owner == actor) met++;
- if (indef_type & THAT_BIT ~= 0 && its_owner == actors_location) met++;
- if (indef_type & LIT_BIT ~= 0 && obj has light) met++;
- if (indef_type & UNLIT_BIT ~= 0 && obj hasnt light) met++;
- if (indef_owner ~= 0 && its_owner == indef_owner) met++;
-
- if (met < threshold) {
- #Ifdef DEBUG;
- if (parser_trace >= 4)
- print " ", (The) match_list-->i, " (", match_list-->i, ") in ",
- (the) its_owner, " is rejected (doesn't match descriptors)^";
- #Endif; ! DEBUG
- match_list-->i = -1;
- }
- else {
- its_score = 0;
- if (obj hasnt concealed) its_score = SCORE__UNCONCEALED;
-
- if (its_owner == actor) its_score = its_score + a_s;
- else
- if (its_owner == actors_location) its_score = its_score + l_s;
- else
- if (its_owner ~= compass) its_score = its_score + SCORE__NOTCOMPASS;
-
- its_score = its_score + SCORE__CHOOSEOBJ * ChooseObjects(obj, 2);
-
- if (obj hasnt scenery) its_score = its_score + SCORE__NOTSCENERY;
- if (obj ~= actor) its_score = its_score + SCORE__NOTACTOR;
-
- ! A small bonus for having the correct GNA,
- ! for sorting out ambiguous articles and the like.
-
- if (indef_cases & (PowersOfTwo_TB-->(GetGNAOfObject(obj))))
- its_score = its_score + SCORE__GNA;
-
- match_scores-->i = match_scores-->i + its_score;
- #Ifdef DEBUG;
- if (parser_trace >= 4) print " ", (The) match_list-->i, " (", match_list-->i,
- ") in ", (the) its_owner, " : ", match_scores-->i, " points^";
- #Endif; ! DEBUG
- }
- }
-
- for (i=0 : ii == -1) {
- if (i == number_matched-1) { number_matched--; break; }
- for (j=i : jj = match_list-->(j+1);
- match_scores-->j = match_scores-->(j+1);
- }
- number_matched--;
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: BestGuess
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BestGuess earliest its_score best i;
- earliest = 0; best = -1;
- for (i=0 : ii >= 0) {
- its_score = match_scores-->i;
- if (its_score > best) { best = its_score; earliest = i; }
- }
- }
- #Ifdef DEBUG;
- if (parser_trace >= 4)
- if (best < 0) print " Best guess ran out of choices^";
- else print " Best guess ", (the) match_list-->earliest,
- " (", match_list-->earliest, ")^";
- #Endif; ! DEBUG
- if (best < 0) return -1;
- i = match_list-->earliest;
- match_list-->earliest = -1;
- return i;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: SingleBestGuess
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SingleBestGuess earliest its_score best i;
- earliest = -1; best = -1000;
- for (i=0 : ii;
- if (its_score == best) earliest = -1;
- if (its_score > best) { best = its_score; earliest = match_list-->i; }
- }
- return earliest;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Identical
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Identical o1 o2 p1 p2 n1 n2 i j flag;
- if (o1 == o2) rtrue; ! This should never happen, but to be on the safe side
- if (o1 == 0 || o2 == 0) rfalse; ! Similarly
- if (o1 ofclass K3_direction || o2 ofclass K3_direction) rfalse; ! Saves time
-
- ! What complicates things is that o1 or o2 might have a parsing routine,
- ! so the parser can't know from here whether they are or aren't the same.
- ! If they have different parsing routines, we simply assume they're
- ! different. If they have the same routine (which they probably got from
- ! a class definition) then the decision process is as follows:
- !
- ! the routine is called (with self being o1, not that it matters)
- ! with noun and second being set to o1 and o2, and action being set
- ! to the fake action TheSame. If it returns -1, they are found
- ! identical; if -2, different; and if >=0, then the usual method
- ! is used instead.
-
- if (o1.parse_name ~= 0 || o2.parse_name ~= 0) {
- if (o1.parse_name ~= o2.parse_name) rfalse;
- parser_action = ##TheSame; parser_one = o1; parser_two = o2;
- j = wn; i = RunRoutines(o1,parse_name); wn = j;
- if (i == -1) rtrue;
- if (i == -2) rfalse;
- }
-
- ! This is the default algorithm: do they have the same words in their
- ! "name" (i.e. property no. 1) properties. (Note that the following allows
- ! for repeated words and words in different orders.)
-
- p1 = o1.&1; n1 = (o1.#1)/WORDSIZE;
- p2 = o2.&1; n2 = (o2.#1)/WORDSIZE;
-
- ! for (i=0 : ii, " "; } new_line;
- ! for (i=0 : ii, " "; } new_line;
-
- for (i=0 : ii == p2-->j) flag = 1;
- if (flag == 0) rfalse;
- }
-
- for (j=0 : ji == p2-->j) flag = 1;
- if (flag == 0) rfalse;
- }
-
- ! print "Which are identical!^";
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Print Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintInferredCommand from singleton_noun;
- singleton_noun = FALSE;
- if ((from ~= 0) && (from == pcount-1) &&
- (pattern-->from > 1) && (pattern-->from < REPARSE_CODE))
- singleton_noun = TRUE;
-
- if (singleton_noun) {
- BeginActivity(CLARIFYING_PARSERS_CHOICE_ACT, pattern-->from);
- if (ForActivity(CLARIFYING_PARSERS_CHOICE_ACT, pattern-->from) == 0) {
- print "("; PrintCommand(from); print ")^";
- }
- EndActivity(CLARIFYING_PARSERS_CHOICE_ACT, pattern-->from);
- } else {
- print "("; PrintCommand(from); print ")^";
- }
-];
-
-[ PrintCommand from i k spacing_flag;
- if (from == 0) {
- i = verb_word;
- if (LanguageVerb(i) == 0)
- if (PrintVerb(i) == 0) print (address) i;
- from++; spacing_flag = true;
- }
- for (k=from : kk;
- if (i == PATTERN_NULL) continue;
- if (spacing_flag) print (char) ' ';
- if (i == 0) { PARSER_CLARIF_INTERNAL_RM('F'); jump TokenPrinted; }
- if (i == 1) { PARSER_CLARIF_INTERNAL_RM('G'); jump TokenPrinted; }
- if (i >= REPARSE_CODE)
- print (address) VM_NumberToDictionaryAddress(i-REPARSE_CODE);
- else
- if (i ofclass K3_direction)
- print (LanguageDirection) i; ! the direction name as adverb
- else
- print (the) i;
- .TokenPrinted;
- spacing_flag = true;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: CantSee
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CantSee i w e;
- saved_oops=oops_from;
-
- if (scope_token ~= 0) {
- scope_error = scope_token; return ASKSCOPE_PE;
- }
-
- wn--; w = NextWord();
- e = CANTSEE_PE;
- if (w == pronoun_word) {
- w = NextWordStopped(); wn--;
- if ((w == -1) || (line_token-->(pcount) ~= ENDIT_TOKEN)) {
- if (pcount > 0) AnalyseToken(line_token-->(pcount-1));
- if ((pcount > 0) && (found_ttype == ROUTINE_FILTER_TT or ATTR_FILTER_TT))
- e = NOTINCONTEXT_PE;
- else {
- pronoun__word = pronoun_word; pronoun__obj = pronoun_obj;
- e = ITGONE_PE;
- }
- }
- }
-
- if (etype > e) return etype;
- return e;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Multiple Object List
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MultiAdd o i j;
- i = multiple_object-->0;
- if (i == MATCH_LIST_WORDS-1) { toomany_flag = 1; rtrue; }
- for (j=1 : j<=i : j++)
- if (o == multiple_object-->j) rtrue;
- i++;
- multiple_object-->i = o;
- multiple_object-->0 = i;
-];
-
-[ MultiSub o i j k;
- i = multiple_object-->0;
- for (j=1 : j<=i : j++)
- if (o == multiple_object-->j) {
- for (k=j : k<=i : k++) multiple_object-->k = multiple_object-->(k+1);
- multiple_object-->0 = --i;
- return 0;
- }
- return VAGUE_PE;
-];
-
-[ MultiFilter attr i j o;
- .MFiltl;
- i = multiple_object-->0;
- for (j=1 : j<=i : j++) {
- o = multiple_object-->j;
- if (o hasnt attr) { MultiSub(o); jump Mfiltl; }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Scope
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PlaceInScope O opts ws; ! If opts is set, do not place contents in scope
- ws = wn; wn = match_from;
- if (opts == false) DoScopeActionAndRecurse(O);
- else DoScopeAction(O);
- wn = ws; return;
-];
-
-[ AddToScope obj;
- if (ats_flag >= 2) DoScopeActionAndRecurse(obj, 0, ats_flag-2);
- if (ats_flag == 1) { if (HasLightSource(obj)==1) ats_hls = 1; }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Scope Level 0
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestScope obj act a al sr x y;
- x = parser_one; y = parser_two;
- parser_one = obj; parser_two = 0; a = actor; al = actors_location;
- sr = scope_reason; scope_reason = TESTSCOPE_REASON;
- if (act == 0) actor = player; else actor = act;
- actors_location = ScopeCeiling(actor);
- SearchScope(actors_location, actor, 0); scope_reason = sr; actor = a;
- actors_location = al; parser_one = x; x = parser_two; parser_two = y;
- return x;
-];
-
-[ LoopOverScope routine act x y a al;
- x = parser_one; y = scope_reason; a = actor; al = actors_location;
- parser_one = routine;
- if (act == 0) actor = player; else actor = act;
- actors_location = ScopeCeiling(actor);
- scope_reason = LOOPOVERSCOPE_REASON;
- SearchScope(actors_location, actor, 0);
- parser_one = x; scope_reason = y; actor = a; actors_location = al;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: SearchScope
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SearchScope domain1 domain2 context i;
- if (domain1 == 0) return;
- ! (a)
- if (scope_token) {
- scope_stage = 2;
- #Ifdef DEBUG;
- if (parser_trace >= 3) print " [Scope routine called at stage 2]^";
- #Endif;
- if (indirect(scope_token) ~= 0) rtrue;
- }
- ! (b)
- BeginActivity(DECIDING_SCOPE_ACT, actor);
- if (ForActivity(DECIDING_SCOPE_ACT, actor) == false) {
- ! (c.1)
- if ((scope_reason == PARSING_REASON) && (context == MULTIINSIDE_TOKEN) &&
- (advance_warning ~= -1)) {
- if (IsSeeThrough(advance_warning) == 1)
- ScopeWithin(advance_warning, 0, context);
- } else {
- ! (c.2)
- if ((scope_reason == PARSING_REASON) && (context ~= CREATURE_TOKEN) &&
- (indef_mode == 0) && (domain1 == actors_location))
- ScopeWithin(compass);
- ! (c.3)
- if (domain1 has supporter or container) DoScopeAction(domain1);
- ScopeWithin(domain1, domain2, context);
- ! (c.4)
- if (domain2) {
- if (domain2 has supporter or container) DoScopeAction(domain2);
- ScopeWithin(domain2, 0, context);
- }
- }
- ! (c.5)
- if (thedark == domain1 or domain2) {
- DoScopeActionAndRecurse(actor, actor, context);
- if (parent(actor) has supporter or container)
- DoScopeActionAndRecurse(parent(actor), parent(actor), context);
- }
- }
- EndActivity(DECIDING_SCOPE_ACT, actor);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: ScopeWithin
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ScopeWithin domain nosearch context obj next_obj;
- if (domain == 0) rtrue;
-
- ! Look through the objects in the domain, avoiding "objectloop" in case
- ! movements occur.
- obj = child(domain);
- while (obj) {
- next_obj = sibling(obj);
- if ((domain == actor) || (TestConcealment(domain, obj) == false))
- DoScopeActionAndRecurse(obj, nosearch, context);
- obj = next_obj;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: DoScopeActionAndRecurse
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DoScopeActionAndRecurse domain nosearch context i ad n obj next_obj;
- DoScopeAction(domain);
-
- ! (a)
- if ((domain ~= nosearch) &&
- ((domain ofclass K1_room or K8_person) || (IsSeeThrough(domain) == 1))) {
- obj = child(domain);
- while (obj) {
- next_obj = sibling(obj);
- if ((domain == actor) || (TestConcealment(domain, obj) == false))
- DoScopeActionAndRecurse(obj, nosearch, context);
- obj = next_obj;
- }
- }
-
- ! (b)
- if (domain provides component_child) {
- obj = domain.component_child;
- while (obj) {
- next_obj = obj.component_sibling;
- if ((domain == actor) || (TestConcealment(domain, obj) == false))
- DoScopeActionAndRecurse(obj, 0, context);
- obj = next_obj;
- }
- }
-
- ! (c)
- ad = domain.&add_to_scope;
- if (ad ~= 0) {
- ! Test if the property value is not an object.
- #Ifdef TARGET_ZCODE;
- i = (UnsignedCompare(ad-->0, top_object) > 0);
- #Ifnot; ! TARGET_GLULX
- i = (((ad-->0)->0) ~= $70);
- #Endif; ! TARGET_
-
- if (i) {
- ats_flag = 2+context;
- RunRoutines(domain, add_to_scope);
- ats_flag = 0;
- }
- else {
- n = domain.#add_to_scope;
- for (i=0 : (WORDSIZE*i)i)
- DoScopeActionAndRecurse(ad-->i, 0, context);
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: DoScopeAction
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DoScopeAction item;
-
- #Ifdef DEBUG;
- if (parser_trace >= 6)
- print "[DSA on ", (the) item, " with reason = ", scope_reason,
- " p1 = ", parser_one, " p2 = ", parser_two, "]^";
- #Endif; ! DEBUG
-
- @push parser_one; @push scope_reason;
-
- switch(scope_reason) {
- TESTSCOPE_REASON: if (item == parser_one) parser_two = 1;
- LOOPOVERSCOPE_REASON: if (parser_one ofclass Routine) indirect(parser_one, item);
- PARSING_REASON, TALKING_REASON: MatchTextAgainstObject(item);
- }
-
- @pull scope_reason; @pull parser_one;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Parsing Object Names
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MatchTextAgainstObject item i;
- if (token_filter ~= 0 && ConsultNounFilterToken(item) == 0) return;
-
- if (match_from <= num_words) { ! If there's any text to match, that is
- wn = match_from;
- i = NounWord();
- if ((i == 1) && (player == item)) MakeMatch(item, 1); ! "me"
- if ((i >= 2) && (i < 128) && (LanguagePronouns-->i == item)) MakeMatch(item, 1);
- }
-
- ! Construing the current word as the start of a noun, can it refer to the
- ! object?
-
- wn = match_from;
- if (TryGivenObject(item) > 0)
- if (indef_nspec_at > 0 && match_from ~= indef_nspec_at) {
- ! This case arises if the player has typed a number in
- ! which is hypothetically an indefinite descriptor:
- ! e.g. "take two clubs". We have just checked the object
- ! against the word "clubs", in the hope of eventually finding
- ! two such objects. But we also backtrack and check it
- ! against the words "two clubs", in case it turns out to
- ! be the 2 of Clubs from a pack of cards, say. If it does
- ! match against "two clubs", we tear up our original
- ! assumption about the meaning of "two" and lapse back into
- ! definite mode.
-
- wn = indef_nspec_at;
- if (TryGivenObject(item) > 0) {
- match_from = indef_nspec_at;
- ResetDescriptors();
- }
- wn = match_from;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: TryGivenObject
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TryGivenObject obj nomatch threshold k w j;
- #Ifdef DEBUG;
- if (parser_trace >= 5) print " Trying ", (the) obj, " (", obj, ") at word ", wn, "^";
- #Endif; ! DEBUG
-
- if (nomatch && obj == 0) return 0;
-
-! if (nomatch) print "*** TryGivenObject *** on ", (the) obj, " at wn = ", wn, "^";
-
- dict_flags_of_noun = 0;
-
-! If input has run out then always match, with only quality 0 (this saves
-! time).
-
- if (wn > num_words) {
- if (nomatch) return 0;
- if (indef_mode ~= 0)
- dict_flags_of_noun = $$01110000; ! Reject "plural" bit
- MakeMatch(obj,0);
- #Ifdef DEBUG;
- if (parser_trace >= 5) print " Matched (0)^";
- #Endif; ! DEBUG
- return 1;
- }
-
-! Ask the object to parse itself if necessary, sitting up and taking notice
-! if it says the plural was used:
-
- if (obj.parse_name~=0) {
- parser_action = NULL; j=wn;
- k = RunRoutines(obj,parse_name);
- if (k > 0) {
- wn=j+k;
-
- .MMbyPN;
-
- if (parser_action == ##PluralFound)
- dict_flags_of_noun = dict_flags_of_noun | 4;
-
- if (dict_flags_of_noun & 4) {
- if (~~allow_plurals) k = 0;
- else {
- if (indef_mode == 0) {
- indef_mode = 1; indef_type = 0; indef_wanted = 0;
- }
- indef_type = indef_type | PLURAL_BIT;
- if (indef_wanted == 0) indef_wanted = INDEF_ALL_WANTED;
- }
- }
-
- #Ifdef DEBUG;
- if (parser_trace >= 5) print " Matched (", k, ")^";
- #Endif; ! DEBUG
- if (nomatch == false) MakeMatch(obj,k);
- return k;
- }
- if (k == 0) jump NoWordsMatch;
- }
-
- ! The default algorithm is simply to count up how many words pass the
- ! Refers test:
-
- parser_action = NULL;
-
- w = NounWord();
-
- if (w == 1 && player == obj) { k=1; jump MMbyPN; }
-
- if (w >= 2 && w < 128 && (LanguagePronouns-->w == obj)) { k = 1; jump MMbyPN; }
-
- if (Refers(obj, wn-1) == 0) {
- .NoWordsMatch;
- if (indef_mode ~= 0) { k = 0; parser_action = NULL; jump MMbyPN; }
- rfalse;
- }
-
- threshold = 1;
- dict_flags_of_noun = (w->#dict_par1) & $$01110100;
- w = NextWord();
- while (Refers(obj, wn-1)) {
- threshold++;
- if (w)
- dict_flags_of_noun = dict_flags_of_noun | ((w->#dict_par1) & $$01110100);
- w = NextWord();
- }
-
- k = threshold;
- jump MMbyPN;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Refers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Refers obj wnum wd k l m;
- if (obj == 0) rfalse;
-
- #Ifdef LanguageRefers;
- k = LanguageRefers(obj,wnum); if (k >= 0) return k;
- #Endif; ! LanguageRefers
-
- k = wn; wn = wnum; wd = NextWordStopped(); wn = k;
-
- if (parser_inflection >= 256) {
- k = indirect(parser_inflection, obj, wd);
- if (k >= 0) return k;
- m = -k;
- }
- else
- m = parser_inflection;
- k = obj.&m; l = (obj.#m)/WORDSIZE-1;
- for (m=0 : m<=l : m++)
- if (wd == k-->m) rtrue;
- rfalse;
-];
-
-[ WordInProperty wd obj prop k l m;
- k = obj.∝ l = (obj.#prop)/WORDSIZE-1;
- for (m=0 : m<=l : m++)
- if (wd == k-->m) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: NounWord
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NounWord i j s;
- i = NextWord();
- if (i == 0) rfalse;
- if (i == ME1__WD or ME2__WD or ME3__WD) return 1;
- s = LanguagePronouns-->0;
- for (j=1 : j<=s : j=j+3)
- if (i == LanguagePronouns-->j)
- return j+2;
- if ((i->#dict_par1)&128 == 0) rfalse;
- return i;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: TryNumber
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TryNumber wordnum i j c num len mul tot d digit;
- i = wn; wn = wordnum; j = NextWord(); wn = i;
- j = NumberWord(j); ! Test for verbal forms ONE to THIRTY
- if (j >= 1) return j;
-
- #Ifdef TARGET_ZCODE;
- i = wordnum*4+1; j = parse->i; num = j+buffer; len = parse->(i-1);
- #Ifnot; ! TARGET_GLULX
- i = wordnum*3; j = parse-->i; num = j+buffer; len = parse-->(i-1);
- #Endif; ! TARGET_
-
- if (len >= 4) mul=1000;
- if (len == 3) mul=100;
- if (len == 2) mul=10;
- if (len == 1) mul=1;
-
- tot = 0; c = 0; len = len-1;
-
- for (c=0 : c<=len : c++) {
- digit=num->c;
- if (digit == '0') { d = 0; jump digok; }
- if (digit == '1') { d = 1; jump digok; }
- if (digit == '2') { d = 2; jump digok; }
- if (digit == '3') { d = 3; jump digok; }
- if (digit == '4') { d = 4; jump digok; }
- if (digit == '5') { d = 5; jump digok; }
- if (digit == '6') { d = 6; jump digok; }
- if (digit == '7') { d = 7; jump digok; }
- if (digit == '8') { d = 8; jump digok; }
- if (digit == '9') { d = 9; jump digok; }
- return -1000;
- .digok;
- tot = tot+mul*d; mul = mul/10;
- }
- if (len > 3) tot=10000;
- return tot;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Gender
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GetGender person;
- if (person hasnt female) rtrue;
- rfalse;
-];
-
-[ GetGNAOfObject obj case gender;
- if (obj hasnt animate) case = 6;
- if (obj has male) gender = male;
- if (obj has female) gender = female;
- if (obj has neuter) gender = neuter;
- if (gender == 0) {
- if (case == 0) gender = LanguageAnimateGender;
- else gender = LanguageInanimateGender;
- }
- if (gender == female) case = case + 1;
- if (gender == neuter) case = case + 2;
- if (obj has pluralname) case = case + 3;
- return case;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Noticing Plurals
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DetectPluralWord at n i w swn outcome;
- swn = wn; wn = at;
- for (i=0:i#dict_par1) & $$00000100) {
- parser_action = ##PluralFound;
- outcome = true;
- }
- }
- wn = swn;
- return outcome;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Pronoun Handling
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SetPronoun dword value x;
- for (x=1 : x<=LanguagePronouns-->0 : x=x+3)
- if (LanguagePronouns-->x == dword) {
- LanguagePronouns-->(x+2) = value; return;
- }
- RunTimeError(14);
-];
-
-[ PronounValue dword x;
- for (x=1 : x<=LanguagePronouns-->0 : x=x+3)
- if (LanguagePronouns-->x == dword)
- return LanguagePronouns-->(x+2);
- return 0;
-];
-
-[ ResetVagueWords obj; PronounNotice(obj); ];
-
-[ PronounNotice obj x bm g;
- if (obj == player) return;
-
- g = (GetGNAOfObject(obj));
-
- bm = PowersOfTwo_TB-->g;
- for (x=1 : x<=LanguagePronouns-->0 : x=x+3)
- if (bm & (LanguagePronouns-->(x+1)) ~= 0)
- LanguagePronouns-->(x+2) = obj;
-
- if (((g % 6) < 3) && (obj has ambigpluralname)) {
- g = g + 3;
- bm = PowersOfTwo_TB-->g;
- for (x=1 : x<=LanguagePronouns-->0 : x=x+3)
- if (bm & (LanguagePronouns-->(x+1)) ~= 0)
- LanguagePronouns-->(x+2) = obj;
- }
-];
-
-[ PronounNoticeHeldObjects x;
-#IFNDEF MANUAL_PRONOUNS;
- objectloop(x in player) PronounNotice(x);
-#ENDIF;
- x = 0; ! To prevent a "not used" error
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Yes/No Questions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ YesOrNo i j;
- for (::) {
- #Ifdef TARGET_ZCODE;
- if (location == nothing || parent(player) == nothing) read buffer2 parse2;
- else read buffer2 parse2 DrawStatusLine;
- j = parse2->1;
- #Ifnot; ! TARGET_GLULX;
- if (location ~= nothing && parent(player) ~= nothing) DrawStatusLine();
- KeyboardPrimitive(buffer2, parse2);
- j = parse2-->0;
- #Endif; ! TARGET_
- if (j) { ! at least one word entered
- i = parse2-->1;
- if (i == YES1__WD or YES2__WD or YES3__WD) rtrue;
- if (i == NO1__WD or NO2__WD or NO3__WD) rfalse;
- }
- YES_OR_NO_QUESTION_INTERNAL_RM('A'); print "> ";
- }
-];
-
-[ YES_OR_NO_QUESTION_INTERNAL_R; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Number Words
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NumberWord o i n;
- n = LanguageNumbers-->0;
- for (i=1 : i<=n : i=i+2)
- if (o == LanguageNumbers-->i) return LanguageNumbers-->(i+1);
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Choose Objects
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-!Constant COBJ_DEBUG;
-
-! the highest value returned by CheckDPMR (see the Standard Rules)
-Constant HIGHEST_DPMR_SCORE = 4;
-
-Array alt_match_list --> (MATCH_LIST_WORDS+1);
-
-#ifdef TARGET_GLULX;
-[ COBJ__Copy words from to i;
- for (i=0: ii = from-->i;
-];
-#ifnot;
-[ COBJ__Copy words from to bytes;
- bytes = words * 2;
- @copy_table from to bytes;
-];
-#endif;
-
-! swap alt_match_list with match_list/number_matched
-[ COBJ__SwapMatches i x;
- ! swap the counts
- x = number_matched;
- number_matched = alt_match_list-->0;
- alt_match_list-->0 = x;
- ! swap the values
- if (x < number_matched) x = number_matched;
- for (i=x: i>0: i--) {
- x = match_list-->(i-1);
- match_list-->(i-1) = alt_match_list-->i;
- alt_match_list-->i = x;
- }
-];
-
-[ ChooseObjects obj code l i swn spcount;
- if (code<2) rfalse;
-
- if (cobj_flag == 1) {
- .CodeOne;
- if (parameters > 0) {
- #ifdef COBJ_DEBUG;
- print "[scoring ", (the) obj, " (second)]^";
- #endif;
- return ScoreDabCombo(parser_results-->INP1_PRES, obj);
- } else {
- #ifdef COBJ_DEBUG;
- print "[scoring ", (the) obj, " (first) in ",
- alt_match_list-->0, " combinations]^";
- #endif;
- l = 0;
- for (i=1: i<=alt_match_list-->0: i++) {
- spcount = ScoreDabCombo(obj, alt_match_list-->i);
- if (spcount == HIGHEST_DPMR_SCORE) {
- #ifdef COBJ_DEBUG;
- print "[scored ", spcount, " - best possible]^";
- #endif;
- return spcount;
- }
- if (spcount>l) l = spcount;
- }
- return l;
- }
- }
- if (cobj_flag == 2) {
- .CodeTwo;
- #ifdef COBJ_DEBUG;
- print "[scoring ", (the) obj, " (simple); parameters = ", parameters,
- " aw = ", advance_warning, "]^";
- #endif;
- @push action_to_be;
- if (parameters==0) {
- if (advance_warning > 0)
- l = ScoreDabCombo(obj, advance_warning);
- else
- l = ScoreDabCombo(obj, 0);
- } else {
- l = ScoreDabCombo(parser_results-->INP1_PRES, obj);
- }
- @pull action_to_be;
- return l;
- }
-
- #ifdef COBJ_DEBUG;
- print "[choosing a cobj strategy: ";
- #endif;
- swn = wn;
- spcount = pcount;
- while (line_ttype-->pcount == PREPOSITION_TT) pcount++;
- if (line_ttype-->pcount == ELEMENTARY_TT) {
- if (line_tdata-->pcount == TOPIC_TOKEN) {
- pcount = spcount;
- jump CodeTwo;
- }
- while (wn <= num_words) {
- l = NextWordStopped(); wn--;
- if (l == THEN1__WD) break;
- if ( (l ~= -1 or 0) && (l->#dict_par1) &8 ) { wn++; continue; } ! if preposition
- if (l == ALL1__WD or ALL2__WD or ALL3__WD or ALL4__WD or ALL5__WD) { wn++; continue; }
- SafeSkipDescriptors();
- ! save the current match state
- @push match_length; @push token_filter; @push match_from;
- alt_match_list-->0 = number_matched;
- COBJ__Copy(number_matched, match_list, alt_match_list+WORDSIZE);
- ! now get all the matches for the second noun
- match_length = 0; number_matched = 0; match_from = wn;
- token_filter = 0;
- SearchScope(actor, actors_location, line_tdata-->pcount);
- #ifdef COBJ_DEBUG;
- print number_matched, " possible second nouns]^";
- #endif;
- wn = swn;
- cobj_flag = 1;
- ! restore match variables
- COBJ__SwapMatches();
- @pull match_from; @pull token_filter; @pull match_length;
- pcount = spcount;
- jump CodeOne;
- }
- }
- pcount = spcount;
- wn = swn;
-
- #ifdef COBJ_DEBUG;
- print "nothing interesting]^";
- #endif;
- cobj_flag = 2;
- jump CodeTwo;
-];
-
-[ ScoreDabCombo a b result;
- @push action; @push act_requester; @push noun; @push second;
- action = action_to_be;
- act_requester = player;
- if (action_reversed) { noun = b; second = a; }
- else { noun = a; second = b; }
- result = CheckDPMR();
- @pull second; @pull noun; @pull act_requester; @pull action;
- #ifdef COBJ_DEBUG;
- print "[", (the) a, " / ", (the) b, " => ", result, "]^";
- #endif;
- return result;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Parser.i6t: Default Topic
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DefaultTopic; return GPR_FAIL; ];
-
-
-
-[ ParserError error_type;
- if (error_type) PrintSingleParagraph(error_type);
- rfalse;
-];
-
-Object InformLibrary "(Inform Library)" has proper;
-
-Array Protect_I7_Arrays --> 16339 12345;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Order of Play
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Main
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global EarlyInTurnSequence;
-Global IterationsOfTurnSequence;
-
-[ Main;
- #ifdef TARGET_ZCODE; max_z_object = #largest_object - 255; #endif;
- ClearRTP();
- FollowRulebook(STARTUP_RB);
- #ifdef DEBUG; InternalTestCases(); #endif;
- while (true) {
- while (deadflag == false) {
- EarlyInTurnSequence = true;
- action = ##Wait; meta = false; noun = nothing; second = nothing;
- actor = player;
- FollowRulebook(TURN_SEQUENCE_RB);
- IterationsOfTurnSequence++;
- }
- if (FollowRulebook(SHUTDOWN_RB) == false) return;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Virtual Machine Startup Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ VIRTUAL_MACHINE_STARTUP_R;
- CarryOutActivity(STARTING_VIRTUAL_MACHINE_ACT);
- VM_Initialise();
- print "^^^";
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Initial Situation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant PLAYER_OBJECT_INIS = 0;
-Constant START_OBJECT_INIS = 1;
-Constant START_ROOM_INIS = 2;
-Constant START_TIME_INIS = 3;
-Constant DONE_INIS = 4;
-
-Array InitialSituation --> selfobj I133_sofa I125_living_room 540 0;
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Initialise Memory Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ INITIALISE_MEMORY_R;
- #ifdef TARGET_GLULX; VM_PreInitialise(); #Endif;
- #Ifdef LanguageInitialise; LanguageInitialise(); #Endif;
-
- not_yet_in_play = true;
- #ifdef I7_LOOKMODE; lookmode = I7_LOOKMODE; #endif;
- player = InitialSituation-->PLAYER_OBJECT_INIS;
- the_time = InitialSituation-->START_TIME_INIS;
- real_location = nothing;
- location = nothing;
-
- CreatePropertyOffsets();
- HeapInitialise(); ! Create a completely unused memory allocation heap
- StackFramingInitialise(); ! Create an empty stack
- CreateDynamicRelations(); ! Create relation structures on the heap
-
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Seed Random Number Generator Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SEED_RANDOM_NUMBER_GENERATOR_R i;
- if (0) VM_Seed_RNG(0);
- for (i=1: i<=100: i++) random(i);
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Position Player In Model World Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ POSITION_PLAYER_IN_MODEL_R player_to_be;
-
- player = selfobj;
- player_to_be = InitialSituation-->PLAYER_OBJECT_INIS;
-
- location = LocationOf(player_to_be);
- if (location == 0) {
- location = InitialSituation-->START_ROOM_INIS;
- if (InitialSituation-->START_OBJECT_INIS)
- move player_to_be to InitialSituation-->START_OBJECT_INIS;
- else move player_to_be to location;
- }
-
- if (player_to_be ~= player) { remove selfobj; ChangePlayer(player_to_be); }
- else { real_location = location; SilentlyConsiderLight(); }
-
- NOTE_OBJECT_ACQUISITIONS_R(); MoveFloatingObjects();
-
- actor = player; act_requester = nothing; actors_location = real_location; action = ##Wait;
-
- InitialSituation-->DONE_INIS = true;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Parse Command Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant ACTION_PRES = 0;
-Constant NO_INPS_PRES = 1;
-Constant INP1_PRES = 2;
-Constant INP2_PRES = 3; ! Parser.i6t code assumes this is INP1_PRES + 1
-
-[ PARSE_COMMAND_R;
- if (EarlyInTurnSequence == false) rfalse; ! Prevent use outside top level
- not_yet_in_play = false;
-
- Parser__parse();
- TreatParserResults();
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Treat Parser Results
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TreatParserResults;
- if (parser_results-->ACTION_PRES == ##MistakeAction) meta = true;
-
- if (parser_results-->ACTION_PRES == ##Tell &&
- parser_results-->INP1_PRES == player && actor ~= player) {
- parser_results-->ACTION_PRES = ##Ask;
- parser_results-->INP1_PRES = actor; actor = player;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Generate Action Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GENERATE_ACTION_R i;
- if (EarlyInTurnSequence == false) rfalse; ! Prevent use outside top level
- EarlyInTurnSequence = false;
-
- action = parser_results-->ACTION_PRES;
- act_requester = nothing; if (actor ~= player) act_requester = player;
-
- inp1 = 0; inp2 = 0; multiflag = false;
- if (parser_results-->NO_INPS_PRES >= 1) {
- inp1 = parser_results-->INP1_PRES; if (inp1 == 0) multiflag = true;
- }
- if (parser_results-->NO_INPS_PRES >= 2) {
- inp2 = parser_results-->INP2_PRES; if (inp2 == 0) multiflag = true;
- }
-
- if (inp1 == 1) noun = nothing; else noun = inp1;
- if (inp2 == 1) second = nothing; else second = inp2;
-
- if (multiflag) {
- if (multiple_object-->0 == 0) {
- if (actor == player) { GENERATE_ACTION_RM('B'); new_line; }
- return;
- }
- if (toomany_flag) {
- toomany_flag = false;
- if (actor == player) { GENERATE_ACTION_RM('A'); }
- }
- i = multiple_object-->0;
- FollowRulebook(MULTIPLE_ACTION_PROCESSING_RB);
- if ((multiple_object-->0 == 1) && (i > 1)) {
- multiflag = false;
- if (inp1 == 0) noun = multiple_object-->1;
- if ((inp2 == 0) && (parser_results-->NO_INPS_PRES >= 2))
- second = multiple_object-->1;
- }
- if (multiple_object-->0 == 0) rfalse;
- }
-
- if (multiflag) {
- GenerateMultipleActions();
- multiflag = false;
- } else BeginAction(action, noun, second);
-
- if ((actor ~= player) || (act_requester)) action = ##Wait;
- actor = player; act_requester = 0;
-
- if (meta) { RulebookSucceeds(); rtrue; }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Generate Multiple Actions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GenerateMultipleActions initial_location k item;
- initial_location = location;
- for (k=1: k<=multiple_object-->0: k++) {
- item = multiple_object-->k;
- RunParagraphOn();
- if (inp1 == 0) { inp1 = item; BeginAction(action, item, second, item); inp1 = 0; }
- else { inp2 = item; BeginAction(action, noun, item, item); inp2 = 0; }
- if (deadflag) return;
- if (location ~= initial_location) {
- if (player == actor) { ACTION_PROCESSING_INTERNAL_RM('J'); new_line; }
- return;
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Timed Events Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TIMED_EVENTS_R i d event_timer fire rule;
- for (i=1: i<=(TimedEventsTable-->0): i++)
- if ((rule=TimedEventsTable-->i) ~= 0) {
- event_timer = TimedEventTimesTable-->i; fire = false;
- if (event_timer<0) {
- (TimedEventTimesTable-->i)++;
- if (TimedEventTimesTable-->i == 0) fire = true;
- } else {
- d = (the_time - event_timer + TWENTY_FOUR_HOURS) % TWENTY_FOUR_HOURS;
- if ((d >= 0) && (d < 30)) fire = true;
- }
- if (fire) {
- TimedEventsTable-->i = 0;
- FollowRulebook(rule);
- }
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Setting Timed Events
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SetTimedEvent rule event_time absolute_time i b;
- for (i=1: i<=(TimedEventsTable-->0): i++) {
- if (rule == TimedEventsTable-->i) { b=i; break; }
- if ((b==0) && (TimedEventsTable-->i == 0)) b=i;
- }
- if (b==0) return RunTimeProblem(RTP_TOOMANYEVENTS);
- TimedEventsTable-->b = rule;
- if (absolute_time) TimedEventTimesTable-->b = event_time;
- else TimedEventTimesTable-->b = -event_time;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Setting Time Of Day
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global time_step;
-
-[ SetTime t s;
- the_time = t; time_rate = s; time_step = 0;
- if (s < 0) time_step = 0-s;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Advance Time Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ADVANCE_TIME_R;
- turns++;
- if (the_time ~= NULL) {
- if (time_rate >= 0) the_time = the_time+time_rate;
- else {
- time_step--;
- if (time_step == 0) {
- the_time++;
- time_step = -time_rate;
- }
- }
- the_time = the_time % TWENTY_FOUR_HOURS;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Note Object Acquisitions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NOTE_OBJECT_ACQUISITIONS_R obj;
- objectloop (obj in player) give obj moved;
- objectloop (obj has concealed)
- if (IndirectlyContains(player, obj)) give obj ~concealed;
- #Ifdef RUCKSACK_CLASS;
- objectloop (obj in player)
- if (obj ofclass RUCKSACK_CLASS)
- SACK_OBJECT = obj;
- objectloop (obj ofclass RUCKSACK_CLASS && obj provides component_parent
- && obj.component_parent == player)
- SACK_OBJECT = obj;
- #Endif;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Resurrect Player If Asked Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RESURRECT_PLAYER_IF_ASKED_R;
- if (resurrect_please) {
- RulebookSucceeds(); resurrect_please = false;
- deadflag = 0; story_complete = false; rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Ask The Final Question Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ASK_FINAL_QUESTION_R;
- print "^";
- while (true) {
- CarryOutActivity(DEALING_WITH_FINAL_QUESTION_ACT);
- DivideParagraphPoint();
- if (resurrect_please) rtrue;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Read The Final Answer Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ READ_FINAL_ANSWER_R;
- DrawStatusLine();
- KeyboardPrimitive(buffer, parse);
- players_command = 100 + WordCount();
- num_words = WordCount();
- wn = 1;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Immediately Restart VM Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IMMEDIATELY_RESTART_VM_R; @restart; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Immediately Restore Saved Game Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IMMEDIATELY_RESTORE_SAVED_R; actor = player; RESTORE_THE_GAME_R(); ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Immediately Quit Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IMMEDIATELY_QUIT_R; @quit; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Immediately Undo Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IMMEDIATELY_UNDO_R; Perform_Undo(); ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Print Obituary Headline Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PRINT_OBITUARY_HEADLINE_R;
- print "^^ ";
- VM_Style(ALERT_VMSTY);
- print "***";
- if (deadflag == 1) PRINT_OBITUARY_HEADLINE_RM('A');
- if (deadflag == 2) PRINT_OBITUARY_HEADLINE_RM('B');
- if (deadflag == 3) PRINT_OBITUARY_HEADLINE_RM('C');
- if (deadflag ~= 0 or 1 or 2 or 3) {
- print " ";
- TEXT_TY_Say(deadflag);
- print " ";
- }
- print "***";
- VM_Style(NORMAL_VMSTY);
- print "^^"; #Ifndef NO_SCORING; print "^"; #Endif;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Print Final Score Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PRINT_FINAL_SCORE_R;
- #Iftrue USE_SCORING ~= 0; ANNOUNCE_SCORE_R(); #Endif;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OrderOfPlay.i6t: Display Final Status Line Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DISPLAY_FINAL_STATUS_LINE_R;
- sline1 = score; sline2 = turns;
- rfalse;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Properties
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant p3_list_grouping_key = list_together;
-Constant p4_printed_name = short_name;
-Constant p5_printed_plural_name = plural;
-Constant p6_indefinite_article = article;
-Constant p7_description = description;
-Constant p8_map_region = map_region;
-Constant p9_initial_appearance = initial;
-Constant p11_other_side = door_to;
-Constant p12_carrying_capacity = capacity;
-Constant p13_matching_key = with_key;
-Constant p15_plural_named = pluralname;
-Constant p17_proper_named = proper;
-Constant p19_ambiguously_plural = ambigpluralname;
-Constant p20_privately_named = privately_named;
-Constant p22_lighted = light;
-Constant p24_visited = visited;
-Constant p26_lit = light;
-Constant p28_edible = edible;
-Constant p30_fixed_in_place = static;
-Constant p32_scenery = scenery;
-Constant p33_wearable = clothing;
-Constant p34_pushable_between_rooms = pushable;
-Constant p35_handled = moved;
-Constant p37_undescribed = concealed;
-Constant p38_marked_for_listing = workflag;
-Constant p40_mentioned = mentioned;
-Constant p42_enterable = enterable;
-Constant p44_transparent = transparent;
-Constant p45_open = open;
-Constant p47_openable = openable;
-Constant p49_lockable = lockable;
-Constant p50_locked = locked;
-Constant p52_female = female;
-Constant p54_neuter = neuter;
-Constant p55_switched_on = on;
-Constant p59 = vector;
-Constant p60 = room_index;
-Constant p61 = door_dir;
-Constant p62 = door_to;
-Constant p63 = absent;
-Constant p64 = cap_short_name;
-Constant p65 = mark_as_room;
-Constant p66 = mark_as_thing;
-Constant p67 = component_parent;
-Constant p68 = component_child;
-Constant p69 = component_sibling;
-Constant p70 = regional_found_in;
-Constant p71 = IK1_Count;
-Constant p72 = IK1_Link;
-Constant p73 = IK2_Count;
-Constant p74 = IK2_Link;
-Constant p75 = IK3_Count;
-Constant p76 = IK3_Link;
-Constant p77 = IK4_Count;
-Constant p78 = IK4_Link;
-Constant p79 = IK5_Count;
-Constant p80 = IK5_Link;
-Constant p81 = IK6_Count;
-Constant p82 = IK6_Link;
-Constant p83 = IK7_Count;
-Constant p84 = IK7_Link;
-Constant p85 = IK8_Count;
-Constant p86 = IK8_Link;
-Constant p87 = IK9_Count;
-Constant p88 = IK9_Link;
-Constant p89 = IK10_Count;
-Constant p90 = IK10_Link;
-Constant p91 = IK11_Count;
-Constant p92 = IK11_Link;
-Constant p93 = IK12_Count;
-Constant p94 = IK12_Link;
-Constant p95 = IK13_Count;
-Constant p96 = IK13_Link;
-Constant p97 = IK14_Count;
-Constant p98 = IK14_Link;
-Constant p99 = IK15_Count;
-Constant p100 = IK15_Link;
-Constant p101 = KD_Count;
-Constant p102 = name;
-Constant p103 = parse_name;
-Constant p104 = action_bitmap;
-
-Constant FBNA_PROP_NUMBER = p57_recurring;
-Object property_numberspace_forcer
- with p57_recurring false
-;
-
-Array property_metadata -->
- ! offset 0: property p0_specification
- "specification" NULL
- ! offset 2: property p1_indefinite_appearance_tex
- "indefinite appearance text" NULL
- ! offset 4: property p2_variable_initial_value
- "variable initial value" K1_room K2_thing K3_direction K9_region NULL
- ! offset 10: property list_together
- "list grouping key" K1_room K2_thing K3_direction K9_region NULL
- ! offset 16: property short_name
- "printed name" K1_room K2_thing K3_direction K9_region NULL
- ! offset 22: property plural
- "printed plural name" K1_room K2_thing K3_direction K9_region NULL
- ! offset 28: property article
- "indefinite article" K1_room K2_thing K3_direction K9_region NULL
- ! offset 34: property description
- "description" K1_room K2_thing NULL
- ! offset 38: property map_region
- "map region" K1_room NULL
- ! offset 41: property initial
- "initial appearance" K2_thing NULL
- ! offset 44: property p10_opposite
- "opposite" K3_direction NULL
- ! offset 47: property door_to
- "other side" K4_door NULL
- ! offset 50: property capacity
- "carrying capacity" K5_container K6_supporter K8_person NULL
- ! offset 55: property with_key
- "matching key" K2_thing K4_door K5_container NULL
- ! offset 60: property p14_adaptive_text_viewpoint
- "adaptive text viewpoint" NULL
- ! offset 62: property pluralname
- "plural-named" K1_room K2_thing K3_direction K9_region NULL
- ! offset 68: property proper
- "proper-named" K1_room K2_thing K3_direction K9_region NULL
- ! offset 74: property ambigpluralname
- "ambiguously plural" K1_room K2_thing K3_direction K9_region NULL
- ! offset 80: property privately_named
- "privately-named" K1_room K2_thing K3_direction K9_region NULL
- ! offset 86: property light
- "lighted" K1_room K2_thing NULL
- ! offset 90: property visited
- "visited" K1_room NULL
- ! offset 93: property light
- "lit" K1_room K2_thing NULL
- ! offset 97: property edible
- "edible" K2_thing NULL
- ! offset 100: property static
- "fixed in place" K2_thing NULL
- ! offset 103: property scenery
- "scenery" K2_thing NULL
- ! offset 106: property clothing
- "wearable" K2_thing NULL
- ! offset 109: property pushable
- "pushable between rooms" K2_thing NULL
- ! offset 112: property moved
- "handled" K2_thing NULL
- ! offset 115: property concealed
- "undescribed" K2_thing NULL
- ! offset 118: property workflag
- "marked for listing" K2_thing K3_direction NULL
- ! offset 122: property mentioned
- "mentioned" K2_thing NULL
- ! offset 125: property enterable
- "enterable" K5_container K6_supporter NULL
- ! offset 129: property transparent
- "transparent" K5_container NULL
- ! offset 132: property open
- "open" K4_door K5_container NULL
- ! offset 136: property openable
- "openable" K4_door K5_container NULL
- ! offset 140: property lockable
- "lockable" K4_door K5_container NULL
- ! offset 144: property locked
- "locked" K4_door K5_container NULL
- ! offset 148: property female
- "female" K8_person NULL
- ! offset 151: property neuter
- "neuter" K8_person NULL
- ! offset 154: property on
- "switched on" K13_device NULL
- ! offset 157: property p57_recurring
- "recurring" NULL
- ! offset 159: property vector
- "" NULL
- ! offset 161: property room_index
- "" NULL
- ! offset 163: property door_dir
- "" NULL
- ! offset 165: property door_to
- "" K4_door NULL
- ! offset 168: property absent
- "" NULL
- ! offset 170: property cap_short_name
- "" NULL
- ! offset 172: property mark_as_room
- "" NULL
- ! offset 174: property mark_as_thing
- "" NULL
- ! offset 176: property component_parent
- "" NULL
- ! offset 178: property component_child
- "" NULL
- ! offset 180: property component_sibling
- "" NULL
- ! offset 182: property regional_found_in
- "" NULL
- ! offset 184: property IK1_Count
- "" NULL
- ! offset 186: property IK1_Link
- "" NULL
- ! offset 188: property IK2_Count
- "" NULL
- ! offset 190: property IK2_Link
- "" NULL
- ! offset 192: property IK3_Count
- "" NULL
- ! offset 194: property IK3_Link
- "" NULL
- ! offset 196: property IK4_Count
- "" NULL
- ! offset 198: property IK4_Link
- "" NULL
- ! offset 200: property IK5_Count
- "" NULL
- ! offset 202: property IK5_Link
- "" NULL
- ! offset 204: property IK6_Count
- "" NULL
- ! offset 206: property IK6_Link
- "" NULL
- ! offset 208: property IK7_Count
- "" NULL
- ! offset 210: property IK7_Link
- "" NULL
- ! offset 212: property IK8_Count
- "" NULL
- ! offset 214: property IK8_Link
- "" NULL
- ! offset 216: property IK9_Count
- "" NULL
- ! offset 218: property IK9_Link
- "" NULL
- ! offset 220: property IK10_Count
- "" NULL
- ! offset 222: property IK10_Link
- "" NULL
- ! offset 224: property IK11_Count
- "" NULL
- ! offset 226: property IK11_Link
- "" NULL
- ! offset 228: property IK12_Count
- "" NULL
- ! offset 230: property IK12_Link
- "" NULL
- ! offset 232: property IK13_Count
- "" NULL
- ! offset 234: property IK13_Link
- "" NULL
- ! offset 236: property IK14_Count
- "" NULL
- ! offset 238: property IK14_Link
- "" NULL
- ! offset 240: property IK15_Count
- "" NULL
- ! offset 242: property IK15_Link
- "" NULL
- ! offset 244: property KD_Count
- "" NULL
- ! offset 246: property name
- "" NULL
- ! offset 248: property parse_name
- "" NULL
- ! offset 250: property action_bitmap
- "" NULL
-;
-
-Constant attributed_property_offsets_SIZE 48;
-Array attributed_property_offsets --> attributed_property_offsets_SIZE;
-Constant valued_property_offsets_SIZE (100 + 105 + INDIV_PROP_START-48);
-Array valued_property_offsets --> valued_property_offsets_SIZE;
-
-[ CreatePropertyOffsets
- i ! loop counter
- ;
- for (i=0: ii = -1;
- for (i=0: ii = -1;
- valued_property_offsets-->p0_specification = 0;
- valued_property_offsets-->p1_indefinite_appearance_tex = 2;
- valued_property_offsets-->p2_variable_initial_value = 4;
- valued_property_offsets-->list_together = 10;
- valued_property_offsets-->short_name = 16;
- valued_property_offsets-->plural = 22;
- valued_property_offsets-->article = 28;
- valued_property_offsets-->description = 34;
- valued_property_offsets-->map_region = 38;
- valued_property_offsets-->initial = 41;
- valued_property_offsets-->p10_opposite = 44;
- valued_property_offsets-->door_to = 47;
- valued_property_offsets-->capacity = 50;
- valued_property_offsets-->with_key = 55;
- valued_property_offsets-->p14_adaptive_text_viewpoint = 60;
- attributed_property_offsets-->pluralname = 62;
- attributed_property_offsets-->proper = 68;
- attributed_property_offsets-->ambigpluralname = 74;
- attributed_property_offsets-->privately_named = 80;
- attributed_property_offsets-->light = 86;
- attributed_property_offsets-->visited = 90;
- attributed_property_offsets-->light = 93;
- attributed_property_offsets-->edible = 97;
- attributed_property_offsets-->static = 100;
- attributed_property_offsets-->scenery = 103;
- attributed_property_offsets-->clothing = 106;
- attributed_property_offsets-->pushable = 109;
- attributed_property_offsets-->moved = 112;
- attributed_property_offsets-->concealed = 115;
- attributed_property_offsets-->workflag = 118;
- attributed_property_offsets-->mentioned = 122;
- attributed_property_offsets-->enterable = 125;
- attributed_property_offsets-->transparent = 129;
- attributed_property_offsets-->open = 132;
- attributed_property_offsets-->openable = 136;
- attributed_property_offsets-->lockable = 140;
- attributed_property_offsets-->locked = 144;
- attributed_property_offsets-->female = 148;
- attributed_property_offsets-->neuter = 151;
- attributed_property_offsets-->on = 154;
- valued_property_offsets-->p57_recurring = 157;
- valued_property_offsets-->vector = 159;
- valued_property_offsets-->room_index = 161;
- valued_property_offsets-->door_dir = 163;
- valued_property_offsets-->door_to = 165;
- attributed_property_offsets-->absent = 168;
- valued_property_offsets-->cap_short_name = 170;
- attributed_property_offsets-->mark_as_room = 172;
- attributed_property_offsets-->mark_as_thing = 174;
- valued_property_offsets-->component_parent = 176;
- valued_property_offsets-->component_child = 178;
- valued_property_offsets-->component_sibling = 180;
- valued_property_offsets-->regional_found_in = 182;
- valued_property_offsets-->IK1_Count = 184;
- valued_property_offsets-->IK1_Link = 186;
- valued_property_offsets-->IK2_Count = 188;
- valued_property_offsets-->IK2_Link = 190;
- valued_property_offsets-->IK3_Count = 192;
- valued_property_offsets-->IK3_Link = 194;
- valued_property_offsets-->IK4_Count = 196;
- valued_property_offsets-->IK4_Link = 198;
- valued_property_offsets-->IK5_Count = 200;
- valued_property_offsets-->IK5_Link = 202;
- valued_property_offsets-->IK6_Count = 204;
- valued_property_offsets-->IK6_Link = 206;
- valued_property_offsets-->IK7_Count = 208;
- valued_property_offsets-->IK7_Link = 210;
- valued_property_offsets-->IK8_Count = 212;
- valued_property_offsets-->IK8_Link = 214;
- valued_property_offsets-->IK9_Count = 216;
- valued_property_offsets-->IK9_Link = 218;
- valued_property_offsets-->IK10_Count = 220;
- valued_property_offsets-->IK10_Link = 222;
- valued_property_offsets-->IK11_Count = 224;
- valued_property_offsets-->IK11_Link = 226;
- valued_property_offsets-->IK12_Count = 228;
- valued_property_offsets-->IK12_Link = 230;
- valued_property_offsets-->IK13_Count = 232;
- valued_property_offsets-->IK13_Link = 234;
- valued_property_offsets-->IK14_Count = 236;
- valued_property_offsets-->IK14_Link = 238;
- valued_property_offsets-->IK15_Count = 240;
- valued_property_offsets-->IK15_Link = 242;
- valued_property_offsets-->KD_Count = 244;
- valued_property_offsets-->name = 246;
- valued_property_offsets-->parse_name = 248;
- valued_property_offsets-->action_bitmap = 250;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Activities
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant NUMBER_RULEBOOKS_CREATED = 362;
-Constant V0_printing_the_name = 0;
-Constant V1_printing_the_plural_name = 1;
-Constant V2_printing_a_number = 2;
-Constant V3_printing_room_description = 3;
-Constant V4_printing_inventory_detail = 4;
-Constant V5_listing_contents = 5;
-Constant V6_grouping_together = 6;
-Constant V7_writing_a_paragraph_about = 7;
-Constant V8_listing_nondescript_items = 8;
-Constant V9_printing_the_name_of_a_da = 9;
-Constant V10_printing_the_description = 10;
-Constant V11_printing_the_announcemen = 11;
-Constant V12_printing_the_announcemen = 12;
-Constant V13_printing_a_refusal_to_ac = 13;
-Constant V14_constructing_the_status_ = 14;
-Constant V15_printing_the_banner_text = 15;
-Constant V16_reading_a_command = 16;
-Constant V17_deciding_the_scope = 17;
-Constant V18_deciding_the_concealed_p = 18;
-Constant V19_deciding_whether_all_inc = 19;
-Constant V20_clarifying_the_parser_s_ = 20;
-Constant V21_asking_which_do_you_mean = 21;
-Constant V22_printing_a_parser_error = 22;
-Constant V23_supplying_a_missing_noun = 23;
-Constant V24_supplying_a_missing_seco = 24;
-Constant V25_implicitly_taking = 25;
-Constant V26_starting_the_virtual_mac = 26;
-Constant V27_amusing_a_victorious_pla = 27;
-Constant V28_printing_the_player_s_ob = 28;
-Constant V29_handling_the_final_quest = 29;
-Constant V30_printing_the_locale_desc = 30;
-Constant V31_choosing_notable_locale_ = 31;
-Constant V32_printing_a_locale_paragr = 32;
-Constant V33_issuing_the_response_tex = 33;
-
-Array Activity_before_rulebooks --> 29 32 35 38 41 44 47 50 53 56 59 62 65 68 71 74 77 80 83 86 89 92 95 98 101 104 107 110 113 116 119 122 125 128 NULL;
-
-Array Activity_for_rulebooks --> 30 33 36 39 42 45 48 51 54 57 60 63 66 69 72 75 78 81 84 87 90 93 96 99 102 105 108 111 114 117 120 123 126 129 NULL;
-
-Array Activity_after_rulebooks --> 31 34 37 40 43 46 49 52 55 58 61 64 67 70 73 76 79 82 85 88 91 94 97 100 103 106 109 112 115 118 121 124 127 130 NULL;
-
-Array Activity_atb_rulebooks -> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 $ff;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RELS_SYMMETRIC $8000;
-Constant RELS_EQUIVALENCE $4000;
-Constant RELS_X_UNIQUE $2000;
-Constant RELS_Y_UNIQUE $1000;
-Constant RELS_TEST $0800;
-Constant RELS_ASSERT_TRUE $0400;
-Constant RELS_ASSERT_FALSE $0200;
-Constant RELS_SHOW $0100;
-Constant RELS_ROUTE_FIND $0080;
-Constant RELS_ROUTE_FIND_COUNT $0040;
-Constant RELS_LOOKUP_ANY $0008;
-Constant RELS_LOOKUP_ALL_X $0004;
-Constant RELS_LOOKUP_ALL_Y $0002;
-Constant RELS_LIST $0001;
-#Iftrue (WORDSIZE == 2);
-Constant REL_BLOCK_HEADER ($100*5 + $$1101);
-#Ifnot;
-Constant REL_BLOCK_HEADER ($100*6 + $$1101)*$10000;
-#Endif;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Printing Routines
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintSceneName
- value ! Implied call parameter
- ;
- switch(value) {
- I78_entire_game: print "Entire Game";
- default: print "";
- }
-];
-[ A_PrintSceneName
- value ! Implied call parameter
- ;
- return (value % 1)+1;
-];
-[ B_PrintSceneName
- value ! Implied call parameter
- ;
- return ((value+-1) % 1)+1;
-];
-[ R_PrintSceneName
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(1));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ PrintFigureName
- value ! Implied call parameter
- ;
- switch(value) {
- I77_figure_of_cover: print "Figure of cover";
- default: print "";
- }
-];
-[ A_PrintFigureName
- value ! Implied call parameter
- ;
- return (value % 1)+1;
-];
-[ B_PrintFigureName
- value ! Implied call parameter
- ;
- return ((value+-1) % 1)+1;
-];
-[ R_PrintFigureName
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(1));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ PrintSoundName
- value ! Implied call parameter
- ;
- switch(value) {
- default: print "";
- }
-];
-[ A_PrintSoundName
- value ! Implied call parameter
- ;
- return (value % 0)+1;
-];
-[ B_PrintSoundName
- value ! Implied call parameter
- ;
- return ((value+-2) % 0)+1;
-];
-[ R_PrintSoundName
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(0));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ PrintExternalFileName
- value ! Implied call parameter
- ;
- switch(value) {
- default: print "";
- }
-];
-[ A_PrintExternalFileName
- value ! Implied call parameter
- ;
- return (value % 0)+1;
-];
-[ B_PrintExternalFileName
- value ! Implied call parameter
- ;
- return ((value+-2) % 0)+1;
-];
-[ R_PrintExternalFileName
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(0));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ E61
- value ! Implied call parameter
- ;
- switch(value) {
- I71_swedish_language: print "Swedish language";
- I72_spanish_language: print "Spanish language";
- I73_french_language: print "French language";
- I74_german_language: print "German language";
- I75_english_language: print "English language";
- I76_italian_language: print "Italian language";
- default: print "";
- }
-];
-[ A_E61
- value ! Implied call parameter
- ;
- return (value % 6)+1;
-];
-[ B_E61
- value ! Implied call parameter
- ;
- return ((value+4) % 6)+1;
-];
-[ R_E61
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(6));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ E62
- value ! Implied call parameter
- ;
- switch(value) {
- I80_didn_t_understand_error: print "didn't understand error";
- I81_only_understood_as_far_a: print "only understood as far as error";
- I82_didn_t_understand_that_n: print "didn't understand that number error";
- I83_can_only_do_that_to_some: print "can only do that to something animate error";
- I84_can_t_see_any_such_thing: print "can't see any such thing error";
- I85_said_too_little_error: print "said too little error";
- I86_aren_t_holding_that_erro: print "aren't holding that error";
- I87_can_t_use_multiple_objec: print "can't use multiple objects error";
- I88_can_only_use_multiple_ob: print "can only use multiple objects error";
- I89_not_sure_what_it_refers_: print "not sure what it refers to error";
- I90_excepted_something_not_i: print "excepted something not included error";
- I91_not_a_verb_i_recognise_e: print "not a verb I recognise error";
- I92_not_something_you_need_t: print "not something you need to refer to error";
- I93_can_t_see_it_at_the_mome: print "can't see it at the moment error";
- I94_didn_t_understand_the_wa: print "didn't understand the way that finished error";
- I95_not_enough_of_those_avai: print "not enough of those available error";
- I96_nothing_to_do_error: print "nothing to do error";
- I97_noun_did_not_make_sense_: print "noun did not make sense in that context error";
- I98_referred_to_a_determinat: print "referred to a determination of scope error";
- I99_i_beg_your_pardon_error: print "I beg your pardon error";
- I100_can_t_again_the_address: print "can't again the addressee error";
- I101_comma_can_t_begin_error: print "comma can't begin error";
- I102_can_t_see_whom_to_talk_: print "can't see whom to talk to error";
- I103_can_t_talk_to_inanimate: print "can't talk to inanimate things error";
- I104_didn_t_understand_addre: print "didn't understand addressee's last name error";
- default: print "";
- }
-];
-[ A_E62
- value ! Implied call parameter
- ;
- return (value % 25)+1;
-];
-[ B_E62
- value ! Implied call parameter
- ;
- return ((value+23) % 25)+1;
-];
-[ R_E62
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(25));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ E63
- value ! Implied call parameter
- ;
- switch(value) {
- I106_present_tense: print "present tense";
- I107_past_tense: print "past tense";
- I108_perfect_tense: print "perfect tense";
- I109_past_perfect_tense: print "past perfect tense";
- I110_future_tense: print "future tense";
- default: print "";
- }
-];
-[ A_E63
- value ! Implied call parameter
- ;
- return (value % 5)+1;
-];
-[ B_E63
- value ! Implied call parameter
- ;
- return ((value+3) % 5)+1;
-];
-[ R_E63
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(5));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ E64
- value ! Implied call parameter
- ;
- switch(value) {
- I112_first_person_singular: print "first person singular";
- I113_second_person_singular: print "second person singular";
- I114_third_person_singular: print "third person singular";
- I115_first_person_plural: print "first person plural";
- I116_second_person_plural: print "second person plural";
- I117_third_person_plural: print "third person plural";
- default: print "";
- }
-];
-[ A_E64
- value ! Implied call parameter
- ;
- return (value % 6)+1;
-];
-[ B_E64
- value ! Implied call parameter
- ;
- return ((value+4) % 6)+1;
-];
-[ R_E64
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(6));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ E65
- value ! Implied call parameter
- ;
- switch(value) {
- I119_nominative: print "nominative";
- I120_accusative: print "accusative";
- default: print "";
- }
-];
-[ A_E65
- value ! Implied call parameter
- ;
- return (value % 2)+1;
-];
-[ B_E65
- value ! Implied call parameter
- ;
- return ((value+0) % 2)+1;
-];
-[ R_E65
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(2));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ E66
- value ! Implied call parameter
- ;
- switch(value) {
- I122_neuter_gender: print "neuter gender";
- I123_masculine_gender: print "masculine gender";
- I124_feminine_gender: print "feminine gender";
- default: print "";
- }
-];
-[ A_E66
- value ! Implied call parameter
- ;
- return (value % 3)+1;
-];
-[ B_E66
- value ! Implied call parameter
- ;
- return ((value+1) % 3)+1;
-];
-[ R_E66
- a ! Implied call parameter
- b ! Implied call parameter
- ;
- if (a == 0 && b == 0) return (random(3));
- if (a == b) return b;
- if (a > b) return b+(random(MAX_POSITIVE_NUMBER) % (a-b+1));
- return a+(random(MAX_POSITIVE_NUMBER) % (b-a+1));
-];
-[ PrintKindValuePair
- k ! Implied call parameter
- v ! Implied call parameter
- ;
- k = KindAtomic(k);
- switch(k) {
- 2: print (DA_Number) v;
- 3: print (DA_Number) v;
- 4: print (DA_Number) v;
- 5: print (DA_Number) v;
- 6: print (DA_Number) v;
- 7: print (DA_Number) v;
- 8: print (DA_Number) v;
- 9: print (DA_Number) v;
- 10: print (PrintShortName) v;
- 11: print (DecimalNumber) v;
- 12: print (REAL_NUMBER_TY_Say) v;
- 13: print (DA_TruthState) v;
- 14: print (TEXT_TY_Say) v;
- 15: print (DecimalNumber) v;
- 16: print (PrintUseOption) v;
- 17: print (PrintResponse) v;
- 18: print (PrintVerbAsValue) v;
- 19: print (PrintSnippet) v;
- 20: print (PrintTableName) v;
- 21: print (DA_Number) v;
- 22: print (RulebookOutcomePrintingRule) v;
- 23: print (DecimalNumber) v;
- 25: print (DecimalNumber) v;
- 27: print (SayPhraseName) v;
- 28: print (DecimalNumber) v;
- 29: print (DecimalNumber) v;
- 30: print (RELATION_TY_Say) v;
- 31: print (RulePrintingRule) v;
- 32: print (RulePrintingRule) v;
- 33: print (DecimalNumber) v;
- 34: print (LIST_OF_TY_Say) v;
- 35: print (DecimalNumber) v;
- 36: print (PROPERTY_TY_Say) v;
- 37: print (DecimalNumber) v;
- 38: print (COMBINATION_TY_Say) v;
- 39: print (DecimalNumber) v;
- 40: print (STORED_ACTION_TY_Say) v;
- 41: print (SayActionName) v;
- 42: print (PrintTimeOfDay) v;
- 43: print (PrintSceneName) v;
- 44: print (PrintFigureName) v;
- 45: print (PrintSoundName) v;
- 46: print (PrintExternalFileName) v;
- 47: print (E61) v;
- 48: print (E62) v;
- 49: print (E63) v;
- 50: print (E64) v;
- 51: print (E65) v;
- 52: print (E66) v;
- default: print v;
- }
-];
-[ DefaultValueOfKOV
- sk ! Implied call parameter
- k ! weak kind ID
- ;
- k = KindAtomic(sk);
- switch(k) {
- 10: return nothing;
- 11: return 0;
- 12: return 0;
- 13: return false;
- 14: return BlkValueCreate(sk);
- 15: return 32;
- 16: return 0;
- 17: return 0;
- 18: return ConjugateVerb_0;
- 19: return 101;
- 20: return TheEmptyTable;
- 21: return 0;
- 22: return RBNO_0;
- 23: return DefaultTopic;
- 25: return ;
- 34: return BlkValueCreate(sk);
- 39: return ;
- 40: return BlkValueCreate(sk);
- 41: return ##Wait;
- 42: return 540;
- 43: return I78_entire_game;
- 44: return I77_figure_of_cover;
- 45: return ;
- 46: return ;
- 47: return I71_swedish_language;
- 48: return I80_didn_t_understand_error;
- 49: return I106_present_tense;
- 50: return I112_first_person_singular;
- 51: return I119_nominative;
- 52: return I122_neuter_gender;
- default: return 0;
- }
-];
-[ KOVComparisonFunction
- k ! Implied call parameter
- ;
- k = KindAtomic(k);
- switch(k) {
- 10: return UnsignedCompare;
- 12: return REAL_NUMBER_TY_Compare;
- 13: return UnsignedCompare;
- 14: return BlkValueCompare;
- 15: return UnsignedCompare;
- 16: return UnsignedCompare;
- 17: return UnsignedCompare;
- 18: return UnsignedCompare;
- 19: return UnsignedCompare;
- 20: return UnsignedCompare;
- 21: return UnsignedCompare;
- 22: return UnsignedCompare;
- 23: return UnsignedCompare;
- 25: return UnsignedCompare;
- 34: return BlkValueCompare;
- 39: return UnsignedCompare;
- 40: return BlkValueCompare;
- 41: return UnsignedCompare;
- 43: return UnsignedCompare;
- 44: return UnsignedCompare;
- 45: return UnsignedCompare;
- 46: return UnsignedCompare;
- default: return 0;
- }
-];
-[ KOVDomainSize
- k ! Implied call parameter
- ;
- k = KindAtomic(k);
- switch(k) {
- 43: return 1;
- 44: return 1;
- 45: return 0;
- 46: return 0;
- 47: return 6;
- 48: return 25;
- 49: return 5;
- 50: return 6;
- 51: return 2;
- 52: return 3;
- default: return 0;
- }
-];
-[ KOVIsBlockValue
- k ! Implied call parameter
- ;
- k = KindAtomic(k);
- if (k == 14 or 30 or 34 or 38 or 40) rtrue;
- rfalse;
-];
-[ KOVSupportFunction
- k ! Implied call parameter
- fail ! Implied call parameter
- ;
- k = KindAtomic(k);
- switch(k) {
- 14: return TEXT_TY_Support;
- 30: return RELATION_TY_Support;
- 34: return LIST_OF_TY_Support;
- 38: return COMBINATION_TY_Support;
- 40: return STORED_ACTION_TY_Support;
- }
- if (fail) BlkValueError(fail);
- rfalse;
-];
-
-[ I7_Kind_Name
- k ! Implied call parameter
- ;
- if (k == K1_room) print "room";
- if (k == K2_thing) print "thing";
- if (k == K3_direction) print "direction";
- if (k == K4_door) print "door";
- if (k == K5_container) print "container";
- if (k == K6_supporter) print "supporter";
- if (k == K7_backdrop) print "backdrop";
- if (k == K8_person) print "person";
- if (k == K9_region) print "region";
- if (k == K10_man) print "man";
- if (k == K11_woman) print "woman";
- if (k == K12_animal) print "animal";
- if (k == K13_device) print "device";
- if (k == K14_vehicle) print "vehicle";
- if (k == K15_player_s_holdall) print "player's holdall";
-];
-
-Constant RBNO_0 = "allow access";
-Constant RBNO_1 = "deny access";
-Constant RBNO_2 = "there is sufficient light";
-Constant RBNO_3 = "there is insufficient light";
-Constant RBNO_4 = "persuasion succeeds";
-Constant RBNO_5 = "persuasion fails";
-Constant RBNO_6 = "it is very likely";
-Constant RBNO_7 = "it is likely";
-Constant RBNO_8 = "it is possible";
-Constant RBNO_9 = "it is unlikely";
-Constant RBNO_10 = "it is very unlikely";
-Constant RBNO_11 = "it does not";
-Constant RBNO_12 = "it does";
-[ RulebookOutcomePrintingRule
- rbno ! Implied call parameter
- ;
- if (rbno == 0) print "(no outcome)";
- else print (string) rbno; rfalse;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Object Tree
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-Array KindHierarchy --> K0_kind (0) K1_room (0) K2_thing (0) K3_direction (0) K4_door (2) K5_container (2) K6_supporter (2) K7_backdrop (2) K8_person (2) K9_region (0) K10_man (8) K11_woman (8) K12_animal (8) K13_device (2) K14_vehicle (5) K15_player_s_holdall (5) ;
-Constant IK1_First = I125_living_room;
-Constant IK2_First = I126_lesbian_pride_flag;
-Constant IK3_First = I51_north;
-Constant IK4_First = nothing;
-Constant IK5_First = nothing;
-Constant IK6_First = I132_carpet;
-Constant IK7_First = nothing;
-Constant IK8_First = selfobj;
-Constant IK9_First = nothing;
-Constant IK10_First = nothing;
-Constant IK11_First = I139_petra;
-Constant IK12_First = nothing;
-Constant IK13_First = nothing;
-Constant IK14_First = nothing;
-Constant IK15_First = nothing;
-Constant No_Directions = 12;
-! Table of direction object alias constants:
-Constant DirectionObject_0 = I51_north;
-Constant DirectionObject_1 = I52_northeast;
-Constant DirectionObject_2 = I53_northwest;
-Constant DirectionObject_3 = I54_south;
-Constant DirectionObject_4 = I55_southeast;
-Constant DirectionObject_5 = I56_southwest;
-Constant DirectionObject_6 = I57_east;
-Constant DirectionObject_7 = I58_west;
-Constant DirectionObject_8 = I59_up;
-Constant DirectionObject_9 = I60_down;
-Constant DirectionObject_10 = in_obj;
-Constant DirectionObject_11 = out_obj;
-Array Map_Storage -->
- 0 0 0 0 0 0 0 0 0 0 0 0 ! Exits from: I125_living_room
-;
-
-Class VPH_Class;
-Array KOV_representatives --> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ValuePropertyHolder_43 0 0 0 ValuePropertyHolder_47 0 0 0 0 0 ;
-VPH_Class ValuePropertyHolder_43
- with value_range 1
- with p57_recurring KOVP_43_P57
- with description KOVP_43_P7
-;
-! Storage for property p57_recurring of kind SCENE_TY
-Array KOVP_43_P57 table 0 0 (true) ;
-! Storage for property description of kind SCENE_TY
-Array KOVP_43_P7 table 0 0 (BC_3) ;
-VPH_Class ValuePropertyHolder_47
- with value_range 6
- with p14_adaptive_text_viewpoint KOVP_47_P14
-;
-! Storage for property p14_adaptive_text_viewpoint of kind
-Array KOVP_47_P14 table 0 0 (I112_first_person_singular) (I112_first_person_singular) (I112_first_person_singular) (I112_first_person_singular) (I115_first_person_plural) (I112_first_person_singular) ;
-Class K0_kind
- has ~proper
- has ~pluralname
- with list_together BC_4
- with short_name BC_5
- with plural BC_6
- with article BC_7
- has ~ambigpluralname
-;
-
-Class K1_room
- class K0_kind
- has ~privately_named
- has light
- has ~visited
- with description BC_8
- with map_region nothing
- with list_together BC_9
- with short_name BC_10
- with plural BC_11
- with article BC_12
-;
-
-Class K2_thing
- class K0_kind
- with action_bitmap 0 0 0 0 0
- with component_parent nothing
- with component_child nothing
- with component_sibling nothing
- has ~privately_named
- has ~light
- has ~edible
- has ~static
- has ~concealed
- has ~workflag
- has mentioned
- has ~scenery
- has ~clothing
- has ~pushable
- has ~moved
- with description BC_13
- with initial BC_14
- with with_key nothing
- with list_together BC_15
- with short_name BC_16
- with plural BC_17
- with article BC_18
-;
-
-Class K6_supporter
- class K2_thing
-
- has transparent supporter
-
- has static
- with plural BC_19
- with capacity 100
- has ~enterable
- with description BC_20
- with initial BC_21
- with list_together BC_22
- with short_name BC_23
- with article BC_24
-;
-
-Class K8_person
- class K2_thing
-
- has transparent animate
- with before NULL,
-
- has ~female
- has ~neuter
- with plural BC_25
- with capacity 100
- with description BC_26
- with initial BC_27
- with list_together BC_28
- with short_name BC_29
- with article BC_30
-;
-
-Class K10_man
- class K8_person
- has ~female
- has ~neuter
- with plural BC_31
- with description BC_32
- with initial BC_33
- with list_together BC_34
- with short_name BC_35
- with article BC_36
-;
-
-Class K11_woman
- class K8_person
- has female
- has ~neuter
- with plural BC_37
- with description BC_38
- with initial BC_39
- with list_together BC_40
- with short_name BC_41
- with article BC_42
-;
-
-Class K12_animal
- class K8_person
- with plural BC_43
- with description BC_44
- with initial BC_45
- with list_together BC_46
- with short_name BC_47
- with article BC_48
-;
-
-Class K4_door
- class K2_thing
- has door,
- has ~open
- has openable
- has ~lockable
- has ~locked
- has static
- has ~pushable
- with plural BC_49
- with door_to nothing
- with with_key nothing
- with description BC_50
- with initial BC_51
- with list_together BC_52
- with short_name BC_53
- with article BC_54
-;
-
-Class K5_container
- class K2_thing
- has container,
- has ~transparent
- has open
- has ~openable
- has ~lockable
- has ~locked
- with plural BC_55
- with capacity 100
- has ~enterable
- with with_key nothing
- with description BC_56
- with initial BC_57
- with list_together BC_58
- with short_name BC_59
- with article BC_60
-;
-
-Class K14_vehicle
- class K5_container
- has enterable
- has static
- with plural BC_61
- with description BC_62
- with initial BC_63
- with list_together BC_64
- with short_name BC_65
- with article BC_66
-;
-
-Class K15_player_s_holdall
- class K5_container
- has openable
- has ~static
- with plural BC_67
- with description BC_68
- with initial BC_69
- with list_together BC_70
- with short_name BC_71
- with article BC_72
-;
-
-Class K7_backdrop
- class K2_thing
- has static
- has scenery
- has ~pushable
- with plural BC_73
- with description BC_74
- with initial BC_75
- with list_together BC_76
- with short_name BC_77
- with article BC_78
-;
-
-Class K13_device
- class K2_thing
- has switchable,
- has ~on
- with plural BC_79
- with description BC_80
- with initial BC_81
- with list_together BC_82
- with short_name BC_83
- with article BC_84
-;
-
-Class K9_region
- class K0_kind
- has ~privately_named
- with plural BC_85
- with list_together BC_86
- with short_name BC_87
- with article BC_88
-;
-
-Class K3_direction
- class K0_kind
-
- has scenery, ! class CompassDirection,
-
- has ~privately_named
- has ~workflag
- with plural BC_89
- with p10_opposite I51_north
- with list_together BC_90
- with short_name BC_91
- with article BC_92
-;
-
-Object I51_north "" Compass
- class K3_direction
- with name 'north' 'directions//p' 'n//'
- with parse_name Parse_Name_GV1
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 0
- with IK3_Link I52_northeast
- with short_name BC_93
- with article BC_94
- with p10_opposite I54_south
- with list_together BC_95
- with plural BC_96
-;
-
-Object I52_northeast "" Compass
- class K3_direction
- with name 'northeast' 'directions//p' 'ne'
- with parse_name Parse_Name_GV2
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 1
- with IK3_Link I53_northwest
- with short_name BC_97
- with article BC_98
- with p10_opposite I56_southwest
- with list_together BC_99
- with plural BC_100
-;
-
-Object I53_northwest "" Compass
- class K3_direction
- with name 'northwest' 'directions//p' 'nw'
- with parse_name Parse_Name_GV3
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 2
- with IK3_Link I54_south
- with short_name BC_101
- with article BC_102
- with p10_opposite I55_southeast
- with list_together BC_103
- with plural BC_104
-;
-
-Object I54_south "" Compass
- class K3_direction
- with name 'south' 'directions//p' 's//'
- with parse_name Parse_Name_GV4
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 3
- with IK3_Link I55_southeast
- with short_name BC_105
- with article BC_106
- with p10_opposite I51_north
- with list_together BC_107
- with plural BC_108
-;
-
-Object I55_southeast "" Compass
- class K3_direction
- with name 'southeast' 'directions//p' 'se'
- with parse_name Parse_Name_GV5
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 4
- with IK3_Link I56_southwest
- with short_name BC_109
- with article BC_110
- with p10_opposite I53_northwest
- with list_together BC_111
- with plural BC_112
-;
-
-Object I56_southwest "" Compass
- class K3_direction
- with name 'southwest' 'directions//p' 'sw'
- with parse_name Parse_Name_GV6
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 5
- with IK3_Link I57_east
- with short_name BC_113
- with article BC_114
- with p10_opposite I52_northeast
- with list_together BC_115
- with plural BC_116
-;
-
-Object I57_east "" Compass
- class K3_direction
- with name 'east' 'directions//p' 'e//'
- with parse_name Parse_Name_GV7
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 6
- with IK3_Link I58_west
- with short_name BC_117
- with article BC_118
- with p10_opposite I58_west
- with list_together BC_119
- with plural BC_120
-;
-
-Object I58_west "" Compass
- class K3_direction
- with name 'west' 'directions//p' 'w//'
- with parse_name Parse_Name_GV8
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 7
- with IK3_Link I59_up
- with short_name BC_121
- with article BC_122
- with p10_opposite I57_east
- with list_together BC_123
- with plural BC_124
-;
-
-Object I59_up "" Compass
- class K3_direction
- with name 'up' 'directions//p' 'u//'
- with parse_name Parse_Name_GV9
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 8
- with IK3_Link I60_down
- with short_name BC_125
- with article BC_126
- with p10_opposite I60_down
- with list_together BC_127
- with plural BC_128
-;
-
-Object I60_down "" Compass
- class K3_direction
- with name 'down' 'directions//p' 'd//'
- with parse_name Parse_Name_GV10
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 9
- with IK3_Link in_obj
- with short_name BC_129
- with article BC_130
- with p10_opposite I59_up
- with list_together BC_131
- with plural BC_132
-;
-
-Object in_obj "" Compass
- class K3_direction
- with name 'inside' 'directions//p' 'in'
- with parse_name Parse_Name_GV11
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 10
- with IK3_Link out_obj
- with short_name BC_133
- with article BC_134
- with p10_opposite out_obj
- with list_together BC_135
- with plural BC_136
-;
-
-Object out_obj "" Compass
- class K3_direction
- with name 'outside' 'directions//p' 'out'
- with parse_name Parse_Name_GV12
- with action_bitmap 0 0 0 0 0
- with KD_Count 3
- with vector 0
- with IK3_Count 11
- with IK3_Link nothing
- with short_name BC_137
- with article BC_138
- with p10_opposite in_obj
- with list_together BC_139
- with plural BC_140
-;
-
-Object I125_living_room ""
- class K1_room
- with name 'living' 'room' 'rooms//p'
- with KD_Count 1
- with vector 0
- with room_index -1
- has mark_as_room
- with IK1_Count 0
- with IK1_Link nothing
- with short_name BC_141
- with description BC_142
- with list_together BC_143
- with plural BC_144
- with article BC_145
-;
-
-Object -> I126_lesbian_pride_flag ""
- class K2_thing
- with name 'lesbian' 'pride' 'flag' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 1
- with IK2_Link I127_large_bin
- has static
- has scenery
- with short_name BC_146
- with description BC_147
- with initial BC_148
- with list_together BC_149
- with plural BC_150
- with article BC_151
-;
-
-Object -> I127_large_bin ""
- class K2_thing
- with name 'large' 'bin' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 2
- with IK2_Link I128_switch_pro_controller
- with short_name BC_152
- with description BC_153
- with initial BC_154
- with list_together BC_155
- with plural BC_156
- with article BC_157
-;
-
-Object -> I128_switch_pro_controller ""
- class K2_thing
- with name 'switch' 'pro' 'controller' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 3
- with IK2_Link I129_third_party_switch_cont
- with short_name BC_158
- with description BC_159
- with initial BC_160
- with list_together BC_161
- with plural BC_162
- with article BC_163
-;
-
-Object -> I129_third_party_switch_cont ""
- class K2_thing
- with name 'third' 'party' 'switch' 'controller' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 4
- with IK2_Link I130_power_board
- with short_name BC_164
- with description BC_165
- with initial BC_166
- with list_together BC_167
- with plural BC_168
- with article BC_169
-;
-
-Object -> I130_power_board ""
- class K2_thing
- with name 'power' 'board' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 5
- with IK2_Link I131_mess_of_cables
- with short_name BC_170
- with description BC_171
- with initial BC_172
- with list_together BC_173
- with plural BC_174
- with article BC_175
-;
-
-Object -> I131_mess_of_cables ""
- class K2_thing
- with name 'mess' 'of' 'cables' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 6
- with IK2_Link I132_carpet
- with short_name BC_176
- with description BC_177
- with initial BC_178
- with list_together BC_179
- with plural BC_180
- with article BC_181
-;
-
-Object -> I132_carpet ""
- class K6_supporter
- with name 'carpet' 'supporters//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 6
- with vector 0
- has mark_as_thing
- with IK2_Count 7
- with IK2_Link I133_sofa
- with IK6_Count 0
- with IK6_Link I133_sofa
- with short_name BC_182
- with description BC_183
- with initial BC_184
- with list_together BC_185
- with plural BC_186
- with article BC_187
-;
-
-Object -> -> I133_sofa ""
- class K6_supporter
- with name 'sofa' 'supporters//p' 'couch'
- with parse_name Parse_Name_GV93
- with action_bitmap 0 0 0 0 0
- with KD_Count 6
- with vector 0
- has mark_as_thing
- with IK2_Count 8
- with IK2_Link selfobj
- with IK6_Count 1
- with IK6_Link I134_entertainment_unit
- has enterable
- has static
- with short_name BC_188
- with description BC_189
- with initial BC_190
- with list_together BC_191
- with plural BC_192
- with article BC_193
-;
-
-Object -> -> -> selfobj ""
- class K8_person
-
- with saved_short_name TX_L_41,
-
- with parse_name Parse_Name_GV13
- with action_bitmap 0 0 0 0 0
- with IK8_Count 0
- with IK8_Link I139_petra
- with KD_Count 8
- with vector 0
- with cap_short_name BC_194
- has mark_as_thing
- with IK2_Count 0
- with IK2_Link I139_petra
- has proper
- has privately_named
- has concealed
- with short_name BC_195
- with description BC_196
- with capacity 1
- with initial BC_197
- with list_together BC_198
- with plural BC_199
- with article BC_200
-;
-
-Object -> -> -> I139_petra ""
- class K11_woman
- with name 'petra' 'women//p'
- with action_bitmap 0 0 0 0 0
- with IK8_Count 1
- with IK8_Link nothing
- with IK11_Count 0
- with IK11_Link nothing
- with KD_Count 11
- with vector 0
- has mark_as_thing
- with IK2_Count 14
- with IK2_Link I134_entertainment_unit
- has proper
- with short_name BC_201
- with description BC_202
- with initial BC_203
- with list_together BC_204
- with plural BC_205
- with article BC_206
-;
-
-Object -> I134_entertainment_unit ""
- class K6_supporter
- with name 'entertainment' 'unit' 'supporters//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 6
- with vector 0
- has mark_as_thing
- with IK2_Count 9
- with IK2_Link I135_tv
- with IK6_Count 2
- with IK6_Link nothing
- has static
- with short_name BC_207
- with description BC_208
- with initial BC_209
- with list_together BC_210
- with plural BC_211
- with article BC_212
-;
-
-Object -> -> I135_tv ""
- class K2_thing
- with name 'tv' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 10
- with IK2_Link I136_nintendo_switch
- has static
- with short_name BC_213
- with description BC_214
- with initial BC_215
- with list_together BC_216
- with plural BC_217
- with article BC_218
-;
-
-Object -> -> I136_nintendo_switch ""
- class K2_thing
- with name 'nintendo' 'switch' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 11
- with IK2_Link I137_nuc
- with short_name BC_219
- with description BC_220
- with initial BC_221
- with list_together BC_222
- with plural BC_223
- with article BC_224
-;
-
-Object -> -> I137_nuc ""
- class K2_thing
- with name 'nuc' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 12
- with IK2_Link I138_ps2
- with short_name BC_225
- with description BC_226
- with initial BC_227
- with list_together BC_228
- with plural BC_229
- with article BC_230
-;
-
-Object -> -> I138_ps2 ""
- class K2_thing
- with name 'ps2' 'things//p'
- with action_bitmap 0 0 0 0 0
- with KD_Count 2
- with vector 0
- has mark_as_thing
- with IK2_Count 13
- with IK2_Link nothing
- with short_name BC_231
- with description BC_232
- with initial BC_233
- with list_together BC_234
- with plural BC_235
- with article BC_236
-;
-
-Constant I71_swedish_language = 1;
-Constant I72_spanish_language = 2;
-Constant I73_french_language = 3;
-Constant I74_german_language = 4;
-Constant I75_english_language = 5;
-Constant I76_italian_language = 6;
-Constant I77_figure_of_cover = 1;
-Constant I78_entire_game = 1;
-Constant I80_didn_t_understand_error = 1;
-Constant I81_only_understood_as_far_a = 2;
-Constant I82_didn_t_understand_that_n = 3;
-Constant I83_can_only_do_that_to_some = 4;
-Constant I84_can_t_see_any_such_thing = 5;
-Constant I85_said_too_little_error = 6;
-Constant I86_aren_t_holding_that_erro = 7;
-Constant I87_can_t_use_multiple_objec = 8;
-Constant I88_can_only_use_multiple_ob = 9;
-Constant I89_not_sure_what_it_refers_ = 10;
-Constant I90_excepted_something_not_i = 11;
-Constant I91_not_a_verb_i_recognise_e = 12;
-Constant I92_not_something_you_need_t = 13;
-Constant I93_can_t_see_it_at_the_mome = 14;
-Constant I94_didn_t_understand_the_wa = 15;
-Constant I95_not_enough_of_those_avai = 16;
-Constant I96_nothing_to_do_error = 17;
-Constant I97_noun_did_not_make_sense_ = 18;
-Constant I98_referred_to_a_determinat = 19;
-Constant I99_i_beg_your_pardon_error = 20;
-Constant I100_can_t_again_the_address = 21;
-Constant I101_comma_can_t_begin_error = 22;
-Constant I102_can_t_see_whom_to_talk_ = 23;
-Constant I103_can_t_talk_to_inanimate = 24;
-Constant I104_didn_t_understand_addre = 25;
-Constant I106_present_tense = 1;
-Constant I107_past_tense = 2;
-Constant I108_perfect_tense = 3;
-Constant I109_past_perfect_tense = 4;
-Constant I110_future_tense = 5;
-Constant I112_first_person_singular = 1;
-Constant I113_second_person_singular = 2;
-Constant I114_third_person_singular = 3;
-Constant I115_first_person_plural = 4;
-Constant I116_second_person_plural = 5;
-Constant I117_third_person_plural = 6;
-Constant I119_nominative = 1;
-Constant I120_accusative = 2;
-Constant I122_neuter_gender = 1;
-Constant I123_masculine_gender = 2;
-Constant I124_feminine_gender = 3;
-Array Global_Vars -->
- (false) ! 7 darkness witnessed
- (BC_237) ! 25 command prompt
- (I75_english_language) ! 29 language of play
- (BC_238) ! 32 story author
- (BC_239) ! 33 story headline
- (BC_240) ! 34 story genre
- (BC_241) ! 35 story description
- (1) ! 36 release number
- (0) ! 37 story creation year
- (0) ! 45 locale paragraph count
-;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Tables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-Array T0_final_question_options table tab_0_0 tab_0_1 tab_0_2 tab_0_3 tab_0_4;
-Array tab_0_0 table $0664 0 (BC_242) (BC_243) (BC_244) (BC_245) (BC_246) ;
-Array tab_0_1 table $0465 1 (0) (0) (1) (0) (0) ;
-Array tab_0_2 table $2066 2 (Consult_Grammar_94) (Consult_Grammar_95) (Consult_Grammar_96) (Consult_Grammar_97) (Consult_Grammar_98) ;
-Array tab_0_3 table $0067 3 (IMMEDIATELY_RESTART_VM_R) (IMMEDIATELY_RESTORE_SAVED_R) ( TABLE_NOVALUE) (IMMEDIATELY_QUIT_R) (IMMEDIATELY_UNDO_R) ;
-Array tab_0_4 table $0068 4 ( TABLE_NOVALUE) ( TABLE_NOVALUE) (V27_amusing_a_victorious_pla) ( TABLE_NOVALUE) ( TABLE_NOVALUE) ;
-Array T1_locale_priorities table tab_1_0 tab_1_1;
-Array tab_1_0 table $0869 NULL ( TABLE_NOVALUE) TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE;
-Array tab_1_1 table $446a 5 ( TABLE_NOVALUE) TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE TABLE_NOVALUE;
-Array TB_Blanks ->
- ! For table T0_final_question_options
- $00 ! Column 0
- $00 ! Column 1
- $00 ! Column 2
- $04 ! Column 3
- $1b ! Column 4
-
- ! For table T1_locale_priorities
- $ff $ff ! Column 1
-
- ! End of table
- NULL NULL;
-Array TableOfTables --> TheEmptyTable T0_final_question_options T1_locale_priorities 0 0;
-[ TC_KOV
- tc ! Implied call parameter
- ;
- switch (tc) {
- 100: return TEXT_TY; ! final question wording: text
- 101: return TRUTH_STATE_TY; ! only if victorious: truth state
- 102: return UNDERSTANDING_TY; ! topic: topic
- 103: return KD0_rule; ! final response rule: rule
- 104: return KD1_activity; ! final response activity: activity
- 105: return OBJECT_TY; ! notable-object: object
- 106: return NUMBER_TY; ! locale description priority: number
- }
- return UNKNOWN_TY;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Equations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Actions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-
-Array ActionData table
- ##Inv $$00000000 OBJECT_TY OBJECT_TY 0 20000
- ##Take $$00001001 OBJECT_TY OBJECT_TY 0 20001
- ##Remove $$00011011 OBJECT_TY OBJECT_TY 0 20002
- ##Drop $$00001001 OBJECT_TY OBJECT_TY 0 20003
- ##PutOn $$00011011 OBJECT_TY OBJECT_TY 0 20004
- ##Insert $$00011011 OBJECT_TY OBJECT_TY 0 20005
- ##Eat $$00001001 OBJECT_TY OBJECT_TY 0 20006
- ##Go $$00001000 OBJECT_TY OBJECT_TY ANSTVC_7 20007
- ##Enter $$00001001 OBJECT_TY OBJECT_TY 0 20008
- ##Exit $$00000000 OBJECT_TY OBJECT_TY ANSTVC_9 20009
- ##GetOff $$00001001 OBJECT_TY OBJECT_TY 0 20010
- ##Look $$00000000 OBJECT_TY OBJECT_TY ANSTVC_11 20011
- ##Examine $$00001100 OBJECT_TY OBJECT_TY ANSTVC_12 20012
- ##LookUnder $$00001100 OBJECT_TY OBJECT_TY 0 20013
- ##Search $$00001101 OBJECT_TY OBJECT_TY 0 20014
- ##Consult $$00011001 OBJECT_TY UNDERSTANDING_TY 0 20015
- ##Lock $$10011011 OBJECT_TY OBJECT_TY 0 20016
- ##Unlock $$10011011 OBJECT_TY OBJECT_TY 0 20017
- ##SwitchOn $$00001001 OBJECT_TY OBJECT_TY 0 20018
- ##SwitchOff $$00001001 OBJECT_TY OBJECT_TY 0 20019
- ##Open $$00001001 OBJECT_TY OBJECT_TY 0 20020
- ##Close $$00001001 OBJECT_TY OBJECT_TY 0 20021
- ##Wear $$01001001 OBJECT_TY OBJECT_TY 0 20022
- ##Disrobe $$00001001 OBJECT_TY OBJECT_TY 0 20023
- ##Give $$01011011 OBJECT_TY OBJECT_TY 0 20024
- ##Show $$01011001 OBJECT_TY OBJECT_TY 0 20025
- ##WakeOther $$00001001 OBJECT_TY OBJECT_TY 0 20026
- ##ThrowAt $$01011001 OBJECT_TY OBJECT_TY 0 20027
- ##Attack $$00001001 OBJECT_TY OBJECT_TY 0 20028
- ##Kiss $$00001001 OBJECT_TY OBJECT_TY 0 20029
- ##Answer $$00011001 OBJECT_TY UNDERSTANDING_TY 0 20030
- ##Tell $$00011001 OBJECT_TY UNDERSTANDING_TY 0 20031
- ##Ask $$00011001 OBJECT_TY UNDERSTANDING_TY 0 20032
- ##AskFor $$00011011 OBJECT_TY OBJECT_TY 0 20033
- ##Wait $$00000000 OBJECT_TY OBJECT_TY 0 20034
- ##Touch $$00001001 OBJECT_TY OBJECT_TY 0 20035
- ##Wave $$00001001 OBJECT_TY OBJECT_TY 0 20036
- ##Pull $$00001001 OBJECT_TY OBJECT_TY 0 20037
- ##Push $$00001001 OBJECT_TY OBJECT_TY 0 20038
- ##Turn $$00001001 OBJECT_TY OBJECT_TY 0 20039
- ##PushDir $$00011001 OBJECT_TY OBJECT_TY 0 20040
- ##Squeeze $$00001001 OBJECT_TY OBJECT_TY 0 20041
- ##Yes $$00000000 OBJECT_TY OBJECT_TY 0 20042
- ##No $$00000000 OBJECT_TY OBJECT_TY 0 20043
- ##Burn $$00001001 OBJECT_TY OBJECT_TY 0 20044
- ##Wake $$00000000 OBJECT_TY OBJECT_TY 0 20045
- ##Think $$00000000 OBJECT_TY OBJECT_TY 0 20046
- ##Smell $$00001001 OBJECT_TY OBJECT_TY 0 20047
- ##Listen $$00001001 OBJECT_TY OBJECT_TY 0 20048
- ##Taste $$00001001 OBJECT_TY OBJECT_TY 0 20049
- ##Cut $$00001001 OBJECT_TY OBJECT_TY 0 20050
- ##Jump $$00000000 OBJECT_TY OBJECT_TY 0 20051
- ##Tie $$00011011 OBJECT_TY OBJECT_TY 0 20052
- ##Drink $$00001001 OBJECT_TY OBJECT_TY 0 20053
- ##Sorry $$00000000 OBJECT_TY OBJECT_TY 0 20054
- ##Swing $$00001001 OBJECT_TY OBJECT_TY 0 20055
- ##Rub $$00001001 OBJECT_TY OBJECT_TY 0 20056
- ##SetTo $$00011001 OBJECT_TY UNDERSTANDING_TY 0 20057
- ##WaveHands $$00000000 OBJECT_TY OBJECT_TY 0 20058
- ##Buy $$00001001 OBJECT_TY OBJECT_TY 0 20059
- ##Climb $$00001001 OBJECT_TY OBJECT_TY 0 20060
- ##Sleep $$00000000 OBJECT_TY OBJECT_TY 0 20061
- ##Quit $$00100000 OBJECT_TY OBJECT_TY 0 20062
- ##Save $$00100000 OBJECT_TY OBJECT_TY 0 20063
- ##Restore $$00100000 OBJECT_TY OBJECT_TY 0 20064
- ##Restart $$00100000 OBJECT_TY OBJECT_TY 0 20065
- ##Verify $$00100000 OBJECT_TY OBJECT_TY 0 20066
- ##ScriptOn $$00100000 OBJECT_TY OBJECT_TY 0 20067
- ##ScriptOff $$00100000 OBJECT_TY OBJECT_TY 0 20068
- ##Version $$00100000 OBJECT_TY OBJECT_TY 0 20069
- ##Score $$00100000 OBJECT_TY OBJECT_TY 0 20070
- ##LMode3 $$00100000 OBJECT_TY OBJECT_TY 0 20071
- ##LMode2 $$00100000 OBJECT_TY OBJECT_TY 0 20072
- ##LMode1 $$00100000 OBJECT_TY OBJECT_TY 0 20073
- ##NotifyOn $$00100000 OBJECT_TY OBJECT_TY 0 20074
- ##NotifyOff $$00100000 OBJECT_TY OBJECT_TY 0 20075
- ##Pronouns $$00100000 OBJECT_TY OBJECT_TY 0 20076
-;
-Constant AD_RECORDS = 77;
-[ ANSTVC_7
- pos ! Implied call parameter
- state ! Implied call parameter
- ;
- if (state == 1) {
- MStack-->pos = I125_living_room; pos++;
- MStack-->pos = nothing; pos++;
- MStack-->pos = nothing; pos++;
- MStack-->pos = nothing; pos++;
- MStack-->pos = nothing; pos++;
- } else {
- pos++;
- pos++;
- pos++;
- pos++;
- pos++;
- }
- return 5;
-];
-[ ANSTVC_9
- pos ! Implied call parameter
- state ! Implied call parameter
- ;
- if (state == 1) {
- MStack-->pos = nothing; pos++;
- } else {
- pos++;
- }
- return 1;
-];
-[ ANSTVC_11
- pos ! Implied call parameter
- state ! Implied call parameter
- ;
- if (state == 1) {
- MStack-->pos = ##Wait; pos++;
- MStack-->pos = false; pos++;
- MStack-->pos = 0; pos++;
- MStack-->pos = nothing; pos++;
- } else {
- pos++;
- pos++;
- pos++;
- pos++;
- }
- return 4;
-];
-[ ANSTVC_12
- pos ! Implied call parameter
- state ! Implied call parameter
- ;
- if (state == 1) {
- MStack-->pos = false; pos++;
- } else {
- pos++;
- }
- return 1;
-];
-[ DB_Action_Details
- act ! Implied call parameter
- n ! Implied call parameter
- s ! Implied call parameter
- for_say ! Implied call parameter
- ;
- switch (act) {
- ##Inv: print "taking inventory";
- ##Take: print "taking"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Remove: print "removing"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "from"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Drop: print "dropping"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##PutOn: print "putting"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "on"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Insert: print "inserting"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "into"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Eat: print "eating"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Go: print "going"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Enter: print "entering"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Exit: print "exiting";
- ##GetOff: print "getting off"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Look: print "looking";
- ##Examine: print "examining"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##LookUnder: print "looking under"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Search: print "searching"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Consult: print "consulting"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "about"; if (for_say ~= 2) { print " "; DA_Topic(100*consult_from + consult_words); }
- ##Lock: print "locking"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "with"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Unlock: print "unlocking"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "with"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##SwitchOn: print "switching on"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##SwitchOff: print "switching off"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Open: print "opening"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Close: print "closing"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Wear: print "wearing"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Disrobe: print "taking off"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Give: print "giving"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "to"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Show: print "showing"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "to"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##WakeOther: print "waking"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##ThrowAt: print "throwing"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "at"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Attack: print "attacking"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Kiss: print "kissing"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Answer: print "answering"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "that"; if (for_say ~= 2) { print " "; DA_Topic(100*consult_from + consult_words); }
- ##Tell: print "telling"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "about"; if (for_say ~= 2) { print " "; DA_Topic(100*consult_from + consult_words); }
- ##Ask: print "asking"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "about"; if (for_say ~= 2) { print " "; DA_Topic(100*consult_from + consult_words); }
- ##AskFor: print "asking"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "for"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Wait: print "waiting";
- ##Touch: print "touching"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Wave: print "waving"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Pull: print "pulling"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Push: print "pushing"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Turn: print "turning"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##PushDir: print "pushing"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "to"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Squeeze: print "squeezing"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Yes: print "saying yes";
- ##No: print "saying no";
- ##Burn: print "burning"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Wake: print "waking up";
- ##Think: print "thinking";
- ##Smell: print "smelling"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Listen: print "listening to"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Taste: print "tasting"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Cut: print "cutting"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Jump: print "jumping";
- ##Tie: print "tying"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "to"; if (for_say ~= 2) { print " "; DA_Name(s); }
- ##Drink: print "drinking"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Sorry: print "saying sorry";
- ##Swing: print "swinging"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Rub: print "rubbing"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##SetTo: print "setting"; print " "; if (for_say == 2) print "it"; else DA_Name(n); print " "; print "to"; if (for_say ~= 2) { print " "; DA_Topic(100*consult_from + consult_words); }
- ##WaveHands: print "waving hands";
- ##Buy: print "buying"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Climb: print "climbing"; if (for_say ~= 2) { print " "; DA_Name(n); }
- ##Sleep: print "sleeping";
- ##Quit: print "quitting the game";
- ##Save: print "saving the game";
- ##Restore: print "restoring the game";
- ##Restart: print "restarting the game";
- ##Verify: print "verifying the story file";
- ##ScriptOn: print "switching the story transcript on";
- ##ScriptOff: print "switching the story transcript off";
- ##Version: print "requesting the story file version";
- ##Score: print "requesting the score";
- ##LMode3: print "preferring abbreviated room descriptions";
- ##LMode2: print "preferring unabbreviated room descriptions";
- ##LMode1: print "preferring sometimes abbreviated room descriptions";
- ##NotifyOn: print "switching score notification on";
- ##NotifyOff: print "switching score notification off";
- ##Pronouns: print "requesting the pronoun meanings";
- }
-];
-
-Array ActionCoding -->
- ##Inv ##Take ##Remove ##Drop ##PutOn ##Insert ##Eat ##Go
- ##Enter ##Exit ##GetOff ##Look ##Examine ##LookUnder ##Search ##Consult
- ##Lock ##Unlock ##SwitchOn ##SwitchOff ##Open ##Close ##Wear ##Disrobe
- ##Give ##Show ##WakeOther ##ThrowAt ##Attack ##Kiss ##Answer ##Tell
- ##Ask ##AskFor ##Wait ##Touch ##Wave ##Pull ##Push ##Turn
- ##PushDir ##Squeeze ##Yes ##No ##Burn ##Wake ##Think ##Smell
- ##Listen ##Taste ##Cut ##Jump ##Tie ##Drink ##Sorry ##Swing
- ##Rub ##SetTo ##WaveHands ##Buy ##Climb ##Sleep ##Quit ##Save
- ##Restore ##Restart ##Verify ##ScriptOn ##ScriptOff ##Version ##Score ##LMode3
- ##LMode2 ##LMode1 ##NotifyOn ##NotifyOff ##Pronouns;
-
-
-Array ActionHappened --> 0 0 0 0 0;
-
-
-[ InvSub ;
- return GenericVerbSub(131,132,133);
-];
-[ TakeSub ;
- return GenericVerbSub(134,135,136);
-];
-[ RemoveSub ;
- return GenericVerbSub(137,138,139);
-];
-[ DropSub ;
- return GenericVerbSub(140,141,142);
-];
-[ PutOnSub ;
- return GenericVerbSub(143,144,145);
-];
-[ InsertSub ;
- return GenericVerbSub(146,147,148);
-];
-[ EatSub ;
- return GenericVerbSub(149,150,151);
-];
-[ GoSub ;
- return GenericVerbSub(152,153,154);
-];
-[ EnterSub ;
- return GenericVerbSub(155,156,157);
-];
-[ ExitSub ;
- return GenericVerbSub(158,159,160);
-];
-[ GetOffSub ;
- return GenericVerbSub(161,162,163);
-];
-[ LookSub ;
- return GenericVerbSub(164,165,166);
-];
-[ ExamineSub ;
- return GenericVerbSub(167,168,169);
-];
-[ LookUnderSub ;
- return GenericVerbSub(170,171,172);
-];
-[ SearchSub ;
- return GenericVerbSub(173,174,175);
-];
-[ ConsultSub ;
- return GenericVerbSub(176,177,178);
-];
-[ LockSub ;
- return GenericVerbSub(179,180,181);
-];
-[ UnlockSub ;
- return GenericVerbSub(182,183,184);
-];
-[ SwitchOnSub ;
- return GenericVerbSub(185,186,187);
-];
-[ SwitchOffSub ;
- return GenericVerbSub(188,189,190);
-];
-[ OpenSub ;
- return GenericVerbSub(191,192,193);
-];
-[ CloseSub ;
- return GenericVerbSub(194,195,196);
-];
-[ WearSub ;
- return GenericVerbSub(197,198,199);
-];
-[ DisrobeSub ;
- return GenericVerbSub(200,201,202);
-];
-[ GiveSub ;
- return GenericVerbSub(203,204,205);
-];
-[ ShowSub ;
- return GenericVerbSub(206,207,208);
-];
-[ WakeOtherSub ;
- return GenericVerbSub(209,210,211);
-];
-[ ThrowAtSub ;
- return GenericVerbSub(212,213,214);
-];
-[ AttackSub ;
- return GenericVerbSub(215,216,217);
-];
-[ KissSub ;
- return GenericVerbSub(218,219,220);
-];
-[ AnswerSub ;
- return GenericVerbSub(221,222,223);
-];
-[ TellSub ;
- return GenericVerbSub(224,225,226);
-];
-[ AskSub ;
- return GenericVerbSub(227,228,229);
-];
-[ AskForSub ;
- return GenericVerbSub(230,231,232);
-];
-[ WaitSub ;
- return GenericVerbSub(233,234,235);
-];
-[ TouchSub ;
- return GenericVerbSub(236,237,238);
-];
-[ WaveSub ;
- return GenericVerbSub(239,240,241);
-];
-[ PullSub ;
- return GenericVerbSub(242,243,244);
-];
-[ PushSub ;
- return GenericVerbSub(245,246,247);
-];
-[ TurnSub ;
- return GenericVerbSub(248,249,250);
-];
-[ PushDirSub ;
- return GenericVerbSub(251,252,253);
-];
-[ SqueezeSub ;
- return GenericVerbSub(254,255,256);
-];
-[ YesSub ;
- return GenericVerbSub(257,258,259);
-];
-[ NoSub ;
- return GenericVerbSub(260,261,262);
-];
-[ BurnSub ;
- return GenericVerbSub(263,264,265);
-];
-[ WakeSub ;
- return GenericVerbSub(266,267,268);
-];
-[ ThinkSub ;
- return GenericVerbSub(269,270,271);
-];
-[ SmellSub ;
- return GenericVerbSub(272,273,274);
-];
-[ ListenSub ;
- return GenericVerbSub(275,276,277);
-];
-[ TasteSub ;
- return GenericVerbSub(278,279,280);
-];
-[ CutSub ;
- return GenericVerbSub(281,282,283);
-];
-[ JumpSub ;
- return GenericVerbSub(284,285,286);
-];
-[ TieSub ;
- return GenericVerbSub(287,288,289);
-];
-[ DrinkSub ;
- return GenericVerbSub(290,291,292);
-];
-[ SorrySub ;
- return GenericVerbSub(293,294,295);
-];
-[ SwingSub ;
- return GenericVerbSub(296,297,298);
-];
-[ RubSub ;
- return GenericVerbSub(299,300,301);
-];
-[ SetToSub ;
- return GenericVerbSub(302,303,304);
-];
-[ WaveHandsSub ;
- return GenericVerbSub(305,306,307);
-];
-[ BuySub ;
- return GenericVerbSub(308,309,310);
-];
-[ ClimbSub ;
- return GenericVerbSub(311,312,313);
-];
-[ SleepSub ;
- return GenericVerbSub(314,315,316);
-];
-[ QuitSub ;
- return GenericVerbSub(317,318,319);
-];
-[ SaveSub ;
- return GenericVerbSub(320,321,322);
-];
-[ RestoreSub ;
- return GenericVerbSub(323,324,325);
-];
-[ RestartSub ;
- return GenericVerbSub(326,327,328);
-];
-[ VerifySub ;
- return GenericVerbSub(329,330,331);
-];
-[ ScriptOnSub ;
- return GenericVerbSub(332,333,334);
-];
-[ ScriptOffSub ;
- return GenericVerbSub(335,336,337);
-];
-[ VersionSub ;
- return GenericVerbSub(338,339,340);
-];
-[ ScoreSub ;
- return GenericVerbSub(341,342,343);
-];
-[ LMode3Sub ;
- return GenericVerbSub(344,345,346);
-];
-[ LMode2Sub ;
- return GenericVerbSub(347,348,349);
-];
-[ LMode1Sub ;
- return GenericVerbSub(350,351,352);
-];
-[ NotifyOnSub ;
- return GenericVerbSub(353,354,355);
-];
-[ NotifyOffSub ;
- return GenericVerbSub(356,357,358);
-];
-[ PronounsSub ;
- return GenericVerbSub(359,360,361);
-];
-
-[ MistakeActionSub ;
- switch(understand_as_mistake_number) {
- default: "I didn't understand that sentence.";
- }
- say__p = 1;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Phrases
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! Definitions of rules in rulebooks
-
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: Startup (B0_startup)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/11: INITIALISE_MEMORY_R
-! === equally specific with ===
-! Rule 2/11: VIRTUAL_MACHINE_STARTUP_R
-! === equally specific with ===
-! Rule 3/11: SEED_RANDOM_NUMBER_GENERATOR_R
-! === equally specific with ===
-! Rule 4/11: UPDATE_CHRONOLOGICAL_RECORDS_R
-! === equally specific with ===
-! Rule 5/11 ! This is the declare everything initially unmentioned rule:
-! === equally specific with ===
-! Rule 6/11: POSITION_PLAYER_IN_MODEL_R
-! === equally specific with ===
-! Rule 7/11 ! This is the start in the correct scenes rule:
-! --- now the mid-placed rules ---
-! Rule 8/11 ! This is the when play begins stage rule:
-! === equally specific with ===
-! Rule 9/11 ! This is the fix baseline scoring rule:
-! === equally specific with ===
-! Rule 10/11 ! This is the display banner rule:
-! === equally specific with ===
-! Rule 11/11 ! This is the initial room description rule:
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! This is the declare everything initially unmentioned rule:
-[ R_9
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- ;
- if (debug_rules) DB_Rule(R_9, 9);
- ! [2: repeat with item running through things]
- for (tmp_0=Prop_0(0), tmp_1=Prop_0(tmp_0): tmp_0: tmp_0=tmp_1, tmp_1=Prop_0(tmp_1))
- {! [3: now the item is not mentioned]
- (Adj_67_t3_v10(tmp_0));
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the start in the correct scenes rule:
-[ R_10 ;
- if (debug_rules) DB_Rule(R_10, 10);
- ! [2: follow the scene changing rules]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(3));
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the when play begins stage rule:
-[ R_11 ;
- if (debug_rules) DB_Rule(R_11, 11);
- ! [2: follow the when play begins rulebook]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(4));
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the fix baseline scoring rule:
-[ R_12 ;
- if (debug_rules) DB_Rule(R_12, 12);
- ! [2: now the last notified score is the score]
- last_score = score;
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the display banner rule:
-[ R_13 ;
- if (debug_rules) DB_Rule(R_13, 13);
- ! [2: say ~[banner text]~]
- say__p=1;! [3: banner text]
- ParaContent(); Banner(); .L_Say0; .L_SayX0;rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the initial room description rule:
-[ R_14 ;
- if (debug_rules) DB_Rule(R_14, 14);
- ! [2: try looking]
- TryAction(0, player, ##Look, 0, 0);
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: Turn sequence (B1_turn_sequence)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/12: PARSE_COMMAND_R
-! === equally specific with ===
-! Rule 2/12 ! This is the declare everything initially unmentioned rule:
-! === equally specific with ===
-! Rule 3/12: GENERATE_ACTION_R
-! === equally specific with ===
-! Rule 4/12 ! A first turn sequence rule:
-! === equally specific with ===
-! Rule 5/12 ! A first turn sequence rule ( this is the every turn stage rule ):
-! --- now the mid-placed rules ---
-! Rule 6/12: TIMED_EVENTS_R
-! === equally specific with ===
-! Rule 7/12: ADVANCE_TIME_R
-! === equally specific with ===
-! Rule 8/12: UPDATE_CHRONOLOGICAL_RECORDS_R
-! --- now the last-placed rules ---
-! Rule 9/12 ! A last turn sequence rule:
-! === equally specific with ===
-! Rule 10/12: ADJUST_LIGHT_R
-! === equally specific with ===
-! Rule 11/12: NOTE_OBJECT_ACQUISITIONS_R
-! === equally specific with ===
-! Rule 12/12 ! This is the notify score changes rule:
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! A first turn sequence rule:
-[ R_16 ;
- if (debug_rules) DB_Rule(R_16, 16);
- ! [2: follow the scene changing rules]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(3));
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A first turn sequence rule ( this is the every turn stage rule ):
-[ R_15 ;
- if (debug_rules) DB_Rule(R_15, 15);
- ! [2: follow the every turn rules]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(8));
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A last turn sequence rule:
-[ R_17 ;
- if (debug_rules) DB_Rule(R_17, 17);
- ! [2: follow the scene changing rules]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(3));
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the notify score changes rule:
-[ R_18 ;
- if (debug_rules) DB_Rule(R_18, 18);
- ! [2: if the score is not the last notified score]
- if (((~~((score == last_score)))))
- {! [3: issue score notification message]
- NotifyTheScore();
- ! [4: now the last notified score is the score]
- last_score = score;
- }
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: Shutdown (B2_shutdown)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/4 ! This is the when play ends stage rule:
-! --- now the last-placed rules ---
-! Rule 2/4: RESURRECT_PLAYER_IF_ASKED_R
-! === equally specific with ===
-! Rule 3/4 ! This is the print player's obituary rule:
-! === equally specific with ===
-! Rule 4/4: ASK_FINAL_QUESTION_R
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! This is the when play ends stage rule:
-[ R_19 ;
- if (debug_rules) DB_Rule(R_19, 19);
- ! [2: follow the when play ends rulebook]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(5));
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the print player's obituary rule:
-[ R_20 ;
- if (debug_rules) DB_Rule(R_20, 20);
- ! [2: carry out the printing the player's obituary activity]
- CarryOutActivity(V28_printing_the_player_s_ob);
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: When play begins (B4_when_play_begins)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! When play begins:
-! ----------------------------------------------------------------------------------------------------
-! No specific request
-! When play begins:
-[ R_799 ;
- if (debug_rules) DB_Rule(R_799, 799);
- ! [2: now the command prompt is ~? ~]
- BlkValueCopy((Global_Vars-->1), TX_L_58);
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: When scene begins (B6_when_scene_begins)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! When a scene ( called the event ) begins ( this is the scene description text rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! When a scene ( called the event ) begins ( this is the scene description text rule ):
-[ R_65
- tmp_0 ! Let/loop value, e.g., 'event': scene
- ;
- if ((((tmp_0 = parameter_value, (((true) && (tmp_0=(parameter_value), true))))) || (tmp_0 = I78_entire_game,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_65, 65);
- ! [2: if the description of the event is not ~~]
- if (((~~(( BlkValueCompare(GProperty(SCENE_TY, tmp_0,description), EMPTY_TEXT_VALUE) == 0)))))
- {! [3: say ~[description of the event][paragraph break]~]
- say__p=1;! [4: description of the event]
- ParaContent(); @push self; print (TEXT_TY_Say) GProperty(SCENE_TY, self=tmp_0,description);@pull self; ! [5: paragraph break]
- ParaContent(); DivideParagraphPoint(); new_line; .L_Say1; .L_SayX1;}
- } else if (debug_rules > 1) DB_Rule(R_65, 65, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: Action-processing (B9_action_processing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/11 ! This is the announce items from multiple object lists rule:
-! === equally specific with ===
-! Rule 2/11 ! This is the set pronouns from items from multiple object lists rule:
-! === equally specific with ===
-! Rule 3/11 ! This is the before stage rule:
-! --- now the mid-placed rules ---
-! Rule 4/11: BASIC_VISIBILITY_R
-! === equally specific with ===
-! Rule 5/11: BASIC_ACCESSIBILITY_R
-! === equally specific with ===
-! Rule 6/11: CARRYING_REQUIREMENTS_R
-! --- now the last-placed rules ---
-! Rule 7/11 ! This is the instead stage rule:
-! === equally specific with ===
-! Rule 8/11: REQUESTED_ACTIONS_REQUIRE_R
-! === equally specific with ===
-! Rule 9/11: CARRY_OUT_REQUESTED_ACTIONS_R
-! === equally specific with ===
-! Rule 10/11: DESCEND_TO_SPECIFIC_ACTION_R
-! === equally specific with ===
-! Rule 11/11 ! This is the end action-processing in success rule:
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! This is the announce items from multiple object lists rule:
-[ R_22 ;
- if (debug_rules) DB_Rule(R_22, 22);
- ! [2: if the current item from the multiple object list is not nothing]
- if (((~~((multiple_object_item == nothing)))))
- {! [3: say ~[current item from the multiple object list]: [run paragraph on]~ ( a )]
- say__p=1;! [4: ~[current item from the multiple object list]: [run paragraph on]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_134); .L_Say2; .L_SayX2;}
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the set pronouns from items from multiple object lists rule:
-[ R_21 ;
- if (debug_rules) DB_Rule(R_21, 21);
- ! [2: if the current item from the multiple object list is not nothing]
- if (((~~((multiple_object_item == nothing)))))
- {! [3: set pronouns from the current item from the multiple object list]
- PronounNotice(multiple_object_item);
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the before stage rule:
-[ R_23 ;
- if (debug_rules) DB_Rule(R_23, 23);
- ! [2: abide by the before rules]
- if (FollowRulebook(RULEBOOK_TY_to_RULE_TY(19))) rtrue;
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the instead stage rule:
-[ R_24 ;
- if (debug_rules) DB_Rule(R_24, 24);
- ! [2: abide by the instead rules]
- if (FollowRulebook(RULEBOOK_TY_to_RULE_TY(20))) rtrue;
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the end action-processing in success rule:
-[ R_25 ;
- if (debug_rules) DB_Rule(R_25, 25);
- ! [2: rule succeeds]
- RulebookSucceeds(); rtrue;
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: Setting action variables (B10_setting_action_variables)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Rule for setting action variables for going ( this is the standard set going variables rule ):
-! === equally specific with ===
-! Rule 2/3 ! Setting action variables for exiting:
-! === equally specific with ===
-! Rule 3/3 ! Setting action variables for looking ( this is the determine visibility ceiling rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Rule for setting action variables for going ( this is the standard set going variables rule ):
-[ R_151 I7RBLK;
- @push I7SFRAME;
- StackFrameCreate(0);
- @push formal_par0;
- @push formal_par1;
- I7RBLK = KERNEL_0();
- @pull formal_par1;
- @pull formal_par0;
- @pull I7SFRAME;
- return I7RBLK; ! nothing
-];
-[ KERNEL_0
- tmp_0 ! Let/loop value, e.g., 'carriage': vehicle
- tmp_1 ! Let/loop value, e.g., 'target': object
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((action ==##Go)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_151, 151);
- ! [2: now the thing gone with is the item-pushed-between-rooms]
- (MStack-->MstVO(20007,4)) = move_pushing;
- ! [3: now the room gone from is the location of the actor]
- (MStack-->MstVO(20007,0)) = LocationOf(actor);
- ! [4: if the actor is in an enterable vehicle ( called the carriage )]
- if (((ContainerOf(actor) ofclass K14_vehicle) && ((Adj_69_t1_v10(ContainerOf(actor)))) && (tmp_0=(ContainerOf(actor)), true)))
- {! [5: now the vehicle gone by is the carriage]
- (MStack-->MstVO(20007,3)) = tmp_0;
- }
- ! [6: let the target be nothing]
-
- tmp_1 = nothing;
- ! [7: if the noun is a direction]
- if (((noun ofclass K3_direction)))
- {! [8: let direction d be the noun]
-
- tmp_2 = noun;
- ! [9: let the target be the room-or-door direction d from the room gone from]
- tmp_1 =
- ! Resolution of run-time phrase ambiguity (deciding a value):
- (
- ! This value evaluates third (i.e., last)
- formal_rv
- +
- 0*(
- ! The following condition evaluates second
- ((
- ((((((formal_par0 ofclass K3_direction) && (formal_par0 ofclass K3_direction))))) && ((
- formal_rv = RoomOrDoorFrom(formal_par1,formal_par0)) | 1)
- )|| (ArgumentTypeFailed(2287, 1))
-
- ))
- +
- ! The following assignments evaluate first
- ((formal_par1 = (MStack-->MstVO(20007,0))) +
- (formal_par0 = tmp_2)
- ))
- )
-
- ! Resolution complete
- ;
- } else {
- ! [10: if the noun is a door]
- if (((noun ofclass K4_door)))
- {! [11: let the target be the noun]
- tmp_1 = noun;
- }
- }
- ! [12: if the target is a door]
- if (((tmp_1 ofclass K4_door)))
- {! [13: now the door gone through is the target]
- (MStack-->MstVO(20007,2)) = tmp_1;
- ! [14: now the target is the other side of the target from the room gone from]
- tmp_1 =
- ! Resolution of run-time phrase ambiguity (deciding a value):
- (
- ! This value evaluates third (i.e., last)
- formal_rv
- +
- 0*(
- ! The following condition evaluates second
- ((
- ((((((formal_par0 ofclass K4_door) && (formal_par0 ofclass K4_door))))) && ((
- formal_rv = OtherSideOfDoor(formal_par0,formal_par1)) | 1)
- )|| (ArgumentTypeFailed(2292, 1))
-
- ))
- +
- ! The following assignments evaluate first
- ((formal_par1 = (MStack-->MstVO(20007,0))) +
- (formal_par0 = tmp_1)
- ))
- )
-
- ! Resolution complete
- ;
- }
- ! [15: now the room gone to is the target]
- (MStack-->MstVO(20007,1)) = tmp_1;
- } else if (debug_rules > 1) DB_Rule(R_151, 151, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Setting action variables for exiting:
-[ R_174 ;
- if ((((action ==##Exit)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_174, 174);
- ! [2: now the container exited from is the holder of the actor]
- (MStack-->MstVO(20009,0)) = (HolderOf(actor));
- } else if (debug_rules > 1) DB_Rule(R_174, 174, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Setting action variables for looking ( this is the determine visibility ceiling rule ):
-[ R_186 ;
- if ((((action ==##Look)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_186, 186);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: calculate visibility ceiling at low level]
- FindVisibilityLevels();
- }
- ! [4: now the visibility level count is the visibility ceiling count calculated]
- (MStack-->MstVO(20011,2)) = visibility_levels;
- ! [5: now the visibility ceiling is the visibility ceiling calculated]
- (MStack-->MstVO(20011,3)) = visibility_ceiling;
- ! [6: now the room-describing action is the looking action]
- (MStack-->MstVO(20011,0)) = ##Look;
- } else if (debug_rules > 1) DB_Rule(R_186, 186, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: specific action-processing (B11_specific_action_processi)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/8: WORK_OUT_DETAILS_OF_SPECIFIC_R
-! --- now the mid-placed rules ---
-! Rule 2/8 ! A specific action-processing rule ( this is the investigate player's awareness before action rule ):
-! === equally specific with ===
-! Rule 3/8 ! A specific action-processing rule ( this is the check stage rule ):
-! === equally specific with ===
-! Rule 4/8 ! A specific action-processing rule ( this is the carry out stage rule ):
-! === equally specific with ===
-! Rule 5/8 ! A specific action-processing rule ( this is the after stage rule ):
-! === equally specific with ===
-! Rule 6/8 ! A specific action-processing rule ( this is the investigate player's awareness after action rule ):
-! === equally specific with ===
-! Rule 7/8 ! A specific action-processing rule ( this is the report stage rule ):
-! --- now the last-placed rules ---
-! Rule 8/8 ! The last specific action-processing rule:
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! A specific action-processing rule ( this is the investigate player's awareness before action rule ):
-[ R_26 ;
- if (debug_rules) DB_Rule(R_26, 26);
- ! [2: follow the player's action awareness rules]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(12));
- ! [3: if rule succeeded]
- if (((RulebookSucceeded())))
- {! [4: now within the player's sight is true]
- (MStack-->MstVO(11,5)) = 1;
- } else {
- ! [5: now within the player's sight is false]
- (MStack-->MstVO(11,5)) = 0;
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A specific action-processing rule ( this is the check stage rule ):
-[ R_27 ;
- if (debug_rules) DB_Rule(R_27, 27);
- ! [2: anonymously abide by the specific check rulebook]
- if (temporary_value = FollowRulebook(RULEBOOK_TY_to_RULE_TY((MStack-->MstVO(11,2))))) {
- if (RulebookSucceeded()) ActRulebookSucceeds(temporary_value);
- else ActRulebookFails(temporary_value);
- return 2;
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A specific action-processing rule ( this is the carry out stage rule ):
-[ R_28 ;
- if (debug_rules) DB_Rule(R_28, 28);
- ! [2: follow the specific carry out rulebook]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY((MStack-->MstVO(11,3))));
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A specific action-processing rule ( this is the after stage rule ):
-[ R_29 ;
- if (debug_rules) DB_Rule(R_29, 29);
- ! [2: if action in world is true]
- if (((((MStack-->MstVO(11,0)) && true) == (1 && true))))
- {! [3: abide by the after rules]
- if (FollowRulebook(RULEBOOK_TY_to_RULE_TY(23))) rtrue;
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A specific action-processing rule ( this is the investigate player's awareness after action rule ):
-[ R_30 ;
- if (debug_rules) DB_Rule(R_30, 30);
- ! [2: if within the player's sight is false]
- if (((((MStack-->MstVO(11,5)) && true) == (0 && true))))
- {! [3: follow the player's action awareness rules]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY(12));
- ! [4: if rule succeeded]
- if (((RulebookSucceeded())))
- {! [5: now within the player's sight is true]
- (MStack-->MstVO(11,5)) = 1;
- }
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A specific action-processing rule ( this is the report stage rule ):
-[ R_31 ;
- if (debug_rules) DB_Rule(R_31, 31);
- ! [2: if within the player's sight is true and action keeping silent is false]
- if ((((((MStack-->MstVO(11,5)) && true) == (1 && true)))) && (((((MStack-->MstVO(11,1)) && true) == (0 && true)))))
- {! [3: follow the specific report rulebook]
- FollowRulebook(RULEBOOK_TY_to_RULE_TY((MStack-->MstVO(11,4))));
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! The last specific action-processing rule:
-[ R_32 ;
- if (debug_rules) DB_Rule(R_32, 32);
- ! [2: rule succeeds]
- RulebookSucceeds(); rtrue;
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: player's action awareness (B12_player_s_action_awarenes)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/4 ! A player's action awareness rule ( this is the player aware of his own actions rule ):
-! === equally specific with ===
-! Rule 2/4 ! A player's action awareness rule ( this is the player aware of actions by visible actors rule ):
-! === equally specific with ===
-! Rule 3/4 ! A player's action awareness rule ( this is the player aware of actions on visible nouns rule ):
-! === equally specific with ===
-! Rule 4/4 ! A player's action awareness rule ( this is the player aware of actions on visible second nouns rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! A player's action awareness rule ( this is the player aware of his own actions rule ):
-[ R_33 ;
- if (debug_rules) DB_Rule(R_33, 33);
- ! [2: if the player is the actor]
- if (((player == actor)))
- {! [3: rule succeeds]
- RulebookSucceeds(); rtrue;
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A player's action awareness rule ( this is the player aware of actions by visible actors rule ):
-[ R_34 ;
- if (debug_rules) DB_Rule(R_34, 34);
- ! [2: if the player is not the actor and the player can see the actor]
- if ((((~~((player == actor))))) && (((TestVisibility(player,actor)))))
- {! [3: rule succeeds]
- RulebookSucceeds(); rtrue;
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A player's action awareness rule ( this is the player aware of actions on visible nouns rule ):
-[ R_35 ;
- if (debug_rules) DB_Rule(R_35, 35);
- ! [2: if the noun is a thing and the player can see the noun]
- if ((((noun ofclass K2_thing))) && (((TestVisibility(player,noun)))))
- {! [3: rule succeeds]
- RulebookSucceeds(); rtrue;
- }
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! A player's action awareness rule ( this is the player aware of actions on visible second nouns rule ):
-[ R_36 ;
- if (debug_rules) DB_Rule(R_36, 36);
- ! [2: if the second noun is a thing and the player can see the second noun]
- if ((((second ofclass K2_thing))) && (((TestVisibility(player,second)))))
- {! [3: rule succeeds]
- RulebookSucceeds(); rtrue;
- }
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: Visibility (B16_visibility)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! The last visibility rule ( this is the can't act in the dark rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! The last visibility rule ( this is the can't act in the dark rule ):
-[ R_37 ;
- if (debug_rules) DB_Rule(R_37, 37);
- ! [2: if in darkness]
- if (((location==thedark)))
- {! [3: rule succeeds]
- RulebookSucceeds(); rtrue;
- }
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: Instead (B20_instead)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Instead of doing something to the cables:
-! >>> III.3.2 - Action/What/Thing Acted On >>>
-! Rule 2/2 ! Instead of doing something other than examining , talking , answering , asking , looking , waiting , getting off or exiting when the player is on the sofa:
-! ----------------------------------------------------------------------------------------------------
-! No specific request
-! Instead of doing something to the cables:
-[ R_800 ;
- if ((( (actor==player) && (noun) && (noun == inp1) && ((noun == I131_mess_of_cables) && (true))))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_800, 800);
- ! [2: say ~You don't particularly feel like sorting them out.~]
- say__p=1;! [3: ~You don't particularly feel like sorting them out.~]
- ParaContent(); print "You don't particularly feel like sorting them out."; new_line; .L_Say3; .L_SayX3;RulebookFails(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_800, 800, 'action');
- rfalse;
-];
-! No specific request
-! Instead of doing something other than examining , talking , answering , asking , looking , waiting , getting off or exiting when the player is on the sofa:
-[ R_801 ;
- if ((( (actor==player) && (~~((action ==##Exit or ##GetOff or ##Wait or ##Look or ##Ask or ##Answer))) && (self=actor,true) && (((I133_sofa == SupporterOf(player))))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_801, 801);
- ! [2: try exiting]
- TryAction(0, player, ##Exit, 0, 0);
- ! [3: continue the action]
- rfalse;
- RulebookFails(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_801, 801, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: After (B23_after)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! After asking the Petra about ~Lynne~:
-! ----------------------------------------------------------------------------------------------------
-! No specific request
-! After asking the Petra about ~Lynne~:
-[ R_802 ;
- if ((((action ==##Ask) && (actor==player) && ((noun == I139_petra) && (true)) && (Consult_Grammar_99(consult_from, consult_words)~=GPR_FAIL)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_802, 802);
- ! [2: say ~She says 'That's you, honey! You're a wonderful bun, yes you are!' She ruffles your hair.~]
- say__p=1;! [3: ~She says 'That's you, honey! You're a wonderful bun, yes you are!' She ruffles your hair.~]
- ParaContent(); print "She says ~That's you, honey! You're a wonderful bun, yes you are!~ She ruffles your hair."; new_line; .L_Say4; .L_SayX4;RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_802, 802, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: does the player mean (B25_does_the_player_mean)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Does the player mean taking something which is carried by the player ( this is the very unlikely to mean taking what's already carried rule ):
-! >>> III.3.2 - Action/What/Thing Acted On >>>
-! Rule 2/2 ! Does the player mean taking off something worn:
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Does the player mean taking something which is carried by the player ( this is the very unlikely to mean taking what's already carried rule ):
-[ R_38 ;
- if ((((action ==##Take) && (actor==player) && ((noun ofclass K2_thing) && (player == CarrierOf(noun)))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_38, 38);
- ! [2: it is very unlikely]
- RulebookSucceeds(22, RBNO_10); rtrue;
-
- } else if (debug_rules > 1) DB_Rule(R_38, 38, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Does the player mean taking off something worn:
-[ R_242 ;
- if ((((action ==##Disrobe) && (actor==player) && ((noun ofclass K2_thing) && ((Adj_0_t1_v10(noun))))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_242, 242);
- ! [2: it is very likely]
- RulebookSucceeds(22, RBNO_6); rtrue;
-
- } else if (debug_rules > 1) DB_Rule(R_242, 242, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: before Printing the name (B29_before_printing_the_name)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Before printing the name of a thing ( called the item being printed ) ( this is the make named things mentioned rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Before printing the name of a thing ( called the item being printed ) ( this is the make named things mentioned rule ):
-[ R_66
- tmp_0 ! Let/loop value, e.g., 'item being printed': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_66, 66);
- ! [2: if expanding text for comparison purposes]
- if ((say__comp))
- {! [3: continue the activity]
- rfalse;
- }
- ! [4: now the item being printed is mentioned]
- (Adj_67_t2_v10(tmp_0));
- } else if (debug_rules > 1) DB_Rule(R_66, 66, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Printing the plural name (B33_for_printing_the_plural_)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Rule for printing the plural name of something ( called the item ) ( this is the standard printing the plural name rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Rule for printing the plural name of something ( called the item ) ( this is the standard printing the plural name rule ):
-[ R_67
- tmp_0 ! Let/loop value, e.g., 'item': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_67, 67);
- ! [2: say the printed plural name of the item]
- say__p=1;! [3: the printed plural name of the item]
- ParaContent(); @push self; print (TEXT_TY_Say) GProperty(10, self=tmp_0,plural);@pull self; .L_Say5; .L_SayX5;RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_67, 67, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Printing a number (B36_for_printing_a_number)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Rule for printing a number of something ( called the item ) ( this is the standard printing a number of something rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Rule for printing a number of something ( called the item ) ( this is the standard printing a number of something rule ):
-[ R_68
- tmp_0 ! Let/loop value, e.g., 'item': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_68, 68);
- ! [2: say ~[listing group size in words] ~]
- say__p=1;! [3: listing group size in words]
- ParaContent(); print (number) say__n=(listing_size);! [4: ~ ~]
- ParaContent(); print " "; .L_Say6; .L_SayX6;! [5: carry out the printing the plural name activity with the item]
- CarryOutActivity(V1_printing_the_plural_name, tmp_0);
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_68, 68, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Printing the announcement of light (B66_for_printing_the_announc)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! This is the look around once light available rule:
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! This is the look around once light available rule:
-[ R_69 ;
- if (debug_rules) DB_Rule(R_69, 69);
- ! [2: try looking]
- TryAction(0, player, ##Look, 0, 0);
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Deciding whether all includes (B87_for_deciding_whether_all)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/5 ! Rule for deciding whether all includes a person while dropping or throwing or inserting or putting ( this is the exclude people from drop all rule ):
-! >>> III - When/while requirement >>>
-! Rule 2/5 ! Rule for deciding whether all includes scenery while taking or taking off or removing ( this is the exclude scenery from take all rule ):
-! >>> III.1 - Object To Which Rule Applies >>>
-! Rule 3/5 ! Rule for deciding whether all includes things enclosed by the person reaching while taking or taking off or removing ( this is the exclude indirect possessions from take all rule ):
-! >>> III.1 - Object To Which Rule Applies >>>
-! Rule 4/5 ! Rule for deciding whether all includes fixed in place things while taking or taking off or removing ( this is the exclude fixed in place things from take all rule ):
-! >>> III.1 - Object To Which Rule Applies >>>
-! Rule 5/5 ! Rule for deciding whether all includes people while taking or taking off or removing ( this is the exclude people from take all rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Rule for deciding whether all includes a person while dropping or throwing or inserting or putting ( this is the exclude people from drop all rule ):
-[ R_74 ;
- if (((((parameter_value ofclass K8_person))))) { ! Runs only when pattern matches
- if (((((((action ==##Drop) && (actor==player))))) || (((((action ==##ThrowAt) && (actor==player))))) || (((((action ==##Insert) && (actor==player))))) || (((((action ==##PutOn) && (actor==player))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_74, 74);
- ! [2: it does not]
- RulebookFails(22, RBNO_11); rtrue;
-
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_74, 74, 'context');
- } else if (debug_rules > 1) DB_Rule(R_74, 74, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Rule for deciding whether all includes scenery while taking or taking off or removing ( this is the exclude scenery from take all rule ):
-[ R_70 ;
- if ((((((Adj_59_t1_v10(parameter_value))) && (true))))) { ! Runs only when pattern matches
- if (((((((action ==##Take) && (actor==player))))) || (((((action ==##Disrobe) && (actor==player))))) || (((((action ==##Remove) && (actor==player))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_70, 70);
- ! [2: it does not]
- RulebookFails(22, RBNO_11); rtrue;
-
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_70, 70, 'context');
- } else if (debug_rules > 1) DB_Rule(R_70, 70, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Rule for deciding whether all includes things enclosed by the person reaching while taking or taking off or removing ( this is the exclude indirect possessions from take all rule ):
-[ R_73 ;
- if (((((parameter_value ofclass K2_thing) && (IndirectlyContains(actor,parameter_value)))))) { ! Runs only when pattern matches
- if (((((((action ==##Take) && (actor==player))))) || (((((action ==##Disrobe) && (actor==player))))) || (((((action ==##Remove) && (actor==player))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_73, 73);
- ! [2: it does not]
- RulebookFails(22, RBNO_11); rtrue;
-
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_73, 73, 'context');
- } else if (debug_rules > 1) DB_Rule(R_73, 73, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Rule for deciding whether all includes fixed in place things while taking or taking off or removing ( this is the exclude fixed in place things from take all rule ):
-[ R_72 ;
- if (((((parameter_value ofclass K2_thing) && ((Adj_57_t1_v10(parameter_value))))))) { ! Runs only when pattern matches
- if (((((((action ==##Take) && (actor==player))))) || (((((action ==##Disrobe) && (actor==player))))) || (((((action ==##Remove) && (actor==player))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_72, 72);
- ! [2: it does not]
- RulebookFails(22, RBNO_11); rtrue;
-
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_72, 72, 'context');
- } else if (debug_rules > 1) DB_Rule(R_72, 72, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Rule for deciding whether all includes people while taking or taking off or removing ( this is the exclude people from take all rule ):
-[ R_71 ;
- if (((((parameter_value ofclass K8_person))))) { ! Runs only when pattern matches
- if (((((((action ==##Take) && (actor==player))))) || (((((action ==##Disrobe) && (actor==player))))) || (((((action ==##Remove) && (actor==player))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_71, 71);
- ! [2: it does not]
- RulebookFails(22, RBNO_11); rtrue;
-
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_71, 71, 'context');
- } else if (debug_rules > 1) DB_Rule(R_71, 71, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Supplying a missing noun (B99_for_supplying_a_missing_)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/4 ! Rule for supplying a missing noun while an actor smelling ( this is the ambient odour rule ):
-! === equally specific with ===
-! Rule 2/4 ! Rule for supplying a missing noun while an actor listening ( this is the ambient sound rule ):
-! === equally specific with ===
-! Rule 3/4 ! Rule for supplying a missing noun while an actor going ( this is the block vaguely going rule ):
-! --- now the last-placed rules ---
-! Rule 4/4 ! Rule for supplying a missing noun while entering ( this is the find what to enter rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Rule for supplying a missing noun while an actor smelling ( this is the ambient odour rule ):
-[ R_75 ;
- if (((((((action ==##Smell) && (act_requester==nothing))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_75, 75);
- ! [2: now the noun is the touchability ceiling of the player]
- noun = TouchabilityCeiling(player);
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_75, 75, 'context');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Rule for supplying a missing noun while an actor listening ( this is the ambient sound rule ):
-[ R_76 ;
- if (((((((action ==##Listen) && (act_requester==nothing))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_76, 76);
- ! [2: now the noun is the touchability ceiling of the player]
- noun = TouchabilityCeiling(player);
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_76, 76, 'context');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Rule for supplying a missing noun while an actor going ( this is the block vaguely going rule ):
-[ R_77 ;
- if (((((((action ==##Go) && (act_requester==nothing))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_77, 77);
- ! [2: say ~You'll have to say which compass direction to go in.~ ( a )]
- say__p=1;! [3: ~You'll have to say which compass direction to go in.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_135); new_line; .L_Say7; .L_SayX7;RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_77, 77, 'context');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Rule for supplying a missing noun while entering ( this is the find what to enter rule ):
-[ R_162
- tmp_0 ! Let/loop value, e.g., 'box': thing
- ;
- if (((((((action ==##Enter) && (actor==player))))))) { ! Runs only while condition holds
- if (debug_rules) DB_Rule(R_162, 162);
- ! [2: if something enterable ( called the box ) is in the location]
- if ((((Prop_1() && (tmp_0=deferred_calling_list-->0, true)) || (tmp_0 = 0,false))))
- {! [3: now the noun is the box]
- noun = tmp_0;
- } else {
- ! [4: continue the activity]
- rfalse;
- }
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_162, 162, 'context');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: before Handling the final question (B116_before_handling_the_fin)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! This is the print the final question rule:
-! === equally specific with ===
-! Rule 2/3 ! This is the print the final prompt rule:
-! --- now the last-placed rules ---
-! Rule 3/3: READ_FINAL_ANSWER_R
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! This is the print the final question rule:
-[ R_79
- tmp_0 ! Let/loop value, e.g., 'named options count': number
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ct_0 ! currently selected table
- ct_1 ! currently selected row
- ;
- if (debug_rules) DB_Rule(R_79, 79);
- ! [2: let named options count be 0]
-
- tmp_0 = 0;
- ! [3: repeat through the table of final question options]
- @push ct_0; @push ct_1;
- for (tmp_1=T0_final_question_options, tmp_2=1, ct_0=tmp_1, ct_1=tmp_2:
- tmp_2<=TableRows(tmp_1):
- tmp_2++, ct_0=tmp_1, ct_1=tmp_2)
- if (TableRowIsBlank(ct_0, ct_1)==false)
- {! [4: if the only if victorious entry is false or the story has ended finally]
- if (((((TableLookUpEntry(ct_0,101,ct_1) && true) == (0 && true)))) || (((story_complete))))
- {! [5: if there is a final response rule entry or the final response activity entry is not empty]
- if ((((ExistsTableLookUpEntry(ct_0,103,ct_1)))) || (((~~(((Adj_17_t1_v33(TableLookUpEntry(ct_0,104,ct_1)))))))))
- {! [6: if there is a final question wording entry]
- if (((ExistsTableLookUpEntry(ct_0,100,ct_1))))
- {! [7: increase named options count by 1]
- tmp_0 = tmp_0 + 1;;
- }
- }
- }
- }
- @pull ct_1; @pull ct_0;! [8: if the named options count is less than 1]
- if (((tmp_0 < 1)))
- {! [9: abide by the immediately quit rule]
- if (FollowRulebook(IMMEDIATELY_QUIT_R)) rtrue;
- }
- ! [10: say ~Would you like to ~ ( a )]
- say__p=1;! [11: ~Would you like to ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=ct_0),(LocalParking-->2=ct_1),(LocalParking-->3=tmp_1),(LocalParking-->4=tmp_2),TX_R_136); .L_Say8; .L_SayX8;! [12: repeat through the table of final question options]
- @push ct_0; @push ct_1;
- for (tmp_1=T0_final_question_options, tmp_2=1, ct_0=tmp_1, ct_1=tmp_2:
- tmp_2<=TableRows(tmp_1):
- tmp_2++, ct_0=tmp_1, ct_1=tmp_2)
- if (TableRowIsBlank(ct_0, ct_1)==false)
- {! [13: if the only if victorious entry is false or the story has ended finally]
- if (((((TableLookUpEntry(ct_0,101,ct_1) && true) == (0 && true)))) || (((story_complete))))
- {! [14: if there is a final response rule entry or the final response activity entry is not empty]
- if ((((ExistsTableLookUpEntry(ct_0,103,ct_1)))) || (((~~(((Adj_17_t1_v33(TableLookUpEntry(ct_0,104,ct_1)))))))))
- {! [15: if there is a final question wording entry]
- if (((ExistsTableLookUpEntry(ct_0,100,ct_1))))
- {! [16: say final question wording entry]
- say__p=1;! [17: final question wording entry]
- ParaContent(); print (TEXT_TY_Say) TableLookUpEntry(ct_0,100,ct_1); .L_Say9; .L_SayX9;! [18: decrease named options count by 1]
- tmp_0 = tmp_0 - 1;;
- ! [19: if the named options count is 1]
- if (((tmp_0 == 1)))
- {! [20: if the serial comma option is active]
- if ((((Adj_25_t1_v16(6)))))
- {! [21: say ~,~]
- say__p=1;! [22: ~,~]
- ParaContent(); print ","; .L_Say10; .L_SayX10;}
- ! [23: say ~ or ~ ( b )]
- say__p=1;! [24: ~ or ~ ( b )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=ct_0),(LocalParking-->2=ct_1),(LocalParking-->3=tmp_1),(LocalParking-->4=tmp_2),TX_R_137); .L_Say11; .L_SayX11;} else {
- ! [25: if the named options count is 0]
- if (((tmp_0 == 0)))
- {! [26: say ~?[line break]~]
- say__p=1;! [27: ~?~]
- ParaContent(); print "?";! [28: line break]
- ParaContent(); new_line; .L_Say12; .L_SayX12;} else {
- ! [29: say ~, ~]
- say__p=1;! [30: ~, ~]
- ParaContent(); print ", "; .L_Say13; .L_SayX13;}
- }
- }
- }
- }
- }
- @pull ct_1; @pull ct_0;rfalse;
-];
-! From the Standard Rules
-! No specific request
-! This is the print the final prompt rule:
-[ R_78 ;
- if (debug_rules) DB_Rule(R_78, 78);
- ! [2: say ~> [run paragraph on]~ ( a )]
- say__p=1;! [3: ~> [run paragraph on]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_138); .L_Say14; .L_SayX14;rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Handling the final question (B117_for_handling_the_final_)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! This is the standard respond to final question rule:
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! This is the standard respond to final question rule:
-[ R_80
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- ct_0 ! currently selected table
- ct_1 ! currently selected row
- ;
- if (debug_rules) DB_Rule(R_80, 80);
- ! [2: repeat through the table of final question options]
- @push ct_0; @push ct_1;
- for (tmp_0=T0_final_question_options, tmp_1=1, ct_0=tmp_0, ct_1=tmp_1:
- tmp_1<=TableRows(tmp_0):
- tmp_1++, ct_0=tmp_0, ct_1=tmp_1)
- if (TableRowIsBlank(ct_0, ct_1)==false)
- {! [3: if the only if victorious entry is false or the story has ended finally]
- if (((((TableLookUpEntry(ct_0,101,ct_1) && true) == (0 && true)))) || (((story_complete))))
- {! [4: if there is a final response rule entry or the final response activity entry is not empty]
- if ((((ExistsTableLookUpEntry(ct_0,103,ct_1)))) || (((~~(((Adj_17_t1_v33(TableLookUpEntry(ct_0,104,ct_1)))))))))
- {! [5: if the player's command matches the topic entry]
- if (((SnippetMatches(players_command, TableLookUpEntry(ct_0,102,ct_1)))))
- {! [6: if there is a final response rule entry]
- if (((ExistsTableLookUpEntry(ct_0,103,ct_1))))
- {! [7: abide by final response rule entry]
- if (FollowRulebook(TableLookUpEntry(ct_0,103,ct_1))) rtrue;
- } else {
- ! [8: carry out the final response activity entry activity]
- CarryOutActivity(TableLookUpEntry(ct_0,104,ct_1));
- }
- ! [9: rule succeeds]
- RulebookSucceeds(); rtrue;
- }
- }
- }
- }
- @pull ct_1; @pull ct_0;! [10: say ~Please give one of the answers above.~ ( a )]
- say__p=1;! [11: ~Please give one of the answers above.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=ct_0),(LocalParking-->1=ct_1),(LocalParking-->2=tmp_0),(LocalParking-->3=tmp_1),TX_R_139); new_line; .L_Say15; .L_SayX15;rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: before Printing the locale description (B119_before_printing_the_loc)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Before printing the locale description ( this is the initialise locale description rule ):
-! === equally specific with ===
-! Rule 2/2 ! Before printing the locale description ( this is the find notable locale objects rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Before printing the locale description ( this is the initialise locale description rule ):
-[ R_83
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- if (debug_rules) DB_Rule(R_83, 83);
- ! [2: now the locale paragraph count is 0]
- (Global_Vars-->9) = 0;
- ! [3: repeat through the table of locale priorities]
- @push ct_0; @push ct_1;
- for (tmp_0=T1_locale_priorities, tmp_1=1, ct_0=tmp_0, ct_1=tmp_1:
- tmp_1<=TableRows(tmp_0):
- tmp_1++, ct_0=tmp_0, ct_1=tmp_1)
- if (TableRowIsBlank(ct_0, ct_1)==false)
- {! [4: blank out the whole row]
- TableBlankOutRow(ct_0, ct_1);
- }
- @pull ct_1; @pull ct_0;rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Before printing the locale description ( this is the find notable locale objects rule ):
-[ R_84
- tmp_0 ! Let/loop value, e.g., 'domain': object
- ;
- if (debug_rules) DB_Rule(R_84, 84);
- ! [2: let the domain be the parameter-object]
-
- tmp_0 = parameter_value;
- ! [3: carry out the choosing notable locale objects activity with the domain]
- CarryOutActivity(V31_choosing_notable_locale_, tmp_0);
- ! [4: continue the activity]
- rfalse;
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Printing the locale description (B120_for_printing_the_locale)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! For printing the locale description ( this is the interesting locale paragraphs rule ):
-! === equally specific with ===
-! Rule 2/2 ! For printing the locale description ( this is the you-can-also-see rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! For printing the locale description ( this is the interesting locale paragraphs rule ):
-[ R_85
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ct_0 ! currently selected table
- ct_1 ! currently selected row
- ;
- if (debug_rules) DB_Rule(R_85, 85);
- ! [2: let the domain be the parameter-object]
-
- tmp_0 = parameter_value;
- ! [3: sort the table of locale priorities in locale description priority order]
- TableSort(T1_locale_priorities, 106, 1);
- ! [4: repeat through the table of locale priorities]
- @push ct_0; @push ct_1;
- for (tmp_1=T1_locale_priorities, tmp_2=1, ct_0=tmp_1, ct_1=tmp_2:
- tmp_2<=TableRows(tmp_1):
- tmp_2++, ct_0=tmp_1, ct_1=tmp_2)
- if (TableRowIsBlank(ct_0, ct_1)==false)
- {! [5: carry out the printing a locale paragraph about activity with the notable-object entry]
- CarryOutActivity(V32_printing_a_locale_paragr, TableLookUpEntry(ct_0,105,ct_1));
- }
- @pull ct_1; @pull ct_0;! [6: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing the locale description ( this is the you-can-also-see rule ):
-[ R_86
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'mentionable count': number
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- tmp_3 ! Let/loop value (deallocated by end of phrase)
- tmp_4 ! Let/loop value (deallocated by end of phrase)
- tmp_5 ! Let/loop value (deallocated by end of phrase)
- ct_0 ! currently selected table
- ct_1 ! currently selected row
- ;
- if (debug_rules) DB_Rule(R_86, 86);
- ! [2: let the domain be the parameter-object]
-
- tmp_0 = parameter_value;
- ! [3: let the mentionable count be 0]
-
- tmp_1 = 0;
- ! [4: repeat with item running through things]
- for (tmp_2=Prop_2(0), tmp_3=Prop_2(tmp_2): tmp_2: tmp_2=tmp_3, tmp_3=Prop_2(tmp_3))
- {! [5: now the item is not marked for listing]
- (Adj_65_t3_v10(tmp_2));
- }
- ! [6: repeat through the table of locale priorities]
- @push ct_0; @push ct_1;
- for (tmp_2=T1_locale_priorities, tmp_3=1, ct_0=tmp_2, ct_1=tmp_3:
- tmp_3<=TableRows(tmp_2):
- tmp_3++, ct_0=tmp_2, ct_1=tmp_3)
- if (TableRowIsBlank(ct_0, ct_1)==false)
- {! [7: if the locale description priority entry is greater than 0]
- if (((TableLookUpEntry(ct_0,106,ct_1) > 0)))
- {! [8: now the notable-object entry is marked for listing]
- (Adj_65_t2_v10(TableLookUpEntry(ct_0,105,ct_1)));
- }
- ! [9: increase the mentionable count by 1]
- tmp_1 = tmp_1 + 1;;
- }
- @pull ct_1; @pull ct_0;! [10: if the mentionable count is greater than 0]
- if (((tmp_1 > 0)))
- {! [11: repeat with item running through things]
- for (tmp_2=Prop_3(0), tmp_3=Prop_3(tmp_2): tmp_2: tmp_2=tmp_3, tmp_3=Prop_3(tmp_3))
- {! [12: if the item is mentioned]
- if ((((Adj_67_t1_v10(tmp_2)))))
- {! [13: now the item is not marked for listing]
- (Adj_65_t3_v10(tmp_2));
- }
- }
- ! [14: begin the listing nondescript items activity with the domain]
- BeginActivity(V8_listing_nondescript_items, tmp_0);
- ! [15: if the number of marked for listing things is 0]
- if ((((Prop_4()) == 0)))
- {! [16: abandon the listing nondescript items activity with the domain]
- AbandonActivity(V8_listing_nondescript_items, tmp_0);
- } else {
- ! [17: if handling the listing nondescript items activity with the domain]
- if (((~~(ForActivity(V8_listing_nondescript_items, tmp_0)))))
- {! [18: if the domain is the location]
- if (((tmp_0 == real_location)))
- {! [19: say ~[We] ~ ( a )]
- say__p=1;! [20: ~[We] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),(LocalParking-->3=tmp_3),(LocalParking-->4=ct_0),(LocalParking-->5=ct_1),TX_R_140); .L_Say16; .L_SayX16;} else {
- ! [21: if the domain is a supporter or the domain is an animal]
- if ((((tmp_0 ofclass K6_supporter))) || (((tmp_0 ofclass K12_animal))))
- {! [22: say ~On [the domain] [we] ~ ( b )]
- say__p=1;! [23: ~On [the domain] [we] ~ ( b )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),(LocalParking-->3=tmp_3),(LocalParking-->4=ct_0),(LocalParking-->5=ct_1),TX_R_141); .L_Say17; .L_SayX17;} else {
- ! [24: say ~In [the domain] [we] ~ ( c )]
- say__p=1;! [25: ~In [the domain] [we] ~ ( c )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),(LocalParking-->3=tmp_3),(LocalParking-->4=ct_0),(LocalParking-->5=ct_1),TX_R_142); .L_Say18; .L_SayX18;}
- }
- ! [26: if the locale paragraph count is greater than 0]
- if ((((Global_Vars-->9) > 0)))
- {! [27: say ~[regarding the player][can] also see ~ ( d )]
- say__p=1;! [28: ~[regarding the player][can] also see ~ ( d )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),(LocalParking-->3=tmp_3),(LocalParking-->4=ct_0),(LocalParking-->5=ct_1),TX_R_143); .L_Say19; .L_SayX19;} else {
- ! [29: say ~[regarding the player][can] see ~ ( e )]
- say__p=1;! [30: ~[regarding the player][can] see ~ ( e )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),(LocalParking-->3=tmp_3),(LocalParking-->4=ct_0),(LocalParking-->5=ct_1),TX_R_144); .L_Say20; .L_SayX20;}
- ! [31: let the common holder be nothing]
-
- tmp_2 = nothing;
- ! [32: let contents form of list be true]
-
- tmp_3 = 1;
- ! [33: repeat with list item running through marked for listing things]
- for (tmp_4=Prop_5(0), tmp_5=Prop_5(tmp_4): tmp_4: tmp_4=tmp_5, tmp_5=Prop_5(tmp_5))
- {! [34: if the holder of the list item is not the common holder]
- if (((~~(((HolderOf(tmp_4)) == tmp_2)))))
- {! [35: if the common holder is nothing]
- if (((tmp_2 == nothing)))
- {! [36: now the common holder is the holder of the list item]
- tmp_2 = (HolderOf(tmp_4));
- } else {
- ! [37: now contents form of list is false]
- tmp_3 = 0;
- }
- }
- ! [38: if the list item is mentioned]
- if ((((Adj_67_t1_v10(tmp_4)))))
- {! [39: now the list item is not marked for listing]
- (Adj_65_t3_v10(tmp_4));
- }
- }
- ! [40: filter list recursion to unmentioned things]
- list_filter_routine = Prop_6;
- ! [41: if contents form of list is true and the common holder is not nothing]
- if (((((tmp_3 && true) == (1 && true)))) && (((~~((tmp_2 == nothing))))))
- {! [42: list the contents of the common holder , as a sentence , including contents , giving brief inventory information , tersely , not listing concealed items , listing marked items only]
- WriteListFrom(child(tmp_2), 2776);
- } else {
- ! [43: say ~[a list of marked for listing things including contents]~]
- say__p=1;! [44: a list of marked for listing things including contents]
- ParaContent(); objectloop(tmp_4 ofclass Object)
- if (((tmp_4 ofclass K2_thing) && ((Adj_65_t1_v10(tmp_4)))))
- give tmp_4 workflag2;
- else
- give tmp_4 ~workflag2;
- WriteListOfMarkedObjects(ENGLISH_BIT+RECURSE_BIT+PARTINV_BIT+
- TERSE_BIT+CONCEAL_BIT); .L_Say21; .L_SayX21;}
- ! [45: if the domain is the location]
- if (((tmp_0 == real_location)))
- {! [46: say ~ here~ ( f )]
- say__p=1;! [47: ~ here~ ( f )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),(LocalParking-->3=tmp_3),(LocalParking-->4=ct_0),(LocalParking-->5=ct_1),(LocalParking-->6=tmp_4),(LocalParking-->7=tmp_5),TX_R_145); .L_Say22; .L_SayX22;}
- ! [48: say ~.[paragraph break]~]
- say__p=1;! [49: ~.~]
- ParaContent(); print ".";! [50: paragraph break]
- ParaContent(); DivideParagraphPoint(); new_line; .L_Say23; .L_SayX23;! [51: unfilter list recursion]
- list_filter_routine = 0;
- }
- ! [52: end the listing nondescript items activity with the domain]
- EndActivity(V8_listing_nondescript_items, tmp_0);
- }
- }
- ! [53: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Choosing notable locale objects (B123_for_choosing_notable_lo)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! For choosing notable locale objects ( this is the standard notable locale objects rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! For choosing notable locale objects ( this is the standard notable locale objects rule ):
-[ R_87
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'held item': object
- ;
- if (debug_rules) DB_Rule(R_87, 87);
- ! [2: let the domain be the parameter-object]
-
- tmp_0 = parameter_value;
- ! [3: let the held item be the first thing held by the domain]
-
- tmp_1 = (child(tmp_0));
- ! [4: while the held item is a thing]
- while (((tmp_1 ofclass K2_thing)))
- {! [5: set the locale priority of the held item to 5]
- (PHR_82_r0 (tmp_1,5));
- ! [6: now the held item is the next thing held after the held item]
- tmp_1 = (sibling(tmp_1));
- }
- ! [7: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: for Printing a locale paragraph about (B126_for_printing_a_locale_p)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/9 ! For printing a locale paragraph about a supporter ( called the tabletop ) ( this is the initial appearance on supporters rule ):
-! >>> III.1 - Object To Which Rule Applies >>>
-! Rule 2/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the don't mention player's supporter in room descriptions rule ):
-! === equally specific with ===
-! Rule 3/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the don't mention scenery in room descriptions rule ):
-! === equally specific with ===
-! Rule 4/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the don't mention undescribed items in room descriptions rule ):
-! === equally specific with ===
-! Rule 5/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the set pronouns from items in room descriptions rule ):
-! === equally specific with ===
-! Rule 6/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the offer items to writing a paragraph about rule ):
-! === equally specific with ===
-! Rule 7/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the use initial appearance in room descriptions rule ):
-! === equally specific with ===
-! Rule 8/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the describe what's on scenery supporters in room descriptions rule ):
-! === equally specific with ===
-! Rule 9/9 ! For printing a locale paragraph about a thing ( called the item ) ( this is the describe what's on mentioned supporters in room descriptions rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a supporter ( called the tabletop ) ( this is the initial appearance on supporters rule ):
-[ R_94
- tmp_0 ! Let/loop value, e.g., 'tabletop': supporter
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K6_supporter) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_94, 94);
- ! [2: repeat with item running through not handled things on the tabletop which provide the property initial appearance]
- for (tmp_1=Prop_7(tmp_0,tmp_0,tmp_0,0), tmp_2=Prop_7(tmp_0,tmp_0,tmp_0,tmp_1): tmp_1: tmp_1=tmp_2, tmp_2=Prop_7(tmp_0,tmp_0,tmp_0,tmp_2))
- {! [3: if the item is not a person and the initial appearance of the item is not ~~ and the item is not undescribed]
- if ((((~~((tmp_1 ofclass K8_person))))) && ((((~~(( BlkValueCompare(GProperty(10, tmp_1,initial), EMPTY_TEXT_VALUE) == 0))))) && (((~~(((Adj_64_t1_v10(tmp_1)))))))))
- {! [4: now the item is mentioned]
- (Adj_67_t2_v10(tmp_1));
- ! [5: say initial appearance of the item]
- say__p=1;! [6: initial appearance of the item]
- ParaContent(); @push self; print (TEXT_TY_Say) GProperty(10, self=tmp_1,initial);@pull self; .L_Say24; .L_SayX24;! [7: say paragraph break]
- say__p=1;! [8: paragraph break]
- ParaContent(); DivideParagraphPoint(); new_line; .L_Say25; .L_SayX25;}
- }
- ! [9: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_94, 94, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the don't mention player's supporter in room descriptions rule ):
-[ R_88
- tmp_0 ! Let/loop value, e.g., 'item': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_88, 88);
- ! [2: if the item encloses the player]
- if (((IndirectlyContains(tmp_0,player))))
- {! [3: set the locale priority of the item to 0]
- (PHR_82_r0 (tmp_0,0));
- }
- ! [4: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_88, 88, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the don't mention scenery in room descriptions rule ):
-[ R_89
- tmp_0 ! Let/loop value, e.g., 'item': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_89, 89);
- ! [2: if the item is scenery]
- if ((((Adj_59_t1_v10(tmp_0)))))
- {! [3: set the locale priority of the item to 0]
- (PHR_82_r0 (tmp_0,0));
- }
- ! [4: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_89, 89, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the don't mention undescribed items in room descriptions rule ):
-[ R_90
- tmp_0 ! Let/loop value, e.g., 'item': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_90, 90);
- ! [2: if the item is undescribed]
- if ((((Adj_64_t1_v10(tmp_0)))))
- {! [3: set the locale priority of the item to 0]
- (PHR_82_r0 (tmp_0,0));
- }
- ! [4: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_90, 90, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the set pronouns from items in room descriptions rule ):
-[ R_91
- tmp_0 ! Let/loop value, e.g., 'item': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_91, 91);
- ! [2: if the item is not mentioned]
- if (((~~(((Adj_67_t1_v10(tmp_0)))))))
- {! [3: set pronouns from the item]
- PronounNotice(tmp_0);
- }
- ! [4: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_91, 91, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the offer items to writing a paragraph about rule ):
-[ R_92
- tmp_0 ! Let/loop value, e.g., 'item': thing
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_92, 92);
- ! [2: if the item is not mentioned]
- if (((~~(((Adj_67_t1_v10(tmp_0)))))))
- {! [3: if a paragraph break is pending]
- if (((say__p)))
- {! [4: say ~[conditional paragraph break]~]
- say__p=1;! [5: conditional paragraph break]
- ParaContent(); DivideParagraphPoint(); .L_Say26; .L_SayX26;}
- ! [6: carry out the writing a paragraph about activity with the item]
- CarryOutActivity(V7_writing_a_paragraph_about, tmp_0);
- ! [7: if a paragraph break is pending]
- if (((say__p)))
- {! [8: increase the locale paragraph count by 1]
- (Global_Vars-->9) = (Global_Vars-->9) + 1;;
- ! [9: now the item is mentioned]
- (Adj_67_t2_v10(tmp_0));
- ! [10: say ~[conditional paragraph break]~]
- say__p=1;! [11: conditional paragraph break]
- ParaContent(); DivideParagraphPoint(); .L_Say27; .L_SayX27;}
- }
- ! [12: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_92, 92, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the use initial appearance in room descriptions rule ):
-[ R_93
- tmp_0 ! Let/loop value, e.g., 'item': thing
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_93, 93);
- ! [2: if the item is not mentioned]
- if (((~~(((Adj_67_t1_v10(tmp_0)))))))
- {! [3: if the item provides the property initial appearance and the item is not handled and the initial appearance of the item is not ~~]
- if ((((WhetherProvides(tmp_0, false, initial)))) && ((((~~(((Adj_62_t1_v10(tmp_0))))))) && (((~~(( BlkValueCompare(GProperty(10, tmp_0,initial), EMPTY_TEXT_VALUE) == 0)))))))
- {! [4: increase the locale paragraph count by 1]
- (Global_Vars-->9) = (Global_Vars-->9) + 1;;
- ! [5: say ~[initial appearance of the item]~]
- say__p=1;! [6: initial appearance of the item]
- ParaContent(); @push self; print (TEXT_TY_Say) GProperty(10, self=tmp_0,initial);@pull self; .L_Say28; .L_SayX28;! [7: say ~[paragraph break]~]
- say__p=1;! [8: paragraph break]
- ParaContent(); DivideParagraphPoint(); new_line; .L_Say29; .L_SayX29;! [9: if a locale-supportable thing is on the item]
- if ((((Prop_8(tmp_0)))))
- {! [10: repeat with possibility running through things on the item]
- for (tmp_1=Prop_9(tmp_0,0), tmp_2=Prop_9(tmp_0,tmp_1): tmp_1: tmp_1=tmp_2, tmp_2=Prop_9(tmp_0,tmp_2))
- {! [11: now the possibility is marked for listing]
- (Adj_65_t2_v10(tmp_1));
- ! [12: if the possibility is mentioned]
- if ((((Adj_67_t1_v10(tmp_1)))))
- {! [13: now the possibility is not marked for listing]
- (Adj_65_t3_v10(tmp_1));
- }
- }
- ! [14: say ~On [the item] ~ ( a )]
- say__p=1;! [15: ~On [the item] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_146); .L_Say30; .L_SayX30;! [16: list the contents of the item , as a sentence , including contents , giving brief inventory information , tersely , not listing concealed items , prefacing with is/are , listing marked items only]
- WriteListFrom(child(tmp_0), 3800);
- ! [17: say ~.[paragraph break]~]
- say__p=1;! [18: ~.~]
- ParaContent(); print ".";! [19: paragraph break]
- ParaContent(); DivideParagraphPoint(); new_line; .L_Say31; .L_SayX31;}
- ! [20: now the item is mentioned]
- (Adj_67_t2_v10(tmp_0));
- }
- }
- ! [21: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_93, 93, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the describe what's on scenery supporters in room descriptions rule ):
-[ R_96
- tmp_0 ! Let/loop value, e.g., 'item': thing
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_96, 96);
- ! [2: if the item is scenery and the item does not enclose the player]
- if (((((Adj_59_t1_v10(tmp_0))))) && (((~~((IndirectlyContains(tmp_0,player)))))))
- {! [3: if a locale-supportable thing is on the item]
- if ((((Prop_10(tmp_0)))))
- {! [4: set pronouns from the item]
- PronounNotice(tmp_0);
- ! [5: repeat with possibility running through things on the item]
- for (tmp_1=Prop_11(tmp_0,0), tmp_2=Prop_11(tmp_0,tmp_1): tmp_1: tmp_1=tmp_2, tmp_2=Prop_11(tmp_0,tmp_2))
- {! [6: now the possibility is marked for listing]
- (Adj_65_t2_v10(tmp_1));
- ! [7: if the possibility is mentioned]
- if ((((Adj_67_t1_v10(tmp_1)))))
- {! [8: now the possibility is not marked for listing]
- (Adj_65_t3_v10(tmp_1));
- }
- }
- ! [9: increase the locale paragraph count by 1]
- (Global_Vars-->9) = (Global_Vars-->9) + 1;;
- ! [10: say ~On [the item] ~ ( a )]
- say__p=1;! [11: ~On [the item] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_147); .L_Say32; .L_SayX32;! [12: list the contents of the item , as a sentence , including contents , giving brief inventory information , tersely , not listing concealed items , prefacing with is/are , listing marked items only]
- WriteListFrom(child(tmp_0), 3800);
- ! [13: say ~.[paragraph break]~]
- say__p=1;! [14: ~.~]
- ParaContent(); print ".";! [15: paragraph break]
- ParaContent(); DivideParagraphPoint(); new_line; .L_Say33; .L_SayX33;}
- }
- ! [16: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_96, 96, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! For printing a locale paragraph about a thing ( called the item ) ( this is the describe what's on mentioned supporters in room descriptions rule ):
-[ R_97
- tmp_0 ! Let/loop value, e.g., 'item': thing
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((tmp_0 = parameter_value, (((parameter_value ofclass K2_thing) && (tmp_0=(parameter_value), true))))) || (tmp_0 = 0,false))) { ! Runs only when pattern matches
- if (debug_rules) DB_Rule(R_97, 97);
- ! [2: if the item is mentioned and the item is not undescribed and the item is not scenery and the item does not enclose the player]
- if (((((Adj_67_t1_v10(tmp_0))))) && ((((~~(((Adj_64_t1_v10(tmp_0))))))) && ((((~~(((Adj_59_t1_v10(tmp_0))))))) && (((~~((IndirectlyContains(tmp_0,player)))))))))
- {! [3: if a locale-supportable thing is on the item]
- if ((((Prop_12(tmp_0)))))
- {! [4: set pronouns from the item]
- PronounNotice(tmp_0);
- ! [5: repeat with possibility running through things on the item]
- for (tmp_1=Prop_13(tmp_0,0), tmp_2=Prop_13(tmp_0,tmp_1): tmp_1: tmp_1=tmp_2, tmp_2=Prop_13(tmp_0,tmp_2))
- {! [6: now the possibility is marked for listing]
- (Adj_65_t2_v10(tmp_1));
- ! [7: if the possibility is mentioned]
- if ((((Adj_67_t1_v10(tmp_1)))))
- {! [8: now the possibility is not marked for listing]
- (Adj_65_t3_v10(tmp_1));
- }
- }
- ! [9: increase the locale paragraph count by 1]
- (Global_Vars-->9) = (Global_Vars-->9) + 1;;
- ! [10: say ~On [the item] ~ ( a )]
- say__p=1;! [11: ~On [the item] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_148); .L_Say34; .L_SayX34;! [12: list the contents of the item , as a sentence , including contents , giving brief inventory information , tersely , not listing concealed items , prefacing with is/are , listing marked items only]
- WriteListFrom(child(tmp_0), 3800);
- ! [13: say ~.[paragraph break]~]
- say__p=1;! [14: ~.~]
- ParaContent(); print ".";! [15: paragraph break]
- ParaContent(); DivideParagraphPoint(); new_line; .L_Say35; .L_SayX35;}
- }
- ! [16: continue the activity]
- rfalse;
- RulebookSucceeds(); rtrue;
- } else if (debug_rules > 1) DB_Rule(R_97, 97, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Taking inventory (B132_carry_out_taking_invent)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Carry out taking inventory ( this is the print empty inventory rule ):
-! === equally specific with ===
-! Rule 2/2 ! Carry out taking inventory ( this is the print standard inventory rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out taking inventory ( this is the print empty inventory rule ):
-[ R_98 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_98, 98);
- ! [2: if the first thing held by the player is nothing]
- if ((((child(player)) == nothing)))
- {! [3: say ~[We] [are] carrying nothing.~ ( a )]
- say__p=1;! [4: ~[We] [are] carrying nothing.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_149); new_line; .L_Say36; .L_SayX36;rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_98, 98, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out taking inventory ( this is the print standard inventory rule ):
-[ R_99 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_99, 99);
- ! [2: say ~[We] [are] carrying:[line break]~ ( a )]
- say__p=1;! [3: ~[We] [are] carrying:[line break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_150); .L_Say37; .L_SayX37;! [4: list the contents of the player , with newlines , indented , including contents , giving inventory information , with extra indentation]
- WriteListFrom(child(player), 8215);
- } else if (debug_rules > 1) DB_Rule(R_99, 99, 'actor');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Taking inventory (B133_report_taking_inventory)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor taking inventory ( this is the report other people taking inventory rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor taking inventory ( this is the report other people taking inventory rule ):
-[ R_100 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_100, 100);
- ! [2: if the actor is not the player and the action is not silent]
- if ((((~~((actor == player))))) && (((keep_silent == false))))
- {! [3: say ~[The actor] [look] through [their] possessions.~ ( a )]
- say__p=1;! [4: ~[The actor] [look] through [their] possessions.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_151); new_line; .L_Say38; .L_SayX38;}
- } else if (debug_rules > 1) DB_Rule(R_100, 100, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Taking (B134_check_taking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/12 ! Check an actor taking ( this is the can't take yourself rule ):
-! === equally specific with ===
-! Rule 2/12 ! Check an actor taking ( this is the can't take other people rule ):
-! === equally specific with ===
-! Rule 3/12 ! Check an actor taking ( this is the can't take component parts rule ):
-! === equally specific with ===
-! Rule 4/12 ! Check an actor taking ( this is the can't take people's possessions rule ):
-! === equally specific with ===
-! Rule 5/12 ! Check an actor taking ( this is the can't take items out of play rule ):
-! === equally specific with ===
-! Rule 6/12 ! Check an actor taking ( this is the can't take what you're inside rule ):
-! === equally specific with ===
-! Rule 7/12 ! Check an actor taking ( this is the can't take what's already taken rule ):
-! === equally specific with ===
-! Rule 8/12 ! Check an actor taking ( this is the can't take scenery rule ):
-! === equally specific with ===
-! Rule 9/12 ! Check an actor taking ( this is the can only take things rule ):
-! === equally specific with ===
-! Rule 10/12 ! Check an actor taking ( this is the can't take what's fixed in place rule ):
-! === equally specific with ===
-! Rule 11/12 ! Check an actor taking ( this is the use player's holdall to avoid exceeding carrying capacity rule ):
-! === equally specific with ===
-! Rule 12/12 ! Check an actor taking ( this is the can't exceed carrying capacity rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take yourself rule ):
-[ R_101 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_101, 101);
- ! [2: if the actor is the noun]
- if (((actor == noun)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [are] always self-possessed.~ ( a )]
- say__p=1;! [5: ~[We] [are] always self-possessed.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_152); new_line; .L_Say39; .L_SayX39;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_101, 101, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take other people rule ):
-[ R_102 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_102, 102);
- ! [2: if the noun is a person]
- if (((noun ofclass K8_person)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~I don't suppose [the noun] [would care] for that.~ ( a )]
- say__p=1;! [5: ~I don't suppose [the noun] [would care] for that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_153); new_line; .L_Say40; .L_SayX40;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_102, 102, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take component parts rule ):
-[ R_103
- tmp_0 ! Let/loop value, e.g., 'whole': thing
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_103, 103);
- ! [2: if the noun is part of something ( called the whole )]
- if ((((noun.component_parent) ofclass K2_thing) && (tmp_0=((noun.component_parent)), true)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][Those] [seem] to be a part of [the whole].~ ( a )]
- say__p=1;! [5: ~[regarding the noun][Those] [seem] to be a part of [the whole].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_154); new_line; .L_Say41; .L_SayX41;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_103, 103, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take people's possessions rule ):
-[ R_104
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'owner': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_104, 104);
- ! [2: let the local ceiling be the common ancestor of the actor with the noun]
-
- tmp_0 = (CommonAncestor(actor, noun));
- ! [3: let the owner be the not-counting-parts holder of the noun]
-
- tmp_1 = (CoreOfParentOfCoreOf(noun));
- ! [4: while the owner is not nothing and the owner is not the local ceiling]
- while ((((~~((tmp_1 == nothing))))) && (((~~((tmp_1 == tmp_0))))))
- {! [5: if the owner is a person]
- if (((tmp_1 ofclass K8_person)))
- {! [6: if the actor is the player]
- if (((actor == player)))
- {! [7: say ~[regarding the noun][Those] [seem] to belong to [the owner].~ ( a )]
- say__p=1;! [8: ~[regarding the noun][Those] [seem] to belong to [the owner].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_155); new_line; .L_Say42; .L_SayX42;}
- ! [9: stop the action]
- rtrue;
- }
- ! [10: let the owner be the not-counting-parts holder of the owner]
- tmp_1 = (CoreOfParentOfCoreOf(tmp_1));
- }
- } else if (debug_rules > 1) DB_Rule(R_104, 104, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take items out of play rule ):
-[ R_105
- tmp_0 ! Let/loop value, e.g., 'H': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_105, 105);
- ! [2: let h be the noun]
-
- tmp_0 = noun;
- ! [3: while h is not nothing and h is not a room]
- while ((((~~((tmp_0 == nothing))))) && (((~~((tmp_0 ofclass K1_room))))))
- {! [4: let h be the not-counting-parts holder of h]
- tmp_0 = (CoreOfParentOfCoreOf(tmp_0));
- }
- ! [5: if h is nothing]
- if (((tmp_0 == nothing)))
- {! [6: if the actor is the player]
- if (((actor == player)))
- {! [7: say ~[regarding the noun][Those] [aren't] available.~ ( a )]
- say__p=1;! [8: ~[regarding the noun][Those] [aren't] available.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_156); new_line; .L_Say43; .L_SayX43;}
- ! [9: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_105, 105, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take what you're inside rule ):
-[ R_106
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_106, 106);
- ! [2: let the local ceiling be the common ancestor of the actor with the noun]
-
- tmp_0 = (CommonAncestor(actor, noun));
- ! [3: if the local ceiling is the noun]
- if (((tmp_0 == noun)))
- {! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[We] [would have] to get [if noun is a supporter]off[otherwise]out of[end if] [the noun] first.~ ( a )]
- say__p=1;! [6: ~[We] [would have] to get [if noun is a supporter]off[otherwise]out of[end if] [the noun] first.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_157); new_line; .L_Say44; .L_SayX44;}
- ! [7: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_106, 106, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take what's already taken rule ):
-[ R_107 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_107, 107);
- ! [2: if the actor is carrying the noun or the actor is wearing the noun]
- if ((((actor == CarrierOf(noun)))) || (((actor == WearerOf(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] already [have] [regarding the noun][those].~ ( a )]
- say__p=1;! [5: ~[We] already [have] [regarding the noun][those].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_158); new_line; .L_Say45; .L_SayX45;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_107, 107, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take scenery rule ):
-[ R_108 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_108, 108);
- ! [2: if the noun is scenery]
- if ((((Adj_59_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] hardly portable.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] hardly portable.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_159); new_line; .L_Say46; .L_SayX46;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_108, 108, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can only take things rule ):
-[ R_109 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_109, 109);
- ! [2: if the noun is not a thing]
- if (((~~((noun ofclass K2_thing)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [cannot] carry [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [cannot] carry [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_160); new_line; .L_Say47; .L_SayX47;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_109, 109, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't take what's fixed in place rule ):
-[ R_110 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_110, 110);
- ! [2: if the noun is fixed in place]
- if ((((Adj_57_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] fixed in place.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] fixed in place.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_161); new_line; .L_Say48; .L_SayX48;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_110, 110, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the use player's holdall to avoid exceeding carrying capacity rule ):
-[ R_111
- tmp_0 ! Let/loop value, e.g., 'current working sack': player's holdall
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- tmp_3 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_111, 111);
- ! [2: if the number of things carried by the actor is at least the carrying capacity of the actor]
- if ((((Prop_14()) >= GProperty(10, actor,capacity))))
- {! [3: if the actor is holding a player's holdall ( called the current working sack )]
- if ((((Prop_15() && (tmp_0=deferred_calling_list-->0, true)) || (tmp_0 = 0,false))))
- {! [4: let the transferred item be nothing]
-
- tmp_1 = nothing;
- ! [5: repeat with the possible item running through things carried by the actor]
- for (tmp_2=Prop_16(0), tmp_3=Prop_16(tmp_2): tmp_2: tmp_2=tmp_3, tmp_3=Prop_16(tmp_3))
- {! [6: if the possible item is not lit and the possible item is not the current working sack]
- if ((((~~(((Adj_53_t1_v10(tmp_2))))))) && (((~~((tmp_2 == tmp_0))))))
- {! [7: let the transferred item be the possible item]
- tmp_1 = tmp_2;
- }
- }
- ! [8: if the transferred item is not nothing]
- if (((~~((tmp_1 == nothing)))))
- {! [9: if the actor is the player]
- if (((actor == player)))
- {! [10: say ~(putting [the transferred item] into [the current working sack] to make room)[command clarification break]~ ( a )]
- say__p=1;! [11: ~(putting [the transferred item] into [the current working sack] to make room)[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),(LocalParking-->3=tmp_3),TX_R_162); .L_Say49; .L_SayX49;}
- ! [12: silently try the actor trying inserting the transferred item into the current working sack]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Insert, tmp_1, tmp_0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [13: if the transferred item is not in the current working sack]
- if (((~~((tmp_0 == ContainerOf(tmp_1))))))
- {! [14: stop the action]
- rtrue;
- }
- }
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_111, 111, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking ( this is the can't exceed carrying capacity rule ):
-[ R_112 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_112, 112);
- ! [2: if the number of things carried by the actor is at least the carrying capacity of the actor]
- if ((((Prop_17()) >= GProperty(10, actor,capacity))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We]['re] carrying too many things already.~ ( a )]
- say__p=1;! [5: ~[We]['re] carrying too many things already.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_163); new_line; .L_Say50; .L_SayX50;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_112, 112, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Taking (B135_carry_out_taking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor taking ( this is the standard taking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor taking ( this is the standard taking rule ):
-[ R_113 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_113, 113);
- ! [2: now the actor carries the noun]
- MoveObject(noun,actor);
- ! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: now the noun is handled]
- (Adj_62_t2_v10(noun));
- }
- } else if (debug_rules > 1) DB_Rule(R_113, 113, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Taking (B136_report_taking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor taking ( this is the standard report taking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor taking ( this is the standard report taking rule ):
-[ R_114 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_114, 114);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~Taken.~ ( a )]
- say__p=1;! [5: ~Taken.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_164); new_line; .L_Say51; .L_SayX51;} else {
- ! [6: say ~[The actor] [pick] up [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [pick] up [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_165); new_line; .L_Say52; .L_SayX52;}
- }
- } else if (debug_rules > 1) DB_Rule(R_114, 114, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Removing it from (B137_check_removing_it_from)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/4 ! Check an actor taking ( this is the can't take component parts rule ):
-! <<< I - Number of aspects constrained <<<
-! Rule 2/4 ! Check an actor removing something from ( this is the can't remove what's not inside rule ):
-! === equally specific with ===
-! Rule 3/4 ! Check an actor removing something from ( this is the can't remove from people rule ):
-! === equally specific with ===
-! Rule 4/4 ! Check an actor removing something from ( this is the convert remove to take rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor removing something from ( this is the can't remove what's not inside rule ):
-[ R_115 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_115, 115);
- ! [2: if the holder of the noun is not the second noun]
- if (((~~(((HolderOf(noun)) == second)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~But [regarding the noun][they] [aren't] there now.~ ( a )]
- say__p=1;! [5: ~But [regarding the noun][they] [aren't] there now.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_166); new_line; .L_Say53; .L_SayX53;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_115, 115, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor removing something from ( this is the can't remove from people rule ):
-[ R_116
- tmp_0 ! Let/loop value, e.g., 'owner': object
- ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_116, 116);
- ! [2: let the owner be the holder of the noun]
-
- tmp_0 = (HolderOf(noun));
- ! [3: if the owner is a person]
- if (((tmp_0 ofclass K8_person)))
- {! [4: if the owner is the actor]
- if (((tmp_0 == actor)))
- {! [5: convert to the taking off action on the noun]
- return GVS_Convert(##Disrobe,noun,0);
- }
- ! [6: if the actor is the player]
- if (((actor == player)))
- {! [7: say ~[regarding the noun][Those] [seem] to belong to [the owner].~ ( a )]
- say__p=1;! [8: ~[regarding the noun][Those] [seem] to belong to [the owner].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_167); new_line; .L_Say54; .L_SayX54;}
- ! [9: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_116, 116, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor removing something from ( this is the convert remove to take rule ):
-[ R_117 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_117, 117);
- ! [2: convert to the taking action on the noun]
- return GVS_Convert(##Take,noun,0);
- } else if (debug_rules > 1) DB_Rule(R_117, 117, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Dropping (B140_check_dropping)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/6 ! Check an actor dropping something which is part of the actor ( this is the can't drop body parts rule ):
-! >>> I - Number of aspects constrained >>>
-! Rule 2/6 ! Check an actor dropping ( this is the can't drop yourself rule ):
-! === equally specific with ===
-! Rule 3/6 ! Check an actor dropping ( this is the can't drop what's already dropped rule ):
-! === equally specific with ===
-! Rule 4/6 ! Check an actor dropping ( this is the can't drop what's not held rule ):
-! === equally specific with ===
-! Rule 5/6 ! Check an actor dropping ( this is the can't drop clothes being worn rule ):
-! === equally specific with ===
-! Rule 6/6 ! Check an actor dropping ( this is the can't drop if this exceeds carrying capacity rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor dropping something which is part of the actor ( this is the can't drop body parts rule ):
-[ R_119 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing) && (actor == (noun.component_parent)))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_119, 119);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[We] [can't drop] part of [ourselves].~ ( a )]
- say__p=1;! [4: ~[We] [can't drop] part of [ourselves].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_168); new_line; .L_Say55; .L_SayX55;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_119, 119, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor dropping ( this is the can't drop yourself rule ):
-[ R_118 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_118, 118);
- ! [2: if the noun is the actor]
- if (((noun == actor)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [lack] the dexterity.~ ( a )]
- say__p=1;! [5: ~[We] [lack] the dexterity.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_169); new_line; .L_Say56; .L_SayX56;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_118, 118, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor dropping ( this is the can't drop what's already dropped rule ):
-[ R_120 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_120, 120);
- ! [2: if the noun is in the holder of the actor]
- if ((((HolderOf(actor)) == ContainerOf(noun))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [are] already here.~ ( a )]
- say__p=1;! [5: ~[The noun] [are] already here.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_170); new_line; .L_Say57; .L_SayX57;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_120, 120, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor dropping ( this is the can't drop what's not held rule ):
-[ R_121 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_121, 121);
- ! [2: if the actor is carrying the noun]
- if (((actor == CarrierOf(noun))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [5: continue the action]
- rfalse;
- }
- ! [6: if the actor is the player]
- if (((actor == player)))
- {! [7: say ~[We] [haven't] got [regarding the noun][those].~ ( a )]
- say__p=1;! [8: ~[We] [haven't] got [regarding the noun][those].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_171); new_line; .L_Say58; .L_SayX58;}
- ! [9: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_121, 121, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor dropping ( this is the can't drop clothes being worn rule ):
-[ R_122 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_122, 122);
- ! [2: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~(first taking [the noun] off)[command clarification break]~ ( a )]
- say__p=1;! [5: ~(first taking [the noun] off)[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_172); .L_Say59; .L_SayX59;}
- ! [6: silently try the actor trying taking off the noun]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Disrobe, noun, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [7: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [8: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_122, 122, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor dropping ( this is the can't drop if this exceeds carrying capacity rule ):
-[ R_123
- tmp_0 ! Let/loop value, e.g., 'receptacle': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_123, 123);
- ! [2: let the receptacle be the holder of the actor]
-
- tmp_0 = (HolderOf(actor));
- ! [3: if the receptacle is a room]
- if (((tmp_0 ofclass K1_room)))
- {! [4: continue the action]
- rfalse;
- }
- ! [5: if the receptacle provides the property carrying capacity]
- if (((WhetherProvides(tmp_0, false, capacity))))
- {! [6: if the receptacle is a supporter]
- if (((tmp_0 ofclass K6_supporter)))
- {! [7: if the number of things on the receptacle is at least the carrying capacity of the receptacle]
- if ((((Prop_18(tmp_0)) >= GProperty(OBJECT_TY, tmp_0,capacity))))
- {! [8: if the actor is the player]
- if (((actor == player)))
- {! [9: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [10: say ~[There] [are] no more room on [the receptacle].~ ( a )]
- say__p=1;! [11: ~[There] [are] no more room on [the receptacle].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_173); new_line; .L_Say60; .L_SayX60;}
- ! [12: stop the action]
- rtrue;
- }
- } else {
- ! [13: if the receptacle is a container]
- if (((tmp_0 ofclass K5_container)))
- {! [14: if the number of things in the receptacle is at least the carrying capacity of the receptacle]
- if ((((Prop_19(tmp_0)) >= GProperty(OBJECT_TY, tmp_0,capacity))))
- {! [15: if the actor is the player]
- if (((actor == player)))
- {! [16: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [17: say ~[There] [are] no more room in [the receptacle].~ ( b )]
- say__p=1;! [18: ~[There] [are] no more room in [the receptacle].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_174); new_line; .L_Say61; .L_SayX61;}
- ! [19: stop the action]
- rtrue;
- }
- }
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_123, 123, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Dropping (B141_carry_out_dropping)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor dropping ( this is the standard dropping rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor dropping ( this is the standard dropping rule ):
-[ R_124 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_124, 124);
- ! [2: now the noun is in the holder of the actor]
- MoveObject(noun,(HolderOf(actor)));
- } else if (debug_rules > 1) DB_Rule(R_124, 124, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Dropping (B142_report_dropping)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor dropping ( this is the standard report dropping rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor dropping ( this is the standard report dropping rule ):
-[ R_125 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_125, 125);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~Dropped.~ ( a )]
- say__p=1;! [5: ~Dropped.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_175); new_line; .L_Say62; .L_SayX62;} else {
- ! [6: say ~[The actor] [put] down [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [put] down [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_176); new_line; .L_Say63; .L_SayX63;}
- }
- } else if (debug_rules > 1) DB_Rule(R_125, 125, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Putting it on (B143_check_putting_it_on)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/6 ! Check an actor putting something on ( this is the convert put to drop where possible rule ):
-! === equally specific with ===
-! Rule 2/6 ! Check an actor putting something on ( this is the can't put what's not held rule ):
-! === equally specific with ===
-! Rule 3/6 ! Check an actor putting something on ( this is the can't put something on itself rule ):
-! === equally specific with ===
-! Rule 4/6 ! Check an actor putting something on ( this is the can't put onto what's not a supporter rule ):
-! === equally specific with ===
-! Rule 5/6 ! Check an actor putting something on ( this is the can't put clothes being worn rule ):
-! === equally specific with ===
-! Rule 6/6 ! Check an actor putting something on ( this is the can't put if this exceeds carrying capacity rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor putting something on ( this is the convert put to drop where possible rule ):
-[ R_126 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_126, 126);
- ! [2: if the second noun is down or the actor is on the second noun]
- if ((((second == I60_down))) || (((second == SupporterOf(actor)))))
- {! [3: convert to the dropping action on the noun]
- return GVS_Convert(##Drop,noun,0);
- }
- } else if (debug_rules > 1) DB_Rule(R_126, 126, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor putting something on ( this is the can't put what's not held rule ):
-[ R_127 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_127, 127);
- ! [2: if the actor is carrying the noun]
- if (((actor == CarrierOf(noun))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [5: continue the action]
- rfalse;
- }
- ! [6: carry out the implicitly taking activity with the noun]
- CarryOutActivity(V25_implicitly_taking, noun);
- ! [7: if the actor is carrying the noun]
- if (((actor == CarrierOf(noun))))
- {! [8: continue the action]
- rfalse;
- }
- ! [9: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_127, 127, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor putting something on ( this is the can't put something on itself rule ):
-[ R_128
- tmp_0 ! Let/loop value, e.g., 'noun-CPC': object
- tmp_1 ! Let/loop value, e.g., 'second-CPC': object
- tmp_2 ! Let/loop value, e.g., 'transfer ceiling': object
- ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_128, 128);
- ! [2: let the noun-cpc be the component parts core of the noun]
-
- tmp_0 = CoreOf(noun);
- ! [3: let the second-cpc be the component parts core of the second noun]
-
- tmp_1 = CoreOf(second);
- ! [4: let the transfer ceiling be the common ancestor of the noun-cpc with the second-cpc]
-
- tmp_2 = (CommonAncestor(tmp_0, tmp_1));
- ! [5: if the transfer ceiling is the noun-cpc]
- if (((tmp_2 == tmp_0)))
- {! [6: if the actor is the player]
- if (((actor == player)))
- {! [7: say ~[We] [can't put] something on top of itself.~ ( a )]
- say__p=1;! [8: ~[We] [can't put] something on top of itself.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_177); new_line; .L_Say64; .L_SayX64;}
- ! [9: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_128, 128, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor putting something on ( this is the can't put onto what's not a supporter rule ):
-[ R_129 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_129, 129);
- ! [2: if the second noun is not a supporter]
- if (((~~((second ofclass K6_supporter)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~Putting things on [the second noun] [would achieve] nothing.~ ( a )]
- say__p=1;! [5: ~Putting things on [the second noun] [would achieve] nothing.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_178); new_line; .L_Say65; .L_SayX65;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_129, 129, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor putting something on ( this is the can't put clothes being worn rule ):
-[ R_130 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_130, 130);
- ! [2: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~(first taking [regarding the noun][them] off)[command clarification break]~ ( a )]
- say__p=1;! [5: ~(first taking [regarding the noun][them] off)[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_179); .L_Say66; .L_SayX66;}
- ! [6: silently try the actor trying taking off the noun]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Disrobe, noun, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [7: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [8: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_130, 130, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor putting something on ( this is the can't put if this exceeds carrying capacity rule ):
-[ R_131 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_131, 131);
- ! [2: if the second noun provides the property carrying capacity]
- if (((WhetherProvides(second, false, capacity))))
- {! [3: if the number of things on the second noun is at least the carrying capacity of the second noun]
- if ((((Prop_20()) >= GProperty(OBJECT_TY, second,capacity))))
- {! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[There] [are] no more room on [the second noun].~ ( a )]
- say__p=1;! [6: ~[There] [are] no more room on [the second noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_180); new_line; .L_Say67; .L_SayX67;}
- ! [7: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_131, 131, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Putting it on (B144_carry_out_putting_it_on)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor putting something on ( this is the standard putting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor putting something on ( this is the standard putting rule ):
-[ R_132 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_132, 132);
- ! [2: now the noun is on the second noun]
- MoveObject(noun,second);
- } else if (debug_rules > 1) DB_Rule(R_132, 132, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Putting it on (B145_report_putting_it_on)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Report an actor putting something on ( this is the concise report putting rule ):
-! === equally specific with ===
-! Rule 2/2 ! Report an actor putting something on ( this is the standard report putting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor putting something on ( this is the concise report putting rule ):
-[ R_133 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_133, 133);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: if the actor is the player and the i6 parser is running multiple actions]
- if ((((actor == player))) && (((multiflag==1))))
- {! [4: say ~Done.~ ( a )]
- say__p=1;! [5: ~Done.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_181); new_line; .L_Say68; .L_SayX68;! [6: stop the action]
- rtrue;
- }
- }
- ! [7: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_133, 133, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor putting something on ( this is the standard report putting rule ):
-[ R_134 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_134, 134);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: say ~[The actor] [put] [the noun] on [the second noun].~ ( a )]
- say__p=1;! [4: ~[The actor] [put] [the noun] on [the second noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_182); new_line; .L_Say69; .L_SayX69;}
- } else if (debug_rules > 1) DB_Rule(R_134, 134, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Inserting it into (B146_check_inserting_it_into)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/7 ! Check an actor inserting something into ( this is the convert insert to drop where possible rule ):
-! === equally specific with ===
-! Rule 2/7 ! Check an actor inserting something into ( this is the can't insert what's not held rule ):
-! === equally specific with ===
-! Rule 3/7 ! Check an actor inserting something into ( this is the can't insert something into itself rule ):
-! === equally specific with ===
-! Rule 4/7 ! Check an actor inserting something into ( this is the can't insert into closed containers rule ):
-! === equally specific with ===
-! Rule 5/7 ! Check an actor inserting something into ( this is the can't insert into what's not a container rule ):
-! === equally specific with ===
-! Rule 6/7 ! Check an actor inserting something into ( this is the can't insert clothes being worn rule ):
-! === equally specific with ===
-! Rule 7/7 ! Check an actor inserting something into ( this is the can't insert if this exceeds carrying capacity rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor inserting something into ( this is the convert insert to drop where possible rule ):
-[ R_135 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_135, 135);
- ! [2: if the second noun is down or the actor is in the second noun]
- if ((((second == I60_down))) || (((second == ContainerOf(actor)))))
- {! [3: convert to the dropping action on the noun]
- return GVS_Convert(##Drop,noun,0);
- }
- } else if (debug_rules > 1) DB_Rule(R_135, 135, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor inserting something into ( this is the can't insert what's not held rule ):
-[ R_136 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_136, 136);
- ! [2: if the actor is carrying the noun]
- if (((actor == CarrierOf(noun))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [5: continue the action]
- rfalse;
- }
- ! [6: carry out the implicitly taking activity with the noun]
- CarryOutActivity(V25_implicitly_taking, noun);
- ! [7: if the actor is carrying the noun]
- if (((actor == CarrierOf(noun))))
- {! [8: continue the action]
- rfalse;
- }
- ! [9: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_136, 136, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor inserting something into ( this is the can't insert something into itself rule ):
-[ R_137
- tmp_0 ! Let/loop value, e.g., 'noun-CPC': object
- tmp_1 ! Let/loop value, e.g., 'second-CPC': object
- tmp_2 ! Let/loop value, e.g., 'transfer ceiling': object
- ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_137, 137);
- ! [2: let the noun-cpc be the component parts core of the noun]
-
- tmp_0 = CoreOf(noun);
- ! [3: let the second-cpc be the component parts core of the second noun]
-
- tmp_1 = CoreOf(second);
- ! [4: let the transfer ceiling be the common ancestor of the noun-cpc with the second-cpc]
-
- tmp_2 = (CommonAncestor(tmp_0, tmp_1));
- ! [5: if the transfer ceiling is the noun-cpc]
- if (((tmp_2 == tmp_0)))
- {! [6: if the actor is the player]
- if (((actor == player)))
- {! [7: say ~[We] [can't put] something inside itself.~ ( a )]
- say__p=1;! [8: ~[We] [can't put] something inside itself.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_183); new_line; .L_Say70; .L_SayX70;}
- ! [9: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_137, 137, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor inserting something into ( this is the can't insert into closed containers rule ):
-[ R_138 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_138, 138);
- ! [2: if the second noun is a closed container]
- if (((second ofclass K5_container) && ((Adj_73_t1_v10(second)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The second noun] [are] closed.~ ( a )]
- say__p=1;! [5: ~[The second noun] [are] closed.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_184); new_line; .L_Say71; .L_SayX71;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_138, 138, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor inserting something into ( this is the can't insert into what's not a container rule ):
-[ R_139 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_139, 139);
- ! [2: if the second noun is not a container]
- if (((~~((second ofclass K5_container)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the second noun][Those] [can't contain] things.~ ( a )]
- say__p=1;! [5: ~[regarding the second noun][Those] [can't contain] things.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_185); new_line; .L_Say72; .L_SayX72;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_139, 139, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor inserting something into ( this is the can't insert clothes being worn rule ):
-[ R_140 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_140, 140);
- ! [2: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~(first taking [regarding the noun][them] off)[command clarification break]~ ( a )]
- say__p=1;! [5: ~(first taking [regarding the noun][them] off)[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_186); .L_Say73; .L_SayX73;}
- ! [6: silently try the actor trying taking off the noun]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Disrobe, noun, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [7: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [8: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_140, 140, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor inserting something into ( this is the can't insert if this exceeds carrying capacity rule ):
-[ R_141 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_141, 141);
- ! [2: if the second noun provides the property carrying capacity]
- if (((WhetherProvides(second, false, capacity))))
- {! [3: if the number of things in the second noun is at least the carrying capacity of the second noun]
- if ((((Prop_21()) >= GProperty(OBJECT_TY, second,capacity))))
- {! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [6: say ~[There] [are] no more room in [the second noun].~ ( a )]
- say__p=1;! [7: ~[There] [are] no more room in [the second noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_187); new_line; .L_Say74; .L_SayX74;}
- ! [8: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_141, 141, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Inserting it into (B147_carry_out_inserting_it_)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor inserting something into ( this is the standard inserting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor inserting something into ( this is the standard inserting rule ):
-[ R_142 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_142, 142);
- ! [2: now the noun is in the second noun]
- MoveObject(noun,second);
- } else if (debug_rules > 1) DB_Rule(R_142, 142, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Inserting it into (B148_report_inserting_it_int)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Report an actor inserting something into ( this is the concise report inserting rule ):
-! === equally specific with ===
-! Rule 2/2 ! Report an actor inserting something into ( this is the standard report inserting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor inserting something into ( this is the concise report inserting rule ):
-[ R_143 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_143, 143);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: if the actor is the player and the i6 parser is running multiple actions]
- if ((((actor == player))) && (((multiflag==1))))
- {! [4: say ~Done.~ ( a )]
- say__p=1;! [5: ~Done.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_188); new_line; .L_Say75; .L_SayX75;! [6: stop the action]
- rtrue;
- }
- }
- ! [7: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_143, 143, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor inserting something into ( this is the standard report inserting rule ):
-[ R_144 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_144, 144);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: say ~[The actor] [put] [the noun] into [the second noun].~ ( a )]
- say__p=1;! [4: ~[The actor] [put] [the noun] into [the second noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_189); new_line; .L_Say76; .L_SayX76;}
- } else if (debug_rules > 1) DB_Rule(R_144, 144, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Eating (B149_check_eating)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/4 ! Check an actor eating ( this is the can't eat unless edible rule ):
-! === equally specific with ===
-! Rule 2/4 ! Check an actor eating ( this is the can't eat clothing without removing it first rule ):
-! === equally specific with ===
-! Rule 3/4 ! Check an actor eating ( this is the can't eat other people's food rule ):
-! === equally specific with ===
-! Rule 4/4 ! Check an actor eating ( this is the can't eat portable food without carrying it rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor eating ( this is the can't eat unless edible rule ):
-[ R_145 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_145, 145);
- ! [2: if the noun is not a thing or the noun is not edible]
- if ((((~~((noun ofclass K2_thing))))) || (((~~(((Adj_55_t1_v10(noun))))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] plainly inedible.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] plainly inedible.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_190); new_line; .L_Say77; .L_SayX77;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_145, 145, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor eating ( this is the can't eat clothing without removing it first rule ):
-[ R_146 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_146, 146);
- ! [2: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~(first taking [the noun] off)[command clarification break]~ ( a )]
- say__p=1;! [5: ~(first taking [the noun] off)[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_191); .L_Say78; .L_SayX78;}
- ! [6: try the actor trying taking off the noun]
- TryAction(0, actor, ##Disrobe, noun, 0);
- ! [7: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [8: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_146, 146, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor eating ( this is the can't eat other people's food rule ):
-[ R_147
- tmp_0 ! Let/loop value, e.g., 'owner': person
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_147, 147);
- ! [2: if the noun is enclosed by a person ( called the owner ) who is not the actor]
- if ((((Prop_22() && (tmp_0=deferred_calling_list-->0, true)) || (tmp_0 = 0,false))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The owner] [might not appreciate] that.~ ( a )]
- say__p=1;! [5: ~[The owner] [might not appreciate] that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_192); new_line; .L_Say79; .L_SayX79;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_147, 147, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor eating ( this is the can't eat portable food without carrying it rule ):
-[ R_148 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_148, 148);
- ! [2: if the noun is portable and the actor is not carrying the noun]
- if (((((Adj_58_t1_v10(noun))))) && (((~~((actor == CarrierOf(noun)))))))
- {! [3: carry out the implicitly taking activity with the noun]
- CarryOutActivity(V25_implicitly_taking, noun);
- ! [4: if the actor is not carrying the noun]
- if (((~~((actor == CarrierOf(noun))))))
- {! [5: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_148, 148, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Eating (B150_carry_out_eating)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor eating ( this is the standard eating rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor eating ( this is the standard eating rule ):
-[ R_149 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_149, 149);
- ! [2: now the noun is nowhere]
- RemoveFromPlay(noun);;
- } else if (debug_rules > 1) DB_Rule(R_149, 149, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Eating (B151_report_eating)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor eating ( this is the standard report eating rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor eating ( this is the standard report eating rule ):
-[ R_150 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_150, 150);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [eat] [the noun]. Not bad.~ ( a )]
- say__p=1;! [5: ~[We] [eat] [the noun]. Not bad.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_193); new_line; .L_Say80; .L_SayX80;} else {
- ! [6: say ~[The actor] [eat] [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [eat] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_194); new_line; .L_Say81; .L_SayX81;}
- }
- } else if (debug_rules > 1) DB_Rule(R_150, 150, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Going (B152_check_going)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/6 ! Check an actor going when the actor is on a supporter ( called the chaise ) ( this is the stand up before going rule ):
-! >>> I - Number of aspects constrained >>>
-! Rule 2/6 ! Check an actor going ( this is the can't travel in what's not a vehicle rule ):
-! === equally specific with ===
-! Rule 3/6 ! Check an actor going ( this is the can't go through undescribed doors rule ):
-! === equally specific with ===
-! Rule 4/6 ! Check an actor going ( this is the can't go through closed doors rule ):
-! === equally specific with ===
-! Rule 5/6 ! Check an actor going ( this is the determine map connection rule ):
-! === equally specific with ===
-! Rule 6/6 ! Check an actor going ( this is the can't go that way rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor going when the actor is on a supporter ( called the chaise ) ( this is the stand up before going rule ):
-[ R_152
- tmp_0 ! Let/loop value, e.g., 'chaise': supporter
- ;
- if ((((act_requester==nothing) && (self=actor,true) && (((SupporterOf(actor) ofclass K6_supporter) && (tmp_0=(SupporterOf(actor)), true)))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_152, 152);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~(first getting off [the chaise])[command clarification break]~ ( a )]
- say__p=1;! [4: ~(first getting off [the chaise])[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_195); .L_Say82; .L_SayX82;}
- ! [5: silently try the actor exiting]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Exit, 0, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- } else if (debug_rules > 1) DB_Rule(R_152, 152, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor going ( this is the can't travel in what's not a vehicle rule ):
-[ R_153
- tmp_0 ! Let/loop value, e.g., 'nonvehicle': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_153, 153);
- ! [2: let nonvehicle be the holder of the actor]
-
- tmp_0 = (HolderOf(actor));
- ! [3: if nonvehicle is the room gone from]
- if (((tmp_0 == (MStack-->MstVO(20007,0)))))
- {! [4: continue the action]
- rfalse;
- }
- ! [5: if nonvehicle is the vehicle gone by]
- if (((tmp_0 == (MStack-->MstVO(20007,3)))))
- {! [6: continue the action]
- rfalse;
- }
- ! [7: if the actor is the player]
- if (((actor == player)))
- {! [8: if nonvehicle is a supporter]
- if (((tmp_0 ofclass K6_supporter)))
- {! [9: say ~[We] [would have] to get off [the nonvehicle] first.~ ( a )]
- say__p=1;! [10: ~[We] [would have] to get off [the nonvehicle] first.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_196); new_line; .L_Say83; .L_SayX83;} else {
- ! [11: say ~[We] [would have] to get out of [the nonvehicle] first.~ ( b )]
- say__p=1;! [12: ~[We] [would have] to get out of [the nonvehicle] first.~ ( b )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_197); new_line; .L_Say84; .L_SayX84;}
- }
- ! [13: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_153, 153, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor going ( this is the can't go through undescribed doors rule ):
-[ R_154 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_154, 154);
- ! [2: if the door gone through is not nothing and the door gone through is undescribed]
- if ((((~~(((MStack-->MstVO(20007,2)) == nothing))))) && ((((Adj_64_t1_v10((MStack-->MstVO(20007,2))))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [can't go] that way.~ ( a )]
- say__p=1;! [5: ~[We] [can't go] that way.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_198); new_line; .L_Say85; .L_SayX85;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_154, 154, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor going ( this is the can't go through closed doors rule ):
-[ R_155 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_155, 155);
- ! [2: if the door gone through is not nothing and the door gone through is closed]
- if ((((~~(((MStack-->MstVO(20007,2)) == nothing))))) && ((((Adj_73_t1_v10((MStack-->MstVO(20007,2))))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~(first opening [the door gone through])[command clarification break]~ ( a )]
- say__p=1;! [5: ~(first opening [the door gone through])[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_199); .L_Say86; .L_SayX86;}
- ! [6: silently try the actor opening the door gone through]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Open, (MStack-->MstVO(20007,2)), 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [7: if the door gone through is open]
- if ((((Adj_72_t1_v10((MStack-->MstVO(20007,2)))))))
- {! [8: continue the action]
- rfalse;
- }
- ! [9: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_155, 155, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor going ( this is the determine map connection rule ):
-[ R_156 I7RBLK;
- @push I7SFRAME;
- StackFrameCreate(0);
- @push formal_par0;
- @push formal_par1;
- I7RBLK = KERNEL_1();
- @pull formal_par1;
- @pull formal_par0;
- @pull I7SFRAME;
- return I7RBLK; ! nothing
-];
-[ KERNEL_1
- tmp_0 ! Let/loop value, e.g., 'target': object
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_156, 156);
- ! [2: let the target be nothing]
-
- tmp_0 = nothing;
- ! [3: if the noun is a direction]
- if (((noun ofclass K3_direction)))
- {! [4: let direction d be the noun]
-
- tmp_1 = noun;
- ! [5: let the target be the room-or-door direction d from the room gone from]
- tmp_0 =
- ! Resolution of run-time phrase ambiguity (deciding a value):
- (
- ! This value evaluates third (i.e., last)
- formal_rv
- +
- 0*(
- ! The following condition evaluates second
- ((
- ((((((formal_par0 ofclass K3_direction) && (formal_par0 ofclass K3_direction))))) && ((
- formal_rv = RoomOrDoorFrom(formal_par1,formal_par0)) | 1)
- )|| (ArgumentTypeFailed(2330, 1))
-
- ))
- +
- ! The following assignments evaluate first
- ((formal_par1 = (MStack-->MstVO(20007,0))) +
- (formal_par0 = tmp_1)
- ))
- )
-
- ! Resolution complete
- ;
- } else {
- ! [6: if the noun is a door]
- if (((noun ofclass K4_door)))
- {! [7: let the target be the noun]
- tmp_0 = noun;
- }
- }
- ! [8: if the target is a door]
- if (((tmp_0 ofclass K4_door)))
- {! [9: now the target is the other side of the target from the room gone from]
- tmp_0 =
- ! Resolution of run-time phrase ambiguity (deciding a value):
- (
- ! This value evaluates third (i.e., last)
- formal_rv
- +
- 0*(
- ! The following condition evaluates second
- ((
- ((((((formal_par0 ofclass K4_door) && (formal_par0 ofclass K4_door))))) && ((
- formal_rv = OtherSideOfDoor(formal_par0,formal_par1)) | 1)
- )|| (ArgumentTypeFailed(2334, 1))
-
- ))
- +
- ! The following assignments evaluate first
- ((formal_par1 = (MStack-->MstVO(20007,0))) +
- (formal_par0 = tmp_0)
- ))
- )
-
- ! Resolution complete
- ;
- }
- ! [10: now the room gone to is the target]
- (MStack-->MstVO(20007,1)) = tmp_0;
- } else if (debug_rules > 1) DB_Rule(R_156, 156, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor going ( this is the can't go that way rule ):
-[ R_157 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_157, 157);
- ! [2: if the room gone to is nothing]
- if ((((MStack-->MstVO(20007,1)) == nothing)))
- {! [3: if the door gone through is nothing]
- if ((((MStack-->MstVO(20007,2)) == nothing)))
- {! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[We] [can't go] that way.~ ( a )]
- say__p=1;! [6: ~[We] [can't go] that way.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_200); new_line; .L_Say87; .L_SayX87;}
- ! [7: stop the action]
- rtrue;
- }
- ! [8: if the actor is the player]
- if (((actor == player)))
- {! [9: say ~[We] [can't], since [the door gone through] [lead] nowhere.~ ( b )]
- say__p=1;! [10: ~[We] [can't], since [the door gone through] [lead] nowhere.~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_201); new_line; .L_Say88; .L_SayX88;}
- ! [11: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_157, 157, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Going (B153_carry_out_going)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Carry out an actor going ( this is the move player and vehicle rule ):
-! === equally specific with ===
-! Rule 2/3 ! Carry out an actor going ( this is the move floating objects rule ):
-! === equally specific with ===
-! Rule 3/3 ! Carry out an actor going ( this is the check light in new location rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor going ( this is the move player and vehicle rule ):
-[ R_158 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_158, 158);
- ! [2: if the vehicle gone by is nothing]
- if ((((MStack-->MstVO(20007,3)) == nothing)))
- {! [3: surreptitiously move the actor to the room gone to during going]
- MoveDuringGoing(actor, (MStack-->MstVO(20007,1)));
- } else {
- ! [4: surreptitiously move the vehicle gone by to the room gone to during going]
- MoveDuringGoing((MStack-->MstVO(20007,3)), (MStack-->MstVO(20007,1)));
- }
- ! [5: if the location is not the location of the player]
- if (((~~((real_location == LocationOf(player))))))
- {! [6: now the location is the location of the player]
- real_location = LocationOf(player);
- }
- } else if (debug_rules > 1) DB_Rule(R_158, 158, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out an actor going ( this is the move floating objects rule ):
-[ R_159 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_159, 159);
- ! [2: if the actor is the player or the player is within the vehicle gone by or the player is within the thing gone with]
- if ((((actor == player))) || (((((MStack-->MstVO(20007,3)) == ContainerOf(player)))) || ((((MStack-->MstVO(20007,4)) == ContainerOf(player))))))
- {! [3: update backdrop positions]
- MoveFloatingObjects();
- }
- } else if (debug_rules > 1) DB_Rule(R_159, 159, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out an actor going ( this is the check light in new location rule ):
-[ R_160 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_160, 160);
- ! [2: if the actor is the player or the player is within the vehicle gone by or the player is within the thing gone with]
- if ((((actor == player))) || (((((MStack-->MstVO(20007,3)) == ContainerOf(player)))) || ((((MStack-->MstVO(20007,4)) == ContainerOf(player))))))
- {! [3: surreptitiously reckon darkness]
- SilentlyConsiderLight();
- }
- } else if (debug_rules > 1) DB_Rule(R_160, 160, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Going (B154_report_going)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor going ( this is the describe room gone into rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor going ( this is the describe room gone into rule ):
-[ R_161 I7RBLK;
- @push I7SFRAME;
- StackFrameCreate(0);
- @push formal_par0;
- @push formal_par1;
- I7RBLK = KERNEL_2();
- @pull formal_par1;
- @pull formal_par0;
- @pull I7SFRAME;
- return I7RBLK; ! nothing
-];
-[ KERNEL_2
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_161, 161);
- ! [2: if the player is the actor]
- if (((player == actor)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: produce a room description with going spacing conventions]
- LookAfterGoing();
- }
- } else {
- ! [5: if the noun is a direction]
- if (((noun ofclass K3_direction)))
- {! [6: if the location is the room gone from or the player is within the vehicle gone by or the player is within the thing gone with]
- if ((((real_location == (MStack-->MstVO(20007,0))))) || (((((MStack-->MstVO(20007,3)) == ContainerOf(player)))) || ((((MStack-->MstVO(20007,4)) == ContainerOf(player))))))
- {! [7: if the room gone from is the room gone to]
- if ((((MStack-->MstVO(20007,0)) == (MStack-->MstVO(20007,1)))))
- {! [8: continue the action]
- rfalse;
- } else {
- ! [9: if the noun is up]
- if (((noun == I59_up)))
- {! [10: say ~[The actor] [go] up~ ( a )]
- say__p=1;! [11: ~[The actor] [go] up~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_202); .L_Say89; .L_SayX89;} else {
- ! [12: if the noun is down]
- if (((noun == I60_down)))
- {! [13: say ~[The actor] [go] down~ ( b )]
- say__p=1;! [14: ~[The actor] [go] down~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_203); .L_Say90; .L_SayX90;} else {
- ! [15: say ~[The actor] [go] [noun]~ ( c )]
- say__p=1;! [16: ~[The actor] [go] [noun]~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_204); .L_Say91; .L_SayX91;}
- }
- }
- } else {
- ! [17: let the back way be the opposite of the noun]
-
- tmp_0 = GProperty(OBJECT_TY, noun,p10_opposite);
- ! [18: if the location is the room gone to]
- if (((real_location == (MStack-->MstVO(20007,1)))))
- {! [19: let the room back the other way be the room back way from the location]
-
- tmp_1 =
- ! Resolution of run-time phrase ambiguity (deciding a value):
- (
- ! This value evaluates third (i.e., last)
- formal_rv
- +
- 0*(
- ! The following condition evaluates second
- ((
- ((((((formal_par1 ofclass K1_room) && (formal_par1 ofclass K1_room))))) && ((
- formal_rv = MapConnection(formal_par1,formal_par0)) | 1)
- )|| (ArgumentTypeFailed(2385, 1))
-
- ))
- +
- ! The following assignments evaluate first
- ((formal_par1 = real_location) +
- (formal_par0 = tmp_0)
- ))
- )
-
- ! Resolution complete
- ;
- ! [20: let the room normally this way be the room noun from the room gone from]
-
- tmp_2 =
- ! Resolution of run-time phrase ambiguity (deciding a value):
- (
- ! This value evaluates third (i.e., last)
- formal_rv
- +
- 0*(
- ! The following condition evaluates second
- ((
- ((((((formal_par0 ofclass K3_direction) && (formal_par0 ofclass K3_direction))))) && ((
- formal_rv = MapConnection(formal_par1,formal_par0)) | 1)
- )|| (ArgumentTypeFailed(2387, 1))
-
- ))
- +
- ! The following assignments evaluate first
- ((formal_par1 = (MStack-->MstVO(20007,0))) +
- (formal_par0 = noun)
- ))
- )
-
- ! Resolution complete
- ;
- ! [21: if the room back the other way is the room gone from or the room back the other way is the room normally this way]
- if ((((tmp_1 == (MStack-->MstVO(20007,0))))) || (((tmp_1 == tmp_2))))
- {! [22: if the back way is up]
- if (((tmp_0 == I59_up)))
- {! [23: say ~[The actor] [arrive] from above~ ( d )]
- say__p=1;! [24: ~[The actor] [arrive] from above~ ( d )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_205); .L_Say92; .L_SayX92;} else {
- ! [25: if the back way is down]
- if (((tmp_0 == I60_down)))
- {! [26: say ~[The actor] [arrive] from below~ ( e )]
- say__p=1;! [27: ~[The actor] [arrive] from below~ ( e )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_206); .L_Say93; .L_SayX93;} else {
- ! [28: say ~[The actor] [arrive] from [the back way]~ ( f )]
- say__p=1;! [29: ~[The actor] [arrive] from [the back way]~ ( f )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_207); .L_Say94; .L_SayX94;}
- }
- } else {
- ! [30: say ~[The actor] [arrive]~ ( g )]
- say__p=1;! [31: ~[The actor] [arrive]~ ( g )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_208); .L_Say95; .L_SayX95;}
- } else {
- ! [32: if the back way is up]
- if (((tmp_0 == I59_up)))
- {! [33: say ~[The actor] [arrive] at [the room gone to] from above~ ( h )]
- say__p=1;! [34: ~[The actor] [arrive] at [the room gone to] from above~ ( h )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_209); .L_Say96; .L_SayX96;} else {
- ! [35: if the back way is down]
- if (((tmp_0 == I60_down)))
- {! [36: say ~[The actor] [arrive] at [the room gone to] from below~ ( i )]
- say__p=1;! [37: ~[The actor] [arrive] at [the room gone to] from below~ ( i )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_210); .L_Say97; .L_SayX97;} else {
- ! [38: say ~[The actor] [arrive] at [the room gone to] from [the back way]~ ( j )]
- say__p=1;! [39: ~[The actor] [arrive] at [the room gone to] from [the back way]~ ( j )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_211); .L_Say98; .L_SayX98;}
- }
- }
- }
- } else {
- ! [40: if the location is the room gone from]
- if (((real_location == (MStack-->MstVO(20007,0)))))
- {! [41: say ~[The actor] [go] through [the noun]~ ( k )]
- say__p=1;! [42: ~[The actor] [go] through [the noun]~ ( k )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_212); .L_Say99; .L_SayX99;} else {
- ! [43: say ~[The actor] [arrive] from [the noun]~ ( l )]
- say__p=1;! [44: ~[The actor] [arrive] from [the noun]~ ( l )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_213); .L_Say100; .L_SayX100;}
- }
- ! [45: if the vehicle gone by is not nothing]
- if (((~~(((MStack-->MstVO(20007,3)) == nothing)))))
- {! [46: say ~ ~]
- say__p=1;! [47: ~ ~]
- ParaContent(); print " "; .L_Say101; .L_SayX101;! [48: if the vehicle gone by is a supporter]
- if ((((MStack-->MstVO(20007,3)) ofclass K6_supporter)))
- {! [49: say ~on [the vehicle gone by]~ ( m )]
- say__p=1;! [50: ~on [the vehicle gone by]~ ( m )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_214); .L_Say102; .L_SayX102;} else {
- ! [51: say ~in [the vehicle gone by]~ ( n )]
- say__p=1;! [52: ~in [the vehicle gone by]~ ( n )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_215); .L_Say103; .L_SayX103;}
- }
- ! [53: if the thing gone with is not nothing]
- if (((~~(((MStack-->MstVO(20007,4)) == nothing)))))
- {! [54: if the player is within the thing gone with]
- if ((((MStack-->MstVO(20007,4)) == ContainerOf(player))))
- {! [55: say ~, pushing [the thing gone with] in front, and [us] along too~ ( o )]
- say__p=1;! [56: ~, pushing [the thing gone with] in front, and [us] along too~ ( o )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_216); .L_Say104; .L_SayX104;} else {
- ! [57: if the player is within the vehicle gone by]
- if ((((MStack-->MstVO(20007,3)) == ContainerOf(player))))
- {! [58: say ~, pushing [the thing gone with] in front~ ( p )]
- say__p=1;! [59: ~, pushing [the thing gone with] in front~ ( p )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_217); .L_Say105; .L_SayX105;} else {
- ! [60: if the location is the room gone from]
- if (((real_location == (MStack-->MstVO(20007,0)))))
- {! [61: say ~, pushing [the thing gone with] away~ ( q )]
- say__p=1;! [62: ~, pushing [the thing gone with] away~ ( q )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_218); .L_Say106; .L_SayX106;} else {
- ! [63: say ~, pushing [the thing gone with] in~ ( r )]
- say__p=1;! [64: ~, pushing [the thing gone with] in~ ( r )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_219); .L_Say107; .L_SayX107;}
- }
- }
- }
- ! [65: if the player is within the vehicle gone by and the player is not within the thing gone with]
- if (((((MStack-->MstVO(20007,3)) == ContainerOf(player)))) && (((~~(((MStack-->MstVO(20007,4)) == ContainerOf(player)))))))
- {! [66: say ~, taking [us] along~ ( s )]
- say__p=1;! [67: ~, taking [us] along~ ( s )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),(LocalParking-->2=tmp_2),TX_R_220); .L_Say108; .L_SayX108;! [68: say ~.~]
- say__p=1;! [69: ~.~]
- ParaContent(); print "."; new_line; .L_Say109; .L_SayX109;! [70: try looking]
- TryAction(0, player, ##Look, 0, 0);
- ! [71: continue the action]
- rfalse;
- }
- ! [72: say ~.~]
- say__p=1;! [73: ~.~]
- ParaContent(); print "."; new_line; .L_Say110; .L_SayX110;}
- } else if (debug_rules > 1) DB_Rule(R_161, 161, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Entering (B155_check_entering)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/8 ! Check an actor entering ( this is the convert enter door into go rule ):
-! === equally specific with ===
-! Rule 2/8 ! Check an actor entering ( this is the convert enter compass direction into go rule ):
-! === equally specific with ===
-! Rule 3/8 ! Check an actor entering ( this is the can't enter what's already entered rule ):
-! === equally specific with ===
-! Rule 4/8 ! Check an actor entering ( this is the can't enter what's not enterable rule ):
-! === equally specific with ===
-! Rule 5/8 ! Check an actor entering ( this is the can't enter closed containers rule ):
-! === equally specific with ===
-! Rule 6/8 ! Check an actor entering ( this is the can't enter if this exceeds carrying capacity rule ):
-! === equally specific with ===
-! Rule 7/8 ! Check an actor entering ( this is the can't enter something carried rule ):
-! === equally specific with ===
-! Rule 8/8 ! Check an actor entering ( this is the implicitly pass through other barriers rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the convert enter door into go rule ):
-[ R_163 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_163, 163);
- ! [2: if the noun is a door]
- if (((noun ofclass K4_door)))
- {! [3: convert to the going action on the noun]
- return GVS_Convert(##Go,noun,0);
- }
- } else if (debug_rules > 1) DB_Rule(R_163, 163, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the convert enter compass direction into go rule ):
-[ R_164 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_164, 164);
- ! [2: if the noun is a direction]
- if (((noun ofclass K3_direction)))
- {! [3: convert to the going action on the noun]
- return GVS_Convert(##Go,noun,0);
- }
- } else if (debug_rules > 1) DB_Rule(R_164, 164, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the can't enter what's already entered rule ):
-[ R_165
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_165, 165);
- ! [2: if the actor is the noun]
- if (((actor == noun)))
- {! [3: make no decision]
- rfalse;
- }
- ! [4: let the local ceiling be the common ancestor of the actor with the noun]
-
- tmp_0 = (CommonAncestor(actor, noun));
- ! [5: if the local ceiling is the noun]
- if (((tmp_0 == noun)))
- {! [6: if the player is the actor]
- if (((player == actor)))
- {! [7: if the noun is a supporter]
- if (((noun ofclass K6_supporter)))
- {! [8: say ~But [we]['re] already on [the noun].~ ( a )]
- say__p=1;! [9: ~But [we]['re] already on [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_221); new_line; .L_Say111; .L_SayX111;} else {
- ! [10: say ~But [we]['re] already in [the noun].~ ( b )]
- say__p=1;! [11: ~But [we]['re] already in [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_222); new_line; .L_Say112; .L_SayX112;}
- }
- ! [12: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_165, 165, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the can't enter what's not enterable rule ):
-[ R_166 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_166, 166);
- ! [2: if the noun is not enterable]
- if (((~~(((Adj_69_t1_v10(noun)))))))
- {! [3: if the player is the actor]
- if (((player == actor)))
- {! [4: if the player's command includes ~stand~]
- if (((matched_text=SnippetIncludes(Consult_Grammar_100,players_command))))
- {! [5: say ~[regarding the noun][They're] not something [we] [can] stand on.~ ( a )]
- say__p=1;! [6: ~[regarding the noun][They're] not something [we] [can] stand on.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_223); new_line; .L_Say113; .L_SayX113;} else {
- ! [7: if the player's command includes ~sit~]
- if (((matched_text=SnippetIncludes(Consult_Grammar_101,players_command))))
- {! [8: say ~[regarding the noun][They're] not something [we] [can] sit down on.~ ( b )]
- say__p=1;! [9: ~[regarding the noun][They're] not something [we] [can] sit down on.~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_224); new_line; .L_Say114; .L_SayX114;} else {
- ! [10: if the player's command includes ~lie~]
- if (((matched_text=SnippetIncludes(Consult_Grammar_102,players_command))))
- {! [11: say ~[regarding the noun][They're] not something [we] [can] lie down on.~ ( c )]
- say__p=1;! [12: ~[regarding the noun][They're] not something [we] [can] lie down on.~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_225); new_line; .L_Say115; .L_SayX115;} else {
- ! [13: say ~[regarding the noun][They're] not something [we] [can] enter.~ ( d )]
- say__p=1;! [14: ~[regarding the noun][They're] not something [we] [can] enter.~ ( d )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_226); new_line; .L_Say116; .L_SayX116;}
- }
- }
- }
- ! [15: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_166, 166, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the can't enter closed containers rule ):
-[ R_167 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_167, 167);
- ! [2: if the noun is a closed container]
- if (((noun ofclass K5_container) && ((Adj_73_t1_v10(noun)))))
- {! [3: if the player is the actor]
- if (((player == actor)))
- {! [4: say ~[We] [can't get] into the closed [noun].~ ( a )]
- say__p=1;! [5: ~[We] [can't get] into the closed [noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_227); new_line; .L_Say117; .L_SayX117;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_167, 167, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the can't enter if this exceeds carrying capacity rule ):
-[ R_168 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_168, 168);
- ! [2: if the noun provides the property carrying capacity]
- if (((WhetherProvides(noun, false, capacity))))
- {! [3: if the noun is a supporter]
- if (((noun ofclass K6_supporter)))
- {! [4: if the number of things on the noun is at least the carrying capacity of the noun]
- if ((((Prop_23()) >= GProperty(OBJECT_TY, noun,capacity))))
- {! [5: if the actor is the player]
- if (((actor == player)))
- {! [6: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [7: say ~[There] [are] no more room on [the noun].~ ( a )]
- say__p=1;! [8: ~[There] [are] no more room on [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_228); new_line; .L_Say118; .L_SayX118;}
- ! [9: stop the action]
- rtrue;
- }
- } else {
- ! [10: if the noun is a container]
- if (((noun ofclass K5_container)))
- {! [11: if the number of things in the noun is at least the carrying capacity of the noun]
- if ((((Prop_24()) >= GProperty(OBJECT_TY, noun,capacity))))
- {! [12: if the actor is the player]
- if (((actor == player)))
- {! [13: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [14: say ~[There] [are] no more room in [the noun].~ ( b )]
- say__p=1;! [15: ~[There] [are] no more room in [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_229); new_line; .L_Say119; .L_SayX119;}
- ! [16: stop the action]
- rtrue;
- }
- }
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_168, 168, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the can't enter something carried rule ):
-[ R_169
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_169, 169);
- ! [2: let the local ceiling be the common ancestor of the actor with the noun]
-
- tmp_0 = (CommonAncestor(actor, noun));
- ! [3: if the local ceiling is the actor]
- if (((tmp_0 == actor)))
- {! [4: if the player is the actor]
- if (((player == actor)))
- {! [5: say ~[We] [can] only get into something free-standing.~ ( a )]
- say__p=1;! [6: ~[We] [can] only get into something free-standing.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_230); new_line; .L_Say120; .L_SayX120;}
- ! [7: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_169, 169, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor entering ( this is the implicitly pass through other barriers rule ):
-[ R_170
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'target': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_170, 170);
- ! [2: if the holder of the actor is the holder of the noun]
- if ((((HolderOf(actor)) == (HolderOf(noun)))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: let the local ceiling be the common ancestor of the actor with the noun]
-
- tmp_0 = (CommonAncestor(actor, noun));
- ! [5: while the holder of the actor is not the local ceiling]
- while (((~~(((HolderOf(actor)) == tmp_0)))))
- {! [6: let the current home be the holder of the actor]
-
- tmp_1 = (HolderOf(actor));
- ! [7: if the player is the actor]
- if (((player == actor)))
- {! [8: if the current home is a supporter or the current home is an animal]
- if ((((tmp_1 ofclass K6_supporter))) || (((tmp_1 ofclass K12_animal))))
- {! [9: say ~(getting off [the current home])[command clarification break]~ ( a )]
- say__p=1;! [10: ~(getting off [the current home])[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_231); .L_Say121; .L_SayX121;} else {
- ! [11: say ~(getting out of [the current home])[command clarification break]~ ( b )]
- say__p=1;! [12: ~(getting out of [the current home])[command clarification break]~ ( b )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_232); .L_Say122; .L_SayX122;}
- }
- ! [13: silently try the actor trying exiting]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Exit, 0, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [14: if the holder of the actor is the current home]
- if ((((HolderOf(actor)) == tmp_1)))
- {! [15: stop the action]
- rtrue;
- }
- }
- ! [16: if the holder of the actor is the noun]
- if ((((HolderOf(actor)) == noun)))
- {! [17: stop the action]
- rtrue;
- }
- ! [18: if the holder of the actor is the holder of the noun]
- if ((((HolderOf(actor)) == (HolderOf(noun)))))
- {! [19: continue the action]
- rfalse;
- }
- ! [20: let the target be the holder of the noun]
-
- tmp_1 = (HolderOf(noun));
- ! [21: if the noun is part of the target]
- if (((tmp_1 == (noun.component_parent))))
- {! [22: let the target be the holder of the target]
- tmp_1 = (HolderOf(tmp_1));
- }
- ! [23: while the target is a thing]
- while (((tmp_1 ofclass K2_thing)))
- {! [24: if the holder of the target is the local ceiling]
- if ((((HolderOf(tmp_1)) == tmp_0)))
- {! [25: if the player is the actor]
- if (((player == actor)))
- {! [26: if the target is a supporter]
- if (((tmp_1 ofclass K6_supporter)))
- {! [27: say ~(getting onto [the target])[command clarification break]~ ( c )]
- say__p=1;! [28: ~(getting onto [the target])[command clarification break]~ ( c )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_233); .L_Say123; .L_SayX123;} else {
- ! [29: if the target is a container]
- if (((tmp_1 ofclass K5_container)))
- {! [30: say ~(getting into [the target])[command clarification break]~ ( d )]
- say__p=1;! [31: ~(getting into [the target])[command clarification break]~ ( d )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_234); .L_Say124; .L_SayX124;} else {
- ! [32: say ~(entering [the target])[command clarification break]~ ( e )]
- say__p=1;! [33: ~(entering [the target])[command clarification break]~ ( e )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_235); .L_Say125; .L_SayX125;}
- }
- }
- ! [34: silently try the actor trying entering the target]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Enter, tmp_1, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [35: if the holder of the actor is not the target]
- if (((~~(((HolderOf(actor)) == tmp_1)))))
- {! [36: stop the action]
- rtrue;
- }
- ! [37: convert to the entering action on the noun]
- return GVS_Convert(##Enter,noun,0);
- ! [38: continue the action]
- rfalse;
- }
- ! [39: let the target be the holder of the target]
- tmp_1 = (HolderOf(tmp_1));
- }
- } else if (debug_rules > 1) DB_Rule(R_170, 170, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Entering (B156_carry_out_entering)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor entering ( this is the standard entering rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor entering ( this is the standard entering rule ):
-[ R_171 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_171, 171);
- ! [2: surreptitiously move the actor to the noun]
- move actor to noun;
- } else if (debug_rules > 1) DB_Rule(R_171, 171, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Entering (B157_report_entering)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Report an actor entering ( this is the standard report entering rule ):
-! === equally specific with ===
-! Rule 2/2 ! Report an actor entering ( this is the describe contents entered into rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor entering ( this is the standard report entering rule ):
-[ R_172 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_172, 172);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: if the noun is a supporter]
- if (((noun ofclass K6_supporter)))
- {! [5: say ~[We] [get] onto [the noun].~ ( a )]
- say__p=1;! [6: ~[We] [get] onto [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_236); new_line; .L_Say126; .L_SayX126;} else {
- ! [7: say ~[We] [get] into [the noun].~ ( b )]
- say__p=1;! [8: ~[We] [get] into [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_237); new_line; .L_Say127; .L_SayX127;}
- }
- } else {
- ! [9: if the noun is a container]
- if (((noun ofclass K5_container)))
- {! [10: say ~[The actor] [get] into [the noun].~ ( c )]
- say__p=1;! [11: ~[The actor] [get] into [the noun].~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_238); new_line; .L_Say128; .L_SayX128;} else {
- ! [12: say ~[The actor] [get] onto [the noun].~ ( d )]
- say__p=1;! [13: ~[The actor] [get] onto [the noun].~ ( d )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_239); new_line; .L_Say129; .L_SayX129;}
- }
- ! [14: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_172, 172, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor entering ( this is the describe contents entered into rule ):
-[ R_173 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_173, 173);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: describe locale for the noun]
- (PHR_81_r1 (noun));
- }
- } else if (debug_rules > 1) DB_Rule(R_173, 173, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Exiting (B158_check_exiting)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/4 ! Check an actor exiting ( this is the convert exit into go out rule ):
-! === equally specific with ===
-! Rule 2/4 ! Check an actor exiting ( this is the can't exit when not inside anything rule ):
-! === equally specific with ===
-! Rule 3/4 ! Check an actor exiting ( this is the can't exit closed containers rule ):
-! === equally specific with ===
-! Rule 4/4 ! Check an actor exiting ( this is the convert exit into get off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor exiting ( this is the convert exit into go out rule ):
-[ R_175
- tmp_0 ! Let/loop value, e.g., 'local room': room
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_175, 175);
- ! [2: let the local room be the location of the actor]
-
- tmp_0 = LocationOf(actor);
- ! [3: if the container exited from is the local room]
- if ((((MStack-->MstVO(20009,0)) == tmp_0)))
- {! [4: if the room-or-door outside from the local room is not nothing]
- if (((~~((RoomOrDoorFrom(tmp_0,out_obj) == nothing)))))
- {! [5: convert to the going action on the outside]
- return GVS_Convert(##Go,out_obj,0);
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_175, 175, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor exiting ( this is the can't exit when not inside anything rule ):
-[ R_176
- tmp_0 ! Let/loop value, e.g., 'local room': room
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_176, 176);
- ! [2: let the local room be the location of the actor]
-
- tmp_0 = LocationOf(actor);
- ! [3: if the container exited from is the local room]
- if ((((MStack-->MstVO(20009,0)) == tmp_0)))
- {! [4: if the player is the actor]
- if (((player == actor)))
- {! [5: say ~But [we] [aren't] in anything at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- say__p=1;! [6: ~But [we] [aren't] in anything at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_240); new_line; .L_Say130; .L_SayX130;}
- ! [7: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_176, 176, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor exiting ( this is the can't exit closed containers rule ):
-[ R_177
- tmp_0 ! Let/loop value, e.g., 'cage': container
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_177, 177);
- ! [2: if the actor is in a closed container ( called the cage )]
- if (((ContainerOf(actor) ofclass K5_container) && ((Adj_73_t1_v10(ContainerOf(actor)))) && (tmp_0=(ContainerOf(actor)), true)))
- {! [3: if the player is the actor]
- if (((player == actor)))
- {! [4: say ~You can't get out of the closed [cage].~ ( a )]
- say__p=1;! [5: ~You can't get out of the closed [cage].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),TX_R_241); new_line; .L_Say131; .L_SayX131;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_177, 177, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor exiting ( this is the convert exit into get off rule ):
-[ R_178
- tmp_0 ! Let/loop value, e.g., 'platform': supporter
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_178, 178);
- ! [2: if the actor is on a supporter ( called the platform )]
- if (((SupporterOf(actor) ofclass K6_supporter) && (tmp_0=(SupporterOf(actor)), true)))
- {! [3: convert to the getting off action on the platform]
- return GVS_Convert(##GetOff,tmp_0,0);
- }
- } else if (debug_rules > 1) DB_Rule(R_178, 178, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Exiting (B159_carry_out_exiting)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor exiting ( this is the standard exiting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor exiting ( this is the standard exiting rule ):
-[ R_179
- tmp_0 ! Let/loop value, e.g., 'former exterior': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_179, 179);
- ! [2: let the former exterior be the not-counting-parts holder of the container exited from]
-
- tmp_0 = (CoreOfParentOfCoreOf((MStack-->MstVO(20009,0))));
- ! [3: surreptitiously move the actor to the former exterior]
- move actor to tmp_0;
- } else if (debug_rules > 1) DB_Rule(R_179, 179, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Exiting (B160_report_exiting)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Report an actor exiting ( this is the standard report exiting rule ):
-! === equally specific with ===
-! Rule 2/2 ! Report an actor exiting ( this is the describe room emerged into rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor exiting ( this is the standard report exiting rule ):
-[ R_180 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_180, 180);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: if the container exited from is a supporter]
- if ((((MStack-->MstVO(20009,0)) ofclass K6_supporter)))
- {! [5: say ~[We] [get] off [the container exited from].~ ( a )]
- say__p=1;! [6: ~[We] [get] off [the container exited from].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_242); new_line; .L_Say132; .L_SayX132;} else {
- ! [7: say ~[We] [get] out of [the container exited from].~ ( b )]
- say__p=1;! [8: ~[We] [get] out of [the container exited from].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_243); new_line; .L_Say133; .L_SayX133;}
- } else {
- ! [9: say ~[The actor] [get] out of [the container exited from].~ ( c )]
- say__p=1;! [10: ~[The actor] [get] out of [the container exited from].~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_244); new_line; .L_Say134; .L_SayX134;}
- }
- ! [11: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_180, 180, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor exiting ( this is the describe room emerged into rule ):
-[ R_181 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_181, 181);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: surreptitiously reckon darkness]
- SilentlyConsiderLight();
- ! [4: produce a room description with going spacing conventions]
- LookAfterGoing();
- }
- } else if (debug_rules > 1) DB_Rule(R_181, 181, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Getting off (B161_check_getting_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor getting off ( this is the can't get off things rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor getting off ( this is the can't get off things rule ):
-[ R_182 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_182, 182);
- ! [2: if the actor is on the noun]
- if (((noun == SupporterOf(actor))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is carried by the noun]
- if (((noun == CarrierOf(actor))))
- {! [5: continue the action]
- rfalse;
- }
- ! [6: if the actor is the player]
- if (((actor == player)))
- {! [7: say ~But [we] [aren't] on [the noun] at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- say__p=1;! [8: ~But [we] [aren't] on [the noun] at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_245); new_line; .L_Say135; .L_SayX135;}
- ! [9: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_182, 182, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Getting off (B162_carry_out_getting_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor getting off ( this is the standard getting off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor getting off ( this is the standard getting off rule ):
-[ R_183
- tmp_0 ! Let/loop value, e.g., 'former exterior': object
- ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_183, 183);
- ! [2: let the former exterior be the not-counting-parts holder of the noun]
-
- tmp_0 = (CoreOfParentOfCoreOf(noun));
- ! [3: surreptitiously move the actor to the former exterior]
- move actor to tmp_0;
- } else if (debug_rules > 1) DB_Rule(R_183, 183, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Getting off (B163_report_getting_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Report an actor getting off ( this is the standard report getting off rule ):
-! === equally specific with ===
-! Rule 2/2 ! Report an actor getting off ( this is the describe room stood up into rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor getting off ( this is the standard report getting off rule ):
-[ R_184 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_184, 184);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: say ~[The actor] [get] off [the noun].~ ( a )]
- say__p=1;! [4: ~[The actor] [get] off [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_246); new_line; .L_Say136; .L_SayX136;}
- ! [5: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_184, 184, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor getting off ( this is the describe room stood up into rule ):
-[ R_185 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_185, 185);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: produce a room description with going spacing conventions]
- LookAfterGoing();
- }
- } else if (debug_rules > 1) DB_Rule(R_185, 185, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Looking (B165_carry_out_looking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/5 ! Carry out looking ( this is the declare everything unmentioned rule ):
-! === equally specific with ===
-! Rule 2/5 ! Carry out looking ( this is the room description heading rule ):
-! === equally specific with ===
-! Rule 3/5 ! Carry out looking ( this is the room description body text rule ):
-! === equally specific with ===
-! Rule 4/5 ! Carry out looking ( this is the room description paragraphs about objects rule ):
-! === equally specific with ===
-! Rule 5/5 ! Carry out looking ( this is the check new arrival rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out looking ( this is the declare everything unmentioned rule ):
-[ R_187
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_187, 187);
- ! [2: repeat with item running through things]
- for (tmp_0=Prop_25(0), tmp_1=Prop_25(tmp_0): tmp_0: tmp_0=tmp_1, tmp_1=Prop_25(tmp_1))
- {! [3: now the item is not mentioned]
- (Adj_67_t3_v10(tmp_0));
- }
- } else if (debug_rules > 1) DB_Rule(R_187, 187, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out looking ( this is the room description heading rule ):
-[ R_188
- tmp_0 ! Let/loop value, e.g., 'intermediate level': object
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_188, 188);
- ! [2: say bold type]
- say__p=1;! [3: bold type]
- ParaContent(); style bold; .L_Say137; .L_SayX137;! [4: if the visibility level count is 0]
- if ((((MStack-->MstVO(20011,2)) == 0)))
- {! [5: begin the printing the name of a dark room activity]
- BeginActivity(V9_printing_the_name_of_a_da);
- ! [6: if handling the printing the name of a dark room activity]
- if (((~~(ForActivity(V9_printing_the_name_of_a_da)))))
- {! [7: say ~Darkness~ ( a )]
- say__p=1;! [8: ~Darkness~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_247); .L_Say138; .L_SayX138;}
- ! [9: end the printing the name of a dark room activity]
- EndActivity(V9_printing_the_name_of_a_da);
- } else {
- ! [10: if the visibility ceiling is the location]
- if ((((MStack-->MstVO(20011,3)) == real_location)))
- {! [11: say ~[visibility ceiling]~]
- say__p=1;! [12: visibility ceiling]
- ParaContent(); PrintShortName((MStack-->MstVO(20011,3))); .L_Say139; .L_SayX139;} else {
- ! [13: say ~[The visibility ceiling]~]
- say__p=1;! [14: the visibility ceiling]
- ParaContent(); print (The) (MStack-->MstVO(20011,3)); .L_Say140; .L_SayX140;}
- }
- ! [15: say roman type]
- say__p=1;! [16: roman type]
- ParaContent(); style roman; .L_Say141; .L_SayX141;! [17: let intermediate level be the visibility-holder of the actor]
-
- tmp_0 = VisibilityParent(actor);
- ! [18: repeat with intermediate level count running from 2 to the visibility level count]
- for (tmp_1=2: tmp_1<=(MStack-->MstVO(20011,2)): tmp_1++)
- {! [19: if the intermediate level is a supporter or the intermediate level is an animal]
- if ((((tmp_0 ofclass K6_supporter))) || (((tmp_0 ofclass K12_animal))))
- {! [20: say ~ (on [the intermediate level])~ ( b )]
- say__p=1;! [21: ~ (on [the intermediate level])~ ( b )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_248); .L_Say142; .L_SayX142;} else {
- ! [22: say ~ (in [the intermediate level])~ ( c )]
- say__p=1;! [23: ~ (in [the intermediate level])~ ( c )]
- ParaContent(); print (TEXT_TY_Say) ((LocalParking-->0=tmp_0),(LocalParking-->1=tmp_1),TX_R_249); .L_Say143; .L_SayX143;}
- ! [24: let the intermediate level be the visibility-holder of the intermediate level]
- tmp_0 = VisibilityParent(tmp_0);
- }
- ! [25: say line break]
- say__p=1;! [26: line break]
- ParaContent(); new_line; .L_Say144; .L_SayX144;! [27: say run paragraph on with special look spacing]
- say__p=1;! [28: run paragraph on with special look spacing]
- ParaContent(); SpecialLookSpacingBreak(); .L_Say145; .L_SayX145;} else if (debug_rules > 1) DB_Rule(R_188, 188, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out looking ( this is the room description body text rule ):
-[ R_189 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_189, 189);
- ! [2: if the visibility level count is 0]
- if ((((MStack-->MstVO(20011,2)) == 0)))
- {! [3: if set to abbreviated room descriptions]
- if (((lookmode == 3)))
- {! [4: continue the action]
- rfalse;
- }
- ! [5: if set to sometimes abbreviated room descriptions and abbreviated form allowed is true and darkness witnessed is true]
- if ((((lookmode == 1))) && ((((((MStack-->MstVO(20011,1)) && true) == (1 && true)))) && (((((Global_Vars-->0) && true) == (1 && true))))))
- {! [6: continue the action]
- rfalse;
- }
- ! [7: begin the printing the description of a dark room activity]
- BeginActivity(V10_printing_the_description);
- ! [8: if handling the printing the description of a dark room activity]
- if (((~~(ForActivity(V10_printing_the_description)))))
- {! [9: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [10: say ~[It] [are] pitch dark, and [we] [can't see] a thing.~ ( a )]
- say__p=1;! [11: ~[It] [are] pitch dark, and [we] [can't see] a thing.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_250); new_line; .L_Say146; .L_SayX146;}
- ! [12: end the printing the description of a dark room activity]
- EndActivity(V10_printing_the_description);
- } else {
- ! [13: if the visibility ceiling is the location]
- if ((((MStack-->MstVO(20011,3)) == real_location)))
- {! [14: if set to abbreviated room descriptions]
- if (((lookmode == 3)))
- {! [15: continue the action]
- rfalse;
- }
- ! [16: if set to sometimes abbreviated room descriptions and abbreviated form allowed is true and the location is visited]
- if ((((lookmode == 1))) && ((((((MStack-->MstVO(20011,1)) && true) == (1 && true)))) && ((((Adj_51_t1_v10(real_location)))))))
- {! [17: continue the action]
- rfalse;
- }
- ! [18: print the location's description]
- PrintOrRun(location, description);
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_189, 189, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out looking ( this is the room description paragraphs about objects rule ):
-[ R_190
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- tmp_1 ! Let/loop value (deallocated by end of phrase)
- tmp_2 ! Let/loop value (deallocated by end of phrase)
- ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_190, 190);
- ! [2: if the visibility level count is greater than 0]
- if ((((MStack-->MstVO(20011,2)) > 0)))
- {! [3: let the intermediate position be the actor]
-
- tmp_0 = actor;
- ! [4: let the ip count be the visibility level count]
-
- tmp_1 = (MStack-->MstVO(20011,2));
- ! [5: while the ip count is greater than 0]
- while (((tmp_1 > 0)))
- {! [6: now the intermediate position is marked for listing]
- (Adj_65_t2_v10(tmp_0));
- ! [7: let the intermediate position be the visibility-holder of the intermediate position]
- tmp_0 = VisibilityParent(tmp_0);
- ! [8: decrease the ip count by 1]
- tmp_1 = tmp_1 - 1;;
- }
- ! [9: let the top-down ip count be the visibility level count]
-
- tmp_2 = (MStack-->MstVO(20011,2));
- ! [10: while the top-down ip count is greater than 0]
- while (((tmp_2 > 0)))
- {! [11: let the intermediate position be the actor]
- tmp_0 = actor;
- ! [12: let the ip count be 0]
- tmp_1 = 0;
- ! [13: while the ip count is less than the top-down ip count]
- while (((tmp_1 < tmp_2)))
- {! [14: let the intermediate position be the visibility-holder of the intermediate position]
- tmp_0 = VisibilityParent(tmp_0);
- ! [15: increase the ip count by 1]
- tmp_1 = tmp_1 + 1;;
- }
- ! [16: describe locale for the intermediate position]
- (PHR_81_r1 (tmp_0));
- ! [17: decrease the top-down ip count by 1]
- tmp_2 = tmp_2 - 1;;
- }
- }
- ! [18: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_190, 190, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out looking ( this is the check new arrival rule ):
-[ R_191 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_191, 191);
- ! [2: if in darkness]
- if (((location==thedark)))
- {! [3: now the darkness witnessed is true]
- (Global_Vars-->0) = 1;
- } else {
- ! [4: if the location is a room]
- if (((real_location ofclass K1_room)))
- {! [5: now the location is visited]
- (Adj_51_t2_v10(real_location));
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_191, 191, 'actor');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Looking (B166_report_looking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor looking ( this is the other people looking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor looking ( this is the other people looking rule ):
-[ R_192 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_192, 192);
- ! [2: if the actor is not the player]
- if (((~~((actor == player)))))
- {! [3: say ~[The actor] [look] around.~ ( a )]
- say__p=1;! [4: ~[The actor] [look] around.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_251); new_line; .L_Say147; .L_SayX147;}
- } else if (debug_rules > 1) DB_Rule(R_192, 192, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Examining (B168_carry_out_examining)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/6 ! Carry out examining ( this is the standard examining rule ):
-! === equally specific with ===
-! Rule 2/6 ! Carry out examining ( this is the examine directions rule ):
-! === equally specific with ===
-! Rule 3/6 ! Carry out examining ( this is the examine containers rule ):
-! === equally specific with ===
-! Rule 4/6 ! Carry out examining ( this is the examine supporters rule ):
-! === equally specific with ===
-! Rule 5/6 ! Carry out examining ( this is the examine devices rule ):
-! === equally specific with ===
-! Rule 6/6 ! Carry out examining ( this is the examine undescribed things rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out examining ( this is the standard examining rule ):
-[ R_193 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_193, 193);
- ! [2: if the noun provides the property description and the description of the noun is not ~~]
- if ((((WhetherProvides(noun, false, description)))) && (((~~(( BlkValueCompare(GProperty(OBJECT_TY, noun,description), EMPTY_TEXT_VALUE) == 0))))))
- {! [3: say ~[description of the noun][line break]~]
- say__p=1;! [4: description of the noun]
- ParaContent(); @push self; print (TEXT_TY_Say) GProperty(OBJECT_TY, self=noun,description);@pull self; ! [5: line break]
- ParaContent(); new_line; .L_Say148; .L_SayX148;! [6: now examine text printed is true]
- (MStack-->MstVO(20012,0)) = 1;
- }
- } else if (debug_rules > 1) DB_Rule(R_193, 193, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out examining ( this is the examine directions rule ):
-[ R_194 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_194, 194);
- ! [2: if the noun is a direction]
- if (((noun ofclass K3_direction)))
- {! [3: say ~[We] [see] nothing unexpected in that direction.~ ( a )]
- say__p=1;! [4: ~[We] [see] nothing unexpected in that direction.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_252); new_line; .L_Say149; .L_SayX149;! [5: now examine text printed is true]
- (MStack-->MstVO(20012,0)) = 1;
- }
- } else if (debug_rules > 1) DB_Rule(R_194, 194, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out examining ( this is the examine containers rule ):
-[ R_195 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_195, 195);
- ! [2: if the noun is a container]
- if (((noun ofclass K5_container)))
- {! [3: if the noun is open or the noun is transparent]
- if (((((Adj_72_t1_v10(noun))))) || ((((Adj_71_t1_v10(noun))))))
- {! [4: if something described which is not scenery is in the noun and something which is not the player is in the noun]
- if (((((Prop_26())))) && ((((Prop_27())))))
- {! [5: say ~In [the noun] ~ ( a )]
- say__p=1;! [6: ~In [the noun] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_253); .L_Say150; .L_SayX150;! [7: list the contents of the noun , as a sentence , tersely , not listing concealed items , prefacing with is/are]
- WriteListFrom(child(noun), 3144);
- ! [8: say ~.~]
- say__p=1;! [9: ~.~]
- ParaContent(); print "."; new_line; .L_Say151; .L_SayX151;! [10: now examine text printed is true]
- (MStack-->MstVO(20012,0)) = 1;
- } else {
- ! [11: if examine text printed is false]
- if (((((MStack-->MstVO(20012,0)) && true) == (0 && true))))
- {! [12: if the player is in the noun]
- if (((noun == ContainerOf(player))))
- {! [13: make no decision]
- rfalse;
- }
- ! [14: say ~[The noun] [are] empty.~ ( b )]
- say__p=1;! [15: ~[The noun] [are] empty.~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_254); new_line; .L_Say152; .L_SayX152;! [16: now examine text printed is true]
- (MStack-->MstVO(20012,0)) = 1;
- }
- }
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_195, 195, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out examining ( this is the examine supporters rule ):
-[ R_196 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_196, 196);
- ! [2: if the noun is a supporter]
- if (((noun ofclass K6_supporter)))
- {! [3: if something described which is not scenery is on the noun and something which is not the player is on the noun]
- if (((((Prop_28())))) && ((((Prop_29())))))
- {! [4: say ~On [the noun] ~ ( a )]
- say__p=1;! [5: ~On [the noun] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_255); .L_Say153; .L_SayX153;! [6: list the contents of the noun , as a sentence , tersely , not listing concealed items , prefacing with is/are , including contents , giving brief inventory information]
- WriteListFrom(child(noun), 3288);
- ! [7: say ~.~]
- say__p=1;! [8: ~.~]
- ParaContent(); print "."; new_line; .L_Say154; .L_SayX154;! [9: now examine text printed is true]
- (MStack-->MstVO(20012,0)) = 1;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_196, 196, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out examining ( this is the examine devices rule ):
-[ R_197 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_197, 197);
- ! [2: if the noun is a device]
- if (((noun ofclass K13_device)))
- {! [3: say ~[The noun] [are] [if story tense is present tense]currently [end if]switched [if the noun is switched on]on[otherwise]off[end if].~ ( a )]
- say__p=1;! [4: ~[The noun] [are] [if story tense is present tense]currently [end if]switched [if the noun is switched on]on[otherwise]off[end if].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_256); new_line; .L_Say155; .L_SayX155;! [5: now examine text printed is true]
- (MStack-->MstVO(20012,0)) = 1;
- }
- } else if (debug_rules > 1) DB_Rule(R_197, 197, 'actor');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Carry out examining ( this is the examine undescribed things rule ):
-[ R_198 ;
- if (actor == player) {
- if (debug_rules) DB_Rule(R_198, 198);
- ! [2: if examine text printed is false]
- if (((((MStack-->MstVO(20012,0)) && true) == (0 && true))))
- {! [3: say ~[We] [see] nothing special about [the noun].~ ( a )]
- say__p=1;! [4: ~[We] [see] nothing special about [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_257); new_line; .L_Say156; .L_SayX156;}
- } else if (debug_rules > 1) DB_Rule(R_198, 198, 'actor');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Examining (B169_report_examining)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor examining ( this is the report other people examining rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor examining ( this is the report other people examining rule ):
-[ R_199 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_199, 199);
- ! [2: if the actor is not the player]
- if (((~~((actor == player)))))
- {! [3: say ~[The actor] [look] closely at [the noun].~ ( a )]
- say__p=1;! [4: ~[The actor] [look] closely at [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_258); new_line; .L_Say157; .L_SayX157;}
- } else if (debug_rules > 1) DB_Rule(R_199, 199, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Looking under (B171_carry_out_looking_under)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor looking under ( this is the standard looking under rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor looking under ( this is the standard looking under rule ):
-[ R_200 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_200, 200);
- ! [2: if the player is the actor]
- if (((player == actor)))
- {! [3: say ~[We] [find] nothing of interest.~ ( a )]
- say__p=1;! [4: ~[We] [find] nothing of interest.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_259); new_line; .L_Say158; .L_SayX158;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_200, 200, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Looking under (B172_report_looking_under)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor looking under ( this is the report other people looking under rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor looking under ( this is the report other people looking under rule ):
-[ R_201 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_201, 201);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: if the actor is not the player]
- if (((~~((actor == player)))))
- {! [4: say ~[The actor] [look] under [the noun].~ ( a )]
- say__p=1;! [5: ~[The actor] [look] under [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_260); new_line; .L_Say159; .L_SayX159;}
- }
- } else if (debug_rules > 1) DB_Rule(R_201, 201, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Searching (B173_check_searching)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Check an actor searching ( this is the can't search unless container or supporter rule ):
-! === equally specific with ===
-! Rule 2/2 ! Check an actor searching ( this is the can't search closed opaque containers rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor searching ( this is the can't search unless container or supporter rule ):
-[ R_202 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_202, 202);
- ! [2: if the noun is not a container and the noun is not a supporter]
- if ((((~~((noun ofclass K5_container))))) && (((~~((noun ofclass K6_supporter))))))
- {! [3: if the player is the actor]
- if (((player == actor)))
- {! [4: say ~[We] [find] nothing of interest.~ ( a )]
- say__p=1;! [5: ~[We] [find] nothing of interest.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_261); new_line; .L_Say160; .L_SayX160;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_202, 202, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor searching ( this is the can't search closed opaque containers rule ):
-[ R_203 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_203, 203);
- ! [2: if the noun is a closed opaque container]
- if (((noun ofclass K5_container) && ((Adj_73_t1_v10(noun))) && ((Adj_70_t1_v10(noun)))))
- {! [3: if the player is the actor]
- if (((player == actor)))
- {! [4: say ~[We] [can't see] inside, since [the noun] [are] closed.~ ( a )]
- say__p=1;! [5: ~[We] [can't see] inside, since [the noun] [are] closed.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_262); new_line; .L_Say161; .L_SayX161;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_203, 203, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Searching (B175_report_searching)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Report searching a container ( this is the standard search containers rule ):
-! === equally specific with ===
-! Rule 2/3 ! Report searching a supporter ( this is the standard search supporters rule ):
-! >>> I - Number of aspects constrained >>>
-! Rule 3/3 ! Report an actor searching ( this is the report other people searching rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report searching a container ( this is the standard search containers rule ):
-[ R_204 ;
- if ((( (actor==player) && ((noun ofclass K5_container))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_204, 204);
- ! [2: if the noun contains a described thing which is not scenery]
- if ((((Prop_30()))))
- {! [3: say ~In [the noun] ~ ( a )]
- say__p=1;! [4: ~In [the noun] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_263); .L_Say162; .L_SayX162;! [5: list the contents of the noun , as a sentence , tersely , not listing concealed items , prefacing with is/are]
- WriteListFrom(child(noun), 3144);
- ! [6: say ~.~]
- say__p=1;! [7: ~.~]
- ParaContent(); print "."; new_line; .L_Say163; .L_SayX163;} else {
- ! [8: say ~[The noun] [are] empty.~ ( b )]
- say__p=1;! [9: ~[The noun] [are] empty.~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_264); new_line; .L_Say164; .L_SayX164;}
- } else if (debug_rules > 1) DB_Rule(R_204, 204, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report searching a supporter ( this is the standard search supporters rule ):
-[ R_205 ;
- if ((( (actor==player) && ((noun ofclass K6_supporter))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_205, 205);
- ! [2: if the noun supports a described thing which is not scenery]
- if ((((Prop_31()))))
- {! [3: say ~On [the noun] ~ ( a )]
- say__p=1;! [4: ~On [the noun] ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_265); .L_Say165; .L_SayX165;! [5: list the contents of the noun , as a sentence , tersely , not listing concealed items , prefacing with is/are]
- WriteListFrom(child(noun), 3144);
- ! [6: say ~.~]
- say__p=1;! [7: ~.~]
- ParaContent(); print "."; new_line; .L_Say166; .L_SayX166;} else {
- ! [8: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [9: say ~[There] [are] nothing on [the noun].~ ( b )]
- say__p=1;! [10: ~[There] [are] nothing on [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_266); new_line; .L_Say167; .L_SayX167;}
- } else if (debug_rules > 1) DB_Rule(R_205, 205, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor searching ( this is the report other people searching rule ):
-[ R_206 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_206, 206);
- ! [2: if the actor is not the player]
- if (((~~((actor == player)))))
- {! [3: say ~[The actor] [search] [the noun].~ ( a )]
- say__p=1;! [4: ~[The actor] [search] [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_267); new_line; .L_Say168; .L_SayX168;}
- } else if (debug_rules > 1) DB_Rule(R_206, 206, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Consulting it about (B178_report_consulting_it_ab)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor consulting something about ( this is the block consulting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor consulting something about ( this is the block consulting rule ):
-[ R_207 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_207, 207);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[We] [discover] nothing of interest in [the noun].~ ( a )]
- say__p=1;! [4: ~[We] [discover] nothing of interest in [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_268); new_line; .L_Say169; .L_SayX169;} else {
- ! [5: say ~[The actor] [look] at [the noun].~ ( b )]
- say__p=1;! [6: ~[The actor] [look] at [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_269); new_line; .L_Say170; .L_SayX170;}
- } else if (debug_rules > 1) DB_Rule(R_207, 207, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Locking it with (B179_check_locking_it_with)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/4 ! Check an actor locking something with ( this is the can't lock without a lock rule ):
-! === equally specific with ===
-! Rule 2/4 ! Check an actor locking something with ( this is the can't lock what's already locked rule ):
-! === equally specific with ===
-! Rule 3/4 ! Check an actor locking something with ( this is the can't lock what's open rule ):
-! === equally specific with ===
-! Rule 4/4 ! Check an actor locking something with ( this is the can't lock without the correct key rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor locking something with ( this is the can't lock without a lock rule ):
-[ R_208 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_208, 208);
- ! [2: if the noun provides the property lockable and the noun is lockable]
- if ((((WhetherProvides(noun, true, lockable)))) && ((((Adj_76_t1_v10(noun))))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[regarding the noun][Those] [don't] seem to be something [we] [can] lock.~ ( a )]
- say__p=1;! [6: ~[regarding the noun][Those] [don't] seem to be something [we] [can] lock.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_270); new_line; .L_Say171; .L_SayX171;}
- ! [7: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_208, 208, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor locking something with ( this is the can't lock what's already locked rule ):
-[ R_209 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_209, 209);
- ! [2: if the noun is locked]
- if ((((Adj_77_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] locked at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] locked at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_271); new_line; .L_Say172; .L_SayX172;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_209, 209, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor locking something with ( this is the can't lock what's open rule ):
-[ R_210 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_210, 210);
- ! [2: if the noun is open]
- if ((((Adj_72_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~First [we] [would have] to close [the noun].~ ( a )]
- say__p=1;! [5: ~First [we] [would have] to close [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_272); new_line; .L_Say173; .L_SayX173;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_210, 210, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor locking something with ( this is the can't lock without the correct key rule ):
-[ R_211 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_211, 211);
- ! [2: if the holder of the second noun is not the actor or the noun does not provide the property matching key or the matching key of the noun is not the second noun]
- if ((((~~(((HolderOf(second)) == actor))))) || ((((~~((WhetherProvides(noun, false, with_key)))))) || (((~~((GProperty(OBJECT_TY, noun,with_key) == second)))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the second noun][Those] [don't] seem to fit the lock.~ ( a )]
- say__p=1;! [5: ~[regarding the second noun][Those] [don't] seem to fit the lock.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_273); new_line; .L_Say174; .L_SayX174;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_211, 211, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Locking it with (B180_carry_out_locking_it_wi)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor locking something with ( this is the standard locking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor locking something with ( this is the standard locking rule ):
-[ R_212 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_212, 212);
- ! [2: now the noun is locked]
- (Adj_77_t2_v10(noun));
- } else if (debug_rules > 1) DB_Rule(R_212, 212, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Locking it with (B181_report_locking_it_with)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor locking something with ( this is the standard report locking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor locking something with ( this is the standard report locking rule ):
-[ R_213 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_213, 213);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [lock] [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [lock] [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_274); new_line; .L_Say175; .L_SayX175;}
- } else {
- ! [6: if the actor is visible]
- if ((((Adj_3_t1_v10(actor)))))
- {! [7: say ~[The actor] [lock] [the noun].~ ( b )]
- say__p=1;! [8: ~[The actor] [lock] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_275); new_line; .L_Say176; .L_SayX176;}
- }
- } else if (debug_rules > 1) DB_Rule(R_213, 213, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Unlocking it with (B182_check_unlocking_it_with)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor unlocking something with ( this is the can't unlock without a lock rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor unlocking something with ( this is the can't unlock what's already unlocked rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor unlocking something with ( this is the can't unlock without the correct key rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor unlocking something with ( this is the can't unlock without a lock rule ):
-[ R_214 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_214, 214);
- ! [2: if the noun provides the property lockable and the noun is lockable]
- if ((((WhetherProvides(noun, true, lockable)))) && ((((Adj_76_t1_v10(noun))))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[regarding the noun][Those] [don't] seem to be something [we] [can] unlock.~ ( a )]
- say__p=1;! [6: ~[regarding the noun][Those] [don't] seem to be something [we] [can] unlock.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_276); new_line; .L_Say177; .L_SayX177;}
- ! [7: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_214, 214, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor unlocking something with ( this is the can't unlock what's already unlocked rule ):
-[ R_215 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_215, 215);
- ! [2: if the noun is not locked]
- if (((~~(((Adj_77_t1_v10(noun)))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] unlocked at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] unlocked at the [if story tense is present tense]moment[otherwise]time[end if].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_277); new_line; .L_Say178; .L_SayX178;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_215, 215, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor unlocking something with ( this is the can't unlock without the correct key rule ):
-[ R_216 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_216, 216);
- ! [2: if the holder of the second noun is not the actor or the noun does not provide the property matching key or the matching key of the noun is not the second noun]
- if ((((~~(((HolderOf(second)) == actor))))) || ((((~~((WhetherProvides(noun, false, with_key)))))) || (((~~((GProperty(OBJECT_TY, noun,with_key) == second)))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the second noun][Those] [don't] seem to fit the lock.~ ( a )]
- say__p=1;! [5: ~[regarding the second noun][Those] [don't] seem to fit the lock.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_278); new_line; .L_Say179; .L_SayX179;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_216, 216, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Unlocking it with (B183_carry_out_unlocking_it_)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor unlocking something with ( this is the standard unlocking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor unlocking something with ( this is the standard unlocking rule ):
-[ R_217 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_217, 217);
- ! [2: now the noun is not locked]
- (Adj_77_t3_v10(noun));
- } else if (debug_rules > 1) DB_Rule(R_217, 217, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Unlocking it with (B184_report_unlocking_it_wit)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor unlocking something with ( this is the standard report unlocking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor unlocking something with ( this is the standard report unlocking rule ):
-[ R_218 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_218, 218);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [unlock] [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [unlock] [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_279); new_line; .L_Say180; .L_SayX180;}
- } else {
- ! [6: if the actor is visible]
- if ((((Adj_3_t1_v10(actor)))))
- {! [7: say ~[The actor] [unlock] [the noun].~ ( b )]
- say__p=1;! [8: ~[The actor] [unlock] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_280); new_line; .L_Say181; .L_SayX181;}
- }
- } else if (debug_rules > 1) DB_Rule(R_218, 218, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Switching on (B185_check_switching_on)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Check an actor switching on ( this is the can't switch on unless switchable rule ):
-! === equally specific with ===
-! Rule 2/2 ! Check an actor switching on ( this is the can't switch on what's already on rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor switching on ( this is the can't switch on unless switchable rule ):
-[ R_219 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_219, 219);
- ! [2: if the noun provides the property switched on]
- if (((WhetherProvides(noun, true, on))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[regarding the noun][They] [aren't] something [we] [can] switch.~ ( a )]
- say__p=1;! [6: ~[regarding the noun][They] [aren't] something [we] [can] switch.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_281); new_line; .L_Say182; .L_SayX182;}
- ! [7: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_219, 219, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor switching on ( this is the can't switch on what's already on rule ):
-[ R_220 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_220, 220);
- ! [2: if the noun is switched on]
- if ((((Adj_82_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] already on.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] already on.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_282); new_line; .L_Say183; .L_SayX183;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_220, 220, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Switching on (B186_carry_out_switching_on)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor switching on ( this is the standard switching on rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor switching on ( this is the standard switching on rule ):
-[ R_221 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_221, 221);
- ! [2: now the noun is switched on]
- (Adj_82_t2_v10(noun));
- } else if (debug_rules > 1) DB_Rule(R_221, 221, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Switching on (B187_report_switching_on)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor switching on ( this is the standard report switching on rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor switching on ( this is the standard report switching on rule ):
-[ R_222 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_222, 222);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: say ~[The actor] [switch] [the noun] on.~ ( a )]
- say__p=1;! [4: ~[The actor] [switch] [the noun] on.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_283); new_line; .L_Say184; .L_SayX184;}
- } else if (debug_rules > 1) DB_Rule(R_222, 222, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Switching off (B188_check_switching_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Check an actor switching off ( this is the can't switch off unless switchable rule ):
-! === equally specific with ===
-! Rule 2/2 ! Check an actor switching off ( this is the can't switch off what's already off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor switching off ( this is the can't switch off unless switchable rule ):
-[ R_223 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_223, 223);
- ! [2: if the noun provides the property switched on]
- if (((WhetherProvides(noun, true, on))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[regarding the noun][They] [aren't] something [we] [can] switch.~ ( a )]
- say__p=1;! [6: ~[regarding the noun][They] [aren't] something [we] [can] switch.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_284); new_line; .L_Say185; .L_SayX185;}
- ! [7: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_223, 223, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor switching off ( this is the can't switch off what's already off rule ):
-[ R_224 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_224, 224);
- ! [2: if the noun is switched off]
- if ((((Adj_83_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] already off.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] already off.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_285); new_line; .L_Say186; .L_SayX186;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_224, 224, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Switching off (B189_carry_out_switching_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor switching off ( this is the standard switching off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor switching off ( this is the standard switching off rule ):
-[ R_225 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_225, 225);
- ! [2: now the noun is switched off]
- (Adj_83_t2_v10(noun));
- } else if (debug_rules > 1) DB_Rule(R_225, 225, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Switching off (B190_report_switching_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor switching off ( this is the standard report switching off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor switching off ( this is the standard report switching off rule ):
-[ R_226 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_226, 226);
- ! [2: if the action is not silent]
- if (((keep_silent == false)))
- {! [3: say ~[The actor] [switch] [the noun] off.~ ( a )]
- say__p=1;! [4: ~[The actor] [switch] [the noun] off.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_286); new_line; .L_Say187; .L_SayX187;}
- } else if (debug_rules > 1) DB_Rule(R_226, 226, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Opening (B191_check_opening)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor opening ( this is the can't open unless openable rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor opening ( this is the can't open what's locked rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor opening ( this is the can't open what's already open rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor opening ( this is the can't open unless openable rule ):
-[ R_227 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_227, 227);
- ! [2: if the noun provides the property openable and the noun is openable]
- if ((((WhetherProvides(noun, true, openable)))) && ((((Adj_74_t1_v10(noun))))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[regarding the noun][They] [aren't] something [we] [can] open.~ ( a )]
- say__p=1;! [6: ~[regarding the noun][They] [aren't] something [we] [can] open.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_287); new_line; .L_Say188; .L_SayX188;}
- ! [7: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_227, 227, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor opening ( this is the can't open what's locked rule ):
-[ R_228 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_228, 228);
- ! [2: if the noun provides the property lockable and the noun is locked]
- if ((((WhetherProvides(noun, true, lockable)))) && ((((Adj_77_t1_v10(noun))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They] [seem] to be locked.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They] [seem] to be locked.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_288); new_line; .L_Say189; .L_SayX189;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_228, 228, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor opening ( this is the can't open what's already open rule ):
-[ R_229 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_229, 229);
- ! [2: if the noun is open]
- if ((((Adj_72_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] already open.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] already open.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_289); new_line; .L_Say190; .L_SayX190;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_229, 229, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Opening (B192_carry_out_opening)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor opening ( this is the standard opening rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor opening ( this is the standard opening rule ):
-[ R_230 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_230, 230);
- ! [2: now the noun is open]
- (Adj_72_t2_v10(noun));
- } else if (debug_rules > 1) DB_Rule(R_230, 230, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Opening (B193_report_opening)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Report an actor opening ( this is the reveal any newly visible interior rule ):
-! === equally specific with ===
-! Rule 2/2 ! Report an actor opening ( this is the standard report opening rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor opening ( this is the reveal any newly visible interior rule ):
-[ R_231 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_231, 231);
- ! [2: if the actor is the player and the noun is an opaque container and the first thing held by the noun is not nothing and the noun does not enclose the actor]
- if ((((actor == player))) && ((((noun ofclass K5_container) && ((Adj_70_t1_v10(noun))))) && ((((~~(((child(noun)) == nothing))))) && (((~~((IndirectlyContains(noun,actor)))))))))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[We] [open] [the noun], revealing ~ ( a )]
- say__p=1;! [6: ~[We] [open] [the noun], revealing ~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_290); .L_Say191; .L_SayX191;! [7: list the contents of the noun , as a sentence , tersely , not listing concealed items]
- WriteListFrom(child(noun), 2120);
- ! [8: say ~.~]
- say__p=1;! [9: ~.~]
- ParaContent(); print "."; new_line; .L_Say192; .L_SayX192;}
- }
- ! [10: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_231, 231, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor opening ( this is the standard report opening rule ):
-[ R_232 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_232, 232);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [open] [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [open] [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_291); new_line; .L_Say193; .L_SayX193;}
- } else {
- ! [6: if the player can see the actor]
- if (((TestVisibility(player,actor))))
- {! [7: say ~[The actor] [open] [the noun].~ ( b )]
- say__p=1;! [8: ~[The actor] [open] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_292); new_line; .L_Say194; .L_SayX194;} else {
- ! [9: say ~[The noun] [open].~ ( c )]
- say__p=1;! [10: ~[The noun] [open].~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_293); new_line; .L_Say195; .L_SayX195;}
- }
- } else if (debug_rules > 1) DB_Rule(R_232, 232, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Closing (B194_check_closing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Check an actor closing ( this is the can't close unless openable rule ):
-! === equally specific with ===
-! Rule 2/2 ! Check an actor closing ( this is the can't close what's already closed rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor closing ( this is the can't close unless openable rule ):
-[ R_233 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_233, 233);
- ! [2: if the noun provides the property openable and the noun is openable]
- if ((((WhetherProvides(noun, true, openable)))) && ((((Adj_74_t1_v10(noun))))))
- {! [3: continue the action]
- rfalse;
- }
- ! [4: if the actor is the player]
- if (((actor == player)))
- {! [5: say ~[regarding the noun][They] [aren't] something [we] [can] close.~ ( a )]
- say__p=1;! [6: ~[regarding the noun][They] [aren't] something [we] [can] close.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_294); new_line; .L_Say196; .L_SayX196;}
- ! [7: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_233, 233, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor closing ( this is the can't close what's already closed rule ):
-[ R_234 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_234, 234);
- ! [2: if the noun is closed]
- if ((((Adj_73_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They're] already closed.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They're] already closed.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_295); new_line; .L_Say197; .L_SayX197;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_234, 234, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Closing (B195_carry_out_closing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor closing ( this is the standard closing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor closing ( this is the standard closing rule ):
-[ R_235 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_235, 235);
- ! [2: now the noun is closed]
- (Adj_73_t2_v10(noun));
- } else if (debug_rules > 1) DB_Rule(R_235, 235, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Closing (B196_report_closing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor closing ( this is the standard report closing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor closing ( this is the standard report closing rule ):
-[ R_236 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_236, 236);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [close] [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [close] [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_296); new_line; .L_Say198; .L_SayX198;}
- } else {
- ! [6: if the player can see the actor]
- if (((TestVisibility(player,actor))))
- {! [7: say ~[The actor] [close] [the noun].~ ( b )]
- say__p=1;! [8: ~[The actor] [close] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_297); new_line; .L_Say199; .L_SayX199;} else {
- ! [9: say ~[The noun] [close].~ ( c )]
- say__p=1;! [10: ~[The noun] [close].~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_298); new_line; .L_Say200; .L_SayX200;}
- }
- } else if (debug_rules > 1) DB_Rule(R_236, 236, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Wearing (B197_check_wearing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor wearing ( this is the can't wear what's not clothing rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor wearing ( this is the can't wear what's not held rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor wearing ( this is the can't wear what's already worn rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor wearing ( this is the can't wear what's not clothing rule ):
-[ R_237 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_237, 237);
- ! [2: if the noun is not a thing or the noun is not wearable]
- if ((((~~((noun ofclass K2_thing))))) || (((~~(((Adj_60_t1_v10(noun))))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [can't wear] [regarding the noun][those]!~ ( a )]
- say__p=1;! [5: ~[We] [can't wear] [regarding the noun][those]!~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_299); new_line; .L_Say201; .L_SayX201;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_237, 237, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor wearing ( this is the can't wear what's not held rule ):
-[ R_238 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_238, 238);
- ! [2: if the holder of the noun is not the actor]
- if (((~~(((HolderOf(noun)) == actor)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [aren't] holding [regarding the noun][those]!~ ( a )]
- say__p=1;! [5: ~[We] [aren't] holding [regarding the noun][those]!~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_300); new_line; .L_Say202; .L_SayX202;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_238, 238, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor wearing ( this is the can't wear what's already worn rule ):
-[ R_239 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_239, 239);
- ! [2: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We]['re] already wearing [regarding the noun][those]!~ ( a )]
- say__p=1;! [5: ~[We]['re] already wearing [regarding the noun][those]!~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_301); new_line; .L_Say203; .L_SayX203;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_239, 239, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Wearing (B198_carry_out_wearing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor wearing ( this is the standard wearing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor wearing ( this is the standard wearing rule ):
-[ R_240 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_240, 240);
- ! [2: now the actor wears the noun]
- WearObject(noun,actor);
- } else if (debug_rules > 1) DB_Rule(R_240, 240, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Wearing (B199_report_wearing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor wearing ( this is the standard report wearing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor wearing ( this is the standard report wearing rule ):
-[ R_241 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_241, 241);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [put] on [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [put] on [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_302); new_line; .L_Say204; .L_SayX204;}
- } else {
- ! [6: say ~[The actor] [put] on [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [put] on [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_303); new_line; .L_Say205; .L_SayX205;}
- } else if (debug_rules > 1) DB_Rule(R_241, 241, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Taking off (B200_check_taking_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Check an actor taking off ( this is the can't take off what's not worn rule ):
-! === equally specific with ===
-! Rule 2/2 ! Check an actor taking off ( this is the can't exceed carrying capacity when taking off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor taking off ( this is the can't take off what's not worn rule ):
-[ R_243 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_243, 243);
- ! [2: if the actor is not wearing the noun]
- if (((~~((actor == WearerOf(noun))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [aren't] wearing [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [aren't] wearing [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_304); new_line; .L_Say206; .L_SayX206;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_243, 243, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor taking off ( this is the can't exceed carrying capacity when taking off rule ):
-[ R_244 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_244, 244);
- ! [2: if the number of things carried by the actor is at least the carrying capacity of the actor]
- if ((((Prop_32()) >= GProperty(10, actor,capacity))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We]['re] carrying too many things already.~ ( a )]
- say__p=1;! [5: ~[We]['re] carrying too many things already.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_305); new_line; .L_Say207; .L_SayX207;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_244, 244, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Taking off (B201_carry_out_taking_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor taking off ( this is the standard taking off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor taking off ( this is the standard taking off rule ):
-[ R_245 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_245, 245);
- ! [2: now the actor carries the noun]
- MoveObject(noun,actor);
- } else if (debug_rules > 1) DB_Rule(R_245, 245, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Taking off (B202_report_taking_off)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor taking off ( this is the standard report taking off rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor taking off ( this is the standard report taking off rule ):
-[ R_246 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_246, 246);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [take] off [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [take] off [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_306); new_line; .L_Say208; .L_SayX208;}
- } else {
- ! [6: say ~[The actor] [take] off [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [take] off [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_307); new_line; .L_Say209; .L_SayX209;}
- } else if (debug_rules > 1) DB_Rule(R_246, 246, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Giving it to (B203_check_giving_it_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/6 ! Check an actor giving something to ( this is the can't give what you haven't got rule ):
-! === equally specific with ===
-! Rule 2/6 ! Check an actor giving something to ( this is the can't give to yourself rule ):
-! === equally specific with ===
-! Rule 3/6 ! Check an actor giving something to ( this is the can't give to a non-person rule ):
-! === equally specific with ===
-! Rule 4/6 ! Check an actor giving something to ( this is the can't give clothes being worn rule ):
-! === equally specific with ===
-! Rule 5/6 ! Check an actor giving something to ( this is the block giving rule ):
-! === equally specific with ===
-! Rule 6/6 ! Check an actor giving something to ( this is the can't exceed carrying capacity when giving rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor giving something to ( this is the can't give what you haven't got rule ):
-[ R_247 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_247, 247);
- ! [2: if the actor is not the holder of the noun]
- if (((~~((actor == (HolderOf(noun)))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [aren't] holding [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [aren't] holding [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_308); new_line; .L_Say210; .L_SayX210;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_247, 247, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor giving something to ( this is the can't give to yourself rule ):
-[ R_248 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_248, 248);
- ! [2: if the actor is the second noun]
- if (((actor == second)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [can't give] [the noun] to [ourselves].~ ( a )]
- say__p=1;! [5: ~[We] [can't give] [the noun] to [ourselves].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_309); new_line; .L_Say211; .L_SayX211;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_248, 248, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor giving something to ( this is the can't give to a non-person rule ):
-[ R_249 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_249, 249);
- ! [2: if the second noun is not a person]
- if (((~~((second ofclass K8_person)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The second noun] [aren't] able to receive things.~ ( a )]
- say__p=1;! [5: ~[The second noun] [aren't] able to receive things.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_310); new_line; .L_Say212; .L_SayX212;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_249, 249, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor giving something to ( this is the can't give clothes being worn rule ):
-[ R_250 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_250, 250);
- ! [2: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [3: say ~(first taking [the noun] off)[command clarification break]~ ( a )]
- say__p=1;! [4: ~(first taking [the noun] off)[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_311); .L_Say213; .L_SayX213;! [5: silently try the actor trying taking off the noun]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Disrobe, noun, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [6: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [7: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_250, 250, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor giving something to ( this is the block giving rule ):
-[ R_251 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_251, 251);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[The second noun] [don't] seem interested.~ ( a )]
- say__p=1;! [4: ~[The second noun] [don't] seem interested.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_312); new_line; .L_Say214; .L_SayX214;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_251, 251, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor giving something to ( this is the can't exceed carrying capacity when giving rule ):
-[ R_252 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_252, 252);
- ! [2: if the number of things carried by the second noun is at least the carrying capacity of the second noun]
- if ((((Prop_33()) >= GProperty(OBJECT_TY, second,capacity))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The second noun] [are] carrying too many things already.~ ( a )]
- say__p=1;! [5: ~[The second noun] [are] carrying too many things already.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_313); new_line; .L_Say215; .L_SayX215;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_252, 252, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: carry out Giving it to (B204_carry_out_giving_it_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Carry out an actor giving something to ( this is the standard giving rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Carry out an actor giving something to ( this is the standard giving rule ):
-[ R_253 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_253, 253);
- ! [2: move the noun to the second noun]
- MoveObject(noun, second, 0, false);
- } else if (debug_rules > 1) DB_Rule(R_253, 253, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Giving it to (B205_report_giving_it_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor giving something to ( this is the standard report giving rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor giving something to ( this is the standard report giving rule ):
-[ R_254 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_254, 254);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[We] [give] [the noun] to [the second noun].~ ( a )]
- say__p=1;! [4: ~[We] [give] [the noun] to [the second noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_314); new_line; .L_Say216; .L_SayX216;} else {
- ! [5: if the second noun is the player]
- if (((second == player)))
- {! [6: say ~[The actor] [give] [the noun] to [us].~ ( b )]
- say__p=1;! [7: ~[The actor] [give] [the noun] to [us].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_315); new_line; .L_Say217; .L_SayX217;} else {
- ! [8: say ~[The actor] [give] [the noun] to [the second noun].~ ( c )]
- say__p=1;! [9: ~[The actor] [give] [the noun] to [the second noun].~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_316); new_line; .L_Say218; .L_SayX218;}
- }
- } else if (debug_rules > 1) DB_Rule(R_254, 254, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Showing it to (B206_check_showing_it_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor showing something to ( this is the can't show what you haven't got rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor showing something to ( this is the convert show to yourself to examine rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor showing something to ( this is the block showing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor showing something to ( this is the can't show what you haven't got rule ):
-[ R_255 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_255, 255);
- ! [2: if the actor is not the holder of the noun]
- if (((~~((actor == (HolderOf(noun)))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [aren't] holding [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [aren't] holding [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_317); new_line; .L_Say219; .L_SayX219;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_255, 255, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor showing something to ( this is the convert show to yourself to examine rule ):
-[ R_256 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_256, 256);
- ! [2: if the actor is the second noun]
- if (((actor == second)))
- {! [3: convert to the examining action on the noun]
- return GVS_Convert(##Examine,noun,0);
- }
- } else if (debug_rules > 1) DB_Rule(R_256, 256, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor showing something to ( this is the block showing rule ):
-[ R_257 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_257, 257);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[The second noun] [are] unimpressed.~ ( a )]
- say__p=1;! [4: ~[The second noun] [are] unimpressed.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_318); new_line; .L_Say220; .L_SayX220;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_257, 257, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Waking (B209_check_waking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor waking ( this is the block waking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor waking ( this is the block waking rule ):
-[ R_258 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_258, 258);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~That [seem] unnecessary.~ ( a )]
- say__p=1;! [5: ~That [seem] unnecessary.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_319); new_line; .L_Say221; .L_SayX221;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_258, 258, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Throwing it at (B212_check_throwing_it_at)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor throwing something at ( this is the implicitly remove thrown clothing rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor throwing something at ( this is the futile to throw things at inanimate objects rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor throwing something at ( this is the block throwing at rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor throwing something at ( this is the implicitly remove thrown clothing rule ):
-[ R_259 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_259, 259);
- ! [2: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [3: say ~(first taking [the noun] off)[command clarification break]~ ( a )]
- say__p=1;! [4: ~(first taking [the noun] off)[command clarification break]~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_320); .L_Say222; .L_SayX222;! [5: silently try the actor trying taking off the noun]
- @push keep_silent; keep_silent=1; @push say__p; @push say__pc;
- ClearParagraphing(1);
- TryAction(0, actor, ##Disrobe, noun, 0);
- DivideParagraphPoint();
- @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
-
- ! [6: if the actor is wearing the noun]
- if (((actor == WearerOf(noun))))
- {! [7: stop the action]
- rtrue;
- }
- }
- } else if (debug_rules > 1) DB_Rule(R_259, 259, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor throwing something at ( this is the futile to throw things at inanimate objects rule ):
-[ R_260 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_260, 260);
- ! [2: if the second noun is not a person]
- if (((~~((second ofclass K8_person)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~Futile.~ ( a )]
- say__p=1;! [5: ~Futile.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_321); new_line; .L_Say223; .L_SayX223;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_260, 260, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor throwing something at ( this is the block throwing at rule ):
-[ R_261 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_261, 261);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[We] [lack] the nerve when it [if story tense is the past tense]came[otherwise]comes[end if] to the crucial moment.~ ( a )]
- say__p=1;! [4: ~[We] [lack] the nerve when it [if story tense is the past tense]came[otherwise]comes[end if] to the crucial moment.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_322); new_line; .L_Say224; .L_SayX224;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_261, 261, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Attacking (B215_check_attacking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor attacking ( this is the block attacking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor attacking ( this is the block attacking rule ):
-[ R_262 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_262, 262);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~Violence [aren't] the answer to this one.~ ( a )]
- say__p=1;! [5: ~Violence [aren't] the answer to this one.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_323); new_line; .L_Say225; .L_SayX225;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_262, 262, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Kissing (B218_check_kissing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Check an actor kissing ( this is the kissing yourself rule ):
-! === equally specific with ===
-! Rule 2/2 ! Check an actor kissing ( this is the block kissing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor kissing ( this is the kissing yourself rule ):
-[ R_263 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_263, 263);
- ! [2: if the noun is the actor]
- if (((noun == actor)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [don't] get much from that.~ ( a )]
- say__p=1;! [5: ~[We] [don't] get much from that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_324); new_line; .L_Say226; .L_SayX226;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_263, 263, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor kissing ( this is the block kissing rule ):
-[ R_264 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_264, 264);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[The noun] [might not] like that.~ ( a )]
- say__p=1;! [4: ~[The noun] [might not] like that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_325); new_line; .L_Say227; .L_SayX227;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_264, 264, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Answering it that (B223_report_answering_it_tha)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor answering something that ( this is the block answering rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor answering something that ( this is the block answering rule ):
-[ R_265 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_265, 265);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~[There] [are] no reply.~ ( a )]
- say__p=1;! [5: ~[There] [are] no reply.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_326); new_line; .L_Say228; .L_SayX228;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_265, 265, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Telling it about (B224_check_telling_it_about)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor telling something about ( this is the telling yourself rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor telling something about ( this is the telling yourself rule ):
-[ R_266 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_266, 266);
- ! [2: if the actor is the noun]
- if (((actor == noun)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [talk] to [ourselves] a while.~ ( a )]
- say__p=1;! [5: ~[We] [talk] to [ourselves] a while.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_327); new_line; .L_Say229; .L_SayX229;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_266, 266, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Telling it about (B226_report_telling_it_about)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor telling something about ( this is the block telling rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor telling something about ( this is the block telling rule ):
-[ R_267 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_267, 267);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~This [provoke] no reaction.~ ( a )]
- say__p=1;! [5: ~This [provoke] no reaction.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_328); new_line; .L_Say230; .L_SayX230;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_267, 267, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Asking it about (B229_report_asking_it_about)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor asking something about ( this is the block asking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor asking something about ( this is the block asking rule ):
-[ R_268 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_268, 268);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~[There] [are] no reply.~ ( a )]
- say__p=1;! [5: ~[There] [are] no reply.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_329); new_line; .L_Say231; .L_SayX231;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_268, 268, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Asking it for (B230_check_asking_it_for)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/2 ! Check an actor asking something for ( this is the asking yourself for something rule ):
-! === equally specific with ===
-! Rule 2/2 ! Check an actor asking something for ( this is the translate asking for to giving rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor asking something for ( this is the asking yourself for something rule ):
-[ R_269 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_269, 269);
- ! [2: if the actor is the noun and the actor is the player]
- if ((((actor == noun))) && (((actor == player))))
- {! [3: try taking inventory]
- TryAction(0, player, ##Inv, 0, 0);
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_269, 269, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor asking something for ( this is the translate asking for to giving rule ):
-[ R_270 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_270, 270);
- ! [2: convert to request of the noun to perform giving it to action with the second noun and the actor]
- return ConvertToRequest(noun, ##Give, second, actor);
- } else if (debug_rules > 1) DB_Rule(R_270, 270, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Waiting (B235_report_waiting)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor waiting ( this is the standard report waiting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor waiting ( this is the standard report waiting rule ):
-[ R_271 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_271, 271);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [5: say ~Time [pass].~ ( a )]
- say__p=1;! [6: ~Time [pass].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_330); new_line; .L_Say232; .L_SayX232;}
- } else {
- ! [7: say ~[The actor] [wait].~ ( b )]
- say__p=1;! [8: ~[The actor] [wait].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_331); new_line; .L_Say233; .L_SayX233;}
- } else if (debug_rules > 1) DB_Rule(R_271, 271, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Touching (B238_report_touching)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Report an actor touching ( this is the report touching yourself rule ):
-! === equally specific with ===
-! Rule 2/3 ! Report an actor touching ( this is the report touching other people rule ):
-! === equally specific with ===
-! Rule 3/3 ! Report an actor touching ( this is the report touching things rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor touching ( this is the report touching yourself rule ):
-[ R_272 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_272, 272);
- ! [2: if the noun is the actor]
- if (((noun == actor)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: if the action is not silent]
- if (((keep_silent == false)))
- {! [5: say ~[We] [achieve] nothing by this.~ ( a )]
- say__p=1;! [6: ~[We] [achieve] nothing by this.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_332); new_line; .L_Say234; .L_SayX234;}
- } else {
- ! [7: say ~[The actor] [touch] [themselves].~ ( b )]
- say__p=1;! [8: ~[The actor] [touch] [themselves].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_333); new_line; .L_Say235; .L_SayX235;}
- ! [9: stop the action]
- rtrue;
- }
- ! [10: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_272, 272, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor touching ( this is the report touching other people rule ):
-[ R_273 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_273, 273);
- ! [2: if the noun is a person]
- if (((noun ofclass K8_person)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: if the action is not silent]
- if (((keep_silent == false)))
- {! [5: say ~[The noun] [might not like] that.~ ( a )]
- say__p=1;! [6: ~[The noun] [might not like] that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_334); new_line; .L_Say236; .L_SayX236;}
- } else {
- ! [7: if the noun is the player]
- if (((noun == player)))
- {! [8: say ~[The actor] [touch] [us].~ ( b )]
- say__p=1;! [9: ~[The actor] [touch] [us].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_335); new_line; .L_Say237; .L_SayX237;} else {
- ! [10: say ~[The actor] [touch] [the noun].~ ( c )]
- say__p=1;! [11: ~[The actor] [touch] [the noun].~ ( c )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_336); new_line; .L_Say238; .L_SayX238;}
- }
- ! [12: stop the action]
- rtrue;
- }
- ! [13: continue the action]
- rfalse;
- } else if (debug_rules > 1) DB_Rule(R_273, 273, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Report an actor touching ( this is the report touching things rule ):
-[ R_274 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_274, 274);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [feel] nothing unexpected.~ ( a )]
- say__p=1;! [5: ~[We] [feel] nothing unexpected.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_337); new_line; .L_Say239; .L_SayX239;}
- } else {
- ! [6: say ~[The actor] [touch] [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [touch] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_338); new_line; .L_Say240; .L_SayX240;}
- } else if (debug_rules > 1) DB_Rule(R_274, 274, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Waving (B239_check_waving)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor waving ( this is the can't wave what's not held rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor waving ( this is the can't wave what's not held rule ):
-[ R_275 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_275, 275);
- ! [2: if the actor is not the holder of the noun]
- if (((~~((actor == (HolderOf(noun)))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~But [we] [aren't] holding [regarding the noun][those].~ ( a )]
- say__p=1;! [5: ~But [we] [aren't] holding [regarding the noun][those].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_339); new_line; .L_Say241; .L_SayX241;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_275, 275, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Waving (B241_report_waving)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor waving ( this is the report waving things rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor waving ( this is the report waving things rule ):
-[ R_276 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_276, 276);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [wave] [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [wave] [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_340); new_line; .L_Say242; .L_SayX242;}
- } else {
- ! [6: say ~[The actor] [wave] [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [wave] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_341); new_line; .L_Say243; .L_SayX243;}
- } else if (debug_rules > 1) DB_Rule(R_276, 276, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Pulling (B242_check_pulling)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor pulling ( this is the can't pull what's fixed in place rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor pulling ( this is the can't pull scenery rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor pulling ( this is the can't pull people rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor pulling ( this is the can't pull what's fixed in place rule ):
-[ R_277 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_277, 277);
- ! [2: if the noun is fixed in place]
- if ((((Adj_57_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They] [are] fixed in place.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They] [are] fixed in place.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_342); new_line; .L_Say244; .L_SayX244;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_277, 277, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pulling ( this is the can't pull scenery rule ):
-[ R_278 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_278, 278);
- ! [2: if the noun is scenery]
- if ((((Adj_59_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [are] unable to.~ ( a )]
- say__p=1;! [5: ~[We] [are] unable to.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_343); new_line; .L_Say245; .L_SayX245;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_278, 278, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pulling ( this is the can't pull people rule ):
-[ R_279 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_279, 279);
- ! [2: if the noun is a person]
- if (((noun ofclass K8_person)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [might not like] that.~ ( a )]
- say__p=1;! [5: ~[The noun] [might not like] that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_344); new_line; .L_Say246; .L_SayX246;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_279, 279, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Pulling (B244_report_pulling)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor pulling ( this is the report pulling rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor pulling ( this is the report pulling rule ):
-[ R_280 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_280, 280);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [5: say ~Nothing obvious [happen].~ ( a )]
- say__p=1;! [6: ~Nothing obvious [happen].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_345); new_line; .L_Say247; .L_SayX247;}
- } else {
- ! [7: say ~[The actor] [pull] [the noun].~ ( b )]
- say__p=1;! [8: ~[The actor] [pull] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_346); new_line; .L_Say248; .L_SayX248;}
- } else if (debug_rules > 1) DB_Rule(R_280, 280, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Pushing (B245_check_pushing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor pushing something ( this is the can't push what's fixed in place rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor pushing something ( this is the can't push scenery rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor pushing something ( this is the can't push people rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something ( this is the can't push what's fixed in place rule ):
-[ R_281 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_281, 281);
- ! [2: if the noun is fixed in place]
- if ((((Adj_57_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They] [are] fixed in place.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They] [are] fixed in place.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_347); new_line; .L_Say249; .L_SayX249;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_281, 281, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something ( this is the can't push scenery rule ):
-[ R_282 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_282, 282);
- ! [2: if the noun is scenery]
- if ((((Adj_59_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [are] unable to.~ ( a )]
- say__p=1;! [5: ~[We] [are] unable to.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_348); new_line; .L_Say250; .L_SayX250;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_282, 282, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something ( this is the can't push people rule ):
-[ R_283 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_283, 283);
- ! [2: if the noun is a person]
- if (((noun ofclass K8_person)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [might not like] that.~ ( a )]
- say__p=1;! [5: ~[The noun] [might not like] that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_349); new_line; .L_Say251; .L_SayX251;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_283, 283, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Pushing (B247_report_pushing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor pushing something ( this is the report pushing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor pushing something ( this is the report pushing rule ):
-[ R_284 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_284, 284);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [5: say ~Nothing obvious [happen].~ ( a )]
- say__p=1;! [6: ~Nothing obvious [happen].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_350); new_line; .L_Say252; .L_SayX252;}
- } else {
- ! [7: say ~[The actor] [push] [the noun].~ ( b )]
- say__p=1;! [8: ~[The actor] [push] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_351); new_line; .L_Say253; .L_SayX253;}
- } else if (debug_rules > 1) DB_Rule(R_284, 284, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Turning (B248_check_turning)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/3 ! Check an actor turning ( this is the can't turn what's fixed in place rule ):
-! === equally specific with ===
-! Rule 2/3 ! Check an actor turning ( this is the can't turn scenery rule ):
-! === equally specific with ===
-! Rule 3/3 ! Check an actor turning ( this is the can't turn people rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor turning ( this is the can't turn what's fixed in place rule ):
-[ R_285 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_285, 285);
- ! [2: if the noun is fixed in place]
- if ((((Adj_57_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They] [are] fixed in place.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They] [are] fixed in place.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_352); new_line; .L_Say254; .L_SayX254;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_285, 285, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor turning ( this is the can't turn scenery rule ):
-[ R_286 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_286, 286);
- ! [2: if the noun is scenery]
- if ((((Adj_59_t1_v10(noun)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[We] [are] unable to.~ ( a )]
- say__p=1;! [5: ~[We] [are] unable to.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_353); new_line; .L_Say255; .L_SayX255;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_286, 286, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor turning ( this is the can't turn people rule ):
-[ R_287 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_287, 287);
- ! [2: if the noun is a person]
- if (((noun ofclass K8_person)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [might not like] that.~ ( a )]
- say__p=1;! [5: ~[The noun] [might not like] that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_354); new_line; .L_Say256; .L_SayX256;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_287, 287, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Turning (B250_report_turning)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor turning ( this is the report turning rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor turning ( this is the report turning rule ):
-[ R_288 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_288, 288);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [5: say ~Nothing obvious [happen].~ ( a )]
- say__p=1;! [6: ~Nothing obvious [happen].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_355); new_line; .L_Say257; .L_SayX257;}
- } else {
- ! [7: say ~[The actor] [turn] [the noun].~ ( b )]
- say__p=1;! [8: ~[The actor] [turn] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_356); new_line; .L_Say258; .L_SayX258;}
- } else if (debug_rules > 1) DB_Rule(R_288, 288, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Pushing it to (B251_check_pushing_it_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/6 ! Check an actor pushing something to ( this is the can't push unpushable things rule ):
-! === equally specific with ===
-! Rule 2/6 ! Check an actor pushing something to ( this is the can't push to non-directions rule ):
-! === equally specific with ===
-! Rule 3/6 ! Check an actor pushing something to ( this is the can't push vertically rule ):
-! === equally specific with ===
-! Rule 4/6 ! Check an actor pushing something to ( this is the can't push from within rule ):
-! === equally specific with ===
-! Rule 5/6 ! Check an actor pushing something to ( this is the standard pushing in directions rule ):
-! === equally specific with ===
-! Rule 6/6 ! Check an actor pushing something to ( this is the block pushing in directions rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something to ( this is the can't push unpushable things rule ):
-[ R_289 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_289, 289);
- ! [2: if the noun is not pushable between rooms]
- if (((~~(((Adj_61_t1_v10(noun)))))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [cannot] be pushed from place to place.~ ( a )]
- say__p=1;! [5: ~[The noun] [cannot] be pushed from place to place.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_357); new_line; .L_Say259; .L_SayX259;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_289, 289, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something to ( this is the can't push to non-directions rule ):
-[ R_290 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_290, 290);
- ! [2: if the second noun is not a direction]
- if (((~~((second ofclass K3_direction)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[regarding the noun][They] [aren't] a direction.~ ( a )]
- say__p=1;! [5: ~[regarding the noun][They] [aren't] a direction.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_358); new_line; .L_Say260; .L_SayX260;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_290, 290, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something to ( this is the can't push vertically rule ):
-[ R_291 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_291, 291);
- ! [2: if the second noun is up or the second noun is down]
- if ((((second == I59_up))) || (((second == I60_down))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [cannot] be pushed up or down.~ ( a )]
- say__p=1;! [5: ~[The noun] [cannot] be pushed up or down.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_359); new_line; .L_Say261; .L_SayX261;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_291, 291, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something to ( this is the can't push from within rule ):
-[ R_292 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_292, 292);
- ! [2: if the noun encloses the actor]
- if (((IndirectlyContains(noun,actor))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [cannot] be pushed from here.~ ( a )]
- say__p=1;! [5: ~[The noun] [cannot] be pushed from here.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_360); new_line; .L_Say262; .L_SayX262;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_292, 292, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something to ( this is the standard pushing in directions rule ):
-[ R_293 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_293, 293);
- ! [2: convert to special going-with-push action]
- return ConvertToGoingWithPush();
- } else if (debug_rules > 1) DB_Rule(R_293, 293, 'action');
- rfalse;
-];
-! From the Standard Rules
-! No specific request
-! Check an actor pushing something to ( this is the block pushing in directions rule ):
-[ R_294 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_294, 294);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[The noun] [cannot] be pushed from place to place.~ ( a )]
- say__p=1;! [4: ~[The noun] [cannot] be pushed from place to place.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_361); new_line; .L_Say263; .L_SayX263;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_294, 294, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Squeezing (B254_check_squeezing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor squeezing ( this is the innuendo about squeezing people rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor squeezing ( this is the innuendo about squeezing people rule ):
-[ R_295 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_295, 295);
- ! [2: if the noun is a person]
- if (((noun ofclass K8_person)))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [might not like] that.~ ( a )]
- say__p=1;! [5: ~[The noun] [might not like] that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_362); new_line; .L_Say264; .L_SayX264;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_295, 295, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Squeezing (B256_report_squeezing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor squeezing ( this is the report squeezing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor squeezing ( this is the report squeezing rule ):
-[ R_296 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_296, 296);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [achieve] nothing by this.~ ( a )]
- say__p=1;! [5: ~[We] [achieve] nothing by this.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_363); new_line; .L_Say265; .L_SayX265;}
- } else {
- ! [6: say ~[The actor] [squeeze] [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [squeeze] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_364); new_line; .L_Say266; .L_SayX266;}
- } else if (debug_rules > 1) DB_Rule(R_296, 296, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Saying yes (B257_check_saying_yes)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor saying yes ( this is the block saying yes rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor saying yes ( this is the block saying yes rule ):
-[ R_297 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_297, 297);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~That was a rhetorical question.~ ( a )]
- say__p=1;! [4: ~That was a rhetorical question.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_365); new_line; .L_Say267; .L_SayX267;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_297, 297, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Saying no (B260_check_saying_no)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor saying no ( this is the block saying no rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor saying no ( this is the block saying no rule ):
-[ R_298 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_298, 298);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~That was a rhetorical question.~ ( a )]
- say__p=1;! [4: ~That was a rhetorical question.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_366); new_line; .L_Say268; .L_SayX268;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_298, 298, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Burning (B263_check_burning)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor burning ( this is the block burning rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor burning ( this is the block burning rule ):
-[ R_299 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_299, 299);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~This dangerous act [would achieve] little.~ ( a )]
- say__p=1;! [4: ~This dangerous act [would achieve] little.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_367); new_line; .L_Say269; .L_SayX269;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_299, 299, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Waking up (B266_check_waking_up)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor waking up ( this is the block waking up rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor waking up ( this is the block waking up rule ):
-[ R_300 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_300, 300);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~The dreadful truth [are], this [are not] a dream.~ ( a )]
- say__p=1;! [5: ~The dreadful truth [are], this [are not] a dream.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_368); new_line; .L_Say270; .L_SayX270;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_300, 300, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Thinking (B269_check_thinking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor thinking ( this is the block thinking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor thinking ( this is the block thinking rule ):
-[ R_301 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_301, 301);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~What a good idea.~ ( a )]
- say__p=1;! [4: ~What a good idea.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_369); new_line; .L_Say271; .L_SayX271;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_301, 301, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Smelling (B274_report_smelling)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor smelling ( this is the report smelling rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor smelling ( this is the report smelling rule ):
-[ R_302 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_302, 302);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [smell] nothing unexpected.~ ( a )]
- say__p=1;! [5: ~[We] [smell] nothing unexpected.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_370); new_line; .L_Say272; .L_SayX272;}
- } else {
- ! [6: say ~[The actor] [sniff].~ ( b )]
- say__p=1;! [7: ~[The actor] [sniff].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_371); new_line; .L_Say273; .L_SayX273;}
- } else if (debug_rules > 1) DB_Rule(R_302, 302, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Listening to (B277_report_listening_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor listening to ( this is the report listening rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor listening to ( this is the report listening rule ):
-[ R_303 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_303, 303);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [hear] nothing unexpected.~ ( a )]
- say__p=1;! [5: ~[We] [hear] nothing unexpected.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_372); new_line; .L_Say274; .L_SayX274;}
- } else {
- ! [6: say ~[The actor] [listen].~ ( b )]
- say__p=1;! [7: ~[The actor] [listen].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_373); new_line; .L_Say275; .L_SayX275;}
- } else if (debug_rules > 1) DB_Rule(R_303, 303, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Tasting (B280_report_tasting)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor tasting ( this is the report tasting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor tasting ( this is the report tasting rule ):
-[ R_304 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_304, 304);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [taste] nothing unexpected.~ ( a )]
- say__p=1;! [5: ~[We] [taste] nothing unexpected.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_374); new_line; .L_Say276; .L_SayX276;}
- } else {
- ! [6: say ~[The actor] [taste] [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [taste] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_375); new_line; .L_Say277; .L_SayX277;}
- } else if (debug_rules > 1) DB_Rule(R_304, 304, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Cutting (B281_check_cutting)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor cutting ( this is the block cutting rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor cutting ( this is the block cutting rule ):
-[ R_305 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_305, 305);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~Cutting [regarding the noun][them] up [would achieve] little.~ ( a )]
- say__p=1;! [4: ~Cutting [regarding the noun][them] up [would achieve] little.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_376); new_line; .L_Say278; .L_SayX278;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_305, 305, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Jumping (B286_report_jumping)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor jumping ( this is the report jumping rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor jumping ( this is the report jumping rule ):
-[ R_306 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_306, 306);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [jump] on the spot.~ ( a )]
- say__p=1;! [5: ~[We] [jump] on the spot.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_377); new_line; .L_Say279; .L_SayX279;}
- } else {
- ! [6: say ~[The actor] [jump] on the spot.~ ( b )]
- say__p=1;! [7: ~[The actor] [jump] on the spot.~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_378); new_line; .L_Say280; .L_SayX280;}
- } else if (debug_rules > 1) DB_Rule(R_306, 306, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Tying it to (B287_check_tying_it_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor tying something to ( this is the block tying rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor tying something to ( this is the block tying rule ):
-[ R_307 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_307, 307);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[We] [would achieve] nothing by this.~ ( a )]
- say__p=1;! [4: ~[We] [would achieve] nothing by this.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_379); new_line; .L_Say281; .L_SayX281;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_307, 307, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Drinking (B290_check_drinking)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor drinking ( this is the block drinking rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor drinking ( this is the block drinking rule ):
-[ R_308 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_308, 308);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~[There's] nothing suitable to drink here.~ ( a )]
- say__p=1;! [5: ~[There's] nothing suitable to drink here.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_380); new_line; .L_Say282; .L_SayX282;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_308, 308, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Saying sorry (B293_check_saying_sorry)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor saying sorry ( this is the block saying sorry rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor saying sorry ( this is the block saying sorry rule ):
-[ R_309 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_309, 309);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~Oh, don't [if American dialect option is active]apologize[otherwise]apologise[end if].~ ( a )]
- say__p=1;! [4: ~Oh, don't [if American dialect option is active]apologize[otherwise]apologise[end if].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_381); new_line; .L_Say283; .L_SayX283;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_309, 309, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Swinging (B296_check_swinging)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor swinging ( this is the block swinging rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor swinging ( this is the block swinging rule ):
-[ R_310 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_310, 310);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~[There's] nothing sensible to swing here.~ ( a )]
- say__p=1;! [5: ~[There's] nothing sensible to swing here.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_382); new_line; .L_Say284; .L_SayX284;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_310, 310, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Rubbing (B299_check_rubbing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor rubbing ( this is the can't rub another person rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor rubbing ( this is the can't rub another person rule ):
-[ R_311 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_311, 311);
- ! [2: if the noun is a person who is not the actor]
- if (((noun ofclass K8_person) && (~~((noun == actor)))))
- {! [3: if the actor is the player]
- if (((actor == player)))
- {! [4: say ~[The noun] [might not like] that.~ ( a )]
- say__p=1;! [5: ~[The noun] [might not like] that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_383); new_line; .L_Say285; .L_SayX285;}
- ! [6: stop the action]
- rtrue;
- }
- } else if (debug_rules > 1) DB_Rule(R_311, 311, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Rubbing (B301_report_rubbing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor rubbing ( this is the report rubbing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor rubbing ( this is the report rubbing rule ):
-[ R_312 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_312, 312);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [rub] [the noun].~ ( a )]
- say__p=1;! [5: ~[We] [rub] [the noun].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_384); new_line; .L_Say286; .L_SayX286;}
- } else {
- ! [6: say ~[The actor] [rub] [the noun].~ ( b )]
- say__p=1;! [7: ~[The actor] [rub] [the noun].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_385); new_line; .L_Say287; .L_SayX287;}
- } else if (debug_rules > 1) DB_Rule(R_312, 312, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Setting it to (B302_check_setting_it_to)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor setting something to ( this is the block setting it to rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor setting something to ( this is the block setting it to rule ):
-[ R_313 ;
- if ((((act_requester==nothing) && ((noun ofclass K2_thing))))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_313, 313);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~No, [we] [can't set] [regarding the noun][those] to anything.~ ( a )]
- say__p=1;! [4: ~No, [we] [can't set] [regarding the noun][those] to anything.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_386); new_line; .L_Say288; .L_SayX288;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_313, 313, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: report Waving hands (B307_report_waving_hands)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Report an actor waving hands ( this is the report waving hands rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Report an actor waving hands ( this is the report waving hands rule ):
-[ R_314 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_314, 314);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: if the action is not silent]
- if (((keep_silent == false)))
- {! [4: say ~[We] [wave].~ ( a )]
- say__p=1;! [5: ~[We] [wave].~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_387); new_line; .L_Say289; .L_SayX289;}
- } else {
- ! [6: say ~[The actor] [wave].~ ( b )]
- say__p=1;! [7: ~[The actor] [wave].~ ( b )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_388); new_line; .L_Say290; .L_SayX290;}
- } else if (debug_rules > 1) DB_Rule(R_314, 314, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Buying (B308_check_buying)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor buying ( this is the block buying rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor buying ( this is the block buying rule ):
-[ R_315 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_315, 315);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: now the prior named object is nothing]
- prior_named_noun = nothing;
- ! [4: say ~Nothing [are] on sale.~ ( a )]
- say__p=1;! [5: ~Nothing [are] on sale.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_389); new_line; .L_Say291; .L_SayX291;}
- ! [6: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_315, 315, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Climbing (B311_check_climbing)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor climbing ( this is the block climbing rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor climbing ( this is the block climbing rule ):
-[ R_316 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_316, 316);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~Little [are] to be achieved by that.~ ( a )]
- say__p=1;! [4: ~Little [are] to be achieved by that.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_390); new_line; .L_Say292; .L_SayX292;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_316, 316, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-
-! ----------------------------------------------------------------------------------------------------
-! Rules in rulebook: check Sleeping (B314_check_sleeping)
-! ----------------------------------------------------------------------------------------------------
-! Rule 1/1 ! Check an actor sleeping ( this is the block sleeping rule ):
-! ----------------------------------------------------------------------------------------------------
-! From the Standard Rules
-! No specific request
-! Check an actor sleeping ( this is the block sleeping rule ):
-[ R_317 ;
- if ((((act_requester==nothing)))) { ! Runs only when pattern matches
- self = noun;
- if (debug_rules) DB_Rule(R_317, 317);
- ! [2: if the actor is the player]
- if (((actor == player)))
- {! [3: say ~[We] [aren't] feeling especially drowsy.~ ( a )]
- say__p=1;! [4: ~[We] [aren't] feeling especially drowsy.~ ( a )]
- ParaContent(); print (TEXT_TY_Say) (TX_R_391); new_line; .L_Say293; .L_SayX293;}
- ! [5: stop the action]
- rtrue;
- } else if (debug_rules > 1) DB_Rule(R_317, 317, 'action');
- rfalse;
-];
-! ----------------------------------------------------------------------------------------------------
-! Definitions of displaced and unbooked rules
-
-! Definitions of adjectives
-
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_0
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_1
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_2
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_3
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_4
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_5
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_6
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_7
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_8
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_39
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_40
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_41
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_42
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_43
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_44
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_45
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_46
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_47
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_48
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_49
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_50
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_51
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_52
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_53
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_54
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_55
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_56
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_57
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_58
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_59
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_60
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_61
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_62
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_63
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_64
- t_0 ! Call parameter: object
- ;
- return false;
-];
-! From the Standard Rules
-! No specific request
-! Definition:
-[ R_95
- t_0 ! Call parameter: object
- ;
- return false;
-];
-[ Adj_0_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "worn"
- if (t_0 ofclass K2_thing) return ((((player == WearerOf(t_0)))));
- rfalse;
-];
-[ Adj_1_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "carried"
- if (t_0 ofclass K2_thing) return ((((player == CarrierOf(t_0)))));
- rfalse;
-];
-[ Adj_2_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "held"
- if (t_0 ofclass K2_thing) return ((((player == HolderOf(t_0)))));
- rfalse;
-];
-[ Adj_3_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "visible"
- if (t_0 ofclass K2_thing) return ((((TestVisibility(player,t_0)))));
- rfalse;
-];
-[ Adj_4_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "invisible"
- if (t_0 ofclass K2_thing) return (~~(((((TestVisibility(player,t_0)))))));
- rfalse;
-];
-[ Adj_5_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "touchable"
- if (t_0 ofclass K2_thing) return ((((TestTouchability(player,t_0)))));
- rfalse;
-];
-[ Adj_6_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "untouchable"
- if (t_0 ofclass K2_thing) return (~~(((((TestTouchability(player,t_0)))))));
- rfalse;
-];
-[ Adj_7_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "concealed"
- if (t_0 ofclass K2_thing) return ((((TestConcealment((HolderOf(t_0)),t_0)))));
- rfalse;
-];
-[ Adj_8_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "unconcealed"
- if (t_0 ofclass K2_thing) return (~~(((((TestConcealment((HolderOf(t_0)),t_0)))))));
- rfalse;
-];
-[ Adj_9_t1_v10
- t_0 ! Call parameter: number
- ;
- ! meaning of "on-stage"
- if (t_0 ofclass K2_thing) return ((OnStage(t_0, -1)));
- rfalse;
-];
-[ Adj_10_t1_v10
- t_0 ! Call parameter: number
- ;
- ! meaning of "off-stage"
- if (t_0 ofclass K2_thing) return (~~(((OnStage(t_0, -1)))));
- rfalse;
-];
-[ Adj_11_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "offstage"
- if (t_0 ofclass K2_thing) return (((((~~Adj_9_t1_v10(t_0))))));
- rfalse;
-];
-[ Adj_12_t1_v10
- t_0 ! Call parameter: room
- ;
- ! meaning of "adjacent"
- if (t_0 ofclass K1_room) return ((((TestAdjacency(real_location,t_0)))));
- rfalse;
-];
-[ Adj_13_t1_v11
- t_0 ! Call parameter: number
- ;
- ! meaning of "even"
- return (((((IntegerRemainder(t_0, 2)) == 0))));
- rfalse;
-];
-[ Adj_14_t1_v11
- t_0 ! Call parameter: number
- ;
- ! meaning of "odd"
- return (~~((((((IntegerRemainder(t_0, 2)) == 0))))));
- rfalse;
-];
-[ Adj_15_t1_v11
- t_0 ! Call parameter: number
- ;
- ! meaning of "positive"
- return ((((t_0 > 0))));
- rfalse;
-];
-[ Adj_15_t1_v12
- t_0 ! Call parameter: real number
- ;
- ! meaning of "positive"
- return ((((REAL_NUMBER_TY_Compare(t_0, NUMBER_TY_to_REAL_NUMBER_TY(0)) > 0))));
- rfalse;
-];
-[ Adj_16_t1_v11
- t_0 ! Call parameter: number
- ;
- ! meaning of "negative"
- return ((((t_0 < 0))));
- rfalse;
-];
-[ Adj_16_t1_v12
- t_0 ! Call parameter: real number
- ;
- ! meaning of "negative"
- return ((((REAL_NUMBER_TY_Compare(t_0, NUMBER_TY_to_REAL_NUMBER_TY(0)) < 0))));
- rfalse;
-];
-[ Adj_17_t1_v14
- t_0 ! Call parameter: number
- ;
- ! meaning of "empty"
- return ((TEXT_TY_Empty(t_0)));
- rfalse;
-];
-[ Adj_17_t1_v20
- t_0 ! Call parameter: table name
- ;
- ! meaning of "empty"
- return ((((TableFilledRows(t_0) == 0))));
- rfalse;
-];
-[ Adj_17_t1_v32
- t_0 ! Call parameter: number
- ;
- ! meaning of "empty"
- return ((RulebookEmpty(t_0)));
- rfalse;
-];
-[ Adj_17_t1_v33
- t_0 ! Call parameter: number
- ;
- ! meaning of "empty"
- return ((ActivityEmpty(t_0)));
- rfalse;
-];
-[ Adj_17_t1_v34
- t_0 ! Call parameter: number
- ;
- ! meaning of "empty"
- return ((LIST_OF_TY_Empty(t_0)));
- rfalse;
-];
-[ Adj_17_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "empty"
- return ((RELATION_TY_Empty(t_0, -1)));
- rfalse;
-];
-[ Adj_18_t1_v14
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-empty"
- return (~~(((TEXT_TY_Empty(t_0)))));
- rfalse;
-];
-[ Adj_18_t1_v20
- t_0 ! Call parameter: table name
- ;
- ! meaning of "non-empty"
- return (~~(((((TableFilledRows(t_0) == 0))))));
- rfalse;
-];
-[ Adj_18_t1_v32
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-empty"
- return (~~(((RulebookEmpty(t_0)))));
- rfalse;
-];
-[ Adj_18_t1_v33
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-empty"
- return (~~(((ActivityEmpty(t_0)))));
- rfalse;
-];
-[ Adj_18_t1_v34
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-empty"
- return (~~(((LIST_OF_TY_Empty(t_0)))));
- rfalse;
-];
-[ Adj_18_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-empty"
- return (~~(((RELATION_TY_Empty(t_0, -1)))));
- rfalse;
-];
-[ Adj_19_t1_v14
- t_0 ! Call parameter: number
- ;
- ! meaning of "substituted"
- return ((TEXT_TY_IsSubstituted(t_0)));
- rfalse;
-];
-[ Adj_20_t1_v14
- t_0 ! Call parameter: number
- ;
- ! meaning of "unsubstituted"
- return (~~(((TEXT_TY_IsSubstituted(t_0)))));
- rfalse;
-];
-[ Adj_21_t1_v43
- t_0 ! Call parameter: scene
- ;
- ! meaning of "happening"
- return ((scene_status-->(t_0-1)==1));
- rfalse;
-];
-[ Adj_22_t1_v20
- t_0 ! Call parameter: table name
- ;
- ! meaning of "full"
- return ((((TableBlankRows(t_0) == 0))));
- rfalse;
-];
-[ Adj_23_t1_v20
- t_0 ! Call parameter: table name
- ;
- ! meaning of "non-full"
- return (~~(((((TableBlankRows(t_0) == 0))))));
- rfalse;
-];
-[ Adj_24_t1_v33
- t_0 ! Call parameter: number
- ;
- ! meaning of "going on"
- return ((TestActivity(t_0)));
- rfalse;
-];
-[ Adj_25_t1_v16
- t_0 ! Call parameter: number
- ;
- ! meaning of "active"
- return ((TestUseOption(t_0)));
- rfalse;
-];
-[ Adj_26_t1_v16
- t_0 ! Call parameter: number
- ;
- ! meaning of "inactive"
- return (~~(((TestUseOption(t_0)))));
- rfalse;
-];
-[ Adj_27_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "equivalence"
- return ((RELATION_TY_EquivalenceAdjective(t_0, -1)));
- rfalse;
-];
-[ Adj_28_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "symmetric"
- return ((RELATION_TY_SymmetricAdjective(t_0, -1)));
- rfalse;
-];
-[ Adj_29_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "one-to-one"
- return ((RELATION_TY_OToOAdjective(t_0, -1)));
- rfalse;
-];
-[ Adj_30_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "one-to-various"
- return ((RELATION_TY_OToVAdjective(t_0, -1)));
- rfalse;
-];
-[ Adj_31_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "various-to-one"
- return ((RELATION_TY_VToOAdjective(t_0, -1)));
- rfalse;
-];
-[ Adj_32_t1_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "various-to-various"
- return ((RELATION_TY_VToVAdjective(t_0, -1)));
- rfalse;
-];
-[ Adj_33_t1_v18
- t_0 ! Call parameter: number
- ;
- ! meaning of "modal"
- return ((VerbIsModal(t_0)));
- rfalse;
-];
-[ Adj_34_t1_v18
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-modal"
- return (~~(((VerbIsModal(t_0)))));
- rfalse;
-];
-[ Adj_35_t1_v18
- t_0 ! Call parameter: number
- ;
- ! meaning of "meaningful"
- return ((VerbIsMeaningful(t_0)));
- rfalse;
-];
-[ Adj_36_t1_v18
- t_0 ! Call parameter: number
- ;
- ! meaning of "meaningless"
- return (~~(((VerbIsMeaningful(t_0)))));
- rfalse;
-];
-[ Adj_37_t1_v12
- t_0 ! Call parameter: real number
- ;
- ! meaning of "infinite"
- return ((((( REAL_NUMBER_TY_Compare(t_0, 2139095040) == 0))) || ((( REAL_NUMBER_TY_Compare(t_0, -8388608) == 0)))));
- rfalse;
-];
-[ Adj_38_t1_v12
- t_0 ! Call parameter: real number
- ;
- ! meaning of "finite"
- return (~~(((((( REAL_NUMBER_TY_Compare(t_0, 2139095040) == 0))) || ((( REAL_NUMBER_TY_Compare(t_0, -8388608) == 0)))))));
- rfalse;
-];
-[ Adj_39_t1_v12
- t_0 ! Call parameter: number
- ;
- ! meaning of "nonexistent"
- return ((REAL_NUMBER_TY_Nan(t_0)));
- rfalse;
-];
-[ Adj_40_t1_v12
- t_0 ! Call parameter: number
- ;
- ! meaning of "existent"
- return (~~(((REAL_NUMBER_TY_Nan(t_0)))));
- rfalse;
-];
-[ Adj_41_t1_v10
- t_0 ! Call parameter: thing
- ;
- ! meaning of "locale-supportable"
- if (t_0 ofclass K2_thing) return (((((~~(((Adj_59_t1_v10(t_0))))))) && ((((~~(((Adj_67_t1_v10(t_0))))))) && (((~~(((Adj_64_t1_v10(t_0))))))))));
- rfalse;
-];
-[ Adj_42_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "plural-named"
- if (t_0) return (GetEitherOrProperty(t_0, pluralname));
- rfalse;
-];
-[ Adj_43_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "singular-named"
- if (t_0) return (GetEitherOrProperty(t_0, pluralname) == false);
- rfalse;
-];
-[ Adj_44_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "proper-named"
- if (t_0) return (GetEitherOrProperty(t_0, proper));
- rfalse;
-];
-[ Adj_45_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "improper-named"
- if (t_0) return (GetEitherOrProperty(t_0, proper) == false);
- rfalse;
-];
-[ Adj_46_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "ambiguously plural"
- if (t_0) return (GetEitherOrProperty(t_0, ambigpluralname));
- rfalse;
-];
-[ Adj_47_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "privately-named"
- if (t_0) return (GetEitherOrProperty(t_0, privately_named));
- rfalse;
-];
-[ Adj_48_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "publicly-named"
- if (t_0) return (GetEitherOrProperty(t_0, privately_named) == false);
- rfalse;
-];
-[ Adj_49_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lighted"
- if (t_0) return (GetEitherOrProperty(t_0, light));
- rfalse;
-];
-[ Adj_50_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "dark"
- if (t_0) return (GetEitherOrProperty(t_0, light) == false);
- rfalse;
-];
-[ Adj_51_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "visited"
- if (t_0) return (GetEitherOrProperty(t_0, visited));
- rfalse;
-];
-[ Adj_52_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unvisited"
- if (t_0) return (GetEitherOrProperty(t_0, visited) == false);
- rfalse;
-];
-[ Adj_53_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lit"
- if (t_0) return (GetEitherOrProperty(t_0, light));
- rfalse;
-];
-[ Adj_54_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unlit"
- if (t_0) return (GetEitherOrProperty(t_0, light) == false);
- rfalse;
-];
-[ Adj_55_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "edible"
- if (t_0) return (GetEitherOrProperty(t_0, edible));
- rfalse;
-];
-[ Adj_56_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "inedible"
- if (t_0) return (GetEitherOrProperty(t_0, edible) == false);
- rfalse;
-];
-[ Adj_57_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "fixed in place"
- if (t_0) return (GetEitherOrProperty(t_0, static));
- rfalse;
-];
-[ Adj_58_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "portable"
- if (t_0) return (GetEitherOrProperty(t_0, static) == false);
- rfalse;
-];
-[ Adj_59_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "scenery"
- if (t_0) return (GetEitherOrProperty(t_0, scenery));
- rfalse;
-];
-[ Adj_60_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "wearable"
- if (t_0) return (GetEitherOrProperty(t_0, clothing));
- rfalse;
-];
-[ Adj_61_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "pushable between rooms"
- if (t_0) return (GetEitherOrProperty(t_0, pushable));
- rfalse;
-];
-[ Adj_62_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "handled"
- if (t_0) return (GetEitherOrProperty(t_0, moved));
- rfalse;
-];
-[ Adj_63_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "described"
- if (t_0) return (GetEitherOrProperty(t_0, concealed) == false);
- rfalse;
-];
-[ Adj_64_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "undescribed"
- if (t_0) return (GetEitherOrProperty(t_0, concealed));
- rfalse;
-];
-[ Adj_65_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "marked for listing"
- if (t_0) return (GetEitherOrProperty(t_0, workflag));
- rfalse;
-];
-[ Adj_66_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unmarked for listing"
- if (t_0) return (GetEitherOrProperty(t_0, workflag) == false);
- rfalse;
-];
-[ Adj_67_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "mentioned"
- if (t_0) return (GetEitherOrProperty(t_0, mentioned));
- rfalse;
-];
-[ Adj_68_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unmentioned"
- if (t_0) return (GetEitherOrProperty(t_0, mentioned) == false);
- rfalse;
-];
-[ Adj_69_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "enterable"
- if (t_0) return (GetEitherOrProperty(t_0, enterable));
- rfalse;
-];
-[ Adj_70_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "opaque"
- if (t_0) return (GetEitherOrProperty(t_0, transparent) == false);
- rfalse;
-];
-[ Adj_71_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "transparent"
- if (t_0) return (GetEitherOrProperty(t_0, transparent));
- rfalse;
-];
-[ Adj_72_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "open"
- if (t_0) return (GetEitherOrProperty(t_0, open));
- rfalse;
-];
-[ Adj_73_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "closed"
- if (t_0) return (GetEitherOrProperty(t_0, open) == false);
- rfalse;
-];
-[ Adj_74_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "openable"
- if (t_0) return (GetEitherOrProperty(t_0, openable));
- rfalse;
-];
-[ Adj_75_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unopenable"
- if (t_0) return (GetEitherOrProperty(t_0, openable) == false);
- rfalse;
-];
-[ Adj_76_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lockable"
- if (t_0) return (GetEitherOrProperty(t_0, lockable));
- rfalse;
-];
-[ Adj_77_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "locked"
- if (t_0) return (GetEitherOrProperty(t_0, locked));
- rfalse;
-];
-[ Adj_78_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unlocked"
- if (t_0) return (GetEitherOrProperty(t_0, locked) == false);
- rfalse;
-];
-[ Adj_79_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "female"
- if (t_0) return (GetEitherOrProperty(t_0, female));
- rfalse;
-];
-[ Adj_80_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "male"
- if (t_0) return (GetEitherOrProperty(t_0, female) == false);
- rfalse;
-];
-[ Adj_81_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "neuter"
- if (t_0) return (GetEitherOrProperty(t_0, neuter));
- rfalse;
-];
-[ Adj_82_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "switched on"
- if (t_0) return (GetEitherOrProperty(t_0, on));
- rfalse;
-];
-[ Adj_83_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "switched off"
- if (t_0) return (GetEitherOrProperty(t_0, on) == false);
- rfalse;
-];
-[ Adj_84_t1_v43
- t_0 ! Call parameter: scene
- ;
- ! meaning of "recurring"
- return (GProperty(SCENE_TY, t_0, p57_recurring));
- rfalse;
-];
-[ Adj_85_t1_v43
- t_0 ! Call parameter: scene
- ;
- ! meaning of "non-recurring"
- return (GProperty(SCENE_TY, t_0, p57_recurring) == false);
- rfalse;
-];
-[ Adj_86_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (GetEitherOrProperty(t_0, absent));
- rfalse;
-];
-[ Adj_87_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (GetEitherOrProperty(t_0, mark_as_room));
- rfalse;
-];
-[ Adj_88_t1_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (GetEitherOrProperty(t_0, mark_as_thing));
- rfalse;
-];
-[ Adj_9_t2_v10
- t_0 ! Call parameter: number
- ;
- ! meaning of "on-stage"
- if (t_0 ofclass K2_thing) return ((OnStage(t_0, true)));
- rfalse;
-];
-[ Adj_10_t2_v10
- t_0 ! Call parameter: number
- ;
- ! meaning of "off-stage"
- if (t_0 ofclass K2_thing) return ((OnStage(t_0, false)));
- rfalse;
-];
-[ Adj_17_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "empty"
- return ((RELATION_TY_Empty(t_0, true)));
- rfalse;
-];
-[ Adj_18_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-empty"
- return ((RELATION_TY_Empty(t_0, false)));
- rfalse;
-];
-[ Adj_27_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "equivalence"
- return ((RELATION_TY_EquivalenceAdjective(t_0, true)));
- rfalse;
-];
-[ Adj_28_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "symmetric"
- return ((RELATION_TY_SymmetricAdjective(t_0, true)));
- rfalse;
-];
-[ Adj_29_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "one-to-one"
- return ((RELATION_TY_OToOAdjective(t_0, true)));
- rfalse;
-];
-[ Adj_30_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "one-to-various"
- return ((RELATION_TY_OToVAdjective(t_0, true)));
- rfalse;
-];
-[ Adj_31_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "various-to-one"
- return ((RELATION_TY_VToOAdjective(t_0, true)));
- rfalse;
-];
-[ Adj_32_t2_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "various-to-various"
- return ((RELATION_TY_VToVAdjective(t_0, true)));
- rfalse;
-];
-[ Adj_42_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "plural-named"
- if (t_0) return (SetEitherOrProperty(t_0, pluralname));
- rfalse;
-];
-[ Adj_43_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "singular-named"
- if (t_0) return (SetEitherOrProperty(t_0, pluralname, true));
- rfalse;
-];
-[ Adj_44_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "proper-named"
- if (t_0) return (SetEitherOrProperty(t_0, proper));
- rfalse;
-];
-[ Adj_45_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "improper-named"
- if (t_0) return (SetEitherOrProperty(t_0, proper, true));
- rfalse;
-];
-[ Adj_46_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "ambiguously plural"
- if (t_0) return (SetEitherOrProperty(t_0, ambigpluralname));
- rfalse;
-];
-[ Adj_47_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "privately-named"
- if (t_0) return (SetEitherOrProperty(t_0, privately_named));
- rfalse;
-];
-[ Adj_48_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "publicly-named"
- if (t_0) return (SetEitherOrProperty(t_0, privately_named, true));
- rfalse;
-];
-[ Adj_49_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lighted"
- if (t_0) return (SetEitherOrProperty(t_0, light));
- rfalse;
-];
-[ Adj_50_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "dark"
- if (t_0) return (SetEitherOrProperty(t_0, light, true));
- rfalse;
-];
-[ Adj_51_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "visited"
- if (t_0) return (SetEitherOrProperty(t_0, visited));
- rfalse;
-];
-[ Adj_52_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unvisited"
- if (t_0) return (SetEitherOrProperty(t_0, visited, true));
- rfalse;
-];
-[ Adj_53_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lit"
- if (t_0) return (SetEitherOrProperty(t_0, light));
- rfalse;
-];
-[ Adj_54_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unlit"
- if (t_0) return (SetEitherOrProperty(t_0, light, true));
- rfalse;
-];
-[ Adj_55_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "edible"
- if (t_0) return (SetEitherOrProperty(t_0, edible));
- rfalse;
-];
-[ Adj_56_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "inedible"
- if (t_0) return (SetEitherOrProperty(t_0, edible, true));
- rfalse;
-];
-[ Adj_57_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "fixed in place"
- if (t_0) return (SetEitherOrProperty(t_0, static));
- rfalse;
-];
-[ Adj_58_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "portable"
- if (t_0) return (SetEitherOrProperty(t_0, static, true));
- rfalse;
-];
-[ Adj_59_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "scenery"
- if (t_0) return (SetEitherOrProperty(t_0, scenery));
- rfalse;
-];
-[ Adj_60_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "wearable"
- if (t_0) return (SetEitherOrProperty(t_0, clothing));
- rfalse;
-];
-[ Adj_61_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "pushable between rooms"
- if (t_0) return (SetEitherOrProperty(t_0, pushable));
- rfalse;
-];
-[ Adj_62_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "handled"
- if (t_0) return (SetEitherOrProperty(t_0, moved));
- rfalse;
-];
-[ Adj_63_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "described"
- if (t_0) return (SetEitherOrProperty(t_0, concealed, true));
- rfalse;
-];
-[ Adj_64_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "undescribed"
- if (t_0) return (SetEitherOrProperty(t_0, concealed));
- rfalse;
-];
-[ Adj_65_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "marked for listing"
- if (t_0) return (SetEitherOrProperty(t_0, workflag));
- rfalse;
-];
-[ Adj_66_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unmarked for listing"
- if (t_0) return (SetEitherOrProperty(t_0, workflag, true));
- rfalse;
-];
-[ Adj_67_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "mentioned"
- if (t_0) return (SetEitherOrProperty(t_0, mentioned));
- rfalse;
-];
-[ Adj_68_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unmentioned"
- if (t_0) return (SetEitherOrProperty(t_0, mentioned, true));
- rfalse;
-];
-[ Adj_69_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "enterable"
- if (t_0) return (SetEitherOrProperty(t_0, enterable));
- rfalse;
-];
-[ Adj_70_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "opaque"
- if (t_0) return (SetEitherOrProperty(t_0, transparent, true));
- rfalse;
-];
-[ Adj_71_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "transparent"
- if (t_0) return (SetEitherOrProperty(t_0, transparent));
- rfalse;
-];
-[ Adj_72_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "open"
- if (t_0) return (SetEitherOrProperty(t_0, open));
- rfalse;
-];
-[ Adj_73_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "closed"
- if (t_0) return (SetEitherOrProperty(t_0, open, true));
- rfalse;
-];
-[ Adj_74_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "openable"
- if (t_0) return (SetEitherOrProperty(t_0, openable));
- rfalse;
-];
-[ Adj_75_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unopenable"
- if (t_0) return (SetEitherOrProperty(t_0, openable, true));
- rfalse;
-];
-[ Adj_76_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lockable"
- if (t_0) return (SetEitherOrProperty(t_0, lockable));
- rfalse;
-];
-[ Adj_77_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "locked"
- if (t_0) return (SetEitherOrProperty(t_0, locked));
- rfalse;
-];
-[ Adj_78_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unlocked"
- if (t_0) return (SetEitherOrProperty(t_0, locked, true));
- rfalse;
-];
-[ Adj_79_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "female"
- if (t_0) return (SetEitherOrProperty(t_0, female));
- rfalse;
-];
-[ Adj_80_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "male"
- if (t_0) return (SetEitherOrProperty(t_0, female, true));
- rfalse;
-];
-[ Adj_81_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "neuter"
- if (t_0) return (SetEitherOrProperty(t_0, neuter));
- rfalse;
-];
-[ Adj_82_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "switched on"
- if (t_0) return (SetEitherOrProperty(t_0, on));
- rfalse;
-];
-[ Adj_83_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "switched off"
- if (t_0) return (SetEitherOrProperty(t_0, on, true));
- rfalse;
-];
-[ Adj_84_t2_v43
- t_0 ! Call parameter: scene
- ;
- ! meaning of "recurring"
- return (WriteGProperty(SCENE_TY, t_0, p57_recurring, true));
- rfalse;
-];
-[ Adj_85_t2_v43
- t_0 ! Call parameter: scene
- ;
- ! meaning of "non-recurring"
- return (WriteGProperty(SCENE_TY, t_0, p57_recurring));
- rfalse;
-];
-[ Adj_86_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (SetEitherOrProperty(t_0, absent));
- rfalse;
-];
-[ Adj_87_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (SetEitherOrProperty(t_0, mark_as_room));
- rfalse;
-];
-[ Adj_88_t2_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (SetEitherOrProperty(t_0, mark_as_thing));
- rfalse;
-];
-[ Adj_9_t3_v10
- t_0 ! Call parameter: number
- ;
- ! meaning of "on-stage"
- if (t_0 ofclass K2_thing) return ((OnStage(t_0, false)));
- rfalse;
-];
-[ Adj_10_t3_v10
- t_0 ! Call parameter: number
- ;
- ! meaning of "off-stage"
- if (t_0 ofclass K2_thing) return ((OnStage(t_0, true)));
- rfalse;
-];
-[ Adj_17_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "empty"
- return ((RELATION_TY_Empty(t_0, false)));
- rfalse;
-];
-[ Adj_18_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "non-empty"
- return ((RELATION_TY_Empty(t_0, true)));
- rfalse;
-];
-[ Adj_27_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "equivalence"
- return ((RELATION_TY_EquivalenceAdjective(t_0, false)));
- rfalse;
-];
-[ Adj_28_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "symmetric"
- return ((RELATION_TY_SymmetricAdjective(t_0, false)));
- rfalse;
-];
-[ Adj_29_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "one-to-one"
- return ((RELATION_TY_OToOAdjective(t_0, false)));
- rfalse;
-];
-[ Adj_30_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "one-to-various"
- return ((RELATION_TY_OToVAdjective(t_0, false)));
- rfalse;
-];
-[ Adj_31_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "various-to-one"
- return ((RELATION_TY_VToOAdjective(t_0, false)));
- rfalse;
-];
-[ Adj_32_t3_v30
- t_0 ! Call parameter: number
- ;
- ! meaning of "various-to-various"
- return ((RELATION_TY_VToVAdjective(t_0, false)));
- rfalse;
-];
-[ Adj_42_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "plural-named"
- if (t_0) return (SetEitherOrProperty(t_0, pluralname, true));
- rfalse;
-];
-[ Adj_43_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "singular-named"
- if (t_0) return (SetEitherOrProperty(t_0, pluralname));
- rfalse;
-];
-[ Adj_44_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "proper-named"
- if (t_0) return (SetEitherOrProperty(t_0, proper, true));
- rfalse;
-];
-[ Adj_45_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "improper-named"
- if (t_0) return (SetEitherOrProperty(t_0, proper));
- rfalse;
-];
-[ Adj_46_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "ambiguously plural"
- if (t_0) return (SetEitherOrProperty(t_0, ambigpluralname, true));
- rfalse;
-];
-[ Adj_47_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "privately-named"
- if (t_0) return (SetEitherOrProperty(t_0, privately_named, true));
- rfalse;
-];
-[ Adj_48_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "publicly-named"
- if (t_0) return (SetEitherOrProperty(t_0, privately_named));
- rfalse;
-];
-[ Adj_49_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lighted"
- if (t_0) return (SetEitherOrProperty(t_0, light, true));
- rfalse;
-];
-[ Adj_50_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "dark"
- if (t_0) return (SetEitherOrProperty(t_0, light));
- rfalse;
-];
-[ Adj_51_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "visited"
- if (t_0) return (SetEitherOrProperty(t_0, visited, true));
- rfalse;
-];
-[ Adj_52_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unvisited"
- if (t_0) return (SetEitherOrProperty(t_0, visited));
- rfalse;
-];
-[ Adj_53_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lit"
- if (t_0) return (SetEitherOrProperty(t_0, light, true));
- rfalse;
-];
-[ Adj_54_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unlit"
- if (t_0) return (SetEitherOrProperty(t_0, light));
- rfalse;
-];
-[ Adj_55_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "edible"
- if (t_0) return (SetEitherOrProperty(t_0, edible, true));
- rfalse;
-];
-[ Adj_56_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "inedible"
- if (t_0) return (SetEitherOrProperty(t_0, edible));
- rfalse;
-];
-[ Adj_57_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "fixed in place"
- if (t_0) return (SetEitherOrProperty(t_0, static, true));
- rfalse;
-];
-[ Adj_58_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "portable"
- if (t_0) return (SetEitherOrProperty(t_0, static));
- rfalse;
-];
-[ Adj_59_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "scenery"
- if (t_0) return (SetEitherOrProperty(t_0, scenery, true));
- rfalse;
-];
-[ Adj_60_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "wearable"
- if (t_0) return (SetEitherOrProperty(t_0, clothing, true));
- rfalse;
-];
-[ Adj_61_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "pushable between rooms"
- if (t_0) return (SetEitherOrProperty(t_0, pushable, true));
- rfalse;
-];
-[ Adj_62_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "handled"
- if (t_0) return (SetEitherOrProperty(t_0, moved, true));
- rfalse;
-];
-[ Adj_63_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "described"
- if (t_0) return (SetEitherOrProperty(t_0, concealed));
- rfalse;
-];
-[ Adj_64_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "undescribed"
- if (t_0) return (SetEitherOrProperty(t_0, concealed, true));
- rfalse;
-];
-[ Adj_65_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "marked for listing"
- if (t_0) return (SetEitherOrProperty(t_0, workflag, true));
- rfalse;
-];
-[ Adj_66_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unmarked for listing"
- if (t_0) return (SetEitherOrProperty(t_0, workflag));
- rfalse;
-];
-[ Adj_67_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "mentioned"
- if (t_0) return (SetEitherOrProperty(t_0, mentioned, true));
- rfalse;
-];
-[ Adj_68_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unmentioned"
- if (t_0) return (SetEitherOrProperty(t_0, mentioned));
- rfalse;
-];
-[ Adj_69_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "enterable"
- if (t_0) return (SetEitherOrProperty(t_0, enterable, true));
- rfalse;
-];
-[ Adj_70_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "opaque"
- if (t_0) return (SetEitherOrProperty(t_0, transparent));
- rfalse;
-];
-[ Adj_71_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "transparent"
- if (t_0) return (SetEitherOrProperty(t_0, transparent, true));
- rfalse;
-];
-[ Adj_72_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "open"
- if (t_0) return (SetEitherOrProperty(t_0, open, true));
- rfalse;
-];
-[ Adj_73_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "closed"
- if (t_0) return (SetEitherOrProperty(t_0, open));
- rfalse;
-];
-[ Adj_74_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "openable"
- if (t_0) return (SetEitherOrProperty(t_0, openable, true));
- rfalse;
-];
-[ Adj_75_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unopenable"
- if (t_0) return (SetEitherOrProperty(t_0, openable));
- rfalse;
-];
-[ Adj_76_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "lockable"
- if (t_0) return (SetEitherOrProperty(t_0, lockable, true));
- rfalse;
-];
-[ Adj_77_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "locked"
- if (t_0) return (SetEitherOrProperty(t_0, locked, true));
- rfalse;
-];
-[ Adj_78_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "unlocked"
- if (t_0) return (SetEitherOrProperty(t_0, locked));
- rfalse;
-];
-[ Adj_79_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "female"
- if (t_0) return (SetEitherOrProperty(t_0, female, true));
- rfalse;
-];
-[ Adj_80_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "male"
- if (t_0) return (SetEitherOrProperty(t_0, female));
- rfalse;
-];
-[ Adj_81_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "neuter"
- if (t_0) return (SetEitherOrProperty(t_0, neuter, true));
- rfalse;
-];
-[ Adj_82_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "switched on"
- if (t_0) return (SetEitherOrProperty(t_0, on, true));
- rfalse;
-];
-[ Adj_83_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of "switched off"
- if (t_0) return (SetEitherOrProperty(t_0, on));
- rfalse;
-];
-[ Adj_84_t3_v43
- t_0 ! Call parameter: scene
- ;
- ! meaning of "recurring"
- return (WriteGProperty(SCENE_TY, t_0, p57_recurring));
- rfalse;
-];
-[ Adj_85_t3_v43
- t_0 ! Call parameter: scene
- ;
- ! meaning of "non-recurring"
- return (WriteGProperty(SCENE_TY, t_0, p57_recurring, true));
- rfalse;
-];
-[ Adj_86_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (SetEitherOrProperty(t_0, absent, true));
- rfalse;
-];
-[ Adj_87_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (SetEitherOrProperty(t_0, mark_as_room, true));
- rfalse;
-];
-[ Adj_88_t3_v10
- t_0 ! Call parameter: object
- ;
- ! meaning of ""
- if (t_0) return (SetEitherOrProperty(t_0, mark_as_thing, true));
- rfalse;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Timed Events
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array TimedEventsTable table 0 0;
-
-Array TimedEventTimesTable table 0 0;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Rulebooks
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-Array rulebooks_array --> B0_startup B1_turn_sequence B2_shutdown B3_scene_changing B4_when_play_begins B5_when_play_ends B6_when_scene_begins B7_when_scene_ends B8_every_turn B9_action_processing B10_setting_action_variables B11_specific_action_processi B12_player_s_action_awarenes B13_accessibility B14_reaching_inside B15_reaching_outside B16_visibility B17_persuasion B18_unsuccessful_attempt_by B19_before B20_instead B21_check B22_carry_out B23_after B24_report B25_does_the_player_mean B26_multiple_action_processi B27_when_entire_game_begins B28_when_entire_game_ends B29_before_printing_the_name B30_for_printing_the_name B31_after_printing_the_name B32_before_printing_the_plur B33_for_printing_the_plural_ B34_after_printing_the_plura B35_before_printing_a_number B36_for_printing_a_number B37_after_printing_a_number B38_before_printing_room_des B39_for_printing_room_descri B40_after_printing_room_desc B41_before_printing_inventor B42_for_printing_inventory_d B43_after_printing_inventory B44_before_listing_contents B45_for_listing_contents B46_after_listing_contents B47_before_grouping_together B48_for_grouping_together B49_after_grouping_together B50_before_writing_a_paragra B51_for_writing_a_paragraph_ B52_after_writing_a_paragrap B53_before_listing_nondescri B54_for_listing_nondescript_ B55_after_listing_nondescrip B56_before_printing_the_name B57_for_printing_the_name_of B58_after_printing_the_name_ B59_before_printing_the_desc B60_for_printing_the_descrip B61_after_printing_the_descr B62_before_printing_the_anno B63_for_printing_the_announc B64_after_printing_the_annou B65_before_printing_the_anno B66_for_printing_the_announc B67_after_printing_the_annou B68_before_printing_a_refusa B69_for_printing_a_refusal_t B70_after_printing_a_refusal B71_before_constructing_the_ B72_for_constructing_the_sta B73_after_constructing_the_s B74_before_printing_the_bann B75_for_printing_the_banner_ B76_after_printing_the_banne B77_before_reading_a_command B78_for_reading_a_command B79_after_reading_a_command B80_before_deciding_the_scop B81_for_deciding_the_scope B82_after_deciding_the_scope B83_before_deciding_the_conc B84_for_deciding_the_conceal B85_after_deciding_the_conce B86_before_deciding_whether_ B87_for_deciding_whether_all B88_after_deciding_whether_a B89_before_clarifying_the_pa B90_for_clarifying_the_parse B91_after_clarifying_the_par B92_before_asking_which_do_y B93_for_asking_which_do_you_ B94_after_asking_which_do_yo B95_before_printing_a_parser B96_for_printing_a_parser_er B97_after_printing_a_parser_ B98_before_supplying_a_missi B99_for_supplying_a_missing_ B100_after_supplying_a_missi B101_before_supplying_a_miss B102_for_supplying_a_missing B103_after_supplying_a_missi B104_before_implicitly_takin B105_for_implicitly_taking B106_after_implicitly_taking B107_before_starting_the_vir B108_for_starting_the_virtua B109_after_starting_the_virt B110_before_amusing_a_victor B111_for_amusing_a_victoriou B112_after_amusing_a_victori B113_before_printing_the_pla B114_for_printing_the_player B115_after_printing_the_play B116_before_handling_the_fin B117_for_handling_the_final_ B118_after_handling_the_fina B119_before_printing_the_loc B120_for_printing_the_locale B121_after_printing_the_loca B122_before_choosing_notable B123_for_choosing_notable_lo B124_after_choosing_notable_ B125_before_printing_a_local B126_for_printing_a_locale_p B127_after_printing_a_locale B128_before_issuing_the_resp B129_for_issuing_the_respons B130_after_issuing_the_respo B131_check_taking_inventory B132_carry_out_taking_invent B133_report_taking_inventory B134_check_taking B135_carry_out_taking B136_report_taking B137_check_removing_it_from B138_carry_out_removing_it_f B139_report_removing_it_from B140_check_dropping B141_carry_out_dropping B142_report_dropping B143_check_putting_it_on B144_carry_out_putting_it_on B145_report_putting_it_on B146_check_inserting_it_into B147_carry_out_inserting_it_ B148_report_inserting_it_int B149_check_eating B150_carry_out_eating B151_report_eating B152_check_going B153_carry_out_going B154_report_going B155_check_entering B156_carry_out_entering B157_report_entering B158_check_exiting B159_carry_out_exiting B160_report_exiting B161_check_getting_off B162_carry_out_getting_off B163_report_getting_off B164_check_looking B165_carry_out_looking B166_report_looking B167_check_examining B168_carry_out_examining B169_report_examining B170_check_looking_under B171_carry_out_looking_under B172_report_looking_under B173_check_searching B174_carry_out_searching B175_report_searching B176_check_consulting_it_abo B177_carry_out_consulting_it B178_report_consulting_it_ab B179_check_locking_it_with B180_carry_out_locking_it_wi B181_report_locking_it_with B182_check_unlocking_it_with B183_carry_out_unlocking_it_ B184_report_unlocking_it_wit B185_check_switching_on B186_carry_out_switching_on B187_report_switching_on B188_check_switching_off B189_carry_out_switching_off B190_report_switching_off B191_check_opening B192_carry_out_opening B193_report_opening B194_check_closing B195_carry_out_closing B196_report_closing B197_check_wearing B198_carry_out_wearing B199_report_wearing B200_check_taking_off B201_carry_out_taking_off B202_report_taking_off B203_check_giving_it_to B204_carry_out_giving_it_to B205_report_giving_it_to B206_check_showing_it_to B207_carry_out_showing_it_to B208_report_showing_it_to B209_check_waking B210_carry_out_waking B211_report_waking B212_check_throwing_it_at B213_carry_out_throwing_it_a B214_report_throwing_it_at B215_check_attacking B216_carry_out_attacking B217_report_attacking B218_check_kissing B219_carry_out_kissing B220_report_kissing B221_check_answering_it_that B222_carry_out_answering_it_ B223_report_answering_it_tha B224_check_telling_it_about B225_carry_out_telling_it_ab B226_report_telling_it_about B227_check_asking_it_about B228_carry_out_asking_it_abo B229_report_asking_it_about B230_check_asking_it_for B231_carry_out_asking_it_for B232_report_asking_it_for B233_check_waiting B234_carry_out_waiting B235_report_waiting B236_check_touching B237_carry_out_touching B238_report_touching B239_check_waving B240_carry_out_waving B241_report_waving B242_check_pulling B243_carry_out_pulling B244_report_pulling B245_check_pushing B246_carry_out_pushing B247_report_pushing B248_check_turning B249_carry_out_turning B250_report_turning B251_check_pushing_it_to B252_carry_out_pushing_it_to B253_report_pushing_it_to B254_check_squeezing B255_carry_out_squeezing B256_report_squeezing B257_check_saying_yes B258_carry_out_saying_yes B259_report_saying_yes B260_check_saying_no B261_carry_out_saying_no B262_report_saying_no B263_check_burning B264_carry_out_burning B265_report_burning B266_check_waking_up B267_carry_out_waking_up B268_report_waking_up B269_check_thinking B270_carry_out_thinking B271_report_thinking B272_check_smelling B273_carry_out_smelling B274_report_smelling B275_check_listening_to B276_carry_out_listening_to B277_report_listening_to B278_check_tasting B279_carry_out_tasting B280_report_tasting B281_check_cutting B282_carry_out_cutting B283_report_cutting B284_check_jumping B285_carry_out_jumping B286_report_jumping B287_check_tying_it_to B288_carry_out_tying_it_to B289_report_tying_it_to B290_check_drinking B291_carry_out_drinking B292_report_drinking B293_check_saying_sorry B294_carry_out_saying_sorry B295_report_saying_sorry B296_check_swinging B297_carry_out_swinging B298_report_swinging B299_check_rubbing B300_carry_out_rubbing B301_report_rubbing B302_check_setting_it_to B303_carry_out_setting_it_to B304_report_setting_it_to B305_check_waving_hands B306_carry_out_waving_hands B307_report_waving_hands B308_check_buying B309_carry_out_buying B310_report_buying B311_check_climbing B312_carry_out_climbing B313_report_climbing B314_check_sleeping B315_carry_out_sleeping B316_report_sleeping B317_check_quitting_the_game B318_carry_out_quitting_the_ B319_report_quitting_the_gam B320_check_saving_the_game B321_carry_out_saving_the_ga B322_report_saving_the_game B323_check_restoring_the_gam B324_carry_out_restoring_the B325_report_restoring_the_ga B326_check_restarting_the_ga B327_carry_out_restarting_th B328_report_restarting_the_g B329_check_verifying_the_sto B330_carry_out_verifying_the B331_report_verifying_the_st B332_check_switching_the_sto B333_carry_out_switching_the B334_report_switching_the_st B335_check_switching_the_sto B336_carry_out_switching_the B337_report_switching_the_st B338_check_requesting_the_st B339_carry_out_requesting_th B340_report_requesting_the_s B341_check_requesting_the_sc B342_carry_out_requesting_th B343_report_requesting_the_s B344_check_preferring_abbrev B345_carry_out_preferring_ab B346_report_preferring_abbre B347_check_preferring_unabbr B348_carry_out_preferring_un B349_report_preferring_unabb B350_check_preferring_someti B351_carry_out_preferring_so B352_report_preferring_somet B353_check_switching_score_n B354_carry_out_switching_sco B355_report_switching_score_ B356_check_switching_score_n B357_carry_out_switching_sco B358_report_switching_score_ B359_check_requesting_the_pr B360_carry_out_requesting_th B361_report_requesting_the_p 0;
-
-[ EMPTY_RULEBOOK
- forbid_breaks ! Implied call parameter
- ;
- rfalse;
-];
-[ B0_startup
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = INITIALISE_MEMORY_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return INITIALISE_MEMORY_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = VIRTUAL_MACHINE_STARTUP_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return VIRTUAL_MACHINE_STARTUP_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = SEED_RANDOM_NUMBER_GENERATOR_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return SEED_RANDOM_NUMBER_GENERATOR_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = UPDATE_CHRONOLOGICAL_RECORDS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return UPDATE_CHRONOLOGICAL_RECORDS_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_9();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_9;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = POSITION_PLAYER_IN_MODEL_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return POSITION_PLAYER_IN_MODEL_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_10();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_10;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_11();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_11;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_12();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_12;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_13();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_13;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_14();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_14;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 11 rule(s)
-];
-[ B1_turn_sequence
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = PARSE_COMMAND_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return PARSE_COMMAND_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_9();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_9;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = GENERATE_ACTION_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return GENERATE_ACTION_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_16();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_16;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_15();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_15;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = TIMED_EVENTS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return TIMED_EVENTS_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = ADVANCE_TIME_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ADVANCE_TIME_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = UPDATE_CHRONOLOGICAL_RECORDS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return UPDATE_CHRONOLOGICAL_RECORDS_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_17();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_17;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = ADJUST_LIGHT_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ADJUST_LIGHT_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = NOTE_OBJECT_ACQUISITIONS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return NOTE_OBJECT_ACQUISITIONS_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_18();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_18;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 12 rule(s)
-];
-[ B2_shutdown
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_19();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_19;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = RESURRECT_PLAYER_IF_ASKED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return RESURRECT_PLAYER_IF_ASKED_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_20();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_20;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = ASK_FINAL_QUESTION_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ASK_FINAL_QUESTION_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 4 rule(s)
-];
-[ B3_scene_changing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = DetectSceneChange();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return DetectSceneChange;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B4_when_play_begins
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_799();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_799;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B5_when_play_ends = EMPTY_RULEBOOK;
-[ B6_when_scene_begins
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = R_65();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_65;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B7_when_scene_ends = EMPTY_RULEBOOK;
-Constant B8_every_turn = EMPTY_RULEBOOK;
-[ B9_action_processing
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_22();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_22;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_21();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_21;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_23();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_23;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = BASIC_VISIBILITY_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return BASIC_VISIBILITY_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = BASIC_ACCESSIBILITY_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return BASIC_ACCESSIBILITY_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = CARRYING_REQUIREMENTS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return CARRYING_REQUIREMENTS_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_24();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_24;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = REQUESTED_ACTIONS_REQUIRE_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return REQUESTED_ACTIONS_REQUIRE_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = CARRY_OUT_REQUESTED_ACTIONS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return CARRY_OUT_REQUESTED_ACTIONS_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = DESCEND_TO_SPECIFIC_ACTION_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return DESCEND_TO_SPECIFIC_ACTION_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_25();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_25;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 11 rule(s)
-];
-[ B10_setting_action_variables
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- if (action == ##Go) {
- rv = R_151();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_151;
- }
- latest_rule_result-->0 = 0;
- } else {
- if (say__p) RulebookParBreak(forbid_breaks);
- }
- if (action == ##Exit) {
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_174();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_174;
- }
- latest_rule_result-->0 = 0;
- } else {
- if (say__p) RulebookParBreak(forbid_breaks);
- }
- if (action == ##Look) {
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_186();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_186;
- }
- latest_rule_result-->0 = 0;
- } else {
- if (say__p) RulebookParBreak(forbid_breaks);
- }
- return 0; ! 3 rule(s)
-];
-[ B11_specific_action_processi
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = WORK_OUT_DETAILS_OF_SPECIFIC_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return WORK_OUT_DETAILS_OF_SPECIFIC_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_26();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_26;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_27();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_27;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_28();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_28;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_29();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_29;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_30();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_30;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_31();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_31;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_32();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_32;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 8 rule(s)
-];
-[ B12_player_s_action_awarenes
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_33();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_33;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_34();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_34;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_35();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_35;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_36();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_36;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 4 rule(s)
-];
-[ B13_accessibility
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = ACCESS_THROUGH_BARRIERS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ACCESS_THROUGH_BARRIERS_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B14_reaching_inside
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = CANT_REACH_INSIDE_ROOMS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return CANT_REACH_INSIDE_ROOMS_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = CANT_REACH_INSIDE_CLOSED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return CANT_REACH_INSIDE_CLOSED_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B15_reaching_outside
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = CANT_REACH_OUTSIDE_CLOSED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return CANT_REACH_OUTSIDE_CLOSED_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B16_visibility
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_37();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_37;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B17_persuasion = EMPTY_RULEBOOK;
-Constant B18_unsuccessful_attempt_by = EMPTY_RULEBOOK;
-Constant B19_before = EMPTY_RULEBOOK;
-[ B20_instead
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_800();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_800;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_801();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_801;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-Constant B21_check = EMPTY_RULEBOOK;
-Constant B22_carry_out = EMPTY_RULEBOOK;
-[ B23_after
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- if (action == ##Ask) {
- rv = R_802();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_802;
- }
- latest_rule_result-->0 = 0;
- } else {
- if (say__p) RulebookParBreak(forbid_breaks);
- }
- return 0; ! 1 rule(s)
-];
-Constant B24_report = EMPTY_RULEBOOK;
-[ B25_does_the_player_mean
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- if (action == ##Take) {
- rv = R_38();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_38;
- }
- latest_rule_result-->0 = 0;
- } else {
- if (say__p) RulebookParBreak(forbid_breaks);
- }
- if (action == ##Disrobe) {
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_242();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_242;
- }
- latest_rule_result-->0 = 0;
- } else {
- if (say__p) RulebookParBreak(forbid_breaks);
- }
- return 0; ! 2 rule(s)
-];
-Constant B26_multiple_action_processi = EMPTY_RULEBOOK;
-Constant B27_when_entire_game_begins = EMPTY_RULEBOOK;
-Constant B28_when_entire_game_ends = EMPTY_RULEBOOK;
-[ B29_before_printing_the_name
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = R_66();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_66;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B30_for_printing_the_name
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = STANDARD_NAME_PRINTING_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return STANDARD_NAME_PRINTING_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B31_after_printing_the_name = EMPTY_RULEBOOK;
-Constant B32_before_printing_the_plur = EMPTY_RULEBOOK;
-[ B33_for_printing_the_plural_
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = R_67();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_67;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B34_after_printing_the_plura = EMPTY_RULEBOOK;
-Constant B35_before_printing_a_number = EMPTY_RULEBOOK;
-[ B36_for_printing_a_number
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = R_68();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_68;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B37_after_printing_a_number = EMPTY_RULEBOOK;
-Constant B38_before_printing_room_des = EMPTY_RULEBOOK;
-Constant B39_for_printing_room_descri = EMPTY_RULEBOOK;
-Constant B40_after_printing_room_desc = EMPTY_RULEBOOK;
-Constant B41_before_printing_inventor = EMPTY_RULEBOOK;
-Constant B42_for_printing_inventory_d = EMPTY_RULEBOOK;
-Constant B43_after_printing_inventory = EMPTY_RULEBOOK;
-Constant B44_before_listing_contents = EMPTY_RULEBOOK;
-[ B45_for_listing_contents
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = STANDARD_CONTENTS_LISTING_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return STANDARD_CONTENTS_LISTING_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B46_after_listing_contents = EMPTY_RULEBOOK;
-Constant B47_before_grouping_together = EMPTY_RULEBOOK;
-Constant B48_for_grouping_together = EMPTY_RULEBOOK;
-Constant B49_after_grouping_together = EMPTY_RULEBOOK;
-Constant B50_before_writing_a_paragra = EMPTY_RULEBOOK;
-Constant B51_for_writing_a_paragraph_ = EMPTY_RULEBOOK;
-Constant B52_after_writing_a_paragrap = EMPTY_RULEBOOK;
-Constant B53_before_listing_nondescri = EMPTY_RULEBOOK;
-Constant B54_for_listing_nondescript_ = EMPTY_RULEBOOK;
-Constant B55_after_listing_nondescrip = EMPTY_RULEBOOK;
-Constant B56_before_printing_the_name = EMPTY_RULEBOOK;
-Constant B57_for_printing_the_name_of = EMPTY_RULEBOOK;
-Constant B58_after_printing_the_name_ = EMPTY_RULEBOOK;
-Constant B59_before_printing_the_desc = EMPTY_RULEBOOK;
-Constant B60_for_printing_the_descrip = EMPTY_RULEBOOK;
-Constant B61_after_printing_the_descr = EMPTY_RULEBOOK;
-Constant B62_before_printing_the_anno = EMPTY_RULEBOOK;
-Constant B63_for_printing_the_announc = EMPTY_RULEBOOK;
-Constant B64_after_printing_the_annou = EMPTY_RULEBOOK;
-Constant B65_before_printing_the_anno = EMPTY_RULEBOOK;
-[ B66_for_printing_the_announc
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = R_69();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_69;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B67_after_printing_the_annou = EMPTY_RULEBOOK;
-Constant B68_before_printing_a_refusa = EMPTY_RULEBOOK;
-Constant B69_for_printing_a_refusal_t = EMPTY_RULEBOOK;
-Constant B70_after_printing_a_refusal = EMPTY_RULEBOOK;
-Constant B71_before_constructing_the_ = EMPTY_RULEBOOK;
-Constant B72_for_constructing_the_sta = EMPTY_RULEBOOK;
-Constant B73_after_constructing_the_s = EMPTY_RULEBOOK;
-Constant B74_before_printing_the_bann = EMPTY_RULEBOOK;
-Constant B75_for_printing_the_banner_ = EMPTY_RULEBOOK;
-Constant B76_after_printing_the_banne = EMPTY_RULEBOOK;
-Constant B77_before_reading_a_command = EMPTY_RULEBOOK;
-Constant B78_for_reading_a_command = EMPTY_RULEBOOK;
-Constant B79_after_reading_a_command = EMPTY_RULEBOOK;
-Constant B80_before_deciding_the_scop = EMPTY_RULEBOOK;
-Constant B81_for_deciding_the_scope = EMPTY_RULEBOOK;
-Constant B82_after_deciding_the_scope = EMPTY_RULEBOOK;
-Constant B83_before_deciding_the_conc = EMPTY_RULEBOOK;
-Constant B84_for_deciding_the_conceal = EMPTY_RULEBOOK;
-Constant B85_after_deciding_the_conce = EMPTY_RULEBOOK;
-Constant B86_before_deciding_whether_ = EMPTY_RULEBOOK;
-[ B87_for_deciding_whether_all
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = R_74();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_74;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_70();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_70;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_73();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_73;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_72();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_72;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_71();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_71;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 5 rule(s)
-];
-Constant B88_after_deciding_whether_a = EMPTY_RULEBOOK;
-Constant B89_before_clarifying_the_pa = EMPTY_RULEBOOK;
-Constant B90_for_clarifying_the_parse = EMPTY_RULEBOOK;
-Constant B91_after_clarifying_the_par = EMPTY_RULEBOOK;
-Constant B92_before_asking_which_do_y = EMPTY_RULEBOOK;
-Constant B93_for_asking_which_do_you_ = EMPTY_RULEBOOK;
-Constant B94_after_asking_which_do_yo = EMPTY_RULEBOOK;
-Constant B95_before_printing_a_parser = EMPTY_RULEBOOK;
-Constant B96_for_printing_a_parser_er = EMPTY_RULEBOOK;
-Constant B97_after_printing_a_parser_ = EMPTY_RULEBOOK;
-Constant B98_before_supplying_a_missi = EMPTY_RULEBOOK;
-[ B99_for_supplying_a_missing_
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = R_75();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_75;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_76();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_76;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_77();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_77;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_162();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_162;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 4 rule(s)
-];
-Constant B100_after_supplying_a_missi = EMPTY_RULEBOOK;
-Constant B101_before_supplying_a_miss = EMPTY_RULEBOOK;
-Constant B102_for_supplying_a_missing = EMPTY_RULEBOOK;
-Constant B103_after_supplying_a_missi = EMPTY_RULEBOOK;
-Constant B104_before_implicitly_takin = EMPTY_RULEBOOK;
-[ B105_for_implicitly_taking
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = STANDARD_IMPLICIT_TAKING_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return STANDARD_IMPLICIT_TAKING_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B106_after_implicitly_taking = EMPTY_RULEBOOK;
-Constant B107_before_starting_the_vir = EMPTY_RULEBOOK;
-[ B108_for_starting_the_virtua
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = ENABLE_GLULX_ACCEL_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ENABLE_GLULX_ACCEL_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B109_after_starting_the_virt = EMPTY_RULEBOOK;
-Constant B110_before_amusing_a_victor = EMPTY_RULEBOOK;
-Constant B111_for_amusing_a_victoriou = EMPTY_RULEBOOK;
-Constant B112_after_amusing_a_victori = EMPTY_RULEBOOK;
-Constant B113_before_printing_the_pla = EMPTY_RULEBOOK;
-[ B114_for_printing_the_player
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = PRINT_OBITUARY_HEADLINE_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return PRINT_OBITUARY_HEADLINE_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = PRINT_FINAL_SCORE_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return PRINT_FINAL_SCORE_R;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = DISPLAY_FINAL_STATUS_LINE_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return DISPLAY_FINAL_STATUS_LINE_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-Constant B115_after_printing_the_play = EMPTY_RULEBOOK;
-[ B116_before_handling_the_fin
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = R_79();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_79;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_78();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_78;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = READ_FINAL_ANSWER_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return READ_FINAL_ANSWER_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-[ B117_for_handling_the_final_
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = R_80();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_80;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B118_after_handling_the_fina = EMPTY_RULEBOOK;
-[ B119_before_printing_the_loc
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = R_83();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_83;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_84();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_84;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B120_for_printing_the_locale
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = R_85();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_85;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_86();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_86;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-Constant B121_after_printing_the_loca = EMPTY_RULEBOOK;
-Constant B122_before_choosing_notable = EMPTY_RULEBOOK;
-[ B123_for_choosing_notable_lo
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = R_87();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_87;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B124_after_choosing_notable_ = EMPTY_RULEBOOK;
-Constant B125_before_printing_a_local = EMPTY_RULEBOOK;
-[ B126_for_printing_a_locale_p
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- p ! rulebook parameter
- ;
- original_deadflag = deadflag;
- p = parameter_value;
- parameter_value = p;
- rv = R_94();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_94;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_88();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_88;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_89();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_89;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_90();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_90;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_91();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_91;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_92();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_92;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_93();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_93;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_96();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_96;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- parameter_value = p;
- rv = R_97();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_97;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 9 rule(s)
-];
-Constant B127_after_printing_a_locale = EMPTY_RULEBOOK;
-Constant B128_before_issuing_the_resp = EMPTY_RULEBOOK;
-[ B129_for_issuing_the_respons
- forbid_breaks ! Implied call parameter
- rv ! return value
- p ! rulebook parameter
- ;
- p = parameter_value;
- parameter_value = p;
- rv = STANDARD_RESPONSE_ISSUING_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return STANDARD_RESPONSE_ISSUING_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B130_after_issuing_the_respo = EMPTY_RULEBOOK;
-Constant B131_check_taking_inventory = EMPTY_RULEBOOK;
-[ B132_carry_out_taking_invent
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_98();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_98;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_99();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_99;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B133_report_taking_inventory
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_100();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_100;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B134_check_taking
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_101();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_101;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_102();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_102;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_103();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_103;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_104();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_104;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_105();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_105;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_106();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_106;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_107();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_107;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_108();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_108;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_109();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_109;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_110();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_110;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_111();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_111;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_112();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_112;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 12 rule(s)
-];
-[ B135_carry_out_taking
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_113();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_113;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B136_report_taking
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_114();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_114;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B137_check_removing_it_from
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_103();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_103;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_115();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_115;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_116();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_116;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_117();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_117;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 4 rule(s)
-];
-Constant B138_carry_out_removing_it_f = EMPTY_RULEBOOK;
-Constant B139_report_removing_it_from = EMPTY_RULEBOOK;
-[ B140_check_dropping
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_119();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_119;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_118();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_118;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_120();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_120;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_121();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_121;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_122();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_122;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_123();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_123;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 6 rule(s)
-];
-[ B141_carry_out_dropping
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_124();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_124;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B142_report_dropping
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_125();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_125;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B143_check_putting_it_on
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_126();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_126;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_127();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_127;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_128();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_128;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_129();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_129;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_130();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_130;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_131();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_131;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 6 rule(s)
-];
-[ B144_carry_out_putting_it_on
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_132();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_132;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B145_report_putting_it_on
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_133();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_133;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_134();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_134;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B146_check_inserting_it_into
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_135();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_135;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_136();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_136;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_137();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_137;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_138();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_138;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_139();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_139;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_140();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_140;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_141();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_141;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 7 rule(s)
-];
-[ B147_carry_out_inserting_it_
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_142();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_142;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B148_report_inserting_it_int
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_143();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_143;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_144();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_144;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B149_check_eating
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_145();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_145;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_146();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_146;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_147();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_147;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_148();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_148;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 4 rule(s)
-];
-[ B150_carry_out_eating
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_149();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_149;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B151_report_eating
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_150();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_150;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B152_check_going
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_152();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_152;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_153();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_153;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_154();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_154;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_155();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_155;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_156();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_156;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_157();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_157;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 6 rule(s)
-];
-[ B153_carry_out_going
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_158();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_158;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_159();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_159;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_160();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_160;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-[ B154_report_going
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_161();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_161;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B155_check_entering
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_163();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_163;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_164();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_164;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_165();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_165;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_166();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_166;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_167();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_167;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_168();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_168;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_169();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_169;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_170();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_170;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 8 rule(s)
-];
-[ B156_carry_out_entering
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_171();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_171;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B157_report_entering
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_172();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_172;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_173();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_173;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B158_check_exiting
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_175();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_175;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_176();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_176;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_177();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_177;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_178();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_178;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 4 rule(s)
-];
-[ B159_carry_out_exiting
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_179();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_179;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B160_report_exiting
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_180();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_180;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_181();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_181;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B161_check_getting_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_182();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_182;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B162_carry_out_getting_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_183();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_183;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B163_report_getting_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_184();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_184;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_185();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_185;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-Constant B164_check_looking = EMPTY_RULEBOOK;
-[ B165_carry_out_looking
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_187();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_187;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_188();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_188;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_189();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_189;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_190();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_190;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_191();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_191;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 5 rule(s)
-];
-[ B166_report_looking
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_192();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_192;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B167_check_examining = EMPTY_RULEBOOK;
-[ B168_carry_out_examining
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_193();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_193;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_194();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_194;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_195();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_195;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_196();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_196;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_197();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_197;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_198();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_198;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 6 rule(s)
-];
-[ B169_report_examining
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_199();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_199;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B170_check_looking_under = EMPTY_RULEBOOK;
-[ B171_carry_out_looking_under
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_200();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_200;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B172_report_looking_under
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_201();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_201;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B173_check_searching
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_202();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_202;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_203();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_203;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-Constant B174_carry_out_searching = EMPTY_RULEBOOK;
-[ B175_report_searching
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_204();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_204;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_205();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_205;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_206();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_206;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-Constant B176_check_consulting_it_abo = EMPTY_RULEBOOK;
-Constant B177_carry_out_consulting_it = EMPTY_RULEBOOK;
-[ B178_report_consulting_it_ab
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_207();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_207;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B179_check_locking_it_with
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_208();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_208;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_209();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_209;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_210();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_210;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_211();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_211;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 4 rule(s)
-];
-[ B180_carry_out_locking_it_wi
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_212();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_212;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B181_report_locking_it_with
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_213();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_213;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B182_check_unlocking_it_with
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_214();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_214;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_215();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_215;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_216();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_216;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-[ B183_carry_out_unlocking_it_
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_217();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_217;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B184_report_unlocking_it_wit
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_218();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_218;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B185_check_switching_on
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_219();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_219;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_220();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_220;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B186_carry_out_switching_on
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_221();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_221;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B187_report_switching_on
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_222();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_222;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B188_check_switching_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_223();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_223;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_224();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_224;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B189_carry_out_switching_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_225();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_225;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B190_report_switching_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_226();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_226;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B191_check_opening
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_227();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_227;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_228();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_228;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_229();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_229;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-[ B192_carry_out_opening
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_230();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_230;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B193_report_opening
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_231();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_231;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_232();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_232;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B194_check_closing
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_233();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_233;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_234();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_234;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B195_carry_out_closing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_235();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_235;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B196_report_closing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_236();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_236;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B197_check_wearing
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_237();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_237;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_238();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_238;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_239();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_239;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-[ B198_carry_out_wearing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_240();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_240;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B199_report_wearing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_241();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_241;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B200_check_taking_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_243();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_243;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_244();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_244;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-[ B201_carry_out_taking_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_245();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_245;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B202_report_taking_off
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_246();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_246;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B203_check_giving_it_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_247();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_247;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_248();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_248;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_249();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_249;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_250();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_250;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_251();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_251;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_252();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_252;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 6 rule(s)
-];
-[ B204_carry_out_giving_it_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_253();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_253;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B205_report_giving_it_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_254();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_254;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B206_check_showing_it_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_255();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_255;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_256();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_256;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_257();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_257;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-Constant B207_carry_out_showing_it_to = EMPTY_RULEBOOK;
-Constant B208_report_showing_it_to = EMPTY_RULEBOOK;
-[ B209_check_waking
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_258();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_258;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B210_carry_out_waking = EMPTY_RULEBOOK;
-Constant B211_report_waking = EMPTY_RULEBOOK;
-[ B212_check_throwing_it_at
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_259();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_259;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_260();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_260;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_261();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_261;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-Constant B213_carry_out_throwing_it_a = EMPTY_RULEBOOK;
-Constant B214_report_throwing_it_at = EMPTY_RULEBOOK;
-[ B215_check_attacking
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_262();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_262;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B216_carry_out_attacking = EMPTY_RULEBOOK;
-Constant B217_report_attacking = EMPTY_RULEBOOK;
-[ B218_check_kissing
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_263();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_263;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_264();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_264;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-Constant B219_carry_out_kissing = EMPTY_RULEBOOK;
-Constant B220_report_kissing = EMPTY_RULEBOOK;
-Constant B221_check_answering_it_that = EMPTY_RULEBOOK;
-Constant B222_carry_out_answering_it_ = EMPTY_RULEBOOK;
-[ B223_report_answering_it_tha
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_265();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_265;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B224_check_telling_it_about
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_266();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_266;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B225_carry_out_telling_it_ab = EMPTY_RULEBOOK;
-[ B226_report_telling_it_about
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_267();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_267;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B227_check_asking_it_about = EMPTY_RULEBOOK;
-Constant B228_carry_out_asking_it_abo = EMPTY_RULEBOOK;
-[ B229_report_asking_it_about
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_268();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_268;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B230_check_asking_it_for
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_269();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_269;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_270();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_270;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 2 rule(s)
-];
-Constant B231_carry_out_asking_it_for = EMPTY_RULEBOOK;
-Constant B232_report_asking_it_for = EMPTY_RULEBOOK;
-Constant B233_check_waiting = EMPTY_RULEBOOK;
-Constant B234_carry_out_waiting = EMPTY_RULEBOOK;
-[ B235_report_waiting
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_271();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_271;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B236_check_touching = EMPTY_RULEBOOK;
-Constant B237_carry_out_touching = EMPTY_RULEBOOK;
-[ B238_report_touching
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_272();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_272;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_273();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_273;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_274();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_274;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-[ B239_check_waving
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_275();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_275;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B240_carry_out_waving = EMPTY_RULEBOOK;
-[ B241_report_waving
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_276();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_276;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B242_check_pulling
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_277();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_277;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_278();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_278;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_279();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_279;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-Constant B243_carry_out_pulling = EMPTY_RULEBOOK;
-[ B244_report_pulling
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_280();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_280;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B245_check_pushing
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_281();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_281;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_282();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_282;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_283();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_283;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-Constant B246_carry_out_pushing = EMPTY_RULEBOOK;
-[ B247_report_pushing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_284();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_284;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B248_check_turning
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_285();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_285;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_286();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_286;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_287();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_287;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 3 rule(s)
-];
-Constant B249_carry_out_turning = EMPTY_RULEBOOK;
-[ B250_report_turning
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_288();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_288;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B251_check_pushing_it_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- original_deadflag ! saved state
- ;
- original_deadflag = deadflag;
- rv = R_289();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_289;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_290();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_290;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_291();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_291;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_292();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_292;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_293();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_293;
- }
- latest_rule_result-->0 = 0;
- if (original_deadflag ~= deadflag) return 0;
- if (say__p) RulebookParBreak(forbid_breaks);
- rv = R_294();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_294;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 6 rule(s)
-];
-Constant B252_carry_out_pushing_it_to = EMPTY_RULEBOOK;
-Constant B253_report_pushing_it_to = EMPTY_RULEBOOK;
-[ B254_check_squeezing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_295();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_295;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B255_carry_out_squeezing = EMPTY_RULEBOOK;
-[ B256_report_squeezing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_296();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_296;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B257_check_saying_yes
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_297();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_297;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B258_carry_out_saying_yes = EMPTY_RULEBOOK;
-Constant B259_report_saying_yes = EMPTY_RULEBOOK;
-[ B260_check_saying_no
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_298();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_298;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B261_carry_out_saying_no = EMPTY_RULEBOOK;
-Constant B262_report_saying_no = EMPTY_RULEBOOK;
-[ B263_check_burning
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_299();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_299;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B264_carry_out_burning = EMPTY_RULEBOOK;
-Constant B265_report_burning = EMPTY_RULEBOOK;
-[ B266_check_waking_up
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_300();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_300;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B267_carry_out_waking_up = EMPTY_RULEBOOK;
-Constant B268_report_waking_up = EMPTY_RULEBOOK;
-[ B269_check_thinking
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_301();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_301;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B270_carry_out_thinking = EMPTY_RULEBOOK;
-Constant B271_report_thinking = EMPTY_RULEBOOK;
-Constant B272_check_smelling = EMPTY_RULEBOOK;
-Constant B273_carry_out_smelling = EMPTY_RULEBOOK;
-[ B274_report_smelling
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_302();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_302;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B275_check_listening_to = EMPTY_RULEBOOK;
-Constant B276_carry_out_listening_to = EMPTY_RULEBOOK;
-[ B277_report_listening_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_303();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_303;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B278_check_tasting = EMPTY_RULEBOOK;
-Constant B279_carry_out_tasting = EMPTY_RULEBOOK;
-[ B280_report_tasting
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_304();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_304;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B281_check_cutting
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_305();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_305;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B282_carry_out_cutting = EMPTY_RULEBOOK;
-Constant B283_report_cutting = EMPTY_RULEBOOK;
-Constant B284_check_jumping = EMPTY_RULEBOOK;
-Constant B285_carry_out_jumping = EMPTY_RULEBOOK;
-[ B286_report_jumping
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_306();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_306;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B287_check_tying_it_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_307();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_307;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B288_carry_out_tying_it_to = EMPTY_RULEBOOK;
-Constant B289_report_tying_it_to = EMPTY_RULEBOOK;
-[ B290_check_drinking
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_308();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_308;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B291_carry_out_drinking = EMPTY_RULEBOOK;
-Constant B292_report_drinking = EMPTY_RULEBOOK;
-[ B293_check_saying_sorry
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_309();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_309;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B294_carry_out_saying_sorry = EMPTY_RULEBOOK;
-Constant B295_report_saying_sorry = EMPTY_RULEBOOK;
-[ B296_check_swinging
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_310();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_310;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B297_carry_out_swinging = EMPTY_RULEBOOK;
-Constant B298_report_swinging = EMPTY_RULEBOOK;
-[ B299_check_rubbing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_311();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_311;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B300_carry_out_rubbing = EMPTY_RULEBOOK;
-[ B301_report_rubbing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_312();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_312;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B302_check_setting_it_to
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_313();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_313;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B303_carry_out_setting_it_to = EMPTY_RULEBOOK;
-Constant B304_report_setting_it_to = EMPTY_RULEBOOK;
-Constant B305_check_waving_hands = EMPTY_RULEBOOK;
-Constant B306_carry_out_waving_hands = EMPTY_RULEBOOK;
-[ B307_report_waving_hands
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_314();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_314;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B308_check_buying
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_315();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_315;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B309_carry_out_buying = EMPTY_RULEBOOK;
-Constant B310_report_buying = EMPTY_RULEBOOK;
-[ B311_check_climbing
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_316();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_316;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B312_carry_out_climbing = EMPTY_RULEBOOK;
-Constant B313_report_climbing = EMPTY_RULEBOOK;
-[ B314_check_sleeping
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = R_317();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return R_317;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B315_carry_out_sleeping = EMPTY_RULEBOOK;
-Constant B316_report_sleeping = EMPTY_RULEBOOK;
-Constant B317_check_quitting_the_game = EMPTY_RULEBOOK;
-[ B318_carry_out_quitting_the_
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = QUIT_THE_GAME_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return QUIT_THE_GAME_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B319_report_quitting_the_gam = EMPTY_RULEBOOK;
-Constant B320_check_saving_the_game = EMPTY_RULEBOOK;
-[ B321_carry_out_saving_the_ga
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = SAVE_THE_GAME_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return SAVE_THE_GAME_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B322_report_saving_the_game = EMPTY_RULEBOOK;
-Constant B323_check_restoring_the_gam = EMPTY_RULEBOOK;
-[ B324_carry_out_restoring_the
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = RESTORE_THE_GAME_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return RESTORE_THE_GAME_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B325_report_restoring_the_ga = EMPTY_RULEBOOK;
-Constant B326_check_restarting_the_ga = EMPTY_RULEBOOK;
-[ B327_carry_out_restarting_th
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = RESTART_THE_GAME_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return RESTART_THE_GAME_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B328_report_restarting_the_g = EMPTY_RULEBOOK;
-Constant B329_check_verifying_the_sto = EMPTY_RULEBOOK;
-[ B330_carry_out_verifying_the
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = VERIFY_THE_STORY_FILE_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return VERIFY_THE_STORY_FILE_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B331_report_verifying_the_st = EMPTY_RULEBOOK;
-Constant B332_check_switching_the_sto = EMPTY_RULEBOOK;
-[ B333_carry_out_switching_the
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = SWITCH_TRANSCRIPT_ON_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return SWITCH_TRANSCRIPT_ON_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B334_report_switching_the_st = EMPTY_RULEBOOK;
-Constant B335_check_switching_the_sto = EMPTY_RULEBOOK;
-[ B336_carry_out_switching_the
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = SWITCH_TRANSCRIPT_OFF_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return SWITCH_TRANSCRIPT_OFF_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B337_report_switching_the_st = EMPTY_RULEBOOK;
-Constant B338_check_requesting_the_st = EMPTY_RULEBOOK;
-[ B339_carry_out_requesting_th
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = ANNOUNCE_STORY_FILE_VERSION_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ANNOUNCE_STORY_FILE_VERSION_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B340_report_requesting_the_s = EMPTY_RULEBOOK;
-Constant B341_check_requesting_the_sc = EMPTY_RULEBOOK;
-[ B342_carry_out_requesting_th
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = ANNOUNCE_SCORE_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ANNOUNCE_SCORE_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B343_report_requesting_the_s = EMPTY_RULEBOOK;
-Constant B344_check_preferring_abbrev = EMPTY_RULEBOOK;
-[ B345_carry_out_preferring_ab
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = PREFER_ABBREVIATED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return PREFER_ABBREVIATED_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B346_report_preferring_abbre
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = REP_PREFER_ABBREVIATED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return REP_PREFER_ABBREVIATED_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B347_check_preferring_unabbr = EMPTY_RULEBOOK;
-[ B348_carry_out_preferring_un
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = PREFER_UNABBREVIATED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return PREFER_UNABBREVIATED_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B349_report_preferring_unabb
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = REP_PREFER_UNABBREVIATED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return REP_PREFER_UNABBREVIATED_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B350_check_preferring_someti = EMPTY_RULEBOOK;
-[ B351_carry_out_preferring_so
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = PREFER_SOMETIMES_ABBREVIATED_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return PREFER_SOMETIMES_ABBREVIATED_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B352_report_preferring_somet
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = REP_PREFER_SOMETIMES_ABBR_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return REP_PREFER_SOMETIMES_ABBR_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B353_check_switching_score_n = EMPTY_RULEBOOK;
-[ B354_carry_out_switching_sco
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = SWITCH_SCORE_NOTIFY_ON_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return SWITCH_SCORE_NOTIFY_ON_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B355_report_switching_score_
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = REP_SWITCH_NOTIFY_ON_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return REP_SWITCH_NOTIFY_ON_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B356_check_switching_score_n = EMPTY_RULEBOOK;
-[ B357_carry_out_switching_sco
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = SWITCH_SCORE_NOTIFY_OFF_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return SWITCH_SCORE_NOTIFY_OFF_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-[ B358_report_switching_score_
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = REP_SWITCH_NOTIFY_OFF_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return REP_SWITCH_NOTIFY_OFF_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B359_check_requesting_the_pr = EMPTY_RULEBOOK;
-[ B360_carry_out_requesting_th
- forbid_breaks ! Implied call parameter
- rv ! return value
- ;
- rv = ANNOUNCE_PRONOUN_MEANINGS_R();
- if (rv) {
- if (rv == 2) return reason_the_action_failed;
- return ANNOUNCE_PRONOUN_MEANINGS_R;
- }
- latest_rule_result-->0 = 0;
- return 0; ! 1 rule(s)
-];
-Constant B361_report_requesting_the_p = EMPTY_RULEBOOK;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Scenes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-[ DetectSceneChange
- chs ! count of changes made
- ch ! flag: change made
- ;
- if (scene_status-->0 == 1) {
- if ((((deadflag~=0)))) {
- ch = true;
- if (debug_scenes) print "[Scene 'Entire Game' ends]^";
- if (GProperty(43, 1, p57_recurring)) scene_status-->0 = 0; else scene_status-->0 = 2; FollowRulebook(28);
- FollowRulebook(WHEN_SCENE_ENDS_RB, 1);
- scene_ended-->0 = the_time;
- scene_endings-->0 = (scene_endings-->0)|2;
- scene_latest_ending-->0 = 1;
- jump CScene;
- }
- }
- if (scene_status-->0 == 0) {
- if ((((deadflag==0)))) {
- ch = true;
- if (debug_scenes) print "[Scene 'Entire Game' begins]^";
- scene_status-->0 = 1; FollowRulebook(WHEN_SCENE_BEGINS_RB, 1);
- FollowRulebook(27);
- scene_started-->0 = the_time;
- scene_endings-->0 = (scene_endings-->0)|1;
- scene_latest_ending-->0 = 0;
- jump CScene;
- }
- }
- .CScene;
- if (chs>20) ">--> The scene change machinery is stuck.";
-
- if (ch>0) DetectSceneChange(++chs);
-
- rfalse;
-];
-
-#IFDEF DEBUG;
-[ ShowSceneStatus
- chs ! internal use only
- sc ! internal use only
- ch ! internal use only
- ;
- if (scene_status-->0 == 1) {
- print "Scene 'Entire Game' playing (for ", the_time-(scene_started-->0), " mins now)^";
- } else {
- if (scene_latest_ending-->0 > 0) {
- print "Scene 'Entire Game' ended";
- print "^";
- }
- }
-];
-
-#ENDIF;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: The New Library
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Summary
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Action Data
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant AD_ACTION = 0; ! The I6 action number (0 to 4095)
-Constant AD_REQUIREMENTS = 1; ! Such as requiring light; a bitmap, see below
-Constant AD_NOUN_KOV = 2; ! Kind of value of the first noun
-Constant AD_SECOND_KOV = 3; ! Kind of value of the second noun
-Constant AD_VARIABLES_CREATOR = 4; ! Routine to initialise variables owned
-Constant AD_VARIABLES_ID = 5; ! Frame ID for variables owned by action
-
-Constant AD_RECORD_SIZE = 6;
-
-[ FindAction fa t;
- if (fa == -1) fa = action;
- t = 1;
- while (t <= ActionData-->0) {
- if (fa == ActionData-->t) return t;
- t = t + AD_RECORD_SIZE;
- }
- rfalse;
-];
-
-[ ActionNumberIndexed i;
- if ((i>=0) && (i < AD_RECORDS)) return ActionData-->(i*AD_RECORD_SIZE + AD_ACTION + 1);
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Requirements Bitmap
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant TOUCH_NOUN_ABIT = $$00000001;
-Constant TOUCH_SECOND_ABIT = $$00000010;
-Constant LIGHT_ABIT = $$00000100;
-Constant NEED_NOUN_ABIT = $$00001000;
-Constant NEED_SECOND_ABIT = $$00010000;
-Constant OUT_OF_WORLD_ABIT = $$00100000;
-Constant CARRY_NOUN_ABIT = $$01000000;
-Constant CARRY_SECOND_ABIT = $$10000000;
-
-[ NeedToCarryNoun; return TestActionMask(CARRY_NOUN_ABIT); ];
-[ NeedToCarrySecondNoun; return TestActionMask(CARRY_SECOND_ABIT); ];
-[ NeedToTouchNoun; return TestActionMask(TOUCH_NOUN_ABIT); ];
-[ NeedToTouchSecondNoun; return TestActionMask(TOUCH_SECOND_ABIT); ];
-[ NeedLightForAction; return TestActionMask(LIGHT_ABIT); ];
-
-[ TestActionMask match mask at;
- at = FindAction(-1);
- if (at == 0) rfalse;
- mask = ActionData-->(at+AD_REQUIREMENTS);
- if (mask & match) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Try Action
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TryAction req by ac n s stora smeta tbits saved_command text_of_command;
- if (stora) return STORED_ACTION_TY_New(ac, n, s, by, req, stora);
- tbits = req & (16+32);
- req = req & 1;
- @push actor; @push act_requester; @push inp1; @push inp2;
- @push parsed_number; smeta = meta;
- actor = by; if (req) act_requester = player; else act_requester = 0;
-
- by = FindAction(ac);
- if (by) {
- if (ActionData-->(by+AD_NOUN_KOV) == OBJECT_TY) inp1 = n;
- else { inp1 = 1; parsed_number = n; }
- if (ActionData-->(by+AD_SECOND_KOV) == OBJECT_TY) inp2 = s;
- else { inp2 = 1; parsed_number = s; }
- if (((ActionData-->(by+AD_NOUN_KOV) == UNDERSTANDING_TY) ||
- (ActionData-->(by+AD_SECOND_KOV) == UNDERSTANDING_TY)) && (tbits)) {
- saved_command = BlkValueCreate(TEXT_TY);
- BlkValueCast(saved_command, SNIPPET_TY, players_command);
- text_of_command = BlkValueCreate(TEXT_TY);
- BlkValueCopy(text_of_command, parsed_number);
- SetPlayersCommand(text_of_command);
- if (tbits == 16) {
- n = players_command; inp1 = 1; parsed_number = players_command;
- } else {
- s = players_command; inp2 = 1; parsed_number = players_command;
- }
- BlkValueFree(text_of_command);
- @push consult_from; @push consult_words;
- consult_from = 1; consult_words = parsed_number - 100;
- }
- }
-
- BeginAction(ac, n, s, 0, true);
-
- if (saved_command) {
- @pull consult_words; @pull consult_from;
- SetPlayersCommand(saved_command);
- BlkValueFree(saved_command);
- }
-
- meta = smeta; @pull parsed_number;
- @pull inp2; @pull inp1; @pull act_requester; @pull actor;
- TrackActions(true, smeta);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: I6 Angle Brackets
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ R_Process a i j;
- @push inp1; @push inp2;
- inp1 = i; inp2 = j; BeginAction(a, i, j);
- @pull inp2; @pull inp1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Conversion
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global converted_action_outcome = -1;
-[ GVS_Convert ac n s;
- converted_action_outcome = BeginAction(ac, n, s);
- if (converted_action_outcome == true) FollowRulebook( 23, nothing, true );
- rtrue;
-];
-
-[ ConvertToRequest X AN Y Z;
- WORK_OUT_DETAILS_OF_SPECIFIC_R();
- if (X == player) TryAction(false, X, AN, Y, Z);
- else TryAction(true, X, AN, Y, Z);
- rtrue;
-];
-
-[ ConvertToGoingWithPush i oldrm newrm infl;
- i=noun;
- if (IndirectlyContains(noun, actor) == false) { move i to actor; infl = true; }
- move_pushing = i;
- oldrm = LocationOf(noun);
- BeginAction(##Go, second);
- newrm = LocationOf(actor);
- move_pushing = nothing; move i to newrm;
- if (newrm ~= oldrm) {
- if (IndirectlyContains(i, player)) TryAction(0, player, ##Look, 0, 0);
- RulebookSucceeds();
- } else RulebookFails();
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Implicit Take
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ImplicitTake obj ks;
- if (actor == player) { STANDARD_IMPLICIT_TAKING_RM('A', obj); }
- else {
- if (TestVisibility(player, actor))
- STANDARD_IMPLICIT_TAKING_RM('B', obj, actor);
- }
- ClearParagraphing(3);
- @push keep_silent; keep_silent = true;
- @push say__p; @push say__pc; ClearParagraphing(4);
- if (act_requester) TryAction(true, actor, ##Take, obj, nothing);
- else TryAction(false, actor, ##Take, obj, nothing);
- DivideParagraphPoint(); @pull say__pc; @pull say__p; AdjustParagraphPoint(); @pull keep_silent;
- if (obj in actor) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Look After Going
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LookAfterGoing;
- GoingLookBreak();
- AbbreviatedRoomDescription();
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Abbreviated Room Description
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ AbbreviatedRoomDescription prior_action pos frame_id;
- prior_action = action;
-
- action = ##Look;
- pos = FindAction(##Look);
- if ((pos) && (ActionData-->(pos+AD_VARIABLES_CREATOR))) {
- frame_id = ActionData-->(pos+AD_VARIABLES_ID);
- Mstack_Create_Frame(ActionData-->(pos+AD_VARIABLES_CREATOR), frame_id);
- FollowRulebook(SETTING_ACTION_VARIABLES_RB);
- (MStack-->MstVO(frame_id, 0)) = prior_action; ! "room-describing action"
- (MStack-->MstVO(frame_id, 1)) = true; ! "abbreviated form allowed"
- }
- LookSub(); ! The I6 verb routine for "looking"
- if (frame_id) Mstack_Destroy_Frame(ActionData-->(pos+AD_VARIABLES_CREATOR), frame_id);
-
- action = prior_action;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Begin Action
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BeginAction a n s moi notrack rv;
- ChronologyPoint();
-
- @push action; @push noun; @push second; @push self; @push multiple_object_item;
-
- action = a; noun = n; second = s; self = noun; multiple_object_item = moi;
- if (action < 4096) rv = ActionPrimitive();
-
- @pull multiple_object_item; @pull self; @pull second; @pull noun; @pull action;
-
- if (notrack == false) TrackActions(true, meta);
- return rv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Action Primitive
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ActionPrimitive rv p1 p2 p3 p4 p5 frame_id;
- MStack_CreateRBVars(ACTION_PROCESSING_RB);
-
- if ((keep_silent == false) && (multiflag == false)) DivideParagraphPoint();
- reason_the_action_failed = 0;
-
- frame_id = -1;
- p1 = FindAction(action);
- if ((p1) && (ActionData-->(p1+AD_VARIABLES_CREATOR))) {
- frame_id = ActionData-->(p1+AD_VARIABLES_ID);
- Mstack_Create_Frame(ActionData-->(p1+AD_VARIABLES_CREATOR), frame_id);
- }
- if (ActionVariablesNotTypeSafe()) {
- if (actor ~= player) { ACTION_PROCESSING_INTERNAL_RM('K'); new_line; }
- if (frame_id ~= -1)
- Mstack_Destroy_Frame(ActionData-->(p1+AD_VARIABLES_CREATOR), frame_id);
- MStack_DestroyRBVars(ACTION_PROCESSING_RB);
- return;
- }
-
- FollowRulebook(SETTING_ACTION_VARIABLES_RB);
-
- #IFDEF DEBUG;
- if ((trace_actions) && (FindAction(-1))) {
- print "["; p1=actor; p2=act_requester; p3=action; p4=noun; p5=second;
- DB_Action(p1,p2,p3,p4,p5);
- print "]^"; ClearParagraphing(5);
- }
- ++debug_rule_nesting;
- #ENDIF;
- TrackActions(false, meta);
- if ((meta) && (actor ~= player)) {
- ACTION_PROCESSING_INTERNAL_RM('A', actor); new_line; rv = RS_FAILS; }
- else if (meta) { DESCEND_TO_SPECIFIC_ACTION_R(); rv = RulebookOutcome(); }
- else { FollowRulebook(ACTION_PROCESSING_RB); rv = RulebookOutcome(); }
- #IFDEF DEBUG;
- --debug_rule_nesting;
- if ((trace_actions) && (FindAction(-1))) {
- print "["; DB_Action(p1,p2,p3,p4,p5); print " - ";
- switch (rv) {
- RS_SUCCEEDS: print "succeeded";
- RS_FAILS: print "failed";
- #IFNDEF MEMORY_ECONOMY;
- if (reason_the_action_failed)
- print " the ",
- (RulePrintingRule) reason_the_action_failed;
- #ENDIF;
- default: print "ended without result";
- }
- print "]^"; say__p = 1;
- SetRulebookOutcome(rv); ! In case disturbed by printing activities
- }
- #ENDIF;
- if (rv == RS_SUCCEEDS) UpdateActionBitmap();
- if (frame_id ~= -1) {
- p1 = FindAction(action);
- Mstack_Destroy_Frame(ActionData-->(p1+AD_VARIABLES_CREATOR), frame_id);
- }
- MStack_DestroyRBVars(ACTION_PROCESSING_RB);
- if ((keep_silent == false) && (multiflag == false)) DivideParagraphPoint();
- if (rv == RS_SUCCEEDS) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Internal Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ACTION_PROCESSING_INTERNAL_R; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Type Safety
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ActionVariablesNotTypeSafe mask noun_kova second_kova at;
- at = FindAction(-1); if (at == 0) rfalse; ! For any I6-defined actions
-
- noun_kova = ActionData-->(at+AD_NOUN_KOV);
- second_kova = ActionData-->(at+AD_SECOND_KOV);
-
- !print "at = ", at, " nst = ", noun_kova, "^";
- !print "consult_from = ", consult_from, " consult_words = ", consult_from, "^";
- !print "inp1 = ", inp1, " noun = ", noun, "^";
- !print "inp2 = ", inp2, " second = ", second, "^";
- !print "sst = ", second_kova, "^";
-
- if (noun_kova == SNIPPET_TY or UNDERSTANDING_TY) {
- if (inp1 ~= 1) { inp2 = inp1; second = noun; }
- parsed_number = 100*consult_from + consult_words;
- inp1 = 1; noun = nothing; ! noun = parsed_number;
- }
- if (second_kova == SNIPPET_TY or UNDERSTANDING_TY) {
- parsed_number = 100*consult_from + consult_words;
- inp2 = 1; second = nothing; ! second = parsed_number;
- }
-
- mask = ActionData-->(at+AD_REQUIREMENTS);
- if (mask & OUT_OF_WORLD_ABIT) { meta = 1; rfalse; }
- meta = 0;
-
- if (inp1 == 1) {
- if (noun_kova == OBJECT_TY) {
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('B'); new_line; }
- rtrue;
- }
- } else {
- if (noun_kova ~= OBJECT_TY) {
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('C'); new_line; }
- rtrue;
- }
- if ((mask & NEED_NOUN_ABIT) && (noun == nothing)) {
- @push act_requester; act_requester = nothing;
- CarryOutActivity(SUPPLYING_A_MISSING_NOUN_ACT);
- @pull act_requester;
- if (noun == nothing) {
- if (say__p) rtrue;
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('D'); new_line; }
- rtrue;
- }
- }
- if (((mask & NEED_NOUN_ABIT) == 0) && (noun ~= nothing)) {
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('E'); new_line; }
- rtrue;
- }
- }
-
- if (inp2 == 1) {
- if (second_kova == OBJECT_TY) {
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('F'); new_line; }
- rtrue;
- }
- } else {
- if (second_kova ~= OBJECT_TY) {
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('G'); new_line; }
- rtrue;
- }
- if ((mask & NEED_SECOND_ABIT) && (second == nothing)) {
- @push act_requester; act_requester = nothing;
- CarryOutActivity(SUPPLYING_A_MISSING_SECOND_ACT);
- @pull act_requester;
- if (second == nothing) {
- if (say__p) rtrue;
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('H'); new_line; }
- rtrue;
- }
- }
- if (((mask & NEED_SECOND_ABIT) == 0) && (second ~= nothing)) {
- if (actor == player) { ACTION_PROCESSING_INTERNAL_RM('I'); new_line; }
- rtrue;
- }
- }
-
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Basic Visibility Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BASIC_VISIBILITY_R;
- if (act_requester) rfalse;
- if ((NeedLightForAction()) &&
- (actor == player) &&
- (FollowRulebook(VISIBLE_RB)) &&
- (RulebookSucceeded())) {
- BeginActivity(REFUSAL_TO_ACT_IN_DARK_ACT);
- if (ForActivity(REFUSAL_TO_ACT_IN_DARK_ACT)==false) {
- BASIC_VISIBILITY_RM('A'); new_line;
- }
- EndActivity(REFUSAL_TO_ACT_IN_DARK_ACT);
- reason_the_action_failed = BASIC_VISIBILITY_R;
- RulebookFails();
- rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Basic Accessibility Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BASIC_ACCESSIBILITY_R mask at;
- if (act_requester) rfalse;
- at = FindAction(-1);
- if (at == 0) rfalse;
- mask = ActionData-->(at+AD_REQUIREMENTS);
-
- if ((mask & TOUCH_NOUN_ABIT) && noun && (inp1 ~= 1)) {
- if (noun ofclass K3_direction) {
- RulebookFails();
- reason_the_action_failed = BASIC_ACCESSIBILITY_R;
- if (actor~=player) rtrue;
- BASIC_ACCESSIBILITY_RM('A'); new_line;
- RulebookFails();
- reason_the_action_failed = BASIC_ACCESSIBILITY_R;
- rtrue;
- }
- if (ObjectIsUntouchable(noun, (actor~=player), actor)) {
- RulebookFails();
- reason_the_action_failed = BASIC_ACCESSIBILITY_R;
- rtrue;
- }
- }
-
- if ((mask & TOUCH_SECOND_ABIT) && second && (inp2 ~= 1)) {
- if (second ofclass K3_direction) {
- RulebookFails();
- reason_the_action_failed = BASIC_ACCESSIBILITY_R;
- if (actor~=player) rtrue;
- BASIC_ACCESSIBILITY_RM('A'); new_line;
- RulebookFails();
- reason_the_action_failed = BASIC_ACCESSIBILITY_R;
- rtrue;
- }
- if (ObjectIsUntouchable(second, (actor~=player), actor)) {
- RulebookFails();
- reason_the_action_failed = BASIC_ACCESSIBILITY_R;
- rtrue;
- }
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Carrying Requirements Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CARRYING_REQUIREMENTS_R mask at;
-
- at = FindAction(-1);
- if (at == 0) rfalse;
- mask = ActionData-->(at+AD_REQUIREMENTS);
-
- if ((mask & TOUCH_NOUN_ABIT) && noun && (inp1 ~= 1)) {
- if ((mask & CARRY_NOUN_ABIT) && (noun notin actor)) {
- CarryOutActivity(IMPLICITLY_TAKING_ACT, noun);
- if (noun notin actor) {
- RulebookFails();
- reason_the_action_failed = CARRYING_REQUIREMENTS_R;
- rtrue;
- }
- }
- }
-
- if ((mask & TOUCH_SECOND_ABIT) && second && (inp2 ~= 1)) {
- if ((mask & CARRY_SECOND_ABIT) && (second notin actor)) {
- CarryOutActivity(IMPLICITLY_TAKING_ACT, second);
- if (second notin actor) {
- RulebookFails();
- reason_the_action_failed = CARRYING_REQUIREMENTS_R;
- rtrue;
- }
- }
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Standard Implicit Taking Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STANDARD_IMPLICIT_TAKING_R;
- ImplicitTake(parameter_value);
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Requested Actions Require Persuasion Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ REQUESTED_ACTIONS_REQUIRE_R rv;
- if ((actor ~= player) && (act_requester)) {
- @push say__p;
- say__p = 0;
- rv = FollowRulebook(PERSUADE_RB);
- if (RulebookSucceeded() == false) {
- if ((deadflag == false) && (say__p == FALSE)) {
- REQUESTED_ACTIONS_REQUIRE_RM('A', actor);
- new_line;
- }
- ActRulebookFails(rv); rtrue;
- }
- @pull say__p;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Carry Out Requested Actions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CARRY_OUT_REQUESTED_ACTIONS_R rv;
- if ((actor ~= player) && (act_requester)) {
- @push act_requester; act_requester = nothing;
- rv = BeginAction(action, noun, second);
- if (((meta) || (rv == false)) && (deadflag == false)) {
- if (FollowRulebook(UNSUCCESSFUL_ATTEMPT_RB) == false) {
- CARRY_OUT_REQUESTED_ACTIONS_RM('A', actor); new_line;
- }
- }
- @pull act_requester;
- FollowRulebook(AFTER_RB);
- ActRulebookSucceeds();
- rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Generic Verb Subroutine
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array Details_of_Specific_Action-->5;
-
-[ GenericVerbSub ch co re vis rv;
- @push converted_action_outcome;
- converted_action_outcome = -1;
-
- Details_of_Specific_Action-->0 = true;
- if (meta) Details_of_Specific_Action-->0 = false;
- Details_of_Specific_Action-->1 = keep_silent;
- Details_of_Specific_Action-->2 = ch; ! Check rules for the action
- Details_of_Specific_Action-->3 = co; ! Carry out rules for the action
- Details_of_Specific_Action-->4 = re; ! Report rules for the action
-
- FollowRulebook(SPECIFIC_ACTION_PROCESSING_RB, 0, true);
- if ((RulebookFailed()) && (converted_action_outcome == 1)) ActRulebookSucceeds();
-
- @pull converted_action_outcome;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Work Out Details Of Specific Action Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WORK_OUT_DETAILS_OF_SPECIFIC_R;
- MStack-->MstVO(SPECIFIC_ACTION_PROCESSING_RB, 0) = Details_of_Specific_Action-->0;
- MStack-->MstVO(SPECIFIC_ACTION_PROCESSING_RB, 1) = Details_of_Specific_Action-->1;
- MStack-->MstVO(SPECIFIC_ACTION_PROCESSING_RB, 2) = Details_of_Specific_Action-->2;
- MStack-->MstVO(SPECIFIC_ACTION_PROCESSING_RB, 3) = Details_of_Specific_Action-->3;
- MStack-->MstVO(SPECIFIC_ACTION_PROCESSING_RB, 4) = Details_of_Specific_Action-->4;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Actions Bitmap
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestActionBitmap obj act i j k bitmap;
- if (obj == nothing) bitmap = ActionHappened;
- else {
- if (~~(obj provides action_bitmap)) rfalse;
- bitmap = obj.&action_bitmap;
- }
- if (act == -1) return (((bitmap->0) & 1) ~= 0);
- for (i=0, k=2: ii) {
- return (((bitmap->j) & k) ~= 0);
- }
- k = k*2; if (k == 256) { k = 1; j++; }
- }
- rfalse;
-];
-
-[ UpdateActionBitmap;
- SetActionBitmap(noun, action);
- if (action == ##Go) SetActionBitmap(location, ##Enter);
-];
-
-[ SetActionBitmap obj act i j k bitmap;
- for (i=0, k=2: ii) {
- if (obj provides action_bitmap) {
- bitmap = obj.&action_bitmap;
- bitmap->0 = (bitmap->0) | 1;
- bitmap->j = (bitmap->j) | k;
- }
- ActionHappened->0 = (ActionHappened->0) | 1;
- ActionHappened->j = (ActionHappened->j) | k;
- }
- k = k*2; if (k == 256) { k = 1; j++; }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Actions.i6t: Printing Actions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SayActionName act; DB_Action(0, 0, act, 0, 0, 2); ];
-
-[ DA_Name n; if (n ofclass K3_direction) print (name) n; else print (the) n; ];
-[ DA_Topic x a b c d i cf cw;
- cw = x%100; cf = x/100;
- print "~";
- for (a=cf:di;
- }
- if (d 0))
- print "(", debug_rule_nesting, ") ";
- if ((ac ~= player) && (for_say ~= 2)) {
- if (acr) print "asking ", (the) ac, " to try ";
- else print (the) ac, " ";
- }
- DB_Action_Details(act, n, s, for_say);
- if ((keep_silent) && (for_say == 0)) print " - silently";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: The Activities Stack
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant MAX_NESTED_ACTIVITIES = 20;
-Global activities_sp = 0;
-Array activities_stack --> MAX_NESTED_ACTIVITIES;
-Array activity_parameters_stack --> MAX_NESTED_ACTIVITIES;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: Rule Debugging Inhibition
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global inhibit_flag = 0;
-Global saved_debug_rules = 0;
-[ FixInhibitFlag n act inhibit_rule_debugging;
- for (n=0:nn;
- if (act == PRINTING_THE_NAME_ACT or PRINTING_THE_PLURAL_NAME_ACT or
- PRINTING_ROOM_DESC_DETAILS_ACT or PRINTING_INVENTORY_DETAILS_ACT or
- LISTING_CONTENTS_ACT or GROUPING_TOGETHER_ACT or PRINTING_RESPONSE_ACT)
- inhibit_rule_debugging = true;
- }
- if ((inhibit_flag == false) && (inhibit_rule_debugging)) {
- saved_debug_rules = debug_rules;
- debug_rules = 0;
- }
- if ((inhibit_flag) && (inhibit_rule_debugging == false)) {
- debug_rules = saved_debug_rules;
- }
- inhibit_flag = inhibit_rule_debugging;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: Testing Activities
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestActivity A desc val i;
- for (i=0:ii == A) {
- if (desc) {
- if ((desc)(activity_parameters_stack-->i)) rtrue;
- } else if (val) {
- if (val == activity_parameters_stack-->i) rtrue;
- } else rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: Emptiness
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ActivityEmpty A x;
- x = Activity_before_rulebooks-->A;
- if (rulebooks_array-->x ~= EMPTY_RULEBOOK) rfalse;
- x = Activity_for_rulebooks-->A;
- if (rulebooks_array-->x ~= EMPTY_RULEBOOK) rfalse;
- x = Activity_after_rulebooks-->A;
- if (rulebooks_array-->x ~= EMPTY_RULEBOOK) rfalse;
- rtrue;
-];
-
-[ RulebookEmpty rb;
- if (rulebooks_array-->rb ~= EMPTY_RULEBOOK) rfalse;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: Process Activity Rulebook
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ProcessActivityRulebook rulebook parameter rv;
- @push self;
- if (parameter) self = parameter;
- rv = FollowRulebook(rulebook, parameter, true);
- @pull self;
- if (rv) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: Carrying Out Activities
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CarryOutActivity A o rv;
- BeginActivity(A, o);
- rv = ForActivity(A, o);
- EndActivity(A, o);
- return rv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: Begin
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BeginActivity A o x;
- if (activities_sp == MAX_NESTED_ACTIVITIES) return RunTimeProblem(RTP_TOOMANYACTS);
- activity_parameters_stack-->activities_sp = o;
- activities_stack-->(activities_sp++) = A;
- FixInhibitFlag();
- MStack_CreateAVVars(A);
- if (Activity_atb_rulebooks->A) { x = action; action = action_to_be; }
- o = ProcessActivityRulebook(Activity_before_rulebooks-->A, o);
- if (Activity_atb_rulebooks->A) action = x;
- return o;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: For
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ForActivity A o x;
- if (Activity_atb_rulebooks->A) { x = action; action = action_to_be; }
- o = ProcessActivityRulebook(Activity_for_rulebooks-->A, o);
- if (Activity_atb_rulebooks->A) action = x;
- return o;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: End
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ EndActivity A o rv x;
- if ((activities_sp > 0) && (activities_stack-->(activities_sp-1) == A)) {
- if (Activity_atb_rulebooks->A) { x = action; action = action_to_be; }
- rv = ProcessActivityRulebook(Activity_after_rulebooks-->A, o);
- if (Activity_atb_rulebooks->A) action = x;
- activities_sp--; FixInhibitFlag();
- MStack_DestroyAVVars(A);
- return rv;
- }
- return RunTimeProblem(RTP_CANTABANDON);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Activities.i6t: Abandon
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ AbandonActivity A o;
- if ((activities_sp > 0) && (activities_stack-->(activities_sp-1) == A)) {
- activities_sp--; FixInhibitFlag();
- MStack_DestroyAVVars(A);
- return;
- }
- return RunTimeProblem(RTP_CANTEND);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Figures.i6t: Resource Usage
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array ResourceUsageFlags ->
- (1+0+5);
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Figures.i6t: Figures
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DisplayFigure resource_ID one_time;
- if ((one_time) && (ResourceUsageFlags->resource_ID)) return;
- ResourceUsageFlags->resource_ID = true;
- print "^"; VM_Picture(resource_ID); print "^";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Figures.i6t: Sound Effects
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PlaySound resource_ID one_time;
- if (resource_ID == 0) return; ! The "silence" non-sound effect
- if ((one_time) && (ResourceUsageFlags->resource_ID)) return;
- ResourceUsageFlags->resource_ID = true;
- VM_SoundEffect(resource_ID);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Language
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF PLUGIN_FILES;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Structure
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant AUXF_MAGIC = 0; ! First word holds a safety constant
-Constant AUXF_MAGIC_VALUE = 16339; ! Should be first word of any valid file structure
-Constant AUXF_STATUS = 1; ! One of the following:
- Constant AUXF_STATUS_IS_CLOSED = 1; ! Currently closed, or perhaps doesn't exist
- Constant AUXF_STATUS_IS_OPEN_FOR_READ = 2;
- Constant AUXF_STATUS_IS_OPEN_FOR_WRITE = 3;
- Constant AUXF_STATUS_IS_OPEN_FOR_APPEND = 4;
-Constant AUXF_BINARY = 2; ! False for text files (I7 default), true for binary
-Constant AUXF_STREAM = 3; ! Stream for an open file (meaningless otherwise)
-Constant AUXF_FILENAME = 4; ! Packed address of constant string
-Constant AUXF_IFID_OF_OWNER = 5; ! UUID_ARRAY if owned by this project, or
- ! string array of IFID of owner wrapped in //...//, or NULL to leave open
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Instances
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant NO_EXTERNAL_FILES 0;
-Array TableOfExternalFiles --> 0 0;
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Errors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_Error extf err_text struc;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES)) {
- print "^*** Error on unknown file: ", (string) err_text, " ***^";
- } else {
- struc = TableOfExternalFiles-->extf;
- print "^*** Error on file '",
- (string) struc-->AUXF_FILENAME, "': ",
- (string) err_text, " ***^";
- }
- RunTimeProblem(RTP_FILEIOERROR);
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Glulx Material
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF TARGET_GLULX;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Existence
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_Exists extf fref struc rv usage;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES)) rfalse;
- struc = TableOfExternalFiles-->extf;
- if ((struc == 0) || (struc-->AUXF_MAGIC ~= AUXF_MAGIC_VALUE)) rfalse;
- if (struc-->AUXF_BINARY) usage = fileusage_BinaryMode;
- else usage = fileusage_TextMode;
- fref = glk_fileref_create_by_name(fileusage_Data + usage,
- Glulx_ChangeAnyToCString(struc-->AUXF_FILENAME), 0);
- rv = glk_fileref_does_file_exist(fref);
- glk_fileref_destroy(fref);
- return rv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Readiness
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_Ready extf struc fref usage str ch;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES)) rfalse;
- struc = TableOfExternalFiles-->extf;
- if ((struc == 0) || (struc-->AUXF_MAGIC ~= AUXF_MAGIC_VALUE)) rfalse;
- if (struc-->AUXF_BINARY) usage = fileusage_BinaryMode;
- else usage = fileusage_TextMode;
- fref = glk_fileref_create_by_name(fileusage_Data + usage,
- Glulx_ChangeAnyToCString(struc-->AUXF_FILENAME), 0);
- if (glk_fileref_does_file_exist(fref) == false) {
- glk_fileref_destroy(fref);
- rfalse;
- }
- str = glk_stream_open_file(fref, filemode_Read, 0);
- ch = glk_get_char_stream(str);
- glk_stream_close(str, 0);
- glk_fileref_destroy(fref);
- if (ch ~= '*') rfalse;
- rtrue;
-];
-
-[ FileIO_MarkReady extf readiness struc fref str ch usage;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to open a non-file");
- struc = TableOfExternalFiles-->extf;
- if ((struc == 0) || (struc-->AUXF_MAGIC ~= AUXF_MAGIC_VALUE)) rfalse;
- if (struc-->AUXF_BINARY) usage = fileusage_BinaryMode;
- else usage = fileusage_TextMode;
- fref = glk_fileref_create_by_name(fileusage_Data + usage,
- Glulx_ChangeAnyToCString(struc-->AUXF_FILENAME), 0);
- if (glk_fileref_does_file_exist(fref) == false) {
- glk_fileref_destroy(fref);
- return FileIO_Error(extf, "only existing files can be marked");
- }
- if (struc-->AUXF_STATUS ~= AUXF_STATUS_IS_CLOSED) {
- glk_fileref_destroy(fref);
- return FileIO_Error(extf, "only closed files can be marked");
- }
- str = glk_stream_open_file(fref, filemode_ReadWrite, 0);
- glk_stream_set_position(str, 0, 0); ! seek start
- if (readiness) ch = '*'; else ch = '-';
- glk_put_char_stream(str, ch); ! mark as complete
- glk_stream_close(str, 0);
- glk_fileref_destroy(fref);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Open File
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_Open extf write_flag append_flag
- struc fref str mode ix ch not_this_ifid owner force_header usage;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to open a non-file");
- struc = TableOfExternalFiles-->extf;
- if ((struc == 0) || (struc-->AUXF_MAGIC ~= AUXF_MAGIC_VALUE)) rfalse;
- if (struc-->AUXF_STATUS ~= AUXF_STATUS_IS_CLOSED)
- return FileIO_Error(extf, "tried to open a file already open");
- if (struc-->AUXF_BINARY) usage = fileusage_BinaryMode;
- else usage = fileusage_TextMode;
- fref = glk_fileref_create_by_name(fileusage_Data + usage,
- Glulx_ChangeAnyToCString(struc-->AUXF_FILENAME), 0);
- if (write_flag) {
- if (append_flag) {
- mode = filemode_WriteAppend;
- if (glk_fileref_does_file_exist(fref) == false)
- force_header = true;
- }
- else mode = filemode_Write;
- } else {
- mode = filemode_Read;
- if (glk_fileref_does_file_exist(fref) == false) {
- glk_fileref_destroy(fref);
- return FileIO_Error(extf, "tried to open a file which does not exist");
- }
- }
- str = glk_stream_open_file(fref, mode, 0);
- glk_fileref_destroy(fref);
- if (str == 0) return FileIO_Error(extf, "tried to open a file but failed");
- struc-->AUXF_STREAM = str;
- if (write_flag) {
- if (append_flag)
- struc-->AUXF_STATUS = AUXF_STATUS_IS_OPEN_FOR_APPEND;
- else
- struc-->AUXF_STATUS = AUXF_STATUS_IS_OPEN_FOR_WRITE;
- glk_stream_set_current(str);
- if ((append_flag == FALSE) || (force_header)) {
- print "- ";
- for (ix=6: ix <= UUID_ARRAY->0: ix++) print (char) UUID_ARRAY->ix;
- print " ", (string) struc-->AUXF_FILENAME, "^";
- }
- } else {
- struc-->AUXF_STATUS = AUXF_STATUS_IS_OPEN_FOR_READ;
- ch = FileIO_GetC(extf);
- if (ch ~= '-' or '*') { jump BadFile; }
- if (ch == '-')
- return FileIO_Error(extf, "tried to open a file which was incomplete");
- ch = FileIO_GetC(extf);
- if (ch ~= ' ') { jump BadFile; }
- ch = FileIO_GetC(extf);
- if (ch ~= '/') { jump BadFile; }
- ch = FileIO_GetC(extf);
- if (ch ~= '/') { jump BadFile; }
- owner = struc-->AUXF_IFID_OF_OWNER;
- ix = 3;
- if (owner == UUID_ARRAY) ix = 8;
- if (owner ~= NULL) {
- for (: ix <= owner->0: ix++) {
- ch = FileIO_GetC(extf);
- if (ch == -1) { jump BadFile; }
- if (ch ~= owner->ix) not_this_ifid = true;
- if (ch == ' ') break;
- }
- if (not_this_ifid == false) {
- ch = FileIO_GetC(extf);
- if (ch ~= ' ') { jump BadFile; }
- }
- }
- while (ch ~= -1) {
- ch = FileIO_GetC(extf);
- if (ch == 10 or 13) break;
- }
- if (not_this_ifid) {
- struc-->AUXF_STATUS = AUXF_STATUS_IS_CLOSED;
- glk_stream_close(str, 0);
- return FileIO_Error(extf,
- "tried to open a file owned by another project");
- }
- }
- return struc-->AUXF_STREAM;
- .BadFile;
- struc-->AUXF_STATUS = AUXF_STATUS_IS_CLOSED;
- glk_stream_close(str, 0);
- return FileIO_Error(extf, "tried to open a file which seems to be malformed");
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Close File
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_Close extf struc;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to open a non-file");
- struc = TableOfExternalFiles-->extf;
- if (struc-->AUXF_STATUS ~=
- AUXF_STATUS_IS_OPEN_FOR_READ or
- AUXF_STATUS_IS_OPEN_FOR_WRITE or
- AUXF_STATUS_IS_OPEN_FOR_APPEND)
- return FileIO_Error(extf, "tried to close a file which is not open");
- if (struc-->AUXF_STATUS ==
- AUXF_STATUS_IS_OPEN_FOR_WRITE or
- AUXF_STATUS_IS_OPEN_FOR_APPEND) {
- glk_stream_set_position(struc-->AUXF_STREAM, 0, 0); ! seek start
- glk_put_char_stream(struc-->AUXF_STREAM, '*'); ! mark as complete
- }
- glk_stream_close(struc-->AUXF_STREAM, 0);
- struc-->AUXF_STATUS = AUXF_STATUS_IS_CLOSED;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Get Character
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_GetC extf struc;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES)) return -1;
- struc = TableOfExternalFiles-->extf;
- if (struc-->AUXF_STATUS ~= AUXF_STATUS_IS_OPEN_FOR_READ) return -1;
- return glk_get_char_stream(struc-->AUXF_STREAM);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Put Character
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_PutC extf char struc;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES)) return -1;
- return FileIO_Error(extf, "tried to write to a non-file");
- struc = TableOfExternalFiles-->extf;
- if (struc-->AUXF_STATUS ~=
- AUXF_STATUS_IS_OPEN_FOR_WRITE or
- AUXF_STATUS_IS_OPEN_FOR_APPEND)
- return FileIO_Error(extf,
- "tried to write to a file which is not open for writing");
- return glk_put_char_stream(struc-->AUXF_STREAM, char);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Print Line
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_PrintLine extf ch struc;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to write to a non-file");
- struc = TableOfExternalFiles-->extf;
- for (::) {
- ch = FileIO_GetC(extf);
- if (ch == -1) rfalse;
- if (ch == 10 or 13) { print "^"; rtrue; }
- print (char) ch;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Print Contents
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_PrintContents extf tab struc;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to access a non-file");
- struc = TableOfExternalFiles-->extf;
- if (struc-->AUXF_BINARY)
- return FileIO_Error(extf, "printing text will not work with binary files");
- if (FileIO_Open(extf, false) == 0) rfalse;
- while (FileIO_PrintLine(extf)) ;
- FileIO_Close(extf);
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Print Text
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_PutContents extf text append_flag struc str ch oldstream;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to access a non-file");
- struc = TableOfExternalFiles-->extf;
- if (struc-->AUXF_BINARY)
- return FileIO_Error(extf, "writing text will not work with binary files");
- oldstream = glk_stream_get_current();
- str = FileIO_Open(extf, true, append_flag);
- if (str == 0) rfalse;
- @push say__p; @push say__pc;
- ClearParagraphing(19);
- TEXT_TY_Say(text);
- FileIO_Close(extf);
- if (oldstream) glk_stream_set_current(oldstream);
- @pull say__pc; @pull say__p;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Serialising Tables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FileIO_PutTable extf tab rv struc oldstream;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to write table to a non-file");
- struc = TableOfExternalFiles-->extf;
- if (struc-->AUXF_BINARY)
- return FileIO_Error(extf, "writing a table will not work with binary files");
- oldstream = glk_stream_get_current();
- if (FileIO_Open(extf, true) == 0) rfalse;
- rv = TablePrint(tab);
- FileIO_Close(extf);
- if (oldstream) glk_stream_set_current(oldstream);
- if (rv) return RunTimeProblem(RTP_TABLE_CANTSAVE, tab);
- rtrue;
-];
-
-[ FileIO_GetTable extf tab struc;
- if ((extf < 1) || (extf > NO_EXTERNAL_FILES))
- return FileIO_Error(extf, "tried to read table from a non-file");
- struc = TableOfExternalFiles-->extf;
- if (struc-->AUXF_BINARY)
- return FileIO_Error(extf, "reading a table will not work with binary files");
- if (FileIO_Open(extf, false) == 0) rfalse;
- TableRead(tab, extf);
- FileIO_Close(extf);
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Z-Machine Stubs
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFNOT; ! TARGET_GLULX
-[ FileIO_Exists extf; rfalse; ];
-[ FileIO_Ready extf; rfalse; ];
-[ FileIO_GetC extf; return -1; ];
-[ FileIO_PutTable extf tab;
- return FileIO_Error(extf, "external files can only be used under Glulx");
-];
-[ FileIO_MarkReady extf status; FileIO_PutTable(extf); ];
-[ FileIO_GetTable extf tab; FileIO_PutTable(extf); ];
-[ FileIO_PrintContents extf; FileIO_PutTable(extf); ];
-[ FileIO_PutContents extf; FileIO_PutTable(extf); ];
-#ENDIF; ! TARGET_GLULX
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! FileIO.i6t: Back To Core
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFNOT; ! PLUGIN_FILES
-[ FileIO_GetC extf; return -1; ];
-#ENDIF; ! PLUGIN_FILES
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: The Memory Stack
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant MAX_MSTACK_FRAME = 2 + 6;
-Constant MSTACK_CAPACITY = 20;
-Constant MSTACK_SIZE = MSTACK_CAPACITY*MAX_MSTACK_FRAME;
-
-Array MStack --> MSTACK_SIZE;
-Global MStack_Top = 0; ! Topmost word currently used
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Create Frame
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Mstack_Create_Frame creator id extent;
- if (creator == 0) rfalse;
- extent = creator.call(MStack_Top+2, 1);
- if (extent == 0) rfalse;
- if (MStack_Top + MAX_MSTACK_FRAME >= MSTACK_SIZE + 2) {
- RunTimeProblem(RTP_MSTACKMEMORY, MSTACK_SIZE);
- Mstack_Backtrace();
- rfalse;
- }
- MStack_Top++;
- MStack-->MStack_Top = id;
- MStack_Top++;
- MStack_Top = MStack_Top + extent;
- MStack-->MStack_Top = -(extent+2);
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Destroy Frame
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Mstack_Destroy_Frame creator id pos;
- pos = Mstack_Seek_Frame(id);
- if (pos == 0) rfalse; ! Not found: do nothing
- MStack_Top = pos - 2; ! Clear mstack down to just below this frame
- if (creator) creator.call(pos, -1);
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Seek Frame
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global MStack_Frame_Extent = 0;
-
-[ Mstack_Seek_Frame id pos;
- pos = MStack_Top;
- while ((pos > 0) && (MStack-->pos ~= 0)) {
- MStack_Frame_Extent = MStack-->pos;
- pos = pos + MStack_Frame_Extent;
- MStack_Frame_Extent = (-2) - MStack_Frame_Extent;
- if (MStack-->(pos+1) == id) return pos+2;
- }
- MStack_Frame_Extent = 0;
- return 0; ! Not found
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Backtrace
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Mstack_Backtrace pos k;
- print "Mstack backtrace: size ", MStack_Top+1, " words^";
- pos = MStack_Top;
- while (MStack-->pos ~= 0) {
- MStack_Frame_Extent = MStack-->pos;
- pos = pos + MStack_Frame_Extent;
- MStack_Frame_Extent = (-2) - MStack_Frame_Extent;
- print "Block at ", pos+2,
- " owner ID ", MStack-->(pos+1), " size ", MStack_Frame_Extent, "^";
- for (k=0: k(pos+2+k), " ";
- print "^";
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Access to Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MstVO id off pos;
- pos = Mstack_Seek_Frame(id);
- if (pos == 0) {
- print "Variable unavailable for this action, activity or rulebook: ",
- "internal ID number ",
- id, "/", off, "^";
- rfalse;
- }
- if ((off<0) || (off >= MStack_Frame_Extent)) {
- print "Variable stack offset wrong: ", id, "/", off, " at ", pos, "^";
- rfalse;
- }
- return pos+off;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Access to Nonexistent Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MstVON id off pos;
- pos = Mstack_Seek_Frame(id);
- if (pos == 0) {
- return 0; ! word position 0 on the M-stack
- }
- if ((off<0) || (off >= MStack_Frame_Extent)) {
- print "Variable stack offset wrong: ", id, "/", off, " at ", pos, "^";
- rfalse;
- }
- return pos+off;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Rulebook Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFNDEF MEMORY_ECONOMY;
-Array rulebook_var_creators --> 0 0 0 0 0 0 0 0 0 RBSTVC_9 0 RBSTVC_11 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
-#endif;
-[ RBSTVC_9
- pos ! Implied call parameter
- state ! Implied call parameter
- ;
- if (state == 1) {
- MStack-->pos = selfobj; pos++;
- } else {
- pos++;
- }
- return 1;
-];
-[ RBSTVC_11
- pos ! Implied call parameter
- state ! Implied call parameter
- ;
- if (state == 1) {
- MStack-->pos = false; pos++;
- MStack-->pos = false; pos++;
- MStack-->pos = 0; pos++;
- MStack-->pos = 0; pos++;
- MStack-->pos = 0; pos++;
- MStack-->pos = false; pos++;
- } else {
- pos++;
- pos++;
- pos++;
- pos++;
- pos++;
- pos++;
- }
- return 6;
-];
-
-
-[ MStack_CreateRBVars rb cr;
-#ifdef MEMORY_ECONOMY;
-switch (rb) {
-9: cr = RBSTVC_9;
-11: cr = RBSTVC_11;
-}
-#IFNOT;
-cr = rulebook_var_creators-->rb;
-#endif;
-
- if (cr == 0) return;
- Mstack_Create_Frame(cr, rb);
-];
-
-[ MStack_DestroyRBVars rb cr;
-#ifdef MEMORY_ECONOMY;
-switch (rb) {
-9: cr = RBSTVC_9;
-11: cr = RBSTVC_11;
-}
-#IFNOT;
-cr = rulebook_var_creators-->rb;
-#endif;
-
- if (cr == 0) return;
- Mstack_Destroy_Frame(cr, rb);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! MStack.i6t: Activity Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array activity_var_creators --> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
-
-
-[ MStack_CreateAVVars av cr;
- cr = activity_var_creators-->av;
- if (cr == 0) return;
- Mstack_Create_Frame(cr, av + 10000);
-];
-
-[ MStack_DestroyAVVars av cr;
- cr = activity_var_creators-->av;
- if (cr == 0) return;
- Mstack_Destroy_Frame(cr, av + 10000);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Perform Undo
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Perform_Undo;
- #ifdef PREVENT_UNDO; IMMEDIATELY_UNDO_RM('A'); new_line; return; #endif;
- if (IterationsOfTurnSequence == 0) { IMMEDIATELY_UNDO_RM('B'); new_line; return; }
- if (undo_flag == 0) { IMMEDIATELY_UNDO_RM('C'); new_line; return; }
- if (undo_flag == 1) { IMMEDIATELY_UNDO_RM('D'); new_line; return; }
- if (VM_Undo() == 0) { IMMEDIATELY_UNDO_RM('F'); new_line; }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Announce Score Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ANNOUNCE_SCORE_R;
- if (actor ~= player) rfalse;
- #Iftrue USE_SCORING == 0; ANNOUNCE_SCORE_RM('C'); new_line;
- #ifnot; ANNOUNCE_SCORE_RM('A'); PrintRank();
- #endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Switch Score Notification On Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SWITCH_SCORE_NOTIFY_ON_R;
- if (actor ~= player) rfalse;
- #Iftrue USE_SCORING == 0; ANNOUNCE_SCORE_R();
- #ifnot; notify_mode=1; #endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Standard Report Switching Score Notification On Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ REP_SWITCH_NOTIFY_ON_R;
- if (actor ~= player) rfalse;
- #Iftrue USE_SCORING ~= 0; REP_SWITCH_NOTIFY_ON_RM('A'); new_line; #endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Switch Score Notification Off Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SWITCH_SCORE_NOTIFY_OFF_R;
- if (actor ~= player) rfalse;
- #Iftrue USE_SCORING == 0; ANNOUNCE_SCORE_R();
- #ifnot; notify_mode=0; #endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Standard Report Switching Score Notification Off Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ REP_SWITCH_NOTIFY_OFF_R;
- if (actor ~= player) rfalse;
- #Iftrue USE_SCORING ~= 0; REP_SWITCH_NOTIFY_OFF_RM('A'); new_line; #endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Prefer Sometimes Abbreviated Room Descriptions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PREFER_SOMETIMES_ABBREVIATED_R;
- if (actor ~= player) rfalse;
- lookmode=1;
-]; ! Brief
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Standard Report Prefer Sometimes Abbreviated Room Descriptions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ REP_PREFER_SOMETIMES_ABBR_R;
- if (actor ~= player) rfalse;
- print (TEXT_TY_Say) Story; REP_PREFER_SOMETIMES_ABBR_RM('A'); new_line;
-]; ! Brief
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Prefer Unabbreviated Room Descriptions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PREFER_UNABBREVIATED_R;
- if (actor ~= player) rfalse;
- lookmode=2;
-]; ! Verbose
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Standard Report Prefer Unabbreviated Room Descriptions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ REP_PREFER_UNABBREVIATED_R;
- if (actor ~= player) rfalse;
- print (TEXT_TY_Say) Story; REP_PREFER_UNABBREVIATED_RM('A'); new_line;
-]; ! Verbose
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Prefer Abbreviated Room Descriptions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PREFER_ABBREVIATED_R;
- if (actor ~= player) rfalse;
- lookmode=3;
-]; ! Superbrief
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Standard Report Prefer Abbreviated Room Descriptions Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ REP_PREFER_ABBREVIATED_R;
- if (actor ~= player) rfalse;
- print (TEXT_TY_Say) Story; REP_PREFER_ABBREVIATED_RM('A'); new_line;
-]; ! Superbrief
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! OutOfWorld.i6t: Announce Pronoun Meanings Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ANNOUNCE_PRONOUN_MEANINGS_R x y c d;
- if (actor ~= player) rfalse;
- ANNOUNCE_PRONOUN_MEANINGS_RM('A');
-
- c = (LanguagePronouns-->0)/3;
- if (player ~= selfobj) c++;
-
- if (c==0) { ANNOUNCE_PRONOUN_MEANINGS_RM('D'); rtrue; }
-
- for (x = 1, d = 0 : x <= LanguagePronouns-->0: x = x+3) {
- print "~", (address) LanguagePronouns-->x, "~ ";
- y = LanguagePronouns-->(x+2);
- if (y == NULL) ANNOUNCE_PRONOUN_MEANINGS_RM('C');
- else { ANNOUNCE_PRONOUN_MEANINGS_RM('B'); print (the) y; }
- d++;
- if (d < c-1) print ", ";
- if (d == c-1) {
- #ifdef SERIAL_COMMA; print ","; #endif;
- LIST_WRITER_INTERNAL_RM('C');
- }
- }
- if (player ~= selfobj) {
- print "~", (address) ME1__WD, "~ "; ANNOUNCE_PRONOUN_MEANINGS_RM('B');
- c = player; player = selfobj;
- print (the) c; player = c;
- }
- ".";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Paragraph Control
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: State
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-!Constant TRACE_I7_SPACING;
-
-[ ClearParagraphing r;
- say__p = 0; say__pc = 0;
-];
-
-[ DivideParagraphPoint;
- #ifdef TRACE_I7_SPACING; print "[DPP", say__p, say__pc, "]"; #endif;
- if (say__p) {
- new_line; say__p = 0; say__pc = say__pc | PARA_COMPLETED;
- say__pc_save = true;
- if (say__pc & PARA_PROMPTSKIP) say__pc = say__pc - PARA_PROMPTSKIP;
- if (say__pc & PARA_SUPPRESSPROMPTSKIP) say__pc = say__pc - PARA_SUPPRESSPROMPTSKIP;
- }
- #ifdef TRACE_I7_SPACING; print "[-->", say__p, say__pc, "]"; #endif;
- say__pc = say__pc | PARA_CONTENTEXPECTED;
- say__pc_save = (say__pc & PARA_COMPLETED);
-];
-
-[ AdjustParagraphPoint;
- #ifdef TRACE_I7_SPACING; print "[APP ", say__p, " ", say__pc, " ", say__pc_save, "]^"; #endif;
- if (say__pc_save) say__pc = (say__pc | PARA_COMPLETED);
-];
-
-[ ParaContent;
- if (say__pc & PARA_CONTENTEXPECTED) {
- say__pc = say__pc - PARA_CONTENTEXPECTED;
- say__p = 1;
- }
-];
-
-[ GoingLookBreak;
- if (say__pc & PARA_COMPLETED == 0) new_line;
- ClearParagraphing(10);
-];
-
-[ CommandClarificationBreak;
- new_line;
- ClearParagraphing(11);
-];
-
-[ RunParagraphOn;
- #ifdef TRACE_I7_SPACING; print "[RPO", say__p, say__pc, "]"; #endif;
- say__p = 0;
- say__pc = say__pc | PARA_PROMPTSKIP;
- say__pc = say__pc | PARA_SUPPRESSPROMPTSKIP;
-];
-
-[ SpecialLookSpacingBreak;
- #ifdef TRACE_I7_SPACING; print "[SLS", say__p, say__pc, "]"; #endif;
- say__p = 0;
- say__pc = say__pc | PARA_PROMPTSKIP;
-];
-
-[ EnsureBreakBeforePrompt;
- if ((say__p) ||
- ((say__pc & PARA_PROMPTSKIP) && ((say__pc & PARA_SUPPRESSPROMPTSKIP)==0)))
- new_line;
- ClearParagraphing(12);
-];
-
-[ PrintSingleParagraph matter;
- say__p = 1;
- say__pc = say__pc | PARA_NORULEBOOKBREAKS;
- TEXT_TY_Say(matter);
- DivideParagraphPoint(13);
- say__pc = 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Say Number
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STextSubstitution;
- if (say__n ~= 1) print "s";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Prompt
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintPrompt i;
- RunTimeProblemShow();
- ClearRTP();
- style roman;
- EnsureBreakBeforePrompt();
- TEXT_TY_Say( (Global_Vars-->1) );
- ClearBoxedText();
- ClearParagraphing(14);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Boxed Quotations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global pending_boxed_quotation; ! a routine to overlay the quotation on screen
-
-[ DisplayBoxedQuotation Q;
- pending_boxed_quotation = Q;
-];
-
-[ ClearBoxedText i;
- if (pending_boxed_quotation) {
- for (i=0: Runtime_Quotations_Displayed-->i: i++)
- if (Runtime_Quotations_Displayed-->i == pending_boxed_quotation) {
- pending_boxed_quotation = 0;
- return;
- }
- Runtime_Quotations_Displayed-->i = pending_boxed_quotation;
-
- ClearParagraphing(15);
- pending_boxed_quotation();
- ClearParagraphing(16);
-
- pending_boxed_quotation = 0;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Score Notification
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NotifyTheScore d;
-#Iftrue USE_SCORING ~= 0;
- if (notify_mode == 1) {
- DivideParagraphPoint();
- VM_Style(NOTE_VMSTY);
- d = score-last_score;
- if (d > 0) { ANNOUNCE_SCORE_RM('D', d); }
- else if (d < 0) { ANNOUNCE_SCORE_RM('E', -d); }
- new_line;
- VM_Style(NORMAL_VMSTY);
- }
-#Endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Status Line
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef TARGET_ZCODE;
-#Iftrue (#version_number == 6);
-[ DrawStatusLine; Z6_DrawStatusLine(); ];
-#Endif;
-#Endif;
-
-#Ifndef DrawStatusLine;
-[ DrawStatusLine width posb;
- @push say__p; @push say__pc;
- BeginActivity(CONSTRUCTING_STATUS_LINE_ACT);
- VM_StatusLineHeight(1); VM_MoveCursorInStatusLine(1, 1);
- if (statuswin_current) {
- width = VM_ScreenWidth(); posb = width-15;
- spaces width;
- ClearParagraphing(17);
- if (ForActivity(CONSTRUCTING_STATUS_LINE_ACT) == false) {
- VM_MoveCursorInStatusLine(1, 2);
- TEXT_TY_Say(left_hand_status_line);
- VM_MoveCursorInStatusLine(1, posb);
- TEXT_TY_Say(right_hand_status_line);
- }
- VM_MoveCursorInStatusLine(1, 1); VM_MainWindow();
- }
- ClearParagraphing(18);
- EndActivity(CONSTRUCTING_STATUS_LINE_ACT);
- @pull say__pc; @pull say__p;
-];
-#Endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Status Line Utilities
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array T_SL_Score_Moves --> CONSTANT_PACKED_TEXT_STORAGE SL_Score_Moves;
-
-[ SL_Score_Moves;
- if (not_yet_in_play) return;
- #Iftrue USE_SCORING > 0; print sline1, "/", sline2; #endif;
-];
-
-Array T_SL_Location --> CONSTANT_PACKED_TEXT_STORAGE SL_Location;
-
-[ SL_Location even_before;
- if ((not_yet_in_play) && (even_before == false)) return;
- if (location == thedark) {
- BeginActivity(PRINTING_NAME_OF_DARK_ROOM_ACT);
- if (ForActivity(PRINTING_NAME_OF_DARK_ROOM_ACT) == false)
- DARKNESS_NAME_INTERNAL_RM('A');
- EndActivity(PRINTING_NAME_OF_DARK_ROOM_ACT);
- } else {
- FindVisibilityLevels();
- if (visibility_ceiling == location) print (name) location;
- else print (The) visibility_ceiling;
- }
-];
-
-[ DARKNESS_NAME_INTERNAL_R; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Banner
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Banner;
- BeginActivity(PRINTING_BANNER_TEXT_ACT);
- if (ForActivity(PRINTING_BANNER_TEXT_ACT) == false) {
- VM_Style(HEADER_VMSTY);
- TEXT_TY_Say(Story);
- VM_Style(NORMAL_VMSTY);
- new_line;
- TEXT_TY_Say(Headline);
- #ifdef Story_Author;
- print " by "; TEXT_TY_Say(Story_Author);
- #endif; ! Story_Author
- new_line;
- VM_Describe_Release();
- print " / Inform 7 build ", (PrintI6Text) NI_BUILD_COUNT, " ";
- print "(I6/v"; inversion;
- print " lib ", (PrintI6Text) LibRelease, ") ";
- #Ifdef STRICT_MODE;
- print "S";
- #Endif; ! STRICT_MODE
- #Ifdef DEBUG;
- print "D";
- #Endif; ! DEBUG
- new_line;
- }
- EndActivity(PRINTING_BANNER_TEXT_ACT);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Print Decimal Number
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DecimalNumber num; print num; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Print English Number
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ EnglishNumber n; LanguageNumber(n); ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Print Text
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintI6Text x;
- if (x ofclass String) print (string) x;
- if (x ofclass Routine) return (x)();
- if (x == EMPTY_TEXT_PACKED) rfalse;
- rtrue;
-];
-[ I7_String x; TEXT_TY_Say(x); ]; ! An alternative name now used only by extensions
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Print Or Run
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintOrRun obj prop no_break pv st routine_return_value;
- @push self; self = obj;
- if (prop == 0) {
- print (name) prop; routine_return_value = true;
- } else {
- routine_return_value = TEXT_TY_Say(obj.prop);
- }
- @pull self;
- if (routine_return_value) {
- say__p = 1;
- if (no_break == false) {
- new_line;
- DivideParagraphPoint();
- }
- }
-
- return routine_return_value;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Short Name Storage
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array StorageForShortName buffer 250;
-
-[ CPrintOrRun obj prop v length i;
- if ((obj ofclass String or Routine) || (prop == 0))
- VM_PrintToBuffer (StorageForShortName, 160, obj);
- else {
- if (obj.prop == NULL) rfalse;
- if (metaclass(obj.prop) == Routine or String)
- VM_PrintToBuffer(StorageForShortName, 160, obj, prop);
- else return RunTimeError(2, obj, prop);
- }
-
- length = StorageForShortName-->0;
-
- StorageForShortName->WORDSIZE = VM_LowerToUpperCase(StorageForShortName->WORDSIZE);
- for (i=WORDSIZE: ii;
- if (i>WORDSIZE) say__p = 1;
-
- return;
-];
-
-[ Cap str nocaps;
- if (nocaps) print (string) str;
- else CPrintOrRun(str, 0);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Object Names I
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PSN__ o;
- if (o == 0) { LIST_WRITER_INTERNAL_RM('Y'); rtrue; }
- switch (metaclass(o)) {
- Routine: print ""; rtrue;
- String: print ""; rtrue;
- nothing: print ""; rtrue;
- }
- RegardingSingleObject(o);
- CarryOutActivity(PRINTING_THE_NAME_ACT, o);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Standard Name Printing Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global caps_mode = false;
-
-[ STANDARD_NAME_PRINTING_R obj;
- obj = parameter_value;
- if (obj == 0) {
- LIST_WRITER_INTERNAL_RM('Y'); return;
- }
- switch (metaclass(obj)) {
- Routine: print ""; return;
- String: print ""; return;
- nothing: print ""; return;
- }
- if (obj == player) {
- if (indef_mode == NULL && caps_mode) PRINT_PROTAGONIST_INTERNAL_RM('A');
- else PRINT_PROTAGONIST_INTERNAL_RM('B');
- return;
- }
- #Ifdef LanguagePrintShortName;
- if (LanguagePrintShortName(obj)) return;
- #Endif; ! LanguagePrintShortName
- if (indef_mode && obj.&short_name_indef ~= 0 &&
- PrintOrRun(obj, short_name_indef, true) ~= 0) return;
- if (caps_mode &&
- obj.&cap_short_name ~= 0 && PrintOrRun(obj, cap_short_name, true) ~= 0) {
- caps_mode = false;
- return;
- }
- if (obj.&short_name ~= 0 && PrintOrRun(obj, short_name, true) ~= 0) return;
- print (object) obj;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Internal Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PRINT_PROTAGONIST_INTERNAL_R; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Object Names II
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global short_name_case;
-
-[ PrefaceByArticle obj acode pluralise capitalise i artform findout artval;
- if (obj provides articles) {
- artval=(obj.&articles)-->(acode+short_name_case*LanguageCases);
- if (capitalise)
- print (Cap) artval, " ";
- else
- print (string) artval, " ";
- if (pluralise) return;
- print (PSN__) obj; return;
- }
-
- i = GetGNAOfObject(obj);
- if (pluralise) {
- if (i < 3 || (i >= 6 && i < 9)) i = i + 3;
- }
- i = LanguageGNAsToArticles-->i;
-
- artform = LanguageArticles
- + 3*WORDSIZE*LanguageContractionForms*(short_name_case + i*LanguageCases);
-
- #Iftrue (LanguageContractionForms == 2);
- if (artform-->acode ~= artform-->(acode+3)) findout = true;
- #Endif; ! LanguageContractionForms
- #Iftrue (LanguageContractionForms == 3);
- if (artform-->acode ~= artform-->(acode+3)) findout = true;
- if (artform-->(acode+3) ~= artform-->(acode+6)) findout = true;
- #Endif; ! LanguageContractionForms
- #Iftrue (LanguageContractionForms == 4);
- if (artform-->acode ~= artform-->(acode+3)) findout = true;
- if (artform-->(acode+3) ~= artform-->(acode+6)) findout = true;
- if (artform-->(acode+6) ~= artform-->(acode+9)) findout = true;
- #Endif; ! LanguageContractionForms
- #Iftrue (LanguageContractionForms > 4);
- findout = true;
- #Endif; ! LanguageContractionForms
-
- #Ifdef TARGET_ZCODE;
- if (standard_interpreter ~= 0 && findout) {
- StorageForShortName-->0 = 160;
- @output_stream 3 StorageForShortName;
- if (pluralise) print (number) pluralise; else print (PSN__) obj;
- @output_stream -3;
- acode = acode + 3*LanguageContraction(StorageForShortName + 2);
- }
- #Ifnot; ! TARGET_GLULX
- if (findout) {
- if (pluralise)
- Glulx_PrintAnyToArray(StorageForShortName, 160, EnglishNumber, pluralise);
- else
- Glulx_PrintAnyToArray(StorageForShortName, 160, PSN__, obj);
- acode = acode + 3*LanguageContraction(StorageForShortName);
- }
- #Endif; ! TARGET_
-
- Cap (artform-->acode, ~~capitalise); ! print article
- if (pluralise) return;
- print (PSN__) obj;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Object Names III
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IndefArt obj i;
- if (obj == 0) { LIST_WRITER_INTERNAL_RM('Y'); rtrue; }
- i = indef_mode; indef_mode = true;
- if (obj has proper) { indef_mode = NULL; print (PSN__) obj; indef_mode = i; return; }
- if ((obj provides article) && (TEXT_TY_Compare(obj.article, EMPTY_TEXT_VALUE) ~= 0)) {
- PrintOrRun(obj, article, true); print " ", (PSN__) obj; indef_mode = i;
- return;
- }
- PrefaceByArticle(obj, 2); indef_mode = i;
-];
-
-[ CIndefArt obj i;
- if (obj == 0) { LIST_WRITER_INTERNAL_RM('X'); rtrue; }
- i = indef_mode; indef_mode = true;
- if (obj has proper) {
- indef_mode = NULL;
- caps_mode = true;
- print (PSN__) obj;
- indef_mode = i;
- caps_mode = false;
- return;
- }
- if ((obj provides article) && (TEXT_TY_Compare(obj.article, EMPTY_TEXT_VALUE) ~= 0)) {
- TEXT_TY_Say_Capitalised(obj.article); print " ", (PSN__) obj; indef_mode = i;
- return;
- }
- PrefaceByArticle(obj, 2, 0, 1); indef_mode = i;
-];
-
-[ DefArt obj i;
- i = indef_mode; indef_mode = false;
- if ((~~obj ofclass Object) || obj has proper) {
- indef_mode = NULL; print (PSN__) obj; indef_mode = i;
- return;
- }
- PrefaceByArticle(obj, 1); indef_mode = i;
-];
-
-[ CDefArt obj i;
- i = indef_mode; indef_mode = false;
- if ((obj ofclass Object) && (obj has proper || obj == player)) {
- indef_mode = NULL;
- caps_mode = true;
- print (PSN__) obj;
- indef_mode = i;
- caps_mode = false;
- return;
- }
- if ((~~obj ofclass Object) || obj has proper) {
- indef_mode = NULL; print (PSN__) obj; indef_mode = i;
- return;
- }
- PrefaceByArticle(obj, 0); indef_mode = i;
-];
-
-[ PrintShortName obj i;
- i = indef_mode; indef_mode = NULL;
- PSN__(obj); indef_mode = i;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Printing.i6t: Say One Of
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ I7_SOO_PAR oldval count; if (count <= 1) return count; return random(count); ];
-[ I7_SOO_RAN oldval count v; if (count <= 1) return count;
- v = oldval; while (v == oldval) v = random(count); return v; ];
-[ I7_SOO_STI oldval count v; if (oldval) return oldval; return I7_SOO_PAR(oldval, count); ];
-[ I7_SOO_CYC oldval count; oldval++; if (oldval > count) oldval = 1; return oldval; ];
-[ I7_SOO_STOP oldval count; oldval++; if (oldval > count) oldval = count; return oldval; ];
-[ I7_SOO_TAP oldval count tn rn c; if (count <= 1) return count; tn = count*(count+1)/2;
- rn = random(tn); for (c=1:c<=count:c++) { rn = rn - c; if (rn<=0) return (count-c+1); } ];
-[ I7_SOO_TRAN oldval count; if (oldval32;
-
-[ I7_SOO_SHU oldval count sd ct v i j s ssd scope cc base;
- base = count+1;
- v = oldval%base; oldval = oldval/base; ct = oldval%base; sd = oldval/base;
- if (count > 32) return I7_SOO_PAR(oldval, count);
- if (count <= 1) v = count;
- else {
- !print "^In v=", v, " ct=", ct, " sd=", sd, "^";
- cc = base*base;
- scope = (MAX_POSITIVE_NUMBER-1)/cc;
- !print "Scope = ", scope, "^";
- if (sd == 0) { sd = random(scope); ct=0; }
- for (i=0:ii = i;
- ssd = sd;
- for (i=0:ij; I7_SOO_SHUF->j = I7_SOO_SHUF->i; I7_SOO_SHUF->i = s;
- }
- !for (i=0:ii, " "; print "^";
- v = (I7_SOO_SHUF->ct)+1;
- ct++; if (ct >= count) { ct = 0; ssd = 0; }
- }
- !print "Out v=", v, " ct=", ct, " ssd=", sd, "^";
- !print "Return ", v + ct*base + ssd*base*base, "^";
- return v + ct*base + ssd*base*base;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Relation Records
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RR_NAME 5;
-Constant RR_PERMISSIONS 6;
-Constant RR_STORAGE 7;
-Constant RR_KIND 8;
-Constant RR_HANDLER 9;
-Constant RR_DESCRIPTION 10;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Valency Adjectives
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant VALENCY_MASK = RELS_EQUIVALENCE+RELS_SYMMETRIC+RELS_X_UNIQUE+RELS_Y_UNIQUE;
-[ RELATION_TY_EquivalenceAdjective rel set perms state handler;
- perms = RlnGetF(rel, RR_PERMISSIONS);
- if (perms & RELS_EQUIVALENCE) state = true;
- if (set < 0) return state;
- if ((set) && (state == false)) {
- perms = perms + RELS_EQUIVALENCE;
- if (perms & RELS_SYMMETRIC == 0) perms = perms + RELS_SYMMETRIC;
- }
- if ((set == false) && (state)) {
- perms = perms - RELS_EQUIVALENCE;
- if (perms & RELS_SYMMETRIC) perms = perms - RELS_SYMMETRIC;
- }
- RlnSetF(rel, RR_PERMISSIONS, perms);
- handler = RlnGetF(rel, RR_HANDLER);
- if (handler(rel, RELS_SET_VALENCY, perms & VALENCY_MASK) == 0)
- "*** Can't change this to an equivalence relation ***";
-];
-
-[ RELATION_TY_SymmetricAdjective rel set perms state handler;
- perms = RlnGetF(rel, RR_PERMISSIONS);
- if (perms & RELS_SYMMETRIC) state = true;
- if (set < 0) return state;
- if ((set) && (state == false)) perms = perms + RELS_SYMMETRIC;
- if ((set == false) && (state)) perms = perms - RELS_SYMMETRIC;
- RlnSetF(rel, RR_PERMISSIONS, perms);
- handler = RlnGetF(rel, RR_HANDLER);
- if (handler(rel, RELS_SET_VALENCY, perms & VALENCY_MASK) == 0)
- "*** Can't change this to a symmetric relation ***";
-];
-
-[ RELATION_TY_OToOAdjective rel set perms state handler i;
- perms = RlnGetF(rel, RR_PERMISSIONS);
- if (perms & (RELS_X_UNIQUE+RELS_Y_UNIQUE) == RELS_X_UNIQUE+RELS_Y_UNIQUE) state = true;
- if (set < 0) return state;
- if ((set) && (state == false)) {
- if (perms & RELS_X_UNIQUE == 0) perms = perms + RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE == 0) perms = perms + RELS_Y_UNIQUE;
- if (perms & RELS_EQUIVALENCE) perms = perms - RELS_EQUIVALENCE;
- }
- if ((set == false) && (state)) {
- if (perms & RELS_X_UNIQUE) perms = perms - RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE) perms = perms - RELS_Y_UNIQUE;
- }
- RlnSetF(rel, RR_PERMISSIONS, perms);
- handler = RlnGetF(rel, RR_HANDLER);
- if (handler(rel, RELS_SET_VALENCY, perms & VALENCY_MASK) == 0)
- "*** Can't change this to a one-to-one relation ***";
-];
-
-[ RELATION_TY_OToVAdjective rel set perms state handler;
- perms = RlnGetF(rel, RR_PERMISSIONS);
- if (perms & (RELS_X_UNIQUE+RELS_Y_UNIQUE) == RELS_X_UNIQUE) state = true;
- if (set < 0) return state;
- if ((set) && (state == false)) {
- if (perms & RELS_X_UNIQUE == 0) perms = perms + RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE) perms = perms - RELS_Y_UNIQUE;
- if (perms & RELS_SYMMETRIC) perms = perms - RELS_SYMMETRIC;
- if (perms & RELS_EQUIVALENCE) perms = perms - RELS_EQUIVALENCE;
- }
- if ((set == false) && (state)) {
- if (perms & RELS_X_UNIQUE) perms = perms - RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE) perms = perms - RELS_Y_UNIQUE;
- }
- RlnSetF(rel, RR_PERMISSIONS, perms);
- handler = RlnGetF(rel, RR_HANDLER);
- if (handler(rel, RELS_SET_VALENCY, perms & VALENCY_MASK) == 0)
- "*** Can't change this to a one-to-various relation ***";
-];
-
-[ RELATION_TY_VToOAdjective rel set perms state handler;
- perms = RlnGetF(rel, RR_PERMISSIONS);
- if (perms & (RELS_X_UNIQUE+RELS_Y_UNIQUE) == RELS_Y_UNIQUE) state = true;
- if (set < 0) return state;
- if ((set) && (state == false)) {
- if (perms & RELS_X_UNIQUE) perms = perms - RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE == 0) perms = perms + RELS_Y_UNIQUE;
- if (perms & RELS_SYMMETRIC) perms = perms - RELS_SYMMETRIC;
- if (perms & RELS_EQUIVALENCE) perms = perms - RELS_EQUIVALENCE;
- }
- if ((set == false) && (state)) {
- if (perms & RELS_X_UNIQUE) perms = perms - RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE) perms = perms - RELS_Y_UNIQUE;
- }
- RlnSetF(rel, RR_PERMISSIONS, perms);
- handler = RlnGetF(rel, RR_HANDLER);
- if (handler(rel, RELS_SET_VALENCY, perms & VALENCY_MASK) == 0)
- "*** Can't change this to a various-to-one relation ***";
-];
-
-[ RELATION_TY_VToVAdjective rel set perms state handler;
- perms = RlnGetF(rel, RR_PERMISSIONS);
- if (perms & (RELS_X_UNIQUE+RELS_Y_UNIQUE) == 0) state = true;
- if (set < 0) return state;
- if ((set) && (state == false)) {
- if (perms & RELS_X_UNIQUE) perms = perms - RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE) perms = perms - RELS_Y_UNIQUE;
- }
- if ((set == false) && (state)) {
- if (perms & RELS_X_UNIQUE == 0) perms = perms + RELS_X_UNIQUE;
- if (perms & RELS_Y_UNIQUE == 0) perms = perms + RELS_Y_UNIQUE;
- }
- RlnSetF(rel, RR_PERMISSIONS, perms);
- handler = RlnGetF(rel, RR_HANDLER);
- if (handler(rel, RELS_SET_VALENCY, perms & VALENCY_MASK) == 0)
- "*** Can't change this to a various-to-various relation ***";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: One To One Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Relation_Now1to1 obj1 relation_property obj2 ol; ! Assert 1-1 true
- if (obj2) objectloop (ol provides relation_property)
- if (ol.relation_property == obj2) ol.relation_property = nothing;
- if (obj1) obj1.relation_property = obj2;
-];
-
-[ Relation_NowN1toV obj1 relation_property obj2; ! Assert 1-1 false
- if ((obj1) && (obj1.relation_property == obj2)) obj1.relation_property = nothing;
-];
-
-[ Relation_Now1to1V obj1 obj2 KOV relation_property ol N; ! Assert 1-1 true
- if (obj2) {
- N = KOVDomainSize(KOV);
- for (ol=1: ol<=N: ol++)
- if (GProperty(KOV, ol, relation_property) == obj2)
- WriteGProperty(KOV, ol, relation_property, 0);
- }
- if (obj1) WriteGProperty(KOV, obj1, relation_property, obj2);
-];
-
-[ Relation_NowN1toVV obj1 obj2 KOV relation_property; ! Assert 1-1 false
- if ((obj1) && (GProperty(KOV, obj1, relation_property) == obj2))
- WriteGProperty(KOV, obj1, relation_property, 0);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Symmetric One To One Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Relation_NowS1to1 obj1 relation_property obj2; ! Assert symmetric 1-1 true
- if ((obj1 ofclass Object) && (obj1 provides relation_property) &&
- (obj2 ofclass Object) && (obj2 provides relation_property)) {
- if (obj1.relation_property) { (obj1.relation_property).relation_property = 0; }
- if (obj2.relation_property) { (obj2.relation_property).relation_property = 0; }
- obj1.relation_property = obj2; obj2.relation_property = obj1;
- }
-];
-
-[ Relation_NowSN1to1 obj1 relation_property obj2; ! Assert symmetric 1-1 false
- if ((obj1 ofclass Object) && (obj1 provides relation_property) &&
- (obj2 ofclass Object) && (obj2 provides relation_property) &&
- (obj1.relation_property == obj2)) {
- obj1.relation_property = 0; obj2.relation_property = 0;
- }
-];
-
-[ Relation_NowS1to1V obj1 obj2 KOV relation_property; ! Assert symmetric 1-1 true
- if (GProperty(KOV, obj1, relation_property))
- WriteGProperty(KOV, GProperty(KOV, obj1, relation_property), relation_property, 0);
- if (GProperty(KOV, obj2, relation_property))
- WriteGProperty(KOV, GProperty(KOV, obj2, relation_property), relation_property, 0);
- WriteGProperty(KOV, obj1, relation_property, obj2);
- WriteGProperty(KOV, obj2, relation_property, obj1);
-];
-
-[ Relation_NowSN1to1V obj1 obj2 KOV relation_property; ! Assert symmetric 1-1 false
- if (GProperty(KOV, obj1, relation_property) == obj2) {
- WriteGProperty(KOV, obj1, relation_property, 0);
- WriteGProperty(KOV, obj2, relation_property, 0);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Various To Various Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant VTOVS_LEFT_INDEX_PROP = 0;
-Constant VTOVS_RIGHT_INDEX_PROP = 1;
-Constant VTOVS_LEFT_DOMAIN_SIZE = 2;
-Constant VTOVS_RIGHT_DOMAIN_SIZE = 3;
-Constant VTOVS_LEFT_PRINTING_ROUTINE = 4;
-Constant VTOVS_RIGHT_PRINTING_ROUTINE = 5;
-Constant VTOVS_CACHE_BROKEN = 6;
-Constant VTOVS_CACHE = 7;
-
-[ Relation_NowVtoV obj1 relation obj2 sym pr pr2 i1 i2 vtov_structure;
- if (sym && (obj2 ~= obj1)) { Relation_NowVtoV(obj2, relation, obj1, false); }
- vtov_structure = RlnGetF(relation, RR_STORAGE);
- pr = vtov_structure-->VTOVS_LEFT_INDEX_PROP;
- pr2 = vtov_structure-->VTOVS_RIGHT_INDEX_PROP;
- vtov_structure-->VTOVS_CACHE_BROKEN = true; ! Mark any cache as broken
- if (pr) {
- if ((obj1 ofclass Object) && (obj1 provides pr)) i1 = obj1.pr;
- else return RunTimeProblem(RTP_IMPREL, obj1, relation);
- } else i1 = obj1-1;
- if (pr2) {
- if ((obj2 ofclass Object) && (obj2 provides pr2)) i2 = obj2.pr2;
- else return RunTimeProblem(RTP_IMPREL, obj2, relation);
- } else i2 = obj2-1;
- pr = i1*(vtov_structure-->VTOVS_RIGHT_DOMAIN_SIZE) + i2;
- i1 = IncreasingPowersOfTwo_TB-->(pr%16);
- pr = pr/16 + 8;
- vtov_structure-->pr = (vtov_structure-->pr) | i1;
-];
-
-[ Relation_NowNVtoV obj1 relation obj2 sym pr pr2 i1 i2 vtov_structure;
- if (sym && (obj2 ~= obj1)) { Relation_NowNVtoV(obj2, relation, obj1, false); }
- vtov_structure = RlnGetF(relation, RR_STORAGE);
- pr = vtov_structure-->VTOVS_LEFT_INDEX_PROP;
- pr2 = vtov_structure-->VTOVS_RIGHT_INDEX_PROP;
- vtov_structure-->VTOVS_CACHE_BROKEN = true; ! Mark any cache as broken
- if (pr) {
- if ((obj1 ofclass Object) && (obj1 provides pr)) i1 = obj1.pr;
- else return RunTimeProblem(RTP_IMPREL, obj1, relation);
- } else i1 = obj1-1;
- if (pr2) {
- if ((obj2 ofclass Object) && (obj2 provides pr2)) i2 = obj2.pr2;
- else return RunTimeProblem(RTP_IMPREL, obj2, relation);
- } else i2 = obj2-1;
- pr = i1*(vtov_structure-->VTOVS_RIGHT_DOMAIN_SIZE) + i2;
- i1 = IncreasingPowersOfTwo_TB-->(pr%16);
- pr = pr/16 + 8;
- if ((vtov_structure-->pr) & i1) vtov_structure-->pr = vtov_structure-->pr - i1;
-];
-
-[ Relation_TestVtoV obj1 relation obj2 sym pr pr2 i1 i2 vtov_structure;
- vtov_structure = RlnGetF(relation, RR_STORAGE);
- pr = vtov_structure-->VTOVS_LEFT_INDEX_PROP;
- pr2 = vtov_structure-->VTOVS_RIGHT_INDEX_PROP;
- if (sym && (obj2 > obj1)) { sym = obj1; obj1 = obj2; obj2 = sym; }
- if (pr) {
- if ((obj1 ofclass Object) && (obj1 provides pr)) i1 = obj1.pr;
- else { RunTimeProblem(RTP_IMPREL, obj1, relation); rfalse; }
- } else i1 = obj1-1;
- if (pr2) {
- if ((obj2 ofclass Object) && (obj2 provides pr2)) i2 = obj2.pr2;
- else { RunTimeProblem(RTP_IMPREL, obj2, relation); rfalse; }
- } else i2 = obj2-1;
- pr = i1*(vtov_structure-->VTOVS_RIGHT_DOMAIN_SIZE) + i2;
- i1 = IncreasingPowersOfTwo_TB-->(pr%16);
- pr = pr/16 + 8;
- if ((vtov_structure-->pr) & i1) rtrue; rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Equivalence Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Relation_NowEquiv obj1 relation_property obj2 big little;
- big = obj1.relation_property; little = obj2.relation_property;
- if (big == little) return;
- if (big < little) { little = obj1.relation_property; big = obj2.relation_property; }
- objectloop (obj1 provides relation_property)
- if (obj1.relation_property == big) obj1.relation_property = little;
-];
-
-[ Relation_NowNEquiv obj1 relation_property obj2 old new;
- old = obj1.relation_property; new = obj2.relation_property;
- if (old ~= new) return;
- new = 0;
- objectloop (obj2 provides relation_property)
- if (obj2.relation_property > new) new = obj2.relation_property;
- new++;
- obj1.relation_property = new;
-];
-
-[ Relation_NowEquivV obj1 obj2 KOV relation_property n big little i;
- big = GProperty(KOV, obj1, relation_property);
- little = GProperty(KOV, obj2, relation_property);
- if (big == little) return;
- if (big < little) {
- little = GProperty(KOV, obj1, relation_property);
- big = GProperty(KOV, obj2, relation_property);
- }
- n = KOVDomainSize(KOV);
- for (i=1: i<=n: i++)
- if (GProperty(KOV, i, relation_property) == big)
- WriteGProperty(KOV, i, relation_property, little);
-];
-
-[ Relation_NowNEquivV obj1 obj2 KOV relation_property n old new i;
- old = GProperty(KOV, obj1, relation_property);
- new = GProperty(KOV, obj2, relation_property);
- if (old ~= new) return;
- new = 0;
- n = KOVDomainSize(KOV);
- for (i=1: i<=n: i++)
- if (GProperty(KOV, i, relation_property) > new)
- new = GProperty(KOV, i, relation_property);
- new++;
- WriteGProperty(KOV, obj1, relation_property, new);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Show Various to Various
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Relation_ShowVtoV relation sym x obj1 obj2 pr pr2 proutine1 proutine2 vtov_structure;
- vtov_structure = RlnGetF(relation, RR_STORAGE);
- pr = vtov_structure-->VTOVS_LEFT_INDEX_PROP;
- pr2 = vtov_structure-->VTOVS_RIGHT_INDEX_PROP;
- proutine1 = vtov_structure-->VTOVS_LEFT_PRINTING_ROUTINE;
- proutine2 = vtov_structure-->VTOVS_RIGHT_PRINTING_ROUTINE;
-
- if (pr && pr2) {
- objectloop (obj1 provides pr)
- objectloop (obj2 provides pr2) {
- if (sym && obj2 > obj1) continue;
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ", (The) obj1;
- if (sym) print " <=> "; else print " >=> ";
- print (the) obj2, "^";
- }
- }
- return;
- }
- if (pr && (pr2==0)) {
- objectloop (obj1 provides pr)
- for (obj2=1:obj2<=vtov_structure-->VTOVS_RIGHT_DOMAIN_SIZE:obj2++) {
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ", (The) obj1, " >=> ";
- (proutine2).call(obj2);
- print "^";
- }
- }
- return;
- }
- if ((pr==0) && (pr2)) {
- for (obj1=1:obj1<=vtov_structure-->2:obj1++)
- objectloop (obj2 provides pr2) {
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ";
- (proutine1).call(obj1);
- print " >=> ", (the) obj2, "^";
- }
- }
- return;
- }
- for (obj1=1:obj1<=vtov_structure-->2:obj1++)
- for (obj2=1:obj2<=vtov_structure-->VTOVS_RIGHT_DOMAIN_SIZE:obj2++)
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ";
- (proutine1).call(obj1);
- print " >=> ";
- (proutine2).call(obj2);
- print "^";
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Show One to One
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Relation_ShowOtoO relation sym x relation_property t N obj1 obj2;
- relation_property = RlnGetF(relation, RR_STORAGE);
- t = KindBaseTerm(RlnGetF(relation, RR_KIND), 0); ! Kind of left term
- N = KOVDomainSize(t);
- if (t == OBJECT_TY) {
- objectloop (obj1 provides relation_property) {
- obj2 = obj1.relation_property;
- if (sym && obj2 < obj1) continue;
- if (obj2 == 0) continue;
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ", (The) obj1;
- if (sym) print " == "; else print " >=> ";
- print (the) obj2, "^";
- }
- } else {
- for (obj1=1: obj1<=N: obj1++) {
- obj2 = GProperty(t, obj1, relation_property);
- if (sym && obj2 < obj1) continue;
- if (obj2 == 0) continue;
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ";
- PrintKindValuePair(t, obj1);
- if (sym) print " == "; else print " >=> ";
- PrintKindValuePair(t, obj2);
- print "^";
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Show Reversed One to One
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Relation_RShowOtoO relation sym x relation_property obj1 obj2 t1 t2 N1 N2;
- relation_property = RlnGetF(relation, RR_STORAGE);
- t1 = KindBaseTerm(RlnGetF(relation, RR_KIND), 0); ! Kind of left term
- t2 = KindBaseTerm(RlnGetF(relation, RR_KIND), 1); ! Kind of right term
- if (t2 == OBJECT_TY) {
- if (t1 == OBJECT_TY) {
- objectloop (obj1) {
- objectloop (obj2 provides relation_property) {
- if (obj2.relation_property ~= obj1) continue;
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ", (The) obj1;
- print " >=> ";
- print (the) obj2, "^";
- }
- }
- } else {
- N1 = KOVDomainSize(t1);
- for (obj1=1: obj1<=N1: obj1++) {
- objectloop (obj2 provides relation_property) {
- if (obj2.relation_property ~= obj1) continue;
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " "; PrintKindValuePair(t1, obj1);
- print " >=> ";
- print (the) obj2, "^";
- }
- }
- }
- } else {
- N2 = KOVDomainSize(t2);
- if (t1 == OBJECT_TY) {
- objectloop (obj1) {
- for (obj2=1: obj2<=N2: obj2++) {
- if (GProperty(t2, obj2, relation_property) ~= obj1) continue;
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ", (The) obj1;
- print " >=> ";
- PrintKindValuePair(t2, obj2);
- print "^";
- }
- }
- } else {
- N1 = KOVDomainSize(t1);
- for (obj1=1: obj1<=N1: obj1++) {
- for (obj2=1: obj2<=N2: obj2++) {
- if (GProperty(t2, obj2, relation_property) ~= obj1) continue;
- if (x == 0) { print (string) RlnGetF(relation, RR_DESCRIPTION), ":^"; x=1; }
- print " ";
- PrintKindValuePair(t1, obj1);
- print " >=> ";
- PrintKindValuePair(t2, obj2);
- print "^";
- }
- }
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Show Equivalence
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RSE_Flip KOV v relation_property x;
- x = GProperty(KOV, v, relation_property); x = -x;
- WriteGProperty(KOV, v, relation_property, x);
-];
-[ RSE_Set KOV v relation_property;
- if (GProperty(KOV, v, relation_property) < 0) rtrue; rfalse;
-];
-[ Relation_ShowEquiv relation relation_property obj1 obj2 v c d somegroups t N x;
- print (string) RlnGetF(relation, RR_DESCRIPTION), ":^";
- relation_property = RlnGetF(relation, RR_STORAGE);
- t = KindBaseTerm(RlnGetF(relation, RR_KIND), 0); ! Kind of left term
- N = KOVDomainSize(t);
- if (t == OBJECT_TY) {
- objectloop (obj1 provides relation_property)
- obj1.relation_property = -(obj1.relation_property);
- objectloop (obj1 provides relation_property) {
- if (obj1.relation_property < 0) {
- v = obj1.relation_property; c = 0;
- objectloop (obj2 has workflag2) give obj2 ~workflag2;
- objectloop (obj2 provides relation_property) {
- if (obj2.relation_property == v) {
- give obj2 workflag2;
- obj2.relation_property = -v;
- c++;
- }
- }
- if (c>1) {
- somegroups = true;
- print " { ";
- WriteListOfMarkedObjects(ENGLISH_BIT);
- print " }^";
- } else obj1.relation_property = v;
- }
- }
- objectloop (obj2 has workflag2) give obj2 ~workflag2;
- c = 0; objectloop (obj1 provides relation_property)
- if (obj1.relation_property < 0) { c++; give obj1 workflag2; }
- if (c == 0) return;
- if (somegroups) print " and "; else print " ";
- if (c < 4) { WriteListOfMarkedObjects(ENGLISH_BIT); print " in"; }
- else print c;
- if (c == 1) print " a";
- print " single-member group";
- if (c > 1) print "s";
- print "^";
- objectloop (obj1 provides relation_property)
- if (obj1.relation_property < 0)
- obj1.relation_property = -(obj1.relation_property);
- } else {
- ! A slower method, since we have less efficient storage:
- for (obj1 = 1: obj1 <= N: obj1++)
- RSE_Flip(t, obj1, relation_property);
- for (obj1 = 1: obj1 <= N: obj1++) {
- if (RSE_Set(t, obj1, relation_property)) {
- v = GProperty(t, obj1, relation_property);
- c = 0;
- for (obj2 = 1: obj2 <= N: obj2++)
- if (GProperty(t, obj2, relation_property) == v)
- c++;
- if (c>1) {
- somegroups = true;
- print " {";
- d = 0;
- for (obj2 = 1: obj2 <= N: obj2++) {
- if (GProperty(t, obj2, relation_property) == v) {
- print " "; PrintKindValuePair(t, obj2);
- if (d < c-1) print ","; print " ";
- RSE_Flip(t, obj2, relation_property);
- d++;
- }
- }
- print "}^";
- } else WriteGProperty(t, obj1, relation_property, v);
- }
- }
- objectloop (obj2 has workflag2) give obj2 ~workflag2;
- c = 0;
- for (obj1 = 1: obj1 <= N: obj1++)
- if (RSE_Set(t, obj1, relation_property)) c++;
- if (c == 0) return;
- if (somegroups) print " and "; else print " ";
- if (c == 1) print "a"; else print c;
- print " single-member group";
- if (c > 1) print "s";
- print "^";
- for (obj1 = 1: obj1 <= N: obj1++)
- if (RSE_Set(t, obj1, relation_property))
- RSE_Flip(t, obj1, relation_property);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Relation Emptying
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ Relation_EmptyOtoO relation sym clear relation_property obj1 obj2 t1 t2 N1 N2;
- relation_property = RlnGetF(relation, RR_STORAGE);
- t1 = KindBaseTerm(RlnGetF(relation, RR_KIND), 0); ! Kind of left term
- t2 = KindBaseTerm(RlnGetF(relation, RR_KIND), 1); ! Kind of right term
- if (t2 == OBJECT_TY) {
- objectloop (obj2 provides relation_property) {
- obj1 = obj2.relation_property;
- if (obj1) {
- if (clear) obj2.relation_property = nothing;
- else rfalse;
- }
- }
- } else {
- for (obj2=1: obj2<=N2: obj2++) {
- obj1 = GProperty(t2, obj2, relation_property);
- if (obj1) {
- if (clear) WriteGProperty(t2, obj2, relation_property, 0);
- else rfalse;
- }
- }
- }
- if (t1 ~= t2) {
- if (t1 == OBJECT_TY) {
- objectloop (obj1 provides relation_property) {
- obj2 = obj1.relation_property;
- if (obj2) {
- if (clear) obj1.relation_property = nothing;
- else rfalse;
- }
- }
- } else {
- for (obj1=1: obj1<=N2: obj1++) {
- obj2 = GProperty(t1, obj1, relation_property);
- if (obj2) {
- if (clear) WriteGProperty(t1, obj1, relation_property, 0);
- else rfalse;
- }
- }
- }
- }
- rtrue;
-];
-[ Relation_EmptyEquiv relation sym clear
- relation_property obj1 obj2 t N v;
- relation_property = RlnGetF(relation, RR_STORAGE);
- t = KindBaseTerm(RlnGetF(relation, RR_KIND), 0); ! Kind of left term
- N = KOVDomainSize(t);
- if (clear) {
- v = 1;
- if (t == OBJECT_TY) {
- objectloop (obj1 provides relation_property)
- obj1.relation_property = v++;
- } else {
- for (obj1=1: obj1<=N: obj1++)
- WriteGProperty(t, obj1, relation_property, v++);
- }
- rtrue;
- }
- if (t == OBJECT_TY) {
- objectloop (obj1 provides relation_property)
- objectloop (obj2 provides relation_property)
- if ((obj1 < obj2) && (obj1.relation_property == obj2.relation_property))
- rfalse;
- } else {
- for (obj1=1: obj1<=N: obj1++)
- for (obj2=obj1+1: obj1<=N: obj1++)
- if (GProperty(t, obj1, relation_property) == GProperty(t, obj2, relation_property))
- rfalse;
- }
- rtrue;
-];
-[ Relation_EmptyVtoV relation sym clear vtov_structure obj1 obj2 pr pr2 proutine1 proutine2;
- vtov_structure = RlnGetF(relation, RR_STORAGE);
- pr = vtov_structure-->VTOVS_LEFT_INDEX_PROP;
- pr2 = vtov_structure-->VTOVS_RIGHT_INDEX_PROP;
- proutine1 = vtov_structure-->VTOVS_LEFT_PRINTING_ROUTINE;
- proutine2 = vtov_structure-->VTOVS_RIGHT_PRINTING_ROUTINE;
-
- if (pr && pr2) {
- objectloop (obj1 provides pr)
- objectloop (obj2 provides pr2) {
- if (sym && obj2 > obj1) continue;
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (clear) Relation_NowNVtoV(obj1, relation, obj2, sym);
- else rfalse;
- }
- }
- return;
- }
- if (pr && (pr2==0)) {
- objectloop (obj1 provides pr)
- for (obj2=1:obj2<=vtov_structure-->VTOVS_RIGHT_DOMAIN_SIZE:obj2++) {
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (clear) Relation_NowNVtoV(obj1, relation, obj2, sym);
- else rfalse;
- }
- }
- return;
- }
- if ((pr==0) && (pr2)) {
- for (obj1=1:obj1<=vtov_structure-->2:obj1++)
- objectloop (obj2 provides pr2) {
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (clear) Relation_NowNVtoV(obj1, relation, obj2, sym);
- else rfalse;
- }
- }
- return;
- }
- for (obj1=1:obj1<=vtov_structure-->2:obj1++)
- for (obj2=1:obj2<=vtov_structure-->VTOVS_RIGHT_DOMAIN_SIZE:obj2++)
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (Relation_TestVtoV(obj1, relation, obj2)) {
- if (clear) Relation_NowNVtoV(obj1, relation, obj2, sym);
- else rfalse;
- }
- }
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Map Route-Finding
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifndef FAST_ROUTE_FINDING;
-#ifndef SLOW_ROUTE_FINDING;
-#ifdef TARGET_GLULX;
-Constant FAST_ROUTE_FINDING;
-#ifnot;
-Constant SLOW_ROUTE_FINDING;
-#endif;
-#endif;
-#endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Cache Control
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant NUM_DOORS = 0;
-Constant NUM_ROOMS = 1;
-
-Array DoorRoutingViable -> NUM_DOORS+1;
-
-Global map_has_changed = true;
-Global last_filter; Global last_use_doors;
-
-[ SignalMapChange; map_has_changed = true; ];
-
-[ MapRouteTo from to filter use_doors count oy oyi ds;
- if (from == nothing) return nothing;
- if (to == nothing) return nothing;
- if (from == to) return nothing;
- if ((filter) && (filter(from) == 0)) return nothing;
- if ((filter) && (filter(to) == 0)) return nothing;
- if ((last_filter ~= filter) || (last_use_doors ~= use_doors)) map_has_changed = true;
- oyi = 0;
- objectloop (oy has mark_as_room) {
- if ((filter == 0) || (filter(oy))) {
- if (oy.room_index == -1) map_has_changed = true;
- oy.room_index = oyi++;
- } else {
- if (oy.room_index >= 0) map_has_changed = true;
- oy.room_index = -1;
- }
- }
- oyi = 0;
- objectloop (oy ofclass K4_door) {
- ds = false;
- if ((use_doors & 2) ||
- (oy has open) || ((oy has openable) && (oy hasnt locked))) ds = true;
- if (DoorRoutingViable->oyi ~= ds) map_has_changed = true;
- DoorRoutingViable->oyi = ds;
- oyi++;
- }
- if (map_has_changed) {
- #ifdef FAST_ROUTE_FINDING; ComputeFWMatrix(filter, use_doors); #endif;
- map_has_changed = false; last_filter = filter; last_use_doors = use_doors;
- }
- #ifdef FAST_ROUTE_FINDING;
- if (count) return FastCountRouteTo(from, to, filter, use_doors);
- return FastRouteTo(from, to, filter, use_doors);
- #ifnot;
- if (count) return SlowCountRouteTo(from, to, filter, use_doors);
- return SlowRouteTo(from, to, filter, use_doors);
- #endif;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Fast Route-Finding
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifdef FAST_ROUTE_FINDING;
-Array FWMatrix --> NUM_ROOMS*NUM_ROOMS;
-
-[ FastRouteTo from to filter use_doors diri i dir oy;
- if (from == to) return nothing;
- i = (FWMatrix-->(from.room_index*NUM_ROOMS + to.room_index))/No_Directions;
- if (i == 0) return nothing;
- diri = (FWMatrix-->(from.room_index*NUM_ROOMS + to.room_index))%No_Directions;
- i=0; objectloop (dir ofclass K3_direction) {
- if (i == diri) return dir;
- i++;
- }
- return nothing;
-];
-
-[ FastCountRouteTo from to filter use_doors k;
- if (from == to) return 0;
- k = (FWMatrix-->(from.room_index*NUM_ROOMS + to.room_index))/No_Directions;
- if (k == 0) return -1;
- return k;
-];
-
-[ ComputeFWMatrix filter use_doors oy ox oj axy ayj axj dir diri nd row;
- objectloop (oy has mark_as_room) if (oy.room_index >= 0)
- objectloop (ox has mark_as_room) if (ox.room_index >= 0)
- FWMatrix-->(oy.room_index*NUM_ROOMS + ox.room_index) = 0;
-
- objectloop (oy has mark_as_room) if (oy.room_index >= 0) {
- row = (oy.IK1_Count)*No_Directions;
- for (diri=0: diri(row+diri);
- if ((ox) && (ox has mark_as_room) && (ox.room_index >= 0)) {
- FWMatrix-->(oy.room_index*NUM_ROOMS + ox.room_index) = No_Directions + diri;
- continue;
- }
- if (use_doors && (ox ofclass K4_door) &&
- ((use_doors & 2) || (DoorRoutingViable->(ox.IK4_Count)))) {
- @push location; location = oy;
- ox = ox.door_to();
- @pull location;
- if ((ox) && (ox has mark_as_room) && (ox.room_index >= 0)) {
- FWMatrix-->(oy.room_index*NUM_ROOMS + ox.room_index) = No_Directions + diri;
- continue;
- }
- }
- }
- }
-
- objectloop (oy has mark_as_room) if (oy.room_index >= 0)
- objectloop (ox has mark_as_room) if (ox.room_index >= 0) {
- axy = (FWMatrix-->(ox.room_index*NUM_ROOMS + oy.room_index))/No_Directions;
- if (axy > 0)
- objectloop (oj has mark_as_room) if (oj.room_index >= 0) {
- ayj = (FWMatrix-->(oy.room_index*NUM_ROOMS + oj.room_index))/No_Directions;
- if (ayj > 0) {
- !print "Is it faster to go from ", (name) ox, " to ",
- ! (name) oj, " via ", (name) oy, "?^";
- axj = (FWMatrix-->(ox.room_index*NUM_ROOMS + oj.room_index))/
- No_Directions;
- if ((axj == 0) || (axy + ayj < axj)) {
- !print "Yes^";
- FWMatrix-->(ox.room_index*NUM_ROOMS + oj.room_index) =
- (axy + ayj)*No_Directions +
- (FWMatrix-->(ox.room_index*NUM_ROOMS + oy.room_index))%
- No_Directions;
- }
- }
- }
- }
-];
-#ENDIF;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Slow Route-Finding
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifndef FAST_ROUTE_FINDING;
-[ SlowRouteTo from to filter use_doors obj dir in_direction progressed sl through_door;
- if (from == nothing) return nothing;
- if (to == nothing) return nothing;
- if (from == to) return nothing;
- objectloop (obj has mark_as_room) obj.vector = 0;
- to.vector = 1;
- !print "Routing from ", (the) from, " to ", (the) to, "^";
- while (true) {
- progressed = false;
- !print "Pass begins^";
- objectloop (obj has mark_as_room)
- if ((filter == 0) || (filter(obj)))
- if (obj.vector == 0)
- objectloop (dir ofclass K3_direction) {
- in_direction = Map_Storage-->((obj.IK1_Count)*No_Directions + dir.IK3_Count);
- if (in_direction == nothing) continue;
- !print (the) obj, " > ", (the) dir, " > ", (the) in_direction, "^";
- if ((in_direction)
- && (in_direction has mark_as_room)
- && (in_direction.vector > 0)
- && ((filter == 0) || (filter(in_direction)))) {
- obj.vector = dir | WORD_HIGHBIT;
- !print "* ", (the) obj, " vector is ", (the) dir, "^";
- progressed = true;
- continue;
- }
- if (use_doors && (in_direction ofclass K4_door) &&
- ((use_doors & 2) ||
- (in_direction has open) ||
- ((in_direction has openable) && (in_direction hasnt locked)))) {
- sl = location; location = obj;
- through_door = in_direction.door_to();
- location = sl;
- !print "Through door is ", (the) through_door, "^";
- if ((through_door)
- && (through_door has mark_as_room)
- && (through_door.vector > 0)
- && ((filter == 0) || (filter(through_door)))) {
- obj.vector = dir | WORD_HIGHBIT;
- !print "* ", (the) obj, " vector is ", (the) dir, "^";
- progressed = true;
- continue;
- }
- }
- }
- objectloop (obj has mark_as_room) obj.vector = obj.vector &~ WORD_HIGHBIT;
- if (from.vector) return from.vector;
- if (progressed == false) return from.vector;
- }
-];
-
-[ SlowCountRouteTo from to filter use_doors obj i;
- if (from == nothing) return -1;
- if (to == nothing) return -1;
- if (from == to) return 0;
- if (from has mark_as_room && to has mark_as_room) {
- obj = MapRouteTo(from,to,filter,use_doors);
- if (obj == nothing) return -1;
- i = 0; obj = from;
- while ((obj ~= to) && (iVTOVS_CACHE)
- return FastVtoVRelRouteTo(relation, from, to, count);
- left_ix = vtov_structure-->VTOVS_LEFT_INDEX_PROP;
- pr2 = vtov_structure-->VTOVS_RIGHT_INDEX_PROP;
- objectloop (obj ofclass Object && obj provides vector) obj.vector = 0;
- to.vector = 1;
- while (true) {
- progressed = false;
- objectloop (obj ofclass Object && obj provides left_ix)
- if (obj.vector == 0) {
- objectloop (obj2 ofclass Object && obj2 provides pr2 && obj2.vector > 0) {
- if (Relation_TestVtoV(obj, relation, obj2)) {
- obj.vector = obj2 | WORD_HIGHBIT;
- progressed = true;
- continue;
- }
- }
- }
- objectloop (obj ofclass Object && obj provides left_ix)
- obj.vector = obj.vector &~ WORD_HIGHBIT;
- if (from.vector) break;
- if (progressed == false) break;
- }
- if (count) {
- if (from.vector == nothing) return -1;
- i = 0; obj = from;
- while ((obj ~= to) && (i<=MAX_ROUTE_LENGTH)) { i++; obj = obj.vector; }
- return i;
- }
- return from.vector;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Fast Various To Various Route-Finding
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FastVtoVRelRouteTo relation from to count
- domainsize cache cache2 left_ix ox oy oj offset axy axj ayj;
- domainsize = RlnGetF(relation, RR_STORAGE)-->2; ! Number of left instances
- left_ix = RlnGetF(relation, RR_STORAGE)-->VTOVS_LEFT_INDEX_PROP;
- if ((from provides left_ix) && (to provides left_ix)) {
- if (domainsize < 256) {
- cache = RlnGetF(relation, RR_STORAGE)-->VTOVS_CACHE;
- cache2 = cache + domainsize*domainsize;
- if (RlnGetF(relation, RR_STORAGE)-->VTOVS_CACHE_BROKEN == true) {
- RlnGetF(relation, RR_STORAGE)-->VTOVS_CACHE_BROKEN = false;
- objectloop (oy provides left_ix)
- objectloop (ox provides left_ix)
- if (Relation_TestVtoV(oy, relation, ox)) {
- offset = ((oy.left_ix)*domainsize + (ox.left_ix));
- cache->offset = 1;
- cache2->offset = ox.left_ix;
- } else {
- offset = ((oy.left_ix)*domainsize + (ox.left_ix));
- cache->offset = 0;
- cache2->offset = 255;
- }
- for (oy=0: oy(ox*domainsize + oy);
- if (axy > 0)
- for (oj=0: oj(oy*domainsize + oj);
- if (ayj > 0) {
- offset = ox*domainsize + oj;
- axj = cache->offset;
- if ((axj == 0) || (axy + ayj < axj)) {
- cache->offset = (axy + ayj);
- cache2->offset = cache2->(ox*domainsize + oy);
- }
- }
- }
- }
- }
- if (count) {
- count = cache->((from.left_ix)*domainsize + (to.left_ix));
- if (count == 0) return -1;
- return count;
- }
- oy = cache2->((from.left_ix)*domainsize + (to.left_ix));
- if (oy < 255)
- objectloop (ox provides left_ix)
- if (ox.left_ix == oy) return ox;
- return nothing;
- } else {
- cache = RlnGetF(relation, RR_STORAGE)-->VTOVS_CACHE;
- cache2 = cache + WORDSIZE*domainsize*domainsize;
- if (RlnGetF(relation, RR_STORAGE)-->VTOVS_CACHE_BROKEN == true) {
- RlnGetF(relation, RR_STORAGE)-->VTOVS_CACHE_BROKEN = false;
- objectloop (oy provides left_ix)
- objectloop (ox provides left_ix)
- if (Relation_TestVtoV(oy, relation, ox)) {
- offset = ((oy.left_ix)*domainsize + (ox.left_ix));
- cache-->offset = 1;
- cache2-->offset = ox;
- } else {
- offset = ((oy.left_ix)*domainsize + (ox.left_ix));
- cache-->offset = 0;
- cache2-->offset = nothing;
- }
- for (oy=0: oy(ox*domainsize + oy);
- if (axy > 0)
- for (oj=0: oj(oy*domainsize + oj);
- if (ayj > 0) {
- offset = ox*domainsize + oj;
- axj = cache-->offset;
- if ((axj == 0) || (axy + ayj < axj)) {
- cache-->offset = (axy + ayj);
- cache2-->offset = cache2-->(ox*domainsize + oy);
- }
- }
- }
- }
- }
- if (count) {
- count = cache-->((from.left_ix)*domainsize + (to.left_ix));
- if (count == 0) return -1;
- return count;
- }
- return cache2-->((from.left_ix)*domainsize + (to.left_ix));
- }
- }
- if (count) return -1;
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Relations.i6t: Iterating Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ IterateRelations callback;
- callback(Rel_Record_67);
- callback(Rel_Record_69);
-
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Reporting
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array RTP_Buffer --> 7;
-[ RunTimeProblem n par1 par2 par3 ln file;
- if (RTP_Buffer-->0 == -1) {
- RTP_Buffer-->0 = n;
- RTP_Buffer-->1 = par1;
- RTP_Buffer-->2 = par2;
- RTP_Buffer-->3 = par3;
- RTP_Buffer-->4 = ln;
- RTP_Buffer-->5 = file;
- }
- RunTimeProblemShow();
-];
-[ ClearRTP;
- RTP_Buffer-->0 = -1;
- RTP_Buffer-->6 = false;
-];
-[ SuspendRTP;
- RTP_Buffer-->6 = true;
-];
-[ ResumeRTP;
- RTP_Buffer-->6 = false;
-];
-[ RunTimeProblemShow n par1 par2 par3 ln file i c;
- if (RTP_Buffer-->0 == -1 or -2) return;
- if (RTP_Buffer-->6) return;
-
- n = RTP_Buffer-->0;
- par1 = RTP_Buffer-->1;
- par2 = RTP_Buffer-->2;
- par3 = RTP_Buffer-->3;
- ln = RTP_Buffer-->4;
- file = RTP_Buffer-->5;
- RTP_Buffer-->0 = -2;
-
- print "^*** Run-time problem P", n;
- if (ln) {
- print " (at paragraph ", ln, " in ";
- if (file == 0) print "the source text";
- else ShowOneExtension(file);
- print ")";
- }
- print ": ";
- switch(n) {
- RTP_BACKDROP:
- print "Tried to move ", (the) par1, " (a backdrop) to ", (the) par2,
- ", which is not a region.^";
- RTP_CANTCHANGE:
- print "Tried to change player to ", (the) par1, ", which is not a person.^";
- RTP_NOEXIT:
- print "Tried to change ", (the) par2, " exit of ", (the) par1,
- ", but it didn't seem to have such an exit to change.^";
- RTP_EXITDOOR:
- print "Tried to change ", (the) par2, " exit of ", (the) par1,
- ", but it led to a door, not a room.^";
- RTP_IMPREL:
- print "Tried to access an inappropriate relation for ", (the) par1,
- ", violating '", (string) RlnGetF(par2, RR_DESCRIPTION), "'.^";
- RTP_TOOMANYRULEBOOKS:
- print "Too many rulebooks in simultaneous use.^";
- RTP_TOOMANYEVENTS:
- print "Too many timed events are going on at once.^";
- RTP_BADPROPERTY:
- print "Tried to access non-existent property for ", (the) par1, ".^";
- RTP_UNPROVIDED:
- print "Since ", (the) par1, " is not allowed the property ~",
- (string) par2, "~, it is against the rules to try to use it.^";
- RTP_UNSET:
- print "Although ", (the) par1, " is allowed to have the property ~",
- (string) par2, "~, no value was ever given, so it can't now be used.^";
- RTP_TOOMANYACTS:
- print "Too many activities are going on at once.^";
- RTP_CANTABANDON:
- print "Tried to abandon an activity which wasn't going on.^";
- RTP_CANTEND:
- print "Tried to end an activity which wasn't going on.^";
- RTP_CANTMOVENOTHING:
- print "You can't move nothing.^";
- RTP_CANTREMOVENOTHING:
- print "You can't remove nothing from play.^";
- RTP_DIVZERO:
- print "You can't divide by zero.^";
- RTP_BADVALUEPROPERTY:
- print "Tried to access property for a value which didn't fit: ",
- "if this were a number it would be ", par1, ".^";
- RTP_NOTBACKDROP:
- print "Tried to move ", (the) par1, " (not a backdrop) to ", (the) par2,
- ", which is a region.^";
- RTP_TABLE_NOCOL:
- print "Attempt to look up a non-existent column in the table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_NOCORR:
- print "Attempt to look up a non-existent correspondence in the table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_NOROW:
- print "Attempt to look up a non-existent row in the table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_NOENTRY:
- print "Attempt to look up a non-existent entry at column ", par2,
- ", row ", par3, " of the table '", (PrintTableName) par1, "'.^";
- RTP_TABLE_NOTABLE:
- print "Attempt to blank out a row from a non-existent table (value ",
- par1, ").^";
- RTP_TABLE_NOTABLE2:
- print "Attempt to access an entry from a non-existent table.^";
- RTP_TABLE_NOMOREBLANKS:
- print "Attempt to choose a blank row in a table with none left: table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_NOROWS:
- print "Attempt to choose a random row in an entirely blank table: table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_CANTRUNTHROUGH:
- print "Attempt to repeat through a table in a tricky column order: table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_CANTSORT:
- print "Attempt to sort a table whose ordering must remain fixed: table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_CANTSAVE:
- print "Attempt to save a table to a file whose data is unstable: table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_WONTFIT:
- print "File being read has too many rows or columns to fit into table: table '",
- (PrintTableName) par1, "'.^";
- RTP_TABLE_BADFILE:
- print "File being read is not a previously saved table: table '",
- (PrintTableName) par1, "'.^";
- RTP_NOTINAROOM:
- print "Attempt to test if the current location is '",
- (the) par1, "', which is not a room or region.^";
- RTP_BADTOPIC:
- print "Attempt to see if a snippet of text matches something which
- is not a topic.^";
- RTP_ROUTELESS:
- print "Attempt to find route or count steps through an implicit
- relation.^";
- RTP_PROPOFNOTHING:
- print "Attempt to use a property of the 'nothing' non-object: property ",
- (PrintPropertyName) par2, "^";
- RTP_DECIDEONWRONGKIND:
- print "Attempt to 'decide on V' where V is the wrong kind of object.^";
- RTP_DECIDEONNOTHING:
- print "Attempt to 'decide on nothing'.^";
- RTP_LOWLEVELERROR:
- print "Low level error.^";
- RTP_DONTIGNORETURNSEQUENCE:
- print "Attempt to ignore the turn sequence rules.^";
- RTP_SAYINVALIDSNIPPET:
- print "Attempt to say a snippet value which is currently invalid: words ",
- par1, " to ", par2, ".^";
- RTP_SPLICEINVALIDSNIPPET:
- print "Attempt to splice a snippet value which is currently invalid: words ",
- par1, " to ", par2, ".^";
- RTP_INCLUDEINVALIDSNIPPET:
- print "Attempt to match a snippet value which is currently invalid: words ",
- par1, " to ", par2, ".^";
- RTP_LISTWRITERMEMORY:
- print "The list-writer has run out of memory.^";
- RTP_CANTREMOVEPLAYER:
- print "Attempt to remove the player from play.^";
- RTP_CANTBEOFFSTAGE:
- print "Attempt to move the player off-stage.^";
- RTP_CANTREMOVEDOORS:
- print "Attempt to remove a door from play.^";
- RTP_CANTCHANGEOFFSTAGE:
- print "Attempt to change the player to a person off-stage.^";
- RTP_MSTACKMEMORY:
- print "The memory stack is exhausted.^";
- RTP_TYPECHECK:
- print "Phrase applied to an incompatible kind of value.^";
- RTP_FILEIOERROR:
- print "Error handling external file.^";
- RTP_HEAPERROR:
- print "Memory allocation proved impossible.^";
- RTP_LISTRANGEERROR:
- print "Attempt to use list item which does not exist.^";
- RTP_LISTSIZENEGATIVE:
- print "Attempt to resize list to ", par1, " entries - there must ",
- "always be 0 or more.^";
- RTP_REGEXPSYNTAXERROR:
- print "Syntax error in regular expression.^";
- RTP_NOGLULXUNICODE:
- print "This interpreter does not support Unicode.^";
- RTP_BACKDROPONLY:
- print "Only backdrops can be moved to multiple places.^";
- RTP_NOTTHING:
- print "Tried to move ", (the) par1, " (not a thing) to ", (the) par2,
- ", but only things can move around.^";
- RTP_SCENEHASNTSTARTED:
- print "The scene ", (PrintSceneName) par1,
- " hasn't started, so you can't ask when it did.^";
- RTP_SCENEHASNTENDED:
- print "The scene ", (PrintSceneName) par1,
- " hasn't ended, so you can't ask when it did.^";
- RTP_NEGATIVEROOT:
- print "You can't take the square root of a negative number.^";
- RTP_CANTITERATE:
- print "You can't implicitly repeat through the values of this kind: ",
- "a problem arising from a description which started out here - ~",
- (string) par1, "~.^";
- RTP_WRONGASSIGNEDKIND:
- print "Attempt to set a variable to the wrong kind of object: ",
- "you wrote '", (string) par2, "', which sets the value to ", (the) par1,
- " - but that doesn't have the kind '", (string) par3, "'.^";
- RTP_RELKINDVIOLATION:
- print "Tried to change a relation for objects with the wrong kinds: ",
- (string) RlnGetF(par3, RR_DESCRIPTION), ", but you tried to ",
- "relate (or unrelate) ", (the) par1, " to ", (the) par2, ".^";
- RTP_CANTMAKEPART:
- print "Tried to make the player part of something: ",
- (the) par1, ".^";
- RTP_TEXTTOKENTOOHARD:
- print "This use of '[text]' is too complicated.^";
- RTP_RELATIONCHANGEIMPOSSIBLE:
- print "This change of the relation's nature is impossible in play.^";
- RTP_RELMINIMAL:
- print "This operation can't be done with the relation '",
- (string) RlnGetF(par3, RR_DESCRIPTION), "'.^";
- RTP_REGIONSNOTADJACENT:
- print "You can't test whether something is adjacent to a region: ",
- "such as, in this case, ", (the) par1, ".^";
- }
- print "^";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Low-Level Errors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant MAX_TIMERS = 0;
-[ RunTimeError n p1 p2;
- #Ifdef DEBUG;
- print "** Library error ", n, " (", p1, ",", p2, ") **^** ";
- switch (n) {
- 1: print "preposition not found (this should not occur)";
- 2: print "Property value not routine or string: ~", (property) p2, "~ of ~", (name) p1,
- "~ (", p1, ")";
- 3: print "Entry in property list not routine or string: ~", (property) p2, "~ list of ~",
- (name) p1, "~ (", p1, ")";
- 4: print "Too many timers/daemons are active simultaneously.
- The limit is the library constant MAX_TIMERS (currently ",
- MAX_TIMERS, ") and should be increased";
- 5: print "Object ~", (name) p1, "~ has no ~time_left~ property";
- 7: print "The object ~", (name) p1, "~ can only be used as a player object if it has
- the ~number~ property";
- 8: print "Attempt to take random entry from an empty table array";
- 9: print p1, " is not a valid direction property number";
- 10: print "The player-object is outside the object tree";
- 11: print "The room ~", (name) p1, "~ has no ~description~ property";
- 12: print "Tried to set a non-existent pronoun using SetPronoun";
- 13: print "A 'topic' token can only be followed by a preposition";
- default: print "(unexplained)";
- }
- print " **^";
- #Ifnot;
- print "** Library error ", n, " (", p1, ",", p2, ") **^";
- #Endif; ! DEBUG
- RunTimeProblem(RTP_LOWLEVELERROR);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Argument Type Checking Failed
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ArgumentTypeFailed line file;
- RunTimeProblem(RTP_TYPECHECK, 0, 0, 0, line, file);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Return Type Checking Failed
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CheckKindReturned V K;
- if (V ofclass K) return V;
- if (v == nothing) RunTimeProblem(RTP_DECIDEONNOTHING);
- else RunTimeProblem(RTP_DECIDEONWRONGKIND);
- return V;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Whether Provides
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WhetherProvides obj either_or p issue_rtp off i textual a l;
- if (metaclass(obj) ~= Object) rfalse;
- if (p<0) p = ~p;
- if (either_or) {
- if (p < FBNA_PROP_NUMBER) off = attributed_property_offsets-->p;
- else off = valued_property_offsets-->p;
- } else off = valued_property_offsets-->p;
- if (off<0) {
- if (issue_rtp) RunTimeProblem(RTP_BADPROPERTY, obj);
- rfalse;
- }
- textual = property_metadata-->off; off++;
-
- if (ScanPropertyMetadata(obj, off)) jump PermissionFound;
- if (obj provides KD_Count) {
- l = obj.KD_Count;
- while (l > 0) {
- a = l*2;
- if (ScanPropertyMetadata(KindHierarchy-->a, off)) jump PermissionFound;
- l = KindHierarchy-->(a+1);
- }
- }
- if (issue_rtp) RunTimeProblem(RTP_UNPROVIDED, obj, textual);
- rfalse;
-
- .PermissionFound;
- if (either_or) rtrue;
- if (obj provides p) rtrue;
- if (issue_rtp) RunTimeProblem(RTP_UNSET, obj, textual);
- rfalse;
-];
-
-[ PrintPropertyName p off textual;
- if (p<0) p = ~p;
- off = valued_property_offsets-->p;
- textual = property_metadata-->off;
- print (string) textual;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Scan Property Metadata
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ScanPropertyMetadata obj off i;
- for (i=off: property_metadata-->i >= 0: i++)
- if (obj == property_metadata-->i) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Get Either-Or Property
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GetEitherOrProperty o p;
- if (o == nothing) rfalse;
- if (p<0) p = ~p;
- if (WhetherProvides(o, true, p, false)) {
- if (pK;
- if (obj == 0) { RunTimeProblem(RTP_PROPOFNOTHING, obj, pr); rfalse; }
- if (obj provides pr) {
- if (K == OBJECT_TY) {
- if (pr == door_to) return obj.pr();
- if (WhetherProvides(V, false, pr, true)) return obj.pr;
- rfalse;
- }
- if (obj ofclass K0_kind)
- WhetherProvides(V, false, pr, true); ! to force a run-time problem
- if ((V < 1) || (V > obj.value_range)) {
- RunTimeProblem(RTP_BADVALUEPROPERTY); return 0; }
- return (obj.pr)-->(V+COL_HSIZE);
- } else {
- if (obj ofclass K0_kind)
- WhetherProvides(V, false, pr, true); ! to force a run-time problem
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Write Value Property
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WriteGProperty K V pr val obj;
- if (K == OBJECT_TY) obj = V; else obj = KOV_representatives-->K;
- if (obj == 0) { RunTimeProblem(RTP_PROPOFNOTHING, obj, pr); rfalse; }
- if (K == OBJECT_TY) {
- if (WhetherProvides(V, false, pr, true)) obj.pr = val;
- } else {
- if ((V < 1) || (V > obj.value_range))
- return RunTimeProblem(RTP_BADVALUEPROPERTY);
- if (obj provides pr) { (obj.pr)-->(V+COL_HSIZE) = val; }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RTP.i6t: Printing Property Names
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PROPERTY_TY_Say v;
- print "property ", v;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Rulebooks.i6t: Latest Rule Result
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RS_NEITHER = 0;
-Constant RS_SUCCEEDS = 1;
-Constant RS_FAILS = 2;
-
-Array latest_rule_result --> 3;
-
-[ RecordRuleOutcome usage rule1 rule2;
- if ((latest_rule_result-->0 == RS_SUCCEEDS or RS_FAILS) &&
- (KOVIsBlockValue(latest_rule_result-->1)))
- BlkValueFree(latest_rule_result-->2);
- if ((usage == RS_SUCCEEDS or RS_FAILS) && (KOVIsBlockValue(rule1)))
- rule2 = BlkValueCopy(BlkValueCreate(rule1), rule2);
- latest_rule_result-->0 = usage;
- latest_rule_result-->1 = rule1;
- latest_rule_result-->2 = rule2;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Rulebooks.i6t: Following
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global process_rulebook_count; ! Depth of processing recursion
-Global debugging_rules = false; ! Are we tracing rule invocations?
-
-[ FollowRulebook rulebook parameter no_paragraph_skips
- rv ss spv;
- ss = self;
- if ((Protect_I7_Arrays-->0 ~= 16339) || (Protect_I7_Arrays-->1 ~= 12345)) {
- print "^^*** Fatal programming error: I7 arrays corrupted ***^^";
- @quit;
- }
- if (parameter) { self = parameter; parameter_object = parameter; }
- spv = parameter_value; parameter_value = parameter;
- ! we won't need parameter again, so can reuse it
- parameter = debugging_rules;
- #ifndef MEMORY_ECONOMY;
- if (debugging_rules) {
- DebugRulebooks(rulebook, parameter);
- process_rulebook_count = process_rulebook_count + debugging_rules;
- }
- #endif;
- if ((rulebook >= 0) && (rulebook < NUMBER_RULEBOOKS_CREATED)) {
- rv = rulebooks_array-->rulebook;
- if (rv ~= EMPTY_RULEBOOK) {
- if (rulebook ~= ACTION_PROCESSING_RB) MStack_CreateRBVars(rulebook);
- if (say__p) RulebookParBreak(no_paragraph_skips);
- rv = rv(no_paragraph_skips);
- if (rulebook ~= ACTION_PROCESSING_RB) MStack_DestroyRBVars(rulebook);
- } else {
- rv = 0;
- }
- } else {
- if (say__p) RulebookParBreak(no_paragraph_skips);
- rv = indirect(rulebook);
- if (rv == 2) rv = reason_the_action_failed;
- else if (rv) rv = rulebook;
- }
- if (rv) {
- #ifndef MEMORY_ECONOMY;
- if (debugging_rules) {
- process_rulebook_count = process_rulebook_count - debugging_rules;
- if (process_rulebook_count < 0) process_rulebook_count = 0;
- spaces(2*process_rulebook_count);
- if (latest_rule_result-->0 == RS_SUCCEEDS) print "[stopped: success]^";
- if (latest_rule_result-->0 == RS_FAILS) print "[stopped: fail]^";
- }
- #endif;
- } else {
- if (debugging_rules)
- process_rulebook_count = process_rulebook_count - debugging_rules;
- latest_rule_result-->0 = RS_NEITHER;
- }
- debugging_rules = parameter;
- self = ss; parameter_value = spv;
- return rv;
-];
-
-[ RulebookParBreak no_paragraph_skips;
- if ((no_paragraph_skips == false) && (say__pc & PARA_NORULEBOOKBREAKS == 0))
- DivideParagraphPoint();
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Rulebooks.i6t: Specifying Outcomes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ActRulebookSucceeds rule_id;
- if (rule_id) reason_the_action_failed = rule_id;
- RulebookSucceeds();
-];
-
-[ ActRulebookFails rule_id;
- if (rule_id) reason_the_action_failed = rule_id;
- RulebookFails();
-];
-
-[ RulebookSucceeds weak_kind value;
- RecordRuleOutcome(RS_SUCCEEDS, weak_kind, value);
-];
-
-[ RulebookFails weak_kind value;
- RecordRuleOutcome(RS_FAILS, weak_kind, value);
-];
-
-[ RuleHasNoOutcome;
- RecordRuleOutcome(RS_NEITHER, 0, 0);
-];
-
-[ SetRulebookOutcome a;
- latest_rule_result-->0 = a;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Rulebooks.i6t: Discovering Outcomes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RulebookOutcome a;
- a = latest_rule_result-->0;
- if ((a == RS_FAILS) || (a == RS_SUCCEEDS)) return a;
- return RS_NEITHER;
-];
-
-[ RulebookFailed;
- if (latest_rule_result-->0 == RS_FAILS) rtrue; rfalse;
-];
-
-[ RulebookSucceeded;
- if (latest_rule_result-->0 == RS_SUCCEEDS) rtrue; rfalse;
-];
-
-[ ResultOfRule RB V F K a;
- if (RB) FollowRulebook(RB, V, F);
- a = latest_rule_result-->0;
- if ((a == RS_FAILS) || (a == RS_SUCCEEDS)) {
- a = latest_rule_result-->1;
- if (a) return latest_rule_result-->2;
- }
- if (K) return DefaultValueOfKOV(K);
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Rulebooks.i6t: Printing Rule Names
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFNDEF MEMORY_ECONOMY;
-Array RulebookNames -->
- "Startup rulebook" ! 0
- "Turn sequence rulebook" ! 1
- "Shutdown rulebook" ! 2
- "Scene changing rulebook" ! 3
- "When play begins rulebook" ! 4
- "When play ends rulebook" ! 5
- "When scene begins rulebook" ! 6
- "When scene ends rulebook" ! 7
- "Every turn rulebook" ! 8
- "Action-processing rulebook" ! 9
- "Setting action variables rulebook" ! 10
- "specific action-processing rulebook" ! 11
- "player's action awareness rulebook" ! 12
- "Accessibility rulebook" ! 13
- "Reaching inside rulebook" ! 14
- "Reaching outside rulebook" ! 15
- "Visibility rulebook" ! 16
- "Persuasion rulebook" ! 17
- "Unsuccessful attempt by rulebook" ! 18
- "Before rulebook" ! 19
- "Instead rulebook" ! 20
- "Check rulebook" ! 21
- "Carry out rulebook" ! 22
- "After rulebook" ! 23
- "Report rulebook" ! 24
- "does the player mean rulebook" ! 25
- "multiple action processing rulebook" ! 26
- "when Entire Game begins rulebook" ! 27
- "when Entire Game ends rulebook" ! 28
- "before Printing the name rulebook" ! 29
- "for Printing the name rulebook" ! 30
- "after Printing the name rulebook" ! 31
- "before Printing the plural name rulebook" ! 32
- "for Printing the plural name rulebook" ! 33
- "after Printing the plural name rulebook" ! 34
- "before Printing a number rulebook" ! 35
- "for Printing a number rulebook" ! 36
- "after Printing a number rulebook" ! 37
- "before Printing room description details rulebook" ! 38
- "for Printing room description details rulebook" ! 39
- "after Printing room description details rulebook" ! 40
- "before Printing inventory details rulebook" ! 41
- "for Printing inventory details rulebook" ! 42
- "after Printing inventory details rulebook" ! 43
- "before Listing contents rulebook" ! 44
- "for Listing contents rulebook" ! 45
- "after Listing contents rulebook" ! 46
- "before Grouping together rulebook" ! 47
- "for Grouping together rulebook" ! 48
- "after Grouping together rulebook" ! 49
- "before Writing a paragraph about rulebook" ! 50
- "for Writing a paragraph about rulebook" ! 51
- "after Writing a paragraph about rulebook" ! 52
- "before Listing nondescript items rulebook" ! 53
- "for Listing nondescript items rulebook" ! 54
- "after Listing nondescript items rulebook" ! 55
- "before Printing the name of a dark room rulebook" ! 56
- "for Printing the name of a dark room rulebook" ! 57
- "after Printing the name of a dark room rulebook" ! 58
- "before Printing the description of a dark room rulebook" ! 59
- "for Printing the description of a dark room rulebook" ! 60
- "after Printing the description of a dark room rulebook" ! 61
- "before Printing the announcement of darkness rulebook" ! 62
- "for Printing the announcement of darkness rulebook" ! 63
- "after Printing the announcement of darkness rulebook" ! 64
- "before Printing the announcement of light rulebook" ! 65
- "for Printing the announcement of light rulebook" ! 66
- "after Printing the announcement of light rulebook" ! 67
- "before Printing a refusal to act in the dark rulebook" ! 68
- "for Printing a refusal to act in the dark rulebook" ! 69
- "after Printing a refusal to act in the dark rulebook" ! 70
- "before Constructing the status line rulebook" ! 71
- "for Constructing the status line rulebook" ! 72
- "after Constructing the status line rulebook" ! 73
- "before Printing the banner text rulebook" ! 74
- "for Printing the banner text rulebook" ! 75
- "after Printing the banner text rulebook" ! 76
- "before Reading a command rulebook" ! 77
- "for Reading a command rulebook" ! 78
- "after Reading a command rulebook" ! 79
- "before Deciding the scope rulebook" ! 80
- "for Deciding the scope rulebook" ! 81
- "after Deciding the scope rulebook" ! 82
- "before Deciding the concealed possessions rulebook" ! 83
- "for Deciding the concealed possessions rulebook" ! 84
- "after Deciding the concealed possessions rulebook" ! 85
- "before Deciding whether all includes rulebook" ! 86
- "for Deciding whether all includes rulebook" ! 87
- "after Deciding whether all includes rulebook" ! 88
- "before Clarifying the parser's choice rulebook" ! 89
- "for Clarifying the parser's choice rulebook" ! 90
- "after Clarifying the parser's choice rulebook" ! 91
- "before Asking which do you mean rulebook" ! 92
- "for Asking which do you mean rulebook" ! 93
- "after Asking which do you mean rulebook" ! 94
- "before Printing a parser error rulebook" ! 95
- "for Printing a parser error rulebook" ! 96
- "after Printing a parser error rulebook" ! 97
- "before Supplying a missing noun rulebook" ! 98
- "for Supplying a missing noun rulebook" ! 99
- "after Supplying a missing noun rulebook" ! 100
- "before Supplying a missing second noun rulebook" ! 101
- "for Supplying a missing second noun rulebook" ! 102
- "after Supplying a missing second noun rulebook" ! 103
- "before Implicitly taking rulebook" ! 104
- "for Implicitly taking rulebook" ! 105
- "after Implicitly taking rulebook" ! 106
- "before Starting the virtual machine rulebook" ! 107
- "for Starting the virtual machine rulebook" ! 108
- "after Starting the virtual machine rulebook" ! 109
- "before Amusing a victorious player rulebook" ! 110
- "for Amusing a victorious player rulebook" ! 111
- "after Amusing a victorious player rulebook" ! 112
- "before Printing the player's obituary rulebook" ! 113
- "for Printing the player's obituary rulebook" ! 114
- "after Printing the player's obituary rulebook" ! 115
- "before Handling the final question rulebook" ! 116
- "for Handling the final question rulebook" ! 117
- "after Handling the final question rulebook" ! 118
- "before Printing the locale description rulebook" ! 119
- "for Printing the locale description rulebook" ! 120
- "after Printing the locale description rulebook" ! 121
- "before Choosing notable locale objects rulebook" ! 122
- "for Choosing notable locale objects rulebook" ! 123
- "after Choosing notable locale objects rulebook" ! 124
- "before Printing a locale paragraph about rulebook" ! 125
- "for Printing a locale paragraph about rulebook" ! 126
- "after Printing a locale paragraph about rulebook" ! 127
- "before Issuing the response text rulebook" ! 128
- "for Issuing the response text rulebook" ! 129
- "after Issuing the response text rulebook" ! 130
- "check Taking inventory rulebook" ! 131
- "carry out Taking inventory rulebook" ! 132
- "report Taking inventory rulebook" ! 133
- "check Taking rulebook" ! 134
- "carry out Taking rulebook" ! 135
- "report Taking rulebook" ! 136
- "check Removing it from rulebook" ! 137
- "carry out Removing it from rulebook" ! 138
- "report Removing it from rulebook" ! 139
- "check Dropping rulebook" ! 140
- "carry out Dropping rulebook" ! 141
- "report Dropping rulebook" ! 142
- "check Putting it on rulebook" ! 143
- "carry out Putting it on rulebook" ! 144
- "report Putting it on rulebook" ! 145
- "check Inserting it into rulebook" ! 146
- "carry out Inserting it into rulebook" ! 147
- "report Inserting it into rulebook" ! 148
- "check Eating rulebook" ! 149
- "carry out Eating rulebook" ! 150
- "report Eating rulebook" ! 151
- "check Going rulebook" ! 152
- "carry out Going rulebook" ! 153
- "report Going rulebook" ! 154
- "check Entering rulebook" ! 155
- "carry out Entering rulebook" ! 156
- "report Entering rulebook" ! 157
- "check Exiting rulebook" ! 158
- "carry out Exiting rulebook" ! 159
- "report Exiting rulebook" ! 160
- "check Getting off rulebook" ! 161
- "carry out Getting off rulebook" ! 162
- "report Getting off rulebook" ! 163
- "check Looking rulebook" ! 164
- "carry out Looking rulebook" ! 165
- "report Looking rulebook" ! 166
- "check Examining rulebook" ! 167
- "carry out Examining rulebook" ! 168
- "report Examining rulebook" ! 169
- "check Looking under rulebook" ! 170
- "carry out Looking under rulebook" ! 171
- "report Looking under rulebook" ! 172
- "check Searching rulebook" ! 173
- "carry out Searching rulebook" ! 174
- "report Searching rulebook" ! 175
- "check Consulting it about rulebook" ! 176
- "carry out Consulting it about rulebook" ! 177
- "report Consulting it about rulebook" ! 178
- "check Locking it with rulebook" ! 179
- "carry out Locking it with rulebook" ! 180
- "report Locking it with rulebook" ! 181
- "check Unlocking it with rulebook" ! 182
- "carry out Unlocking it with rulebook" ! 183
- "report Unlocking it with rulebook" ! 184
- "check Switching on rulebook" ! 185
- "carry out Switching on rulebook" ! 186
- "report Switching on rulebook" ! 187
- "check Switching off rulebook" ! 188
- "carry out Switching off rulebook" ! 189
- "report Switching off rulebook" ! 190
- "check Opening rulebook" ! 191
- "carry out Opening rulebook" ! 192
- "report Opening rulebook" ! 193
- "check Closing rulebook" ! 194
- "carry out Closing rulebook" ! 195
- "report Closing rulebook" ! 196
- "check Wearing rulebook" ! 197
- "carry out Wearing rulebook" ! 198
- "report Wearing rulebook" ! 199
- "check Taking off rulebook" ! 200
- "carry out Taking off rulebook" ! 201
- "report Taking off rulebook" ! 202
- "check Giving it to rulebook" ! 203
- "carry out Giving it to rulebook" ! 204
- "report Giving it to rulebook" ! 205
- "check Showing it to rulebook" ! 206
- "carry out Showing it to rulebook" ! 207
- "report Showing it to rulebook" ! 208
- "check Waking rulebook" ! 209
- "carry out Waking rulebook" ! 210
- "report Waking rulebook" ! 211
- "check Throwing it at rulebook" ! 212
- "carry out Throwing it at rulebook" ! 213
- "report Throwing it at rulebook" ! 214
- "check Attacking rulebook" ! 215
- "carry out Attacking rulebook" ! 216
- "report Attacking rulebook" ! 217
- "check Kissing rulebook" ! 218
- "carry out Kissing rulebook" ! 219
- "report Kissing rulebook" ! 220
- "check Answering it that rulebook" ! 221
- "carry out Answering it that rulebook" ! 222
- "report Answering it that rulebook" ! 223
- "check Telling it about rulebook" ! 224
- "carry out Telling it about rulebook" ! 225
- "report Telling it about rulebook" ! 226
- "check Asking it about rulebook" ! 227
- "carry out Asking it about rulebook" ! 228
- "report Asking it about rulebook" ! 229
- "check Asking it for rulebook" ! 230
- "carry out Asking it for rulebook" ! 231
- "report Asking it for rulebook" ! 232
- "check Waiting rulebook" ! 233
- "carry out Waiting rulebook" ! 234
- "report Waiting rulebook" ! 235
- "check Touching rulebook" ! 236
- "carry out Touching rulebook" ! 237
- "report Touching rulebook" ! 238
- "check Waving rulebook" ! 239
- "carry out Waving rulebook" ! 240
- "report Waving rulebook" ! 241
- "check Pulling rulebook" ! 242
- "carry out Pulling rulebook" ! 243
- "report Pulling rulebook" ! 244
- "check Pushing rulebook" ! 245
- "carry out Pushing rulebook" ! 246
- "report Pushing rulebook" ! 247
- "check Turning rulebook" ! 248
- "carry out Turning rulebook" ! 249
- "report Turning rulebook" ! 250
- "check Pushing it to rulebook" ! 251
- "carry out Pushing it to rulebook" ! 252
- "report Pushing it to rulebook" ! 253
- "check Squeezing rulebook" ! 254
- "carry out Squeezing rulebook" ! 255
- "report Squeezing rulebook" ! 256
- "check Saying yes rulebook" ! 257
- "carry out Saying yes rulebook" ! 258
- "report Saying yes rulebook" ! 259
- "check Saying no rulebook" ! 260
- "carry out Saying no rulebook" ! 261
- "report Saying no rulebook" ! 262
- "check Burning rulebook" ! 263
- "carry out Burning rulebook" ! 264
- "report Burning rulebook" ! 265
- "check Waking up rulebook" ! 266
- "carry out Waking up rulebook" ! 267
- "report Waking up rulebook" ! 268
- "check Thinking rulebook" ! 269
- "carry out Thinking rulebook" ! 270
- "report Thinking rulebook" ! 271
- "check Smelling rulebook" ! 272
- "carry out Smelling rulebook" ! 273
- "report Smelling rulebook" ! 274
- "check Listening to rulebook" ! 275
- "carry out Listening to rulebook" ! 276
- "report Listening to rulebook" ! 277
- "check Tasting rulebook" ! 278
- "carry out Tasting rulebook" ! 279
- "report Tasting rulebook" ! 280
- "check Cutting rulebook" ! 281
- "carry out Cutting rulebook" ! 282
- "report Cutting rulebook" ! 283
- "check Jumping rulebook" ! 284
- "carry out Jumping rulebook" ! 285
- "report Jumping rulebook" ! 286
- "check Tying it to rulebook" ! 287
- "carry out Tying it to rulebook" ! 288
- "report Tying it to rulebook" ! 289
- "check Drinking rulebook" ! 290
- "carry out Drinking rulebook" ! 291
- "report Drinking rulebook" ! 292
- "check Saying sorry rulebook" ! 293
- "carry out Saying sorry rulebook" ! 294
- "report Saying sorry rulebook" ! 295
- "check Swinging rulebook" ! 296
- "carry out Swinging rulebook" ! 297
- "report Swinging rulebook" ! 298
- "check Rubbing rulebook" ! 299
- "carry out Rubbing rulebook" ! 300
- "report Rubbing rulebook" ! 301
- "check Setting it to rulebook" ! 302
- "carry out Setting it to rulebook" ! 303
- "report Setting it to rulebook" ! 304
- "check Waving hands rulebook" ! 305
- "carry out Waving hands rulebook" ! 306
- "report Waving hands rulebook" ! 307
- "check Buying rulebook" ! 308
- "carry out Buying rulebook" ! 309
- "report Buying rulebook" ! 310
- "check Climbing rulebook" ! 311
- "carry out Climbing rulebook" ! 312
- "report Climbing rulebook" ! 313
- "check Sleeping rulebook" ! 314
- "carry out Sleeping rulebook" ! 315
- "report Sleeping rulebook" ! 316
- "check Quitting the game rulebook" ! 317
- "carry out Quitting the game rulebook" ! 318
- "report Quitting the game rulebook" ! 319
- "check Saving the game rulebook" ! 320
- "carry out Saving the game rulebook" ! 321
- "report Saving the game rulebook" ! 322
- "check Restoring the game rulebook" ! 323
- "carry out Restoring the game rulebook" ! 324
- "report Restoring the game rulebook" ! 325
- "check Restarting the game rulebook" ! 326
- "carry out Restarting the game rulebook" ! 327
- "report Restarting the game rulebook" ! 328
- "check Verifying the story file rulebook" ! 329
- "carry out Verifying the story file rulebook" ! 330
- "report Verifying the story file rulebook" ! 331
- "check Switching the story transcript on rulebook" ! 332
- "carry out Switching the story transcript on rulebook" ! 333
- "report Switching the story transcript on rulebook" ! 334
- "check Switching the story transcript off rulebook" ! 335
- "carry out Switching the story transcript off rulebook" ! 336
- "report Switching the story transcript off rulebook" ! 337
- "check Requesting the story file version rulebook" ! 338
- "carry out Requesting the story file version rulebook" ! 339
- "report Requesting the story file version rulebook" ! 340
- "check Requesting the score rulebook" ! 341
- "carry out Requesting the score rulebook" ! 342
- "report Requesting the score rulebook" ! 343
- "check Preferring abbreviated room descriptions rulebook" ! 344
- "carry out Preferring abbreviated room descriptions rulebook" ! 345
- "report Preferring abbreviated room descriptions rulebook" ! 346
- "check Preferring unabbreviated room descriptions rulebook" ! 347
- "carry out Preferring unabbreviated room descriptions rulebook" ! 348
- "report Preferring unabbreviated room descriptions rulebook" ! 349
- "check Preferring sometimes abbreviated room descriptions rulebook" ! 350
- "carry out Preferring sometimes abbreviated room descriptions rulebook" ! 351
- "report Preferring sometimes abbreviated room descriptions rulebook" ! 352
- "check Switching score notification on rulebook" ! 353
- "carry out Switching score notification on rulebook" ! 354
- "report Switching score notification on rulebook" ! 355
- "check Switching score notification off rulebook" ! 356
- "carry out Switching score notification off rulebook" ! 357
- "report Switching score notification off rulebook" ! 358
- "check Requesting the pronoun meanings rulebook" ! 359
- "carry out Requesting the pronoun meanings rulebook" ! 360
- "report Requesting the pronoun meanings rulebook" ! 361
-;
-
-
-#ENDIF; ! MEMORY_ECONOMY
-
-[ RulePrintingRule R p1;
-#ifndef MEMORY_ECONOMY;
- if ((R>=0) && (RR);
- } else {
- if (R == R_9) { print "declare everything initially unmentioned rule"; rtrue; } ! rule 0
- if (R == R_10) { print "start in the correct scenes rule"; rtrue; } ! rule 1
- if (R == R_11) { print "when play begins stage rule"; rtrue; } ! rule 2
- if (R == R_12) { print "fix baseline scoring rule"; rtrue; } ! rule 3
- if (R == R_13) { print "display banner rule"; rtrue; } ! rule 4
- if (R == R_14) { print "initial room description rule"; rtrue; } ! rule 5
- if (R == R_15) { print "every turn stage rule"; rtrue; } ! rule 6
- if (R == R_18) { print "notify score changes rule"; rtrue; } ! rule 7
- if (R == R_19) { print "when play ends stage rule"; rtrue; } ! rule 8
- if (R == R_20) { print "print player's obituary rule"; rtrue; } ! rule 9
- if (R == R_21) { print "set pronouns from items from multiple object lists rule"; rtrue; } ! rule 10
- if (R == R_22) { print "announce items from multiple object lists rule"; rtrue; } ! rule 11
- if (R == R_23) { print "before stage rule"; rtrue; } ! rule 12
- if (R == R_24) { print "instead stage rule"; rtrue; } ! rule 13
- if (R == R_25) { print "end action-processing in success rule"; rtrue; } ! rule 14
- if (R == R_26) { print "investigate player's awareness before action rule"; rtrue; } ! rule 15
- if (R == R_27) { print "check stage rule"; rtrue; } ! rule 16
- if (R == R_28) { print "carry out stage rule"; rtrue; } ! rule 17
- if (R == R_29) { print "after stage rule"; rtrue; } ! rule 18
- if (R == R_30) { print "investigate player's awareness after action rule"; rtrue; } ! rule 19
- if (R == R_31) { print "report stage rule"; rtrue; } ! rule 20
- if (R == R_33) { print "player aware of his own actions rule"; rtrue; } ! rule 21
- if (R == R_34) { print "player aware of actions by visible actors rule"; rtrue; } ! rule 22
- if (R == R_35) { print "player aware of actions on visible nouns rule"; rtrue; } ! rule 23
- if (R == R_36) { print "player aware of actions on visible second nouns rule"; rtrue; } ! rule 24
- if (R == R_37) { print "can't act in the dark rule"; rtrue; } ! rule 25
- if (R == R_38) { print "very unlikely to mean taking what's already carried rule"; rtrue; } ! rule 26
- if (R == R_65) { print "scene description text rule"; rtrue; } ! rule 27
- if (R == R_66) { print "make named things mentioned rule"; rtrue; } ! rule 28
- if (R == R_67) { print "standard printing the plural name rule"; rtrue; } ! rule 29
- if (R == R_68) { print "standard printing a number of something rule"; rtrue; } ! rule 30
- if (R == R_69) { print "look around once light available rule"; rtrue; } ! rule 31
- if (R == R_70) { print "exclude scenery from take all rule"; rtrue; } ! rule 32
- if (R == R_71) { print "exclude people from take all rule"; rtrue; } ! rule 33
- if (R == R_72) { print "exclude fixed in place things from take all rule"; rtrue; } ! rule 34
- if (R == R_73) { print "exclude indirect possessions from take all rule"; rtrue; } ! rule 35
- if (R == R_74) { print "exclude people from drop all rule"; rtrue; } ! rule 36
- if (R == R_75) { print "ambient odour rule"; rtrue; } ! rule 37
- if (R == R_76) { print "ambient sound rule"; rtrue; } ! rule 38
- if (R == R_77) { print "block vaguely going rule"; rtrue; } ! rule 39
- if (R == R_78) { print "print the final prompt rule"; rtrue; } ! rule 40
- if (R == R_79) { print "print the final question rule"; rtrue; } ! rule 41
- if (R == R_80) { print "standard respond to final question rule"; rtrue; } ! rule 42
- if (R == R_83) { print "initialise locale description rule"; rtrue; } ! rule 43
- if (R == R_84) { print "find notable locale objects rule"; rtrue; } ! rule 44
- if (R == R_85) { print "interesting locale paragraphs rule"; rtrue; } ! rule 45
- if (R == R_86) { print "you-can-also-see rule"; rtrue; } ! rule 46
- if (R == R_87) { print "standard notable locale objects rule"; rtrue; } ! rule 47
- if (R == R_88) { print "don't mention player's supporter in room descriptions rule"; rtrue; } ! rule 48
- if (R == R_89) { print "don't mention scenery in room descriptions rule"; rtrue; } ! rule 49
- if (R == R_90) { print "don't mention undescribed items in room descriptions rule"; rtrue; } ! rule 50
- if (R == R_91) { print "set pronouns from items in room descriptions rule"; rtrue; } ! rule 51
- if (R == R_92) { print "offer items to writing a paragraph about rule"; rtrue; } ! rule 52
- if (R == R_93) { print "use initial appearance in room descriptions rule"; rtrue; } ! rule 53
- if (R == R_94) { print "initial appearance on supporters rule"; rtrue; } ! rule 54
- if (R == R_96) { print "describe what's on scenery supporters in room descriptions rule"; rtrue; } ! rule 55
- if (R == R_97) { print "describe what's on mentioned supporters in room descriptions rule"; rtrue; } ! rule 56
- if (R == R_98) { print "print empty inventory rule"; rtrue; } ! rule 57
- if (R == R_99) { print "print standard inventory rule"; rtrue; } ! rule 58
- if (R == R_100) { print "report other people taking inventory rule"; rtrue; } ! rule 59
- if (R == R_101) { print "can't take yourself rule"; rtrue; } ! rule 60
- if (R == R_102) { print "can't take other people rule"; rtrue; } ! rule 61
- if (R == R_103) { print "can't take component parts rule"; rtrue; } ! rule 62
- if (R == R_104) { print "can't take people's possessions rule"; rtrue; } ! rule 63
- if (R == R_105) { print "can't take items out of play rule"; rtrue; } ! rule 64
- if (R == R_106) { print "can't take what you're inside rule"; rtrue; } ! rule 65
- if (R == R_107) { print "can't take what's already taken rule"; rtrue; } ! rule 66
- if (R == R_108) { print "can't take scenery rule"; rtrue; } ! rule 67
- if (R == R_109) { print "can only take things rule"; rtrue; } ! rule 68
- if (R == R_110) { print "can't take what's fixed in place rule"; rtrue; } ! rule 69
- if (R == R_111) { print "use player's holdall to avoid exceeding carrying capacity rule"; rtrue; } ! rule 70
- if (R == R_112) { print "can't exceed carrying capacity rule"; rtrue; } ! rule 71
- if (R == R_113) { print "standard taking rule"; rtrue; } ! rule 72
- if (R == R_114) { print "standard report taking rule"; rtrue; } ! rule 73
- if (R == R_115) { print "can't remove what's not inside rule"; rtrue; } ! rule 74
- if (R == R_116) { print "can't remove from people rule"; rtrue; } ! rule 75
- if (R == R_117) { print "convert remove to take rule"; rtrue; } ! rule 76
- if (R == R_118) { print "can't drop yourself rule"; rtrue; } ! rule 77
- if (R == R_119) { print "can't drop body parts rule"; rtrue; } ! rule 78
- if (R == R_120) { print "can't drop what's already dropped rule"; rtrue; } ! rule 79
- if (R == R_121) { print "can't drop what's not held rule"; rtrue; } ! rule 80
- if (R == R_122) { print "can't drop clothes being worn rule"; rtrue; } ! rule 81
- if (R == R_123) { print "can't drop if this exceeds carrying capacity rule"; rtrue; } ! rule 82
- if (R == R_124) { print "standard dropping rule"; rtrue; } ! rule 83
- if (R == R_125) { print "standard report dropping rule"; rtrue; } ! rule 84
- if (R == R_126) { print "convert put to drop where possible rule"; rtrue; } ! rule 85
- if (R == R_127) { print "can't put what's not held rule"; rtrue; } ! rule 86
- if (R == R_128) { print "can't put something on itself rule"; rtrue; } ! rule 87
- if (R == R_129) { print "can't put onto what's not a supporter rule"; rtrue; } ! rule 88
- if (R == R_130) { print "can't put clothes being worn rule"; rtrue; } ! rule 89
- if (R == R_131) { print "can't put if this exceeds carrying capacity rule"; rtrue; } ! rule 90
- if (R == R_132) { print "standard putting rule"; rtrue; } ! rule 91
- if (R == R_133) { print "concise report putting rule"; rtrue; } ! rule 92
- if (R == R_134) { print "standard report putting rule"; rtrue; } ! rule 93
- if (R == R_135) { print "convert insert to drop where possible rule"; rtrue; } ! rule 94
- if (R == R_136) { print "can't insert what's not held rule"; rtrue; } ! rule 95
- if (R == R_137) { print "can't insert something into itself rule"; rtrue; } ! rule 96
- if (R == R_138) { print "can't insert into closed containers rule"; rtrue; } ! rule 97
- if (R == R_139) { print "can't insert into what's not a container rule"; rtrue; } ! rule 98
- if (R == R_140) { print "can't insert clothes being worn rule"; rtrue; } ! rule 99
- if (R == R_141) { print "can't insert if this exceeds carrying capacity rule"; rtrue; } ! rule 100
- if (R == R_142) { print "standard inserting rule"; rtrue; } ! rule 101
- if (R == R_143) { print "concise report inserting rule"; rtrue; } ! rule 102
- if (R == R_144) { print "standard report inserting rule"; rtrue; } ! rule 103
- if (R == R_145) { print "can't eat unless edible rule"; rtrue; } ! rule 104
- if (R == R_146) { print "can't eat clothing without removing it first rule"; rtrue; } ! rule 105
- if (R == R_147) { print "can't eat other people's food rule"; rtrue; } ! rule 106
- if (R == R_148) { print "can't eat portable food without carrying it rule"; rtrue; } ! rule 107
- if (R == R_149) { print "standard eating rule"; rtrue; } ! rule 108
- if (R == R_150) { print "standard report eating rule"; rtrue; } ! rule 109
- if (R == R_151) { print "standard set going variables rule"; rtrue; } ! rule 110
- if (R == R_152) { print "stand up before going rule"; rtrue; } ! rule 111
- if (R == R_153) { print "can't travel in what's not a vehicle rule"; rtrue; } ! rule 112
- if (R == R_154) { print "can't go through undescribed doors rule"; rtrue; } ! rule 113
- if (R == R_155) { print "can't go through closed doors rule"; rtrue; } ! rule 114
- if (R == R_156) { print "determine map connection rule"; rtrue; } ! rule 115
- if (R == R_157) { print "can't go that way rule"; rtrue; } ! rule 116
- if (R == R_158) { print "move player and vehicle rule"; rtrue; } ! rule 117
- if (R == R_159) { print "move floating objects rule"; rtrue; } ! rule 118
- if (R == R_160) { print "check light in new location rule"; rtrue; } ! rule 119
- if (R == R_161) { print "describe room gone into rule"; rtrue; } ! rule 120
- if (R == R_162) { print "find what to enter rule"; rtrue; } ! rule 121
- if (R == R_163) { print "convert enter door into go rule"; rtrue; } ! rule 122
- if (R == R_164) { print "convert enter compass direction into go rule"; rtrue; } ! rule 123
- if (R == R_165) { print "can't enter what's already entered rule"; rtrue; } ! rule 124
- if (R == R_166) { print "can't enter what's not enterable rule"; rtrue; } ! rule 125
- if (R == R_167) { print "can't enter closed containers rule"; rtrue; } ! rule 126
- if (R == R_168) { print "can't enter if this exceeds carrying capacity rule"; rtrue; } ! rule 127
- if (R == R_169) { print "can't enter something carried rule"; rtrue; } ! rule 128
- if (R == R_170) { print "implicitly pass through other barriers rule"; rtrue; } ! rule 129
- if (R == R_171) { print "standard entering rule"; rtrue; } ! rule 130
- if (R == R_172) { print "standard report entering rule"; rtrue; } ! rule 131
- if (R == R_173) { print "describe contents entered into rule"; rtrue; } ! rule 132
- if (R == R_175) { print "convert exit into go out rule"; rtrue; } ! rule 133
- if (R == R_176) { print "can't exit when not inside anything rule"; rtrue; } ! rule 134
- if (R == R_177) { print "can't exit closed containers rule"; rtrue; } ! rule 135
- if (R == R_178) { print "convert exit into get off rule"; rtrue; } ! rule 136
- if (R == R_179) { print "standard exiting rule"; rtrue; } ! rule 137
- if (R == R_180) { print "standard report exiting rule"; rtrue; } ! rule 138
- if (R == R_181) { print "describe room emerged into rule"; rtrue; } ! rule 139
- if (R == R_182) { print "can't get off things rule"; rtrue; } ! rule 140
- if (R == R_183) { print "standard getting off rule"; rtrue; } ! rule 141
- if (R == R_184) { print "standard report getting off rule"; rtrue; } ! rule 142
- if (R == R_185) { print "describe room stood up into rule"; rtrue; } ! rule 143
- if (R == R_186) { print "determine visibility ceiling rule"; rtrue; } ! rule 144
- if (R == R_187) { print "declare everything unmentioned rule"; rtrue; } ! rule 145
- if (R == R_188) { print "room description heading rule"; rtrue; } ! rule 146
- if (R == R_189) { print "room description body text rule"; rtrue; } ! rule 147
- if (R == R_190) { print "room description paragraphs about objects rule"; rtrue; } ! rule 148
- if (R == R_191) { print "check new arrival rule"; rtrue; } ! rule 149
- if (R == R_192) { print "other people looking rule"; rtrue; } ! rule 150
- if (R == R_193) { print "standard examining rule"; rtrue; } ! rule 151
- if (R == R_194) { print "examine directions rule"; rtrue; } ! rule 152
- if (R == R_195) { print "examine containers rule"; rtrue; } ! rule 153
- if (R == R_196) { print "examine supporters rule"; rtrue; } ! rule 154
- if (R == R_197) { print "examine devices rule"; rtrue; } ! rule 155
- if (R == R_198) { print "examine undescribed things rule"; rtrue; } ! rule 156
- if (R == R_199) { print "report other people examining rule"; rtrue; } ! rule 157
- if (R == R_200) { print "standard looking under rule"; rtrue; } ! rule 158
- if (R == R_201) { print "report other people looking under rule"; rtrue; } ! rule 159
- if (R == R_202) { print "can't search unless container or supporter rule"; rtrue; } ! rule 160
- if (R == R_203) { print "can't search closed opaque containers rule"; rtrue; } ! rule 161
- if (R == R_204) { print "standard search containers rule"; rtrue; } ! rule 162
- if (R == R_205) { print "standard search supporters rule"; rtrue; } ! rule 163
- if (R == R_206) { print "report other people searching rule"; rtrue; } ! rule 164
- if (R == R_207) { print "block consulting rule"; rtrue; } ! rule 165
- if (R == R_208) { print "can't lock without a lock rule"; rtrue; } ! rule 166
- if (R == R_209) { print "can't lock what's already locked rule"; rtrue; } ! rule 167
- if (R == R_210) { print "can't lock what's open rule"; rtrue; } ! rule 168
- if (R == R_211) { print "can't lock without the correct key rule"; rtrue; } ! rule 169
- if (R == R_212) { print "standard locking rule"; rtrue; } ! rule 170
- if (R == R_213) { print "standard report locking rule"; rtrue; } ! rule 171
- if (R == R_214) { print "can't unlock without a lock rule"; rtrue; } ! rule 172
- if (R == R_215) { print "can't unlock what's already unlocked rule"; rtrue; } ! rule 173
- if (R == R_216) { print "can't unlock without the correct key rule"; rtrue; } ! rule 174
- if (R == R_217) { print "standard unlocking rule"; rtrue; } ! rule 175
- if (R == R_218) { print "standard report unlocking rule"; rtrue; } ! rule 176
- if (R == R_219) { print "can't switch on unless switchable rule"; rtrue; } ! rule 177
- if (R == R_220) { print "can't switch on what's already on rule"; rtrue; } ! rule 178
- if (R == R_221) { print "standard switching on rule"; rtrue; } ! rule 179
- if (R == R_222) { print "standard report switching on rule"; rtrue; } ! rule 180
- if (R == R_223) { print "can't switch off unless switchable rule"; rtrue; } ! rule 181
- if (R == R_224) { print "can't switch off what's already off rule"; rtrue; } ! rule 182
- if (R == R_225) { print "standard switching off rule"; rtrue; } ! rule 183
- if (R == R_226) { print "standard report switching off rule"; rtrue; } ! rule 184
- if (R == R_227) { print "can't open unless openable rule"; rtrue; } ! rule 185
- if (R == R_228) { print "can't open what's locked rule"; rtrue; } ! rule 186
- if (R == R_229) { print "can't open what's already open rule"; rtrue; } ! rule 187
- if (R == R_230) { print "standard opening rule"; rtrue; } ! rule 188
- if (R == R_231) { print "reveal any newly visible interior rule"; rtrue; } ! rule 189
- if (R == R_232) { print "standard report opening rule"; rtrue; } ! rule 190
- if (R == R_233) { print "can't close unless openable rule"; rtrue; } ! rule 191
- if (R == R_234) { print "can't close what's already closed rule"; rtrue; } ! rule 192
- if (R == R_235) { print "standard closing rule"; rtrue; } ! rule 193
- if (R == R_236) { print "standard report closing rule"; rtrue; } ! rule 194
- if (R == R_237) { print "can't wear what's not clothing rule"; rtrue; } ! rule 195
- if (R == R_238) { print "can't wear what's not held rule"; rtrue; } ! rule 196
- if (R == R_239) { print "can't wear what's already worn rule"; rtrue; } ! rule 197
- if (R == R_240) { print "standard wearing rule"; rtrue; } ! rule 198
- if (R == R_241) { print "standard report wearing rule"; rtrue; } ! rule 199
- if (R == R_243) { print "can't take off what's not worn rule"; rtrue; } ! rule 200
- if (R == R_244) { print "can't exceed carrying capacity when taking off rule"; rtrue; } ! rule 201
- if (R == R_245) { print "standard taking off rule"; rtrue; } ! rule 202
- if (R == R_246) { print "standard report taking off rule"; rtrue; } ! rule 203
- if (R == R_247) { print "can't give what you haven't got rule"; rtrue; } ! rule 204
- if (R == R_248) { print "can't give to yourself rule"; rtrue; } ! rule 205
- if (R == R_249) { print "can't give to a non-person rule"; rtrue; } ! rule 206
- if (R == R_250) { print "can't give clothes being worn rule"; rtrue; } ! rule 207
- if (R == R_251) { print "block giving rule"; rtrue; } ! rule 208
- if (R == R_252) { print "can't exceed carrying capacity when giving rule"; rtrue; } ! rule 209
- if (R == R_253) { print "standard giving rule"; rtrue; } ! rule 210
- if (R == R_254) { print "standard report giving rule"; rtrue; } ! rule 211
- if (R == R_255) { print "can't show what you haven't got rule"; rtrue; } ! rule 212
- if (R == R_256) { print "convert show to yourself to examine rule"; rtrue; } ! rule 213
- if (R == R_257) { print "block showing rule"; rtrue; } ! rule 214
- if (R == R_258) { print "block waking rule"; rtrue; } ! rule 215
- if (R == R_259) { print "implicitly remove thrown clothing rule"; rtrue; } ! rule 216
- if (R == R_260) { print "futile to throw things at inanimate objects rule"; rtrue; } ! rule 217
- if (R == R_261) { print "block throwing at rule"; rtrue; } ! rule 218
- if (R == R_262) { print "block attacking rule"; rtrue; } ! rule 219
- if (R == R_263) { print "kissing yourself rule"; rtrue; } ! rule 220
- if (R == R_264) { print "block kissing rule"; rtrue; } ! rule 221
- if (R == R_265) { print "block answering rule"; rtrue; } ! rule 222
- if (R == R_266) { print "telling yourself rule"; rtrue; } ! rule 223
- if (R == R_267) { print "block telling rule"; rtrue; } ! rule 224
- if (R == R_268) { print "block asking rule"; rtrue; } ! rule 225
- if (R == R_269) { print "asking yourself for something rule"; rtrue; } ! rule 226
- if (R == R_270) { print "translate asking for to giving rule"; rtrue; } ! rule 227
- if (R == R_271) { print "standard report waiting rule"; rtrue; } ! rule 228
- if (R == R_272) { print "report touching yourself rule"; rtrue; } ! rule 229
- if (R == R_273) { print "report touching other people rule"; rtrue; } ! rule 230
- if (R == R_274) { print "report touching things rule"; rtrue; } ! rule 231
- if (R == R_275) { print "can't wave what's not held rule"; rtrue; } ! rule 232
- if (R == R_276) { print "report waving things rule"; rtrue; } ! rule 233
- if (R == R_277) { print "can't pull what's fixed in place rule"; rtrue; } ! rule 234
- if (R == R_278) { print "can't pull scenery rule"; rtrue; } ! rule 235
- if (R == R_279) { print "can't pull people rule"; rtrue; } ! rule 236
- if (R == R_280) { print "report pulling rule"; rtrue; } ! rule 237
- if (R == R_281) { print "can't push what's fixed in place rule"; rtrue; } ! rule 238
- if (R == R_282) { print "can't push scenery rule"; rtrue; } ! rule 239
- if (R == R_283) { print "can't push people rule"; rtrue; } ! rule 240
- if (R == R_284) { print "report pushing rule"; rtrue; } ! rule 241
- if (R == R_285) { print "can't turn what's fixed in place rule"; rtrue; } ! rule 242
- if (R == R_286) { print "can't turn scenery rule"; rtrue; } ! rule 243
- if (R == R_287) { print "can't turn people rule"; rtrue; } ! rule 244
- if (R == R_288) { print "report turning rule"; rtrue; } ! rule 245
- if (R == R_289) { print "can't push unpushable things rule"; rtrue; } ! rule 246
- if (R == R_290) { print "can't push to non-directions rule"; rtrue; } ! rule 247
- if (R == R_291) { print "can't push vertically rule"; rtrue; } ! rule 248
- if (R == R_292) { print "can't push from within rule"; rtrue; } ! rule 249
- if (R == R_293) { print "standard pushing in directions rule"; rtrue; } ! rule 250
- if (R == R_294) { print "block pushing in directions rule"; rtrue; } ! rule 251
- if (R == R_295) { print "innuendo about squeezing people rule"; rtrue; } ! rule 252
- if (R == R_296) { print "report squeezing rule"; rtrue; } ! rule 253
- if (R == R_297) { print "block saying yes rule"; rtrue; } ! rule 254
- if (R == R_298) { print "block saying no rule"; rtrue; } ! rule 255
- if (R == R_299) { print "block burning rule"; rtrue; } ! rule 256
- if (R == R_300) { print "block waking up rule"; rtrue; } ! rule 257
- if (R == R_301) { print "block thinking rule"; rtrue; } ! rule 258
- if (R == R_302) { print "report smelling rule"; rtrue; } ! rule 259
- if (R == R_303) { print "report listening rule"; rtrue; } ! rule 260
- if (R == R_304) { print "report tasting rule"; rtrue; } ! rule 261
- if (R == R_305) { print "block cutting rule"; rtrue; } ! rule 262
- if (R == R_306) { print "report jumping rule"; rtrue; } ! rule 263
- if (R == R_307) { print "block tying rule"; rtrue; } ! rule 264
- if (R == R_308) { print "block drinking rule"; rtrue; } ! rule 265
- if (R == R_309) { print "block saying sorry rule"; rtrue; } ! rule 266
- if (R == R_310) { print "block swinging rule"; rtrue; } ! rule 267
- if (R == R_311) { print "can't rub another person rule"; rtrue; } ! rule 268
- if (R == R_312) { print "report rubbing rule"; rtrue; } ! rule 269
- if (R == R_313) { print "block setting it to rule"; rtrue; } ! rule 270
- if (R == R_314) { print "report waving hands rule"; rtrue; } ! rule 271
- if (R == R_315) { print "block buying rule"; rtrue; } ! rule 272
- if (R == R_316) { print "block climbing rule"; rtrue; } ! rule 273
- if (R == R_317) { print "block sleeping rule"; rtrue; } ! rule 274
- if (R == LITTLE_USED_DO_NOTHING_R) { print "little-used do nothing rule"; rtrue; } ! rule 275
- if (R == VIRTUAL_MACHINE_STARTUP_R) { print "virtual machine startup rule"; rtrue; } ! rule 276
- if (R == INITIALISE_MEMORY_R) { print "initialise memory rule"; rtrue; } ! rule 277
- if (R == SEED_RANDOM_NUMBER_GENERATOR_R) { print "seed random number generator rule"; rtrue; } ! rule 278
- if (R == UPDATE_CHRONOLOGICAL_RECORDS_R) { print "update chronological records rule"; rtrue; } ! rule 279
- if (R == POSITION_PLAYER_IN_MODEL_R) { print "position player in model world rule"; rtrue; } ! rule 280
- if (R == ADJUST_LIGHT_R) { print "adjust light rule"; rtrue; } ! rule 281
- if (R == ADVANCE_TIME_R) { print "advance time rule"; rtrue; } ! rule 282
- if (R == GENERATE_ACTION_R) { print "generate action rule"; rtrue; } ! rule 283
- if (R == NOTE_OBJECT_ACQUISITIONS_R) { print "note object acquisitions rule"; rtrue; } ! rule 284
- if (R == PARSE_COMMAND_R) { print "parse command rule"; rtrue; } ! rule 285
- if (R == TIMED_EVENTS_R) { print "timed events rule"; rtrue; } ! rule 286
- if (R == RESURRECT_PLAYER_IF_ASKED_R) { print "resurrect player if asked rule"; rtrue; } ! rule 287
- if (R == ASK_FINAL_QUESTION_R) { print "ask the final question rule"; rtrue; } ! rule 288
- if (R == DetectSceneChange) { print "scene change machinery rule"; rtrue; } ! rule 289
- if (R == BASIC_ACCESSIBILITY_R) { print "basic accessibility rule"; rtrue; } ! rule 290
- if (R == BASIC_VISIBILITY_R) { print "basic visibility rule"; rtrue; } ! rule 291
- if (R == CARRYING_REQUIREMENTS_R) { print "carrying requirements rule"; rtrue; } ! rule 292
- if (R == REQUESTED_ACTIONS_REQUIRE_R) { print "requested actions require persuasion rule"; rtrue; } ! rule 293
- if (R == CARRY_OUT_REQUESTED_ACTIONS_R) { print "carry out requested actions rule"; rtrue; } ! rule 294
- if (R == DESCEND_TO_SPECIFIC_ACTION_R) { print "descend to specific action-processing rule"; rtrue; } ! rule 295
- if (R == WORK_OUT_DETAILS_OF_SPECIFIC_R) { print "work out details of specific action rule"; rtrue; } ! rule 296
- if (R == ACCESS_THROUGH_BARRIERS_R) { print "access through barriers rule"; rtrue; } ! rule 297
- if (R == CANT_REACH_INSIDE_CLOSED_R) { print "can't reach inside closed containers rule"; rtrue; } ! rule 298
- if (R == CANT_REACH_INSIDE_ROOMS_R) { print "can't reach inside rooms rule"; rtrue; } ! rule 299
- if (R == CANT_REACH_OUTSIDE_CLOSED_R) { print "can't reach outside closed containers rule"; rtrue; } ! rule 300
- if (R == LIST_WRITER_INTERNAL_R) { print "list writer internal rule"; rtrue; } ! rule 301
- if (R == ACTION_PROCESSING_INTERNAL_R) { print "action processing internal rule"; rtrue; } ! rule 302
- if (R == PARSER_ERROR_INTERNAL_R) { print "parser error internal rule"; rtrue; } ! rule 303
- if (R == PARSER_N_ERROR_INTERNAL_R) { print "parser nothing error internal rule"; rtrue; } ! rule 304
- if (R == DARKNESS_NAME_INTERNAL_R) { print "darkness name internal rule"; rtrue; } ! rule 305
- if (R == PARSER_COMMAND_INTERNAL_R) { print "parser command internal rule"; rtrue; } ! rule 306
- if (R == PARSER_CLARIF_INTERNAL_R) { print "parser clarification internal rule"; rtrue; } ! rule 307
- if (R == YES_OR_NO_QUESTION_INTERNAL_R) { print "yes or no question internal rule"; rtrue; } ! rule 308
- if (R == PRINT_PROTAGONIST_INTERNAL_R) { print "print protagonist internal rule"; rtrue; } ! rule 309
- if (R == STANDARD_NAME_PRINTING_R) { print "standard name printing rule"; rtrue; } ! rule 310
- if (R == STANDARD_CONTENTS_LISTING_R) { print "standard contents listing rule"; rtrue; } ! rule 311
- if (R == STANDARD_IMPLICIT_TAKING_R) { print "standard implicit taking rule"; rtrue; } ! rule 312
- if (R == ENABLE_GLULX_ACCEL_R) { print "enable Glulx acceleration rule"; rtrue; } ! rule 313
- if (R == PRINT_OBITUARY_HEADLINE_R) { print "print obituary headline rule"; rtrue; } ! rule 314
- if (R == PRINT_FINAL_SCORE_R) { print "print final score rule"; rtrue; } ! rule 315
- if (R == DISPLAY_FINAL_STATUS_LINE_R) { print "display final status line rule"; rtrue; } ! rule 316
- if (R == IMMEDIATELY_RESTART_VM_R) { print "immediately restart the VM rule"; rtrue; } ! rule 317
- if (R == IMMEDIATELY_RESTORE_SAVED_R) { print "immediately restore saved game rule"; rtrue; } ! rule 318
- if (R == IMMEDIATELY_QUIT_R) { print "immediately quit rule"; rtrue; } ! rule 319
- if (R == IMMEDIATELY_UNDO_R) { print "immediately undo rule"; rtrue; } ! rule 320
- if (R == READ_FINAL_ANSWER_R) { print "read the final answer rule"; rtrue; } ! rule 321
- if (R == STANDARD_RESPONSE_ISSUING_R) { print "standard issuing the response text rule"; rtrue; } ! rule 322
- if (R == QUIT_THE_GAME_R) { print "quit the game rule"; rtrue; } ! rule 323
- if (R == SAVE_THE_GAME_R) { print "save the game rule"; rtrue; } ! rule 324
- if (R == RESTORE_THE_GAME_R) { print "restore the game rule"; rtrue; } ! rule 325
- if (R == RESTART_THE_GAME_R) { print "restart the game rule"; rtrue; } ! rule 326
- if (R == VERIFY_THE_STORY_FILE_R) { print "verify the story file rule"; rtrue; } ! rule 327
- if (R == SWITCH_TRANSCRIPT_ON_R) { print "switch the story transcript on rule"; rtrue; } ! rule 328
- if (R == SWITCH_TRANSCRIPT_OFF_R) { print "switch the story transcript off rule"; rtrue; } ! rule 329
- if (R == ANNOUNCE_STORY_FILE_VERSION_R) { print "announce the story file version rule"; rtrue; } ! rule 330
- if (R == ANNOUNCE_SCORE_R) { print "announce the score rule"; rtrue; } ! rule 331
- if (R == PREFER_ABBREVIATED_R) { print "prefer abbreviated room descriptions rule"; rtrue; } ! rule 332
- if (R == REP_PREFER_ABBREVIATED_R) { print "standard report preferring abbreviated room descriptions rule"; rtrue; } ! rule 333
- if (R == PREFER_UNABBREVIATED_R) { print "prefer unabbreviated room descriptions rule"; rtrue; } ! rule 334
- if (R == REP_PREFER_UNABBREVIATED_R) { print "standard report preferring unabbreviated room descriptions rule"; rtrue; } ! rule 335
- if (R == PREFER_SOMETIMES_ABBREVIATED_R) { print "prefer sometimes abbreviated room descriptions rule"; rtrue; } ! rule 336
- if (R == REP_PREFER_SOMETIMES_ABBR_R) { print "standard report preferring sometimes abbreviated room descriptions rule"; rtrue; } ! rule 337
- if (R == SWITCH_SCORE_NOTIFY_ON_R) { print "switch score notification on rule"; rtrue; } ! rule 338
- if (R == REP_SWITCH_NOTIFY_ON_R) { print "standard report switching score notification on rule"; rtrue; } ! rule 339
- if (R == SWITCH_SCORE_NOTIFY_OFF_R) { print "switch score notification off rule"; rtrue; } ! rule 340
- if (R == REP_SWITCH_NOTIFY_OFF_R) { print "standard report switching score notification off rule"; rtrue; } ! rule 341
- if (R == ANNOUNCE_PRONOUN_MEANINGS_R) { print "announce the pronoun meanings rule"; rtrue; } ! rule 342
- if (R == R_16) { print "A first turn sequence rule"; rtrue; } ! rule 343
- if (R == R_17) { print "A last turn sequence rule"; rtrue; } ! rule 344
- if (R == R_32) { print "last specific action-processing rule"; rtrue; } ! rule 345
- if (R == R_174) { print "Setting action variables for exiting"; rtrue; } ! rule 346
- if (R == R_242) { print "Does the player mean taking off something worn"; rtrue; } ! rule 347
- if (R == R_799) { print "When play begins"; rtrue; } ! rule 348
- if (R == R_800) { print "Instead of doing something to the cables"; rtrue; } ! rule 349
- if (R == R_801) { print "Instead of doing something other than examining , talking , answering , asking , looking , waiting , getting off or exiting when the player is on the sofa"; rtrue; } ! rule 350
- if (R == R_802) { print "After asking the Petra about ~Lynne~"; rtrue; } ! rule 351
-
- print "(nameless rule at address ", R, ")";
- }
-#ifnot;
- if ((R>=0) && (R 0) {
- ExchangeFields(i, j); f = true; break;
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Sort.i6t: Insertion Sort
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ InsertionSortAlgorithm from to
- i j;
- if (to > from+1) {
- for (i = from+1: i < to: i++) {
- for (j = i: j > from: j--) {
- if (CompareFields(j, j-1) < 0)
- ExchangeFields(j, j-1);
- else break;
- }
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Sort.i6t: In-Place Mergesort
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ InPlaceMergeSortAlgorithm from to
- middle;
- if (to - from < 12) {
- if (to - from < 2) return;
- InsertionSortAlgorithm(from, to);
- return;
- }
- middle = (from + to)/2;
- InPlaceMergeSortAlgorithm(from, middle);
- InPlaceMergeSortAlgorithm(middle, to);
- IPMS_Merge(from, middle, to, middle-from, to - middle);
-];
-
-[ IPMS_Lower from to val
- len half mid;
- len = to - from;
- while (len > 0) {
- half = len/2;
- mid = from + half;
- if (CompareFields(mid, val) < 0) {
- from = mid + 1;
- len = len - half -1;
- } else len = half;
- }
- return from;
-];
-
-[ IPMS_Upper from to val
- len half mid;
- len = to - from;
- while (len > 0) {
- half = len/2;
- mid = from + half;
- if (CompareFields(val, mid) < 0)
- len = half;
- else {
- from = mid + 1;
- len = len - half -1;
- }
- }
- return from;
-];
-
-[ IPMS_Reverse from to;
- while (from < to) {
- ExchangeFields(from++, to--);
- }
-];
-
-[ IPMS_Rotate from mid to
- n val shift p1 p2;
- if ((from==mid) || (mid==to)) return;
- IPMS_Reverse(from, mid-1);
- IPMS_Reverse(mid, to-1);
- IPMS_Reverse(from, to-1);
-];
-
-[ IPMS_Merge from pivot to len1 len2
- first_cut second_cut len11 len22 new_mid;
- if ((len1 == 0) || (len2 == 0)) return;
- if (len1+len2 == 2) {
- if (CompareFields(pivot, from) < 0)
- ExchangeFields(pivot, from);
- return;
- }
- if (len1 > len2) {
- len11 = len1/2;
- first_cut = from + len11;
- second_cut = IPMS_Lower(pivot, to, first_cut);
- len22 = second_cut - pivot;
- } else {
- len22 = len2/2;
- second_cut = pivot + len22;
- first_cut = IPMS_Upper(from, pivot, second_cut);
- len11 = first_cut - from;
- }
- IPMS_Rotate(first_cut, pivot, second_cut);
- new_mid = first_cut + len22;
- IPMS_Merge(from, first_cut, new_mid, len11, len22);
- IPMS_Merge(new_mid, second_cut, to, len1 - len11, len2 - len22);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Format
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant TB_COLUMN_REAL $8000;
-Constant TB_COLUMN_SIGNED $4000;
-Constant TB_COLUMN_TOPIC $2000;
-Constant TB_COLUMN_DONTSORTME $1000;
-Constant TB_COLUMN_NOBLANKBITS $0800;
-Constant TB_COLUMN_CANEXCHANGE $0400;
-Constant TB_COLUMN_ALLOCATED $0200;
-Constant TB_COLUMN_NUMBER $01ff; ! Mask to remove upper bit flags
-
-Constant COL_HSIZE 2; ! Column header size: two words (ID/flags, blank bits)
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Find Column
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableFindCol tab col f i no_cols n;
- no_cols = tab-->0;
- for (i=1: i<=no_cols: i++)
- if (col == ((tab-->i)-->1) & TB_COLUMN_NUMBER) return i;
- if (f) { RunTimeProblem(RTP_TABLE_NOCOL, tab); return 0; }
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Number of Rows
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableRows tab first_col;
- first_col = tab-->1; if (first_col == 0) return 0;
- return (first_col-->0) - COL_HSIZE;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Blanks
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant TABLE_NOVALUE = IMPROBABLE_VALUE;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Masks
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array CheckTableEntryIsBlank_LU
- -> $$00000001
- $$00000010
- $$00000100
- $$00001000
- $$00010000
- $$00100000
- $$01000000
- $$10000000;
-Array CheckTableEntryIsNonBlank_LU
- -> $$11111110
- $$11111101
- $$11111011
- $$11110111
- $$11101111
- $$11011111
- $$10111111
- $$01111111;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Testing Blankness
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CheckTableEntryIsBlank tab col row i at;
- if (col >= 100) col = TableFindCol(tab, col);
- if (col == 0) rtrue;
- if ((tab-->col)-->(row+COL_HSIZE) ~= TABLE_NOVALUE) {
- print "*** CTEIB on nonblank value ", tab, " ", col, " ", row, " ***^";
- }
- if (((tab-->col)-->1) & TB_COLUMN_NOBLANKBITS) rtrue;
- row--;
- at = ((tab-->col)-->2) + (row/8);
- if ((TB_Blanks->at) & (CheckTableEntryIsBlank_LU->(row%8))) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Force Entry Blank
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ForceTableEntryBlank tab col row i at oldv flags;
- if (col >= 100) col = TableFindCol(tab, col);
- if (col == 0) rtrue;
- flags = (tab-->col)-->1;
- oldv = (tab-->col)-->(row+COL_HSIZE);
- if ((flags & TB_COLUMN_ALLOCATED) && (oldv ~= 0 or TABLE_NOVALUE))
- BlkValueFree(oldv);
- (tab-->col)-->(row+COL_HSIZE) = TABLE_NOVALUE;
- if (flags & TB_COLUMN_NOBLANKBITS) return;
- row--;
- at = ((tab-->col)-->2) + (row/8);
- (TB_Blanks->at) = (TB_Blanks->at) | (CheckTableEntryIsBlank_LU->(row%8));
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Force Entry Non-Blank
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ForceTableEntryNonBlank tab col row i at oldv flags tc kov;
- if (col >= 100) col=TableFindCol(tab, col);
- if (col == 0) rtrue;
- if (((tab-->col)-->1) & TB_COLUMN_NOBLANKBITS) return;
- flags = (tab-->col)-->1;
- oldv = (tab-->col)-->(row+COL_HSIZE);
- if ((flags & TB_COLUMN_ALLOCATED) &&
- (oldv == 0 or TABLE_NOVALUE)) {
- kov = UNKNOWN_TY;
- tc = ((tab-->col)-->1) & TB_COLUMN_NUMBER;
- kov = TC_KOV(tc);
- if (kov ~= UNKNOWN_TY) {
- (tab-->col)-->(row+COL_HSIZE) = BlkValueCreate(kov);
- }
- }
- row--;
- at = ((tab-->col)-->2) + (row/8);
- (TB_Blanks->at) = (TB_Blanks->at) & (CheckTableEntryIsNonBlank_LU->(row%8));
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Swapping Blank Bits
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableSwapBlankBits tab row1 row2 col at1 at2 bit1 bit2;
- if (col >= 100) col=TableFindCol(tab, col);
- if (col == 0) rtrue;
- if (((tab-->col)-->1) & TB_COLUMN_NOBLANKBITS) return;
- row1--;
- at1 = ((tab-->col)-->2) + (row1/8);
- row2--;
- at2 = ((tab-->col)-->2) + (row2/8);
- bit1 = ((TB_Blanks->at1) & (CheckTableEntryIsBlank_LU->(row1%8)));
- bit2 = ((TB_Blanks->at2) & (CheckTableEntryIsBlank_LU->(row2%8)));
- if (bit1) bit1 = true;
- if (bit2) bit2 = true;
- if (bit1 == bit2) return;
- if (bit1) {
- (TB_Blanks->at1)
- = (TB_Blanks->at1) & (CheckTableEntryIsNonBlank_LU->(row1%8));
- (TB_Blanks->at2)
- = (TB_Blanks->at2) | (CheckTableEntryIsBlank_LU->(row2%8));
- } else {
- (TB_Blanks->at1)
- = (TB_Blanks->at1) | (CheckTableEntryIsBlank_LU->(row1%8));
- (TB_Blanks->at2)
- = (TB_Blanks->at2) & (CheckTableEntryIsNonBlank_LU->(row2%8));
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Moving Blank Bits Down
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableMoveBlankBitsDown tab row1 row2 col at atp1 bit rx;
- if (col >= 100) col=TableFindCol(tab, col);
- if (col == 0) rtrue;
- if (((tab-->col)-->1) & TB_COLUMN_NOBLANKBITS) return;
- row1--; row2--;
- ! Read blank bit for row1:
- at = ((tab-->col)-->2) + (row1/8);
- bit = ((TB_Blanks->at) & (CheckTableEntryIsBlank_LU->(row1%8)));
- if (bit) bit = true;
- ! Loop through, setting each blank bit to the next:
- for (rx=row1:rxcol)-->2) + ((rx+1)/8);
- at = ((tab-->col)-->2) + (rx/8);
- if ((TB_Blanks->atp1) & (CheckTableEntryIsBlank_LU->((rx+1)%8))) {
- (TB_Blanks->at)
- = (TB_Blanks->at) | (CheckTableEntryIsBlank_LU->(rx%8));
- } else {
- (TB_Blanks->at)
- = (TB_Blanks->at) & (CheckTableEntryIsNonBlank_LU->(rx%8));
- }
- }
- ! Write bit to blank bit for row2:
- at = ((tab-->col)-->2) + (row2/8);
- if (bit) {
- (TB_Blanks->at)
- = (TB_Blanks->at) | (CheckTableEntryIsBlank_LU->(row2%8));
- } else {
- (TB_Blanks->at)
- = (TB_Blanks->at) & (CheckTableEntryIsNonBlank_LU->(row2%8));
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Table Row Corresponding
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableRowCorr tab col lookup_value lookup_col i j f v;
- if (col >= 100) col=TableFindCol(tab, col, true);
- lookup_col = tab-->col;
- j = lookup_col-->0 - COL_HSIZE;
- if (((tab-->col)-->1) & TB_COLUMN_ALLOCATED) f=1;
- if (f) {
- for (i=1:i<=j:i++) {
- v = lookup_col-->(i+COL_HSIZE);
- if ((v == TABLE_NOVALUE) &&
- (CheckTableEntryIsBlank(tab,col,i))) continue;
- if (BlkValueCompare(v, lookup_value) == 0)
- return i;
- }
- } else {
- for (i=1:i<=j:i++) {
- if ((lookup_value == TABLE_NOVALUE) &&
- (CheckTableEntryIsBlank(tab,col,i))) continue;
- if (lookup_col-->(i+COL_HSIZE) == lookup_value) return i;
- }
- }
- return RunTimeProblem(RTP_TABLE_NOCORR, tab);
-];
-
-[ ExistsTableRowCorr tab col entry i k v f kov;
- if (col >= 100) col=TableFindCol(tab, col);
- if (col == 0) rfalse;
- f=0;
- if (((tab-->col)-->1) & TB_COLUMN_TOPIC) f=1;
- else if (((tab-->col)-->1) & TB_COLUMN_ALLOCATED) f=2;
- k = TableRows(tab);
- for (i=1:i<=k:i++) {
- v = (tab-->col)-->(i+COL_HSIZE);
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,i))) continue;
- switch (f) {
- 1: if ((v)(entry/100, entry%100) ~= GPR_FAIL) return i;
- 2: if (BlkValueCompare(v, entry) == 0) return i;
- default: if (v == entry) return i;
- }
- }
- ! print "Giving up^";
- return 0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Table Look Up Corresponding Row
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableLookUpCorr tab col1 col2 lookup_value write_flag write_value cola1 cola2 i j v f;
- if (col1 >= 100) col1=TableFindCol(tab, col1, true);
- if (col2 >= 100) col2=TableFindCol(tab, col2, true);
- cola1 = tab-->col1;
- cola2 = tab-->col2;
- j = cola2-->0;
- f=0;
- if (((tab-->col2)-->1) & TB_COLUMN_ALLOCATED) f=1;
- if (((tab-->col2)-->1) & TB_COLUMN_TOPIC) f=2;
- for (i=1+COL_HSIZE:i<=j:i++) {
- v = cola2-->i;
-
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col2,i-COL_HSIZE))) continue;
- if (f == 1) {
- if (BlkValueCompare(v, lookup_value) ~= 0) continue;
- } else if (f == 2) {
- if ((v)(lookup_value/100, lookup_value%100) == GPR_FAIL) continue;
- } else {
- if (v ~= lookup_value) continue;
- }
- if (write_flag) {
- if (write_flag == 4) ForceTableEntryBlank(tab,col1,i-COL_HSIZE);
- else ForceTableEntryNonBlank(tab,col1,i-COL_HSIZE);
- switch (write_flag) {
- 1: cola1-->i = write_value;
- 2: cola1-->i = cola1-->i + write_value;
- 3: cola1-->i = cola1-->i - write_value;
- 5: return cola1-->i;
- }
- rfalse;
- }
- v = cola1-->i;
- if ((v == TABLE_NOVALUE) &&
- (CheckTableEntryIsBlank(tab,col1,i-COL_HSIZE))) continue;
- return v;
- }
- return RunTimeProblem(RTP_TABLE_NOCORR, tab);
-];
-
-[ ExistsTableLookUpCorr tab col1 col2 lookup_value cola1 cola2 i j f;
- if (col1 >= 100) col1=TableFindCol(tab, col1, false);
- if (col2 >= 100) col2=TableFindCol(tab, col2, false);
- if (col1*col2 == 0) rfalse;
- cola1 = tab-->col1; cola2 = tab-->col2;
- j = cola2-->0;
- f=0;
- if (((tab-->col2)-->1) & TB_COLUMN_ALLOCATED) f=1;
- if (((tab-->col2)-->1) & TB_COLUMN_TOPIC) f=2;
- for (i=1+COL_HSIZE:i<=j:i++) {
- if ((cola1-->i == TABLE_NOVALUE) &&
- (CheckTableEntryIsBlank(tab,col1,i-COL_HSIZE))) continue;
- if (f == 1) {
- if (BlkValueCompare(cola2-->i, lookup_value) ~= 0) continue;
- } else if (f == 2) {
- if ((cola2-->i)(lookup_value/100, lookup_value%100) == GPR_FAIL) continue;
- } else {
- if (cola2-->i ~= lookup_value) continue;
- }
- rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Table Look Up Entry
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableLookUpEntry tab col index write_flag write_value v;
- if (tab == 0) return RunTimeProblem(RTP_TABLE_NOTABLE2);
- if (col >= 100) col=TableFindCol(tab, col, true);
- if ((index < 1) || (index > TableRows(tab))) {
- RunTimeProblem(RTP_TABLE_NOROW, tab, index); index = 1;
- }
- if (write_flag) {
- switch(write_flag) {
- 1: ForceTableEntryNonBlank(tab,col,index);
- (tab-->col)-->(index+COL_HSIZE) = write_value;
- 2: ForceTableEntryNonBlank(tab,col,index);
- (tab-->col)-->(index+COL_HSIZE) =
- ((tab-->col)-->(index+COL_HSIZE)) + write_value;
- 3: ForceTableEntryNonBlank(tab,col,index);
- (tab-->col)-->(index+COL_HSIZE) =
- ((tab-->col)-->(index+COL_HSIZE)) - write_value;
- 4: ForceTableEntryBlank(tab,col,index);
- 5: ForceTableEntryNonBlank(tab,col,index);
- return ((tab-->col)-->(index+COL_HSIZE));
- }
- rfalse;
- }
- v = ((tab-->col)-->(index+COL_HSIZE));
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,index))) {
- RunTimeProblem(RTP_TABLE_NOENTRY, tab, col, index); rfalse;
- }
- return v;
-];
-
-[ ExistsTableLookUpEntry tab col index v;
- if (col >= 100) col=TableFindCol(tab, col);
- if (col == 0) rfalse;
- if ((index<1) || (index > TableRows(tab))) rfalse;
- v = ((tab-->col)-->(index+COL_HSIZE));
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,index)))
- rfalse;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Blank Rows
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableRowIsBlank tab j k;
- for (k=1:k<=tab-->0:k++) {
- if (((tab-->k)-->(j+COL_HSIZE)) ~= TABLE_NOVALUE) rfalse;
- if (CheckTableEntryIsBlank(tab, k, j) == false) rfalse;
- }
- rtrue;
-];
-
-[ TableBlankOutRow tab row k;
- if (tab==0) return RunTimeProblem(RTP_TABLE_NOTABLE);
- for (k=1:k<=tab-->0:k++)
- ForceTableEntryBlank(tab, k, row);
-];
-
-[ TableBlankOutColumn tab col n k;
- if (tab==0) return RunTimeProblem(RTP_TABLE_NOTABLE);
- n = TableRows(tab);
- for (k=1:k<=n:k++)
- ForceTableEntryBlank(tab, col, k);
-];
-
-[ TableBlankOutAll tab n k;
- if (tab==0) return RunTimeProblem(RTP_TABLE_NOTABLE);
- n = TableRows(tab);
- for (k=1:k<=n:k++)
- TableBlankOutRow(tab, k);
-];
-
-[ TableBlankRows tab i j c;
- i = TableRows(tab); !print i, " rows^";
- for (j=1:j<=i:j++)
- if (TableRowIsBlank(tab, j)) c++;
- !print c, " blank^";
- return c;
-];
-
-[ TableFilledRows tab;
- return TableRows(tab) - TableBlankRows(tab);
-];
-
-[ TableBlankRow tab i j;
- i = TableRows(tab);
- for (j=1:j<=i:j++)
- if (TableRowIsBlank(tab, j)) return j;
- RunTimeProblem(RTP_TABLE_NOMOREBLANKS, tab);
- return i;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Random Row
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableRandomRow tab i j k;
- i = TableRows(tab);
- j = TableFilledRows(tab);
- if (j==0) return RunTimeProblem(RTP_TABLE_NOROWS, tab);
- if (j>1) j = random(j);
- for (k=1:k<=i:k++) {
- if (TableRowIsBlank(tab, k) == false) j--;
- if (j==0) return k;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Swap Rows
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableSwapRows tab i j k l v1 v2;
- if (i==j) return;
- l = tab-->0;
- for (k=1:k<=l:k++) {
- v1 = (tab-->k)-->(i+COL_HSIZE);
- v2 = (tab-->k)-->(j+COL_HSIZE);
- (tab-->k)-->(i+COL_HSIZE) = v2;
- (tab-->k)-->(j+COL_HSIZE) = v1;
- if ((v1 == TABLE_NOVALUE) || (v2 == TABLE_NOVALUE))
- TableSwapBlankBits(tab, i, j, k);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Compare Rows
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableCompareRows tab col row1 row2 dir val1 val2 bl1 bl2 f;
- if (col >= 100) col=TableFindCol(tab, col, false);
- val1 = (tab-->col)-->(row1+COL_HSIZE);
- val2 = (tab-->col)-->(row2+COL_HSIZE);
- if (val1 == TABLE_NOVALUE) bl1 = CheckTableEntryIsBlank(tab,col,row1);
- if (val2 == TABLE_NOVALUE) bl2 = CheckTableEntryIsBlank(tab,col,row2);
- if ((val1 == val2) && (bl1 == bl2)) {
- if (val1 ~= TABLE_NOVALUE) return 0;
- if (bl1 == false) return 0;
- ! The two entries are both blank:
- if (TableRowIsBlank(tab, row1)) {
- if (TableRowIsBlank(tab, row2)) return 0;
- return -1*dir;
- }
- if (TableRowIsBlank(tab, row2)) return dir;
- return 0;
- }
- if (bl1) return dir;
- if (bl2) return -1*dir;
- f = ((tab-->col)-->1);
- if (f & TB_COLUMN_ALLOCATED) {
- if (BlkValueCompare(val2, val1) < 0) return 1;
- return -1;
- } else if (f & TB_COLUMN_REAL) {
- if (REAL_NUMBER_TY_Compare(val1, val2) > 0) return 1;
- return -1;
- } else if (f & TB_COLUMN_SIGNED) {
- if (val1 > val2) return 1;
- return -1;
- } else {
- if (UnsignedCompare(val1, val2) > 0) return 1;
- return -1;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Move Row Down
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableMoveRowDown tab r1 r2 rx k l m v f;
- if (r1==r2) return;
- l = tab-->0;
- for (k=1:k<=l:k++) {
- f = false;
- m = (tab-->k)-->(r1+COL_HSIZE);
- if (m == TABLE_NOVALUE) f = true;
- for (rx=r1:rxk)-->(rx+COL_HSIZE+1);
- (tab-->k)-->(rx+COL_HSIZE) = v;
- if (v == TABLE_NOVALUE) f = true;
- }
- (tab-->k)-->(r2+COL_HSIZE) = m;
- if (f) TableMoveBlankBitsDown(tab, r1, r2, k);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Shuffle
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableShuffle tab i to;
- TableMoveBlanksToBack(tab, 1, TableRows(tab));
- to = TableFilledRows(tab);
- for (i=2:i<=to:i++) TableSwapRows(tab, i, random(i));
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Next Row
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableNextRow tab col row dir i k val v dv min_dv min_at signed_arithmetic f blk z;
- if (col >= 100) col=TableFindCol(tab, col, false);
- f = ((tab-->col)-->1);
- if (f & TB_COLUMN_ALLOCATED) blk = true;
- signed_arithmetic = f & TB_COLUMN_SIGNED;
- #Iftrue (WORDSIZE == 2);
- if (row == 0) {
- if (signed_arithmetic) {
- if (dir == 1) val = $8000; else val = $7fff;
- } else {
- if (dir == 1) val = 0; else val = $ffff;
- }
- } else val = (tab-->col)-->(row+COL_HSIZE);
- if (signed_arithmetic) min_dv = $7fff; else min_dv = $ffff;
- #ifnot; ! WORDSIZE == 4
- if (row == 0) {
- if (signed_arithmetic) {
- if (dir == 1) val = $80000000; else val = $7fffffff;
- } else {
- if (dir == 1) val = 0; else val = $ffffffff;
- }
- } else val = (tab-->col)-->(row+COL_HSIZE);
- if (signed_arithmetic) min_dv = $7fffffff; else min_dv = $ffffffff;
- #endif;
- k = TableRows(tab);
- if (dir == 1) {
- for (i=1:i<=k:i++) {
- v = (tab-->col)-->(i+COL_HSIZE);
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,i)))
- continue;
- if (blk) {
- dv = v;
- if (row == 0) z = 1; else z = BlkValueCompare(v, val);
- f = (((z > 0) || ((z == 0) && (i > row))) &&
- ((min_at == 0) || (BlkValueCompare(v, min_dv) < 0)));
- } else {
- dv = dir*v;
- if (signed_arithmetic)
- f = (((dv > dir*val) || ((v == val) && (i>row))) &&
- (dv < min_dv));
- else
- f = (((UnsignedCompare(dv, dir*val) > 0) || ((v == val) && (i>row))) &&
- (UnsignedCompare(dv, min_dv) < 0));
- }
- if (f) { min_dv = dv; min_at = i; }
- }
- } else {
- for (i=k:i>=1:i--) {
- v = (tab-->col)-->(i+COL_HSIZE);
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,i)))
- continue;
- if (blk) {
- dv = v;
- if (row == 0) z = -1; else z = BlkValueCompare(v, val);
- f = (((z < 0) || ((z == 0) && (i < row))) &&
- ((min_at == 0) || (BlkValueCompare(v, min_dv) > 0)));
- } else {
- dv = dir*v;
- if (signed_arithmetic)
- f = (((dv > dir*val) || ((v == val) && (i 0) || ((v == val) && (i0) && (lnbl>0) && (fbl < lnbl)) {
- TableMoveRowDown(tab, fbl, lnbl); ! Move first blank just past last nonblank
- TableMoveBlanksToBack(tab, fbl, lnbl-1);
- }
- return torow-blc; ! Final non-blank row
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Sort
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableSort tab col dir test_flag algorithm i j k f;
- for (i=1:i<=tab-->0:i++) {
- j = tab-->i; ! Address of column table
- if ((j-->1) & TB_COLUMN_DONTSORTME)
- return RunTimeProblem(RTP_TABLE_CANTSORT, tab);
- }
- if (col >= 100) col=TableFindCol(tab, col, false);
- k = TableRows(tab);
- k = TableMoveBlanksToBack(tab, 1, k);
- if (test_flag) {
- print "After moving blanks to back:^"; TableColumnDebug(tab, col);
- }
-
- SetSortDomain(TableSwapRows, TableCompareRows);
- SortArray(tab, col, dir, k, test_flag, algorithm);
-
- if (test_flag) {
- print "Final state:^"; TableColumnDebug(tab, col);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Print Table Name
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintTableName T;
- switch(T) {
- TheEmptyTable: print "(the empty table)"; return;
- T0_final_question_options: print "Table of Final Question Options"; return;
- T1_locale_priorities: print "Table of Locale Priorities"; return;
-
- default: print "** No such table **";
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Print Table to File
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TablePrint tab i j k row col v tc kov;
- for (i=1:i<=tab-->0:i++) {
- j = tab-->i; ! Address of column table
- if (((j-->1) & TB_COLUMN_CANEXCHANGE) == 0)
- rtrue;
- }
- k = TableRows(tab);
- k = TableMoveBlanksToBack(tab, 1, k);
- print "! ", (PrintTableName) tab, " (", k, ")^";
- for (row=1:row<=k:row++) {
- for (col=1:col<=tab-->0:col++) {
- tc = ((tab-->col)-->1) & TB_COLUMN_NUMBER;
- kov = KindAtomic(TC_KOV(tc));
- if (kov == UNKNOWN_TY) kov = NUMBER_TY;
- v = (tab-->col)-->(row+COL_HSIZE);
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,row)))
- print "-- ";
- else {
- if (BlkValueWriteToFile(v, kov) == false) print v;
- print " ";
- }
- }
- print "^";
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Read Table from File
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifdef TARGET_GLULX;
-[ TableRead tab auxf row maxrow col ch v sgn dg j tc kov;
- for (col=1:col<=tab-->0:col++) {
- j = tab-->col; ! Address of column table
- if (((j-->1) & TB_COLUMN_CANEXCHANGE) == 0)
- return RunTimeProblem(RTP_TABLE_CANTSAVE, tab);
- }
- maxrow = TableRows(tab);
- !print maxrow, " rows available.^";
- for (row=1: row<=maxrow: row++) {
- TableBlankOutRow(tab, row);
- }
- for (row=1: row<=maxrow: row++) {
- !print "Reading row ", row, "^";
- ch = FileIO_GetC(auxf);
- if (ch == '!') {
- while (ch ~= -1 or 10 or 13) ch = FileIO_GetC(auxf);
- while (ch == 10 or 13) ch = FileIO_GetC(auxf);
- }
- for (col=1: col<=tab-->0: col++) {
- if (ch == -1) { row++; jump NoMore; }
- if (ch == 10 or 13) break;
- tc = ((tab-->col)-->1) & TB_COLUMN_NUMBER;
- kov = KindAtomic(TC_KOV(tc));
- if (kov == UNKNOWN_TY) kov = NUMBER_TY;
- !print "tc = ", tc, " kov = ", kov, "^";
- sgn = 1;
- if (ch == '-') {
- ch = FileIO_GetC(auxf);
- if (ch == -1) jump NotTable;
- if (ch == '-') { ch = FileIO_GetC(auxf); jump EntryDone; }
- sgn = -1;
- }
- if (((tab-->col)-->1) & TB_COLUMN_ALLOCATED)
- ForceTableEntryNonBlank(tab, col, row);
- !print "A";
- v = BlkValueReadFromFile(0, 0, -1, kov);
- if (v) {
- if (((tab-->col)-->1) & TB_COLUMN_ALLOCATED)
- v = BlkValueReadFromFile(TableLookUpEntry(tab, col, row),
- auxf, ch, kov);
- else
- v = BlkValueReadFromFile(0, auxf, ch, kov);
- ch = 32;
- } else {
- dg = ch - '0';
- if ((dg < 0) || (dg > 9)) jump NotTable;
- v = dg;
- for (::) {
- ch = FileIO_GetC(auxf);
- dg = ch - '0';
- if ((dg < 0) || (dg > 9)) break;
- v = 10*v + dg;
- }
- v = v*sgn;
- }
- !print "v=", v, " ";
- if (((tab-->col)-->1) & TB_COLUMN_ALLOCATED == 0)
- TableLookUpEntry(tab, col, row, true, v);
- .EntryDone;
- !print "First nd is ", ch, "^";
- while (ch == 9 or 32) ch = FileIO_GetC(auxf);
- }
- while (ch ~= -1 or 10 or 13) {
- if ((ch ~= '-') && (((ch-'0')<0) || ((ch-'0')>9))) jump NotTable;
- if (ch ~= 9 or 32) jump WontFit;
- ch = FileIO_GetC(auxf);
- }
- }
- .NoMore;
- while (ch == 9 or 32 or 10 or 13) ch = FileIO_GetC(auxf);
- if (ch == -1) return;
- .WontFit;
- return RunTimeProblem(RTP_TABLE_WONTFIT, tab);
- .NotTable;
- return RunTimeProblem(RTP_TABLE_BADFILE, tab);
-];
-#ENDIF; ! TARGET_GLULX
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Print Rank
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintRank i j v;
-#ifdef RANKING_TABLE;
- ANNOUNCE_SCORE_RM('B');
- j = TableRows(RANKING_TABLE);
- for (i=j:i>=1:i--)
- if (score >= TableLookUpEntry(RANKING_TABLE, 1, i)) {
- v = TableLookUpEntry(RANKING_TABLE, 2, i);
- TEXT_TY_Say(v);
- ".";
- }
-#endif;
- ".";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tables.i6t: Debugging
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TableColumnDebug tab col k i v tc kov;
- if (col >= 100) col=TableFindCol(tab, col, false);
- k = TableRows(tab);
- tc = ((tab-->col)-->1) & TB_COLUMN_NUMBER;
- kov = TC_KOV(tc);
- for (i=1:i<=k:i++) {
- if (i>1) print ", ";
- v = (tab-->col)-->(i+COL_HSIZE);
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,i)))
- print "--";
- else {
- PrintKindValuePair(kov, v);
- }
- }
- say__p = 1;
-];
-
-[ TableRowDebug tab i col k v tc kov;
- k = TableRows(tab);
- if ((i<1) || (i>k)) "No such row";
- print "(row ", i, ") |";
- for (col=1: col<=tab-->0: col++) {
- print " ";
- tc = ((tab-->col)-->1) & TB_COLUMN_NUMBER;
- kov = TC_KOV(tc);
- v = (tab-->col)-->(i+COL_HSIZE);
- if ((v == TABLE_NOVALUE) && (CheckTableEntryIsBlank(tab,col,i)))
- print "-- ";
- else {
- PrintKindValuePair(kov, v);
- print " |";
- }
- }
- say__p = 1;
-];
-
-[ TableDebug tab i k;
- PrintTableName(tab); print "^";
- k = TableRows(tab);
- for (i=1:i<=k:i++) { TableRowDebug(tab, i); print "^"; }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: The Core Tree
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ HolderOf o;
- if (InitialSituation-->DONE_INIS == false) return thedark;
- if (o && (o.component_parent)) return o.component_parent;
- if (o && (parent(o))) return parent(o);
- return nothing;
-];
-
-[ ParentOf o;
- if (o) o = parent(o);
- return o;
-];
-
-[ CoreOf o;
- while (o && (o provides component_parent) && (o.component_parent)) o = o.component_parent;
- return o;
-];
-
-[ CoreOfParentOfCoreOf o;
- while (o && (o provides component_parent) && (o.component_parent)) o = o.component_parent;
- if (o) o = parent(o);
- while (o && (o provides component_parent) && (o.component_parent)) o = o.component_parent;
- return o;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Climbing the Core Tree
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LocationOf o;
- if (~~(o ofclass K1_room or K2_thing)) return nothing;
- if (o ofclass K4_door) {
- if (parent(o) == real_location) return real_location;
- return FrontSideOfDoor(o);
- }
- if (o ofclass K7_backdrop) {
- ! print "(deciding ", (the) O, " is at ", (the) BackdropLocation(o), ") ";
- return BackdropLocation(o);
- }
- while (o) {
- if (o ofclass K1_room) return o;
- o = CoreOfParentOfCoreOf(o);
- }
- return nothing;
-];
-
-[ CommonAncestor o1 o2 i j;
- o1 = CoreOf(o1);
- o2 = CoreOf(o2);
-
- for (i=o1: i: i = CoreOfParentOfCoreOf(i))
- for (j=o2: j: j = CoreOfParentOfCoreOf(j))
- if (j == i) return j;
-
- return nothing;
-];
-
-[ IndirectlyContains o1 o2;
- if ((o1 == nothing) || (o2 == nothing)) rfalse;
- if ((o1 ofclass K1_room) && (o2 ofclass K4_door)) {
- if (o1 == FrontSideOfDoor(o2)) rtrue;
- if (o1 == BackSideOfDoor(o2)) rtrue;
- rfalse;
- }
- if (o2 ofclass K7_backdrop) rfalse;
- for (o2 = HolderOf(o2) : o2 && o2 ~= thedark : o2 = HolderOf(o2)) if (o2 == o1) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: To Decide Whether In
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WhetherIn obj;
- if (obj has enterable) {
- if (IndirectlyContains(obj, player)) rtrue;
- rfalse;
- }
- if (obj ofclass K9_region) return TestRegionalContainment(real_location, obj);
- if (obj ofclass K1_room) {
- if (obj == real_location) rtrue;
- rfalse;
- }
- RunTimeProblem(RTP_NOTINAROOM, obj);
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Containment Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ContainerOf A p;
- if (A ofclass K1_room) return A.map_region;
- p = parent(A);
- if (p == nothing) return nothing;
- if (p ofclass K5_container) return p;
- if (p ofclass K1_room) return p;
- if (p ofclass K9_region) return p;
- return nothing;
-];
-
-[ TestContainmentRange obj e f;
- if (obj ofclass K9_region) {
- objectloop (f ofclass K1_room && f.map_region == obj)
- if (f > e) return f;
- return nothing;
- }
- if (obj ofclass K5_container or K1_room) {
- if (e == nothing) return child(obj);
- return sibling(e);
- }
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Support Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SupporterOf obj p;
- p = parent(obj);
- if (p == nothing) return nothing;
- if (p ofclass K6_supporter) return p;
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Carrying Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CarrierOf obj p;
- p = parent(obj);
- if (p && (p ofclass K8_person) && (obj hasnt worn)) return p;
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Wearing Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WearerOf obj p;
- p = parent(obj);
- if (p && (p ofclass K8_person) && (obj has worn)) return p;
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Having Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ OwnerOf obj p;
- p = parent(obj);
- if (p && (p ofclass K8_person)) return p;
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Making Parts
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MakePart P Of First;
- if (P == player) return RunTimeProblem(RTP_CANTMAKEPART, Of);
- if (parent(P)) remove P; give P ~worn;
- if (Of == nothing) { DetachPart(P); return; }
- if (P.component_parent) DetachPart(P);
- P.component_parent = Of;
- First = Of.component_child;
- Of.component_child = P; P.component_sibling = First;
-];
-
-[ DetachPart P From Daddy O;
- Daddy = P.component_parent; P.component_parent = nothing;
- if (Daddy == nothing) { P.component_sibling = nothing; return; }
- if (Daddy.component_child == P) {
- Daddy.component_child = P.component_sibling;
- P.component_sibling = nothing; return;
- }
- for (O = Daddy.component_child: O: O = O.component_sibling)
- if (O.component_sibling == P) {
- O.component_sibling = P.component_sibling;
- P.component_sibling = nothing; return;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Movements
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MoveObject F T opt going_mode was L;
- if (F == nothing) return RunTimeProblem(RTP_CANTMOVENOTHING);
- if (F ofclass K7_backdrop) {
- if (T ofclass K9_region) {
- give F ~absent; F.found_in = T.regional_found_in;
- if (TestRegionalContainment(LocationOf(player), T)) move F to LocationOf(player);
- else remove F;
- return; }
- if (T == FoundEverywhere) {
- give F ~absent; F.found_in = FoundEverywhere;
- return;
- }
- return RunTimeProblem(RTP_BACKDROP, F, T);
- }
- if (T ofclass K9_region) return RunTimeProblem(RTP_NOTBACKDROP, F, T);
- if (T == FoundEverywhere) return RunTimeProblem(RTP_BACKDROPONLY, F);
- if (~~(F ofclass K2_thing)) return RunTimeProblem(RTP_NOTTHING, F, T);
- if (F has worn) {
- give F ~worn;
- if (F in T) return;
- }
- DetachPart(F);
- if (going_mode == false) {
- if (F == player) { PlayerTo(T, opt); return; }
- if (IndirectlyContains(F, player)) {
- L = LocationOf(T);
- if (L == nothing) return RunTimeProblem(RTP_CANTBEOFFSTAGE);
- if (LocationOf(player) ~= L) {
- was = parent(player);
- move player to real_location;
- move F to T;
- PlayerTo(was, true);
- return;
- }
- }
- }
- move F to T;
-];
-
-[ RemoveFromPlay F;
- if (F == nothing) return RunTimeProblem(RTP_CANTREMOVENOTHING);
- if (F == player) return RunTimeProblem(RTP_CANTREMOVEPLAYER);
- if (F ofclass K4_door) return RunTimeProblem(RTP_CANTREMOVEDOORS);
- if (IndirectlyContains(F, player)) return RunTimeProblem(RTP_CANTBEOFFSTAGE);
- give F ~worn; DetachPart(F);
- if (F ofclass K7_backdrop) give F absent;
- remove F;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: On Stage
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ OnStage O set x;
- if (O ofclass K1_room) rfalse;
- if (set < 0) {
- while (metaclass(O) == Object) {
- if (O ofclass K1_room) rtrue;
- if (O ofclass K9_region) rfalse;
- if (O ofclass K4_door) rtrue;
- if (O ofclass K7_backdrop) { if (O has absent) rfalse; rtrue; }
- x = O.component_parent; if (x) { O = x; continue; }
- x = parent(O); if (x) { O = x; continue; }
- rfalse;
- }
- }
- x = OnStage(O, -1);
- if ((x) && (set == false)) RemoveFromPlay(O);
- if ((x == false) && (set)) MoveObject(O, real_location);
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Moving the Player
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PlayerTo newplace flag L;
- L = LocationOf(newplace);
- if (L == nothing) return RunTimeProblem(RTP_CANTBEOFFSTAGE);
- @push actor; actor = player;
- move player to newplace;
- location = L;
- real_location = location;
- MoveFloatingObjects();
- SilentlyConsiderLight();
- DivideParagraphPoint();
- if (flag == 0) ;
- if (flag == 1) give location visited;
- if (flag == 2) AbbreviatedRoomDescription();
- @pull actor;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Move During Going
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MoveDuringGoing F T;
- MoveObject(F, T, 0, true);
- if (actor == player) {
- location = LocationOf(player);
- real_location = location;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Being Everywhere
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FoundEverywhere; rtrue; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Testing Everywhere
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BackdropEverywhere O;
- if (O ofclass K7_backdrop) {
- if (O has absent) rfalse;
- if (O.found_in == FoundEverywhere) rtrue;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Changing the Player
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ChangePlayer obj flag;
- if (~~(obj ofclass K8_person)) return RunTimeProblem(RTP_CANTCHANGE, obj);
- if (~~(OnStage(obj, -1))) return RunTimeProblem(RTP_CANTCHANGEOFFSTAGE, obj);
- if (obj.component_parent) return RunTimeProblem(RTP_CANTMAKEPART, obj);
- if (obj == player) return;
-
- give player ~concealed;
- if (player has remove_proper) give player ~proper;
- if (player == selfobj) {
- player.saved_short_name = player.short_name;
- player.short_name = PRINT_PROTAGONIST_INTERNAL_RM('c');
- }
- player = obj;
- if (player == selfobj) {
- player.short_name = player.saved_short_name;
- }
- if (player hasnt proper) give player remove_proper; ! when changing out again
- give player concealed proper;
-
- location = LocationOf(player); real_location = location;
- MoveFloatingObjects();
- SilentlyConsiderLight();
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Floating Objects
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MoveFloatingObjects toroom i k l m address flag;
- if (toroom == nothing) toroom = real_location;
- if (toroom == nothing) return;
- objectloop (i) {
- address = i.&found_in;
- if (address ~= 0 && i hasnt absent) {
- if (ZRegion(address-->0) == 2) {
- m = address-->0;
- .TestPropositionally;
- if (m.call(toroom) ~= 0) move i to toroom;
- else { if (i in toroom) remove i; }
- } else {
- k = i.#found_in;
- for (l=0 : ll;
- if (ZRegion(m) == 2) jump TestPropositionally;
- if (m == toroom || m in toroom) {
- if (i notin toroom) move i to toroom;
- flag = true;
- }
- }
- if (flag == false) { if (i in toroom) remove i; }
- }
- if ((i ofclass K4_door) && (parent(i) == nothing)) {
- move i to ((i.door_to).call());
- }
- }
- }
-];
-
-[ MoveBackdrop bd D x address;
- if (~~(bd ofclass K7_backdrop)) return RunTimeProblem(RTP_BACKDROPONLY, bd);
- if (bd.#found_in > WORDSIZE) {
- address = bd.&found_in;
- address-->0 = D;
- } else bd.found_in = D;
- give bd ~absent;
- MoveFloatingObjects();
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Backdrop Location
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BackdropLocation O target address m x i k l r sl;
- if (O has absent) return nothing;
- if ((target == nothing or real_location) && (parent(O) == real_location))
- return real_location;
- address = O.&found_in;
- if (address ~= 0) {
- k = O.#found_in;
- for (l=0 : ll;
- if (ZRegion(m) == 2) {
- sl = location;
- if (target) {
- location = target;
- r = m.call();
- if (r ~= 0) { location = sl; return target; }
- } else {
- objectloop (x ofclass K1_room) {
- location = x;
- r = m.call();
- if (r ~= 0) { location = sl; return x; }
- }
- }
- location = sl;
- } else {
- if (m ofclass K9_region) {
- objectloop (x ofclass K1_room)
- if (TestRegionalContainment(x, m))
- if (target == nothing or x)
- return x;
- } else {
- if (target == nothing or m) return m;
- }
- }
- }
- }
- return nothing;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Wearing Clothes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WearObject X P opt;
- if (X == false) rfalse;
- if (X notin P) MoveObject(X, P, opt);
- give X worn;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Map Connections
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ MapConnection from_room dir
- in_direction through_door;
- if ((from_room ofclass K1_room) && (dir ofclass K3_direction)) {
- in_direction = Map_Storage-->
- ((from_room.IK1_Count)*No_Directions + dir.IK3_Count);
- if (in_direction ofclass K1_room) return in_direction;
- if (in_direction ofclass K4_door) {
- @push location;
- location = from_room;
- through_door = in_direction.door_to();
- @pull location;
- if (through_door ofclass K1_room) return through_door;
- }
- }
- return nothing;
-];
-
-[ DoorFrom obj dir rv;
- rv = RoomOrDoorFrom(obj, dir);
- if (rv ofclass K4_door) return rv;
- return nothing;
-];
-
-[ RoomOrDoorFrom obj dir use_doors in_direction sl through_door;
- if ((obj ofclass K1_room) && (dir ofclass K3_direction)) {
- in_direction = Map_Storage-->
- ((obj.IK1_Count)*No_Directions + dir.IK3_Count);
- if (in_direction ofclass K1_room or K4_door) return in_direction;
- }
- return nothing;
-];
-
-[ AssertMapConnection r1 dir r2 in_direction;
- SignalMapChange();
- in_direction = Map_Storage-->
- ((r1.IK1_Count)*No_Directions + dir.IK3_Count);
- if ((in_direction == 0) || (in_direction ofclass K1_room)) {
- Map_Storage-->((r1.IK1_Count)*No_Directions + dir.IK3_Count) = r2;
- return;
- }
- if (in_direction ofclass K4_door) {
- RunTimeProblem(RTP_EXITDOOR, r1, dir);
- return;
- }
- RunTimeProblem(RTP_NOEXIT, r1, dir);
-];
-
-[ AssertMapUnconnection r1 dir r2 in_direction;
- SignalMapChange();
- in_direction = Map_Storage-->
- ((r1.IK1_Count)*No_Directions + dir.IK3_Count);
- if (r1 ofclass K4_door) {
- RunTimeProblem(RTP_EXITDOOR, r1, dir);
- return;
- }
- if (in_direction == r2)
- Map_Storage-->((r1.IK1_Count)*No_Directions + dir.IK3_Count) = 0;
- return;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Adjacency Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestAdjacency R1 R2 i row;
- if (R1 ofclass K9_region) RunTimeProblem(RTP_REGIONSNOTADJACENT, R1);
- else if (R2 ofclass K9_region) RunTimeProblem(RTP_REGIONSNOTADJACENT, R2);
- row = (R1.IK1_Count)*No_Directions;
- for (i=0: irow == R2) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Regional Containment Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestRegionalContainment obj region o;
- if ((obj == nothing) || (region == nothing)) rfalse;
- if (obj ofclass K7_backdrop or K4_door) {
- if (obj has absent) rfalse;
- objectloop (o ofclass K1_room)
- if (TestRegionalContainment(o, region))
- if (BackdropLocation(obj, o))
- rtrue;
- rfalse;
- }
- if (~~(obj ofclass K1_room)) obj = LocationOf(obj);
- if (obj == nothing) rfalse;
- o = obj.map_region;
- while (o) {
- if (o == region) rtrue;
- o = parent(o);
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Doors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FrontSideOfDoor D; if (~~(D ofclass K4_door)) rfalse;
- if (D provides found_in) return (D.&found_in)-->0; ! Two-sided
- return parent(D); ! One-sided
-];
-
-[ BackSideOfDoor D; if (~~(D ofclass K4_door)) rfalse;
- if (D provides found_in) return (D.&found_in)-->1; ! Two-sided
- return nothing; ! One-sided
-];
-
-[ OtherSideOfDoor D from_room rv;
- if (D ofclass K4_door) {
- @push location;
- location = LocationOf(from_room);
- rv = D.door_to();
- @pull location;
- }
- return rv;
-];
-
-[ DirectionDoorLeadsIn D from_room rv dir;
- if (D ofclass K4_door) {
- @push location;
- location = LocationOf(from_room);
- rv = D.door_dir();
- @pull location;
- }
- return rv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Visibility Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestVisibility A B;
- if (~~OffersLight(parent(CoreOf(A)))) rfalse;
- if (suppress_scope_loops) rtrue;
- return TestScope(B, A);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Touchability Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestTouchability A B rv;
- if (A ofclass K4_door or K7_backdrop) MoveFloatingObjects(LocationOf(B));
- if (B ofclass K4_door or K7_backdrop) MoveFloatingObjects(LocationOf(A));
- if (TestScope(B,A) == false) rv = true;
- else rv = ObjectIsUntouchable(B, true, A);
- if (A ofclass K4_door or K7_backdrop) MoveFloatingObjects();
- if (rv) rfalse;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! WorldModel.i6t: Concealment Relation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TestConcealment A B;
- if (A ofclass K2_thing && B ofclass K2_thing) {
- particular_possession = B;
- if (CarryOutActivity(DECIDING_CONCEALED_POSSESS_ACT, A)) rtrue;
- }
- rfalse;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Parsing Tokens
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-[ Cond_Token_12 ;
- if ((((~~((player == selfobj)))))) return GPR_PREPOSITION;
- return GPR_FAIL;
-];
-[ Cond_Token_13 ;
- if ((((~~((player == selfobj)))))) return GPR_PREPOSITION;
- return GPR_FAIL;
-];
-[ Cond_Token_14 ;
- if ((((~~((player == selfobj)))))) return GPR_PREPOSITION;
- return GPR_FAIL;
-];
-[ Cond_Token_15 ;
- if ((((~~((player == selfobj)))))) return GPR_PREPOSITION;
- return GPR_FAIL;
-];
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Number.i6t: Understanding
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DECIMAL_TOKEN wnc wna r n wa wl sign base digit digit_count original_wn group_wn;
- wnc = wn; original_wn = wn; group_wn = wn;
-
- wn = wnc;
- r = ParseTokenStopped(ELEMENTARY_TT, NUMBER_TOKEN);
- if ((r == GPR_NUMBER) && (parsed_number ~= 10000)) return r;
- wn = wnc;
- wa = WordAddress(wn);
- wl = WordLength(wn);
- sign = 1; base = 10; digit_count = 0;
- if (wa->0 ~= '-' or '$' or '0' or '1' or '2' or '3' or '4'
- or '5' or '6' or '7' or '8' or '9')
- return GPR_FAIL;
- if (wa->0 == '-') { sign = -1; wl--; wa++; }
- if (wl == 0) return GPR_FAIL;
- n = 0;
- while (wl > 0) {
- if (wa->0 >= 'a') digit = wa->0 - 'a' + 10;
- else digit = wa->0 - '0';
- digit_count++;
- switch (base) {
- 2: if (digit_count == 17) return GPR_FAIL;
- 10:
- #Iftrue (WORDSIZE == 2);
- if (digit_count == 6) return GPR_FAIL;
- if (digit_count == 5) {
- if (n > 3276) return GPR_FAIL;
- if (n == 3276) {
- if (sign == 1 && digit > 7) return GPR_FAIL;
- if (sign == -1 && digit > 8) return GPR_FAIL;
- }
- }
- #Ifnot; ! i.e., if (WORDSIZE == 4)
- if (digit_count == 11) return GPR_FAIL;
- if (digit_count == 10) {
- if (n > 214748364) return GPR_FAIL;
- if (n == 214748364) {
- if (sign == 1 && digit > 7) return GPR_FAIL;
- if (sign == -1 && digit > 8) return GPR_FAIL;
- }
- }
- #Endif;
- 16: if (digit_count == 5) return GPR_FAIL;
- }
- if (digit >= 0 && digit < base) n = base*n + digit;
- else return GPR_FAIL;
- wl--; wa++;
- }
- parsed_number = n*sign; wn++;
- return GPR_NUMBER;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Number.i6t: Truth states
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TRUTH_STATE_TOKEN original_wn wd;
- original_wn = wn;
-
- wn = original_wn;
- wd = NextWordStopped();
- if (wd == 'true') { parsed_number = 1; return GPR_NUMBER; }
- if (wd == 'false') { parsed_number = 0; return GPR_NUMBER; }
- wn = original_wn;
- return GPR_FAIL;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Number.i6t: Absolute value
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NUMBER_TY_Abs x; if (x<0) return -x; return x; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RealNumber.i6t: Printing reals
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Ifdef TARGET_GLULX;
-
-[ REAL_NUMBER_TY_Say fp;
- print (Float) fp;
-];
-
-[ REAL_NUMBER_TY_Compare r1 r2;
- @jflt r1 r2 ?less;
- @jfeq r1 r2 0 ?same;
- return 1;
- .same; return 0;
- .less; return -1;
-];
-
-[ NUMBER_TY_to_REAL_NUMBER_TY int real; @numtof int real; return real; ];
-[ REAL_NUMBER_TY_to_NUMBER_TY real int; @ftonumn real int; return int; ];
-
-[ REAL_NUMBER_TY_Sin in out; @sin in out; return out; ];
-[ REAL_NUMBER_TY_Cos in out; @cos in out; return out; ];
-[ REAL_NUMBER_TY_Tan in out; @tan in out; return out; ];
-[ REAL_NUMBER_TY_Arcsin in out; @asin in out; return out; ];
-[ REAL_NUMBER_TY_Arccos in out; @acos in out; return out; ];
-[ REAL_NUMBER_TY_Arctan in out; @atan in out; return out; ];
-
-[ REAL_NUMBER_TY_Sinh in tmp out;
- @exp in tmp;
- @fsub M_0 in in;
- @exp in out;
- @fadd tmp out out;
- @fmul out M_HALF out;
- return out;
-];
-
-[ REAL_NUMBER_TY_Cosh in tmp out;
- @exp in tmp;
- @fsub M_0 in in;
- @exp in out;
- @fsub tmp out out;
- @fmul out M_HALF out;
- return out;
-];
-
-[ REAL_NUMBER_TY_Tanh in tmp out;
- tmp = REAL_NUMBER_TY_Sinh(in);
- in = REAL_NUMBER_TY_Cosh(in);
- @fdiv tmp in out;
- return out;
-];
-
-[ REAL_NUMBER_TY_Reciprocal in out; @fdiv M_1 in out; return out; ];
-[ REAL_NUMBER_TY_Negate in out; @fsub M_0 in out; return out; ];
-[ REAL_NUMBER_TY_Plus x y out; @fadd x y out; return out; ];
-[ REAL_NUMBER_TY_Minus x y out; @fsub x y out; return out; ];
-[ REAL_NUMBER_TY_Times x y out; @fmul x y out; return out; ];
-[ REAL_NUMBER_TY_Divide x y out; @fdiv x y out; return out; ];
-[ REAL_NUMBER_TY_Remainder x y r q; @fmod x y r q; return r; ];
-[ REAL_NUMBER_TY_Approximate x y quotient out;
- @fdiv x y quotient;
- @fadd quotient M_HALF quotient;
- @floor quotient quotient;
- @fmul quotient y out;
- return out;
-];
-[ REAL_NUMBER_TY_Root x out; @sqrt x out; return out; ];
-[ REAL_NUMBER_TY_Cube_Root x out; @pow x M_THIRD out; return out; ];
-[ REAL_NUMBER_TY_Pow x y out; @pow x y out; return out; ];
-[ REAL_NUMBER_TY_Exp x out; @exp x out; return out; ];
-[ REAL_NUMBER_TY_Log x out; @log x out; return out; ];
-[ REAL_NUMBER_TY_BLog x n d out;
- @log x out;
- if (n == 10) d = M_LOG10;
- else {
- @numtof n d;
- @log d d;
- }
- @fdiv out d out;
- return out;
-];
-[ REAL_NUMBER_TY_Floor x out; @floor x out; return out; ];
-[ REAL_NUMBER_TY_Ceiling x out; @ceil x out; return out; ];
-[ REAL_NUMBER_TY_Abs x; return x & $7fffffff; ];
-[ REAL_NUMBER_TY_Nan x; @jisnan x ?Nan; rfalse; .Nan; rtrue; ];
-
-Constant M_0 = $0;
-Constant M_1 = $3F800000;
-Constant M_HALF = $3F000000; ! 1/3
-Constant M_THIRD = $3EAAAAAB; ! 1/3
-Constant M_LOG10 = $40135D8E; ! log(10)
-Constant M_N1 = $BF800000; ! -1
-Constant M_PI = $40490FDB;
-Constant M_NPI = $C0490FDB;
-Constant M_2PI = $40C90FDB; ! 2*pi
-Constant M_PI2 = $3FC90FDB; ! pi/2
-Constant M_NPI2 = $BFC90FDB;
-Constant M_E = $402DF854;
-Constant M_E2 = $40EC7326; ! e^2
-Constant M_N0 = $80000000; ! negative zero
-Constant M_INF = $7F800000; ! infinity
-Constant M_NINF = $FF800000; ! negative infinity
-Constant M_NAN = $7F800001; ! one of many NaN values
-Constant M_NNAN = $FF800001; ! another, with a sign bit
-
-! Floating-point parsing routines.
-
-! Parse a float from a text buffer. Returns a float value, or FLOAT_NAN if
-! no value was understood.
-!
-! The recognized format, if you'll pardon a slightly bastardized regexp
-! syntax, is "S?D*(PD*)?(ES?D+)?" where S is a sign character "+" or "-",
-! D is a decimal digit "0" to "9", P is a decimal point ".",
-! and E is the exponential modifier "E" or "e".
-!
-! For flexibility, the string "M10^" is also accepted for E, where M is
-! "X", "x", "*", or the multiplication sign @{D7}. Optional spaces are
-! allowed before and after the M sign. (But only for the "10^" form of
-! the exponent, not the "e" form.)
-!
-! This routine does not try to recognize special names for infinity or NaN,
-! but it can return FLOAT_INFINITY or FLOAT_NINFINITY if the exponent is too
-! large.
-!
-! This routine relies on floating-point math. Therefore, the same string
-! may parse to slightly different float values on different interpreters!
-! Be warned.
-!
-! If useall is true, this insists on using all len characters from the buffer.
-! (It returns FLOAT_NAN if any unrecognized characters are left over.)
-! Contrariwise, if useall is false, unused characters at the end of the buffer
-! are fine. (But not at the beginning; the float must start at the beginning
-! of the buffer.)
-!
-[ FloatParse buf len useall
- res ix val ch ten negative intpart fracpart fracdiv
- expon expnegative count;
-
-! print "FloatParse <";
-! for (ix=0: ixix;
-! print ">^";
-
- if (len == 0)
- return FLOAT_NAN;
-
- ix = 0;
- negative = false;
- intpart = 0;
- fracpart = 0;
- @numtof 10 ten;
-
- ! Sign character (optional)
- ch = buf->ix;
- if (ch == '-') {
- negative = true;
- ix++;
- }
- else if (ch == '+') {
- ix++;
- }
-
- ! Some digits (optional)
- for (count=0 : ixix;
- if (ch < '0' || ch > '9')
- break;
- val = (ch - '0');
- @numtof val val;
- @fmul intpart ten intpart;
- @fadd intpart val intpart;
- }
-
- ! Decimal point and more digits (optional)
- if (ixix == '.') {
- ix++;
- @numtof 1 fracdiv;
- for ( : ixix;
- if (ch < '0' || ch > '9')
- break;
- val = (ch - '0');
- @numtof val val;
- @fmul fracpart ten fracpart;
- @fadd fracpart val fracpart;
- @fmul fracdiv ten fracdiv;
- }
- @fdiv fracpart fracdiv fracpart;
- }
-
- ! If there are no digits before *or* after the decimal point, fail.
- if (count == 0)
- return FLOAT_NAN;
-
- ! Combine the integer and fractional parts.
- @fadd intpart fracpart res;
-
- ! Exponent (optional)
- if (ixix == 'e' or 'E' or ' ' or '*' or 'x' or 'X' or $D7) {
- if (buf->ix == 'e' or 'E') {
- ! no spaces, just the 'e'
- ix++;
- if (ix == len)
- return FLOAT_NAN;
- }
- else {
- ! any number of spaces, "*", any number of spaces more, "10^"
- while (ix < len && buf->ix == ' ')
- ix++;
- if (ix == len)
- return FLOAT_NAN;
- if (buf->ix ~= '*' or 'x' or 'X' or $D7)
- return FLOAT_NAN;
- ix++;
- while (ix < len && buf->ix == ' ')
- ix++;
- if (ix == len)
- return FLOAT_NAN;
- if (buf->ix ~= '1')
- return FLOAT_NAN;
- ix++;
- if (buf->ix ~= '0')
- return FLOAT_NAN;
- ix++;
- if (buf->ix ~= $5E)
- return FLOAT_NAN;
- ix++;
- }
-
- ! Sign character (optional)
- expnegative = false;
- ch = buf->ix;
- if (ch == '-') {
- expnegative = true;
- ix++;
- }
- else if (ch == '+') {
- ix++;
- }
-
- expon = 0;
- ! Some digits (mandatory)
- for (count=0 : ixix;
- if (ch < '0' || ch > '9')
- break;
- expon = 10*expon + (ch - '0');
- }
-
- if (count == 0)
- return FLOAT_NAN;
-
- if (expnegative)
- expon = -expon;
-
- if (expon) {
- @numtof expon expon;
- @pow ten expon val;
- @fmul res val res;
- }
- }
-
- if (negative) {
- ! set the value's sign bit
- res = $80000000 | res;
- }
-
- if (useall && ix ~= len)
- return FLOAT_NAN;
- return res;
-];
-
-! An I6 grammar routine (GPR) for floats. On success, this returns
-! GPR_NUMBER and stores a value in the global parsed_number.
-!
-! This is quite a nuisance, actually, because "." is a word separator.
-! Also, we want to accept command sequences like "type 4. look"! So we
-! need to collect a set of words made up of digits, signs, periods, and
-! the letter "e", but without any intervening whitespace, and excluding
-! a trailing period.
-!
-! (This will fail to correctly parse "type 4.e", but I think that is a
-! small flaw. A player would more likely try "type 4. e" or, really,
-! not concatenate commands at all. It will also parse "type 4. on keyboard"
-! as two commands, even though "4." is a legitimate float literal.
-! Contrariwise, "type 4. x me" will be taken as one command. (Because the "x"
-! *could* be a continuation of the float, and I don't back up when it turns
-! out not to be.) I don't plan to worry about these cases.)
-
-[ FLOAT_TOKEN buf bufend ix ch firstwd newstart newlen lastchar lastwasdot;
- if (wn > num_words)
- return GPR_FAIL;
-
- ! We're going to collect a set of words. Start with zero words.
- firstwd = wn;
- buf = WordAddress(wn);
- bufend = buf;
- lastchar = 0;
-
- while (wn <= num_words) {
- newstart = WordAddress(wn);
- if (newstart ~= bufend) {
- ! There's whitespace between the previous word and this one.
- ! Whitespace is okay around an asterisk...
- if ((lastchar ~= '*' or 'x' or 'X' or $D7)
- && (newstart->0 ~= '*' or 'x' or 'X' or $D7)) {
- ! But around any other character, it's not.
- ! Don't include the new word.
- break;
- }
- }
- newlen = WordLength(wn);
- for (ix=0 : ixix;
- if (~~((ch >= '0' && ch <= '9')
- || (ch == '-' or '+' or 'E' or 'e' or '.' or 'x' or 'X' or '*' or $D7 or $5E)))
- break;
- }
- if (ix < newlen) {
- ! This word contains an invalid character.
- ! Don't include the new word.
- break;
- }
- ! Okay, include it.
- bufend = newstart + newlen;
- wn++;
- lastchar = (bufend-1)->0;
- lastwasdot = (newlen == 1 && lastchar == '.');
- }
-
- if (wn > firstwd && lastwasdot) {
- ! Exclude a trailing period.
- wn--;
- bufend--;
- }
-
- if (wn == firstwd) {
- ! No words accepted.
- return GPR_FAIL;
- }
-
- parsed_number = FloatParse(buf, bufend-buf, true);
- if (parsed_number == FLOAT_NAN)
- return GPR_FAIL;
- return GPR_NUMBER;
-];
-
-! Floating-point printing routines. (These are based on code in
-! Glulxercise.inf, but modified.)
-
-! Print a float. This uses exponential notation ("[-]N.NNNe[+-]NN") if
-! the exponent is not between 6 and -4. If it is (that is, if the
-! absolute value is near 1.0) then it uses decimal notation ("[-]NNN.NNNNN").
-! The precision is the number of digits after the decimal point
-! (at least one, no more than eight). The default is five, because
-! beyond that rounding errors creep in, and even exactly-represented
-! float values are printed with trailing fudgy digits.
-! Trailing zeroes are trimmed.
-[ Float val prec pval;
- pval = val & $7FFFFFFF;
-
- @jz pval ?UseFloatDec;
- @jfge pval $49742400 ?UseFloatExp; ! 1000000.0
- @jflt pval $38D1B717 ?UseFloatExp; ! 0.0001
-
- .UseFloatDec;
- return FloatDec(val, prec);
- .UseFloatExp;
- return FloatExp(val, prec);
-];
-
-Array PowersOfTen --> 1 10 100 1000 10000 100000 1000000 10000000 100000000 1000000000;
-
-! Print a float in exponential notation: "[-]N.NNNe[+-]NN".
-! The precision is the number of digits after the decimal point
-! (at least one, no more than eight). The default is five, because
-! beyond that rounding errors creep in, and even exactly-represented
-! float values are printed with trailing fudgy digits.
-! Trailing zeroes are trimmed.
-[ FloatExp val prec log10val expo fexpo idig ix pow10;
- if (prec == 0)
- prec = 5;
- if (prec > 8)
- prec = 8;
- pow10 = PowersOfTen --> prec;
-
- ! Knock off the sign bit first.
- if (val & $80000000) {
- @streamchar '-';
- val = val & $7FFFFFFF;
- }
-
- @jisnan val ?IsNan;
- @jisinf val ?IsInf;
-
- if (val == $0) {
- expo = 0;
- idig = 0;
- jump DoPrint;
- }
-
- ! Take as an example val=123.5, with precision=6. The desired
- ! result is "1.23000e+02".
-
- @log val sp;
- @fdiv sp $40135D8E log10val; ! $40135D8E is log(10)
- @floor log10val fexpo;
- @ftonumn fexpo expo;
- ! expo is now the exponent (as an integer). For our example, expo=2.
-
- @fsub log10val fexpo sp;
- @numtof prec sp;
- @fadd sp sp sp;
- @fmul sp $40135D8E sp;
- @exp sp sp;
- ! The stack value is now exp((log10val - fexpo + prec) * log(10)).
- ! We've shifted the decimal point left by expo digits (so that
- ! it's after the first nonzero digit), and then right by prec
- ! digits. In our example, that would be 1235000.0.
- @ftonumn sp idig;
- ! Round to an integer, and we have 1235000. Notice that this is
- ! exactly the digits we want to print (if we stick a decimal point
- ! after the first).
-
- .DoPrint;
-
- if (idig >= 10*pow10) {
- ! Rounding errors have left us outside the decimal range of
- ! [1.0, 10.0) where we should be. Adjust to the next higher
- ! exponent.
- expo++;
- @div idig 10 idig;
- }
-
- ! Trim off trailing zeroes, as long as there's at least one digit
- ! after the decimal point. (Delete this stanza if you want to
- ! keep the trailing zeroes.)
- while (prec > 1) {
- @mod idig 10 sp;
- @jnz sp ?DoneTrimming;
- @div pow10 10 pow10;
- @div idig 10 idig;
- prec--;
- }
- .DoneTrimming;
-
- for (ix=0 : ix<=prec : ix++) {
- @div idig pow10 sp;
- @mod sp 10 sp;
- @streamnum sp;
- if (ix == 0)
- @streamchar '.';
- @div pow10 10 pow10;
- }
-
- ! Print the exponent. There are two conventions coded here: the
- ! programmatic ("1.0e+00") and the literary ("1.0 x 10^0").
- #ifndef FLOAT_PROGRAMMING_EXPONENTS;
- PrintMultiplicationSign();
- @streamstr "10";
- @streamchar $5E;
- @streamnum expo;
- #ifnot;
- ! Convention is to use at least two digits.
- @streamchar 'e';
- if (expo < 0) {
- @streamchar '-';
- @neg expo expo;
- }
- else {
- @streamchar '+';
- }
- if (expo < 10)
- @streamchar '0';
- @streamnum expo;
- #endif; ! FLOAT_PROGRAMMING_EXPONENTS
-
- rtrue;
-
- .IsNan;
- PrintNan();
- rtrue;
-
- .IsInf;
- PrintInfinity();
- rtrue;
-];
-
-! Print a float in decimal notation: "[-]NNN.NNNNN".
-! The precision is the number of digits after the decimal point
-! (at least one, no more than eight). The default is five, because
-! beyond that rounding errors creep in, and even exactly-represented
-! float values are printed with trailing fudgy digits.
-! Trailing zeroes are trimmed.
-[ FloatDec val prec log10val int fint extra0 frac idig ix pow10;
- if (prec == 0)
- prec = 5;
- if (prec > 8)
- prec = 8;
- pow10 = PowersOfTen --> prec;
-
- ! Knock off the sign bit first.
- if (val & $80000000) {
- @streamchar '-';
- val = val & $7FFFFFFF;
- }
-
- @jisnan val ?IsNan;
- @jisinf val ?IsInf;
-
- ! Take as an example val=123.5, with precision=6. The desired result
- ! is "123.50000".
-
- extra0 = 0;
- @fmod val $3F800000 frac fint; ! $3F800000 is 1.0.
- @ftonumz fint int;
- ! This converts the integer part of the value to an integer value;
- ! in our example, 123.
-
- if (int == $7FFFFFFF) {
- ! Looks like the integer part of the value is bigger than
- ! we can store in an int variable. (It could be as large
- ! as 3e+38.) We're going to have to use a log function to
- ! reduce it by some number of factors of 10, and then pad
- ! with zeroes.
- @log fint sp;
- @fdiv sp $40135D8E log10val; ! $40135D8E is log(10)
- @ftonumz log10val extra0;
- @sub extra0 8 extra0;
- ! extra0 is the number of zeroes we'll be padding with.
- @numtof extra0 sp;
- @fsub log10val sp sp;
- @fmul sp $40135D8E sp;
- @exp sp sp;
- ! The stack value is now exp((log10val - extra0) * log(10)).
- ! We've shifted the decimal point far enough left to leave
- ! about eight digits, which is all we can print as an integer.
- @ftonumz sp int;
- }
-
- ! Print the integer part.
- @streamnum int;
- for (ix=0 : ix= pow10) {
- ! Rounding errors have left us outside the decimal range of
- ! [0.0, 1.0) where we should be. I'm not sure this is possible,
- ! actually, but we'll just adjust downward.
- idig = pow10 - 1;
- }
-
- ! Trim off trailing zeroes, as long as there's at least one digit
- ! after the decimal point. (Delete this stanza if you want to
- ! keep the trailing zeroes.)
- while (prec > 1) {
- @mod idig 10 sp;
- @jnz sp ?DoneTrimming;
- @div pow10 10 pow10;
- @div idig 10 idig;
- prec--;
- }
- .DoneTrimming;
-
- @div pow10 10 pow10;
- for (ix=0 : ix= 0) return ((t1+t2/2)/t2)*t2;
- return -((-t1+t2/2)/t2)*t2;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Conversion To Number
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ NUMBER_TY_to_TIME_TY n;
- n = n%1440;
- if (n < 0) return n + 1440;
- return n;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Square Root
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SquareRoot num
- op res one n x;
- if (num < 0) { RunTimeProblem(RTP_NEGATIVEROOT); return 1; }
-
- ! Use floating-point ops if available.
- #ifdef TARGET_GLULX;
- @gestalt 11 0 n;
- if (n) {
- @numtof num x;
- @sqrt x x;
- @ftonumz x num;
- return num;
- }
- #endif;
- op = num;
- if (num < 0) { RunTimeProblem(RTP_NEGATIVEROOT); return 1; }
- ! "one" starts at the highest power of four <= the argument.
- for (one = WORD_NEXTTOHIGHBIT: one > op: one = one/4) ;
-
- while (one ~= 0) {
- ! print "Round: op = ", op, " res = ", res, ", res**2 = ", res*res, " one = ", one, " nthb = ", WORD_NEXTTOHIGHBIT, "^";
- if (op >= res + one) {
- op = op - res - one;
- res = res/2 + one;
- } else {
- res = res/2;
- }
- one = one/4;
- }
- ! print "Res is ", res, "^";
- return res;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Cube Root
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CubeRoot num neg x y n;
- ! Use floating-point ops if available.
- #ifdef TARGET_GLULX;
- @gestalt 11 0 n;
- if (n) {
- if (num < 0) {
- neg = true;
- num = -num;
- }
- @numtof num x;
- @pow x 1051372203 x; ! pow(x, 0.3333)
- @ftonumz x num;
- if (neg)
- return -num;
- else
- return num;
- }
- #endif;
- if (num < 0) x = -SquareRoot(-num); else x = SquareRoot(num);
- for (n=0: (y ~= x) && (n++ < 100): y = x, x = (2*x + num/x/x)/3) ;
- return x;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Digital Printing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintTimeOfDay t h aop;
- if (t<0) { print ""; return; }
- if (t >= TWELVE_HOURS) { aop = "pm"; t = t - TWELVE_HOURS; } else aop = "am";
- h = t/ONE_HOUR; if (h==0) h=12;
- print h, ":";
- if (t%ONE_HOUR < 10) print "0"; print t%ONE_HOUR, " ", (string) aop;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Analogue Printing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PrintTimeOfDayEnglish t h m dir aop;
- h = (t/ONE_HOUR) % 12; m = t%ONE_HOUR; if (h==0) h=12;
- if (m==0) { print (number) h, " o'clock"; return; }
- dir = "past";
- if (m > HALF_HOUR) { m = ONE_HOUR-m; h = (h+1)%12; if (h==0) h=12; dir = "to"; }
- switch(m) {
- QUARTER_HOUR: print "quarter"; HALF_HOUR: print "half";
- default: print (number) m;
- if (m%5 ~= 0) {
- if (m == 1) print " minute"; else print " minutes";
- }
- }
- print " ", (string) dir, " ", (number) h;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Understanding
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TIME_TOKEN first_word second_word at length flag
- illegal_char offhour hr mn i original_wn;
- original_wn = wn;
-
- wn = original_wn;
- first_word = NextWordStopped();
- switch (first_word) {
- 'midnight': parsed_number = 0; return GPR_NUMBER;
- 'midday', 'noon': parsed_number = TWELVE_HOURS;
- return GPR_NUMBER;
- }
- ! Next try the format 12:02
- at = WordAddress(wn-1); length = WordLength(wn-1);
- for (i=0: ii) {
- ':': if (flag == false && i>0 && i 5 || illegal_char) flag = false;
- if (flag) {
- for (i=0: at->i~=':': i++, hr=hr*10) hr = hr + at->i - '0';
- hr = hr/10;
- for (i++: ii - '0';
- mn = mn/10;
- second_word = NextWordStopped();
- parsed_number = HoursMinsWordToTime(hr, mn, second_word);
- if (parsed_number == -1) return GPR_FAIL;
- if (second_word ~= 'pm' or 'am') wn--;
- return GPR_NUMBER;
- }
- ! Lastly the wordy format
- offhour = -1;
- if (first_word == 'half') offhour = HALF_HOUR;
- if (first_word == 'quarter') offhour = QUARTER_HOUR;
- if (offhour < 0) offhour = TryNumber(wn-1);
- if (offhour < 0 || offhour >= ONE_HOUR) return GPR_FAIL;
- second_word = NextWordStopped();
- switch (second_word) {
- ! "six o'clock", "six"
- 'o^clock', 'am', 'pm', -1:
- hr = offhour; if (hr > 12) return GPR_FAIL;
- ! "quarter to six", "twenty past midnight"
- 'to', 'past':
- mn = offhour; hr = TryNumber(wn);
- if (hr <= 0) {
- switch (NextWordStopped()) {
- 'noon', 'midday': hr = 12;
- 'midnight': hr = 0;
- default: return GPR_FAIL;
- }
- }
- if (hr >= 13) return GPR_FAIL;
- if (second_word == 'to') {
- mn = ONE_HOUR-mn; hr--; if (hr<0) hr=23;
- }
- wn++; second_word = NextWordStopped();
- ! "six thirty"
- default:
- hr = offhour; mn = TryNumber(--wn);
- if (mn < 0 || mn >= ONE_HOUR) return GPR_FAIL;
- wn++; second_word = NextWordStopped();
- }
- parsed_number = HoursMinsWordToTime(hr, mn, second_word);
- if (parsed_number < 0) return GPR_FAIL;
- if (second_word ~= 'pm' or 'am' or 'o^clock') wn--;
- return GPR_NUMBER;
-];
-
-[ HoursMinsWordToTime hour minute word x;
- if (hour >= 24) return -1;
- if (minute >= ONE_HOUR) return -1;
- x = hour*ONE_HOUR + minute; if (hour >= 13) return x;
- x = x % TWELVE_HOURS; if (word == 'pm') x = x + TWELVE_HOURS;
- if (word ~= 'am' or 'pm' && hour == 12) x = x + TWELVE_HOURS;
- return x;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Relative Time Token
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RELATIVE_TIME_TOKEN first_word second_word offhour mult mn original_wn;
- original_wn = wn;
- wn = original_wn;
-
- first_word = NextWordStopped(); wn--;
- if (first_word == 'an' or 'a//') mn=1; else mn=TryNumber(wn);
-
- if (mn == -1000) {
- first_word = NextWordStopped();
- if (first_word == 'half') offhour = HALF_HOUR;
- if (first_word == 'quarter') offhour = QUARTER_HOUR;
- if (offhour > 0) {
- second_word = NextWordStopped();
- if (second_word == 'of') second_word = NextWordStopped();
- if (second_word == 'an') second_word = NextWordStopped();
- if (second_word == 'hour') {
- parsed_number = offhour;
- return GPR_NUMBER;
- }
- }
- return GPR_FAIL;
- }
- wn++;
-
- first_word = NextWordStopped();
- switch (first_word) {
- 'minutes', 'minute': mult = 1;
- 'hours', 'hour': mult = 60;
- default: return GPR_FAIL;
- }
- parsed_number = mn*mult;
- if (mult == 60) {
- mn=TryNumber(wn);
- if (mn ~= -1000) {
- wn++;
- first_word = NextWordStopped();
- if (first_word == 'minutes' or 'minute')
- parsed_number = parsed_number + mn;
- else wn = wn - 2;
- }
- }
- return GPR_NUMBER;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: During Scene Matching
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ DuringSceneMatching prop sc;
- for (sc=0: scsc == 1) && (prop(sc+1))) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Time.i6t: Scene Questions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SceneUtility sc task;
- if (sc <= 0) return 0;
- if (task == 1 or 2) {
- if (scene_endings-->(sc-1) == 0) return RunTimeProblem(RTP_SCENEHASNTSTARTED, sc);
- } else {
- if (scene_endings-->(sc-1) <= 1) return RunTimeProblem(RTP_SCENEHASNTENDED, sc);
- }
- switch (task) {
- 1: return (the_time - scene_started-->(sc-1))%(TWENTY_FOUR_HOURS);
- 2: return scene_started-->(sc-1);
- 3: return (the_time - scene_ended-->(sc-1))%(TWENTY_FOUR_HOURS);
- 4: return scene_ended-->(sc-1);
- }
-];
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Text generation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant CV_POS = -1;
-Constant CV_NEG = -2;
-Constant CV_MODAL = -3;
-Constant CV_MEANING = -4;
-[ ConjugateVerb_0
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "be";
- 2: print "been";
- 3: print "being";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "am";
- 2: print "are";
- 3: print "is";
- 4: print "are";
- 5: print "are";
- 6: print "are";
- }
- 2: switch (vp) {
- 1: print "was";
- 2: print "were";
- 3: print "was";
- 4: print "were";
- 5: print "were";
- 6: print "were";
- }
- 3: if (vp == 3) { print "has been"; } else { print "have been"; }
- 4: print "had been";
- 5: print "will be";
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "am not";
- 2: print "are not";
- 3: print "is not";
- 4: print "are not";
- 5: print "are not";
- 6: print "are not";
- }
- 2: switch (vp) {
- 1: print "was not";
- 2: print "were not";
- 3: print "was not";
- 4: print "were not";
- 5: print "were not";
- 6: print "were not";
- }
- 3: if (vp == 3) { print "has not been"; } else { print "have not been"; }
- 4: print "had not been";
- 5: print "will not be";
- }
- }
-];
-[ ConjugateVerb_1
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "auxiliary-have";
- 2: print "had";
- 3: print "having";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "has"; } else { print "have"; }
- 2: print "had";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "has not"; } else { print "have not"; }
- 2: print "had not";
- }
- }
-];
-[ ConjugateVerb_2
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "have";
- 2: print "had";
- 3: print "having";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_27;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "has"; } else { print "have"; }
- 2: print "had";
- 3: if (vp == 3) { print "has had"; } else { print "have had"; }
- 4: print "had had";
- 5: print "will have";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not have"; } else { print "do not have"; }
- 2: print "did not have";
- 3: if (vp == 3) { print "has not had"; } else { print "have not had"; }
- 4: print "had not had";
- 5: print "will not have";
- }
- }
-];
-[ ConjugateVerb_3
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "do";
- 2: print "done";
- 3: print "doing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "does"; } else { print "do"; }
- 2: print "did";
- 3: if (vp == 3) { print "has done"; } else { print "have done"; }
- 4: print "had done";
- 5: print "will do";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not"; } else { print "do not"; }
- 2: print "did not";
- 3: if (vp == 3) { print "has not done"; } else { print "have not done"; }
- 4: print "had not done";
- 5: print "will not do";
- }
- }
-];
-[ ConjugateVerb_4
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "relate";
- 2: print "related";
- 3: print "relating";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_3;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "relates"; } else { print "relate"; }
- 2: print "related";
- 3: if (vp == 3) { print "has related"; } else { print "have related"; }
- 4: print "had related";
- 5: print "will relate";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not relate"; } else { print "do not relate"; }
- 2: print "did not relate";
- 3: if (vp == 3) { print "has not related"; } else { print "have not related"; }
- 4: print "had not related";
- 5: print "will not relate";
- }
- }
-];
-[ ConjugateVerb_5
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "mean";
- 2: print "meant";
- 3: print "meaning";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_5;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "means"; } else { print "mean"; }
- 2: print "meant";
- 3: if (vp == 3) { print "has meant"; } else { print "have meant"; }
- 4: print "had meant";
- 5: print "will mean";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not mean"; } else { print "do not mean"; }
- 2: print "did not mean";
- 3: if (vp == 3) { print "has not meant"; } else { print "have not meant"; }
- 4: print "had not meant";
- 5: print "will not mean";
- }
- }
-];
-[ ConjugateVerb_6
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "provide";
- 2: print "provided";
- 3: print "providing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_1;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "provides"; } else { print "provide"; }
- 2: print "provided";
- 3: if (vp == 3) { print "has provided"; } else { print "have provided"; }
- 4: print "had provided";
- 5: print "will provide";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not provide"; } else { print "do not provide"; }
- 2: print "did not provide";
- 3: if (vp == 3) { print "has not provided"; } else { print "have not provided"; }
- 4: print "had not provided";
- 5: print "will not provide";
- }
- }
-];
-[ ConjugateVerb_7
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "contain";
- 2: print "contained";
- 3: print "containing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_15;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "contains"; } else { print "contain"; }
- 2: print "contained";
- 3: if (vp == 3) { print "has contained"; } else { print "have contained"; }
- 4: print "had contained";
- 5: print "will contain";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not contain"; } else { print "do not contain"; }
- 2: print "did not contain";
- 3: if (vp == 3) { print "has not contained"; } else { print "have not contained"; }
- 4: print "had not contained";
- 5: print "will not contain";
- }
- }
-];
-[ ConjugateVerb_8
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "support";
- 2: print "supported";
- 3: print "supporting";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_17;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "supports"; } else { print "support"; }
- 2: print "supported";
- 3: if (vp == 3) { print "has supported"; } else { print "have supported"; }
- 4: print "had supported";
- 5: print "will support";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not support"; } else { print "do not support"; }
- 2: print "did not support";
- 3: if (vp == 3) { print "has not supported"; } else { print "have not supported"; }
- 4: print "had not supported";
- 5: print "will not support";
- }
- }
-];
-[ ConjugateVerb_9
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "incorporate";
- 2: print "incorporated";
- 3: print "incorporating";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_19;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "incorporates"; } else { print "incorporate"; }
- 2: print "incorporated";
- 3: if (vp == 3) { print "has incorporated"; } else { print "have incorporated"; }
- 4: print "had incorporated";
- 5: print "will incorporate";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not incorporate"; } else { print "do not incorporate"; }
- 2: print "did not incorporate";
- 3: if (vp == 3) { print "has not incorporated"; } else { print "have not incorporated"; }
- 4: print "had not incorporated";
- 5: print "will not incorporate";
- }
- }
-];
-[ ConjugateVerb_10
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "enclose";
- 2: print "enclosed";
- 3: print "enclosing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_37;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "encloses"; } else { print "enclose"; }
- 2: print "enclosed";
- 3: if (vp == 3) { print "has enclosed"; } else { print "have enclosed"; }
- 4: print "had enclosed";
- 5: print "will enclose";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not enclose"; } else { print "do not enclose"; }
- 2: print "did not enclose";
- 3: if (vp == 3) { print "has not enclosed"; } else { print "have not enclosed"; }
- 4: print "had not enclosed";
- 5: print "will not enclose";
- }
- }
-];
-[ ConjugateVerb_11
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "carry";
- 2: print "carried";
- 3: print "carrying";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_21;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "carries"; } else { print "carry"; }
- 2: print "carried";
- 3: if (vp == 3) { print "has carried"; } else { print "have carried"; }
- 4: print "had carried";
- 5: print "will carry";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not carry"; } else { print "do not carry"; }
- 2: print "did not carry";
- 3: if (vp == 3) { print "has not carried"; } else { print "have not carried"; }
- 4: print "had not carried";
- 5: print "will not carry";
- }
- }
-];
-[ ConjugateVerb_12
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "hold";
- 2: print "held";
- 3: print "holding";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_23;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "holds"; } else { print "hold"; }
- 2: print "held";
- 3: if (vp == 3) { print "has held"; } else { print "have held"; }
- 4: print "had held";
- 5: print "will hold";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not hold"; } else { print "do not hold"; }
- 2: print "did not hold";
- 3: if (vp == 3) { print "has not held"; } else { print "have not held"; }
- 4: print "had not held";
- 5: print "will not hold";
- }
- }
-];
-[ ConjugateVerb_13
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "wear";
- 2: print "worn";
- 3: print "wearing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_25;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "wears"; } else { print "wear"; }
- 2: print "wore";
- 3: if (vp == 3) { print "has worn"; } else { print "have worn"; }
- 4: print "had worn";
- 5: print "will wear";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not wear"; } else { print "do not wear"; }
- 2: print "did not wear";
- 3: if (vp == 3) { print "has not worn"; } else { print "have not worn"; }
- 4: print "had not worn";
- 5: print "will not wear";
- }
- }
-];
-[ ConjugateVerb_14
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "be able to see";
- 2: print "been able to see";
- 3: print "being able to see";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_31;
- CV_POS:
- switch (t) {
- 1: print "can see";
- 2: print "could see";
- 3: if (vp == 3) { print "has been able to see"; } else { print "have been able to see"; }
- 4: print "had been able to see";
- 5: print "will be able to see";
- 6: print "see";
- 7: print "see";
- }
- CV_NEG:
- switch (t) {
- 1: print "cannot see";
- 2: print "could not see";
- 3: if (vp == 3) { print "has not been able to see"; } else { print "have not been able to see"; }
- 4: print "had not been able to see";
- 5: print "will not be able to see";
- 6: print "see";
- 7: print "see";
- }
- }
-];
-[ ConjugateVerb_15
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "be able to";
- 2: print "been able to";
- 3: print "being able to";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "can"; if (modal_to) { print " "; modal_to(1); }
- 2: print "can"; if (modal_to) { print " "; modal_to(1); }
- 3: print "can"; if (modal_to) { print " "; modal_to(1); }
- 4: print "can"; if (modal_to) { print " "; modal_to(1); }
- 5: print "can"; if (modal_to) { print " "; modal_to(1); }
- 6: print "can"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "could"; if (modal_to) { print " "; modal_to(1); }
- 2: print "could"; if (modal_to) { print " "; modal_to(1); }
- 3: print "could"; if (modal_to) { print " "; modal_to(1); }
- 4: print "could"; if (modal_to) { print " "; modal_to(1); }
- 5: print "could"; if (modal_to) { print " "; modal_to(1); }
- 6: print "could"; if (modal_to) { print " "; modal_to(1); }
- }
- 3: switch (vp) {
- 1: print "have been able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "have been able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "has been able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "have been able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "have been able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "have been able to"; if (modal_to) { print " "; modal_to(1); }
- }
- 4: switch (vp) {
- 1: print "had been able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "had been able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "had been able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "had been able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "had been able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "had been able to"; if (modal_to) { print " "; modal_to(1); }
- }
- 5: switch (vp) {
- 1: print "will be able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "will be able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "will be able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "will be able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "will be able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "will be able to"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "cannot"; if (modal_to) { print " "; modal_to(1); }
- 2: print "cannot"; if (modal_to) { print " "; modal_to(1); }
- 3: print "cannot"; if (modal_to) { print " "; modal_to(1); }
- 4: print "cannot"; if (modal_to) { print " "; modal_to(1); }
- 5: print "cannot"; if (modal_to) { print " "; modal_to(1); }
- 6: print "cannot"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "could not"; if (modal_to) { print " "; modal_to(1); }
- }
- 3: switch (vp) {
- 1: print "have not been able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "have not been able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "has not been able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "have not been able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "have not been able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "have not been able to"; if (modal_to) { print " "; modal_to(1); }
- }
- 4: switch (vp) {
- 1: print "had not been able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "had not been able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "had not been able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "had not been able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "had not been able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "had not been able to"; if (modal_to) { print " "; modal_to(1); }
- }
- 5: switch (vp) {
- 1: print "will not be able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "will not be able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "will not be able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "will not be able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "will not be able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "will not be able to"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- }
-];
-[ ConjugateVerb_16
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "see";
- 2: print "seen";
- 3: print "seeing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "sees"; } else { print "see"; }
- 2: print "saw";
- 3: if (vp == 3) { print "has seen"; } else { print "have seen"; }
- 4: print "had seen";
- 5: print "will see";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not see"; } else { print "do not see"; }
- 2: print "did not see";
- 3: if (vp == 3) { print "has not seen"; } else { print "have not seen"; }
- 4: print "had not seen";
- 5: print "will not see";
- }
- }
-];
-[ ConjugateVerb_17
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "be able to touch";
- 2: print "been able to touch";
- 3: print "being able to touch";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_33;
- CV_POS:
- switch (t) {
- 1: print "can touch";
- 2: print "could touch";
- 3: if (vp == 3) { print "has been able to touch"; } else { print "have been able to touch"; }
- 4: print "had been able to touch";
- 5: print "will be able to touch";
- 6: print "touch";
- 7: print "touch";
- }
- CV_NEG:
- switch (t) {
- 1: print "cannot touch";
- 2: print "could not touch";
- 3: if (vp == 3) { print "has not been able to touch"; } else { print "have not been able to touch"; }
- 4: print "had not been able to touch";
- 5: print "will not be able to touch";
- 6: print "touch";
- 7: print "touch";
- }
- }
-];
-[ ConjugateVerb_18
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "touch";
- 2: print "touched";
- 3: print "touching";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "touches"; } else { print "touch"; }
- 2: print "touched";
- 3: if (vp == 3) { print "has touched"; } else { print "have touched"; }
- 4: print "had touched";
- 5: print "will touch";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not touch"; } else { print "do not touch"; }
- 2: print "did not touch";
- 3: if (vp == 3) { print "has not touched"; } else { print "have not touched"; }
- 4: print "had not touched";
- 5: print "will not touch";
- }
- }
-];
-[ ConjugateVerb_19
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "conceal";
- 2: print "concealed";
- 3: print "concealing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_35;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "conceals"; } else { print "conceal"; }
- 2: print "concealed";
- 3: if (vp == 3) { print "has concealed"; } else { print "have concealed"; }
- 4: print "had concealed";
- 5: print "will conceal";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not conceal"; } else { print "do not conceal"; }
- 2: print "did not conceal";
- 3: if (vp == 3) { print "has not concealed"; } else { print "have not concealed"; }
- 4: print "had not concealed";
- 5: print "will not conceal";
- }
- }
-];
-[ ConjugateVerb_20
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "unlock";
- 2: print "unlocked";
- 3: print "unlocking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_69;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "unlocks"; } else { print "unlock"; }
- 2: print "unlocked";
- 3: if (vp == 3) { print "has unlocked"; } else { print "have unlocked"; }
- 4: print "had unlocked";
- 5: print "will unlock";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not unlock"; } else { print "do not unlock"; }
- 2: print "did not unlock";
- 3: if (vp == 3) { print "has not unlocked"; } else { print "have not unlocked"; }
- 4: print "had not unlocked";
- 5: print "will not unlock";
- }
- }
-];
-[ ConjugateVerb_21
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "achieve";
- 2: print "achieved";
- 3: print "achieving";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "achieves"; } else { print "achieve"; }
- 2: print "achieved";
- 3: if (vp == 3) { print "has achieved"; } else { print "have achieved"; }
- 4: print "had achieved";
- 5: print "will achieve";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not achieve"; } else { print "do not achieve"; }
- 2: print "did not achieve";
- 3: if (vp == 3) { print "has not achieved"; } else { print "have not achieved"; }
- 4: print "had not achieved";
- 5: print "will not achieve";
- }
- }
-];
-[ ConjugateVerb_22
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "appreciate";
- 2: print "appreciated";
- 3: print "appreciating";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "appreciates"; } else { print "appreciate"; }
- 2: print "appreciated";
- 3: if (vp == 3) { print "has appreciated"; } else { print "have appreciated"; }
- 4: print "had appreciated";
- 5: print "will appreciate";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not appreciate"; } else { print "do not appreciate"; }
- 2: print "did not appreciate";
- 3: if (vp == 3) { print "has not appreciated"; } else { print "have not appreciated"; }
- 4: print "had not appreciated";
- 5: print "will not appreciate";
- }
- }
-];
-[ ConjugateVerb_23
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "arrive";
- 2: print "arrived";
- 3: print "arriving";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "arrives"; } else { print "arrive"; }
- 2: print "arrived";
- 3: if (vp == 3) { print "has arrived"; } else { print "have arrived"; }
- 4: print "had arrived";
- 5: print "will arrive";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not arrive"; } else { print "do not arrive"; }
- 2: print "did not arrive";
- 3: if (vp == 3) { print "has not arrived"; } else { print "have not arrived"; }
- 4: print "had not arrived";
- 5: print "will not arrive";
- }
- }
-];
-[ ConjugateVerb_24
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "care";
- 2: print "cared";
- 3: print "caring";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "cares"; } else { print "care"; }
- 2: print "cared";
- 3: if (vp == 3) { print "has cared"; } else { print "have cared"; }
- 4: print "had cared";
- 5: print "will care";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not care"; } else { print "do not care"; }
- 2: print "did not care";
- 3: if (vp == 3) { print "has not cared"; } else { print "have not cared"; }
- 4: print "had not cared";
- 5: print "will not care";
- }
- }
-];
-[ ConjugateVerb_25
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "close";
- 2: print "closed";
- 3: print "closing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "closes"; } else { print "close"; }
- 2: print "closed";
- 3: if (vp == 3) { print "has closed"; } else { print "have closed"; }
- 4: print "had closed";
- 5: print "will close";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not close"; } else { print "do not close"; }
- 2: print "did not close";
- 3: if (vp == 3) { print "has not closed"; } else { print "have not closed"; }
- 4: print "had not closed";
- 5: print "will not close";
- }
- }
-];
-[ ConjugateVerb_26
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "die";
- 2: print "died";
- 3: print "dying";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "dies"; } else { print "die"; }
- 2: print "died";
- 3: if (vp == 3) { print "has died"; } else { print "have died"; }
- 4: print "had died";
- 5: print "will die";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not die"; } else { print "do not die"; }
- 2: print "did not die";
- 3: if (vp == 3) { print "has not died"; } else { print "have not died"; }
- 4: print "had not died";
- 5: print "will not die";
- }
- }
-];
-[ ConjugateVerb_27
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "discover";
- 2: print "discovered";
- 3: print "discovering";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "discovers"; } else { print "discover"; }
- 2: print "discovered";
- 3: if (vp == 3) { print "has discovered"; } else { print "have discovered"; }
- 4: print "had discovered";
- 5: print "will discover";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not discover"; } else { print "do not discover"; }
- 2: print "did not discover";
- 3: if (vp == 3) { print "has not discovered"; } else { print "have not discovered"; }
- 4: print "had not discovered";
- 5: print "will not discover";
- }
- }
-];
-[ ConjugateVerb_28
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "drop";
- 2: print "dropped";
- 3: print "dropping";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "drops"; } else { print "drop"; }
- 2: print "dropped";
- 3: if (vp == 3) { print "has dropped"; } else { print "have dropped"; }
- 4: print "had dropped";
- 5: print "will drop";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not drop"; } else { print "do not drop"; }
- 2: print "did not drop";
- 3: if (vp == 3) { print "has not dropped"; } else { print "have not dropped"; }
- 4: print "had not dropped";
- 5: print "will not drop";
- }
- }
-];
-[ ConjugateVerb_29
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "eat";
- 2: print "eaten";
- 3: print "eating";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "eats"; } else { print "eat"; }
- 2: print "ate";
- 3: if (vp == 3) { print "has eaten"; } else { print "have eaten"; }
- 4: print "had eaten";
- 5: print "will eat";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not eat"; } else { print "do not eat"; }
- 2: print "did not eat";
- 3: if (vp == 3) { print "has not eaten"; } else { print "have not eaten"; }
- 4: print "had not eaten";
- 5: print "will not eat";
- }
- }
-];
-[ ConjugateVerb_30
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "feel";
- 2: print "felt";
- 3: print "feeling";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "feels"; } else { print "feel"; }
- 2: print "felt";
- 3: if (vp == 3) { print "has felt"; } else { print "have felt"; }
- 4: print "had felt";
- 5: print "will feel";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not feel"; } else { print "do not feel"; }
- 2: print "did not feel";
- 3: if (vp == 3) { print "has not felt"; } else { print "have not felt"; }
- 4: print "had not felt";
- 5: print "will not feel";
- }
- }
-];
-[ ConjugateVerb_31
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "find";
- 2: print "found";
- 3: print "finding";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "finds"; } else { print "find"; }
- 2: print "found";
- 3: if (vp == 3) { print "has found"; } else { print "have found"; }
- 4: print "had found";
- 5: print "will find";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not find"; } else { print "do not find"; }
- 2: print "did not find";
- 3: if (vp == 3) { print "has not found"; } else { print "have not found"; }
- 4: print "had not found";
- 5: print "will not find";
- }
- }
-];
-[ ConjugateVerb_32
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "get";
- 2: print "got";
- 3: print "getting";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "gets"; } else { print "get"; }
- 2: print "got";
- 3: if (vp == 3) { print "has got"; } else { print "have got"; }
- 4: print "had got";
- 5: print "will get";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not get"; } else { print "do not get"; }
- 2: print "did not get";
- 3: if (vp == 3) { print "has not got"; } else { print "have not got"; }
- 4: print "had not got";
- 5: print "will not get";
- }
- }
-];
-[ ConjugateVerb_33
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "give";
- 2: print "given";
- 3: print "giving";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "gives"; } else { print "give"; }
- 2: print "gave";
- 3: if (vp == 3) { print "has given"; } else { print "have given"; }
- 4: print "had given";
- 5: print "will give";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not give"; } else { print "do not give"; }
- 2: print "did not give";
- 3: if (vp == 3) { print "has not given"; } else { print "have not given"; }
- 4: print "had not given";
- 5: print "will not give";
- }
- }
-];
-[ ConjugateVerb_34
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "go";
- 2: print "gone";
- 3: print "going";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "goes"; } else { print "go"; }
- 2: print "went";
- 3: if (vp == 3) { print "has gone"; } else { print "have gone"; }
- 4: print "had gone";
- 5: print "will go";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not go"; } else { print "do not go"; }
- 2: print "did not go";
- 3: if (vp == 3) { print "has not gone"; } else { print "have not gone"; }
- 4: print "had not gone";
- 5: print "will not go";
- }
- }
-];
-[ ConjugateVerb_35
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "happen";
- 2: print "happened";
- 3: print "happening";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "happens"; } else { print "happen"; }
- 2: print "happened";
- 3: if (vp == 3) { print "has happened"; } else { print "have happened"; }
- 4: print "had happened";
- 5: print "will happen";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not happen"; } else { print "do not happen"; }
- 2: print "did not happen";
- 3: if (vp == 3) { print "has not happened"; } else { print "have not happened"; }
- 4: print "had not happened";
- 5: print "will not happen";
- }
- }
-];
-[ ConjugateVerb_36
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "hear";
- 2: print "heard";
- 3: print "hearing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "hears"; } else { print "hear"; }
- 2: print "heard";
- 3: if (vp == 3) { print "has heard"; } else { print "have heard"; }
- 4: print "had heard";
- 5: print "will hear";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not hear"; } else { print "do not hear"; }
- 2: print "did not hear";
- 3: if (vp == 3) { print "has not heard"; } else { print "have not heard"; }
- 4: print "had not heard";
- 5: print "will not hear";
- }
- }
-];
-[ ConjugateVerb_37
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "jump";
- 2: print "jumped";
- 3: print "jumping";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "jumps"; } else { print "jump"; }
- 2: print "jumped";
- 3: if (vp == 3) { print "has jumped"; } else { print "have jumped"; }
- 4: print "had jumped";
- 5: print "will jump";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not jump"; } else { print "do not jump"; }
- 2: print "did not jump";
- 3: if (vp == 3) { print "has not jumped"; } else { print "have not jumped"; }
- 4: print "had not jumped";
- 5: print "will not jump";
- }
- }
-];
-[ ConjugateVerb_38
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "lack";
- 2: print "lacked";
- 3: print "lacking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "lacks"; } else { print "lack"; }
- 2: print "lacked";
- 3: if (vp == 3) { print "has lacked"; } else { print "have lacked"; }
- 4: print "had lacked";
- 5: print "will lack";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not lack"; } else { print "do not lack"; }
- 2: print "did not lack";
- 3: if (vp == 3) { print "has not lacked"; } else { print "have not lacked"; }
- 4: print "had not lacked";
- 5: print "will not lack";
- }
- }
-];
-[ ConjugateVerb_39
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "lead";
- 2: print "led";
- 3: print "leading";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "leads"; } else { print "lead"; }
- 2: print "led";
- 3: if (vp == 3) { print "has led"; } else { print "have led"; }
- 4: print "had led";
- 5: print "will lead";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not lead"; } else { print "do not lead"; }
- 2: print "did not lead";
- 3: if (vp == 3) { print "has not led"; } else { print "have not led"; }
- 4: print "had not led";
- 5: print "will not lead";
- }
- }
-];
-[ ConjugateVerb_40
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "like";
- 2: print "liked";
- 3: print "liking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "likes"; } else { print "like"; }
- 2: print "liked";
- 3: if (vp == 3) { print "has liked"; } else { print "have liked"; }
- 4: print "had liked";
- 5: print "will like";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not like"; } else { print "do not like"; }
- 2: print "did not like";
- 3: if (vp == 3) { print "has not liked"; } else { print "have not liked"; }
- 4: print "had not liked";
- 5: print "will not like";
- }
- }
-];
-[ ConjugateVerb_41
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "listen";
- 2: print "listened";
- 3: print "listening";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "listens"; } else { print "listen"; }
- 2: print "listened";
- 3: if (vp == 3) { print "has listened"; } else { print "have listened"; }
- 4: print "had listened";
- 5: print "will listen";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not listen"; } else { print "do not listen"; }
- 2: print "did not listen";
- 3: if (vp == 3) { print "has not listened"; } else { print "have not listened"; }
- 4: print "had not listened";
- 5: print "will not listen";
- }
- }
-];
-[ ConjugateVerb_42
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "lock";
- 2: print "locked";
- 3: print "locking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "locks"; } else { print "lock"; }
- 2: print "locked";
- 3: if (vp == 3) { print "has locked"; } else { print "have locked"; }
- 4: print "had locked";
- 5: print "will lock";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not lock"; } else { print "do not lock"; }
- 2: print "did not lock";
- 3: if (vp == 3) { print "has not locked"; } else { print "have not locked"; }
- 4: print "had not locked";
- 5: print "will not lock";
- }
- }
-];
-[ ConjugateVerb_43
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "look";
- 2: print "looked";
- 3: print "looking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "looks"; } else { print "look"; }
- 2: print "looked";
- 3: if (vp == 3) { print "has looked"; } else { print "have looked"; }
- 4: print "had looked";
- 5: print "will look";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not look"; } else { print "do not look"; }
- 2: print "did not look";
- 3: if (vp == 3) { print "has not looked"; } else { print "have not looked"; }
- 4: print "had not looked";
- 5: print "will not look";
- }
- }
-];
-[ ConjugateVerb_44
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "need";
- 2: print "needed";
- 3: print "needing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "needs"; } else { print "need"; }
- 2: print "needed";
- 3: if (vp == 3) { print "has needed"; } else { print "have needed"; }
- 4: print "had needed";
- 5: print "will need";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not need"; } else { print "do not need"; }
- 2: print "did not need";
- 3: if (vp == 3) { print "has not needed"; } else { print "have not needed"; }
- 4: print "had not needed";
- 5: print "will not need";
- }
- }
-];
-[ ConjugateVerb_45
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "open";
- 2: print "opened";
- 3: print "opening";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "opens"; } else { print "open"; }
- 2: print "opened";
- 3: if (vp == 3) { print "has opened"; } else { print "have opened"; }
- 4: print "had opened";
- 5: print "will open";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not open"; } else { print "do not open"; }
- 2: print "did not open";
- 3: if (vp == 3) { print "has not opened"; } else { print "have not opened"; }
- 4: print "had not opened";
- 5: print "will not open";
- }
- }
-];
-[ ConjugateVerb_46
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "pass";
- 2: print "passed";
- 3: print "passing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "passes"; } else { print "pass"; }
- 2: print "passed";
- 3: if (vp == 3) { print "has passed"; } else { print "have passed"; }
- 4: print "had passed";
- 5: print "will pass";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not pass"; } else { print "do not pass"; }
- 2: print "did not pass";
- 3: if (vp == 3) { print "has not passed"; } else { print "have not passed"; }
- 4: print "had not passed";
- 5: print "will not pass";
- }
- }
-];
-[ ConjugateVerb_47
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "pick";
- 2: print "picked";
- 3: print "picking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "picks"; } else { print "pick"; }
- 2: print "picked";
- 3: if (vp == 3) { print "has picked"; } else { print "have picked"; }
- 4: print "had picked";
- 5: print "will pick";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not pick"; } else { print "do not pick"; }
- 2: print "did not pick";
- 3: if (vp == 3) { print "has not picked"; } else { print "have not picked"; }
- 4: print "had not picked";
- 5: print "will not pick";
- }
- }
-];
-[ ConjugateVerb_48
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "provoke";
- 2: print "provoked";
- 3: print "provoking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "provokes"; } else { print "provoke"; }
- 2: print "provoked";
- 3: if (vp == 3) { print "has provoked"; } else { print "have provoked"; }
- 4: print "had provoked";
- 5: print "will provoke";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not provoke"; } else { print "do not provoke"; }
- 2: print "did not provoke";
- 3: if (vp == 3) { print "has not provoked"; } else { print "have not provoked"; }
- 4: print "had not provoked";
- 5: print "will not provoke";
- }
- }
-];
-[ ConjugateVerb_49
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "pull";
- 2: print "pulled";
- 3: print "pulling";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "pulls"; } else { print "pull"; }
- 2: print "pulled";
- 3: if (vp == 3) { print "has pulled"; } else { print "have pulled"; }
- 4: print "had pulled";
- 5: print "will pull";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not pull"; } else { print "do not pull"; }
- 2: print "did not pull";
- 3: if (vp == 3) { print "has not pulled"; } else { print "have not pulled"; }
- 4: print "had not pulled";
- 5: print "will not pull";
- }
- }
-];
-[ ConjugateVerb_50
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "push";
- 2: print "pushed";
- 3: print "pushing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "pushes"; } else { print "push"; }
- 2: print "pushed";
- 3: if (vp == 3) { print "has pushed"; } else { print "have pushed"; }
- 4: print "had pushed";
- 5: print "will push";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not push"; } else { print "do not push"; }
- 2: print "did not push";
- 3: if (vp == 3) { print "has not pushed"; } else { print "have not pushed"; }
- 4: print "had not pushed";
- 5: print "will not push";
- }
- }
-];
-[ ConjugateVerb_51
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "put";
- 2: print "put";
- 3: print "putting";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "puts"; } else { print "put"; }
- 2: print "put";
- 3: if (vp == 3) { print "has put"; } else { print "have put"; }
- 4: print "had put";
- 5: print "will put";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not put"; } else { print "do not put"; }
- 2: print "did not put";
- 3: if (vp == 3) { print "has not put"; } else { print "have not put"; }
- 4: print "had not put";
- 5: print "will not put";
- }
- }
-];
-[ ConjugateVerb_52
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "rub";
- 2: print "rubbed";
- 3: print "rubbing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "rubs"; } else { print "rub"; }
- 2: print "rubbed";
- 3: if (vp == 3) { print "has rubbed"; } else { print "have rubbed"; }
- 4: print "had rubbed";
- 5: print "will rub";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not rub"; } else { print "do not rub"; }
- 2: print "did not rub";
- 3: if (vp == 3) { print "has not rubbed"; } else { print "have not rubbed"; }
- 4: print "had not rubbed";
- 5: print "will not rub";
- }
- }
-];
-[ ConjugateVerb_53
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "say";
- 2: print "said";
- 3: print "saying";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "says"; } else { print "say"; }
- 2: print "said";
- 3: if (vp == 3) { print "has said"; } else { print "have said"; }
- 4: print "had said";
- 5: print "will say";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not say"; } else { print "do not say"; }
- 2: print "did not say";
- 3: if (vp == 3) { print "has not said"; } else { print "have not said"; }
- 4: print "had not said";
- 5: print "will not say";
- }
- }
-];
-[ ConjugateVerb_54
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "search";
- 2: print "searched";
- 3: print "searching";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "searches"; } else { print "search"; }
- 2: print "searched";
- 3: if (vp == 3) { print "has searched"; } else { print "have searched"; }
- 4: print "had searched";
- 5: print "will search";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not search"; } else { print "do not search"; }
- 2: print "did not search";
- 3: if (vp == 3) { print "has not searched"; } else { print "have not searched"; }
- 4: print "had not searched";
- 5: print "will not search";
- }
- }
-];
-[ ConjugateVerb_55
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "seem";
- 2: print "seemed";
- 3: print "seeming";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "seems"; } else { print "seem"; }
- 2: print "seemed";
- 3: if (vp == 3) { print "has seemed"; } else { print "have seemed"; }
- 4: print "had seemed";
- 5: print "will seem";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not seem"; } else { print "do not seem"; }
- 2: print "did not seem";
- 3: if (vp == 3) { print "has not seemed"; } else { print "have not seemed"; }
- 4: print "had not seemed";
- 5: print "will not seem";
- }
- }
-];
-[ ConjugateVerb_56
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "set";
- 2: print "set";
- 3: print "setting";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "sets"; } else { print "set"; }
- 2: print "set";
- 3: if (vp == 3) { print "has set"; } else { print "have set"; }
- 4: print "had set";
- 5: print "will set";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not set"; } else { print "do not set"; }
- 2: print "did not set";
- 3: if (vp == 3) { print "has not set"; } else { print "have not set"; }
- 4: print "had not set";
- 5: print "will not set";
- }
- }
-];
-[ ConjugateVerb_57
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "smell";
- 2: print "smelled";
- 3: print "smelling";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "smells"; } else { print "smell"; }
- 2: print "smelled";
- 3: if (vp == 3) { print "has smelled"; } else { print "have smelled"; }
- 4: print "had smelled";
- 5: print "will smell";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not smell"; } else { print "do not smell"; }
- 2: print "did not smell";
- 3: if (vp == 3) { print "has not smelled"; } else { print "have not smelled"; }
- 4: print "had not smelled";
- 5: print "will not smell";
- }
- }
-];
-[ ConjugateVerb_58
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "sniff";
- 2: print "sniffed";
- 3: print "sniffing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "sniffs"; } else { print "sniff"; }
- 2: print "sniffed";
- 3: if (vp == 3) { print "has sniffed"; } else { print "have sniffed"; }
- 4: print "had sniffed";
- 5: print "will sniff";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not sniff"; } else { print "do not sniff"; }
- 2: print "did not sniff";
- 3: if (vp == 3) { print "has not sniffed"; } else { print "have not sniffed"; }
- 4: print "had not sniffed";
- 5: print "will not sniff";
- }
- }
-];
-[ ConjugateVerb_59
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "squeeze";
- 2: print "squeezed";
- 3: print "squeezing";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "squeezes"; } else { print "squeeze"; }
- 2: print "squeezed";
- 3: if (vp == 3) { print "has squeezed"; } else { print "have squeezed"; }
- 4: print "had squeezed";
- 5: print "will squeeze";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not squeeze"; } else { print "do not squeeze"; }
- 2: print "did not squeeze";
- 3: if (vp == 3) { print "has not squeezed"; } else { print "have not squeezed"; }
- 4: print "had not squeezed";
- 5: print "will not squeeze";
- }
- }
-];
-[ ConjugateVerb_60
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "switch";
- 2: print "switched";
- 3: print "switching";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "switches"; } else { print "switch"; }
- 2: print "switched";
- 3: if (vp == 3) { print "has switched"; } else { print "have switched"; }
- 4: print "had switched";
- 5: print "will switch";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not switch"; } else { print "do not switch"; }
- 2: print "did not switch";
- 3: if (vp == 3) { print "has not switched"; } else { print "have not switched"; }
- 4: print "had not switched";
- 5: print "will not switch";
- }
- }
-];
-[ ConjugateVerb_61
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "take";
- 2: print "taken";
- 3: print "taking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "takes"; } else { print "take"; }
- 2: print "took";
- 3: if (vp == 3) { print "has taken"; } else { print "have taken"; }
- 4: print "had taken";
- 5: print "will take";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not take"; } else { print "do not take"; }
- 2: print "did not take";
- 3: if (vp == 3) { print "has not taken"; } else { print "have not taken"; }
- 4: print "had not taken";
- 5: print "will not take";
- }
- }
-];
-[ ConjugateVerb_62
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "talk";
- 2: print "talked";
- 3: print "talking";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "talks"; } else { print "talk"; }
- 2: print "talked";
- 3: if (vp == 3) { print "has talked"; } else { print "have talked"; }
- 4: print "had talked";
- 5: print "will talk";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not talk"; } else { print "do not talk"; }
- 2: print "did not talk";
- 3: if (vp == 3) { print "has not talked"; } else { print "have not talked"; }
- 4: print "had not talked";
- 5: print "will not talk";
- }
- }
-];
-[ ConjugateVerb_63
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "taste";
- 2: print "tasted";
- 3: print "tasting";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "tastes"; } else { print "taste"; }
- 2: print "tasted";
- 3: if (vp == 3) { print "has tasted"; } else { print "have tasted"; }
- 4: print "had tasted";
- 5: print "will taste";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not taste"; } else { print "do not taste"; }
- 2: print "did not taste";
- 3: if (vp == 3) { print "has not tasted"; } else { print "have not tasted"; }
- 4: print "had not tasted";
- 5: print "will not taste";
- }
- }
-];
-[ ConjugateVerb_64
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "turn";
- 2: print "turned";
- 3: print "turning";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "turns"; } else { print "turn"; }
- 2: print "turned";
- 3: if (vp == 3) { print "has turned"; } else { print "have turned"; }
- 4: print "had turned";
- 5: print "will turn";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not turn"; } else { print "do not turn"; }
- 2: print "did not turn";
- 3: if (vp == 3) { print "has not turned"; } else { print "have not turned"; }
- 4: print "had not turned";
- 5: print "will not turn";
- }
- }
-];
-[ ConjugateVerb_65
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "wait";
- 2: print "waited";
- 3: print "waiting";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "waits"; } else { print "wait"; }
- 2: print "waited";
- 3: if (vp == 3) { print "has waited"; } else { print "have waited"; }
- 4: print "had waited";
- 5: print "will wait";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not wait"; } else { print "do not wait"; }
- 2: print "did not wait";
- 3: if (vp == 3) { print "has not waited"; } else { print "have not waited"; }
- 4: print "had not waited";
- 5: print "will not wait";
- }
- }
-];
-[ ConjugateVerb_66
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "wave";
- 2: print "waved";
- 3: print "waving";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "waves"; } else { print "wave"; }
- 2: print "waved";
- 3: if (vp == 3) { print "has waved"; } else { print "have waved"; }
- 4: print "had waved";
- 5: print "will wave";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not wave"; } else { print "do not wave"; }
- 2: print "did not wave";
- 3: if (vp == 3) { print "has not waved"; } else { print "have not waved"; }
- 4: print "had not waved";
- 5: print "will not wave";
- }
- }
-];
-[ ConjugateVerb_67
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "win";
- 2: print "won";
- 3: print "winning";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "wins"; } else { print "win"; }
- 2: print "won";
- 3: if (vp == 3) { print "has won"; } else { print "have won"; }
- 4: print "had won";
- 5: print "will win";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "does not win"; } else { print "do not win"; }
- 2: print "did not win";
- 3: if (vp == 3) { print "has not won"; } else { print "have not won"; }
- 4: print "had not won";
- 5: print "will not win";
- }
- }
-];
-[ ConjugateVerb_68
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "could";
- 2: print "coulded";
- 3: print "coulding";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "could"; if (modal_to) { print " "; modal_to(1); }
- 2: print "could"; if (modal_to) { print " "; modal_to(1); }
- 3: print "could"; if (modal_to) { print " "; modal_to(1); }
- 4: print "could"; if (modal_to) { print " "; modal_to(1); }
- 5: print "could"; if (modal_to) { print " "; modal_to(1); }
- 6: print "could"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "could have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "could have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "could have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "could have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "could"; if (modal_to) { print " "; modal_to(1); }
- 2: print "could"; if (modal_to) { print " "; modal_to(1); }
- 3: print "could"; if (modal_to) { print " "; modal_to(1); }
- 4: print "could"; if (modal_to) { print " "; modal_to(1); }
- 5: print "could"; if (modal_to) { print " "; modal_to(1); }
- 6: print "could"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "could not"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "could not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "could not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "could not"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- }
-];
-[ ConjugateVerb_69
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "may";
- 2: print "mayed";
- 3: print "maying";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "may"; if (modal_to) { print " "; modal_to(1); }
- 2: print "may"; if (modal_to) { print " "; modal_to(1); }
- 3: print "may"; if (modal_to) { print " "; modal_to(1); }
- 4: print "may"; if (modal_to) { print " "; modal_to(1); }
- 5: print "may"; if (modal_to) { print " "; modal_to(1); }
- 6: print "may"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "may have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "may have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "may have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "may have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "may"; if (modal_to) { print " "; modal_to(1); }
- 2: print "may"; if (modal_to) { print " "; modal_to(1); }
- 3: print "may"; if (modal_to) { print " "; modal_to(1); }
- 4: print "may"; if (modal_to) { print " "; modal_to(1); }
- 5: print "may"; if (modal_to) { print " "; modal_to(1); }
- 6: print "may"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "may not"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "may not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "may not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "may not"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- }
-];
-[ ConjugateVerb_70
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "might";
- 2: print "mighted";
- 3: print "mighting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "might"; if (modal_to) { print " "; modal_to(1); }
- 2: print "might"; if (modal_to) { print " "; modal_to(1); }
- 3: print "might"; if (modal_to) { print " "; modal_to(1); }
- 4: print "might"; if (modal_to) { print " "; modal_to(1); }
- 5: print "might"; if (modal_to) { print " "; modal_to(1); }
- 6: print "might"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "might have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "might have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "might have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "might have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "might"; if (modal_to) { print " "; modal_to(1); }
- 2: print "might"; if (modal_to) { print " "; modal_to(1); }
- 3: print "might"; if (modal_to) { print " "; modal_to(1); }
- 4: print "might"; if (modal_to) { print " "; modal_to(1); }
- 5: print "might"; if (modal_to) { print " "; modal_to(1); }
- 6: print "might"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "might not"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "might not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "might not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "might not"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- }
-];
-[ ConjugateVerb_71
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "must";
- 2: print "musted";
- 3: print "musting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "must"; if (modal_to) { print " "; modal_to(1); }
- 2: print "must"; if (modal_to) { print " "; modal_to(1); }
- 3: print "must"; if (modal_to) { print " "; modal_to(1); }
- 4: print "must"; if (modal_to) { print " "; modal_to(1); }
- 5: print "must"; if (modal_to) { print " "; modal_to(1); }
- 6: print "must"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "must have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "must have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "must have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "must have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "must"; if (modal_to) { print " "; modal_to(1); }
- 2: print "must"; if (modal_to) { print " "; modal_to(1); }
- 3: print "must"; if (modal_to) { print " "; modal_to(1); }
- 4: print "must"; if (modal_to) { print " "; modal_to(1); }
- 5: print "must"; if (modal_to) { print " "; modal_to(1); }
- 6: print "must"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "must not"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "must not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "must not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "must not"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- }
-];
-[ ConjugateVerb_72
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "should";
- 2: print "shoulded";
- 3: print "shoulding";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "should"; if (modal_to) { print " "; modal_to(1); }
- 2: print "should"; if (modal_to) { print " "; modal_to(1); }
- 3: print "should"; if (modal_to) { print " "; modal_to(1); }
- 4: print "should"; if (modal_to) { print " "; modal_to(1); }
- 5: print "should"; if (modal_to) { print " "; modal_to(1); }
- 6: print "should"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "should have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "should have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "should have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "should have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "should"; if (modal_to) { print " "; modal_to(1); }
- 2: print "should"; if (modal_to) { print " "; modal_to(1); }
- 3: print "should"; if (modal_to) { print " "; modal_to(1); }
- 4: print "should"; if (modal_to) { print " "; modal_to(1); }
- 5: print "should"; if (modal_to) { print " "; modal_to(1); }
- 6: print "should"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "should not"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "should not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "should not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "should not"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- }
-];
-[ ConjugateVerb_73
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "would";
- 2: print "woulded";
- 3: print "woulding";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "would"; if (modal_to) { print " "; modal_to(1); }
- 2: print "would"; if (modal_to) { print " "; modal_to(1); }
- 3: print "would"; if (modal_to) { print " "; modal_to(1); }
- 4: print "would"; if (modal_to) { print " "; modal_to(1); }
- 5: print "would"; if (modal_to) { print " "; modal_to(1); }
- 6: print "would"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "would have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "would have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "would have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "would have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "would"; if (modal_to) { print " "; modal_to(1); }
- 2: print "would"; if (modal_to) { print " "; modal_to(1); }
- 3: print "would"; if (modal_to) { print " "; modal_to(1); }
- 4: print "would"; if (modal_to) { print " "; modal_to(1); }
- 5: print "would"; if (modal_to) { print " "; modal_to(1); }
- 6: print "would"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "would not"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "would not have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 2: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 3: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 4: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 5: print "would not"; if (modal_to) { print " "; modal_to(1); }
- 6: print "would not"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- }
-];
-[ ConjugateVerb_74
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "'re";
- 2: print " been";
- 3: print " being";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "'m";
- 2: print "'re";
- 3: print "'s";
- 4: print "'re";
- 5: print "'re";
- 6: print "'re";
- }
- 2: switch (vp) {
- 1: print " was";
- 2: print " were";
- 3: print " was";
- 4: print " were";
- 5: print " were";
- 6: print " were";
- }
- 3: if (vp == 3) { print "'s been"; } else { print "'ve been"; }
- 4: print "'d been";
- 5: print "'ll be";
- }
- CV_NEG:
- switch (t) {
- 1: switch (vp) {
- 1: print "'m not";
- 2: print "'re not";
- 3: print "'s not";
- 4: print "'re not";
- 5: print "'re not";
- 6: print "'re not";
- }
- 2: switch (vp) {
- 1: print " wasn't";
- 2: print " weren't";
- 3: print " wasn't";
- 4: print " weren't";
- 5: print " weren't";
- 6: print " weren't";
- }
- 3: if (vp == 3) { print "'s not been"; } else { print "'ve not been"; }
- 4: print "'d not been";
- 5: print "'ll not be";
- }
- }
-];
-[ ConjugateVerb_75
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "'ve";
- 2: print " had";
- 3: print " having";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: if (vp == 3) { print "'s"; } else { print "'ve"; }
- 2: print " had";
- 3: if (vp == 3) { print "'s had"; } else { print "'ve had"; }
- 4: print "'d had";
- 5: print "'ll have";
- }
- CV_NEG:
- switch (t) {
- 1: if (vp == 3) { print "'s not"; } else { print "'ve not"; }
- 2: print " hadn't";
- 3: if (vp == 3) { print "'s not had"; } else { print "'ve not had"; }
- 4: print "'d not had";
- 5: print "'ll not have";
- }
- }
-];
-[ ConjugateVerb_76
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "aren't";
- 2: print "aren'ted";
- 3: print "aren'ting";
- CV_MODAL: return false;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "am not";
- 2: print "aren't";
- 3: print "isn't";
- 4: print "aren't";
- 5: print "aren't";
- 6: print "aren't";
- }
- 2: switch (vp) {
- 1: print "wasn't";
- 2: print "weren't";
- 3: print "wasn't";
- 4: print "weren't";
- 5: print "weren't";
- 6: print "weren't";
- }
- 3: if (vp == 3) { print "hasn't been"; } else { print "haven't been"; }
- 4: print "hadn't been";
- 5: print "won't be";
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_77
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "can't";
- 2: print "can'ted";
- 3: print "can'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "can't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "can't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "can't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "can't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "can't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "can't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- }
- 3: switch (vp) {
- 1: print "haven't been able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "haven't been able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "hasn't been able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "haven't been able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "haven't been able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "haven't been able to"; if (modal_to) { print " "; modal_to(1); }
- }
- 4: switch (vp) {
- 1: print "hadn't been able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "hadn't been able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "hadn't been able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "hadn't been able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "hadn't been able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "hadn't been able to"; if (modal_to) { print " "; modal_to(1); }
- }
- 5: switch (vp) {
- 1: print "won't be able to"; if (modal_to) { print " "; modal_to(1); }
- 2: print "won't be able to"; if (modal_to) { print " "; modal_to(1); }
- 3: print "won't be able to"; if (modal_to) { print " "; modal_to(1); }
- 4: print "won't be able to"; if (modal_to) { print " "; modal_to(1); }
- 5: print "won't be able to"; if (modal_to) { print " "; modal_to(1); }
- 6: print "won't be able to"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_78
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "haven't";
- 2: print "haven'ted";
- 3: print "haven'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "haven't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "haven't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "hasn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "haven't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "haven't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "haven't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "hadn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "won't have"; if (modal_to) { print " "; modal_to(1); }
- 2: print "won't have"; if (modal_to) { print " "; modal_to(1); }
- 3: print "won't have"; if (modal_to) { print " "; modal_to(1); }
- 4: print "won't have"; if (modal_to) { print " "; modal_to(1); }
- 5: print "won't have"; if (modal_to) { print " "; modal_to(1); }
- 6: print "won't have"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_79
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "don't";
- 2: print "don'ted";
- 3: print "don'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "don't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "don't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "doesn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "don't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "don't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "don't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "didn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "won't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_80
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "mustn't";
- 2: print "mustn'ted";
- 3: print "mustn'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mustn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "mustn't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_81
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "mightn't";
- 2: print "mightn'ted";
- 3: print "mightn'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mightn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "mightn't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_82
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "mayn't";
- 2: print "mayn'ted";
- 3: print "mayn'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "mayn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "mayn't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_83
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "wouldn't";
- 2: print "wouldn'ted";
- 3: print "wouldn'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "wouldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "wouldn't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_84
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "couldn't";
- 2: print "couldn'ted";
- 3: print "couldn'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "couldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "couldn't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_85
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "shouldn't";
- 2: print "shouldn'ted";
- 3: print "shouldn'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 2: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 3: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 4: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 5: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- 6: print "shouldn't have"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "shouldn't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-[ ConjugateVerb_86
- fn ! Implied call parameter
- vp ! Implied call parameter
- t ! Implied call parameter
- modal_to ! Implied call parameter
- ;
- switch (fn) {
- 1: print "won't";
- 2: print "won'ted";
- 3: print "won'ting";
- CV_MODAL: return true;
- CV_MEANING: return Rel_Record_0;
- CV_POS:
- switch (t) {
- 1: switch (vp) {
- 1: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "won't"; if (modal_to) { print " "; modal_to(1); }
- }
- 2: switch (vp) {
- 1: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 3: switch (vp) {
- 1: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 4: switch (vp) {
- 1: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 2: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 3: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 4: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 5: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- 6: print "wouldn't"; if (modal_to) { print " "; modal_to(2); }
- }
- 5: switch (vp) {
- 1: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 2: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 3: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 4: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 5: print "won't"; if (modal_to) { print " "; modal_to(1); }
- 6: print "won't"; if (modal_to) { print " "; modal_to(1); }
- }
- }
- CV_NEG:
- switch (t) {
- }
- }
-];
-Array TableOfVerbs --> ConjugateVerb_0 ConjugateVerb_2 ConjugateVerb_3 ConjugateVerb_4 ConjugateVerb_5 ConjugateVerb_6 ConjugateVerb_7 ConjugateVerb_8 ConjugateVerb_9 ConjugateVerb_10 ConjugateVerb_11 ConjugateVerb_12 ConjugateVerb_13 ConjugateVerb_14 ConjugateVerb_15 ConjugateVerb_16 ConjugateVerb_17 ConjugateVerb_18 ConjugateVerb_19 ConjugateVerb_20 ConjugateVerb_21 ConjugateVerb_22 ConjugateVerb_23 ConjugateVerb_24 ConjugateVerb_25 ConjugateVerb_26 ConjugateVerb_27 ConjugateVerb_28 ConjugateVerb_29 ConjugateVerb_30 ConjugateVerb_31 ConjugateVerb_32 ConjugateVerb_33 ConjugateVerb_34 ConjugateVerb_35 ConjugateVerb_36 ConjugateVerb_37 ConjugateVerb_38 ConjugateVerb_39 ConjugateVerb_40 ConjugateVerb_41 ConjugateVerb_42 ConjugateVerb_43 ConjugateVerb_44 ConjugateVerb_45 ConjugateVerb_46 ConjugateVerb_47 ConjugateVerb_48 ConjugateVerb_49 ConjugateVerb_50 ConjugateVerb_51 ConjugateVerb_52 ConjugateVerb_53 ConjugateVerb_54 ConjugateVerb_55 ConjugateVerb_56 ConjugateVerb_57 ConjugateVerb_58 ConjugateVerb_59 ConjugateVerb_60 ConjugateVerb_61 ConjugateVerb_62 ConjugateVerb_63 ConjugateVerb_64 ConjugateVerb_65 ConjugateVerb_66 ConjugateVerb_67 ConjugateVerb_68 ConjugateVerb_69 ConjugateVerb_70 ConjugateVerb_71 ConjugateVerb_72 ConjugateVerb_73 0;
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Testing commands
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF DEBUG;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Abstract Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ XAbstractSub;
- if (XTestMove(noun, second)) return;
- move noun to second;
- "[Abstracted.]";
-];
-
-[ XTestMove obj dest;
- if (obj <= InformLibrary) "[Can't move ", (name) obj, ": it's a system object.]";
- if (obj.component_parent) "[Can't move ", (name) obj, ": it's part of ",
- (the) obj.component_parent, ".]";
- while (dest) {
- if (dest == obj) "[Can't move ", (name) obj, ": it would contain itself.]";
- dest = CoreOfParentOfCoreOf(dest);
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Actions Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ActionsOnSub; trace_actions = 1; say__p = 1; "Actions listing on."; ];
-[ ActionsOffSub; trace_actions = 0; say__p = 1; "Actions listing off."; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Gonear Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GonearSub;
- PlayerTo(LocationOf(noun));
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Purloin Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ XPurloinSub;
- if (XTestMove(noun, player)) return;
- move noun to player; give noun moved ~concealed;
- say__p = 1;
- "[Purloined.]";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Random Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ PredictableSub;
- VM_Seed_RNG(-100);
- say__p = 1;
- "[Random number generator now predictable.]";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Relations Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ShowRelationsSub;
- IterateRelations(ShowOneRelation);
-];
-
-[ ShowOneRelation rel;
- if ((RlnGetF(rel, RR_PERMISSIONS)) & (RELS_SHOW)) {
- (RlnGetF(rel, RR_HANDLER))(rel, RELS_SHOW);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Responses Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global suppress_text_substitution = false;
-[ ShowResponsesSub a i j reg wd set_mode;
- if (NO_RESPONSES == 0) "There are no lettered responses.";
- wn = 2;
- if (NextWordStopped() == 'now') set_mode = 1; else wn--;
- if (NextWordStopped() == 'set') set_mode = 2; else wn--;
- wd = NextWordStopped(); wn--;
- if (wd == 'all') reg = 0;
- else {
- reg = -1;
- if (wd ~= -1) reg = TryNumber(wn);
- if (reg < 0) {
- say__p = 1;
- print ">--> The following sets of responses are available:^";
- print " RESPONSES ALL^";
- }
- }
- for (a=0, i=1, j=0: ResponseDivisions-->a: a=a+3, i++) {
- if (ResponseDivisions-->a ~= EMPTY_TEXT_PACKED) j++;
- if ((reg == 0) || (reg == j)) {
- if (ResponseDivisions-->a ~= EMPTY_TEXT_PACKED) {
- if (set_mode) {
- print "[", (string) ResponseDivisions-->a, "]^";
- } else {
- print (string) ResponseDivisions-->a, ":^";
- }
- }
- ShowResponsesRange(ResponseDivisions-->(a+1), ResponseDivisions-->(a+2), set_mode);
- }
- if (reg < 0) {
- if (ResponseDivisions-->a ~= EMPTY_TEXT_PACKED) {
- print " RESPONSES ", j, ": ", (string) ResponseDivisions-->a, "^";
- }
- }
- }
-];
-
-[ ShowResponsesRange from to set_mode i;
- say__p = 1;
- for (i=from: i<=to: i++) {
- switch (set_mode) {
- 1: print "now ";
- 2: ;
- 0: print " ";
- }
- print (PrintResponse) i;
- switch (set_mode) {
- 1: print " is ";
- 2: print " is ";
- 0: print ": ";
- }
- suppress_text_substitution = true;
- CarryOutActivity(PRINTING_RESPONSE_ACT, i);
- suppress_text_substitution = false;
- switch (set_mode) {
- 1: print ";";
- 2: print ".";
- }
- print "^";
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Rules Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RulesOnSub;
- debug_rules = 1; say__p = 1;
- "Rules tracing now switched on. Type ~rules off~ to switch it off again,
- or ~rules all~ to include even rules which do not apply.";
-];
-[ RulesAllSub;
- debug_rules = 2; say__p = 1;
- "Rules tracing now switched to ~all~. Type ~rules off~ to switch it off again.";
-];
-[ RulesOffSub;
- debug_rules = 0; say__p = 1;
- "Rules tracing now switched off. Type ~rules~ to switch it on again.";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Scenes Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ScenesOnSub;
- debug_scenes = 1;
- ShowSceneStatus(); say__p = 1;
- "(Scene monitoring now switched on. Type ~scenes off~ to switch it off again.)";
-];
-[ ScenesOffSub;
- debug_scenes = 0; say__p = 1;
- "(Scene monitoring now switched off. Type ~scenes~ to switch it on again.)";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Scope Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global x_scope_count;
-[ ScopeSub;
- x_scope_count = 0;
- LoopOverScope(Print_ScL, noun);
- if (x_scope_count == 0) "Nothing is in scope.";
-];
-[ Print_ScL obj; print_ret ++x_scope_count, ": ", (a) obj, " (", obj, ")"; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Showheap Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ShowHeapSub;
- HeapDebug();
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: ShowMe Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ShowMeSub t_0 na;
- t_0 = noun;
- if (noun == nothing) noun = real_location;
- if (ShowMeRecursively(noun, 0, (noun == real_location))) {
- if (noun == real_location)
- print "* denotes things which are not in scope^";
- }
- if (t_0 ofclass K2_thing) {
- print "location:"; ShowRLocation(noun, true); print "^";
- }
- if (t_0) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(pluralname)) && (t_0 has pluralname)) { if (na++ > 0) print ", "; print "plural-named"; }
- if ((AllowInShowme(pluralname)) && (t_0 hasnt pluralname)) { if (na++ > 0) print ", "; print "singular-named"; }
- if ((AllowInShowme(proper)) && (t_0 has proper)) { if (na++ > 0) print ", "; print "proper-named"; }
- if ((AllowInShowme(proper)) && (t_0 hasnt proper)) { if (na++ > 0) print ", "; print "improper-named"; }
- if ((AllowInShowme(ambigpluralname)) && (t_0 has ambigpluralname)) { if (na++ > 0) print ", "; print "ambiguously plural"; }
-}
-if (t_0 ofclass K1_room) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(light)) && (t_0 has light)) { if (na++ > 0) print ", "; print "lighted"; }
- if ((AllowInShowme(light)) && (t_0 hasnt light)) { if (na++ > 0) print ", "; print "dark"; }
- if ((AllowInShowme(visited)) && (t_0 has visited)) { if (na++ > 0) print ", "; print "visited"; }
- if ((AllowInShowme(visited)) && (t_0 hasnt visited)) { if (na++ > 0) print ", "; print "unvisited"; }
-}
-if (t_0 ofclass K2_thing) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(light)) && (t_0 has light)) { if (na++ > 0) print ", "; print "lit"; }
- if ((AllowInShowme(light)) && (t_0 hasnt light)) { if (na++ > 0) print ", "; print "unlit"; }
- if ((AllowInShowme(edible)) && (t_0 has edible)) { if (na++ > 0) print ", "; print "edible"; }
- if ((AllowInShowme(edible)) && (t_0 hasnt edible)) { if (na++ > 0) print ", "; print "inedible"; }
- if ((AllowInShowme(static)) && (t_0 has static)) { if (na++ > 0) print ", "; print "fixed in place"; }
- if ((AllowInShowme(static)) && (t_0 hasnt static)) { if (na++ > 0) print ", "; print "portable"; }
- if ((AllowInShowme(scenery)) && (t_0 has scenery)) { if (na++ > 0) print ", "; print "scenery"; }
- if ((AllowInShowme(clothing)) && (t_0 has clothing)) { if (na++ > 0) print ", "; print "wearable"; }
- if ((AllowInShowme(pushable)) && (t_0 has pushable)) { if (na++ > 0) print ", "; print "pushable between rooms"; }
- if ((AllowInShowme(moved)) && (t_0 has moved)) { if (na++ > 0) print ", "; print "handled"; }
- if ((AllowInShowme(concealed)) && (t_0 hasnt concealed)) { if (na++ > 0) print ", "; print "described"; }
- if ((AllowInShowme(concealed)) && (t_0 has concealed)) { if (na++ > 0) print ", "; print "undescribed"; }
- if ((AllowInShowme(workflag)) && (t_0 has workflag)) { if (na++ > 0) print ", "; print "marked for listing"; }
- if ((AllowInShowme(workflag)) && (t_0 hasnt workflag)) { if (na++ > 0) print ", "; print "unmarked for listing"; }
- if ((AllowInShowme(mentioned)) && (t_0 has mentioned)) { if (na++ > 0) print ", "; print "mentioned"; }
- if ((AllowInShowme(mentioned)) && (t_0 hasnt mentioned)) { if (na++ > 0) print ", "; print "unmentioned"; }
-}
-if (t_0 ofclass K3_direction) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(workflag)) && (t_0 has workflag)) { if (na++ > 0) print ", "; print "marked for listing"; }
- if ((AllowInShowme(workflag)) && (t_0 hasnt workflag)) { if (na++ > 0) print ", "; print "unmarked for listing"; }
-}
-if (t_0 ofclass K4_door) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(open)) && (t_0 has open)) { if (na++ > 0) print ", "; print "open"; }
- if ((AllowInShowme(open)) && (t_0 hasnt open)) { if (na++ > 0) print ", "; print "closed"; }
- if ((AllowInShowme(openable)) && (t_0 has openable)) { if (na++ > 0) print ", "; print "openable"; }
- if ((AllowInShowme(openable)) && (t_0 hasnt openable)) { if (na++ > 0) print ", "; print "unopenable"; }
- if ((AllowInShowme(lockable)) && (t_0 has lockable)) { if (na++ > 0) print ", "; print "lockable"; }
- if ((AllowInShowme(locked)) && (t_0 has locked)) { if (na++ > 0) print ", "; print "locked"; }
- if ((AllowInShowme(locked)) && (t_0 hasnt locked)) { if (na++ > 0) print ", "; print "unlocked"; }
-}
-if (t_0 ofclass K5_container) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(enterable)) && (t_0 has enterable)) { if (na++ > 0) print ", "; print "enterable"; }
- if ((AllowInShowme(transparent)) && (t_0 hasnt transparent)) { if (na++ > 0) print ", "; print "opaque"; }
- if ((AllowInShowme(transparent)) && (t_0 has transparent)) { if (na++ > 0) print ", "; print "transparent"; }
- if ((AllowInShowme(open)) && (t_0 has open)) { if (na++ > 0) print ", "; print "open"; }
- if ((AllowInShowme(open)) && (t_0 hasnt open)) { if (na++ > 0) print ", "; print "closed"; }
- if ((AllowInShowme(openable)) && (t_0 has openable)) { if (na++ > 0) print ", "; print "openable"; }
- if ((AllowInShowme(openable)) && (t_0 hasnt openable)) { if (na++ > 0) print ", "; print "unopenable"; }
- if ((AllowInShowme(lockable)) && (t_0 has lockable)) { if (na++ > 0) print ", "; print "lockable"; }
- if ((AllowInShowme(locked)) && (t_0 has locked)) { if (na++ > 0) print ", "; print "locked"; }
- if ((AllowInShowme(locked)) && (t_0 hasnt locked)) { if (na++ > 0) print ", "; print "unlocked"; }
-}
-if (t_0 ofclass K6_supporter) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(enterable)) && (t_0 has enterable)) { if (na++ > 0) print ", "; print "enterable"; }
-}
-if (t_0 ofclass K8_person) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(female)) && (t_0 has female)) { if (na++ > 0) print ", "; print "female"; }
- if ((AllowInShowme(female)) && (t_0 hasnt female)) { if (na++ > 0) print ", "; print "male"; }
- if ((AllowInShowme(neuter)) && (t_0 has neuter)) { if (na++ > 0) print ", "; print "neuter"; }
-}
-if (t_0 ofclass K13_device) {if (na > 0) { na = 0; print "; "; }
- if ((AllowInShowme(on)) && (t_0 has on)) { if (na++ > 0) print ", "; print "switched on"; }
- if ((AllowInShowme(on)) && (t_0 hasnt on)) { if (na++ > 0) print ", "; print "switched off"; }
-}
-if (t_0) {if (na > 0) { na = 0; print "^"; }
- print "list grouping key: "; if (TEXT_TY_Compare(GProperty(OBJECT_TY, t_0, list_together), EMPTY_TEXT_VALUE) == 0) print "none^"; else print "~", (TEXT_TY_Say) GProperty(OBJECT_TY, t_0, list_together), "~", "^";
- print "printed name: "; if (TEXT_TY_Compare(GProperty(OBJECT_TY, t_0, short_name), EMPTY_TEXT_VALUE) == 0) print "none^"; else print "~", (TEXT_TY_Say) GProperty(OBJECT_TY, t_0, short_name), "~", "^";
- print "printed plural name: "; if (TEXT_TY_Compare(GProperty(OBJECT_TY, t_0, plural), EMPTY_TEXT_VALUE) == 0) print "none^"; else print "~", (TEXT_TY_Say) GProperty(OBJECT_TY, t_0, plural), "~", "^";
- print "indefinite article: "; if (TEXT_TY_Compare(GProperty(OBJECT_TY, t_0, article), EMPTY_TEXT_VALUE) == 0) print "none^"; else print "~", (TEXT_TY_Say) GProperty(OBJECT_TY, t_0, article), "~", "^";
-}
-if (t_0 ofclass K1_room) {if (na > 0) { na = 0; print "^"; }
- print "description: "; if (TEXT_TY_Compare(GProperty(OBJECT_TY, t_0, description), EMPTY_TEXT_VALUE) == 0) print "none^"; else print "~", (TEXT_TY_Say) GProperty(OBJECT_TY, t_0, description), "~", "^";
- if (GProperty(OBJECT_TY, t_0, map_region)) { print "map region: "; print (PrintShortName) GProperty(OBJECT_TY, t_0, map_region), "^";
- }
-}
-if (t_0 ofclass K2_thing) {if (na > 0) { na = 0; print "^"; }
- print "description: "; if (TEXT_TY_Compare(GProperty(OBJECT_TY, t_0, description), EMPTY_TEXT_VALUE) == 0) print "none^"; else print "~", (TEXT_TY_Say) GProperty(OBJECT_TY, t_0, description), "~", "^";
- print "initial appearance: "; if (TEXT_TY_Compare(GProperty(OBJECT_TY, t_0, initial), EMPTY_TEXT_VALUE) == 0) print "none^"; else print "~", (TEXT_TY_Say) GProperty(OBJECT_TY, t_0, initial), "~", "^";
- if (GProperty(OBJECT_TY, t_0, with_key)) { print "matching key: "; print (PrintShortName) GProperty(OBJECT_TY, t_0, with_key), "^";
- }
-}
-if (t_0 ofclass K3_direction) {if (na > 0) { na = 0; print "^"; }
- if (GProperty(OBJECT_TY, t_0, p10_opposite)) { print "opposite: "; print (PrintShortName) GProperty(OBJECT_TY, t_0, p10_opposite), "^";
- }
-}
-if (t_0 ofclass K4_door) {if (na > 0) { na = 0; print "^"; }
- if (GProperty(OBJECT_TY, t_0, door_to)) { print "other side: "; print (PrintShortName) GProperty(OBJECT_TY, t_0, door_to), "^";
- }
-}
-if (t_0 ofclass K5_container) {if (na > 0) { na = 0; print "^"; }
- print "carrying capacity: "; print (DecimalNumber) GProperty(OBJECT_TY, t_0, capacity), "^";
-}
-if (t_0 ofclass K6_supporter) {if (na > 0) { na = 0; print "^"; }
- print "carrying capacity: "; print (DecimalNumber) GProperty(OBJECT_TY, t_0, capacity), "^";
-}
-if (t_0 ofclass K8_person) {if (na > 0) { na = 0; print "^"; }
- print "carrying capacity: "; print (DecimalNumber) GProperty(OBJECT_TY, t_0, capacity), "^";
-}
-
-];
-
-[ ShowRLocation obj top;
- if (obj ofclass K1_room) return;
- print " ";
- if (parent(obj)) {
- if (obj has worn) print "worn by ";
- else {
- if (parent(obj) has animate) print "carried by ";
- if (parent(obj) has container) print "in ";
- if (parent(obj) ofclass K1_room) print "in ";
- if (parent(obj) has supporter) print "on ";
- }
- print (the) parent(obj);
- ShowRLocation(parent(obj));
- } else {
- if (obj.component_parent) {
- if (top == false) print ", which is ";
- print "part of ", (the) obj.component_parent;
- ShowRLocation(obj.component_parent);
- }
- else print "out of play";
- }
-];
-
-[ ShowMeRecursively obj depth f c i k;
- spaces(2*depth);
- if (f && (depth > 0) && (TestScope(obj, player) == false)) { print "*"; c = true; }
- print (name) obj;
- if (depth > 0) {
- if (obj.component_parent) print " (part of ", (name) obj.component_parent, ")";
- if (obj has worn) print " (worn)";
- }
- if (obj provides KD_Count) {
- k = KindHierarchy-->((obj.KD_Count)*2);
- if ((k ~= K2_thing) || (depth==0)) {
- print " - ";
- if (k == K4_door or K5_container) {
- if (obj has transparent) print "transparent ";
- if (obj has locked) print "locked ";
- else if (obj has open) print "open ";
- else print "closed ";
- }
- print (I7_Kind_Name) k;
- }
- }
- print "^";
- if (obj.component_child) c = c | ShowMeRecursively(obj.component_child, depth+2, f);
- if ((depth>0) && (obj.component_sibling))
- c = c | ShowMeRecursively(obj.component_sibling, depth, f);
- if (child(obj)) c = c | ShowMeRecursively(child(obj), depth+2, f);
- if ((depth>0) && (sibling(obj))) c = c | ShowMeRecursively(sibling(obj), depth, f);
- return c;
-];
-
-[ AllowInShowme pr;
- if (pr == workflag or concealed or mentioned) rfalse;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Showverb Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ShowVerbSub address lines meta i x;
- wn = 2; x = NextWordStopped();
- if (x == 0 || ((x->#dict_par1) & 1) == 0)
- "Try typing ~showverb~ and then the name of a verb.";
- meta = ((x->#dict_par1) & 2)/2;
- i = DictionaryWordToVerbNum(x);
- address = VM_CommandTableAddress(i);
- lines = address->0;
- address++;
- print "Verb ";
- if (meta) print "meta ";
- VM_PrintCommandWords(i);
- new_line;
- if (lines == 0) print "has no grammar lines.^";
- for (: lines>0 : lines--) {
- address = UnpackGrammarLine(address);
- print " "; DebugGrammarLine(); new_line;
- }
- ParaContent();
-];
-
-[ DebugGrammarLine pcount;
- print " * ";
- for (: line_token-->pcount ~= ENDIT_TOKEN : pcount++) {
- if ((line_token-->pcount)->0 & $10) print "/ ";
- print (DebugToken) line_token-->pcount, " ";
- }
- print "-> ", (DebugAction) action_to_be;
- if (action_reversed) print " reverse";
-];
-
-[ DebugToken token;
- AnalyseToken(token);
- switch (found_ttype) {
- ILLEGAL_TT:
- print "";
- ELEMENTARY_TT:
- switch (found_tdata) {
- NOUN_TOKEN: print "noun";
- HELD_TOKEN: print "held";
- MULTI_TOKEN: print "multi";
- MULTIHELD_TOKEN: print "multiheld";
- MULTIEXCEPT_TOKEN: print "multiexcept";
- MULTIINSIDE_TOKEN: print "multiinside";
- CREATURE_TOKEN: print "creature";
- SPECIAL_TOKEN: print "special";
- NUMBER_TOKEN: print "number";
- TOPIC_TOKEN: print "topic";
- ENDIT_TOKEN: print "END";
- }
- PREPOSITION_TT:
- print "'", (address) found_tdata, "'";
- ROUTINE_FILTER_TT:
- print "noun=Routine(", found_tdata, ")";
- ATTR_FILTER_TT:
- print (DebugAttribute) found_tdata;
- SCOPE_TT:
- print "scope=Routine(", found_tdata, ")";
- GPR_TT:
- print "Routine(", found_tdata, ")";
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Test Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#Iftrue (0 > 0);
-
-[ TestScriptSub;
- switch(special_word) {
-
- default:
- print ">--> The following tests are available:^";
-
- }
-];
-
-#ifdef TARGET_GLULX;
-Constant TEST_STACK_SIZE = 128;
-#ifnot;
-Constant TEST_STACK_SIZE = 48;
-#endif;
-
-Array test_stack --> TEST_STACK_SIZE;
-Global test_sp = 0;
-[ TestStart T R l k;
- if (test_sp >= TEST_STACK_SIZE) ">--> Testing too many levels deep";
- test_stack-->test_sp = T;
- test_stack-->(test_sp+1) = 0;
- test_stack-->(test_sp+3) = l;
- test_sp = test_sp + 4;
- if ((R-->0) && (R-->0 ~= real_location)) {
- print "(first moving to ", (name) R-->0, ")^";
- PlayerTo(R-->0, 1);
- }
- k=1;
- while (R-->k) {
- if (R-->k notin player) {
- print "(first acquiring ", (the) R-->k, ")^";
- move R-->k to player;
- }
- k++;
- }
- print "(Testing.)^"; say__p = 1;
-];
-[ TestKeyboardPrimitive a_buffer a_table p i j l spaced ch;
- if (test_sp == 0) {
- test_stack-->2 = 1;
- return VM_ReadKeyboard(a_buffer, a_table);
- }
- else {
- p = test_stack-->(test_sp-4);
- i = test_stack-->(test_sp-3);
- l = test_stack-->(test_sp-1);
- print "[";
- print test_stack-->2;
- print "] ";
- test_stack-->2 = test_stack-->2 + 1;
- style bold;
- while ((i < l) && (p->i ~= '/')) {
- ch = p->i;
- if (spaced || (ch ~= ' ')) {
- if ((p->i == '[') && (p->(i+1) == '/') && (p->(i+2) == ']')) {
- ch = '/'; i = i+2;
- }
- a_buffer->(j+WORDSIZE) = ch;
- print (char) ch;
- i++; j++;
- spaced = true;
- } else i++;
- }
- style roman;
- print "^";
- #ifdef TARGET_ZCODE;
- a_buffer->1 = j;
- #ifnot; ! TARGET_GLULX
- a_buffer-->0 = j;
- #endif;
- VM_Tokenise(a_buffer, a_table);
- if (p->i == '/') i++;
- if (i >= l) {
- test_sp = test_sp - 4;
- } else test_stack-->(test_sp-3) = i;
- }
-];
-
-#IFNOT;
-
-[ TestScriptSub;
- ">--> No test scripts exist for this game.";
-];
-
-#ENDIF;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Trace Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TraceOnSub; parser_trace=1; say__p = 1; "[Trace on.]"; ];
-
-[ TraceLevelSub;
- parser_trace = parsed_number; say__p = 1;
- print "[Parser tracing set to level ", parser_trace, ".]^";
-];
-
-[ TraceOffSub; parser_trace=0; say__p = 1; "Trace off."; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Tree Command
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ XTreeSub i;
- if (noun == 0) {
- objectloop (i)
- if (i ofclass Object && parent(i) == 0) XObj(i);
- }
- else XObj(noun,1);
-];
-
-[ XObj obj f;
- if (parent(obj) == 0) print (name) obj; else print (a) obj;
- print " (", obj, ") ";
- if (f == 1 && parent(obj) ~= 0)
- print "(in ", (name) parent(obj), " ", parent(obj), ")";
- new_line;
- if (child(obj) == 0) rtrue;
- if (obj == Class)
- WriteListFrom(child(obj), NEWLINE_BIT+INDENT_BIT+ALWAYS_BIT+NOARTICLE_BIT, 1);
- else
- WriteListFrom(child(obj), NEWLINE_BIT+INDENT_BIT+ALWAYS_BIT+FULLINV_BIT, 1);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Tests.i6t: Grammar
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ testcommandnoun obj o2;
- switch (scope_stage) {
- 1: rtrue; ! allow multiple objects
- 2: objectloop (obj)
- if ((obj ofclass Object) && (obj provides KD_Count))
- PlaceInScope(obj, true);
- 3: print "There seems to be no such object anywhere in the model world.^";
- }
-];
-
-Verb meta 'abstract'
-
- * scope=testcommandnoun 'to' scope=testcommandnoun -> XAbstract;
-Verb meta 'actions'
-
- * -> ActionsOn
- * 'on' -> ActionsOn
- * 'off' -> ActionsOff;
-Verb meta 'gonear'
-
- * scope=testcommandnoun -> Gonear;
-Verb meta 'purloin'
-
- * scope=testcommandnoun -> XPurloin;
-Verb meta 'random'
-
- * -> Predictable;
-Verb meta 'relations'
-
- * -> ShowRelations;
-Verb meta 'responses'
-
- * -> ShowResponses
- * special -> ShowResponses
- * 'now' special -> ShowResponses
- * 'set' special -> ShowResponses;
-Verb meta 'rules'
-
- * -> RulesOn
- * 'all' -> RulesAll
- * 'on' -> RulesOn
- * 'off' -> RulesOff;
-Verb meta 'scenes'
-
- * -> ScenesOn
- * 'on' -> ScenesOn
- * 'off' -> ScenesOff;
-Verb meta 'scope'
-
- * -> Scope
- * scope=testcommandnoun -> Scope;
-Verb meta 'showheap'
-
- * -> ShowHeap;
-Verb meta 'showme'
-
- * -> ShowMe
- * scope=testcommandnoun -> ShowMe;
-Verb meta 'showverb'
-
- * special -> Showverb;
-Verb meta 'test'
-
- * -> TestScript
- * special -> TestScript;
-Verb meta 'trace'
-
- * -> TraceOn
- * number -> TraceLevel
- * 'on' -> TraceOn
- * 'off' -> TraceOff;
-Verb meta 'tree'
-
- * -> XTree
- * scope=testcommandnoun -> XTree;
-
-[ InternalTestCases ;
- ];
-
-#ENDIF; ! DEBUG
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: I6 Inclusions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! "Include (- ... -)" inclusions with no specified position appear here.
-
-
- [ CheckDPMR result sinp1 sinp2 rv;
- sinp1 = inp1; sinp2 = inp2; inp1 = noun; inp2 = second;
- rv = FollowRulebook( 25 );
- inp1 = sinp1; inp2 = sinp2;
- if ((rv) && RulebookSucceeded()) {
- result = ResultOfRule();
- if (result == RBNO_6 ) return 4;
- if (result == RBNO_7 ) return 3;
- if (result == RBNO_8 ) return 2;
- if (result == RBNO_9 ) return 1;
- if (result == RBNO_10 ) return 0;
- }
- return 2;
- ];
-
-[ LITTLE_USED_DO_NOTHING_R; rfalse; ];
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Entries in constant lists
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: To Phrases
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! From the Standard Rules
-! Request 0: phrase (object, number) -> nothing
-! To set the/-- locale priority of ( O - an object ) to ( N - a number ):
-[ PHR_82_r0
- t_0 ! Call parameter 'O': object
- t_1 ! Call parameter 'N': number
- ct_0 ! currently selected table
- ct_1 ! currently selected row
- ;
- ! [2: if o is a thing]
- if (((t_0 ofclass K2_thing)))
- {! [3: if n <= 0]
- if (((t_1 <= 0)))
- {! [4: now o is mentioned]
- (Adj_67_t2_v10(t_0));
- }
- ! [5: if there is a notable-object of o in the table of locale priorities]
- if (((ExistsTableLookUpCorr(T1_locale_priorities,105,105,t_0))))
- {! [6: choose row with a notable-object of o in the table of locale priorities]
- ct_0 = T1_locale_priorities; ct_1 = TableRowCorr(ct_0, 105, t_0);
- ! [7: if n <= 0]
- if (((t_1 <= 0)))
- {! [8: blank out the whole row]
- TableBlankOutRow(ct_0, ct_1);
- } else {
- ! [9: now the locale description priority entry is n]
- TableLookUpEntry(ct_0,106,ct_1,1,t_1);
- }
- } else {
- ! [10: if n is greater than 0]
- if (((t_1 > 0)))
- {! [11: choose a blank row in the table of locale priorities]
- ct_0 = T1_locale_priorities; ct_1 = TableBlankRow(ct_0);
- ! [12: now the notable-object entry is o]
- TableLookUpEntry(ct_0,105,ct_1,1,t_0);
- ! [13: now the locale description priority entry is n]
- TableLookUpEntry(ct_0,106,ct_1,1,t_1);
- }
- }
- }
- rfalse;
-];
-! From the Standard Rules
-! Request 1: phrase object -> nothing
-! To describe locale for ( O - object ):
-[ PHR_81_r1
- t_0 ! Call parameter 'O': object
- ;
- ! [2: carry out the printing the locale description activity with o]
- CarryOutActivity(V30_printing_the_locale_desc, t_0);
- rfalse;
-];
-! From the Standard Rules
-! Request 2: phrase nothing -> nothing
-! To say no line break -- running on ( documented at phs_nolinebreak ):
-[ PHR_350_r2 ;
- ! [2: do nothing]
- ;
- rfalse;
-];
-! From the Standard Rules
-! Request 3: phrase response -> nothing
-! To say text of ( R - response ) ( documented at phs_response ):
-[ PHR_390_r3
- t_0 ! Call parameter 'R': response
- ;
- ! [2: carry out the issuing the response text activity with r]
- CarryOutActivity(V33_issuing_the_response_tex, t_0);
- rfalse;
-];
-! From the Standard Rules
-! Request 4: phrase real number -> real number
-! To decide which real number is the real square of ( R - a real number ) ( this is the rsqr function inverse to root ):
-[ PHR_424_r4
- t_0 ! Call parameter 'R': real number
- tmp_0 ! Let/loop value, e.g., 'x': real number
- ;
- ! [2: let x be given by x = r@@94@{32} where x is a real number]
-
- ! Solving Q0_swedish for '$w'
- (tmp_0 = (REAL_NUMBER_TY_Pow(t_0, NUMBER_TY_to_REAL_NUMBER_TY(2))));
- ;
- ! [3: decide on x]
- return tmp_0;
- return 0;
-];
-! From the Standard Rules
-! Request 5: phrase real number -> real number
-! To decide which real number is the hyperbolic arcsine of ( R - a real number ) ( documented at ph_hyperbolicarcsine ) ( this is the arcsinh function inverse to sinh ):
-[ PHR_442_r5
- t_0 ! Call parameter 'R': real number
- tmp_0 ! Let/loop value, e.g., 'x': real number
- ;
- ! [2: let x be given by x = log ( r + root ( r@@94@{32} + 1 ) ) where x is a real number]
-
- ! Solving Q1_swedish for '$w'
- (tmp_0 = (REAL_NUMBER_TY_Log((REAL_NUMBER_TY_Plus(t_0, (REAL_NUMBER_TY_Root((REAL_NUMBER_TY_Plus((REAL_NUMBER_TY_Pow(t_0, NUMBER_TY_to_REAL_NUMBER_TY(2))), NUMBER_TY_to_REAL_NUMBER_TY(1))))))))));
- ;
- ! [3: decide on x]
- return tmp_0;
- return 0;
-];
-! From the Standard Rules
-! Request 6: phrase real number -> real number
-! To decide which real number is the hyperbolic arccosine of ( R - a real number ) ( documented at ph_hyperbolicarccosine ) ( this is the arccosh function inverse to cosh ):
-[ PHR_443_r6
- t_0 ! Call parameter 'R': real number
- tmp_0 ! Let/loop value, e.g., 'x': real number
- ;
- ! [2: let x be given by x = log ( r + root ( r@@94@{32} - 1 ) ) where x is a real number]
-
- ! Solving Q2_swedish for '$w'
- (tmp_0 = (REAL_NUMBER_TY_Log((REAL_NUMBER_TY_Plus(t_0, (REAL_NUMBER_TY_Root((REAL_NUMBER_TY_Minus((REAL_NUMBER_TY_Pow(t_0, NUMBER_TY_to_REAL_NUMBER_TY(2))), NUMBER_TY_to_REAL_NUMBER_TY(1))))))))));
- ;
- ! [3: decide on x]
- return tmp_0;
- return 0;
-];
-! From the Standard Rules
-! Request 7: phrase real number -> real number
-! To decide which real number is the hyperbolic arctangent of ( R - a real number ) ( documented at ph_hyperbolicarctangent ) ( this is the arctanh function inverse to tanh ):
-[ PHR_444_r7
- t_0 ! Call parameter 'R': real number
- tmp_0 ! Let/loop value, e.g., 'x': real number
- ;
- ! [2: let x be given by x = 0.5* ( log ( 1+r ) - log ( 1-r ) ) where x is a real number]
-
- ! Solving Q3_swedish for '$w'
- (tmp_0 = (REAL_NUMBER_TY_Times(1056964608, (REAL_NUMBER_TY_Minus((REAL_NUMBER_TY_Log((REAL_NUMBER_TY_Plus(NUMBER_TY_to_REAL_NUMBER_TY(1), t_0)))), (REAL_NUMBER_TY_Log((REAL_NUMBER_TY_Minus(NUMBER_TY_to_REAL_NUMBER_TY(1), t_0)))))))));
- ;
- ! [3: decide on x]
- return tmp_0;
- return 0;
-];
-! From the Standard Rules
-! Request 8: phrase nothing -> nothing
-! To say here ( documented at phs_here ):
-[ PHR_527_r8 ;
- ! [2: say ~[if story tense is present tense]here[otherwise]there~]
- say__p=1;! [3: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say294;! [4: ~here~]
- ParaContent(); print "here";! [5: otherwise]
-
- jump L_SayX294; .L_Say294;! [6: ~there~]
- ParaContent(); print "there"; .L_Say295; .L_SayX294;rfalse;
-];
-! From the Standard Rules
-! Request 9: phrase nothing -> nothing
-! To say now ( documented at phs_now ):
-[ PHR_528_r9 ;
- ! [2: say ~[if story tense is present tense]now[otherwise]then~]
- say__p=1;! [3: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say296;! [4: ~now~]
- ParaContent(); print "now";! [5: otherwise]
-
- jump L_SayX295; .L_Say296;! [6: ~then~]
- ParaContent(); print "then"; .L_Say297; .L_SayX295;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 10: phrase nothing -> nothing
-! To say we:
-[ PHR_763_r10 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~I~]
- say__p=1;! [5: ~I~]
- ParaContent(); print "I"; .L_Say298; .L_SayX296;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~you~]
- say__p=1;! [8: ~you~]
- ParaContent(); print "you"; .L_Say299; .L_SayX297;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~he~]
- say__p=1;! [12: ~he~]
- ParaContent(); print "he"; .L_Say300; .L_SayX298;} else {
- ! [13: say ~she~]
- say__p=1;! [14: ~she~]
- ParaContent(); print "she"; .L_Say301; .L_SayX299;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~we~]
- say__p=1;! [17: ~we~]
- ParaContent(); print "we"; .L_Say302; .L_SayX300;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~you~]
- say__p=1;! [20: ~you~]
- ParaContent(); print "you"; .L_Say303; .L_SayX301;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~they~]
- say__p=1;! [23: ~they~]
- ParaContent(); print "they"; .L_Say304; .L_SayX302;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 11: phrase nothing -> nothing
-! To say us:
-[ PHR_764_r11 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~me~]
- say__p=1;! [5: ~me~]
- ParaContent(); print "me"; .L_Say305; .L_SayX303;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~you~]
- say__p=1;! [8: ~you~]
- ParaContent(); print "you"; .L_Say306; .L_SayX304;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~him~]
- say__p=1;! [12: ~him~]
- ParaContent(); print "him"; .L_Say307; .L_SayX305;} else {
- ! [13: say ~her~]
- say__p=1;! [14: ~her~]
- ParaContent(); print "her"; .L_Say308; .L_SayX306;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~us~]
- say__p=1;! [17: ~us~]
- ParaContent(); print "us"; .L_Say309; .L_SayX307;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~you~]
- say__p=1;! [20: ~you~]
- ParaContent(); print "you"; .L_Say310; .L_SayX308;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~them~]
- say__p=1;! [23: ~them~]
- ParaContent(); print "them"; .L_Say311; .L_SayX309;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 12: phrase nothing -> nothing
-! To say ours:
-[ PHR_765_r12 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~mine~]
- say__p=1;! [5: ~mine~]
- ParaContent(); print "mine"; .L_Say312; .L_SayX310;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~yours~]
- say__p=1;! [8: ~yours~]
- ParaContent(); print "yours"; .L_Say313; .L_SayX311;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~his~]
- say__p=1;! [12: ~his~]
- ParaContent(); print "his"; .L_Say314; .L_SayX312;} else {
- ! [13: say ~hers~]
- say__p=1;! [14: ~hers~]
- ParaContent(); print "hers"; .L_Say315; .L_SayX313;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~ours~]
- say__p=1;! [17: ~ours~]
- ParaContent(); print "ours"; .L_Say316; .L_SayX314;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~yours~]
- say__p=1;! [20: ~yours~]
- ParaContent(); print "yours"; .L_Say317; .L_SayX315;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~theirs~]
- say__p=1;! [23: ~theirs~]
- ParaContent(); print "theirs"; .L_Say318; .L_SayX316;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 13: phrase nothing -> nothing
-! To say ourselves:
-[ PHR_766_r13 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~myself~]
- say__p=1;! [5: ~myself~]
- ParaContent(); print "myself"; .L_Say319; .L_SayX317;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~yourself~]
- say__p=1;! [8: ~yourself~]
- ParaContent(); print "yourself"; .L_Say320; .L_SayX318;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~himself~]
- say__p=1;! [12: ~himself~]
- ParaContent(); print "himself"; .L_Say321; .L_SayX319;} else {
- ! [13: say ~herself~]
- say__p=1;! [14: ~herself~]
- ParaContent(); print "herself"; .L_Say322; .L_SayX320;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~ourselves~]
- say__p=1;! [17: ~ourselves~]
- ParaContent(); print "ourselves"; .L_Say323; .L_SayX321;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~yourselves~]
- say__p=1;! [20: ~yourselves~]
- ParaContent(); print "yourselves"; .L_Say324; .L_SayX322;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~themselves~]
- say__p=1;! [23: ~themselves~]
- ParaContent(); print "themselves"; .L_Say325; .L_SayX323;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 14: phrase nothing -> nothing
-! To say our:
-[ PHR_767_r14 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~my~]
- say__p=1;! [5: ~my~]
- ParaContent(); print "my"; .L_Say326; .L_SayX324;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~your~]
- say__p=1;! [8: ~your~]
- ParaContent(); print "your"; .L_Say327; .L_SayX325;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~his~]
- say__p=1;! [12: ~his~]
- ParaContent(); print "his"; .L_Say328; .L_SayX326;} else {
- ! [13: say ~her~]
- say__p=1;! [14: ~her~]
- ParaContent(); print "her"; .L_Say329; .L_SayX327;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~our~]
- say__p=1;! [17: ~our~]
- ParaContent(); print "our"; .L_Say330; .L_SayX328;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~your~]
- say__p=1;! [20: ~your~]
- ParaContent(); print "your"; .L_Say331; .L_SayX329;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~their~]
- say__p=1;! [23: ~their~]
- ParaContent(); print "their"; .L_Say332; .L_SayX330;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 15: phrase nothing -> nothing
-! To say We:
-[ PHR_768_r15 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~I~]
- say__p=1;! [5: ~I~]
- ParaContent(); print "I"; .L_Say333; .L_SayX331;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~You~]
- say__p=1;! [8: ~You~]
- ParaContent(); print "You"; .L_Say334; .L_SayX332;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~He~]
- say__p=1;! [12: ~He~]
- ParaContent(); print "He"; .L_Say335; .L_SayX333;} else {
- ! [13: say ~She~]
- say__p=1;! [14: ~She~]
- ParaContent(); print "She"; .L_Say336; .L_SayX334;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~We~]
- say__p=1;! [17: ~We~]
- ParaContent(); print "We"; .L_Say337; .L_SayX335;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~You~]
- say__p=1;! [20: ~You~]
- ParaContent(); print "You"; .L_Say338; .L_SayX336;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~They~]
- say__p=1;! [23: ~They~]
- ParaContent(); print "They"; .L_Say339; .L_SayX337;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 16: phrase nothing -> nothing
-! To say Us:
-[ PHR_769_r16 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~Me~]
- say__p=1;! [5: ~Me~]
- ParaContent(); print "Me"; .L_Say340; .L_SayX338;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~You~]
- say__p=1;! [8: ~You~]
- ParaContent(); print "You"; .L_Say341; .L_SayX339;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~Him~]
- say__p=1;! [12: ~Him~]
- ParaContent(); print "Him"; .L_Say342; .L_SayX340;} else {
- ! [13: say ~Her~]
- say__p=1;! [14: ~Her~]
- ParaContent(); print "Her"; .L_Say343; .L_SayX341;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~Us~]
- say__p=1;! [17: ~Us~]
- ParaContent(); print "Us"; .L_Say344; .L_SayX342;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~You~]
- say__p=1;! [20: ~You~]
- ParaContent(); print "You"; .L_Say345; .L_SayX343;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~Them~]
- say__p=1;! [23: ~Them~]
- ParaContent(); print "Them"; .L_Say346; .L_SayX344;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 17: phrase nothing -> nothing
-! To say Ours:
-[ PHR_770_r17 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~Mine~]
- say__p=1;! [5: ~Mine~]
- ParaContent(); print "Mine"; .L_Say347; .L_SayX345;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~Yours~]
- say__p=1;! [8: ~Yours~]
- ParaContent(); print "Yours"; .L_Say348; .L_SayX346;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~His~]
- say__p=1;! [12: ~His~]
- ParaContent(); print "His"; .L_Say349; .L_SayX347;} else {
- ! [13: say ~Hers~]
- say__p=1;! [14: ~Hers~]
- ParaContent(); print "Hers"; .L_Say350; .L_SayX348;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~Ours~]
- say__p=1;! [17: ~Ours~]
- ParaContent(); print "Ours"; .L_Say351; .L_SayX349;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~Yours~]
- say__p=1;! [20: ~Yours~]
- ParaContent(); print "Yours"; .L_Say352; .L_SayX350;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~Theirs~]
- say__p=1;! [23: ~Theirs~]
- ParaContent(); print "Theirs"; .L_Say353; .L_SayX351;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 18: phrase nothing -> nothing
-! To say Ourselves:
-[ PHR_771_r18 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~Myself~]
- say__p=1;! [5: ~Myself~]
- ParaContent(); print "Myself"; .L_Say354; .L_SayX352;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~Yourself~]
- say__p=1;! [8: ~Yourself~]
- ParaContent(); print "Yourself"; .L_Say355; .L_SayX353;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~Himself~]
- say__p=1;! [12: ~Himself~]
- ParaContent(); print "Himself"; .L_Say356; .L_SayX354;} else {
- ! [13: say ~Herself~]
- say__p=1;! [14: ~Herself~]
- ParaContent(); print "Herself"; .L_Say357; .L_SayX355;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~Ourselves~]
- say__p=1;! [17: ~Ourselves~]
- ParaContent(); print "Ourselves"; .L_Say358; .L_SayX356;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~Yourselves~]
- say__p=1;! [20: ~Yourselves~]
- ParaContent(); print "Yourselves"; .L_Say359; .L_SayX357;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~Themselves~]
- say__p=1;! [23: ~Themselves~]
- ParaContent(); print "Themselves"; .L_Say360; .L_SayX358;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 19: phrase nothing -> nothing
-! To say Our:
-[ PHR_772_r19 ;
- ! [2: now the prior named object is the player]
- prior_named_noun = player;
- ! [3: if the story viewpoint is first person singular]
- if (((story_viewpoint == I112_first_person_singular)))
- {! [4: say ~My~]
- say__p=1;! [5: ~My~]
- ParaContent(); print "My"; .L_Say361; .L_SayX359;}
- ! [6: if the story viewpoint is second person singular]
- if (((story_viewpoint == I113_second_person_singular)))
- {! [7: say ~Your~]
- say__p=1;! [8: ~Your~]
- ParaContent(); print "Your"; .L_Say362; .L_SayX360;}
- ! [9: if the story viewpoint is third person singular]
- if (((story_viewpoint == I114_third_person_singular)))
- {! [10: if the player is male]
- if ((((Adj_80_t1_v10(player)))))
- {! [11: say ~His~]
- say__p=1;! [12: ~His~]
- ParaContent(); print "His"; .L_Say363; .L_SayX361;} else {
- ! [13: say ~Her~]
- say__p=1;! [14: ~Her~]
- ParaContent(); print "Her"; .L_Say364; .L_SayX362;}
- }
- ! [15: if the story viewpoint is first person plural]
- if (((story_viewpoint == I115_first_person_plural)))
- {! [16: say ~Our~]
- say__p=1;! [17: ~Our~]
- ParaContent(); print "Our"; .L_Say365; .L_SayX363;}
- ! [18: if the story viewpoint is second person plural]
- if (((story_viewpoint == I116_second_person_plural)))
- {! [19: say ~Your~]
- say__p=1;! [20: ~Your~]
- ParaContent(); print "Your"; .L_Say366; .L_SayX364;}
- ! [21: if the story viewpoint is third person plural]
- if (((story_viewpoint == I117_third_person_plural)))
- {! [22: say ~Their~]
- say__p=1;! [23: ~Their~]
- ParaContent(); print "Their"; .L_Say367; .L_SayX365;}
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 20: phrase nothing -> nothing
-! To say those:
-[ PHR_773_r20 ;
- ! [2: say those in the accusative]
- say__p=1;! [3: those in the accusative]
- ParaContent(); (PHR_775_r22 (I120_accusative)); .L_Say368; .L_SayX366;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 21: phrase nothing -> nothing
-! To say Those:
-[ PHR_774_r21 ;
- ! [2: say those in the nominative]
- say__p=1;! [3: those in the nominative]
- ParaContent(); (PHR_776_r23 (I119_nominative)); .L_Say369; .L_SayX367;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 22: phrase grammatical case -> nothing
-! To say those in ( case - grammatical case ):
-[ PHR_775_r22
- t_0 ! Call parameter 'case': grammatical case
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- ;
- ! [2: if the case is nominative]
- if (((t_0 == I119_nominative)))
- {! [3: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [4: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [5: say ~those~]
- say__p=1;! [6: ~those~]
- ParaContent(); print "those"; .L_Say370; .L_SayX368;} else {
- ! [7: if the item is the player]
- if (((tmp_0 == player)))
- {! [8: say ~[we]~]
- say__p=1;! [9: we]
- ParaContent(); (PHR_763_r10 ()); .L_Say371; .L_SayX369;} else {
- ! [10: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [11: say ~he~]
- say__p=1;! [12: ~he~]
- ParaContent(); print "he"; .L_Say372; .L_SayX370;} else {
- ! [13: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [14: say ~she~]
- say__p=1;! [15: ~she~]
- ParaContent(); print "she"; .L_Say373; .L_SayX371;} else {
- ! [16: say ~that~]
- say__p=1;! [17: ~that~]
- ParaContent(); print "that"; .L_Say374; .L_SayX372;}
- }
- }
- }
- } else {
- ! [18: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [19: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [20: say ~those~]
- say__p=1;! [21: ~those~]
- ParaContent(); print "those"; .L_Say375; .L_SayX373;} else {
- ! [22: if the item is the player]
- if (((tmp_0 == player)))
- {! [23: say ~[we]~]
- say__p=1;! [24: we]
- ParaContent(); (PHR_763_r10 ()); .L_Say376; .L_SayX374;} else {
- ! [25: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [26: say ~him~]
- say__p=1;! [27: ~him~]
- ParaContent(); print "him"; .L_Say377; .L_SayX375;} else {
- ! [28: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [29: say ~her~]
- say__p=1;! [30: ~her~]
- ParaContent(); print "her"; .L_Say378; .L_SayX376;} else {
- ! [31: say ~that~]
- say__p=1;! [32: ~that~]
- ParaContent(); print "that"; .L_Say379; .L_SayX377;}
- }
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 23: phrase grammatical case -> nothing
-! To say Those in ( case - grammatical case ):
-[ PHR_776_r23
- t_0 ! Call parameter 'case': grammatical case
- tmp_0 ! Let/loop value (deallocated by end of phrase)
- ;
- ! [2: if the case is nominative]
- if (((t_0 == I119_nominative)))
- {! [3: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [4: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [5: say ~Those~]
- say__p=1;! [6: ~Those~]
- ParaContent(); print "Those"; .L_Say380; .L_SayX378;} else {
- ! [7: if the item is the player]
- if (((tmp_0 == player)))
- {! [8: say ~[We]~]
- say__p=1;! [9: we]
- ParaContent(); (PHR_768_r15 ()); .L_Say381; .L_SayX379;} else {
- ! [10: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [11: say ~He~]
- say__p=1;! [12: ~He~]
- ParaContent(); print "He"; .L_Say382; .L_SayX380;} else {
- ! [13: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [14: say ~She~]
- say__p=1;! [15: ~She~]
- ParaContent(); print "She"; .L_Say383; .L_SayX381;} else {
- ! [16: say ~That~]
- say__p=1;! [17: ~That~]
- ParaContent(); print "That"; .L_Say384; .L_SayX382;}
- }
- }
- }
- } else {
- ! [18: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [19: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [20: say ~Those~]
- say__p=1;! [21: ~Those~]
- ParaContent(); print "Those"; .L_Say385; .L_SayX383;} else {
- ! [22: if the item is the player]
- if (((tmp_0 == player)))
- {! [23: say ~[We]~]
- say__p=1;! [24: we]
- ParaContent(); (PHR_768_r15 ()); .L_Say386; .L_SayX384;} else {
- ! [25: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [26: say ~Him~]
- say__p=1;! [27: ~Him~]
- ParaContent(); print "Him"; .L_Say387; .L_SayX385;} else {
- ! [28: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [29: say ~Her~]
- say__p=1;! [30: ~Her~]
- ParaContent(); print "Her"; .L_Say388; .L_SayX386;} else {
- ! [31: say ~That~]
- say__p=1;! [32: ~That~]
- ParaContent(); print "That"; .L_Say389; .L_SayX387;}
- }
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 24: phrase nothing -> nothing
-! To say they:
-[ PHR_777_r24
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~they~]
- say__p=1;! [5: ~they~]
- ParaContent(); print "they"; .L_Say390; .L_SayX388;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[we]~]
- say__p=1;! [8: we]
- ParaContent(); (PHR_763_r10 ()); .L_Say391; .L_SayX389;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~he~]
- say__p=1;! [11: ~he~]
- ParaContent(); print "he"; .L_Say392; .L_SayX390;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~she~]
- say__p=1;! [14: ~she~]
- ParaContent(); print "she"; .L_Say393; .L_SayX391;} else {
- ! [15: say ~it~]
- say__p=1;! [16: ~it~]
- ParaContent(); print "it"; .L_Say394; .L_SayX392;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 25: phrase nothing -> nothing
-! To say They:
-[ PHR_778_r25
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~They~]
- say__p=1;! [5: ~They~]
- ParaContent(); print "They"; .L_Say395; .L_SayX393;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[We]~]
- say__p=1;! [8: we]
- ParaContent(); (PHR_768_r15 ()); .L_Say396; .L_SayX394;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~He~]
- say__p=1;! [11: ~He~]
- ParaContent(); print "He"; .L_Say397; .L_SayX395;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~She~]
- say__p=1;! [14: ~She~]
- ParaContent(); print "She"; .L_Say398; .L_SayX396;} else {
- ! [15: say ~It~]
- say__p=1;! [16: ~It~]
- ParaContent(); print "It"; .L_Say399; .L_SayX397;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 26: phrase nothing -> nothing
-! To say their:
-[ PHR_779_r26
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~their~]
- say__p=1;! [5: ~their~]
- ParaContent(); print "their"; .L_Say400; .L_SayX398;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[our]~]
- say__p=1;! [8: our]
- ParaContent(); (PHR_767_r14 ()); .L_Say401; .L_SayX399;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~his~]
- say__p=1;! [11: ~his~]
- ParaContent(); print "his"; .L_Say402; .L_SayX400;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~her~]
- say__p=1;! [14: ~her~]
- ParaContent(); print "her"; .L_Say403; .L_SayX401;} else {
- ! [15: say ~its~]
- say__p=1;! [16: ~its~]
- ParaContent(); print "its"; .L_Say404; .L_SayX402;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 27: phrase nothing -> nothing
-! To say Their:
-[ PHR_780_r27
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~Their~]
- say__p=1;! [5: ~Their~]
- ParaContent(); print "Their"; .L_Say405; .L_SayX403;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[Our]~]
- say__p=1;! [8: our]
- ParaContent(); (PHR_772_r19 ()); .L_Say406; .L_SayX404;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~His~]
- say__p=1;! [11: ~His~]
- ParaContent(); print "His"; .L_Say407; .L_SayX405;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~Her~]
- say__p=1;! [14: ~Her~]
- ParaContent(); print "Her"; .L_Say408; .L_SayX406;} else {
- ! [15: say ~Its~]
- say__p=1;! [16: ~Its~]
- ParaContent(); print "Its"; .L_Say409; .L_SayX407;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 28: phrase nothing -> nothing
-! To say them:
-[ PHR_781_r28
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~them~]
- say__p=1;! [5: ~them~]
- ParaContent(); print "them"; .L_Say410; .L_SayX408;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[us]~]
- say__p=1;! [8: us]
- ParaContent(); (PHR_764_r11 ()); .L_Say411; .L_SayX409;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~him~]
- say__p=1;! [11: ~him~]
- ParaContent(); print "him"; .L_Say412; .L_SayX410;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~her~]
- say__p=1;! [14: ~her~]
- ParaContent(); print "her"; .L_Say413; .L_SayX411;} else {
- ! [15: say ~it~]
- say__p=1;! [16: ~it~]
- ParaContent(); print "it"; .L_Say414; .L_SayX412;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 29: phrase nothing -> nothing
-! To say Them:
-[ PHR_782_r29
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~Them~]
- say__p=1;! [5: ~Them~]
- ParaContent(); print "Them"; .L_Say415; .L_SayX413;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[Us]~]
- say__p=1;! [8: us]
- ParaContent(); (PHR_769_r16 ()); .L_Say416; .L_SayX414;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~Him~]
- say__p=1;! [11: ~Him~]
- ParaContent(); print "Him"; .L_Say417; .L_SayX415;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~Her~]
- say__p=1;! [14: ~Her~]
- ParaContent(); print "Her"; .L_Say418; .L_SayX416;} else {
- ! [15: say ~It~]
- say__p=1;! [16: ~It~]
- ParaContent(); print "It"; .L_Say419; .L_SayX417;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 30: phrase nothing -> nothing
-! To say theirs:
-[ PHR_783_r30
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~theirs~]
- say__p=1;! [5: ~theirs~]
- ParaContent(); print "theirs"; .L_Say420; .L_SayX418;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[ours]~]
- say__p=1;! [8: ours]
- ParaContent(); (PHR_765_r12 ()); .L_Say421; .L_SayX419;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~his~]
- say__p=1;! [11: ~his~]
- ParaContent(); print "his"; .L_Say422; .L_SayX420;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~hers~]
- say__p=1;! [14: ~hers~]
- ParaContent(); print "hers"; .L_Say423; .L_SayX421;} else {
- ! [15: say ~its~]
- say__p=1;! [16: ~its~]
- ParaContent(); print "its"; .L_Say424; .L_SayX422;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 31: phrase nothing -> nothing
-! To say Theirs:
-[ PHR_784_r31
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~Theirs~]
- say__p=1;! [5: ~Theirs~]
- ParaContent(); print "Theirs"; .L_Say425; .L_SayX423;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[Ours]~]
- say__p=1;! [8: ours]
- ParaContent(); (PHR_770_r17 ()); .L_Say426; .L_SayX424;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~His~]
- say__p=1;! [11: ~His~]
- ParaContent(); print "His"; .L_Say427; .L_SayX425;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~Hers~]
- say__p=1;! [14: ~Hers~]
- ParaContent(); print "Hers"; .L_Say428; .L_SayX426;} else {
- ! [15: say ~Its~]
- say__p=1;! [16: ~Its~]
- ParaContent(); print "Its"; .L_Say429; .L_SayX427;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 32: phrase nothing -> nothing
-! To say themselves:
-[ PHR_785_r32
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~themselves~]
- say__p=1;! [5: ~themselves~]
- ParaContent(); print "themselves"; .L_Say430; .L_SayX428;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[ourselves]~]
- say__p=1;! [8: ourselves]
- ParaContent(); (PHR_766_r13 ()); .L_Say431; .L_SayX429;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~himself~]
- say__p=1;! [11: ~himself~]
- ParaContent(); print "himself"; .L_Say432; .L_SayX430;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~herself~]
- say__p=1;! [14: ~herself~]
- ParaContent(); print "herself"; .L_Say433; .L_SayX431;} else {
- ! [15: say ~itself~]
- say__p=1;! [16: ~itself~]
- ParaContent(); print "itself"; .L_Say434; .L_SayX432;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 33: phrase nothing -> nothing
-! To say Themselves:
-[ PHR_786_r33
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~Themselves~]
- say__p=1;! [5: ~Themselves~]
- ParaContent(); print "Themselves"; .L_Say435; .L_SayX433;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[Ourselves]~]
- say__p=1;! [8: ourselves]
- ParaContent(); (PHR_771_r18 ()); .L_Say436; .L_SayX434;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~Himself~]
- say__p=1;! [11: ~Himself~]
- ParaContent(); print "Himself"; .L_Say437; .L_SayX435;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~Herself~]
- say__p=1;! [14: ~Herself~]
- ParaContent(); print "Herself"; .L_Say438; .L_SayX436;} else {
- ! [15: say ~Itself~]
- say__p=1;! [16: ~Itself~]
- ParaContent(); print "Itself"; .L_Say439; .L_SayX437;}
- }
- }
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 34: phrase nothing -> nothing
-! To say they're:
-[ PHR_787_r34
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~they~]
- say__p=1;! [5: ~they~]
- ParaContent(); print "they"; .L_Say440; .L_SayX438;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[we]~]
- say__p=1;! [8: we]
- ParaContent(); (PHR_763_r10 ()); .L_Say441; .L_SayX439;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~he~]
- say__p=1;! [11: ~he~]
- ParaContent(); print "he"; .L_Say442; .L_SayX440;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~she~]
- say__p=1;! [14: ~she~]
- ParaContent(); print "she"; .L_Say443; .L_SayX441;} else {
- ! [15: say ~that~]
- say__p=1;! [16: ~that~]
- ParaContent(); print "that"; .L_Say444; .L_SayX442;}
- }
- }
- }
- ! [17: say ~['re]~]
- say__p=1;! [18: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say445; .L_SayX443;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 35: phrase nothing -> nothing
-! To say They're:
-[ PHR_788_r35
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [4: say ~They~]
- say__p=1;! [5: ~They~]
- ParaContent(); print "They"; .L_Say446; .L_SayX444;} else {
- ! [6: if the item is the player]
- if (((tmp_0 == player)))
- {! [7: say ~[We]~]
- say__p=1;! [8: we]
- ParaContent(); (PHR_768_r15 ()); .L_Say447; .L_SayX445;} else {
- ! [9: if the item is a male person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_80_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [10: say ~He~]
- say__p=1;! [11: ~He~]
- ParaContent(); print "He"; .L_Say448; .L_SayX446;} else {
- ! [12: if the item is a female person and item is not neuter]
- if ((((tmp_0 ofclass K8_person) && ((Adj_79_t1_v10(tmp_0))))) && (((~~(((Adj_81_t1_v10(tmp_0))))))))
- {! [13: say ~She~]
- say__p=1;! [14: ~She~]
- ParaContent(); print "She"; .L_Say449; .L_SayX447;} else {
- ! [15: say ~That~]
- say__p=1;! [16: ~That~]
- ParaContent(); print "That"; .L_Say450; .L_SayX448;}
- }
- }
- }
- ! [17: say ~['re]~]
- say__p=1;! [18: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say451; .L_SayX449;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 36: phrase nothing -> nothing
-! To say It:
-[ PHR_789_r36 ;
- ! [2: say ~[regarding nothing]It~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~It~]
- ParaContent(); print "It"; .L_Say452; .L_SayX450;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 37: phrase nothing -> nothing
-! To say There:
-[ PHR_790_r37 ;
- ! [2: say ~[regarding nothing]There~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~There~]
- ParaContent(); print "There"; .L_Say453; .L_SayX451;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 38: phrase nothing -> nothing
-! To say it:
-[ PHR_791_r38 ;
- ! [2: say ~[regarding nothing]it~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~it~]
- ParaContent(); print "it"; .L_Say454; .L_SayX452;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 39: phrase nothing -> nothing
-! To say there:
-[ PHR_792_r39 ;
- ! [2: say ~[regarding nothing]there~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~there~]
- ParaContent(); print "there"; .L_Say455; .L_SayX453;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 40: phrase nothing -> nothing
-! To say It's:
-[ PHR_793_r40 ;
- ! [2: say ~[regarding nothing]It['re]~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~It~]
- ParaContent(); print "It";! [5: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say456; .L_SayX454;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 41: phrase nothing -> nothing
-! To say There's:
-[ PHR_794_r41 ;
- ! [2: say ~[regarding nothing]There['re]~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~There~]
- ParaContent(); print "There";! [5: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say457; .L_SayX455;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 42: phrase nothing -> nothing
-! To say it's:
-[ PHR_795_r42 ;
- ! [2: say ~[regarding nothing]it['re]~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~it~]
- ParaContent(); print "it";! [5: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say458; .L_SayX456;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 43: phrase nothing -> nothing
-! To say there's:
-[ PHR_796_r43 ;
- ! [2: say ~[regarding nothing]there['re]~]
- say__p=1;! [3: regarding nothing]
- ParaContent(); RegardingSingleObject(nothing);! [4: ~there~]
- ParaContent(); print "there";! [5: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say459; .L_SayX457;rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 44: phrase nothing -> nothing
-! To say possessive:
-[ PHR_797_r44
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the item is the player]
- if (((tmp_0 == player)))
- {! [4: say ~[our]~]
- say__p=1;! [5: our]
- ParaContent(); (PHR_767_r14 ()); .L_Say460; .L_SayX458;} else {
- ! [6: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [7: say ~[the item][apostrophe]~]
- say__p=1;! [8: the item]
- ParaContent(); print (the) tmp_0;! [9: apostrophe]
- ParaContent(); print "'"; .L_Say461; .L_SayX459;} else {
- ! [10: say ~[the item][apostrophe]s~]
- say__p=1;! [11: the item]
- ParaContent(); print (the) tmp_0;! [12: apostrophe]
- ParaContent(); print "'";! [13: ~s~]
- ParaContent(); print "s"; .L_Say462; .L_SayX460;}
- }
- rfalse;
-];
-! From "English Language" by Graham Nelson
-! Request 45: phrase nothing -> nothing
-! To say Possessive:
-[ PHR_798_r45
- tmp_0 ! Let/loop value, e.g., 'item': object
- ;
- ! [2: let the item be the prior named object]
-
- tmp_0 = prior_named_noun;
- ! [3: if the item is the player]
- if (((tmp_0 == player)))
- {! [4: say ~[Our]~]
- say__p=1;! [5: our]
- ParaContent(); (PHR_772_r19 ()); .L_Say463; .L_SayX461;} else {
- ! [6: if the prior naming context is plural]
- if ((((prior_named_list >= 2) || (prior_named_noun && prior_named_noun has pluralname))))
- {! [7: say ~[The item][apostrophe]~]
- say__p=1;! [8: the item]
- ParaContent(); print (The) tmp_0;! [9: apostrophe]
- ParaContent(); print "'"; .L_Say464; .L_SayX462;} else {
- ! [10: say ~[The item][apostrophe]s~]
- say__p=1;! [11: the item]
- ParaContent(); print (The) tmp_0;! [12: apostrophe]
- ParaContent(); print "'";! [13: ~s~]
- ParaContent(); print "s"; .L_Say465; .L_SayX463;}
- }
- rfalse;
-];
-Array TX_R_0 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_0_R;
-[ TX_R_0_R ;
- ResponseViaActivity(R_281_RESP_A);
-];
-[ ADJUST_LIGHT_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_0;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_1 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_1_R;
-[ TX_R_1_R ;
- ResponseViaActivity(R_283_RESP_A);
-];
-[ GENERATE_ACTION_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_1;
- 'B': str = TX_R_2;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_2 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_2_R;
-[ TX_R_2_R ;
- ResponseViaActivity(R_283_RESP_B);
-];
-Array TX_R_3 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_3_R;
-[ TX_R_3_R ;
- ResponseViaActivity(R_290_RESP_A);
-];
-[ BASIC_ACCESSIBILITY_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_3;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_4 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_4_R;
-[ TX_R_4_R ;
- ResponseViaActivity(R_291_RESP_A);
-];
-[ BASIC_VISIBILITY_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_4;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_5 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_5_R;
-[ TX_R_5_R ;
- ResponseViaActivity(R_293_RESP_A);
-];
-[ REQUESTED_ACTIONS_REQUIRE_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_5;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_6 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_6_R;
-[ TX_R_6_R ;
- ResponseViaActivity(R_294_RESP_A);
-];
-[ CARRY_OUT_REQUESTED_ACTIONS_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_6;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_7 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_7_R;
-[ TX_R_7_R ;
- ResponseViaActivity(R_297_RESP_A);
-];
-[ ACCESS_THROUGH_BARRIERS_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_7;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_8 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_8_R;
-[ TX_R_8_R ;
- ResponseViaActivity(R_298_RESP_A);
-];
-[ CANT_REACH_INSIDE_CLOSED_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_8;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_9 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_9_R;
-[ TX_R_9_R ;
- ResponseViaActivity(R_299_RESP_A);
-];
-[ CANT_REACH_INSIDE_ROOMS_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_9;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_10 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_10_R;
-[ TX_R_10_R ;
- ResponseViaActivity(R_300_RESP_A);
-];
-[ CANT_REACH_OUTSIDE_CLOSED_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_10;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_11 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_11_R;
-[ TX_R_11_R ;
- ResponseViaActivity(R_301_RESP_A);
-];
-[ LIST_WRITER_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_11;
- 'B': str = TX_R_12;
- 'C': str = TX_R_13;
- 'D': str = TX_R_14;
- 'E': str = TX_R_15;
- 'F': str = TX_R_16;
- 'G': str = TX_R_17;
- 'H': str = TX_R_18;
- 'I': str = TX_R_19;
- 'J': str = TX_R_20;
- 'K': str = TX_R_21;
- 'L': str = TX_R_22;
- 'M': str = TX_R_23;
- 'N': str = TX_R_24;
- 'O': str = TX_R_25;
- 'P': str = TX_R_26;
- 'Q': str = TX_R_27;
- 'R': str = TX_R_28;
- 'S': str = TX_R_29;
- 'T': str = TX_R_30;
- 'U': str = TX_R_31;
- 'V': str = TX_R_32;
- 'W': str = TX_R_33;
- 'X': str = TX_R_34;
- 'Y': str = TX_R_35;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_12 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_12_R;
-[ TX_R_12_R ;
- ResponseViaActivity(R_301_RESP_B);
-];
-Array TX_R_13 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_13_R;
-[ TX_R_13_R ;
- ResponseViaActivity(R_301_RESP_C);
-];
-Array TX_R_14 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_14_R;
-[ TX_R_14_R ;
- ResponseViaActivity(R_301_RESP_D);
-];
-Array TX_R_15 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_15_R;
-[ TX_R_15_R ;
- ResponseViaActivity(R_301_RESP_E);
-];
-Array TX_R_16 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_16_R;
-[ TX_R_16_R ;
- ResponseViaActivity(R_301_RESP_F);
-];
-Array TX_R_17 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_17_R;
-[ TX_R_17_R ;
- ResponseViaActivity(R_301_RESP_G);
-];
-Array TX_R_18 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_18_R;
-[ TX_R_18_R ;
- ResponseViaActivity(R_301_RESP_H);
-];
-Array TX_R_19 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_19_R;
-[ TX_R_19_R ;
- ResponseViaActivity(R_301_RESP_I);
-];
-Array TX_R_20 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_20_R;
-[ TX_R_20_R ;
- ResponseViaActivity(R_301_RESP_J);
-];
-Array TX_R_21 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_21_R;
-[ TX_R_21_R ;
- ResponseViaActivity(R_301_RESP_K);
-];
-Array TX_R_22 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_22_R;
-[ TX_R_22_R ;
- ResponseViaActivity(R_301_RESP_L);
-];
-Array TX_R_23 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_23_R;
-[ TX_R_23_R ;
- ResponseViaActivity(R_301_RESP_M);
-];
-Array TX_R_24 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_24_R;
-[ TX_R_24_R ;
- ResponseViaActivity(R_301_RESP_N);
-];
-Array TX_R_25 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_25_R;
-[ TX_R_25_R ;
- ResponseViaActivity(R_301_RESP_O);
-];
-Array TX_R_26 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_26_R;
-[ TX_R_26_R ;
- ResponseViaActivity(R_301_RESP_P);
-];
-Array TX_R_27 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_27_R;
-[ TX_R_27_R ;
- ResponseViaActivity(R_301_RESP_Q);
-];
-Array TX_R_28 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_28_R;
-[ TX_R_28_R ;
- ResponseViaActivity(R_301_RESP_R);
-];
-Array TX_R_29 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_29_R;
-[ TX_R_29_R ;
- ResponseViaActivity(R_301_RESP_S);
-];
-Array TX_R_30 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_30_R;
-[ TX_R_30_R ;
- ResponseViaActivity(R_301_RESP_T);
-];
-Array TX_R_31 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_31_R;
-[ TX_R_31_R ;
- ResponseViaActivity(R_301_RESP_U);
-];
-Array TX_R_32 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_32_R;
-[ TX_R_32_R ;
- ResponseViaActivity(R_301_RESP_V);
-];
-Array TX_R_33 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_33_R;
-[ TX_R_33_R ;
- ResponseViaActivity(R_301_RESP_W);
-];
-Array TX_R_34 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_34_R;
-[ TX_R_34_R ;
- ResponseViaActivity(R_301_RESP_X);
-];
-Array TX_R_35 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_35_R;
-[ TX_R_35_R ;
- ResponseViaActivity(R_301_RESP_Y);
-];
-Array TX_R_36 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_36_R;
-[ TX_R_36_R ;
- ResponseViaActivity(R_302_RESP_A);
-];
-[ ACTION_PROCESSING_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_36;
- 'B': str = TX_R_37;
- 'C': str = TX_R_38;
- 'D': str = TX_R_39;
- 'E': str = TX_R_40;
- 'F': str = TX_R_41;
- 'G': str = TX_R_42;
- 'H': str = TX_R_43;
- 'I': str = TX_R_44;
- 'J': str = TX_R_45;
- 'K': str = TX_R_46;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_37 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_37_R;
-[ TX_R_37_R ;
- ResponseViaActivity(R_302_RESP_B);
-];
-Array TX_R_38 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_38_R;
-[ TX_R_38_R ;
- ResponseViaActivity(R_302_RESP_C);
-];
-Array TX_R_39 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_39_R;
-[ TX_R_39_R ;
- ResponseViaActivity(R_302_RESP_D);
-];
-Array TX_R_40 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_40_R;
-[ TX_R_40_R ;
- ResponseViaActivity(R_302_RESP_E);
-];
-Array TX_R_41 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_41_R;
-[ TX_R_41_R ;
- ResponseViaActivity(R_302_RESP_F);
-];
-Array TX_R_42 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_42_R;
-[ TX_R_42_R ;
- ResponseViaActivity(R_302_RESP_G);
-];
-Array TX_R_43 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_43_R;
-[ TX_R_43_R ;
- ResponseViaActivity(R_302_RESP_H);
-];
-Array TX_R_44 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_44_R;
-[ TX_R_44_R ;
- ResponseViaActivity(R_302_RESP_I);
-];
-Array TX_R_45 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_45_R;
-[ TX_R_45_R ;
- ResponseViaActivity(R_302_RESP_J);
-];
-Array TX_R_46 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_46_R;
-[ TX_R_46_R ;
- ResponseViaActivity(R_302_RESP_K);
-];
-Array TX_R_47 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_47_R;
-[ TX_R_47_R ;
- ResponseViaActivity(R_303_RESP_A);
-];
-[ PARSER_ERROR_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_47;
- 'B': str = TX_R_48;
- 'C': str = TX_R_49;
- 'D': str = TX_R_50;
- 'E': str = TX_R_51;
- 'F': str = TX_R_52;
- 'G': str = TX_R_53;
- 'H': str = TX_R_54;
- 'I': str = TX_R_55;
- 'J': str = TX_R_56;
- 'K': str = TX_R_57;
- 'L': str = TX_R_58;
- 'M': str = TX_R_59;
- 'N': str = TX_R_60;
- 'O': str = TX_R_61;
- 'P': str = TX_R_62;
- 'Q': str = TX_R_63;
- 'R': str = TX_R_64;
- 'S': str = TX_R_65;
- 'T': str = TX_R_66;
- 'U': str = TX_R_67;
- 'V': str = TX_R_68;
- 'W': str = TX_R_69;
- 'X': str = TX_R_70;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_48 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_48_R;
-[ TX_R_48_R ;
- ResponseViaActivity(R_303_RESP_B);
-];
-Array TX_R_49 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_49_R;
-[ TX_R_49_R ;
- ResponseViaActivity(R_303_RESP_C);
-];
-Array TX_R_50 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_50_R;
-[ TX_R_50_R ;
- ResponseViaActivity(R_303_RESP_D);
-];
-Array TX_R_51 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_51_R;
-[ TX_R_51_R ;
- ResponseViaActivity(R_303_RESP_E);
-];
-Array TX_R_52 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_52_R;
-[ TX_R_52_R ;
- ResponseViaActivity(R_303_RESP_F);
-];
-Array TX_R_53 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_53_R;
-[ TX_R_53_R ;
- ResponseViaActivity(R_303_RESP_G);
-];
-Array TX_R_54 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_54_R;
-[ TX_R_54_R ;
- ResponseViaActivity(R_303_RESP_H);
-];
-Array TX_R_55 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_55_R;
-[ TX_R_55_R ;
- ResponseViaActivity(R_303_RESP_I);
-];
-Array TX_R_56 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_56_R;
-[ TX_R_56_R ;
- ResponseViaActivity(R_303_RESP_J);
-];
-Array TX_R_57 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_57_R;
-[ TX_R_57_R ;
- ResponseViaActivity(R_303_RESP_K);
-];
-Array TX_R_58 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_58_R;
-[ TX_R_58_R ;
- ResponseViaActivity(R_303_RESP_L);
-];
-Array TX_R_59 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_59_R;
-[ TX_R_59_R ;
- ResponseViaActivity(R_303_RESP_M);
-];
-Array TX_R_60 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_60_R;
-[ TX_R_60_R ;
- ResponseViaActivity(R_303_RESP_N);
-];
-Array TX_R_61 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_61_R;
-[ TX_R_61_R ;
- ResponseViaActivity(R_303_RESP_O);
-];
-Array TX_R_62 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_62_R;
-[ TX_R_62_R ;
- ResponseViaActivity(R_303_RESP_P);
-];
-Array TX_R_63 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_63_R;
-[ TX_R_63_R ;
- ResponseViaActivity(R_303_RESP_Q);
-];
-Array TX_R_64 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_64_R;
-[ TX_R_64_R ;
- ResponseViaActivity(R_303_RESP_R);
-];
-Array TX_R_65 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_65_R;
-[ TX_R_65_R ;
- ResponseViaActivity(R_303_RESP_S);
-];
-Array TX_R_66 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_66_R;
-[ TX_R_66_R ;
- ResponseViaActivity(R_303_RESP_T);
-];
-Array TX_R_67 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_67_R;
-[ TX_R_67_R ;
- ResponseViaActivity(R_303_RESP_U);
-];
-Array TX_R_68 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_68_R;
-[ TX_R_68_R ;
- ResponseViaActivity(R_303_RESP_V);
-];
-Array TX_R_69 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_69_R;
-[ TX_R_69_R ;
- ResponseViaActivity(R_303_RESP_W);
-];
-Array TX_R_70 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_70_R;
-[ TX_R_70_R ;
- ResponseViaActivity(R_303_RESP_X);
-];
-Array TX_R_71 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_71_R;
-[ TX_R_71_R ;
- ResponseViaActivity(R_304_RESP_A);
-];
-[ PARSER_N_ERROR_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_71;
- 'B': str = TX_R_72;
- 'C': str = TX_R_73;
- 'D': str = TX_R_74;
- 'E': str = TX_R_75;
- 'F': str = TX_R_76;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_72 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_72_R;
-[ TX_R_72_R ;
- ResponseViaActivity(R_304_RESP_B);
-];
-Array TX_R_73 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_73_R;
-[ TX_R_73_R ;
- ResponseViaActivity(R_304_RESP_C);
-];
-Array TX_R_74 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_74_R;
-[ TX_R_74_R ;
- ResponseViaActivity(R_304_RESP_D);
-];
-Array TX_R_75 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_75_R;
-[ TX_R_75_R ;
- ResponseViaActivity(R_304_RESP_E);
-];
-Array TX_R_76 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_76_R;
-[ TX_R_76_R ;
- ResponseViaActivity(R_304_RESP_F);
-];
-Array TX_R_77 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_77_R;
-[ TX_R_77_R ;
- ResponseViaActivity(R_305_RESP_A);
-];
-[ DARKNESS_NAME_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_77;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_78 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_78_R;
-[ TX_R_78_R ;
- ResponseViaActivity(R_306_RESP_A);
-];
-[ PARSER_COMMAND_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_78;
- 'B': str = TX_R_79;
- 'C': str = TX_R_80;
- 'D': str = TX_R_81;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_79 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_79_R;
-[ TX_R_79_R ;
- ResponseViaActivity(R_306_RESP_B);
-];
-Array TX_R_80 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_80_R;
-[ TX_R_80_R ;
- ResponseViaActivity(R_306_RESP_C);
-];
-Array TX_R_81 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_81_R;
-[ TX_R_81_R ;
- ResponseViaActivity(R_306_RESP_D);
-];
-Array TX_R_82 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_82_R;
-[ TX_R_82_R ;
- ResponseViaActivity(R_307_RESP_A);
-];
-[ PARSER_CLARIF_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_82;
- 'B': str = TX_R_83;
- 'C': str = TX_R_84;
- 'D': str = TX_R_85;
- 'E': str = TX_R_86;
- 'F': str = TX_R_87;
- 'G': str = TX_R_88;
- 'H': str = TX_R_89;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_83 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_83_R;
-[ TX_R_83_R ;
- ResponseViaActivity(R_307_RESP_B);
-];
-Array TX_R_84 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_84_R;
-[ TX_R_84_R ;
- ResponseViaActivity(R_307_RESP_C);
-];
-Array TX_R_85 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_85_R;
-[ TX_R_85_R ;
- ResponseViaActivity(R_307_RESP_D);
-];
-Array TX_R_86 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_86_R;
-[ TX_R_86_R ;
- ResponseViaActivity(R_307_RESP_E);
-];
-Array TX_R_87 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_87_R;
-[ TX_R_87_R ;
- ResponseViaActivity(R_307_RESP_F);
-];
-Array TX_R_88 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_88_R;
-[ TX_R_88_R ;
- ResponseViaActivity(R_307_RESP_G);
-];
-Array TX_R_89 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_89_R;
-[ TX_R_89_R ;
- ResponseViaActivity(R_307_RESP_H);
-];
-Array TX_R_90 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_90_R;
-[ TX_R_90_R ;
- ResponseViaActivity(R_308_RESP_A);
-];
-[ YES_OR_NO_QUESTION_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_90;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_91 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_91_R;
-[ TX_R_91_R ;
- ResponseViaActivity(R_309_RESP_A);
-];
-[ PRINT_PROTAGONIST_INTERNAL_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_91;
- 'B': str = TX_R_92;
- 'C': str = TX_R_93;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_92 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_92_R;
-[ TX_R_92_R ;
- ResponseViaActivity(R_309_RESP_B);
-];
-Array TX_R_93 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_93_R;
-[ TX_R_93_R ;
- ResponseViaActivity(R_309_RESP_C);
-];
-Array TX_R_94 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_94_R;
-[ TX_R_94_R ;
- ResponseViaActivity(R_312_RESP_A);
-];
-[ STANDARD_IMPLICIT_TAKING_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_94;
- 'B': str = TX_R_95;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_95 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_95_R;
-[ TX_R_95_R ;
- ResponseViaActivity(R_312_RESP_B);
-];
-Array TX_R_96 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_96_R;
-[ TX_R_96_R ;
- ResponseViaActivity(R_314_RESP_A);
-];
-[ PRINT_OBITUARY_HEADLINE_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_96;
- 'B': str = TX_R_97;
- 'C': str = TX_R_98;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_97 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_97_R;
-[ TX_R_97_R ;
- ResponseViaActivity(R_314_RESP_B);
-];
-Array TX_R_98 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_98_R;
-[ TX_R_98_R ;
- ResponseViaActivity(R_314_RESP_C);
-];
-Array TX_R_99 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_99_R;
-[ TX_R_99_R ;
- ResponseViaActivity(R_320_RESP_A);
-];
-[ IMMEDIATELY_UNDO_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_99;
- 'B': str = TX_R_100;
- 'C': str = TX_R_101;
- 'D': str = TX_R_102;
- 'E': str = TX_R_103;
- 'F': str = TX_R_104;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_100 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_100_R;
-[ TX_R_100_R ;
- ResponseViaActivity(R_320_RESP_B);
-];
-Array TX_R_101 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_101_R;
-[ TX_R_101_R ;
- ResponseViaActivity(R_320_RESP_C);
-];
-Array TX_R_102 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_102_R;
-[ TX_R_102_R ;
- ResponseViaActivity(R_320_RESP_D);
-];
-Array TX_R_103 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_103_R;
-[ TX_R_103_R ;
- ResponseViaActivity(R_320_RESP_E);
-];
-Array TX_R_104 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_104_R;
-[ TX_R_104_R ;
- ResponseViaActivity(R_320_RESP_F);
-];
-Array TX_R_105 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_105_R;
-[ TX_R_105_R ;
- ResponseViaActivity(R_323_RESP_A);
-];
-[ QUIT_THE_GAME_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_105;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_106 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_106_R;
-[ TX_R_106_R ;
- ResponseViaActivity(R_324_RESP_A);
-];
-[ SAVE_THE_GAME_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_106;
- 'B': str = TX_R_107;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_107 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_107_R;
-[ TX_R_107_R ;
- ResponseViaActivity(R_324_RESP_B);
-];
-Array TX_R_108 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_108_R;
-[ TX_R_108_R ;
- ResponseViaActivity(R_325_RESP_A);
-];
-[ RESTORE_THE_GAME_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_108;
- 'B': str = TX_R_109;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_109 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_109_R;
-[ TX_R_109_R ;
- ResponseViaActivity(R_325_RESP_B);
-];
-Array TX_R_110 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_110_R;
-[ TX_R_110_R ;
- ResponseViaActivity(R_326_RESP_A);
-];
-[ RESTART_THE_GAME_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_110;
- 'B': str = TX_R_111;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_111 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_111_R;
-[ TX_R_111_R ;
- ResponseViaActivity(R_326_RESP_B);
-];
-Array TX_R_112 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_112_R;
-[ TX_R_112_R ;
- ResponseViaActivity(R_327_RESP_A);
-];
-[ VERIFY_THE_STORY_FILE_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_112;
- 'B': str = TX_R_113;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_113 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_113_R;
-[ TX_R_113_R ;
- ResponseViaActivity(R_327_RESP_B);
-];
-Array TX_R_114 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_114_R;
-[ TX_R_114_R ;
- ResponseViaActivity(R_328_RESP_A);
-];
-[ SWITCH_TRANSCRIPT_ON_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_114;
- 'B': str = TX_R_115;
- 'C': str = TX_R_116;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_115 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_115_R;
-[ TX_R_115_R ;
- ResponseViaActivity(R_328_RESP_B);
-];
-Array TX_R_116 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_116_R;
-[ TX_R_116_R ;
- ResponseViaActivity(R_328_RESP_C);
-];
-Array TX_R_117 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_117_R;
-[ TX_R_117_R ;
- ResponseViaActivity(R_329_RESP_A);
-];
-[ SWITCH_TRANSCRIPT_OFF_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_117;
- 'B': str = TX_R_118;
- 'C': str = TX_R_119;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_118 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_118_R;
-[ TX_R_118_R ;
- ResponseViaActivity(R_329_RESP_B);
-];
-Array TX_R_119 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_119_R;
-[ TX_R_119_R ;
- ResponseViaActivity(R_329_RESP_C);
-];
-Array TX_R_120 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_120_R;
-[ TX_R_120_R ;
- ResponseViaActivity(R_331_RESP_A);
-];
-[ ANNOUNCE_SCORE_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_120;
- 'B': str = TX_R_121;
- 'C': str = TX_R_122;
- 'D': str = TX_R_123;
- 'E': str = TX_R_124;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_121 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_121_R;
-[ TX_R_121_R ;
- ResponseViaActivity(R_331_RESP_B);
-];
-Array TX_R_122 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_122_R;
-[ TX_R_122_R ;
- ResponseViaActivity(R_331_RESP_C);
-];
-Array TX_R_123 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_123_R;
-[ TX_R_123_R ;
- ResponseViaActivity(R_331_RESP_D);
-];
-Array TX_R_124 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_124_R;
-[ TX_R_124_R ;
- ResponseViaActivity(R_331_RESP_E);
-];
-Array TX_R_125 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_125_R;
-[ TX_R_125_R ;
- ResponseViaActivity(R_333_RESP_A);
-];
-[ REP_PREFER_ABBREVIATED_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_125;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_126 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_126_R;
-[ TX_R_126_R ;
- ResponseViaActivity(R_335_RESP_A);
-];
-[ REP_PREFER_UNABBREVIATED_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_126;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_127 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_127_R;
-[ TX_R_127_R ;
- ResponseViaActivity(R_337_RESP_A);
-];
-[ REP_PREFER_SOMETIMES_ABBR_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_127;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_128 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_128_R;
-[ TX_R_128_R ;
- ResponseViaActivity(R_339_RESP_A);
-];
-[ REP_SWITCH_NOTIFY_ON_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_128;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_129 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_129_R;
-[ TX_R_129_R ;
- ResponseViaActivity(R_341_RESP_A);
-];
-[ REP_SWITCH_NOTIFY_OFF_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_129;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_130 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_130_R;
-[ TX_R_130_R ;
- ResponseViaActivity(R_342_RESP_A);
-];
-[ ANNOUNCE_PRONOUN_MEANINGS_RM
- code ! Implied call parameter
- val ! Implied call parameter
- val2 ! Implied call parameter
- s ! internal use only
- s2 ! internal use only
- s3 ! internal use only
- str ! internal use only
- f ! internal use only
- ;
- if ((code >= 'a') && (code <= 'z')) { f = true; code = code - 'a' + 'A'; }
- s = noun; s2 = second; s3 = parsed_number;
- noun = val; second = val2; parsed_number = val;
- switch (code) {
- 'A': str = TX_R_130;
- 'B': str = TX_R_131;
- 'C': str = TX_R_132;
- 'D': str = TX_R_133;
- }
- if ((str) && (f == false)) { TEXT_TY_Say(str); }
- noun = s; second = s2; parsed_number = s3;
- return str;
-];
-Array TX_R_131 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_131_R;
-[ TX_R_131_R ;
- ResponseViaActivity(R_342_RESP_B);
-];
-Array TX_R_132 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_132_R;
-[ TX_R_132_R ;
- ResponseViaActivity(R_342_RESP_C);
-];
-Array TX_R_133 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_133_R;
-[ TX_R_133_R ;
- ResponseViaActivity(R_342_RESP_D);
-];
-Array TX_R_134 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_134_R;
-[ TX_R_134_R ;
- ResponseViaActivity(R_11_RESP_A);
-];
-Array TX_R_135 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_135_R;
-[ TX_R_135_R ;
- ResponseViaActivity(R_39_RESP_A);
-];
-Array TX_R_136 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_136_R;
-[ TX_R_136_R ;
- ResponseViaActivity(R_41_RESP_A);
-];
-Array TX_R_137 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_137_R;
-[ TX_R_137_R ;
- ResponseViaActivity(R_41_RESP_B);
-];
-Array TX_R_138 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_138_R;
-[ TX_R_138_R ;
- ResponseViaActivity(R_40_RESP_A);
-];
-Array TX_R_139 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_139_R;
-[ TX_R_139_R ;
- ResponseViaActivity(R_42_RESP_A);
-];
-Array TX_R_140 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_140_R;
-[ TX_R_140_R ;
- ResponseViaActivity(R_46_RESP_A);
-];
-Array TX_R_141 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_141_R;
-[ TX_R_141_R ;
- ResponseViaActivity(R_46_RESP_B);
-];
-Array TX_R_142 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_142_R;
-[ TX_R_142_R ;
- ResponseViaActivity(R_46_RESP_C);
-];
-Array TX_R_143 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_143_R;
-[ TX_R_143_R ;
- ResponseViaActivity(R_46_RESP_D);
-];
-Array TX_R_144 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_144_R;
-[ TX_R_144_R ;
- ResponseViaActivity(R_46_RESP_E);
-];
-Array TX_R_145 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_145_R;
-[ TX_R_145_R ;
- ResponseViaActivity(R_46_RESP_F);
-];
-Array TX_R_146 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_146_R;
-[ TX_R_146_R ;
- ResponseViaActivity(R_53_RESP_A);
-];
-Array TX_R_147 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_147_R;
-[ TX_R_147_R ;
- ResponseViaActivity(R_55_RESP_A);
-];
-Array TX_R_148 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_148_R;
-[ TX_R_148_R ;
- ResponseViaActivity(R_56_RESP_A);
-];
-Array TX_R_149 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_149_R;
-[ TX_R_149_R ;
- ResponseViaActivity(R_57_RESP_A);
-];
-Array TX_R_150 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_150_R;
-[ TX_R_150_R ;
- ResponseViaActivity(R_58_RESP_A);
-];
-Array TX_R_151 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_151_R;
-[ TX_R_151_R ;
- ResponseViaActivity(R_59_RESP_A);
-];
-Array TX_R_152 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_152_R;
-[ TX_R_152_R ;
- ResponseViaActivity(R_60_RESP_A);
-];
-Array TX_R_153 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_153_R;
-[ TX_R_153_R ;
- ResponseViaActivity(R_61_RESP_A);
-];
-Array TX_R_154 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_154_R;
-[ TX_R_154_R ;
- ResponseViaActivity(R_62_RESP_A);
-];
-Array TX_R_155 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_155_R;
-[ TX_R_155_R ;
- ResponseViaActivity(R_63_RESP_A);
-];
-Array TX_R_156 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_156_R;
-[ TX_R_156_R ;
- ResponseViaActivity(R_64_RESP_A);
-];
-Array TX_R_157 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_157_R;
-[ TX_R_157_R ;
- ResponseViaActivity(R_65_RESP_A);
-];
-Array TX_R_158 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_158_R;
-[ TX_R_158_R ;
- ResponseViaActivity(R_66_RESP_A);
-];
-Array TX_R_159 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_159_R;
-[ TX_R_159_R ;
- ResponseViaActivity(R_67_RESP_A);
-];
-Array TX_R_160 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_160_R;
-[ TX_R_160_R ;
- ResponseViaActivity(R_68_RESP_A);
-];
-Array TX_R_161 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_161_R;
-[ TX_R_161_R ;
- ResponseViaActivity(R_69_RESP_A);
-];
-Array TX_R_162 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_162_R;
-[ TX_R_162_R ;
- ResponseViaActivity(R_70_RESP_A);
-];
-Array TX_R_163 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_163_R;
-[ TX_R_163_R ;
- ResponseViaActivity(R_71_RESP_A);
-];
-Array TX_R_164 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_164_R;
-[ TX_R_164_R ;
- ResponseViaActivity(R_73_RESP_A);
-];
-Array TX_R_165 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_165_R;
-[ TX_R_165_R ;
- ResponseViaActivity(R_73_RESP_B);
-];
-Array TX_R_166 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_166_R;
-[ TX_R_166_R ;
- ResponseViaActivity(R_74_RESP_A);
-];
-Array TX_R_167 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_167_R;
-[ TX_R_167_R ;
- ResponseViaActivity(R_75_RESP_A);
-];
-Array TX_R_168 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_168_R;
-[ TX_R_168_R ;
- ResponseViaActivity(R_78_RESP_A);
-];
-Array TX_R_169 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_169_R;
-[ TX_R_169_R ;
- ResponseViaActivity(R_77_RESP_A);
-];
-Array TX_R_170 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_170_R;
-[ TX_R_170_R ;
- ResponseViaActivity(R_79_RESP_A);
-];
-Array TX_R_171 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_171_R;
-[ TX_R_171_R ;
- ResponseViaActivity(R_80_RESP_A);
-];
-Array TX_R_172 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_172_R;
-[ TX_R_172_R ;
- ResponseViaActivity(R_81_RESP_A);
-];
-Array TX_R_173 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_173_R;
-[ TX_R_173_R ;
- ResponseViaActivity(R_82_RESP_A);
-];
-Array TX_R_174 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_174_R;
-[ TX_R_174_R ;
- ResponseViaActivity(R_82_RESP_B);
-];
-Array TX_R_175 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_175_R;
-[ TX_R_175_R ;
- ResponseViaActivity(R_84_RESP_A);
-];
-Array TX_R_176 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_176_R;
-[ TX_R_176_R ;
- ResponseViaActivity(R_84_RESP_B);
-];
-Array TX_R_177 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_177_R;
-[ TX_R_177_R ;
- ResponseViaActivity(R_87_RESP_A);
-];
-Array TX_R_178 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_178_R;
-[ TX_R_178_R ;
- ResponseViaActivity(R_88_RESP_A);
-];
-Array TX_R_179 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_179_R;
-[ TX_R_179_R ;
- ResponseViaActivity(R_89_RESP_A);
-];
-Array TX_R_180 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_180_R;
-[ TX_R_180_R ;
- ResponseViaActivity(R_90_RESP_A);
-];
-Array TX_R_181 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_181_R;
-[ TX_R_181_R ;
- ResponseViaActivity(R_92_RESP_A);
-];
-Array TX_R_182 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_182_R;
-[ TX_R_182_R ;
- ResponseViaActivity(R_93_RESP_A);
-];
-Array TX_R_183 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_183_R;
-[ TX_R_183_R ;
- ResponseViaActivity(R_96_RESP_A);
-];
-Array TX_R_184 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_184_R;
-[ TX_R_184_R ;
- ResponseViaActivity(R_97_RESP_A);
-];
-Array TX_R_185 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_185_R;
-[ TX_R_185_R ;
- ResponseViaActivity(R_98_RESP_A);
-];
-Array TX_R_186 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_186_R;
-[ TX_R_186_R ;
- ResponseViaActivity(R_99_RESP_A);
-];
-Array TX_R_187 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_187_R;
-[ TX_R_187_R ;
- ResponseViaActivity(R_100_RESP_A);
-];
-Array TX_R_188 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_188_R;
-[ TX_R_188_R ;
- ResponseViaActivity(R_102_RESP_A);
-];
-Array TX_R_189 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_189_R;
-[ TX_R_189_R ;
- ResponseViaActivity(R_103_RESP_A);
-];
-Array TX_R_190 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_190_R;
-[ TX_R_190_R ;
- ResponseViaActivity(R_104_RESP_A);
-];
-Array TX_R_191 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_191_R;
-[ TX_R_191_R ;
- ResponseViaActivity(R_105_RESP_A);
-];
-Array TX_R_192 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_192_R;
-[ TX_R_192_R ;
- ResponseViaActivity(R_106_RESP_A);
-];
-Array TX_R_193 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_193_R;
-[ TX_R_193_R ;
- ResponseViaActivity(R_109_RESP_A);
-];
-Array TX_R_194 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_194_R;
-[ TX_R_194_R ;
- ResponseViaActivity(R_109_RESP_B);
-];
-Array TX_R_195 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_195_R;
-[ TX_R_195_R ;
- ResponseViaActivity(R_111_RESP_A);
-];
-Array TX_R_196 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_196_R;
-[ TX_R_196_R ;
- ResponseViaActivity(R_112_RESP_A);
-];
-Array TX_R_197 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_197_R;
-[ TX_R_197_R ;
- ResponseViaActivity(R_112_RESP_B);
-];
-Array TX_R_198 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_198_R;
-[ TX_R_198_R ;
- ResponseViaActivity(R_113_RESP_A);
-];
-Array TX_R_199 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_199_R;
-[ TX_R_199_R ;
- ResponseViaActivity(R_114_RESP_A);
-];
-Array TX_R_200 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_200_R;
-[ TX_R_200_R ;
- ResponseViaActivity(R_116_RESP_A);
-];
-Array TX_R_201 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_201_R;
-[ TX_R_201_R ;
- ResponseViaActivity(R_116_RESP_B);
-];
-Array TX_R_202 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_202_R;
-[ TX_R_202_R ;
- ResponseViaActivity(R_120_RESP_A);
-];
-Array TX_R_203 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_203_R;
-[ TX_R_203_R ;
- ResponseViaActivity(R_120_RESP_B);
-];
-Array TX_R_204 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_204_R;
-[ TX_R_204_R ;
- ResponseViaActivity(R_120_RESP_C);
-];
-Array TX_R_205 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_205_R;
-[ TX_R_205_R ;
- ResponseViaActivity(R_120_RESP_D);
-];
-Array TX_R_206 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_206_R;
-[ TX_R_206_R ;
- ResponseViaActivity(R_120_RESP_E);
-];
-Array TX_R_207 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_207_R;
-[ TX_R_207_R ;
- ResponseViaActivity(R_120_RESP_F);
-];
-Array TX_R_208 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_208_R;
-[ TX_R_208_R ;
- ResponseViaActivity(R_120_RESP_G);
-];
-Array TX_R_209 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_209_R;
-[ TX_R_209_R ;
- ResponseViaActivity(R_120_RESP_H);
-];
-Array TX_R_210 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_210_R;
-[ TX_R_210_R ;
- ResponseViaActivity(R_120_RESP_I);
-];
-Array TX_R_211 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_211_R;
-[ TX_R_211_R ;
- ResponseViaActivity(R_120_RESP_J);
-];
-Array TX_R_212 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_212_R;
-[ TX_R_212_R ;
- ResponseViaActivity(R_120_RESP_K);
-];
-Array TX_R_213 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_213_R;
-[ TX_R_213_R ;
- ResponseViaActivity(R_120_RESP_L);
-];
-Array TX_R_214 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_214_R;
-[ TX_R_214_R ;
- ResponseViaActivity(R_120_RESP_M);
-];
-Array TX_R_215 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_215_R;
-[ TX_R_215_R ;
- ResponseViaActivity(R_120_RESP_N);
-];
-Array TX_R_216 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_216_R;
-[ TX_R_216_R ;
- ResponseViaActivity(R_120_RESP_O);
-];
-Array TX_R_217 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_217_R;
-[ TX_R_217_R ;
- ResponseViaActivity(R_120_RESP_P);
-];
-Array TX_R_218 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_218_R;
-[ TX_R_218_R ;
- ResponseViaActivity(R_120_RESP_Q);
-];
-Array TX_R_219 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_219_R;
-[ TX_R_219_R ;
- ResponseViaActivity(R_120_RESP_R);
-];
-Array TX_R_220 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_220_R;
-[ TX_R_220_R ;
- ResponseViaActivity(R_120_RESP_S);
-];
-Array TX_R_221 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_221_R;
-[ TX_R_221_R ;
- ResponseViaActivity(R_124_RESP_A);
-];
-Array TX_R_222 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_222_R;
-[ TX_R_222_R ;
- ResponseViaActivity(R_124_RESP_B);
-];
-Array TX_R_223 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_223_R;
-[ TX_R_223_R ;
- ResponseViaActivity(R_125_RESP_A);
-];
-Array TX_R_224 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_224_R;
-[ TX_R_224_R ;
- ResponseViaActivity(R_125_RESP_B);
-];
-Array TX_R_225 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_225_R;
-[ TX_R_225_R ;
- ResponseViaActivity(R_125_RESP_C);
-];
-Array TX_R_226 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_226_R;
-[ TX_R_226_R ;
- ResponseViaActivity(R_125_RESP_D);
-];
-Array TX_R_227 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_227_R;
-[ TX_R_227_R ;
- ResponseViaActivity(R_126_RESP_A);
-];
-Array TX_R_228 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_228_R;
-[ TX_R_228_R ;
- ResponseViaActivity(R_127_RESP_A);
-];
-Array TX_R_229 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_229_R;
-[ TX_R_229_R ;
- ResponseViaActivity(R_127_RESP_B);
-];
-Array TX_R_230 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_230_R;
-[ TX_R_230_R ;
- ResponseViaActivity(R_128_RESP_A);
-];
-Array TX_R_231 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_231_R;
-[ TX_R_231_R ;
- ResponseViaActivity(R_129_RESP_A);
-];
-Array TX_R_232 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_232_R;
-[ TX_R_232_R ;
- ResponseViaActivity(R_129_RESP_B);
-];
-Array TX_R_233 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_233_R;
-[ TX_R_233_R ;
- ResponseViaActivity(R_129_RESP_C);
-];
-Array TX_R_234 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_234_R;
-[ TX_R_234_R ;
- ResponseViaActivity(R_129_RESP_D);
-];
-Array TX_R_235 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_235_R;
-[ TX_R_235_R ;
- ResponseViaActivity(R_129_RESP_E);
-];
-Array TX_R_236 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_236_R;
-[ TX_R_236_R ;
- ResponseViaActivity(R_131_RESP_A);
-];
-Array TX_R_237 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_237_R;
-[ TX_R_237_R ;
- ResponseViaActivity(R_131_RESP_B);
-];
-Array TX_R_238 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_238_R;
-[ TX_R_238_R ;
- ResponseViaActivity(R_131_RESP_C);
-];
-Array TX_R_239 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_239_R;
-[ TX_R_239_R ;
- ResponseViaActivity(R_131_RESP_D);
-];
-Array TX_R_240 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_240_R;
-[ TX_R_240_R ;
- ResponseViaActivity(R_134_RESP_A);
-];
-Array TX_R_241 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_241_R;
-[ TX_R_241_R ;
- ResponseViaActivity(R_135_RESP_A);
-];
-Array TX_R_242 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_242_R;
-[ TX_R_242_R ;
- ResponseViaActivity(R_138_RESP_A);
-];
-Array TX_R_243 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_243_R;
-[ TX_R_243_R ;
- ResponseViaActivity(R_138_RESP_B);
-];
-Array TX_R_244 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_244_R;
-[ TX_R_244_R ;
- ResponseViaActivity(R_138_RESP_C);
-];
-Array TX_R_245 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_245_R;
-[ TX_R_245_R ;
- ResponseViaActivity(R_140_RESP_A);
-];
-Array TX_R_246 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_246_R;
-[ TX_R_246_R ;
- ResponseViaActivity(R_142_RESP_A);
-];
-Array TX_R_247 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_247_R;
-[ TX_R_247_R ;
- ResponseViaActivity(R_146_RESP_A);
-];
-Array TX_R_248 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_248_R;
-[ TX_R_248_R ;
- ResponseViaActivity(R_146_RESP_B);
-];
-Array TX_R_249 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_249_R;
-[ TX_R_249_R ;
- ResponseViaActivity(R_146_RESP_C);
-];
-Array TX_R_250 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_250_R;
-[ TX_R_250_R ;
- ResponseViaActivity(R_147_RESP_A);
-];
-Array TX_R_251 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_251_R;
-[ TX_R_251_R ;
- ResponseViaActivity(R_150_RESP_A);
-];
-Array TX_R_252 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_252_R;
-[ TX_R_252_R ;
- ResponseViaActivity(R_152_RESP_A);
-];
-Array TX_R_253 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_253_R;
-[ TX_R_253_R ;
- ResponseViaActivity(R_153_RESP_A);
-];
-Array TX_R_254 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_254_R;
-[ TX_R_254_R ;
- ResponseViaActivity(R_153_RESP_B);
-];
-Array TX_R_255 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_255_R;
-[ TX_R_255_R ;
- ResponseViaActivity(R_154_RESP_A);
-];
-Array TX_R_256 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_256_R;
-[ TX_R_256_R ;
- ResponseViaActivity(R_155_RESP_A);
-];
-Array TX_R_257 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_257_R;
-[ TX_R_257_R ;
- ResponseViaActivity(R_156_RESP_A);
-];
-Array TX_R_258 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_258_R;
-[ TX_R_258_R ;
- ResponseViaActivity(R_157_RESP_A);
-];
-Array TX_R_259 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_259_R;
-[ TX_R_259_R ;
- ResponseViaActivity(R_158_RESP_A);
-];
-Array TX_R_260 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_260_R;
-[ TX_R_260_R ;
- ResponseViaActivity(R_159_RESP_A);
-];
-Array TX_R_261 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_261_R;
-[ TX_R_261_R ;
- ResponseViaActivity(R_160_RESP_A);
-];
-Array TX_R_262 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_262_R;
-[ TX_R_262_R ;
- ResponseViaActivity(R_161_RESP_A);
-];
-Array TX_R_263 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_263_R;
-[ TX_R_263_R ;
- ResponseViaActivity(R_162_RESP_A);
-];
-Array TX_R_264 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_264_R;
-[ TX_R_264_R ;
- ResponseViaActivity(R_162_RESP_B);
-];
-Array TX_R_265 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_265_R;
-[ TX_R_265_R ;
- ResponseViaActivity(R_163_RESP_A);
-];
-Array TX_R_266 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_266_R;
-[ TX_R_266_R ;
- ResponseViaActivity(R_163_RESP_B);
-];
-Array TX_R_267 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_267_R;
-[ TX_R_267_R ;
- ResponseViaActivity(R_164_RESP_A);
-];
-Array TX_R_268 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_268_R;
-[ TX_R_268_R ;
- ResponseViaActivity(R_165_RESP_A);
-];
-Array TX_R_269 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_269_R;
-[ TX_R_269_R ;
- ResponseViaActivity(R_165_RESP_B);
-];
-Array TX_R_270 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_270_R;
-[ TX_R_270_R ;
- ResponseViaActivity(R_166_RESP_A);
-];
-Array TX_R_271 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_271_R;
-[ TX_R_271_R ;
- ResponseViaActivity(R_167_RESP_A);
-];
-Array TX_R_272 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_272_R;
-[ TX_R_272_R ;
- ResponseViaActivity(R_168_RESP_A);
-];
-Array TX_R_273 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_273_R;
-[ TX_R_273_R ;
- ResponseViaActivity(R_169_RESP_A);
-];
-Array TX_R_274 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_274_R;
-[ TX_R_274_R ;
- ResponseViaActivity(R_171_RESP_A);
-];
-Array TX_R_275 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_275_R;
-[ TX_R_275_R ;
- ResponseViaActivity(R_171_RESP_B);
-];
-Array TX_R_276 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_276_R;
-[ TX_R_276_R ;
- ResponseViaActivity(R_172_RESP_A);
-];
-Array TX_R_277 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_277_R;
-[ TX_R_277_R ;
- ResponseViaActivity(R_173_RESP_A);
-];
-Array TX_R_278 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_278_R;
-[ TX_R_278_R ;
- ResponseViaActivity(R_174_RESP_A);
-];
-Array TX_R_279 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_279_R;
-[ TX_R_279_R ;
- ResponseViaActivity(R_176_RESP_A);
-];
-Array TX_R_280 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_280_R;
-[ TX_R_280_R ;
- ResponseViaActivity(R_176_RESP_B);
-];
-Array TX_R_281 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_281_R;
-[ TX_R_281_R ;
- ResponseViaActivity(R_177_RESP_A);
-];
-Array TX_R_282 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_282_R;
-[ TX_R_282_R ;
- ResponseViaActivity(R_178_RESP_A);
-];
-Array TX_R_283 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_283_R;
-[ TX_R_283_R ;
- ResponseViaActivity(R_180_RESP_A);
-];
-Array TX_R_284 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_284_R;
-[ TX_R_284_R ;
- ResponseViaActivity(R_181_RESP_A);
-];
-Array TX_R_285 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_285_R;
-[ TX_R_285_R ;
- ResponseViaActivity(R_182_RESP_A);
-];
-Array TX_R_286 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_286_R;
-[ TX_R_286_R ;
- ResponseViaActivity(R_184_RESP_A);
-];
-Array TX_R_287 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_287_R;
-[ TX_R_287_R ;
- ResponseViaActivity(R_185_RESP_A);
-];
-Array TX_R_288 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_288_R;
-[ TX_R_288_R ;
- ResponseViaActivity(R_186_RESP_A);
-];
-Array TX_R_289 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_289_R;
-[ TX_R_289_R ;
- ResponseViaActivity(R_187_RESP_A);
-];
-Array TX_R_290 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_290_R;
-[ TX_R_290_R ;
- ResponseViaActivity(R_189_RESP_A);
-];
-Array TX_R_291 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_291_R;
-[ TX_R_291_R ;
- ResponseViaActivity(R_190_RESP_A);
-];
-Array TX_R_292 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_292_R;
-[ TX_R_292_R ;
- ResponseViaActivity(R_190_RESP_B);
-];
-Array TX_R_293 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_293_R;
-[ TX_R_293_R ;
- ResponseViaActivity(R_190_RESP_C);
-];
-Array TX_R_294 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_294_R;
-[ TX_R_294_R ;
- ResponseViaActivity(R_191_RESP_A);
-];
-Array TX_R_295 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_295_R;
-[ TX_R_295_R ;
- ResponseViaActivity(R_192_RESP_A);
-];
-Array TX_R_296 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_296_R;
-[ TX_R_296_R ;
- ResponseViaActivity(R_194_RESP_A);
-];
-Array TX_R_297 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_297_R;
-[ TX_R_297_R ;
- ResponseViaActivity(R_194_RESP_B);
-];
-Array TX_R_298 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_298_R;
-[ TX_R_298_R ;
- ResponseViaActivity(R_194_RESP_C);
-];
-Array TX_R_299 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_299_R;
-[ TX_R_299_R ;
- ResponseViaActivity(R_195_RESP_A);
-];
-Array TX_R_300 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_300_R;
-[ TX_R_300_R ;
- ResponseViaActivity(R_196_RESP_A);
-];
-Array TX_R_301 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_301_R;
-[ TX_R_301_R ;
- ResponseViaActivity(R_197_RESP_A);
-];
-Array TX_R_302 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_302_R;
-[ TX_R_302_R ;
- ResponseViaActivity(R_199_RESP_A);
-];
-Array TX_R_303 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_303_R;
-[ TX_R_303_R ;
- ResponseViaActivity(R_199_RESP_B);
-];
-Array TX_R_304 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_304_R;
-[ TX_R_304_R ;
- ResponseViaActivity(R_200_RESP_A);
-];
-Array TX_R_305 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_305_R;
-[ TX_R_305_R ;
- ResponseViaActivity(R_201_RESP_A);
-];
-Array TX_R_306 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_306_R;
-[ TX_R_306_R ;
- ResponseViaActivity(R_203_RESP_A);
-];
-Array TX_R_307 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_307_R;
-[ TX_R_307_R ;
- ResponseViaActivity(R_203_RESP_B);
-];
-Array TX_R_308 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_308_R;
-[ TX_R_308_R ;
- ResponseViaActivity(R_204_RESP_A);
-];
-Array TX_R_309 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_309_R;
-[ TX_R_309_R ;
- ResponseViaActivity(R_205_RESP_A);
-];
-Array TX_R_310 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_310_R;
-[ TX_R_310_R ;
- ResponseViaActivity(R_206_RESP_A);
-];
-Array TX_R_311 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_311_R;
-[ TX_R_311_R ;
- ResponseViaActivity(R_207_RESP_A);
-];
-Array TX_R_312 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_312_R;
-[ TX_R_312_R ;
- ResponseViaActivity(R_208_RESP_A);
-];
-Array TX_R_313 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_313_R;
-[ TX_R_313_R ;
- ResponseViaActivity(R_209_RESP_A);
-];
-Array TX_R_314 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_314_R;
-[ TX_R_314_R ;
- ResponseViaActivity(R_211_RESP_A);
-];
-Array TX_R_315 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_315_R;
-[ TX_R_315_R ;
- ResponseViaActivity(R_211_RESP_B);
-];
-Array TX_R_316 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_316_R;
-[ TX_R_316_R ;
- ResponseViaActivity(R_211_RESP_C);
-];
-Array TX_R_317 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_317_R;
-[ TX_R_317_R ;
- ResponseViaActivity(R_212_RESP_A);
-];
-Array TX_R_318 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_318_R;
-[ TX_R_318_R ;
- ResponseViaActivity(R_214_RESP_A);
-];
-Array TX_R_319 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_319_R;
-[ TX_R_319_R ;
- ResponseViaActivity(R_215_RESP_A);
-];
-Array TX_R_320 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_320_R;
-[ TX_R_320_R ;
- ResponseViaActivity(R_216_RESP_A);
-];
-Array TX_R_321 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_321_R;
-[ TX_R_321_R ;
- ResponseViaActivity(R_217_RESP_A);
-];
-Array TX_R_322 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_322_R;
-[ TX_R_322_R ;
- ResponseViaActivity(R_218_RESP_A);
-];
-Array TX_R_323 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_323_R;
-[ TX_R_323_R ;
- ResponseViaActivity(R_219_RESP_A);
-];
-Array TX_R_324 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_324_R;
-[ TX_R_324_R ;
- ResponseViaActivity(R_220_RESP_A);
-];
-Array TX_R_325 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_325_R;
-[ TX_R_325_R ;
- ResponseViaActivity(R_221_RESP_A);
-];
-Array TX_R_326 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_326_R;
-[ TX_R_326_R ;
- ResponseViaActivity(R_222_RESP_A);
-];
-Array TX_R_327 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_327_R;
-[ TX_R_327_R ;
- ResponseViaActivity(R_223_RESP_A);
-];
-Array TX_R_328 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_328_R;
-[ TX_R_328_R ;
- ResponseViaActivity(R_224_RESP_A);
-];
-Array TX_R_329 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_329_R;
-[ TX_R_329_R ;
- ResponseViaActivity(R_225_RESP_A);
-];
-Array TX_R_330 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_330_R;
-[ TX_R_330_R ;
- ResponseViaActivity(R_228_RESP_A);
-];
-Array TX_R_331 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_331_R;
-[ TX_R_331_R ;
- ResponseViaActivity(R_228_RESP_B);
-];
-Array TX_R_332 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_332_R;
-[ TX_R_332_R ;
- ResponseViaActivity(R_229_RESP_A);
-];
-Array TX_R_333 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_333_R;
-[ TX_R_333_R ;
- ResponseViaActivity(R_229_RESP_B);
-];
-Array TX_R_334 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_334_R;
-[ TX_R_334_R ;
- ResponseViaActivity(R_230_RESP_A);
-];
-Array TX_R_335 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_335_R;
-[ TX_R_335_R ;
- ResponseViaActivity(R_230_RESP_B);
-];
-Array TX_R_336 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_336_R;
-[ TX_R_336_R ;
- ResponseViaActivity(R_230_RESP_C);
-];
-Array TX_R_337 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_337_R;
-[ TX_R_337_R ;
- ResponseViaActivity(R_231_RESP_A);
-];
-Array TX_R_338 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_338_R;
-[ TX_R_338_R ;
- ResponseViaActivity(R_231_RESP_B);
-];
-Array TX_R_339 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_339_R;
-[ TX_R_339_R ;
- ResponseViaActivity(R_232_RESP_A);
-];
-Array TX_R_340 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_340_R;
-[ TX_R_340_R ;
- ResponseViaActivity(R_233_RESP_A);
-];
-Array TX_R_341 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_341_R;
-[ TX_R_341_R ;
- ResponseViaActivity(R_233_RESP_B);
-];
-Array TX_R_342 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_342_R;
-[ TX_R_342_R ;
- ResponseViaActivity(R_234_RESP_A);
-];
-Array TX_R_343 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_343_R;
-[ TX_R_343_R ;
- ResponseViaActivity(R_235_RESP_A);
-];
-Array TX_R_344 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_344_R;
-[ TX_R_344_R ;
- ResponseViaActivity(R_236_RESP_A);
-];
-Array TX_R_345 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_345_R;
-[ TX_R_345_R ;
- ResponseViaActivity(R_237_RESP_A);
-];
-Array TX_R_346 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_346_R;
-[ TX_R_346_R ;
- ResponseViaActivity(R_237_RESP_B);
-];
-Array TX_R_347 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_347_R;
-[ TX_R_347_R ;
- ResponseViaActivity(R_238_RESP_A);
-];
-Array TX_R_348 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_348_R;
-[ TX_R_348_R ;
- ResponseViaActivity(R_239_RESP_A);
-];
-Array TX_R_349 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_349_R;
-[ TX_R_349_R ;
- ResponseViaActivity(R_240_RESP_A);
-];
-Array TX_R_350 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_350_R;
-[ TX_R_350_R ;
- ResponseViaActivity(R_241_RESP_A);
-];
-Array TX_R_351 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_351_R;
-[ TX_R_351_R ;
- ResponseViaActivity(R_241_RESP_B);
-];
-Array TX_R_352 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_352_R;
-[ TX_R_352_R ;
- ResponseViaActivity(R_242_RESP_A);
-];
-Array TX_R_353 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_353_R;
-[ TX_R_353_R ;
- ResponseViaActivity(R_243_RESP_A);
-];
-Array TX_R_354 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_354_R;
-[ TX_R_354_R ;
- ResponseViaActivity(R_244_RESP_A);
-];
-Array TX_R_355 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_355_R;
-[ TX_R_355_R ;
- ResponseViaActivity(R_245_RESP_A);
-];
-Array TX_R_356 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_356_R;
-[ TX_R_356_R ;
- ResponseViaActivity(R_245_RESP_B);
-];
-Array TX_R_357 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_357_R;
-[ TX_R_357_R ;
- ResponseViaActivity(R_246_RESP_A);
-];
-Array TX_R_358 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_358_R;
-[ TX_R_358_R ;
- ResponseViaActivity(R_247_RESP_A);
-];
-Array TX_R_359 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_359_R;
-[ TX_R_359_R ;
- ResponseViaActivity(R_248_RESP_A);
-];
-Array TX_R_360 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_360_R;
-[ TX_R_360_R ;
- ResponseViaActivity(R_249_RESP_A);
-];
-Array TX_R_361 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_361_R;
-[ TX_R_361_R ;
- ResponseViaActivity(R_251_RESP_A);
-];
-Array TX_R_362 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_362_R;
-[ TX_R_362_R ;
- ResponseViaActivity(R_252_RESP_A);
-];
-Array TX_R_363 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_363_R;
-[ TX_R_363_R ;
- ResponseViaActivity(R_253_RESP_A);
-];
-Array TX_R_364 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_364_R;
-[ TX_R_364_R ;
- ResponseViaActivity(R_253_RESP_B);
-];
-Array TX_R_365 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_365_R;
-[ TX_R_365_R ;
- ResponseViaActivity(R_254_RESP_A);
-];
-Array TX_R_366 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_366_R;
-[ TX_R_366_R ;
- ResponseViaActivity(R_255_RESP_A);
-];
-Array TX_R_367 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_367_R;
-[ TX_R_367_R ;
- ResponseViaActivity(R_256_RESP_A);
-];
-Array TX_R_368 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_368_R;
-[ TX_R_368_R ;
- ResponseViaActivity(R_257_RESP_A);
-];
-Array TX_R_369 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_369_R;
-[ TX_R_369_R ;
- ResponseViaActivity(R_258_RESP_A);
-];
-Array TX_R_370 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_370_R;
-[ TX_R_370_R ;
- ResponseViaActivity(R_259_RESP_A);
-];
-Array TX_R_371 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_371_R;
-[ TX_R_371_R ;
- ResponseViaActivity(R_259_RESP_B);
-];
-Array TX_R_372 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_372_R;
-[ TX_R_372_R ;
- ResponseViaActivity(R_260_RESP_A);
-];
-Array TX_R_373 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_373_R;
-[ TX_R_373_R ;
- ResponseViaActivity(R_260_RESP_B);
-];
-Array TX_R_374 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_374_R;
-[ TX_R_374_R ;
- ResponseViaActivity(R_261_RESP_A);
-];
-Array TX_R_375 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_375_R;
-[ TX_R_375_R ;
- ResponseViaActivity(R_261_RESP_B);
-];
-Array TX_R_376 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_376_R;
-[ TX_R_376_R ;
- ResponseViaActivity(R_262_RESP_A);
-];
-Array TX_R_377 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_377_R;
-[ TX_R_377_R ;
- ResponseViaActivity(R_263_RESP_A);
-];
-Array TX_R_378 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_378_R;
-[ TX_R_378_R ;
- ResponseViaActivity(R_263_RESP_B);
-];
-Array TX_R_379 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_379_R;
-[ TX_R_379_R ;
- ResponseViaActivity(R_264_RESP_A);
-];
-Array TX_R_380 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_380_R;
-[ TX_R_380_R ;
- ResponseViaActivity(R_265_RESP_A);
-];
-Array TX_R_381 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_381_R;
-[ TX_R_381_R ;
- ResponseViaActivity(R_266_RESP_A);
-];
-Array TX_R_382 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_382_R;
-[ TX_R_382_R ;
- ResponseViaActivity(R_267_RESP_A);
-];
-Array TX_R_383 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_383_R;
-[ TX_R_383_R ;
- ResponseViaActivity(R_268_RESP_A);
-];
-Array TX_R_384 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_384_R;
-[ TX_R_384_R ;
- ResponseViaActivity(R_269_RESP_A);
-];
-Array TX_R_385 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_385_R;
-[ TX_R_385_R ;
- ResponseViaActivity(R_269_RESP_B);
-];
-Array TX_R_386 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_386_R;
-[ TX_R_386_R ;
- ResponseViaActivity(R_270_RESP_A);
-];
-Array TX_R_387 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_387_R;
-[ TX_R_387_R ;
- ResponseViaActivity(R_271_RESP_A);
-];
-Array TX_R_388 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_388_R;
-[ TX_R_388_R ;
- ResponseViaActivity(R_271_RESP_B);
-];
-Array TX_R_389 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_389_R;
-[ TX_R_389_R ;
- ResponseViaActivity(R_272_RESP_A);
-];
-Array TX_R_390 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_390_R;
-[ TX_R_390_R ;
- ResponseViaActivity(R_273_RESP_A);
-];
-Array TX_R_391 --> CONSTANT_PACKED_TEXT_STORAGE TX_R_391_R;
-[ TX_R_391_R ;
- ResponseViaActivity(R_274_RESP_A);
-];
-! Find next x satisfying:
-! [ thing(x) ]
-[ Prop_0
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- for (x=IK2_First: x: x=x.IK2_Link){
- return x;
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! True or false?
-! [ Exists x : thing(x) & 'enterable'(x) & called='box'(thing)(x) & is('the location', ContainerOf(x)) ]
-[ Prop_1
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- for (x=TestContainmentRange(real_location): x: x=TestContainmentRange(real_location,x)){
- if ((x ofclass K2_thing) && ((Adj_69_t1_v10(x)))){
- deferred_calling_list-->0 = x;
- rtrue;
- }
- }
- rfalse;
-];
-! Find next x satisfying:
-! [ thing(x) ]
-[ Prop_2
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- for (x=IK2_First: x: x=x.IK2_Link){
- return x;
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! Find next x satisfying:
-! [ thing(x) ]
-[ Prop_3
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- for (x=IK2_First: x: x=x.IK2_Link){
- return x;
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! How many x satisfy this?
-! [ thing(x) & 'marked for listing'(x) ]
-[ Prop_4
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- for (x=IK2_First: x: x=x.IK2_Link){
- if (((Adj_65_t1_v10(x)))){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! Find next x satisfying:
-! [ thing(x) & 'marked for listing'(x) ]
-[ Prop_5
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- for (x=IK2_First: x: x=x.IK2_Link){
- if (((Adj_65_t1_v10(x)))){
- return x;
- }
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! Abstraction for set of x such that:
-! [ thing(x) & thing(x) & 'unmentioned'(x) ]
-[ Prop_6
- reason ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- total ! internal use only
- counter ! internal use only
- selection ! internal use only
- best ! internal use only
- best_with ! internal use only
- ;
- ;
- if (reason >= 0) { x = reason; reason = -1; }
- switch (reason) {
- -6: ! Find the extremal x satisfying:
- if (property_loop_sign>0) best=MIN_NEGATIVE_NUMBER;
- else best=MAX_POSITIVE_NUMBER;
- for (x=IK2_First: x: x=x.IK2_Link){
- if ((x ofclass K2_thing) && ((Adj_68_t1_v10(x)))){
- if (property_loop_sign>0) {
- if (x.property_to_be_totalled >= best) {
- best = x.property_to_be_totalled;
- best_with = x;
- }
- } else {
- if (x.property_to_be_totalled <= best) {
- best = x.property_to_be_totalled;
- best_with = x;
- }
- }
- }
- .NextOuterLoop_3;
- }
- return best_with;
- -5: ! Find a total property value over all x satisfying:
- for (x=IK2_First: x: x=x.IK2_Link){
- if ((x ofclass K2_thing) && ((Adj_68_t1_v10(x)))){
- total = total + x.property_to_be_totalled;
- jump NextOuterLoop_6;
- }
- .NextOuterLoop_6;
- }
- return total;
- -4: ! Find a random x satisfying:
- selection = -1;
- while (true) {
- counter = 0;
- for (x=IK2_First: x: x=x.IK2_Link){
- if ((x ofclass K2_thing) && ((Adj_68_t1_v10(x)))){
- counter++;
- if (counter == selection) return x;
- jump NextOuterLoop_7;
- }
- .NextOuterLoop_7;
- }
- if ((counter == 0) || (selection >= 0)) return nothing;
- selection = random(counter);
- }
- -3: ! How many x satisfy this?
- for (x=IK2_First: x: x=x.IK2_Link){
- if ((x ofclass K2_thing) && ((Adj_68_t1_v10(x)))){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
- -2: ! Find next x satisfying:
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- for (x=IK2_First: x: x=x.IK2_Link){
- if ((x ofclass K2_thing) && ((Adj_68_t1_v10(x)))){
- return x;
- }
- .NextOuterLoop_4;
- }
- return nothing;
- -1: ! True or false?
- if ((x ofclass K2_thing) && (x ofclass K2_thing) && ((Adj_68_t1_v10(x)))){
- rtrue;
- }
- rfalse;
- }
-];
-! Find next x satisfying:
-! [ thing(x) & not-'handled'(x) & supporter(const_0) & provides(const_1, 'the property initial appearance') & is(const_2, SupporterOf(x)) ]
-[ Prop_7
- const_0 ! Implied call parameter
- const_1 ! Implied call parameter
- const_2 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- objectloop (x in const_2) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing) && (~~((Adj_62_t1_v10(x)))) && (const_0 ofclass K6_supporter) && (WhetherProvides(const_1, false, initial))){
- return x;
- }
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! True or false?
-! [ Exists x : thing(x) & 'locale-supportable'(x) & is(const_0, SupporterOf(x)) ]
-[ Prop_8
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- objectloop (x in const_0) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing) && ((Adj_41_t1_v10(x)))){
- rtrue;
- }
- }
- rfalse;
-];
-! Find next x satisfying:
-! [ thing(x) & is(const_0, SupporterOf(x)) ]
-[ Prop_9
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- objectloop (x in const_0) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- return x;
- }
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! True or false?
-! [ Exists x : thing(x) & 'locale-supportable'(x) & is(const_0, SupporterOf(x)) ]
-[ Prop_10
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- objectloop (x in const_0) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing) && ((Adj_41_t1_v10(x)))){
- rtrue;
- }
- }
- rfalse;
-];
-! Find next x satisfying:
-! [ thing(x) & is(const_0, SupporterOf(x)) ]
-[ Prop_11
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- objectloop (x in const_0) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- return x;
- }
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! True or false?
-! [ Exists x : thing(x) & 'locale-supportable'(x) & is(const_0, SupporterOf(x)) ]
-[ Prop_12
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- objectloop (x in const_0) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing) && ((Adj_41_t1_v10(x)))){
- rtrue;
- }
- }
- rfalse;
-];
-! Find next x satisfying:
-! [ thing(x) & is(const_0, SupporterOf(x)) ]
-[ Prop_13
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- objectloop (x in const_0) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- return x;
- }
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the actor', CarrierOf(x)) ]
-[ Prop_14
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- objectloop (x in actor) if (CarrierOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! True or false?
-! [ Exists x : player's holdall(x) & called='current working sack'(player's holdall)(x) & is('actor', HolderOf(x)) ]
-[ Prop_15
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- for (x=nothing: false: ){
- if ((actor == HolderOf(x))){
- deferred_calling_list-->0 = x;
- rtrue;
- }
- }
- rfalse;
-];
-! Find next x satisfying:
-! [ thing(x) & is('the actor', CarrierOf(x)) ]
-[ Prop_16
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- objectloop (x in actor) if (CarrierOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- return x;
- }
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the actor', CarrierOf(x)) ]
-[ Prop_17
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- objectloop (x in actor) if (CarrierOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! How many x satisfy this?
-! [ thing(x) & is(const_0, SupporterOf(x)) ]
-[ Prop_18
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- objectloop (x in const_0) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! How many x satisfy this?
-! [ thing(x) & is(const_0, ContainerOf(x)) ]
-[ Prop_19
- const_0 ! Implied call parameter
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- for (x=TestContainmentRange(const_0): x: x=TestContainmentRange(const_0,x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the second noun', SupporterOf(x)) ]
-[ Prop_20
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- objectloop (x in second) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the second noun', ContainerOf(x)) ]
-[ Prop_21
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- for (x=TestContainmentRange(second): x: x=TestContainmentRange(second,x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! True or false?
-! [ Exists x : person(x) & called='owner'(person)(x) & NOT[ is(x, 'the actor') NOT] & encloses(x, 'noun') ]
-[ Prop_22
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- for (x=IK8_First: x: x=x.IK8_Link){
- if (~~((x == actor))){
- if ((IndirectlyContains(x,noun))){
- deferred_calling_list-->0 = x;
- rtrue;
- }
- }
- }
- rfalse;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the noun', SupporterOf(x)) ]
-[ Prop_23
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- objectloop (x in noun) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the noun', ContainerOf(x)) ]
-[ Prop_24
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- for (x=TestContainmentRange(noun): x: x=TestContainmentRange(noun,x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! Find next x satisfying:
-! [ thing(x) ]
-[ Prop_25
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- if (x_ix > 0) {
- x_ix--;
- jump NextOuterLoop_4;
- }
- if (x) jump NextOuterLoop_4;
- for (x=IK2_First: x: x=x.IK2_Link){
- return x;
- .NextOuterLoop_4;
- }
- return nothing;
-];
-! True or false?
-! [ Exists x : thing(x) & 'described'(x) & NOT[ 'scenery'(x) NOT] & is('the noun', ContainerOf(x)) ]
-[ Prop_26
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- for (x=TestContainmentRange(noun): x: x=TestContainmentRange(noun,x)){
- if ((x ofclass K2_thing) && ((Adj_63_t1_v10(x)))){
- if (~~(((Adj_59_t1_v10(x))))){
- rtrue;
- }
- }
- }
- rfalse;
-];
-! True or false?
-! [ Exists x : thing(x) & NOT[ is(x, 'the player') NOT] & is('the noun', ContainerOf(x)) ]
-[ Prop_27
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- for (x=TestContainmentRange(noun): x: x=TestContainmentRange(noun,x)){
- if ((x ofclass K2_thing)){
- if (~~((x == player))){
- rtrue;
- }
- }
- }
- rfalse;
-];
-! True or false?
-! [ Exists x : thing(x) & 'described'(x) & NOT[ 'scenery'(x) NOT] & is('the noun', SupporterOf(x)) ]
-[ Prop_28
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- objectloop (x in noun) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing) && ((Adj_63_t1_v10(x)))){
- if (~~(((Adj_59_t1_v10(x))))){
- rtrue;
- }
- }
- }
- rfalse;
-];
-! True or false?
-! [ Exists x : thing(x) & NOT[ is(x, 'the player') NOT] & is('the noun', SupporterOf(x)) ]
-[ Prop_29
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- objectloop (x in noun) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- if (~~((x == player))){
- rtrue;
- }
- }
- }
- rfalse;
-];
-! True or false?
-! [ Exists x : thing(x) & 'described'(x) & NOT[ 'scenery'(x) NOT] & is('noun', ContainerOf(x)) ]
-[ Prop_30
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- for (x=TestContainmentRange(noun): x: x=TestContainmentRange(noun,x)){
- if ((x ofclass K2_thing) && ((Adj_63_t1_v10(x)))){
- if (~~(((Adj_59_t1_v10(x))))){
- rtrue;
- }
- }
- }
- rfalse;
-];
-! True or false?
-! [ Exists x : thing(x) & 'described'(x) & NOT[ 'scenery'(x) NOT] & is('noun', SupporterOf(x)) ]
-[ Prop_31
- x ! internal use only
- x_ix ! internal use only
- ;
- ;
- objectloop (x in noun) if (SupporterOf(x)==parent(x)){
- if ((x ofclass K2_thing) && ((Adj_63_t1_v10(x)))){
- if (~~(((Adj_59_t1_v10(x))))){
- rtrue;
- }
- }
- }
- rfalse;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the actor', CarrierOf(x)) ]
-[ Prop_32
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- objectloop (x in actor) if (CarrierOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-! How many x satisfy this?
-! [ thing(x) & is('the second noun', CarrierOf(x)) ]
-[ Prop_33
- x ! internal use only
- x_ix ! internal use only
- counter ! internal use only
- ;
- ;
- objectloop (x in second) if (CarrierOf(x)==parent(x)){
- if ((x ofclass K2_thing)){
- counter++;
- jump NextOuterLoop_5;
- }
- .NextOuterLoop_5;
- }
- return counter;
-];
-
-Constant R_11_RESP_A = 1;
-Constant R_39_RESP_A = 2;
-Constant R_40_RESP_A = 3;
-Constant R_41_RESP_A = 4;
-Constant R_41_RESP_B = 5;
-Constant R_42_RESP_A = 6;
-Constant R_46_RESP_A = 7;
-Constant R_46_RESP_B = 8;
-Constant R_46_RESP_C = 9;
-Constant R_46_RESP_D = 10;
-Constant R_46_RESP_E = 11;
-Constant R_46_RESP_F = 12;
-Constant R_53_RESP_A = 13;
-Constant R_55_RESP_A = 14;
-Constant R_56_RESP_A = 15;
-Constant R_57_RESP_A = 16;
-Constant R_58_RESP_A = 17;
-Constant R_59_RESP_A = 18;
-Constant R_60_RESP_A = 19;
-Constant R_61_RESP_A = 20;
-Constant R_62_RESP_A = 21;
-Constant R_63_RESP_A = 22;
-Constant R_64_RESP_A = 23;
-Constant R_65_RESP_A = 24;
-Constant R_66_RESP_A = 25;
-Constant R_67_RESP_A = 26;
-Constant R_68_RESP_A = 27;
-Constant R_69_RESP_A = 28;
-Constant R_70_RESP_A = 29;
-Constant R_71_RESP_A = 30;
-Constant R_73_RESP_A = 31;
-Constant R_73_RESP_B = 32;
-Constant R_74_RESP_A = 33;
-Constant R_75_RESP_A = 34;
-Constant R_77_RESP_A = 35;
-Constant R_78_RESP_A = 36;
-Constant R_79_RESP_A = 37;
-Constant R_80_RESP_A = 38;
-Constant R_81_RESP_A = 39;
-Constant R_82_RESP_A = 40;
-Constant R_82_RESP_B = 41;
-Constant R_84_RESP_A = 42;
-Constant R_84_RESP_B = 43;
-Constant R_87_RESP_A = 44;
-Constant R_88_RESP_A = 45;
-Constant R_89_RESP_A = 46;
-Constant R_90_RESP_A = 47;
-Constant R_92_RESP_A = 48;
-Constant R_93_RESP_A = 49;
-Constant R_96_RESP_A = 50;
-Constant R_97_RESP_A = 51;
-Constant R_98_RESP_A = 52;
-Constant R_99_RESP_A = 53;
-Constant R_100_RESP_A = 54;
-Constant R_102_RESP_A = 55;
-Constant R_103_RESP_A = 56;
-Constant R_104_RESP_A = 57;
-Constant R_105_RESP_A = 58;
-Constant R_106_RESP_A = 59;
-Constant R_109_RESP_A = 60;
-Constant R_109_RESP_B = 61;
-Constant R_111_RESP_A = 62;
-Constant R_112_RESP_A = 63;
-Constant R_112_RESP_B = 64;
-Constant R_113_RESP_A = 65;
-Constant R_114_RESP_A = 66;
-Constant R_116_RESP_A = 67;
-Constant R_116_RESP_B = 68;
-Constant R_120_RESP_A = 69;
-Constant R_120_RESP_B = 70;
-Constant R_120_RESP_C = 71;
-Constant R_120_RESP_D = 72;
-Constant R_120_RESP_E = 73;
-Constant R_120_RESP_F = 74;
-Constant R_120_RESP_G = 75;
-Constant R_120_RESP_H = 76;
-Constant R_120_RESP_I = 77;
-Constant R_120_RESP_J = 78;
-Constant R_120_RESP_K = 79;
-Constant R_120_RESP_L = 80;
-Constant R_120_RESP_M = 81;
-Constant R_120_RESP_N = 82;
-Constant R_120_RESP_O = 83;
-Constant R_120_RESP_P = 84;
-Constant R_120_RESP_Q = 85;
-Constant R_120_RESP_R = 86;
-Constant R_120_RESP_S = 87;
-Constant R_124_RESP_A = 88;
-Constant R_124_RESP_B = 89;
-Constant R_125_RESP_A = 90;
-Constant R_125_RESP_B = 91;
-Constant R_125_RESP_C = 92;
-Constant R_125_RESP_D = 93;
-Constant R_126_RESP_A = 94;
-Constant R_127_RESP_A = 95;
-Constant R_127_RESP_B = 96;
-Constant R_128_RESP_A = 97;
-Constant R_129_RESP_A = 98;
-Constant R_129_RESP_B = 99;
-Constant R_129_RESP_C = 100;
-Constant R_129_RESP_D = 101;
-Constant R_129_RESP_E = 102;
-Constant R_131_RESP_A = 103;
-Constant R_131_RESP_B = 104;
-Constant R_131_RESP_C = 105;
-Constant R_131_RESP_D = 106;
-Constant R_134_RESP_A = 107;
-Constant R_135_RESP_A = 108;
-Constant R_138_RESP_A = 109;
-Constant R_138_RESP_B = 110;
-Constant R_138_RESP_C = 111;
-Constant R_140_RESP_A = 112;
-Constant R_142_RESP_A = 113;
-Constant R_146_RESP_A = 114;
-Constant R_146_RESP_B = 115;
-Constant R_146_RESP_C = 116;
-Constant R_147_RESP_A = 117;
-Constant R_150_RESP_A = 118;
-Constant R_152_RESP_A = 119;
-Constant R_153_RESP_A = 120;
-Constant R_153_RESP_B = 121;
-Constant R_154_RESP_A = 122;
-Constant R_155_RESP_A = 123;
-Constant R_156_RESP_A = 124;
-Constant R_157_RESP_A = 125;
-Constant R_158_RESP_A = 126;
-Constant R_159_RESP_A = 127;
-Constant R_160_RESP_A = 128;
-Constant R_161_RESP_A = 129;
-Constant R_162_RESP_A = 130;
-Constant R_162_RESP_B = 131;
-Constant R_163_RESP_A = 132;
-Constant R_163_RESP_B = 133;
-Constant R_164_RESP_A = 134;
-Constant R_165_RESP_A = 135;
-Constant R_165_RESP_B = 136;
-Constant R_166_RESP_A = 137;
-Constant R_167_RESP_A = 138;
-Constant R_168_RESP_A = 139;
-Constant R_169_RESP_A = 140;
-Constant R_171_RESP_A = 141;
-Constant R_171_RESP_B = 142;
-Constant R_172_RESP_A = 143;
-Constant R_173_RESP_A = 144;
-Constant R_174_RESP_A = 145;
-Constant R_176_RESP_A = 146;
-Constant R_176_RESP_B = 147;
-Constant R_177_RESP_A = 148;
-Constant R_178_RESP_A = 149;
-Constant R_180_RESP_A = 150;
-Constant R_181_RESP_A = 151;
-Constant R_182_RESP_A = 152;
-Constant R_184_RESP_A = 153;
-Constant R_185_RESP_A = 154;
-Constant R_186_RESP_A = 155;
-Constant R_187_RESP_A = 156;
-Constant R_189_RESP_A = 157;
-Constant R_190_RESP_A = 158;
-Constant R_190_RESP_B = 159;
-Constant R_190_RESP_C = 160;
-Constant R_191_RESP_A = 161;
-Constant R_192_RESP_A = 162;
-Constant R_194_RESP_A = 163;
-Constant R_194_RESP_B = 164;
-Constant R_194_RESP_C = 165;
-Constant R_195_RESP_A = 166;
-Constant R_196_RESP_A = 167;
-Constant R_197_RESP_A = 168;
-Constant R_199_RESP_A = 169;
-Constant R_199_RESP_B = 170;
-Constant R_200_RESP_A = 171;
-Constant R_201_RESP_A = 172;
-Constant R_203_RESP_A = 173;
-Constant R_203_RESP_B = 174;
-Constant R_204_RESP_A = 175;
-Constant R_205_RESP_A = 176;
-Constant R_206_RESP_A = 177;
-Constant R_207_RESP_A = 178;
-Constant R_208_RESP_A = 179;
-Constant R_209_RESP_A = 180;
-Constant R_211_RESP_A = 181;
-Constant R_211_RESP_B = 182;
-Constant R_211_RESP_C = 183;
-Constant R_212_RESP_A = 184;
-Constant R_214_RESP_A = 185;
-Constant R_215_RESP_A = 186;
-Constant R_216_RESP_A = 187;
-Constant R_217_RESP_A = 188;
-Constant R_218_RESP_A = 189;
-Constant R_219_RESP_A = 190;
-Constant R_220_RESP_A = 191;
-Constant R_221_RESP_A = 192;
-Constant R_222_RESP_A = 193;
-Constant R_223_RESP_A = 194;
-Constant R_224_RESP_A = 195;
-Constant R_225_RESP_A = 196;
-Constant R_228_RESP_A = 197;
-Constant R_228_RESP_B = 198;
-Constant R_229_RESP_A = 199;
-Constant R_229_RESP_B = 200;
-Constant R_230_RESP_A = 201;
-Constant R_230_RESP_B = 202;
-Constant R_230_RESP_C = 203;
-Constant R_231_RESP_A = 204;
-Constant R_231_RESP_B = 205;
-Constant R_232_RESP_A = 206;
-Constant R_233_RESP_A = 207;
-Constant R_233_RESP_B = 208;
-Constant R_234_RESP_A = 209;
-Constant R_235_RESP_A = 210;
-Constant R_236_RESP_A = 211;
-Constant R_237_RESP_A = 212;
-Constant R_237_RESP_B = 213;
-Constant R_238_RESP_A = 214;
-Constant R_239_RESP_A = 215;
-Constant R_240_RESP_A = 216;
-Constant R_241_RESP_A = 217;
-Constant R_241_RESP_B = 218;
-Constant R_242_RESP_A = 219;
-Constant R_243_RESP_A = 220;
-Constant R_244_RESP_A = 221;
-Constant R_245_RESP_A = 222;
-Constant R_245_RESP_B = 223;
-Constant R_246_RESP_A = 224;
-Constant R_247_RESP_A = 225;
-Constant R_248_RESP_A = 226;
-Constant R_249_RESP_A = 227;
-Constant R_251_RESP_A = 228;
-Constant R_252_RESP_A = 229;
-Constant R_253_RESP_A = 230;
-Constant R_253_RESP_B = 231;
-Constant R_254_RESP_A = 232;
-Constant R_255_RESP_A = 233;
-Constant R_256_RESP_A = 234;
-Constant R_257_RESP_A = 235;
-Constant R_258_RESP_A = 236;
-Constant R_259_RESP_A = 237;
-Constant R_259_RESP_B = 238;
-Constant R_260_RESP_A = 239;
-Constant R_260_RESP_B = 240;
-Constant R_261_RESP_A = 241;
-Constant R_261_RESP_B = 242;
-Constant R_262_RESP_A = 243;
-Constant R_263_RESP_A = 244;
-Constant R_263_RESP_B = 245;
-Constant R_264_RESP_A = 246;
-Constant R_265_RESP_A = 247;
-Constant R_266_RESP_A = 248;
-Constant R_267_RESP_A = 249;
-Constant R_268_RESP_A = 250;
-Constant R_269_RESP_A = 251;
-Constant R_269_RESP_B = 252;
-Constant R_270_RESP_A = 253;
-Constant R_271_RESP_A = 254;
-Constant R_271_RESP_B = 255;
-Constant R_272_RESP_A = 256;
-Constant R_273_RESP_A = 257;
-Constant R_274_RESP_A = 258;
-Constant R_281_RESP_A = 259;
-Constant R_283_RESP_A = 260;
-Constant R_283_RESP_B = 261;
-Constant R_290_RESP_A = 262;
-Constant R_291_RESP_A = 263;
-Constant R_293_RESP_A = 264;
-Constant R_294_RESP_A = 265;
-Constant R_297_RESP_A = 266;
-Constant R_298_RESP_A = 267;
-Constant R_299_RESP_A = 268;
-Constant R_300_RESP_A = 269;
-Constant R_301_RESP_A = 270;
-Constant R_301_RESP_B = 271;
-Constant R_301_RESP_C = 272;
-Constant R_301_RESP_D = 273;
-Constant R_301_RESP_E = 274;
-Constant R_301_RESP_F = 275;
-Constant R_301_RESP_G = 276;
-Constant R_301_RESP_H = 277;
-Constant R_301_RESP_I = 278;
-Constant R_301_RESP_J = 279;
-Constant R_301_RESP_K = 280;
-Constant R_301_RESP_L = 281;
-Constant R_301_RESP_M = 282;
-Constant R_301_RESP_N = 283;
-Constant R_301_RESP_O = 284;
-Constant R_301_RESP_P = 285;
-Constant R_301_RESP_Q = 286;
-Constant R_301_RESP_R = 287;
-Constant R_301_RESP_S = 288;
-Constant R_301_RESP_T = 289;
-Constant R_301_RESP_U = 290;
-Constant R_301_RESP_V = 291;
-Constant R_301_RESP_W = 292;
-Constant R_301_RESP_X = 293;
-Constant R_301_RESP_Y = 294;
-Constant R_302_RESP_A = 295;
-Constant R_302_RESP_B = 296;
-Constant R_302_RESP_C = 297;
-Constant R_302_RESP_D = 298;
-Constant R_302_RESP_E = 299;
-Constant R_302_RESP_F = 300;
-Constant R_302_RESP_G = 301;
-Constant R_302_RESP_H = 302;
-Constant R_302_RESP_I = 303;
-Constant R_302_RESP_J = 304;
-Constant R_302_RESP_K = 305;
-Constant R_303_RESP_A = 306;
-Constant R_303_RESP_B = 307;
-Constant R_303_RESP_C = 308;
-Constant R_303_RESP_D = 309;
-Constant R_303_RESP_E = 310;
-Constant R_303_RESP_F = 311;
-Constant R_303_RESP_G = 312;
-Constant R_303_RESP_H = 313;
-Constant R_303_RESP_I = 314;
-Constant R_303_RESP_J = 315;
-Constant R_303_RESP_K = 316;
-Constant R_303_RESP_L = 317;
-Constant R_303_RESP_M = 318;
-Constant R_303_RESP_N = 319;
-Constant R_303_RESP_O = 320;
-Constant R_303_RESP_P = 321;
-Constant R_303_RESP_Q = 322;
-Constant R_303_RESP_R = 323;
-Constant R_303_RESP_S = 324;
-Constant R_303_RESP_T = 325;
-Constant R_303_RESP_U = 326;
-Constant R_303_RESP_V = 327;
-Constant R_303_RESP_W = 328;
-Constant R_303_RESP_X = 329;
-Constant R_304_RESP_A = 330;
-Constant R_304_RESP_B = 331;
-Constant R_304_RESP_C = 332;
-Constant R_304_RESP_D = 333;
-Constant R_304_RESP_E = 334;
-Constant R_304_RESP_F = 335;
-Constant R_305_RESP_A = 336;
-Constant R_306_RESP_A = 337;
-Constant R_306_RESP_B = 338;
-Constant R_306_RESP_C = 339;
-Constant R_306_RESP_D = 340;
-Constant R_307_RESP_A = 341;
-Constant R_307_RESP_B = 342;
-Constant R_307_RESP_C = 343;
-Constant R_307_RESP_D = 344;
-Constant R_307_RESP_E = 345;
-Constant R_307_RESP_F = 346;
-Constant R_307_RESP_G = 347;
-Constant R_307_RESP_H = 348;
-Constant R_308_RESP_A = 349;
-Constant R_309_RESP_A = 350;
-Constant R_309_RESP_B = 351;
-Constant R_309_RESP_C = 352;
-Constant R_312_RESP_A = 353;
-Constant R_312_RESP_B = 354;
-Constant R_314_RESP_A = 355;
-Constant R_314_RESP_B = 356;
-Constant R_314_RESP_C = 357;
-Constant R_320_RESP_A = 358;
-Constant R_320_RESP_B = 359;
-Constant R_320_RESP_C = 360;
-Constant R_320_RESP_D = 361;
-Constant R_320_RESP_E = 362;
-Constant R_320_RESP_F = 363;
-Constant R_323_RESP_A = 364;
-Constant R_324_RESP_A = 365;
-Constant R_324_RESP_B = 366;
-Constant R_325_RESP_A = 367;
-Constant R_325_RESP_B = 368;
-Constant R_326_RESP_A = 369;
-Constant R_326_RESP_B = 370;
-Constant R_327_RESP_A = 371;
-Constant R_327_RESP_B = 372;
-Constant R_328_RESP_A = 373;
-Constant R_328_RESP_B = 374;
-Constant R_328_RESP_C = 375;
-Constant R_329_RESP_A = 376;
-Constant R_329_RESP_B = 377;
-Constant R_329_RESP_C = 378;
-Constant R_331_RESP_A = 379;
-Constant R_331_RESP_B = 380;
-Constant R_331_RESP_C = 381;
-Constant R_331_RESP_D = 382;
-Constant R_331_RESP_E = 383;
-Constant R_333_RESP_A = 384;
-Constant R_335_RESP_A = 385;
-Constant R_337_RESP_A = 386;
-Constant R_339_RESP_A = 387;
-Constant R_341_RESP_A = 388;
-Constant R_342_RESP_A = 389;
-Constant R_342_RESP_B = 390;
-Constant R_342_RESP_C = 391;
-Constant R_342_RESP_D = 392;
-Constant NO_RESPONSES = 392;
-Array ResponseTexts -->
- TX_S_134 TX_S_135 TX_S_138 TX_S_136 TX_S_137 TX_S_139 TX_S_140 TX_S_141 TX_S_142 TX_S_143 TX_S_144 TX_S_145 TX_S_146 TX_S_147 TX_S_148 TX_S_149 TX_S_150 TX_S_151 TX_S_152 TX_S_153 TX_S_154 TX_S_155 TX_S_156 TX_S_157 TX_S_158 TX_S_159 TX_S_160 TX_S_161 TX_S_162 TX_S_163 TX_S_164 TX_S_165 TX_S_166 TX_S_167 TX_S_169 TX_S_168 TX_S_170 TX_S_171 TX_S_172 TX_S_173 TX_S_174 TX_S_175 TX_S_176 TX_S_177 TX_S_178 TX_S_179 TX_S_180 TX_S_181 TX_S_182 TX_S_183 TX_S_184 TX_S_185 TX_S_186 TX_S_187 TX_S_188 TX_S_189 TX_S_190 TX_S_191 TX_S_192 TX_S_193 TX_S_194 TX_S_195 TX_S_196 TX_S_197 TX_S_198 TX_S_199 TX_S_200 TX_S_201 TX_S_202 TX_S_203 TX_S_204 TX_S_205 TX_S_206 TX_S_207 TX_S_208 TX_S_209 TX_S_210 TX_S_211 TX_S_212 TX_S_213 TX_S_214 TX_S_215 TX_S_216 TX_S_217 TX_S_218 TX_S_219 TX_S_220 TX_S_221 TX_S_222 TX_S_223 TX_S_224 TX_S_225 TX_S_226 TX_S_227 TX_S_228 TX_S_229 TX_S_230 TX_S_231 TX_S_232 TX_S_233 TX_S_234 TX_S_235 TX_S_236 TX_S_237 TX_S_238 TX_S_239 TX_S_240 TX_S_241 TX_S_242 TX_S_243 TX_S_244 TX_S_245 TX_S_246 TX_S_247 TX_S_248 TX_S_249 TX_S_250 TX_S_251 TX_S_252 TX_S_253 TX_S_254 TX_S_255 TX_S_256 TX_S_257 TX_S_258 TX_S_259 TX_S_260 TX_S_261 TX_S_262 TX_S_263 TX_S_264 TX_S_265 TX_S_266 TX_S_267 TX_S_268 TX_S_269 TX_S_270 TX_S_271 TX_S_272 TX_S_273 TX_S_274 TX_S_275 TX_S_276 TX_S_277 TX_S_278 TX_S_279 TX_S_280 TX_S_281 TX_S_282 TX_S_283 TX_S_284 TX_S_285 TX_S_286 TX_S_287 TX_S_288 TX_S_289 TX_S_290 TX_S_291 TX_S_292 TX_S_293 TX_S_294 TX_S_295 TX_S_296 TX_S_297 TX_S_298 TX_S_299 TX_S_300 TX_S_301 TX_S_302 TX_S_303 TX_S_304 TX_S_305 TX_S_306 TX_S_307 TX_S_308 TX_S_309 TX_S_310 TX_S_311 TX_S_312 TX_S_313 TX_S_314 TX_S_315 TX_S_316 TX_S_317 TX_S_318 TX_S_319 TX_S_320 TX_S_321 TX_S_322 TX_S_323 TX_S_324 TX_S_325 TX_S_326 TX_S_327 TX_S_328 TX_S_329 TX_S_330 TX_S_331 TX_S_332 TX_S_333 TX_S_334 TX_S_335 TX_S_336 TX_S_337 TX_S_338 TX_S_339 TX_S_340 TX_S_341 TX_S_342 TX_S_343 TX_S_344 TX_S_345 TX_S_346 TX_S_347 TX_S_348 TX_S_349 TX_S_350 TX_S_351 TX_S_352 TX_S_353 TX_S_354 TX_S_355 TX_S_356 TX_S_357 TX_S_358 TX_S_359 TX_S_360 TX_S_361 TX_S_362 TX_S_363 TX_S_364 TX_S_365 TX_S_366 TX_S_367 TX_S_368 TX_S_369 TX_S_370 TX_S_371 TX_S_372 TX_S_373 TX_S_374 TX_S_375 TX_S_376 TX_S_377 TX_S_378 TX_S_379 TX_S_380 TX_S_381 TX_S_382 TX_S_383 TX_S_384 TX_S_385 TX_S_386 TX_S_387 TX_S_388 TX_S_389 TX_S_390 TX_S_391 TX_S_0 TX_S_1 TX_S_2 TX_S_3 TX_S_4 TX_S_5 TX_S_6 TX_S_7 TX_S_8 TX_S_9 TX_S_10 TX_S_11 TX_S_12 TX_S_13 TX_S_14 TX_S_15 TX_S_16 TX_S_17 TX_S_18 TX_S_19 TX_S_20 TX_S_21 TX_S_22 TX_S_23 TX_S_24 TX_S_25 TX_S_26 TX_S_27 TX_S_28 TX_S_29 TX_S_30 TX_S_31 TX_S_32 TX_S_33 TX_S_34 TX_S_35 TX_S_36 TX_S_37 TX_S_38 TX_S_39 TX_S_40 TX_S_41 TX_S_42 TX_S_43 TX_S_44 TX_S_45 TX_S_46 TX_S_47 TX_S_48 TX_S_49 TX_S_50 TX_S_51 TX_S_52 TX_S_53 TX_S_54 TX_S_55 TX_S_56 TX_S_57 TX_S_58 TX_S_59 TX_S_60 TX_S_61 TX_S_62 TX_S_63 TX_S_64 TX_S_65 TX_S_66 TX_S_67 TX_S_68 TX_S_69 TX_S_70 TX_S_71 TX_S_72 TX_S_73 TX_S_74 TX_S_75 TX_S_76 TX_S_77 TX_S_78 TX_S_79 TX_S_80 TX_S_81 TX_S_82 TX_S_83 TX_S_84 TX_S_85 TX_S_86 TX_S_87 TX_S_88 TX_S_89 TX_S_90 TX_S_91 TX_S_92 TX_S_93 TX_S_94 TX_S_95 TX_S_96 TX_S_97 TX_S_98 TX_S_99 TX_S_100 TX_S_101 TX_S_102 TX_S_103 TX_S_104 TX_S_105 TX_S_106 TX_S_107 TX_S_108 TX_S_109 TX_S_110 TX_S_111 TX_S_112 TX_S_113 TX_S_114 TX_S_115 TX_S_116 TX_S_117 TX_S_118 TX_S_119 TX_S_120 TX_S_121 TX_S_122 TX_S_123 TX_S_124 TX_S_125 TX_S_126 TX_S_127 TX_S_128 TX_S_129 TX_S_130 TX_S_131 TX_S_132 TX_S_133 0 0;
-[ PrintResponse
- R ! Implied call parameter
- ;
- if (R == R_281_RESP_A) print (RulePrintingRule) ADJUST_LIGHT_R, " response (A)";
- if (R == R_283_RESP_A) print (RulePrintingRule) GENERATE_ACTION_R, " response (A)";
- if (R == R_283_RESP_B) print (RulePrintingRule) GENERATE_ACTION_R, " response (B)";
- if (R == R_290_RESP_A) print (RulePrintingRule) BASIC_ACCESSIBILITY_R, " response (A)";
- if (R == R_291_RESP_A) print (RulePrintingRule) BASIC_VISIBILITY_R, " response (A)";
- if (R == R_293_RESP_A) print (RulePrintingRule) REQUESTED_ACTIONS_REQUIRE_R, " response (A)";
- if (R == R_294_RESP_A) print (RulePrintingRule) CARRY_OUT_REQUESTED_ACTIONS_R, " response (A)";
- if (R == R_297_RESP_A) print (RulePrintingRule) ACCESS_THROUGH_BARRIERS_R, " response (A)";
- if (R == R_298_RESP_A) print (RulePrintingRule) CANT_REACH_INSIDE_CLOSED_R, " response (A)";
- if (R == R_299_RESP_A) print (RulePrintingRule) CANT_REACH_INSIDE_ROOMS_R, " response (A)";
- if (R == R_300_RESP_A) print (RulePrintingRule) CANT_REACH_OUTSIDE_CLOSED_R, " response (A)";
- if (R == R_301_RESP_A) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (A)";
- if (R == R_301_RESP_B) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (B)";
- if (R == R_301_RESP_C) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (C)";
- if (R == R_301_RESP_D) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (D)";
- if (R == R_301_RESP_E) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (E)";
- if (R == R_301_RESP_F) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (F)";
- if (R == R_301_RESP_G) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (G)";
- if (R == R_301_RESP_H) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (H)";
- if (R == R_301_RESP_I) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (I)";
- if (R == R_301_RESP_J) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (J)";
- if (R == R_301_RESP_K) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (K)";
- if (R == R_301_RESP_L) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (L)";
- if (R == R_301_RESP_M) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (M)";
- if (R == R_301_RESP_N) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (N)";
- if (R == R_301_RESP_O) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (O)";
- if (R == R_301_RESP_P) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (P)";
- if (R == R_301_RESP_Q) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (Q)";
- if (R == R_301_RESP_R) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (R)";
- if (R == R_301_RESP_S) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (S)";
- if (R == R_301_RESP_T) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (T)";
- if (R == R_301_RESP_U) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (U)";
- if (R == R_301_RESP_V) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (V)";
- if (R == R_301_RESP_W) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (W)";
- if (R == R_301_RESP_X) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (X)";
- if (R == R_301_RESP_Y) print (RulePrintingRule) LIST_WRITER_INTERNAL_R, " response (Y)";
- if (R == R_302_RESP_A) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (A)";
- if (R == R_302_RESP_B) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (B)";
- if (R == R_302_RESP_C) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (C)";
- if (R == R_302_RESP_D) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (D)";
- if (R == R_302_RESP_E) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (E)";
- if (R == R_302_RESP_F) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (F)";
- if (R == R_302_RESP_G) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (G)";
- if (R == R_302_RESP_H) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (H)";
- if (R == R_302_RESP_I) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (I)";
- if (R == R_302_RESP_J) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (J)";
- if (R == R_302_RESP_K) print (RulePrintingRule) ACTION_PROCESSING_INTERNAL_R, " response (K)";
- if (R == R_303_RESP_A) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (A)";
- if (R == R_303_RESP_B) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (B)";
- if (R == R_303_RESP_C) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (C)";
- if (R == R_303_RESP_D) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (D)";
- if (R == R_303_RESP_E) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (E)";
- if (R == R_303_RESP_F) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (F)";
- if (R == R_303_RESP_G) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (G)";
- if (R == R_303_RESP_H) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (H)";
- if (R == R_303_RESP_I) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (I)";
- if (R == R_303_RESP_J) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (J)";
- if (R == R_303_RESP_K) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (K)";
- if (R == R_303_RESP_L) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (L)";
- if (R == R_303_RESP_M) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (M)";
- if (R == R_303_RESP_N) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (N)";
- if (R == R_303_RESP_O) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (O)";
- if (R == R_303_RESP_P) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (P)";
- if (R == R_303_RESP_Q) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (Q)";
- if (R == R_303_RESP_R) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (R)";
- if (R == R_303_RESP_S) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (S)";
- if (R == R_303_RESP_T) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (T)";
- if (R == R_303_RESP_U) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (U)";
- if (R == R_303_RESP_V) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (V)";
- if (R == R_303_RESP_W) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (W)";
- if (R == R_303_RESP_X) print (RulePrintingRule) PARSER_ERROR_INTERNAL_R, " response (X)";
- if (R == R_304_RESP_A) print (RulePrintingRule) PARSER_N_ERROR_INTERNAL_R, " response (A)";
- if (R == R_304_RESP_B) print (RulePrintingRule) PARSER_N_ERROR_INTERNAL_R, " response (B)";
- if (R == R_304_RESP_C) print (RulePrintingRule) PARSER_N_ERROR_INTERNAL_R, " response (C)";
- if (R == R_304_RESP_D) print (RulePrintingRule) PARSER_N_ERROR_INTERNAL_R, " response (D)";
- if (R == R_304_RESP_E) print (RulePrintingRule) PARSER_N_ERROR_INTERNAL_R, " response (E)";
- if (R == R_304_RESP_F) print (RulePrintingRule) PARSER_N_ERROR_INTERNAL_R, " response (F)";
- if (R == R_305_RESP_A) print (RulePrintingRule) DARKNESS_NAME_INTERNAL_R, " response (A)";
- if (R == R_306_RESP_A) print (RulePrintingRule) PARSER_COMMAND_INTERNAL_R, " response (A)";
- if (R == R_306_RESP_B) print (RulePrintingRule) PARSER_COMMAND_INTERNAL_R, " response (B)";
- if (R == R_306_RESP_C) print (RulePrintingRule) PARSER_COMMAND_INTERNAL_R, " response (C)";
- if (R == R_306_RESP_D) print (RulePrintingRule) PARSER_COMMAND_INTERNAL_R, " response (D)";
- if (R == R_307_RESP_A) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (A)";
- if (R == R_307_RESP_B) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (B)";
- if (R == R_307_RESP_C) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (C)";
- if (R == R_307_RESP_D) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (D)";
- if (R == R_307_RESP_E) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (E)";
- if (R == R_307_RESP_F) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (F)";
- if (R == R_307_RESP_G) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (G)";
- if (R == R_307_RESP_H) print (RulePrintingRule) PARSER_CLARIF_INTERNAL_R, " response (H)";
- if (R == R_308_RESP_A) print (RulePrintingRule) YES_OR_NO_QUESTION_INTERNAL_R, " response (A)";
- if (R == R_309_RESP_A) print (RulePrintingRule) PRINT_PROTAGONIST_INTERNAL_R, " response (A)";
- if (R == R_309_RESP_B) print (RulePrintingRule) PRINT_PROTAGONIST_INTERNAL_R, " response (B)";
- if (R == R_309_RESP_C) print (RulePrintingRule) PRINT_PROTAGONIST_INTERNAL_R, " response (C)";
- if (R == R_312_RESP_A) print (RulePrintingRule) STANDARD_IMPLICIT_TAKING_R, " response (A)";
- if (R == R_312_RESP_B) print (RulePrintingRule) STANDARD_IMPLICIT_TAKING_R, " response (B)";
- if (R == R_314_RESP_A) print (RulePrintingRule) PRINT_OBITUARY_HEADLINE_R, " response (A)";
- if (R == R_314_RESP_B) print (RulePrintingRule) PRINT_OBITUARY_HEADLINE_R, " response (B)";
- if (R == R_314_RESP_C) print (RulePrintingRule) PRINT_OBITUARY_HEADLINE_R, " response (C)";
- if (R == R_320_RESP_A) print (RulePrintingRule) IMMEDIATELY_UNDO_R, " response (A)";
- if (R == R_320_RESP_B) print (RulePrintingRule) IMMEDIATELY_UNDO_R, " response (B)";
- if (R == R_320_RESP_C) print (RulePrintingRule) IMMEDIATELY_UNDO_R, " response (C)";
- if (R == R_320_RESP_D) print (RulePrintingRule) IMMEDIATELY_UNDO_R, " response (D)";
- if (R == R_320_RESP_E) print (RulePrintingRule) IMMEDIATELY_UNDO_R, " response (E)";
- if (R == R_320_RESP_F) print (RulePrintingRule) IMMEDIATELY_UNDO_R, " response (F)";
- if (R == R_323_RESP_A) print (RulePrintingRule) QUIT_THE_GAME_R, " response (A)";
- if (R == R_324_RESP_A) print (RulePrintingRule) SAVE_THE_GAME_R, " response (A)";
- if (R == R_324_RESP_B) print (RulePrintingRule) SAVE_THE_GAME_R, " response (B)";
- if (R == R_325_RESP_A) print (RulePrintingRule) RESTORE_THE_GAME_R, " response (A)";
- if (R == R_325_RESP_B) print (RulePrintingRule) RESTORE_THE_GAME_R, " response (B)";
- if (R == R_326_RESP_A) print (RulePrintingRule) RESTART_THE_GAME_R, " response (A)";
- if (R == R_326_RESP_B) print (RulePrintingRule) RESTART_THE_GAME_R, " response (B)";
- if (R == R_327_RESP_A) print (RulePrintingRule) VERIFY_THE_STORY_FILE_R, " response (A)";
- if (R == R_327_RESP_B) print (RulePrintingRule) VERIFY_THE_STORY_FILE_R, " response (B)";
- if (R == R_328_RESP_A) print (RulePrintingRule) SWITCH_TRANSCRIPT_ON_R, " response (A)";
- if (R == R_328_RESP_B) print (RulePrintingRule) SWITCH_TRANSCRIPT_ON_R, " response (B)";
- if (R == R_328_RESP_C) print (RulePrintingRule) SWITCH_TRANSCRIPT_ON_R, " response (C)";
- if (R == R_329_RESP_A) print (RulePrintingRule) SWITCH_TRANSCRIPT_OFF_R, " response (A)";
- if (R == R_329_RESP_B) print (RulePrintingRule) SWITCH_TRANSCRIPT_OFF_R, " response (B)";
- if (R == R_329_RESP_C) print (RulePrintingRule) SWITCH_TRANSCRIPT_OFF_R, " response (C)";
- if (R == R_331_RESP_A) print (RulePrintingRule) ANNOUNCE_SCORE_R, " response (A)";
- if (R == R_331_RESP_B) print (RulePrintingRule) ANNOUNCE_SCORE_R, " response (B)";
- if (R == R_331_RESP_C) print (RulePrintingRule) ANNOUNCE_SCORE_R, " response (C)";
- if (R == R_331_RESP_D) print (RulePrintingRule) ANNOUNCE_SCORE_R, " response (D)";
- if (R == R_331_RESP_E) print (RulePrintingRule) ANNOUNCE_SCORE_R, " response (E)";
- if (R == R_333_RESP_A) print (RulePrintingRule) REP_PREFER_ABBREVIATED_R, " response (A)";
- if (R == R_335_RESP_A) print (RulePrintingRule) REP_PREFER_UNABBREVIATED_R, " response (A)";
- if (R == R_337_RESP_A) print (RulePrintingRule) REP_PREFER_SOMETIMES_ABBR_R, " response (A)";
- if (R == R_339_RESP_A) print (RulePrintingRule) REP_SWITCH_NOTIFY_ON_R, " response (A)";
- if (R == R_341_RESP_A) print (RulePrintingRule) REP_SWITCH_NOTIFY_OFF_R, " response (A)";
- if (R == R_342_RESP_A) print (RulePrintingRule) ANNOUNCE_PRONOUN_MEANINGS_R, " response (A)";
- if (R == R_342_RESP_B) print (RulePrintingRule) ANNOUNCE_PRONOUN_MEANINGS_R, " response (B)";
- if (R == R_342_RESP_C) print (RulePrintingRule) ANNOUNCE_PRONOUN_MEANINGS_R, " response (C)";
- if (R == R_342_RESP_D) print (RulePrintingRule) ANNOUNCE_PRONOUN_MEANINGS_R, " response (D)";
- if (R == R_11_RESP_A) print (RulePrintingRule) R_22, " response (A)";
- if (R == R_39_RESP_A) print (RulePrintingRule) R_77, " response (A)";
- if (R == R_41_RESP_A) print (RulePrintingRule) R_79, " response (A)";
- if (R == R_41_RESP_B) print (RulePrintingRule) R_79, " response (B)";
- if (R == R_40_RESP_A) print (RulePrintingRule) R_78, " response (A)";
- if (R == R_42_RESP_A) print (RulePrintingRule) R_80, " response (A)";
- if (R == R_46_RESP_A) print (RulePrintingRule) R_86, " response (A)";
- if (R == R_46_RESP_B) print (RulePrintingRule) R_86, " response (B)";
- if (R == R_46_RESP_C) print (RulePrintingRule) R_86, " response (C)";
- if (R == R_46_RESP_D) print (RulePrintingRule) R_86, " response (D)";
- if (R == R_46_RESP_E) print (RulePrintingRule) R_86, " response (E)";
- if (R == R_46_RESP_F) print (RulePrintingRule) R_86, " response (F)";
- if (R == R_53_RESP_A) print (RulePrintingRule) R_93, " response (A)";
- if (R == R_55_RESP_A) print (RulePrintingRule) R_96, " response (A)";
- if (R == R_56_RESP_A) print (RulePrintingRule) R_97, " response (A)";
- if (R == R_57_RESP_A) print (RulePrintingRule) R_98, " response (A)";
- if (R == R_58_RESP_A) print (RulePrintingRule) R_99, " response (A)";
- if (R == R_59_RESP_A) print (RulePrintingRule) R_100, " response (A)";
- if (R == R_60_RESP_A) print (RulePrintingRule) R_101, " response (A)";
- if (R == R_61_RESP_A) print (RulePrintingRule) R_102, " response (A)";
- if (R == R_62_RESP_A) print (RulePrintingRule) R_103, " response (A)";
- if (R == R_63_RESP_A) print (RulePrintingRule) R_104, " response (A)";
- if (R == R_64_RESP_A) print (RulePrintingRule) R_105, " response (A)";
- if (R == R_65_RESP_A) print (RulePrintingRule) R_106, " response (A)";
- if (R == R_66_RESP_A) print (RulePrintingRule) R_107, " response (A)";
- if (R == R_67_RESP_A) print (RulePrintingRule) R_108, " response (A)";
- if (R == R_68_RESP_A) print (RulePrintingRule) R_109, " response (A)";
- if (R == R_69_RESP_A) print (RulePrintingRule) R_110, " response (A)";
- if (R == R_70_RESP_A) print (RulePrintingRule) R_111, " response (A)";
- if (R == R_71_RESP_A) print (RulePrintingRule) R_112, " response (A)";
- if (R == R_73_RESP_A) print (RulePrintingRule) R_114, " response (A)";
- if (R == R_73_RESP_B) print (RulePrintingRule) R_114, " response (B)";
- if (R == R_74_RESP_A) print (RulePrintingRule) R_115, " response (A)";
- if (R == R_75_RESP_A) print (RulePrintingRule) R_116, " response (A)";
- if (R == R_78_RESP_A) print (RulePrintingRule) R_119, " response (A)";
- if (R == R_77_RESP_A) print (RulePrintingRule) R_118, " response (A)";
- if (R == R_79_RESP_A) print (RulePrintingRule) R_120, " response (A)";
- if (R == R_80_RESP_A) print (RulePrintingRule) R_121, " response (A)";
- if (R == R_81_RESP_A) print (RulePrintingRule) R_122, " response (A)";
- if (R == R_82_RESP_A) print (RulePrintingRule) R_123, " response (A)";
- if (R == R_82_RESP_B) print (RulePrintingRule) R_123, " response (B)";
- if (R == R_84_RESP_A) print (RulePrintingRule) R_125, " response (A)";
- if (R == R_84_RESP_B) print (RulePrintingRule) R_125, " response (B)";
- if (R == R_87_RESP_A) print (RulePrintingRule) R_128, " response (A)";
- if (R == R_88_RESP_A) print (RulePrintingRule) R_129, " response (A)";
- if (R == R_89_RESP_A) print (RulePrintingRule) R_130, " response (A)";
- if (R == R_90_RESP_A) print (RulePrintingRule) R_131, " response (A)";
- if (R == R_92_RESP_A) print (RulePrintingRule) R_133, " response (A)";
- if (R == R_93_RESP_A) print (RulePrintingRule) R_134, " response (A)";
- if (R == R_96_RESP_A) print (RulePrintingRule) R_137, " response (A)";
- if (R == R_97_RESP_A) print (RulePrintingRule) R_138, " response (A)";
- if (R == R_98_RESP_A) print (RulePrintingRule) R_139, " response (A)";
- if (R == R_99_RESP_A) print (RulePrintingRule) R_140, " response (A)";
- if (R == R_100_RESP_A) print (RulePrintingRule) R_141, " response (A)";
- if (R == R_102_RESP_A) print (RulePrintingRule) R_143, " response (A)";
- if (R == R_103_RESP_A) print (RulePrintingRule) R_144, " response (A)";
- if (R == R_104_RESP_A) print (RulePrintingRule) R_145, " response (A)";
- if (R == R_105_RESP_A) print (RulePrintingRule) R_146, " response (A)";
- if (R == R_106_RESP_A) print (RulePrintingRule) R_147, " response (A)";
- if (R == R_109_RESP_A) print (RulePrintingRule) R_150, " response (A)";
- if (R == R_109_RESP_B) print (RulePrintingRule) R_150, " response (B)";
- if (R == R_111_RESP_A) print (RulePrintingRule) R_152, " response (A)";
- if (R == R_112_RESP_A) print (RulePrintingRule) R_153, " response (A)";
- if (R == R_112_RESP_B) print (RulePrintingRule) R_153, " response (B)";
- if (R == R_113_RESP_A) print (RulePrintingRule) R_154, " response (A)";
- if (R == R_114_RESP_A) print (RulePrintingRule) R_155, " response (A)";
- if (R == R_116_RESP_A) print (RulePrintingRule) R_157, " response (A)";
- if (R == R_116_RESP_B) print (RulePrintingRule) R_157, " response (B)";
- if (R == R_120_RESP_A) print (RulePrintingRule) R_161, " response (A)";
- if (R == R_120_RESP_B) print (RulePrintingRule) R_161, " response (B)";
- if (R == R_120_RESP_C) print (RulePrintingRule) R_161, " response (C)";
- if (R == R_120_RESP_D) print (RulePrintingRule) R_161, " response (D)";
- if (R == R_120_RESP_E) print (RulePrintingRule) R_161, " response (E)";
- if (R == R_120_RESP_F) print (RulePrintingRule) R_161, " response (F)";
- if (R == R_120_RESP_G) print (RulePrintingRule) R_161, " response (G)";
- if (R == R_120_RESP_H) print (RulePrintingRule) R_161, " response (H)";
- if (R == R_120_RESP_I) print (RulePrintingRule) R_161, " response (I)";
- if (R == R_120_RESP_J) print (RulePrintingRule) R_161, " response (J)";
- if (R == R_120_RESP_K) print (RulePrintingRule) R_161, " response (K)";
- if (R == R_120_RESP_L) print (RulePrintingRule) R_161, " response (L)";
- if (R == R_120_RESP_M) print (RulePrintingRule) R_161, " response (M)";
- if (R == R_120_RESP_N) print (RulePrintingRule) R_161, " response (N)";
- if (R == R_120_RESP_O) print (RulePrintingRule) R_161, " response (O)";
- if (R == R_120_RESP_P) print (RulePrintingRule) R_161, " response (P)";
- if (R == R_120_RESP_Q) print (RulePrintingRule) R_161, " response (Q)";
- if (R == R_120_RESP_R) print (RulePrintingRule) R_161, " response (R)";
- if (R == R_120_RESP_S) print (RulePrintingRule) R_161, " response (S)";
- if (R == R_124_RESP_A) print (RulePrintingRule) R_165, " response (A)";
- if (R == R_124_RESP_B) print (RulePrintingRule) R_165, " response (B)";
- if (R == R_125_RESP_A) print (RulePrintingRule) R_166, " response (A)";
- if (R == R_125_RESP_B) print (RulePrintingRule) R_166, " response (B)";
- if (R == R_125_RESP_C) print (RulePrintingRule) R_166, " response (C)";
- if (R == R_125_RESP_D) print (RulePrintingRule) R_166, " response (D)";
- if (R == R_126_RESP_A) print (RulePrintingRule) R_167, " response (A)";
- if (R == R_127_RESP_A) print (RulePrintingRule) R_168, " response (A)";
- if (R == R_127_RESP_B) print (RulePrintingRule) R_168, " response (B)";
- if (R == R_128_RESP_A) print (RulePrintingRule) R_169, " response (A)";
- if (R == R_129_RESP_A) print (RulePrintingRule) R_170, " response (A)";
- if (R == R_129_RESP_B) print (RulePrintingRule) R_170, " response (B)";
- if (R == R_129_RESP_C) print (RulePrintingRule) R_170, " response (C)";
- if (R == R_129_RESP_D) print (RulePrintingRule) R_170, " response (D)";
- if (R == R_129_RESP_E) print (RulePrintingRule) R_170, " response (E)";
- if (R == R_131_RESP_A) print (RulePrintingRule) R_172, " response (A)";
- if (R == R_131_RESP_B) print (RulePrintingRule) R_172, " response (B)";
- if (R == R_131_RESP_C) print (RulePrintingRule) R_172, " response (C)";
- if (R == R_131_RESP_D) print (RulePrintingRule) R_172, " response (D)";
- if (R == R_134_RESP_A) print (RulePrintingRule) R_176, " response (A)";
- if (R == R_135_RESP_A) print (RulePrintingRule) R_177, " response (A)";
- if (R == R_138_RESP_A) print (RulePrintingRule) R_180, " response (A)";
- if (R == R_138_RESP_B) print (RulePrintingRule) R_180, " response (B)";
- if (R == R_138_RESP_C) print (RulePrintingRule) R_180, " response (C)";
- if (R == R_140_RESP_A) print (RulePrintingRule) R_182, " response (A)";
- if (R == R_142_RESP_A) print (RulePrintingRule) R_184, " response (A)";
- if (R == R_146_RESP_A) print (RulePrintingRule) R_188, " response (A)";
- if (R == R_146_RESP_B) print (RulePrintingRule) R_188, " response (B)";
- if (R == R_146_RESP_C) print (RulePrintingRule) R_188, " response (C)";
- if (R == R_147_RESP_A) print (RulePrintingRule) R_189, " response (A)";
- if (R == R_150_RESP_A) print (RulePrintingRule) R_192, " response (A)";
- if (R == R_152_RESP_A) print (RulePrintingRule) R_194, " response (A)";
- if (R == R_153_RESP_A) print (RulePrintingRule) R_195, " response (A)";
- if (R == R_153_RESP_B) print (RulePrintingRule) R_195, " response (B)";
- if (R == R_154_RESP_A) print (RulePrintingRule) R_196, " response (A)";
- if (R == R_155_RESP_A) print (RulePrintingRule) R_197, " response (A)";
- if (R == R_156_RESP_A) print (RulePrintingRule) R_198, " response (A)";
- if (R == R_157_RESP_A) print (RulePrintingRule) R_199, " response (A)";
- if (R == R_158_RESP_A) print (RulePrintingRule) R_200, " response (A)";
- if (R == R_159_RESP_A) print (RulePrintingRule) R_201, " response (A)";
- if (R == R_160_RESP_A) print (RulePrintingRule) R_202, " response (A)";
- if (R == R_161_RESP_A) print (RulePrintingRule) R_203, " response (A)";
- if (R == R_162_RESP_A) print (RulePrintingRule) R_204, " response (A)";
- if (R == R_162_RESP_B) print (RulePrintingRule) R_204, " response (B)";
- if (R == R_163_RESP_A) print (RulePrintingRule) R_205, " response (A)";
- if (R == R_163_RESP_B) print (RulePrintingRule) R_205, " response (B)";
- if (R == R_164_RESP_A) print (RulePrintingRule) R_206, " response (A)";
- if (R == R_165_RESP_A) print (RulePrintingRule) R_207, " response (A)";
- if (R == R_165_RESP_B) print (RulePrintingRule) R_207, " response (B)";
- if (R == R_166_RESP_A) print (RulePrintingRule) R_208, " response (A)";
- if (R == R_167_RESP_A) print (RulePrintingRule) R_209, " response (A)";
- if (R == R_168_RESP_A) print (RulePrintingRule) R_210, " response (A)";
- if (R == R_169_RESP_A) print (RulePrintingRule) R_211, " response (A)";
- if (R == R_171_RESP_A) print (RulePrintingRule) R_213, " response (A)";
- if (R == R_171_RESP_B) print (RulePrintingRule) R_213, " response (B)";
- if (R == R_172_RESP_A) print (RulePrintingRule) R_214, " response (A)";
- if (R == R_173_RESP_A) print (RulePrintingRule) R_215, " response (A)";
- if (R == R_174_RESP_A) print (RulePrintingRule) R_216, " response (A)";
- if (R == R_176_RESP_A) print (RulePrintingRule) R_218, " response (A)";
- if (R == R_176_RESP_B) print (RulePrintingRule) R_218, " response (B)";
- if (R == R_177_RESP_A) print (RulePrintingRule) R_219, " response (A)";
- if (R == R_178_RESP_A) print (RulePrintingRule) R_220, " response (A)";
- if (R == R_180_RESP_A) print (RulePrintingRule) R_222, " response (A)";
- if (R == R_181_RESP_A) print (RulePrintingRule) R_223, " response (A)";
- if (R == R_182_RESP_A) print (RulePrintingRule) R_224, " response (A)";
- if (R == R_184_RESP_A) print (RulePrintingRule) R_226, " response (A)";
- if (R == R_185_RESP_A) print (RulePrintingRule) R_227, " response (A)";
- if (R == R_186_RESP_A) print (RulePrintingRule) R_228, " response (A)";
- if (R == R_187_RESP_A) print (RulePrintingRule) R_229, " response (A)";
- if (R == R_189_RESP_A) print (RulePrintingRule) R_231, " response (A)";
- if (R == R_190_RESP_A) print (RulePrintingRule) R_232, " response (A)";
- if (R == R_190_RESP_B) print (RulePrintingRule) R_232, " response (B)";
- if (R == R_190_RESP_C) print (RulePrintingRule) R_232, " response (C)";
- if (R == R_191_RESP_A) print (RulePrintingRule) R_233, " response (A)";
- if (R == R_192_RESP_A) print (RulePrintingRule) R_234, " response (A)";
- if (R == R_194_RESP_A) print (RulePrintingRule) R_236, " response (A)";
- if (R == R_194_RESP_B) print (RulePrintingRule) R_236, " response (B)";
- if (R == R_194_RESP_C) print (RulePrintingRule) R_236, " response (C)";
- if (R == R_195_RESP_A) print (RulePrintingRule) R_237, " response (A)";
- if (R == R_196_RESP_A) print (RulePrintingRule) R_238, " response (A)";
- if (R == R_197_RESP_A) print (RulePrintingRule) R_239, " response (A)";
- if (R == R_199_RESP_A) print (RulePrintingRule) R_241, " response (A)";
- if (R == R_199_RESP_B) print (RulePrintingRule) R_241, " response (B)";
- if (R == R_200_RESP_A) print (RulePrintingRule) R_243, " response (A)";
- if (R == R_201_RESP_A) print (RulePrintingRule) R_244, " response (A)";
- if (R == R_203_RESP_A) print (RulePrintingRule) R_246, " response (A)";
- if (R == R_203_RESP_B) print (RulePrintingRule) R_246, " response (B)";
- if (R == R_204_RESP_A) print (RulePrintingRule) R_247, " response (A)";
- if (R == R_205_RESP_A) print (RulePrintingRule) R_248, " response (A)";
- if (R == R_206_RESP_A) print (RulePrintingRule) R_249, " response (A)";
- if (R == R_207_RESP_A) print (RulePrintingRule) R_250, " response (A)";
- if (R == R_208_RESP_A) print (RulePrintingRule) R_251, " response (A)";
- if (R == R_209_RESP_A) print (RulePrintingRule) R_252, " response (A)";
- if (R == R_211_RESP_A) print (RulePrintingRule) R_254, " response (A)";
- if (R == R_211_RESP_B) print (RulePrintingRule) R_254, " response (B)";
- if (R == R_211_RESP_C) print (RulePrintingRule) R_254, " response (C)";
- if (R == R_212_RESP_A) print (RulePrintingRule) R_255, " response (A)";
- if (R == R_214_RESP_A) print (RulePrintingRule) R_257, " response (A)";
- if (R == R_215_RESP_A) print (RulePrintingRule) R_258, " response (A)";
- if (R == R_216_RESP_A) print (RulePrintingRule) R_259, " response (A)";
- if (R == R_217_RESP_A) print (RulePrintingRule) R_260, " response (A)";
- if (R == R_218_RESP_A) print (RulePrintingRule) R_261, " response (A)";
- if (R == R_219_RESP_A) print (RulePrintingRule) R_262, " response (A)";
- if (R == R_220_RESP_A) print (RulePrintingRule) R_263, " response (A)";
- if (R == R_221_RESP_A) print (RulePrintingRule) R_264, " response (A)";
- if (R == R_222_RESP_A) print (RulePrintingRule) R_265, " response (A)";
- if (R == R_223_RESP_A) print (RulePrintingRule) R_266, " response (A)";
- if (R == R_224_RESP_A) print (RulePrintingRule) R_267, " response (A)";
- if (R == R_225_RESP_A) print (RulePrintingRule) R_268, " response (A)";
- if (R == R_228_RESP_A) print (RulePrintingRule) R_271, " response (A)";
- if (R == R_228_RESP_B) print (RulePrintingRule) R_271, " response (B)";
- if (R == R_229_RESP_A) print (RulePrintingRule) R_272, " response (A)";
- if (R == R_229_RESP_B) print (RulePrintingRule) R_272, " response (B)";
- if (R == R_230_RESP_A) print (RulePrintingRule) R_273, " response (A)";
- if (R == R_230_RESP_B) print (RulePrintingRule) R_273, " response (B)";
- if (R == R_230_RESP_C) print (RulePrintingRule) R_273, " response (C)";
- if (R == R_231_RESP_A) print (RulePrintingRule) R_274, " response (A)";
- if (R == R_231_RESP_B) print (RulePrintingRule) R_274, " response (B)";
- if (R == R_232_RESP_A) print (RulePrintingRule) R_275, " response (A)";
- if (R == R_233_RESP_A) print (RulePrintingRule) R_276, " response (A)";
- if (R == R_233_RESP_B) print (RulePrintingRule) R_276, " response (B)";
- if (R == R_234_RESP_A) print (RulePrintingRule) R_277, " response (A)";
- if (R == R_235_RESP_A) print (RulePrintingRule) R_278, " response (A)";
- if (R == R_236_RESP_A) print (RulePrintingRule) R_279, " response (A)";
- if (R == R_237_RESP_A) print (RulePrintingRule) R_280, " response (A)";
- if (R == R_237_RESP_B) print (RulePrintingRule) R_280, " response (B)";
- if (R == R_238_RESP_A) print (RulePrintingRule) R_281, " response (A)";
- if (R == R_239_RESP_A) print (RulePrintingRule) R_282, " response (A)";
- if (R == R_240_RESP_A) print (RulePrintingRule) R_283, " response (A)";
- if (R == R_241_RESP_A) print (RulePrintingRule) R_284, " response (A)";
- if (R == R_241_RESP_B) print (RulePrintingRule) R_284, " response (B)";
- if (R == R_242_RESP_A) print (RulePrintingRule) R_285, " response (A)";
- if (R == R_243_RESP_A) print (RulePrintingRule) R_286, " response (A)";
- if (R == R_244_RESP_A) print (RulePrintingRule) R_287, " response (A)";
- if (R == R_245_RESP_A) print (RulePrintingRule) R_288, " response (A)";
- if (R == R_245_RESP_B) print (RulePrintingRule) R_288, " response (B)";
- if (R == R_246_RESP_A) print (RulePrintingRule) R_289, " response (A)";
- if (R == R_247_RESP_A) print (RulePrintingRule) R_290, " response (A)";
- if (R == R_248_RESP_A) print (RulePrintingRule) R_291, " response (A)";
- if (R == R_249_RESP_A) print (RulePrintingRule) R_292, " response (A)";
- if (R == R_251_RESP_A) print (RulePrintingRule) R_294, " response (A)";
- if (R == R_252_RESP_A) print (RulePrintingRule) R_295, " response (A)";
- if (R == R_253_RESP_A) print (RulePrintingRule) R_296, " response (A)";
- if (R == R_253_RESP_B) print (RulePrintingRule) R_296, " response (B)";
- if (R == R_254_RESP_A) print (RulePrintingRule) R_297, " response (A)";
- if (R == R_255_RESP_A) print (RulePrintingRule) R_298, " response (A)";
- if (R == R_256_RESP_A) print (RulePrintingRule) R_299, " response (A)";
- if (R == R_257_RESP_A) print (RulePrintingRule) R_300, " response (A)";
- if (R == R_258_RESP_A) print (RulePrintingRule) R_301, " response (A)";
- if (R == R_259_RESP_A) print (RulePrintingRule) R_302, " response (A)";
- if (R == R_259_RESP_B) print (RulePrintingRule) R_302, " response (B)";
- if (R == R_260_RESP_A) print (RulePrintingRule) R_303, " response (A)";
- if (R == R_260_RESP_B) print (RulePrintingRule) R_303, " response (B)";
- if (R == R_261_RESP_A) print (RulePrintingRule) R_304, " response (A)";
- if (R == R_261_RESP_B) print (RulePrintingRule) R_304, " response (B)";
- if (R == R_262_RESP_A) print (RulePrintingRule) R_305, " response (A)";
- if (R == R_263_RESP_A) print (RulePrintingRule) R_306, " response (A)";
- if (R == R_263_RESP_B) print (RulePrintingRule) R_306, " response (B)";
- if (R == R_264_RESP_A) print (RulePrintingRule) R_307, " response (A)";
- if (R == R_265_RESP_A) print (RulePrintingRule) R_308, " response (A)";
- if (R == R_266_RESP_A) print (RulePrintingRule) R_309, " response (A)";
- if (R == R_267_RESP_A) print (RulePrintingRule) R_310, " response (A)";
- if (R == R_268_RESP_A) print (RulePrintingRule) R_311, " response (A)";
- if (R == R_269_RESP_A) print (RulePrintingRule) R_312, " response (A)";
- if (R == R_269_RESP_B) print (RulePrintingRule) R_312, " response (B)";
- if (R == R_270_RESP_A) print (RulePrintingRule) R_313, " response (A)";
- if (R == R_271_RESP_A) print (RulePrintingRule) R_314, " response (A)";
- if (R == R_271_RESP_B) print (RulePrintingRule) R_314, " response (B)";
- if (R == R_272_RESP_A) print (RulePrintingRule) R_315, " response (A)";
- if (R == R_273_RESP_A) print (RulePrintingRule) R_316, " response (A)";
- if (R == R_274_RESP_A) print (RulePrintingRule) R_317, " response (A)";
-];
-[ STANDARD_RESPONSE_ISSUING_R ;
- RegardingSingleObject(); TEXT_TY_Say(ResponseTexts-->(parameter_value-1));
-];
-Array ResponseDivisions -->
- "Standard Rules" 1 391
- 0 0 0;
-[ R_TX_S_0 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[It] [are] [if story tense is present tense]now [end if]pitch dark in
- [if story tense is present tense]here[else]there[end if]!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[It] [are] [if story tense is present tense]now [end if]pitch dark in [if story tense is present tense]here[else]there[end if]!~]
- say__p=1;! [2: it]
- ParaContent(); (PHR_789_r36 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say466;! [7: ~now ~]
- ParaContent(); print "now ";! [8: end if]
-
- .L_Say466; .L_SayX464;! [9: ~pitch dark in ~]
- ParaContent(); print "pitch dark in ";! [10: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say467;! [11: ~here~]
- ParaContent(); print "here";! [12: else]
-
- jump L_SayX465; .L_Say467;! [13: ~there~]
- ParaContent(); print "there";! [14: end if]
-
- .L_Say468; .L_SayX465;! [15: ~!~]
- ParaContent(); print "!"; .L_Say469; .L_SayX466;rtrue;
-];
-Array TX_S_0 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_0;
-[ R_TX_S_1 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(considering the first sixteen objects only)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(considering the first sixteen objects only)[command clarification break]~]
- say__p=1;! [2: ~(considering the first sixteen objects only)~]
- ParaContent(); print "(considering the first sixteen objects only)";! [3: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say470; .L_SayX467;rtrue;
-];
-Array TX_S_1 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_1;
-[ R_TX_S_2 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Nothing to do!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Nothing to do!~]
- say__p=1;! [2: ~Nothing to do!~]
- ParaContent(); print "Nothing to do!"; .L_Say471; .L_SayX468;rtrue;
-];
-Array TX_S_2 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_2;
-[ R_TX_S_3 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You must name something more substantial.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You must name something more substantial.~]
- say__p=1;! [2: ~You must name something more substantial.~]
- ParaContent(); print "You must name something more substantial."; .L_Say472; .L_SayX469;rtrue;
-];
-Array TX_S_3 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_3;
-[ R_TX_S_4 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[It] [are] pitch dark, and [we] [can't see] a thing.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[It] [are] pitch dark, and [we] [can't see] a thing.~]
- say__p=1;! [2: it]
- ParaContent(); (PHR_789_r36 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ pitch dark, and ~]
- ParaContent(); print " pitch dark, and ";! [6: we]
- ParaContent(); (PHR_763_r10 ());! [7: ~ ~]
- ParaContent(); print " ";! [8: can't see]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_16); say__p=1; ! [9: ~ a thing.~]
- ParaContent(); print " a thing."; .L_Say473; .L_SayX470;rtrue;
-];
-Array TX_S_4 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_4;
-[ R_TX_S_5 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [have] better things to do.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [have] better things to do.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: have]
- ConjugateVerb_2(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ better things to do.~]
- ParaContent(); print " better things to do."; .L_Say474; .L_SayX471;rtrue;
-];
-Array TX_S_5 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_5;
-[ R_TX_S_6 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [are] unable to do that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [are] unable to do that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ unable to do that.~]
- ParaContent(); print " unable to do that."; .L_Say475; .L_SayX472;rtrue;
-];
-Array TX_S_6 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_6;
-[ R_TX_S_7 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [aren't] available.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [aren't] available.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ available.~]
- ParaContent(); print " available."; .L_Say476; .L_SayX473;rtrue;
-];
-Array TX_S_7 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_7;
-[ R_TX_S_8 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [aren't] open.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [aren't] open.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ open.~]
- ParaContent(); print " open."; .L_Say477; .L_SayX474;rtrue;
-];
-Array TX_S_8 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_8;
-[ R_TX_S_9 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't] reach into [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't] reach into [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ reach into ~]
- ParaContent(); print " reach into ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say478; .L_SayX475;rtrue;
-];
-Array TX_S_9 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_9;
-[ R_TX_S_10 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [aren't] open.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [aren't] open.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ open.~]
- ParaContent(); print " open."; .L_Say479; .L_SayX476;rtrue;
-];
-Array TX_S_10 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_10;
-[ R_TX_S_11 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ (~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ (~]
- say__p=1;! [2: ~ (~]
- ParaContent(); print " ("; .L_Say480; .L_SayX477;rtrue;
-];
-Array TX_S_11 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_11;
-[ R_TX_S_12 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~)~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~)~]
- say__p=1;! [2: ~)~]
- ParaContent(); print ")"; .L_Say481; .L_SayX478;rtrue;
-];
-Array TX_S_12 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_12;
-[ R_TX_S_13 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ and ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ and ~]
- say__p=1;! [2: ~ and ~]
- ParaContent(); print " and "; .L_Say482; .L_SayX479;rtrue;
-];
-Array TX_S_13 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_13;
-[ R_TX_S_14 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~providing light~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~providing light~]
- say__p=1;! [2: ~providing light~]
- ParaContent(); print "providing light"; .L_Say483; .L_SayX480;rtrue;
-];
-Array TX_S_14 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_14;
-[ R_TX_S_15 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~closed~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~closed~]
- say__p=1;! [2: ~closed~]
- ParaContent(); print "closed"; .L_Say484; .L_SayX481;rtrue;
-];
-Array TX_S_15 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_15;
-[ R_TX_S_16 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~empty~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~empty~]
- say__p=1;! [2: ~empty~]
- ParaContent(); print "empty"; .L_Say485; .L_SayX482;rtrue;
-];
-Array TX_S_16 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_16;
-[ R_TX_S_17 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~closed and empty~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~closed and empty~]
- say__p=1;! [2: ~closed and empty~]
- ParaContent(); print "closed and empty"; .L_Say486; .L_SayX483;rtrue;
-];
-Array TX_S_17 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_17;
-[ R_TX_S_18 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~closed and providing light~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~closed and providing light~]
- say__p=1;! [2: ~closed and providing light~]
- ParaContent(); print "closed and providing light"; .L_Say487; .L_SayX484;rtrue;
-];
-Array TX_S_18 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_18;
-[ R_TX_S_19 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~empty and providing light~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~empty and providing light~]
- say__p=1;! [2: ~empty and providing light~]
- ParaContent(); print "empty and providing light"; .L_Say488; .L_SayX485;rtrue;
-];
-Array TX_S_19 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_19;
-[ R_TX_S_20 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~closed, empty[if serial comma option is active],[end if] and providing light~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~closed, empty[if serial comma option is active],[end if] and providing light~]
- say__p=1;! [2: ~closed, empty~]
- ParaContent(); print "closed, empty";! [3: if serial comma option is active]
-
- if (~~(((((Adj_25_t1_v16(6))))))) jump L_Say489;! [4: ~,~]
- ParaContent(); print ",";! [5: end if]
-
- .L_Say489; .L_SayX486;! [6: ~ and providing light~]
- ParaContent(); print " and providing light"; .L_Say490; .L_SayX487;rtrue;
-];
-Array TX_S_20 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_20;
-[ R_TX_S_21 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~providing light and being worn~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~providing light and being worn~]
- say__p=1;! [2: ~providing light and being worn~]
- ParaContent(); print "providing light and being worn"; .L_Say491; .L_SayX488;rtrue;
-];
-Array TX_S_21 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_21;
-[ R_TX_S_22 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~being worn~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~being worn~]
- say__p=1;! [2: ~being worn~]
- ParaContent(); print "being worn"; .L_Say492; .L_SayX489;rtrue;
-];
-Array TX_S_22 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_22;
-[ R_TX_S_23 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~open~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~open~]
- say__p=1;! [2: ~open~]
- ParaContent(); print "open"; .L_Say493; .L_SayX490;rtrue;
-];
-Array TX_S_23 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_23;
-[ R_TX_S_24 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~open but empty~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~open but empty~]
- say__p=1;! [2: ~open but empty~]
- ParaContent(); print "open but empty"; .L_Say494; .L_SayX491;rtrue;
-];
-Array TX_S_24 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_24;
-[ R_TX_S_25 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~closed~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~closed~]
- say__p=1;! [2: ~closed~]
- ParaContent(); print "closed"; .L_Say495; .L_SayX492;rtrue;
-];
-Array TX_S_25 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_25;
-[ R_TX_S_26 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~closed and locked~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~closed and locked~]
- say__p=1;! [2: ~closed and locked~]
- ParaContent(); print "closed and locked"; .L_Say496; .L_SayX493;rtrue;
-];
-Array TX_S_26 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_26;
-[ R_TX_S_27 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~containing~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~containing~]
- say__p=1;! [2: ~containing~]
- ParaContent(); print "containing"; .L_Say497; .L_SayX494;rtrue;
-];
-Array TX_S_27 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_27;
-[ R_TX_S_28 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~on [if the noun is a person]whom[otherwise]which[end if] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~on [if the noun is a person]whom[otherwise]which[end if] ~]
- say__p=1;! [2: ~on ~]
- ParaContent(); print "on ";! [3: if the noun is a person]
-
- if (~~((((noun ofclass K8_person))))) jump L_Say498;! [4: ~whom~]
- ParaContent(); print "whom";! [5: otherwise]
-
- jump L_SayX495; .L_Say498;! [6: ~which~]
- ParaContent(); print "which";! [7: end if]
-
- .L_Say499; .L_SayX495;! [8: ~ ~]
- ParaContent(); print " "; .L_Say500; .L_SayX496;rtrue;
-];
-Array TX_S_28 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_28;
-[ R_TX_S_29 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, on top of [if the noun is a person]whom[otherwise]which[end if] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, on top of [if the noun is a person]whom[otherwise]which[end if] ~]
- say__p=1;! [2: ~, on top of ~]
- ParaContent(); print ", on top of ";! [3: if the noun is a person]
-
- if (~~((((noun ofclass K8_person))))) jump L_Say501;! [4: ~whom~]
- ParaContent(); print "whom";! [5: otherwise]
-
- jump L_SayX497; .L_Say501;! [6: ~which~]
- ParaContent(); print "which";! [7: end if]
-
- .L_Say502; .L_SayX497;! [8: ~ ~]
- ParaContent(); print " "; .L_Say503; .L_SayX498;rtrue;
-];
-Array TX_S_29 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_29;
-[ R_TX_S_30 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~in [if the noun is a person]whom[otherwise]which[end if] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~in [if the noun is a person]whom[otherwise]which[end if] ~]
- say__p=1;! [2: ~in ~]
- ParaContent(); print "in ";! [3: if the noun is a person]
-
- if (~~((((noun ofclass K8_person))))) jump L_Say504;! [4: ~whom~]
- ParaContent(); print "whom";! [5: otherwise]
-
- jump L_SayX499; .L_Say504;! [6: ~which~]
- ParaContent(); print "which";! [7: end if]
-
- .L_Say505; .L_SayX499;! [8: ~ ~]
- ParaContent(); print " "; .L_Say506; .L_SayX500;rtrue;
-];
-Array TX_S_30 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_30;
-[ R_TX_S_31 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, inside [if the noun is a person]whom[otherwise]which[end if] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, inside [if the noun is a person]whom[otherwise]which[end if] ~]
- say__p=1;! [2: ~, inside ~]
- ParaContent(); print ", inside ";! [3: if the noun is a person]
-
- if (~~((((noun ofclass K8_person))))) jump L_Say507;! [4: ~whom~]
- ParaContent(); print "whom";! [5: otherwise]
-
- jump L_SayX501; .L_Say507;! [6: ~which~]
- ParaContent(); print "which";! [7: end if]
-
- .L_Say508; .L_SayX501;! [8: ~ ~]
- ParaContent(); print " "; .L_Say509; .L_SayX502;rtrue;
-];
-Array TX_S_31 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_31;
-[ R_TX_S_32 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding list writer internals][are]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding list writer internals][are]~]
- say__p=1;! [2: regarding list writer internals]
- ParaContent(); RegardingLWI();! [3: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say510; .L_SayX503;rtrue;
-];
-Array TX_S_32 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_32;
-[ R_TX_S_33 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding list writer internals][are] nothing~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding list writer internals][are] nothing~]
- say__p=1;! [2: regarding list writer internals]
- ParaContent(); RegardingLWI();! [3: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ nothing~]
- ParaContent(); print " nothing"; .L_Say511; .L_SayX504;rtrue;
-];
-Array TX_S_33 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_33;
-[ R_TX_S_34 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Nothing~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Nothing~]
- say__p=1;! [2: ~Nothing~]
- ParaContent(); print "Nothing"; .L_Say512; .L_SayX505;rtrue;
-];
-Array TX_S_34 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_34;
-[ R_TX_S_35 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~nothing~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~nothing~]
- say__p=1;! [2: ~nothing~]
- ParaContent(); print "nothing"; .L_Say513; .L_SayX506;rtrue;
-];
-Array TX_S_35 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_35;
-[ R_TX_S_36 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[bracket]That command asks to do something outside of play, so it can
- only make sense from you to me. [The noun] cannot be asked to do this.[close
- bracket]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[bracket]That command asks to do something outside of play, so it can only make sense from you to me. [The noun] cannot be asked to do this.[close bracket]~]
- say__p=1;! [2: bracket]
- ParaContent(); print "[";! [3: ~That command asks to do something outside of play, so it can only make sense from you to me. ~]
- ParaContent(); print "That command asks to do something outside of play, so it can only make sense from you to me. ";! [4: the noun]
- ParaContent(); print (The) noun;! [5: ~ cannot be asked to do this.~]
- ParaContent(); print " cannot be asked to do this.";! [6: close bracket]
- ParaContent(); print "]"; .L_Say514; .L_SayX507;rtrue;
-];
-Array TX_S_36 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_36;
-[ R_TX_S_37 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You must name an object.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You must name an object.~]
- say__p=1;! [2: ~You must name an object.~]
- ParaContent(); print "You must name an object."; .L_Say515; .L_SayX508;rtrue;
-];
-Array TX_S_37 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_37;
-[ R_TX_S_38 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You may not name an object.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You may not name an object.~]
- say__p=1;! [2: ~You may not name an object.~]
- ParaContent(); print "You may not name an object."; .L_Say516; .L_SayX509;rtrue;
-];
-Array TX_S_38 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_38;
-[ R_TX_S_39 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You must supply a noun.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You must supply a noun.~]
- say__p=1;! [2: ~You must supply a noun.~]
- ParaContent(); print "You must supply a noun."; .L_Say517; .L_SayX510;rtrue;
-];
-Array TX_S_39 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_39;
-[ R_TX_S_40 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You may not supply a noun.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You may not supply a noun.~]
- say__p=1;! [2: ~You may not supply a noun.~]
- ParaContent(); print "You may not supply a noun."; .L_Say518; .L_SayX511;rtrue;
-];
-Array TX_S_40 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_40;
-[ R_TX_S_41 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You must name a second object.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You must name a second object.~]
- say__p=1;! [2: ~You must name a second object.~]
- ParaContent(); print "You must name a second object."; .L_Say519; .L_SayX512;rtrue;
-];
-Array TX_S_41 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_41;
-[ R_TX_S_42 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You may not name a second object.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You may not name a second object.~]
- say__p=1;! [2: ~You may not name a second object.~]
- ParaContent(); print "You may not name a second object."; .L_Say520; .L_SayX513;rtrue;
-];
-Array TX_S_42 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_42;
-[ R_TX_S_43 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You must supply a second noun.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You must supply a second noun.~]
- say__p=1;! [2: ~You must supply a second noun.~]
- ParaContent(); print "You must supply a second noun."; .L_Say521; .L_SayX514;rtrue;
-];
-Array TX_S_43 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_43;
-[ R_TX_S_44 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You may not supply a second noun.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You may not supply a second noun.~]
- say__p=1;! [2: ~You may not supply a second noun.~]
- ParaContent(); print "You may not supply a second noun."; .L_Say522; .L_SayX515;rtrue;
-];
-Array TX_S_44 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_44;
-[ R_TX_S_45 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(Since something dramatic has happened, your list of commands has been
- cut short.)~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(Since something dramatic has happened, your list of commands has been cut short.)~]
- say__p=1;! [2: ~(Since something dramatic has happened, your list of commands has been cut short.)~]
- ParaContent(); print "(Since something dramatic has happened, your list of commands has been cut short.)"; .L_Say523; .L_SayX516;rtrue;
-];
-Array TX_S_45 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_45;
-[ R_TX_S_46 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I didn't understand that instruction.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I didn't understand that instruction.~]
- say__p=1;! [2: ~I didn't understand that instruction.~]
- ParaContent(); print "I didn't understand that instruction."; .L_Say524; .L_SayX517;rtrue;
-];
-Array TX_S_46 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_46;
-[ R_TX_S_47 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I didn't understand that sentence.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I didn't understand that sentence.~]
- say__p=1;! [2: ~I didn't understand that sentence.~]
- ParaContent(); print "I didn't understand that sentence."; .L_Say525; .L_SayX518;rtrue;
-];
-Array TX_S_47 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_47;
-[ R_TX_S_48 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I only understood you as far as wanting to ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I only understood you as far as wanting to ~]
- say__p=1;! [2: ~I only understood you as far as wanting to ~]
- ParaContent(); print "I only understood you as far as wanting to "; .L_Say526; .L_SayX519;rtrue;
-];
-Array TX_S_48 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_48;
-[ R_TX_S_49 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I only understood you as far as wanting to (go) ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I only understood you as far as wanting to (go) ~]
- say__p=1;! [2: ~I only understood you as far as wanting to (go) ~]
- ParaContent(); print "I only understood you as far as wanting to (go) "; .L_Say527; .L_SayX520;rtrue;
-];
-Array TX_S_49 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_49;
-[ R_TX_S_50 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I didn't understand that number.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I didn't understand that number.~]
- say__p=1;! [2: ~I didn't understand that number.~]
- ParaContent(); print "I didn't understand that number."; .L_Say528; .L_SayX521;rtrue;
-];
-Array TX_S_50 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_50;
-[ R_TX_S_51 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't] see any such thing.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't] see any such thing.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ see any such thing.~]
- ParaContent(); print " see any such thing."; .L_Say529; .L_SayX522;rtrue;
-];
-Array TX_S_51 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_51;
-[ R_TX_S_52 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You seem to have said too little!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You seem to have said too little!~]
- say__p=1;! [2: ~You seem to have said too little!~]
- ParaContent(); print "You seem to have said too little!"; .L_Say530; .L_SayX523;rtrue;
-];
-Array TX_S_52 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_52;
-[ R_TX_S_53 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [aren't] holding that!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [aren't] holding that!~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ holding that!~]
- ParaContent(); print " holding that!"; .L_Say531; .L_SayX524;rtrue;
-];
-Array TX_S_53 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_53;
-[ R_TX_S_54 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You can't use multiple objects with that verb.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can't use multiple objects with that verb.~]
- say__p=1;! [2: ~You can't use multiple objects with that verb.~]
- ParaContent(); print "You can't use multiple objects with that verb."; .L_Say532; .L_SayX525;rtrue;
-];
-Array TX_S_54 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_54;
-[ R_TX_S_55 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You can only use multiple objects once on a line.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can only use multiple objects once on a line.~]
- say__p=1;! [2: ~You can only use multiple objects once on a line.~]
- ParaContent(); print "You can only use multiple objects once on a line."; .L_Say533; .L_SayX526;rtrue;
-];
-Array TX_S_55 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_55;
-[ R_TX_S_56 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I'm not sure what ['][pronoun i6 dictionary word]['] refers to.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I'm not sure what ['][pronoun i6 dictionary word]['] refers to.~]
- say__p=1;! [2: ~I'm not sure what ~]
- ParaContent(); print "I'm not sure what ";! [3: ']
- ParaContent(); print "'";! [4: pronoun i6 dictionary word]
- ParaContent(); print (address) pronoun_word;! [5: ']
- ParaContent(); print "'";! [6: ~ refers to.~]
- ParaContent(); print " refers to."; .L_Say534; .L_SayX527;rtrue;
-];
-Array TX_S_56 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_56;
-[ R_TX_S_57 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't] see ['][pronoun i6 dictionary word]['] ([the noun]) at the moment.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't] see ['][pronoun i6 dictionary word]['] ([the noun]) at the moment.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ see ~]
- ParaContent(); print " see ";! [6: ']
- ParaContent(); print "'";! [7: pronoun i6 dictionary word]
- ParaContent(); print (address) pronoun_word;! [8: ']
- ParaContent(); print "'";! [9: ~ (~]
- ParaContent(); print " (";! [10: the noun]
- ParaContent(); print (the) noun;! [11: ~) at the moment.~]
- ParaContent(); print ") at the moment."; .L_Say535; .L_SayX528;rtrue;
-];
-Array TX_S_57 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_57;
-[ R_TX_S_58 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You excepted something not included anyway!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You excepted something not included anyway!~]
- say__p=1;! [2: ~You excepted something not included anyway!~]
- ParaContent(); print "You excepted something not included anyway!"; .L_Say536; .L_SayX529;rtrue;
-];
-Array TX_S_58 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_58;
-[ R_TX_S_59 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You can only do that to something animate.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can only do that to something animate.~]
- say__p=1;! [2: ~You can only do that to something animate.~]
- ParaContent(); print "You can only do that to something animate."; .L_Say537; .L_SayX530;rtrue;
-];
-Array TX_S_59 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_59;
-[ R_TX_S_60 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~That's not a verb I [if American dialect option is
- active]recognize[otherwise]recognise[end if].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~That's not a verb I [if American dialect option is active]recognize[otherwise]recognise[end if].~]
- say__p=1;! [2: ~That's not a verb I ~]
- ParaContent(); print "That's not a verb I ";! [3: if american dialect option is active]
-
- if (~~(((((Adj_25_t1_v16(5))))))) jump L_Say538;! [4: ~recognize~]
- ParaContent(); print "recognize";! [5: otherwise]
-
- jump L_SayX531; .L_Say538;! [6: ~recognise~]
- ParaContent(); print "recognise";! [7: end if]
-
- .L_Say539; .L_SayX531;! [8: ~.~]
- ParaContent(); print "."; .L_Say540; .L_SayX532;rtrue;
-];
-Array TX_S_60 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_60;
-[ R_TX_S_61 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~That's not something you need to refer to in the course of this game.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~That's not something you need to refer to in the course of this game.~]
- say__p=1;! [2: ~That's not something you need to refer to in the course of this game.~]
- ParaContent(); print "That's not something you need to refer to in the course of this game."; .L_Say541; .L_SayX533;rtrue;
-];
-Array TX_S_61 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_61;
-[ R_TX_S_62 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I didn't understand the way that finished.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I didn't understand the way that finished.~]
- say__p=1;! [2: ~I didn't understand the way that finished.~]
- ParaContent(); print "I didn't understand the way that finished."; .L_Say542; .L_SayX534;rtrue;
-];
-Array TX_S_62 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_62;
-[ R_TX_S_63 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[if number understood is 0]None[otherwise]Only [number understood in words][end if]
- of those [regarding the number understood][are] available.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[if number understood is 0]None[otherwise]Only [number understood in words][end if] of those [regarding the number understood][are] available.~]
- say__p=1;! [2: if number understood is 0]
-
- if (~~((((parsed_number == 0))))) jump L_Say543;! [3: ~None~]
- ParaContent(); print "None";! [4: otherwise]
-
- jump L_SayX535; .L_Say543;! [5: ~Only ~]
- ParaContent(); print "Only ";! [6: number understood in words]
- ParaContent(); print (number) say__n=(parsed_number);! [7: end if]
-
- .L_Say544; .L_SayX535;! [8: ~ of those ~]
- ParaContent(); print " of those ";! [9: regarding the number understood]
- ParaContent(); RegardingNumber(parsed_number);! [10: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [11: ~ available.~]
- ParaContent(); print " available."; .L_Say545; .L_SayX536;rtrue;
-];
-Array TX_S_63 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_63;
-[ R_TX_S_64 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~That noun did not make sense in this context.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~That noun did not make sense in this context.~]
- say__p=1;! [2: ~That noun did not make sense in this context.~]
- ParaContent(); print "That noun did not make sense in this context."; .L_Say546; .L_SayX537;rtrue;
-];
-Array TX_S_64 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_64;
-[ R_TX_S_65 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~To repeat a command like 'frog, jump', just say 'again', not 'frog, again'.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~To repeat a command like 'frog, jump', just say 'again', not 'frog, again'.~]
- say__p=1;! [2: ~To repeat a command like 'frog, jump', just say 'again', not 'frog, again'.~]
- ParaContent(); print "To repeat a command like ~frog, jump~, just say ~again~, not ~frog, again~."; .L_Say547; .L_SayX538;rtrue;
-];
-Array TX_S_65 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_65;
-[ R_TX_S_66 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You can't begin with a comma.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can't begin with a comma.~]
- say__p=1;! [2: ~You can't begin with a comma.~]
- ParaContent(); print "You can't begin with a comma."; .L_Say548; .L_SayX539;rtrue;
-];
-Array TX_S_66 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_66;
-[ R_TX_S_67 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You seem to want to talk to someone, but I can't see whom.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You seem to want to talk to someone, but I can't see whom.~]
- say__p=1;! [2: ~You seem to want to talk to someone, but I can't see whom.~]
- ParaContent(); print "You seem to want to talk to someone, but I can't see whom."; .L_Say549; .L_SayX540;rtrue;
-];
-Array TX_S_67 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_67;
-[ R_TX_S_68 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You can't talk to [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can't talk to [the noun].~]
- say__p=1;! [2: ~You can't talk to ~]
- ParaContent(); print "You can't talk to ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~.~]
- ParaContent(); print "."; .L_Say550; .L_SayX541;rtrue;
-];
-Array TX_S_68 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_68;
-[ R_TX_S_69 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~To talk to someone, try 'someone, hello' or some such.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~To talk to someone, try 'someone, hello' or some such.~]
- say__p=1;! [2: ~To talk to someone, try 'someone, hello' or some such.~]
- ParaContent(); print "To talk to someone, try ~someone, hello~ or some such."; .L_Say551; .L_SayX542;rtrue;
-];
-Array TX_S_69 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_69;
-[ R_TX_S_70 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I beg your pardon?~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I beg your pardon?~]
- say__p=1;! [2: ~I beg your pardon?~]
- ParaContent(); print "I beg your pardon?"; .L_Say552; .L_SayX543;rtrue;
-];
-Array TX_S_70 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_70;
-[ R_TX_S_71 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Nothing to do!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Nothing to do!~]
- say__p=1;! [2: ~Nothing to do!~]
- ParaContent(); print "Nothing to do!"; .L_Say553; .L_SayX544;rtrue;
-];
-Array TX_S_71 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_71;
-[ R_TX_S_72 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [adapt the verb are from the third person plural] none at all available!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [adapt the verb are from the third person plural] none at all available!~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: adapt the verb are from the third person plural]
- ParaContent(); ConjugateVerb_0(CV_POS, I117_third_person_plural, story_tense);! [5: ~ none at all available!~]
- ParaContent(); print " none at all available!"; .L_Say554; .L_SayX545;rtrue;
-];
-Array TX_S_72 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_72;
-[ R_TX_S_73 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [seem] to belong to [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [seem] to belong to [the noun].~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: seem]
- ConjugateVerb_55(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ to belong to ~]
- ParaContent(); print " to belong to ";! [7: the noun]
- ParaContent(); print (the) noun;! [8: ~.~]
- ParaContent(); print "."; .L_Say555; .L_SayX546;rtrue;
-];
-Array TX_S_73 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_73;
-[ R_TX_S_74 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [can't] contain things.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [can't] contain things.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: can't]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ contain things.~]
- ParaContent(); print " contain things."; .L_Say556; .L_SayX547;rtrue;
-];
-Array TX_S_74 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_74;
-[ R_TX_S_75 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [aren't] open.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [aren't] open.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ open.~]
- ParaContent(); print " open."; .L_Say557; .L_SayX548;rtrue;
-];
-Array TX_S_75 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_75;
-[ R_TX_S_76 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [are] empty.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [are] empty.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ empty.~]
- ParaContent(); print " empty."; .L_Say558; .L_SayX549;rtrue;
-];
-Array TX_S_76 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_76;
-[ R_TX_S_77 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Darkness~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Darkness~]
- say__p=1;! [2: ~Darkness~]
- ParaContent(); print "Darkness"; .L_Say559; .L_SayX550;rtrue;
-];
-Array TX_S_77 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_77;
-[ R_TX_S_78 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Sorry, that can't be corrected.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Sorry, that can't be corrected.~]
- say__p=1;! [2: ~Sorry, that can't be corrected.~]
- ParaContent(); print "Sorry, that can't be corrected."; .L_Say560; .L_SayX551;rtrue;
-];
-Array TX_S_78 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_78;
-[ R_TX_S_79 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Think nothing of it.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Think nothing of it.~]
- say__p=1;! [2: ~Think nothing of it.~]
- ParaContent(); print "Think nothing of it."; .L_Say561; .L_SayX552;rtrue;
-];
-Array TX_S_79 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_79;
-[ R_TX_S_80 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~'Oops' can only correct a single word.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~'Oops' can only correct a single word.~]
- say__p=1;! [2: ~'Oops' can only correct a single word.~]
- ParaContent(); print "~Oops~ can only correct a single word."; .L_Say562; .L_SayX553;rtrue;
-];
-Array TX_S_80 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_80;
-[ R_TX_S_81 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You can hardly repeat that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can hardly repeat that.~]
- say__p=1;! [2: ~You can hardly repeat that.~]
- ParaContent(); print "You can hardly repeat that."; .L_Say563; .L_SayX554;rtrue;
-];
-Array TX_S_81 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_81;
-[ R_TX_S_82 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Who do you mean, ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Who do you mean, ~]
- say__p=1;! [2: ~Who do you mean, ~]
- ParaContent(); print "Who do you mean, "; .L_Say564; .L_SayX555;rtrue;
-];
-Array TX_S_82 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_82;
-[ R_TX_S_83 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Which do you mean, ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Which do you mean, ~]
- say__p=1;! [2: ~Which do you mean, ~]
- ParaContent(); print "Which do you mean, "; .L_Say565; .L_SayX556;rtrue;
-];
-Array TX_S_83 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_83;
-[ R_TX_S_84 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Sorry, you can only have one item here. Which exactly?~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Sorry, you can only have one item here. Which exactly?~]
- say__p=1;! [2: ~Sorry, you can only have one item here. Which exactly?~]
- ParaContent(); print "Sorry, you can only have one item here. Which exactly?"; .L_Say566; .L_SayX557;rtrue;
-];
-Array TX_S_84 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_84;
-[ R_TX_S_85 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Whom do you want [if the noun is not the player][the noun] [end if]to
- [parser command so far]?~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Whom do you want [if the noun is not the player][the noun] [end if]to [parser command so far]?~]
- say__p=1;! [2: ~Whom do you want ~]
- ParaContent(); print "Whom do you want ";! [3: if the noun is not the player]
-
- if (~~((((~~((noun == player))))))) jump L_Say567;! [4: the noun]
- ParaContent(); print (the) noun;! [5: ~ ~]
- ParaContent(); print " ";! [6: end if]
-
- .L_Say567; .L_SayX558;! [7: ~to ~]
- ParaContent(); print "to ";! [8: parser command so far]
- ParaContent(); PrintCommand();! [9: ~?~]
- ParaContent(); print "?"; .L_Say568; .L_SayX559;rtrue;
-];
-Array TX_S_85 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_85;
-[ R_TX_S_86 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~What do you want [if the noun is not the player][the noun] [end if]to
- [parser command so far]?~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~What do you want [if the noun is not the player][the noun] [end if]to [parser command so far]?~]
- say__p=1;! [2: ~What do you want ~]
- ParaContent(); print "What do you want ";! [3: if the noun is not the player]
-
- if (~~((((~~((noun == player))))))) jump L_Say569;! [4: the noun]
- ParaContent(); print (the) noun;! [5: ~ ~]
- ParaContent(); print " ";! [6: end if]
-
- .L_Say569; .L_SayX560;! [7: ~to ~]
- ParaContent(); print "to ";! [8: parser command so far]
- ParaContent(); PrintCommand();! [9: ~?~]
- ParaContent(); print "?"; .L_Say570; .L_SayX561;rtrue;
-];
-Array TX_S_86 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_86;
-[ R_TX_S_87 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~those things~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~those things~]
- say__p=1;! [2: ~those things~]
- ParaContent(); print "those things"; .L_Say571; .L_SayX562;rtrue;
-];
-Array TX_S_87 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_87;
-[ R_TX_S_88 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~that~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~that~]
- say__p=1;! [2: ~that~]
- ParaContent(); print "that"; .L_Say572; .L_SayX563;rtrue;
-];
-Array TX_S_88 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_88;
-[ R_TX_S_89 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ or ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ or ~]
- say__p=1;! [2: ~ or ~]
- ParaContent(); print " or "; .L_Say573; .L_SayX564;rtrue;
-];
-Array TX_S_89 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_89;
-[ R_TX_S_90 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Please answer yes or no.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Please answer yes or no.~]
- say__p=1;! [2: ~Please answer yes or no.~]
- ParaContent(); print "Please answer yes or no."; .L_Say574; .L_SayX565;rtrue;
-];
-Array TX_S_90 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_90;
-[ R_TX_S_91 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We]~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ()); .L_Say575; .L_SayX566;rtrue;
-];
-Array TX_S_91 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_91;
-[ R_TX_S_92 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[ourselves]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[ourselves]~]
- say__p=1;! [2: ourselves]
- ParaContent(); (PHR_766_r13 ()); .L_Say576; .L_SayX567;rtrue;
-];
-Array TX_S_92 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_92;
-[ R_TX_S_93 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[our] former self~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[our] former self~]
- say__p=1;! [2: our]
- ParaContent(); (PHR_767_r14 ());! [3: ~ former self~]
- ParaContent(); print " former self"; .L_Say577; .L_SayX568;rtrue;
-];
-Array TX_S_93 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_93;
-[ R_TX_S_94 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first taking [the noun])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first taking [the noun])[command clarification break]~]
- say__p=1;! [2: ~(first taking ~]
- ParaContent(); print "(first taking ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say578; .L_SayX569;rtrue;
-];
-Array TX_S_94 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_94;
-[ R_TX_S_95 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~([the second noun] first taking [the noun])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~([the second noun] first taking [the noun])[command clarification break]~]
- say__p=1;! [2: ~(~]
- ParaContent(); print "(";! [3: the second noun]
- ParaContent(); print (the) second;! [4: ~ first taking ~]
- ParaContent(); print " first taking ";! [5: the noun]
- ParaContent(); print (the) noun;! [6: ~)~]
- ParaContent(); print ")";! [7: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say579; .L_SayX570;rtrue;
-];
-Array TX_S_95 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_95;
-[ R_TX_S_96 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ You have died ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ You have died ~]
- say__p=1;! [2: ~ You have died ~]
- ParaContent(); print " You have died "; .L_Say580; .L_SayX571;rtrue;
-];
-Array TX_S_96 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_96;
-[ R_TX_S_97 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ You have won ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ You have won ~]
- say__p=1;! [2: ~ You have won ~]
- ParaContent(); print " You have won "; .L_Say581; .L_SayX572;rtrue;
-];
-Array TX_S_97 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_97;
-[ R_TX_S_98 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ The End ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ The End ~]
- say__p=1;! [2: ~ The End ~]
- ParaContent(); print " The End "; .L_Say582; .L_SayX573;rtrue;
-];
-Array TX_S_98 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_98;
-[ R_TX_S_99 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~The use of 'undo' is forbidden in this story.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~The use of 'undo' is forbidden in this story.~]
- say__p=1;! [2: ~The use of 'undo' is forbidden in this story.~]
- ParaContent(); print "The use of ~undo~ is forbidden in this story."; .L_Say583; .L_SayX574;rtrue;
-];
-Array TX_S_99 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_99;
-[ R_TX_S_100 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You can't 'undo' what hasn't been done!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can't 'undo' what hasn't been done!~]
- say__p=1;! [2: ~You can't 'undo' what hasn't been done!~]
- ParaContent(); print "You can't ~undo~ what hasn't been done!"; .L_Say584; .L_SayX575;rtrue;
-];
-Array TX_S_100 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_100;
-[ R_TX_S_101 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Your interpreter does not provide 'undo'. Sorry!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Your interpreter does not provide 'undo'. Sorry!~]
- say__p=1;! [2: ~Your interpreter does not provide 'undo'. Sorry!~]
- ParaContent(); print "Your interpreter does not provide ~undo~. Sorry!"; .L_Say585; .L_SayX576;rtrue;
-];
-Array TX_S_101 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_101;
-[ R_TX_S_102 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~'Undo' failed. Sorry!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~'Undo' failed. Sorry!~]
- say__p=1;! [2: ~'Undo' failed. Sorry!~]
- ParaContent(); print "~Undo~ failed. Sorry!"; .L_Say586; .L_SayX577;rtrue;
-];
-Array TX_S_102 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_102;
-[ R_TX_S_103 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[bracket]Previous turn undone.[close bracket]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[bracket]Previous turn undone.[close bracket]~]
- say__p=1;! [2: bracket]
- ParaContent(); print "[";! [3: ~Previous turn undone.~]
- ParaContent(); print "Previous turn undone.";! [4: close bracket]
- ParaContent(); print "]"; .L_Say587; .L_SayX578;rtrue;
-];
-Array TX_S_103 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_103;
-[ R_TX_S_104 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~'Undo' capacity exhausted. Sorry!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~'Undo' capacity exhausted. Sorry!~]
- say__p=1;! [2: ~'Undo' capacity exhausted. Sorry!~]
- ParaContent(); print "~Undo~ capacity exhausted. Sorry!"; .L_Say588; .L_SayX579;rtrue;
-];
-Array TX_S_104 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_104;
-[ R_TX_S_105 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Are you sure you want to quit? ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Are you sure you want to quit? ~]
- say__p=1;! [2: ~Are you sure you want to quit? ~]
- ParaContent(); print "Are you sure you want to quit? "; .L_Say589; .L_SayX580;rtrue;
-];
-Array TX_S_105 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_105;
-[ R_TX_S_106 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Save failed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Save failed.~]
- say__p=1;! [2: ~Save failed.~]
- ParaContent(); print "Save failed."; .L_Say590; .L_SayX581;rtrue;
-];
-Array TX_S_106 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_106;
-[ R_TX_S_107 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Ok.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Ok.~]
- say__p=1;! [2: ~Ok.~]
- ParaContent(); print "Ok."; .L_Say591; .L_SayX582;rtrue;
-];
-Array TX_S_107 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_107;
-[ R_TX_S_108 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Restore failed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Restore failed.~]
- say__p=1;! [2: ~Restore failed.~]
- ParaContent(); print "Restore failed."; .L_Say592; .L_SayX583;rtrue;
-];
-Array TX_S_108 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_108;
-[ R_TX_S_109 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Ok.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Ok.~]
- say__p=1;! [2: ~Ok.~]
- ParaContent(); print "Ok."; .L_Say593; .L_SayX584;rtrue;
-];
-Array TX_S_109 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_109;
-[ R_TX_S_110 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Are you sure you want to restart? ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Are you sure you want to restart? ~]
- say__p=1;! [2: ~Are you sure you want to restart? ~]
- ParaContent(); print "Are you sure you want to restart? "; .L_Say594; .L_SayX585;rtrue;
-];
-Array TX_S_110 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_110;
-[ R_TX_S_111 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Failed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Failed.~]
- say__p=1;! [2: ~Failed.~]
- ParaContent(); print "Failed."; .L_Say595; .L_SayX586;rtrue;
-];
-Array TX_S_111 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_111;
-[ R_TX_S_112 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~The game file has verified as intact.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~The game file has verified as intact.~]
- say__p=1;! [2: ~The game file has verified as intact.~]
- ParaContent(); print "The game file has verified as intact."; .L_Say596; .L_SayX587;rtrue;
-];
-Array TX_S_112 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_112;
-[ R_TX_S_113 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~The game file did not verify as intact, and may be corrupt.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~The game file did not verify as intact, and may be corrupt.~]
- say__p=1;! [2: ~The game file did not verify as intact, and may be corrupt.~]
- ParaContent(); print "The game file did not verify as intact, and may be corrupt."; .L_Say597; .L_SayX588;rtrue;
-];
-Array TX_S_113 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_113;
-[ R_TX_S_114 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Transcripting is already on.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Transcripting is already on.~]
- say__p=1;! [2: ~Transcripting is already on.~]
- ParaContent(); print "Transcripting is already on."; .L_Say598; .L_SayX589;rtrue;
-];
-Array TX_S_114 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_114;
-[ R_TX_S_115 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Start of a transcript of~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Start of a transcript of~]
- say__p=1;! [2: ~Start of a transcript of~]
- ParaContent(); print "Start of a transcript of"; .L_Say599; .L_SayX590;rtrue;
-];
-Array TX_S_115 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_115;
-[ R_TX_S_116 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Attempt to begin transcript failed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Attempt to begin transcript failed.~]
- say__p=1;! [2: ~Attempt to begin transcript failed.~]
- ParaContent(); print "Attempt to begin transcript failed."; .L_Say600; .L_SayX591;rtrue;
-];
-Array TX_S_116 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_116;
-[ R_TX_S_117 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Transcripting is already off.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Transcripting is already off.~]
- say__p=1;! [2: ~Transcripting is already off.~]
- ParaContent(); print "Transcripting is already off."; .L_Say601; .L_SayX592;rtrue;
-];
-Array TX_S_117 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_117;
-[ R_TX_S_118 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[line break]End of transcript.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[line break]End of transcript.~]
- say__p=1;! [2: line break]
- ParaContent(); new_line;! [3: ~End of transcript.~]
- ParaContent(); print "End of transcript."; .L_Say602; .L_SayX593;rtrue;
-];
-Array TX_S_118 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_118;
-[ R_TX_S_119 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Attempt to end transcript failed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Attempt to end transcript failed.~]
- say__p=1;! [2: ~Attempt to end transcript failed.~]
- ParaContent(); print "Attempt to end transcript failed."; .L_Say603; .L_SayX594;rtrue;
-];
-Array TX_S_119 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_119;
-[ R_TX_S_120 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[if the story has ended]In that game you scored[otherwise]You have so far scored[end if]
- [score] out of a possible [maximum score], in [turn count] turn[s]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[if the story has ended]In that game you scored[otherwise]You have so far scored[end if] [score] out of a possible [maximum score], in [turn count] turn[s]~]
- say__p=1;! [2: if the story has ended]
-
- if (~~((((deadflag~=0))))) jump L_Say604;! [3: ~In that game you scored~]
- ParaContent(); print "In that game you scored";! [4: otherwise]
-
- jump L_SayX595; .L_Say604;! [5: ~You have so far scored~]
- ParaContent(); print "You have so far scored";! [6: end if]
-
- .L_Say605; .L_SayX595;! [7: ~ ~]
- ParaContent(); print " ";! [8: score]
- ParaContent(); print (say__n=score);! [9: ~ out of a possible ~]
- ParaContent(); print " out of a possible ";! [10: maximum score]
- ParaContent(); print (say__n=MAX_SCORE);! [11: ~, in ~]
- ParaContent(); print ", in ";! [12: turn count]
- ParaContent(); print (say__n=turns);! [13: ~ turn~]
- ParaContent(); print " turn";! [14: s]
- ParaContent(); STextSubstitution(); .L_Say606; .L_SayX596;rtrue;
-];
-Array TX_S_120 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_120;
-[ R_TX_S_121 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, earning you the rank of ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, earning you the rank of ~]
- say__p=1;! [2: ~, earning you the rank of ~]
- ParaContent(); print ", earning you the rank of "; .L_Say607; .L_SayX597;rtrue;
-];
-Array TX_S_121 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_121;
-[ R_TX_S_122 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no score in this story.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no score in this story.~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no score in this story.~]
- ParaContent(); print " no score in this story."; .L_Say608; .L_SayX598;rtrue;
-];
-Array TX_S_122 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_122;
-[ R_TX_S_123 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[bracket]Your score has just gone up by [number understood in words]
- point[s].[close bracket]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[bracket]Your score has just gone up by [number understood in words] point[s].[close bracket]~]
- say__p=1;! [2: bracket]
- ParaContent(); print "[";! [3: ~Your score has just gone up by ~]
- ParaContent(); print "Your score has just gone up by ";! [4: number understood in words]
- ParaContent(); print (number) say__n=(parsed_number);! [5: ~ point~]
- ParaContent(); print " point";! [6: s]
- ParaContent(); STextSubstitution();! [7: ~.~]
- ParaContent(); print ".";! [8: close bracket]
- ParaContent(); print "]"; .L_Say609; .L_SayX599;rtrue;
-];
-Array TX_S_123 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_123;
-[ R_TX_S_124 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[bracket]Your score has just gone down by [number understood in words]
- point[s].[close bracket]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[bracket]Your score has just gone down by [number understood in words] point[s].[close bracket]~]
- say__p=1;! [2: bracket]
- ParaContent(); print "[";! [3: ~Your score has just gone down by ~]
- ParaContent(); print "Your score has just gone down by ";! [4: number understood in words]
- ParaContent(); print (number) say__n=(parsed_number);! [5: ~ point~]
- ParaContent(); print " point";! [6: s]
- ParaContent(); STextSubstitution();! [7: ~.~]
- ParaContent(); print ".";! [8: close bracket]
- ParaContent(); print "]"; .L_Say610; .L_SayX600;rtrue;
-];
-Array TX_S_124 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_124;
-[ R_TX_S_125 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ is now in its 'superbrief' mode, which always gives short descriptions
- of locations (even if you haven't been there before).~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ is now in its 'superbrief' mode, which always gives short descriptions of locations (even if you haven't been there before).~]
- say__p=1;! [2: ~ is now in its 'superbrief' mode, which always gives short descriptions of locations (even if you haven't been there before).~]
- ParaContent(); print " is now in its ~superbrief~ mode, which always gives short descriptions of locations (even if you haven't been there before)."; .L_Say611; .L_SayX601;rtrue;
-];
-Array TX_S_125 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_125;
-[ R_TX_S_126 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ is now in its 'verbose' mode, which always gives long descriptions of
- locations (even if you've been there before).~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ is now in its 'verbose' mode, which always gives long descriptions of locations (even if you've been there before).~]
- say__p=1;! [2: ~ is now in its 'verbose' mode, which always gives long descriptions of locations (even if you've been there before).~]
- ParaContent(); print " is now in its ~verbose~ mode, which always gives long descriptions of locations (even if you've been there before)."; .L_Say612; .L_SayX602;rtrue;
-];
-Array TX_S_126 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_126;
-[ R_TX_S_127 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ is now in its 'brief' printing mode, which gives long descriptions
- of places never before visited and short descriptions otherwise.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ is now in its 'brief' printing mode, which gives long descriptions of places never before visited and short descriptions otherwise.~]
- say__p=1;! [2: ~ is now in its 'brief' printing mode, which gives long descriptions of places never before visited and short descriptions otherwise.~]
- ParaContent(); print " is now in its ~brief~ printing mode, which gives long descriptions of places never before visited and short descriptions otherwise."; .L_Say613; .L_SayX603;rtrue;
-];
-Array TX_S_127 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_127;
-[ R_TX_S_128 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Score notification on.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Score notification on.~]
- say__p=1;! [2: ~Score notification on.~]
- ParaContent(); print "Score notification on."; .L_Say614; .L_SayX604;rtrue;
-];
-Array TX_S_128 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_128;
-[ R_TX_S_129 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Score notification off.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Score notification off.~]
- say__p=1;! [2: ~Score notification off.~]
- ParaContent(); print "Score notification off."; .L_Say615; .L_SayX605;rtrue;
-];
-Array TX_S_129 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_129;
-[ R_TX_S_130 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~At the moment, ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~At the moment, ~]
- say__p=1;! [2: ~At the moment, ~]
- ParaContent(); print "At the moment, "; .L_Say616; .L_SayX606;rtrue;
-];
-Array TX_S_130 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_130;
-[ R_TX_S_131 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~means ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~means ~]
- say__p=1;! [2: ~means ~]
- ParaContent(); print "means "; .L_Say617; .L_SayX607;rtrue;
-];
-Array TX_S_131 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_131;
-[ R_TX_S_132 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~is unset~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~is unset~]
- say__p=1;! [2: ~is unset~]
- ParaContent(); print "is unset"; .L_Say618; .L_SayX608;rtrue;
-];
-Array TX_S_132 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_132;
-[ R_TX_S_133 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~no pronouns are known to the game.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~no pronouns are known to the game.~]
- say__p=1;! [2: ~no pronouns are known to the game.~]
- ParaContent(); print "no pronouns are known to the game."; .L_Say619; .L_SayX609;rtrue;
-];
-Array TX_S_133 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_133;
-[ R_TX_S_134 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[current item from the multiple object list]: [run paragraph on]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[current item from the multiple object list]: [run paragraph on]~]
- say__p=1;! [2: current item from the multiple object list]
- ParaContent(); PrintShortName(multiple_object_item);! [3: ~: ~]
- ParaContent(); print ": ";! [4: run paragraph on]
- ParaContent(); RunParagraphOn(); .L_Say620; .L_SayX610;rtrue;
-];
-Array TX_S_134 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_134;
-[ R_TX_S_135 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~You'll have to say which compass direction to go in.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You'll have to say which compass direction to go in.~]
- say__p=1;! [2: ~You'll have to say which compass direction to go in.~]
- ParaContent(); print "You'll have to say which compass direction to go in."; .L_Say621; .L_SayX611;rtrue;
-];
-Array TX_S_135 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_135;
-[ R_TX_S_136
- tmp_0 ! Let/loop value, e.g., 'named options count': number
- tmp_1 ! Let/loop value: object
- tmp_2 ! Let/loop value: object
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Would you like to ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Would you like to ~]
- say__p=1;! [2: ~Would you like to ~]
- ParaContent(); print "Would you like to "; .L_Say622; .L_SayX612;rtrue;
-];
-Array TX_S_136 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_136;
-[ R_TX_S_137
- tmp_0 ! Let/loop value, e.g., 'named options count': number
- tmp_1 ! Let/loop value: object
- tmp_2 ! Let/loop value: object
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ or ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ or ~]
- say__p=1;! [2: ~ or ~]
- ParaContent(); print " or "; .L_Say623; .L_SayX613;rtrue;
-];
-Array TX_S_137 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_137;
-[ R_TX_S_138 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~> [run paragraph on]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~> [run paragraph on]~]
- say__p=1;! [2: ~> ~]
- ParaContent(); print "> ";! [3: run paragraph on]
- ParaContent(); RunParagraphOn(); .L_Say624; .L_SayX614;rtrue;
-];
-Array TX_S_138 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_138;
-[ R_TX_S_139
- tmp_0 ! Let/loop value: object
- tmp_1 ! Let/loop value: object
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Please give one of the answers above.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Please give one of the answers above.~]
- say__p=1;! [2: ~Please give one of the answers above.~]
- ParaContent(); print "Please give one of the answers above."; .L_Say625; .L_SayX615;rtrue;
-];
-Array TX_S_139 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_139;
-[ R_TX_S_140
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'mentionable count': number
- tmp_2 ! Let/loop value: thing
- tmp_3 ! Let/loop value: thing
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] ~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " "; .L_Say626; .L_SayX616;rtrue;
-];
-Array TX_S_140 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_140;
-[ R_TX_S_141
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'mentionable count': number
- tmp_2 ! Let/loop value: thing
- tmp_3 ! Let/loop value: thing
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-tmp_3=LocalParking-->3;
-ct_0=LocalParking-->4;
-ct_1=LocalParking-->5;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~On [the domain] [we] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~On [the domain] [we] ~]
- say__p=1;! [2: ~On ~]
- ParaContent(); print "On ";! [3: the domain]
- ParaContent(); print (the) tmp_0;! [4: ~ ~]
- ParaContent(); print " ";! [5: we]
- ParaContent(); (PHR_763_r10 ());! [6: ~ ~]
- ParaContent(); print " "; .L_Say627; .L_SayX617;rtrue;
-];
-Array TX_S_141 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_141;
-[ R_TX_S_142
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'mentionable count': number
- tmp_2 ! Let/loop value: thing
- tmp_3 ! Let/loop value: thing
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-tmp_3=LocalParking-->3;
-ct_0=LocalParking-->4;
-ct_1=LocalParking-->5;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~In [the domain] [we] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~In [the domain] [we] ~]
- say__p=1;! [2: ~In ~]
- ParaContent(); print "In ";! [3: the domain]
- ParaContent(); print (the) tmp_0;! [4: ~ ~]
- ParaContent(); print " ";! [5: we]
- ParaContent(); (PHR_763_r10 ());! [6: ~ ~]
- ParaContent(); print " "; .L_Say628; .L_SayX618;rtrue;
-];
-Array TX_S_142 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_142;
-[ R_TX_S_143
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'mentionable count': number
- tmp_2 ! Let/loop value: thing
- tmp_3 ! Let/loop value: thing
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the player][can] also see ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the player][can] also see ~]
- say__p=1;! [2: regarding the player]
- ParaContent(); RegardingSingleObject(player);! [3: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ also see ~]
- ParaContent(); print " also see "; .L_Say629; .L_SayX619;rtrue;
-];
-Array TX_S_143 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_143;
-[ R_TX_S_144
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'mentionable count': number
- tmp_2 ! Let/loop value: thing
- tmp_3 ! Let/loop value: thing
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the player][can] see ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the player][can] see ~]
- say__p=1;! [2: regarding the player]
- ParaContent(); RegardingSingleObject(player);! [3: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ see ~]
- ParaContent(); print " see "; .L_Say630; .L_SayX620;rtrue;
-];
-Array TX_S_144 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_144;
-[ R_TX_S_145
- tmp_0 ! Let/loop value, e.g., 'domain': object
- tmp_1 ! Let/loop value, e.g., 'mentionable count': number
- tmp_2 ! Let/loop value, e.g., 'common holder': object
- tmp_3 ! Let/loop value, e.g., 'contents form of list': truth state
- tmp_4 ! Let/loop value: object
- tmp_5 ! Let/loop value: thing
- ct_0 ! internal use only
- ct_1 ! internal use only
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~ here~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ here~]
- say__p=1;! [2: ~ here~]
- ParaContent(); print " here"; .L_Say631; .L_SayX621;rtrue;
-];
-Array TX_S_145 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_145;
-[ R_TX_S_146
- tmp_0 ! Let/loop value, e.g., 'item': thing
- tmp_1 ! Let/loop value: thing
- tmp_2 ! Let/loop value: thing
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~On [the item] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~On [the item] ~]
- say__p=1;! [2: ~On ~]
- ParaContent(); print "On ";! [3: the item]
- ParaContent(); print (the) tmp_0;! [4: ~ ~]
- ParaContent(); print " "; .L_Say632; .L_SayX622;rtrue;
-];
-Array TX_S_146 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_146;
-[ R_TX_S_147
- tmp_0 ! Let/loop value, e.g., 'item': thing
- tmp_1 ! Let/loop value: thing
- tmp_2 ! Let/loop value: thing
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~On [the item] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~On [the item] ~]
- say__p=1;! [2: ~On ~]
- ParaContent(); print "On ";! [3: the item]
- ParaContent(); print (the) tmp_0;! [4: ~ ~]
- ParaContent(); print " "; .L_Say633; .L_SayX623;rtrue;
-];
-Array TX_S_147 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_147;
-[ R_TX_S_148
- tmp_0 ! Let/loop value, e.g., 'item': thing
- tmp_1 ! Let/loop value: thing
- tmp_2 ! Let/loop value: thing
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~On [the item] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~On [the item] ~]
- say__p=1;! [2: ~On ~]
- ParaContent(); print "On ";! [3: the item]
- ParaContent(); print (the) tmp_0;! [4: ~ ~]
- ParaContent(); print " "; .L_Say634; .L_SayX624;rtrue;
-];
-Array TX_S_148 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_148;
-[ R_TX_S_149 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [are] carrying nothing.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [are] carrying nothing.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ carrying nothing.~]
- ParaContent(); print " carrying nothing."; .L_Say635; .L_SayX625;rtrue;
-];
-Array TX_S_149 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_149;
-[ R_TX_S_150 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [are] carrying:[line break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [are] carrying:[line break]~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ carrying:~]
- ParaContent(); print " carrying:";! [6: line break]
- ParaContent(); new_line; .L_Say636; .L_SayX626;rtrue;
-];
-Array TX_S_150 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_150;
-[ R_TX_S_151 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [look] through [their] possessions.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [look] through [their] possessions.~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: look]
- ConjugateVerb_43(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ through ~]
- ParaContent(); print " through ";! [6: their]
- ParaContent(); (PHR_779_r26 ());! [7: ~ possessions.~]
- ParaContent(); print " possessions."; .L_Say637; .L_SayX627;rtrue;
-];
-Array TX_S_151 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_151;
-[ R_TX_S_152 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [are] always self-possessed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [are] always self-possessed.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ always self-possessed.~]
- ParaContent(); print " always self-possessed."; .L_Say638; .L_SayX628;rtrue;
-];
-Array TX_S_152 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_152;
-[ R_TX_S_153 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~I don't suppose [the noun] [would care] for that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~I don't suppose [the noun] [would care] for that.~]
- say__p=1;! [2: ~I don't suppose ~]
- ParaContent(); print "I don't suppose ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ ~]
- ParaContent(); print " ";! [5: would care]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_24); say__p=1; ! [6: ~ for that.~]
- ParaContent(); print " for that."; .L_Say639; .L_SayX629;rtrue;
-];
-Array TX_S_153 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_153;
-[ R_TX_S_154
- tmp_0 ! Let/loop value, e.g., 'whole': thing
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [seem] to be a part of [the whole].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [seem] to be a part of [the whole].~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: seem]
- ConjugateVerb_55(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ to be a part of ~]
- ParaContent(); print " to be a part of ";! [7: the whole]
- ParaContent(); print (the) tmp_0;! [8: ~.~]
- ParaContent(); print "."; .L_Say640; .L_SayX630;rtrue;
-];
-Array TX_S_154 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_154;
-[ R_TX_S_155
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'owner': object
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [seem] to belong to [the owner].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [seem] to belong to [the owner].~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: seem]
- ConjugateVerb_55(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ to belong to ~]
- ParaContent(); print " to belong to ";! [7: the owner]
- ParaContent(); print (the) tmp_1;! [8: ~.~]
- ParaContent(); print "."; .L_Say641; .L_SayX631;rtrue;
-];
-Array TX_S_155 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_155;
-[ R_TX_S_156
- tmp_0 ! Let/loop value, e.g., 'H': object
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [aren't] available.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [aren't] available.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ available.~]
- ParaContent(); print " available."; .L_Say642; .L_SayX632;rtrue;
-];
-Array TX_S_156 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_156;
-[ R_TX_S_157
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [would have] to get
- [if noun is a supporter]off[otherwise]out of[end if] [the noun] first.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [would have] to get [if noun is a supporter]off[otherwise]out of[end if] [the noun] first.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: would have]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_2); say__p=1; ! [5: ~ to get ~]
- ParaContent(); print " to get ";! [6: if noun is a supporter]
-
- if (~~((((noun ofclass K6_supporter))))) jump L_Say643;! [7: ~off~]
- ParaContent(); print "off";! [8: otherwise]
-
- jump L_SayX633; .L_Say643;! [9: ~out of~]
- ParaContent(); print "out of";! [10: end if]
-
- .L_Say644; .L_SayX633;! [11: ~ ~]
- ParaContent(); print " ";! [12: the noun]
- ParaContent(); print (the) noun;! [13: ~ first.~]
- ParaContent(); print " first."; .L_Say645; .L_SayX634;rtrue;
-];
-Array TX_S_157 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_157;
-[ R_TX_S_158 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] already [have] [regarding the noun][those].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] already [have] [regarding the noun][those].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ already ~]
- ParaContent(); print " already ";! [4: have]
- ConjugateVerb_2(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [7: those]
- ParaContent(); (PHR_773_r20 ());! [8: ~.~]
- ParaContent(); print "."; .L_Say646; .L_SayX635;rtrue;
-];
-Array TX_S_158 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_158;
-[ R_TX_S_159 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] hardly portable.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] hardly portable.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ hardly portable.~]
- ParaContent(); print " hardly portable."; .L_Say647; .L_SayX636;rtrue;
-];
-Array TX_S_159 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_159;
-[ R_TX_S_160 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [cannot] carry [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [cannot] carry [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: cannot]
- ConjugateVerb_15(CV_NEG, PNToVP(), story_tense); say__p=1; ! [5: ~ carry ~]
- ParaContent(); print " carry ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say648; .L_SayX637;rtrue;
-];
-Array TX_S_160 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_160;
-[ R_TX_S_161 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] fixed in place.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] fixed in place.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ fixed in place.~]
- ParaContent(); print " fixed in place."; .L_Say649; .L_SayX638;rtrue;
-];
-Array TX_S_161 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_161;
-[ R_TX_S_162
- tmp_0 ! Let/loop value, e.g., 'current working sack': player's holdall
- tmp_1 ! Let/loop value, e.g., 'transferred item': object
- tmp_2 ! Let/loop value: thing
- tmp_3 ! Let/loop value: thing
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-tmp_3=LocalParking-->3;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~(putting [the transferred item] into [the current working sack]
- to make room)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(putting [the transferred item] into [the current working sack] to make room)[command clarification break]~]
- say__p=1;! [2: ~(putting ~]
- ParaContent(); print "(putting ";! [3: the transferred item]
- ParaContent(); print (the) tmp_1;! [4: ~ into ~]
- ParaContent(); print " into ";! [5: the current working sack]
- ParaContent(); print (the) tmp_0;! [6: ~ to make room)~]
- ParaContent(); print " to make room)";! [7: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say650; .L_SayX639;rtrue;
-];
-Array TX_S_162 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_162;
-[ R_TX_S_163 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We]['re] carrying too many things already.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We]['re] carrying too many things already.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ carrying too many things already.~]
- ParaContent(); print " carrying too many things already."; .L_Say651; .L_SayX640;rtrue;
-];
-Array TX_S_163 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_163;
-[ R_TX_S_164 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Taken.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Taken.~]
- say__p=1;! [2: ~Taken.~]
- ParaContent(); print "Taken."; .L_Say652; .L_SayX641;rtrue;
-];
-Array TX_S_164 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_164;
-[ R_TX_S_165 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [pick] up [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [pick] up [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: pick]
- ConjugateVerb_47(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ up ~]
- ParaContent(); print " up ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say653; .L_SayX642;rtrue;
-];
-Array TX_S_165 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_165;
-[ R_TX_S_166 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~But [regarding the noun][they] [aren't] there now.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~But [regarding the noun][they] [aren't] there now.~]
- say__p=1;! [2: ~But ~]
- ParaContent(); print "But ";! [3: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [4: they]
- ParaContent(); (PHR_777_r24 ());! [5: ~ ~]
- ParaContent(); print " ";! [6: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [7: ~ there now.~]
- ParaContent(); print " there now."; .L_Say654; .L_SayX643;rtrue;
-];
-Array TX_S_166 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_166;
-[ R_TX_S_167
- tmp_0 ! Let/loop value, e.g., 'owner': object
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [seem] to belong to [the owner].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [seem] to belong to [the owner].~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: seem]
- ConjugateVerb_55(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ to belong to ~]
- ParaContent(); print " to belong to ";! [7: the owner]
- ParaContent(); print (the) tmp_0;! [8: ~.~]
- ParaContent(); print "."; .L_Say655; .L_SayX644;rtrue;
-];
-Array TX_S_167 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_167;
-[ R_TX_S_168 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't drop] part of [ourselves].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't drop] part of [ourselves].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't drop]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_28); say__p=1; ! [5: ~ part of ~]
- ParaContent(); print " part of ";! [6: ourselves]
- ParaContent(); (PHR_766_r13 ());! [7: ~.~]
- ParaContent(); print "."; .L_Say656; .L_SayX645;rtrue;
-];
-Array TX_S_168 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_168;
-[ R_TX_S_169 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [lack] the dexterity.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [lack] the dexterity.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: lack]
- ConjugateVerb_38(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ the dexterity.~]
- ParaContent(); print " the dexterity."; .L_Say657; .L_SayX646;rtrue;
-];
-Array TX_S_169 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_169;
-[ R_TX_S_170 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [are] already here.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [are] already here.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ already here.~]
- ParaContent(); print " already here."; .L_Say658; .L_SayX647;rtrue;
-];
-Array TX_S_170 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_170;
-[ R_TX_S_171 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [haven't] got [regarding the noun][those].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [haven't] got [regarding the noun][those].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: haven't]
- ConjugateVerb_78(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ got ~]
- ParaContent(); print " got ";! [6: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [7: those]
- ParaContent(); (PHR_773_r20 ());! [8: ~.~]
- ParaContent(); print "."; .L_Say659; .L_SayX648;rtrue;
-];
-Array TX_S_171 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_171;
-[ R_TX_S_172 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first taking [the noun] off)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first taking [the noun] off)[command clarification break]~]
- say__p=1;! [2: ~(first taking ~]
- ParaContent(); print "(first taking ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ off)~]
- ParaContent(); print " off)";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say660; .L_SayX649;rtrue;
-];
-Array TX_S_172 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_172;
-[ R_TX_S_173
- tmp_0 ! Let/loop value, e.g., 'receptacle': object
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no more room on [the receptacle].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no more room on [the receptacle].~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no more room on ~]
- ParaContent(); print " no more room on ";! [6: the receptacle]
- ParaContent(); print (the) tmp_0;! [7: ~.~]
- ParaContent(); print "."; .L_Say661; .L_SayX650;rtrue;
-];
-Array TX_S_173 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_173;
-[ R_TX_S_174
- tmp_0 ! Let/loop value, e.g., 'receptacle': object
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no more room in [the receptacle].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no more room in [the receptacle].~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no more room in ~]
- ParaContent(); print " no more room in ";! [6: the receptacle]
- ParaContent(); print (the) tmp_0;! [7: ~.~]
- ParaContent(); print "."; .L_Say662; .L_SayX651;rtrue;
-];
-Array TX_S_174 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_174;
-[ R_TX_S_175 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Dropped.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Dropped.~]
- say__p=1;! [2: ~Dropped.~]
- ParaContent(); print "Dropped."; .L_Say663; .L_SayX652;rtrue;
-];
-Array TX_S_175 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_175;
-[ R_TX_S_176 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [put] down [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [put] down [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: put]
- ConjugateVerb_51(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ down ~]
- ParaContent(); print " down ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say664; .L_SayX653;rtrue;
-];
-Array TX_S_176 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_176;
-[ R_TX_S_177
- tmp_0 ! Let/loop value, e.g., 'noun-CPC': object
- tmp_1 ! Let/loop value, e.g., 'second-CPC': object
- tmp_2 ! Let/loop value, e.g., 'transfer ceiling': object
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't put] something on top of itself.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't put] something on top of itself.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't put]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_51); say__p=1; ! [5: ~ something on top of itself.~]
- ParaContent(); print " something on top of itself."; .L_Say665; .L_SayX654;rtrue;
-];
-Array TX_S_177 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_177;
-[ R_TX_S_178 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Putting things on [the second noun] [would achieve] nothing.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Putting things on [the second noun] [would achieve] nothing.~]
- say__p=1;! [2: ~Putting things on ~]
- ParaContent(); print "Putting things on ";! [3: the second noun]
- ParaContent(); print (the) second;! [4: ~ ~]
- ParaContent(); print " ";! [5: would achieve]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_21); say__p=1; ! [6: ~ nothing.~]
- ParaContent(); print " nothing."; .L_Say666; .L_SayX655;rtrue;
-];
-Array TX_S_178 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_178;
-[ R_TX_S_179 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first taking [regarding the noun][them] off)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first taking [regarding the noun][them] off)[command clarification break]~]
- say__p=1;! [2: ~(first taking ~]
- ParaContent(); print "(first taking ";! [3: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [4: them]
- ParaContent(); (PHR_781_r28 ());! [5: ~ off)~]
- ParaContent(); print " off)";! [6: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say667; .L_SayX656;rtrue;
-];
-Array TX_S_179 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_179;
-[ R_TX_S_180 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no more room on [the second noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no more room on [the second noun].~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no more room on ~]
- ParaContent(); print " no more room on ";! [6: the second noun]
- ParaContent(); print (the) second;! [7: ~.~]
- ParaContent(); print "."; .L_Say668; .L_SayX657;rtrue;
-];
-Array TX_S_180 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_180;
-[ R_TX_S_181 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Done.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Done.~]
- say__p=1;! [2: ~Done.~]
- ParaContent(); print "Done."; .L_Say669; .L_SayX658;rtrue;
-];
-Array TX_S_181 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_181;
-[ R_TX_S_182 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [put] [the noun] on [the second noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [put] [the noun] on [the second noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: put]
- ConjugateVerb_51(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ on ~]
- ParaContent(); print " on ";! [8: the second noun]
- ParaContent(); print (the) second;! [9: ~.~]
- ParaContent(); print "."; .L_Say670; .L_SayX659;rtrue;
-];
-Array TX_S_182 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_182;
-[ R_TX_S_183
- tmp_0 ! Let/loop value, e.g., 'noun-CPC': object
- tmp_1 ! Let/loop value, e.g., 'second-CPC': object
- tmp_2 ! Let/loop value, e.g., 'transfer ceiling': object
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't put] something inside itself.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't put] something inside itself.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't put]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_51); say__p=1; ! [5: ~ something inside itself.~]
- ParaContent(); print " something inside itself."; .L_Say671; .L_SayX660;rtrue;
-];
-Array TX_S_183 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_183;
-[ R_TX_S_184 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The second noun] [are] closed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The second noun] [are] closed.~]
- say__p=1;! [2: the second noun]
- ParaContent(); print (The) second;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ closed.~]
- ParaContent(); print " closed."; .L_Say672; .L_SayX661;rtrue;
-];
-Array TX_S_184 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_184;
-[ R_TX_S_185 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the second noun][Those] [can't contain] things.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the second noun][Those] [can't contain] things.~]
- say__p=1;! [2: regarding the second noun]
- ParaContent(); RegardingSingleObject(second);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: can't contain]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_7); say__p=1; ! [6: ~ things.~]
- ParaContent(); print " things."; .L_Say673; .L_SayX662;rtrue;
-];
-Array TX_S_185 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_185;
-[ R_TX_S_186 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first taking [regarding the noun][them] off)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first taking [regarding the noun][them] off)[command clarification break]~]
- say__p=1;! [2: ~(first taking ~]
- ParaContent(); print "(first taking ";! [3: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [4: them]
- ParaContent(); (PHR_781_r28 ());! [5: ~ off)~]
- ParaContent(); print " off)";! [6: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say674; .L_SayX663;rtrue;
-];
-Array TX_S_186 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_186;
-[ R_TX_S_187 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no more room in [the second noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no more room in [the second noun].~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no more room in ~]
- ParaContent(); print " no more room in ";! [6: the second noun]
- ParaContent(); print (the) second;! [7: ~.~]
- ParaContent(); print "."; .L_Say675; .L_SayX664;rtrue;
-];
-Array TX_S_187 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_187;
-[ R_TX_S_188 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Done.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Done.~]
- say__p=1;! [2: ~Done.~]
- ParaContent(); print "Done."; .L_Say676; .L_SayX665;rtrue;
-];
-Array TX_S_188 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_188;
-[ R_TX_S_189 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [put] [the noun] into [the second noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [put] [the noun] into [the second noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: put]
- ConjugateVerb_51(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ into ~]
- ParaContent(); print " into ";! [8: the second noun]
- ParaContent(); print (the) second;! [9: ~.~]
- ParaContent(); print "."; .L_Say677; .L_SayX666;rtrue;
-];
-Array TX_S_189 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_189;
-[ R_TX_S_190 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] plainly inedible.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] plainly inedible.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ plainly inedible.~]
- ParaContent(); print " plainly inedible."; .L_Say678; .L_SayX667;rtrue;
-];
-Array TX_S_190 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_190;
-[ R_TX_S_191 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first taking [the noun] off)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first taking [the noun] off)[command clarification break]~]
- say__p=1;! [2: ~(first taking ~]
- ParaContent(); print "(first taking ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ off)~]
- ParaContent(); print " off)";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say679; .L_SayX668;rtrue;
-];
-Array TX_S_191 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_191;
-[ R_TX_S_192
- tmp_0 ! Let/loop value, e.g., 'owner': person
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[The owner] [might not appreciate] that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The owner] [might not appreciate] that.~]
- say__p=1;! [2: the owner]
- ParaContent(); print (The) tmp_0;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not appreciate]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense, ConjugateVerb_22); say__p=1; ! [5: ~ that.~]
- ParaContent(); print " that."; .L_Say680; .L_SayX669;rtrue;
-];
-Array TX_S_192 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_192;
-[ R_TX_S_193 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [eat] [the noun]. Not bad.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [eat] [the noun]. Not bad.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: eat]
- ConjugateVerb_29(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~. Not bad.~]
- ParaContent(); print ". Not bad."; .L_Say681; .L_SayX670;rtrue;
-];
-Array TX_S_193 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_193;
-[ R_TX_S_194 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [eat] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [eat] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: eat]
- ConjugateVerb_29(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say682; .L_SayX671;rtrue;
-];
-Array TX_S_194 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_194;
-[ R_TX_S_195
- tmp_0 ! Let/loop value, e.g., 'chaise': supporter
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~(first getting off [the chaise])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first getting off [the chaise])[command clarification break]~]
- say__p=1;! [2: ~(first getting off ~]
- ParaContent(); print "(first getting off ";! [3: the chaise]
- ParaContent(); print (the) tmp_0;! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say683; .L_SayX672;rtrue;
-];
-Array TX_S_195 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_195;
-[ R_TX_S_196
- tmp_0 ! Let/loop value, e.g., 'nonvehicle': object
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [would have] to get off [the nonvehicle] first.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [would have] to get off [the nonvehicle] first.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: would have]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_2); say__p=1; ! [5: ~ to get off ~]
- ParaContent(); print " to get off ";! [6: the nonvehicle]
- ParaContent(); print (the) tmp_0;! [7: ~ first.~]
- ParaContent(); print " first."; .L_Say684; .L_SayX673;rtrue;
-];
-Array TX_S_196 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_196;
-[ R_TX_S_197
- tmp_0 ! Let/loop value, e.g., 'nonvehicle': object
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [would have] to get out of [the nonvehicle] first.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [would have] to get out of [the nonvehicle] first.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: would have]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_2); say__p=1; ! [5: ~ to get out of ~]
- ParaContent(); print " to get out of ";! [6: the nonvehicle]
- ParaContent(); print (the) tmp_0;! [7: ~ first.~]
- ParaContent(); print " first."; .L_Say685; .L_SayX674;rtrue;
-];
-Array TX_S_197 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_197;
-[ R_TX_S_198 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't go] that way.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't go] that way.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't go]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_34); say__p=1; ! [5: ~ that way.~]
- ParaContent(); print " that way."; .L_Say686; .L_SayX675;rtrue;
-];
-Array TX_S_198 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_198;
-[ R_TX_S_199 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first opening [the door gone through])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first opening [the door gone through])[command clarification break]~]
- say__p=1;! [2: ~(first opening ~]
- ParaContent(); print "(first opening ";! [3: the door gone through]
- ParaContent(); print (the) (MStack-->MstVO(20007,2));! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say687; .L_SayX676;rtrue;
-];
-Array TX_S_199 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_199;
-[ R_TX_S_200 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't go] that way.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't go] that way.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't go]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_34); say__p=1; ! [5: ~ that way.~]
- ParaContent(); print " that way."; .L_Say688; .L_SayX677;rtrue;
-];
-Array TX_S_200 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_200;
-[ R_TX_S_201 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't], since [the door gone through] [lead] nowhere.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't], since [the door gone through] [lead] nowhere.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~, since ~]
- ParaContent(); print ", since ";! [6: the door gone through]
- ParaContent(); print (the) (MStack-->MstVO(20007,2));! [7: ~ ~]
- ParaContent(); print " ";! [8: lead]
- ConjugateVerb_39(CV_POS, PNToVP(), story_tense); say__p=1; ! [9: ~ nowhere.~]
- ParaContent(); print " nowhere."; .L_Say689; .L_SayX678;rtrue;
-];
-Array TX_S_201 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_201;
-[ R_TX_S_202 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [go] up~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [go] up~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: go]
- ConjugateVerb_34(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ up~]
- ParaContent(); print " up"; .L_Say690; .L_SayX679;rtrue;
-];
-Array TX_S_202 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_202;
-[ R_TX_S_203 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [go] down~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [go] down~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: go]
- ConjugateVerb_34(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ down~]
- ParaContent(); print " down"; .L_Say691; .L_SayX680;rtrue;
-];
-Array TX_S_203 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_203;
-[ R_TX_S_204 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [go] [noun]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [go] [noun]~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: go]
- ConjugateVerb_34(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: noun]
- ParaContent(); PrintShortName(noun); .L_Say692; .L_SayX681;rtrue;
-];
-Array TX_S_204 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_204;
-[ R_TX_S_205
- tmp_0 ! Let/loop value, e.g., 'back way': direction
- tmp_1 ! Let/loop value, e.g., 'room back the other way': room
- tmp_2 ! Let/loop value, e.g., 'room normally this way': room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive] from above~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive] from above~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ from above~]
- ParaContent(); print " from above"; .L_Say693; .L_SayX682;rtrue;
-];
-Array TX_S_205 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_205;
-[ R_TX_S_206
- tmp_0 ! Let/loop value, e.g., 'back way': direction
- tmp_1 ! Let/loop value, e.g., 'room back the other way': room
- tmp_2 ! Let/loop value, e.g., 'room normally this way': room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive] from below~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive] from below~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ from below~]
- ParaContent(); print " from below"; .L_Say694; .L_SayX683;rtrue;
-];
-Array TX_S_206 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_206;
-[ R_TX_S_207
- tmp_0 ! Let/loop value, e.g., 'back way': direction
- tmp_1 ! Let/loop value, e.g., 'room back the other way': room
- tmp_2 ! Let/loop value, e.g., 'room normally this way': room
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive] from [the back way]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive] from [the back way]~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ from ~]
- ParaContent(); print " from ";! [6: the back way]
- ParaContent(); print (the) tmp_0; .L_Say695; .L_SayX684;rtrue;
-];
-Array TX_S_207 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_207;
-[ R_TX_S_208
- tmp_0 ! Let/loop value, e.g., 'back way': direction
- tmp_1 ! Let/loop value, e.g., 'room back the other way': room
- tmp_2 ! Let/loop value, e.g., 'room normally this way': room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive]~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; .L_Say696; .L_SayX685;rtrue;
-];
-Array TX_S_208 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_208;
-[ R_TX_S_209
- tmp_0 ! Let/loop value, e.g., 'back way': direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive] at [the room gone to] from above~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive] at [the room gone to] from above~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ at ~]
- ParaContent(); print " at ";! [6: the room gone to]
- ParaContent(); print (the) (MStack-->MstVO(20007,1));! [7: ~ from above~]
- ParaContent(); print " from above"; .L_Say697; .L_SayX686;rtrue;
-];
-Array TX_S_209 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_209;
-[ R_TX_S_210
- tmp_0 ! Let/loop value, e.g., 'back way': direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive] at [the room gone to] from below~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive] at [the room gone to] from below~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ at ~]
- ParaContent(); print " at ";! [6: the room gone to]
- ParaContent(); print (the) (MStack-->MstVO(20007,1));! [7: ~ from below~]
- ParaContent(); print " from below"; .L_Say698; .L_SayX687;rtrue;
-];
-Array TX_S_210 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_210;
-[ R_TX_S_211
- tmp_0 ! Let/loop value, e.g., 'back way': direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-tmp_2=LocalParking-->2;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive] at [the room gone to] from [the back way]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive] at [the room gone to] from [the back way]~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ at ~]
- ParaContent(); print " at ";! [6: the room gone to]
- ParaContent(); print (the) (MStack-->MstVO(20007,1));! [7: ~ from ~]
- ParaContent(); print " from ";! [8: the back way]
- ParaContent(); print (the) tmp_0; .L_Say699; .L_SayX688;rtrue;
-];
-Array TX_S_211 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_211;
-[ R_TX_S_212
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [go] through [the noun]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [go] through [the noun]~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: go]
- ConjugateVerb_34(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ through ~]
- ParaContent(); print " through ";! [6: the noun]
- ParaContent(); print (the) noun; .L_Say700; .L_SayX689;rtrue;
-];
-Array TX_S_212 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_212;
-[ R_TX_S_213
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [arrive] from [the noun]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [arrive] from [the noun]~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: arrive]
- ConjugateVerb_23(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ from ~]
- ParaContent(); print " from ";! [6: the noun]
- ParaContent(); print (the) noun; .L_Say701; .L_SayX690;rtrue;
-];
-Array TX_S_213 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_213;
-[ R_TX_S_214
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~on [the vehicle gone by]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~on [the vehicle gone by]~]
- say__p=1;! [2: ~on ~]
- ParaContent(); print "on ";! [3: the vehicle gone by]
- ParaContent(); print (the) (MStack-->MstVO(20007,3)); .L_Say702; .L_SayX691;rtrue;
-];
-Array TX_S_214 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_214;
-[ R_TX_S_215
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~in [the vehicle gone by]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~in [the vehicle gone by]~]
- say__p=1;! [2: ~in ~]
- ParaContent(); print "in ";! [3: the vehicle gone by]
- ParaContent(); print (the) (MStack-->MstVO(20007,3)); .L_Say703; .L_SayX692;rtrue;
-];
-Array TX_S_215 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_215;
-[ R_TX_S_216
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, pushing [the thing gone with] in front, and [us] along too~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, pushing [the thing gone with] in front, and [us] along too~]
- say__p=1;! [2: ~, pushing ~]
- ParaContent(); print ", pushing ";! [3: the thing gone with]
- ParaContent(); print (the) (MStack-->MstVO(20007,4));! [4: ~ in front, and ~]
- ParaContent(); print " in front, and ";! [5: us]
- ParaContent(); (PHR_764_r11 ());! [6: ~ along too~]
- ParaContent(); print " along too"; .L_Say704; .L_SayX693;rtrue;
-];
-Array TX_S_216 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_216;
-[ R_TX_S_217
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, pushing [the thing gone with] in front~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, pushing [the thing gone with] in front~]
- say__p=1;! [2: ~, pushing ~]
- ParaContent(); print ", pushing ";! [3: the thing gone with]
- ParaContent(); print (the) (MStack-->MstVO(20007,4));! [4: ~ in front~]
- ParaContent(); print " in front"; .L_Say705; .L_SayX694;rtrue;
-];
-Array TX_S_217 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_217;
-[ R_TX_S_218
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, pushing [the thing gone with] away~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, pushing [the thing gone with] away~]
- say__p=1;! [2: ~, pushing ~]
- ParaContent(); print ", pushing ";! [3: the thing gone with]
- ParaContent(); print (the) (MStack-->MstVO(20007,4));! [4: ~ away~]
- ParaContent(); print " away"; .L_Say706; .L_SayX695;rtrue;
-];
-Array TX_S_218 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_218;
-[ R_TX_S_219
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, pushing [the thing gone with] in~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, pushing [the thing gone with] in~]
- say__p=1;! [2: ~, pushing ~]
- ParaContent(); print ", pushing ";! [3: the thing gone with]
- ParaContent(); print (the) (MStack-->MstVO(20007,4));! [4: ~ in~]
- ParaContent(); print " in"; .L_Say707; .L_SayX696;rtrue;
-];
-Array TX_S_219 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_219;
-[ R_TX_S_220
- tmp_0 ! Let/loop value: direction
- tmp_1 ! Let/loop value: room
- tmp_2 ! Let/loop value: room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~, taking [us] along~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~, taking [us] along~]
- say__p=1;! [2: ~, taking ~]
- ParaContent(); print ", taking ";! [3: us]
- ParaContent(); (PHR_764_r11 ());! [4: ~ along~]
- ParaContent(); print " along"; .L_Say708; .L_SayX697;rtrue;
-];
-Array TX_S_220 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_220;
-[ R_TX_S_221
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~But [we]['re] already on [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~But [we]['re] already on [the noun].~]
- say__p=1;! [2: ~But ~]
- ParaContent(); print "But ";! [3: we]
- ParaContent(); (PHR_763_r10 ());! [4: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ already on ~]
- ParaContent(); print " already on ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say709; .L_SayX698;rtrue;
-];
-Array TX_S_221 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_221;
-[ R_TX_S_222
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~But [we]['re] already in [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~But [we]['re] already in [the noun].~]
- say__p=1;! [2: ~But ~]
- ParaContent(); print "But ";! [3: we]
- ParaContent(); (PHR_763_r10 ());! [4: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ already in ~]
- ParaContent(); print " already in ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say710; .L_SayX699;rtrue;
-];
-Array TX_S_222 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_222;
-[ R_TX_S_223 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] not something [we] [can] stand on.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] not something [we] [can] stand on.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ not something ~]
- ParaContent(); print " not something ";! [5: we]
- ParaContent(); (PHR_763_r10 ());! [6: ~ ~]
- ParaContent(); print " ";! [7: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [8: ~ stand on.~]
- ParaContent(); print " stand on."; .L_Say711; .L_SayX700;rtrue;
-];
-Array TX_S_223 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_223;
-[ R_TX_S_224 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] not something [we] [can] sit down on.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] not something [we] [can] sit down on.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ not something ~]
- ParaContent(); print " not something ";! [5: we]
- ParaContent(); (PHR_763_r10 ());! [6: ~ ~]
- ParaContent(); print " ";! [7: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [8: ~ sit down on.~]
- ParaContent(); print " sit down on."; .L_Say712; .L_SayX701;rtrue;
-];
-Array TX_S_224 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_224;
-[ R_TX_S_225 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] not something [we] [can] lie down on.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] not something [we] [can] lie down on.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ not something ~]
- ParaContent(); print " not something ";! [5: we]
- ParaContent(); (PHR_763_r10 ());! [6: ~ ~]
- ParaContent(); print " ";! [7: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [8: ~ lie down on.~]
- ParaContent(); print " lie down on."; .L_Say713; .L_SayX702;rtrue;
-];
-Array TX_S_225 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_225;
-[ R_TX_S_226 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] not something [we] [can] enter.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] not something [we] [can] enter.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ not something ~]
- ParaContent(); print " not something ";! [5: we]
- ParaContent(); (PHR_763_r10 ());! [6: ~ ~]
- ParaContent(); print " ";! [7: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [8: ~ enter.~]
- ParaContent(); print " enter."; .L_Say714; .L_SayX703;rtrue;
-];
-Array TX_S_226 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_226;
-[ R_TX_S_227 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't get] into the closed [noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't get] into the closed [noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't get]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_32); say__p=1; ! [5: ~ into the closed ~]
- ParaContent(); print " into the closed ";! [6: noun]
- ParaContent(); PrintShortName(noun);! [7: ~.~]
- ParaContent(); print "."; .L_Say715; .L_SayX704;rtrue;
-];
-Array TX_S_227 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_227;
-[ R_TX_S_228 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no more room on [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no more room on [the noun].~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no more room on ~]
- ParaContent(); print " no more room on ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say716; .L_SayX705;rtrue;
-];
-Array TX_S_228 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_228;
-[ R_TX_S_229 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no more room in [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no more room in [the noun].~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no more room in ~]
- ParaContent(); print " no more room in ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say717; .L_SayX706;rtrue;
-];
-Array TX_S_229 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_229;
-[ R_TX_S_230
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can] only get into something free-standing.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can] only get into something free-standing.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ only get into something free-standing.~]
- ParaContent(); print " only get into something free-standing."; .L_Say718; .L_SayX707;rtrue;
-];
-Array TX_S_230 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_230;
-[ R_TX_S_231
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'current home': object
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~(getting off [the current home])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(getting off [the current home])[command clarification break]~]
- say__p=1;! [2: ~(getting off ~]
- ParaContent(); print "(getting off ";! [3: the current home]
- ParaContent(); print (the) tmp_1;! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say719; .L_SayX708;rtrue;
-];
-Array TX_S_231 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_231;
-[ R_TX_S_232
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'current home': object
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~(getting out of [the current home])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(getting out of [the current home])[command clarification break]~]
- say__p=1;! [2: ~(getting out of ~]
- ParaContent(); print "(getting out of ";! [3: the current home]
- ParaContent(); print (the) tmp_1;! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say720; .L_SayX709;rtrue;
-];
-Array TX_S_232 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_232;
-[ R_TX_S_233
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'target': object
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~(getting onto [the target])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(getting onto [the target])[command clarification break]~]
- say__p=1;! [2: ~(getting onto ~]
- ParaContent(); print "(getting onto ";! [3: the target]
- ParaContent(); print (the) tmp_1;! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say721; .L_SayX710;rtrue;
-];
-Array TX_S_233 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_233;
-[ R_TX_S_234
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'target': object
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~(getting into [the target])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(getting into [the target])[command clarification break]~]
- say__p=1;! [2: ~(getting into ~]
- ParaContent(); print "(getting into ";! [3: the target]
- ParaContent(); print (the) tmp_1;! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say722; .L_SayX711;rtrue;
-];
-Array TX_S_234 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_234;
-[ R_TX_S_235
- tmp_0 ! Let/loop value, e.g., 'local ceiling': object
- tmp_1 ! Let/loop value, e.g., 'target': object
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~(entering [the target])[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(entering [the target])[command clarification break]~]
- say__p=1;! [2: ~(entering ~]
- ParaContent(); print "(entering ";! [3: the target]
- ParaContent(); print (the) tmp_1;! [4: ~)~]
- ParaContent(); print ")";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say723; .L_SayX712;rtrue;
-];
-Array TX_S_235 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_235;
-[ R_TX_S_236 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [get] onto [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [get] onto [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ onto ~]
- ParaContent(); print " onto ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say724; .L_SayX713;rtrue;
-];
-Array TX_S_236 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_236;
-[ R_TX_S_237 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [get] into [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [get] into [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ into ~]
- ParaContent(); print " into ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say725; .L_SayX714;rtrue;
-];
-Array TX_S_237 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_237;
-[ R_TX_S_238 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [get] into [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [get] into [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ into ~]
- ParaContent(); print " into ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say726; .L_SayX715;rtrue;
-];
-Array TX_S_238 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_238;
-[ R_TX_S_239 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [get] onto [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [get] onto [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ onto ~]
- ParaContent(); print " onto ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say727; .L_SayX716;rtrue;
-];
-Array TX_S_239 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_239;
-[ R_TX_S_240
- tmp_0 ! Let/loop value, e.g., 'local room': room
- ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~But [we] [aren't] in anything at the [if story tense is present
- tense]moment[otherwise]time[end if].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~But [we] [aren't] in anything at the [if story tense is present tense]moment[otherwise]time[end if].~]
- say__p=1;! [2: ~But ~]
- ParaContent(); print "But ";! [3: we]
- ParaContent(); (PHR_763_r10 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ in anything at the ~]
- ParaContent(); print " in anything at the ";! [7: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say728;! [8: ~moment~]
- ParaContent(); print "moment";! [9: otherwise]
-
- jump L_SayX717; .L_Say728;! [10: ~time~]
- ParaContent(); print "time";! [11: end if]
-
- .L_Say729; .L_SayX717;! [12: ~.~]
- ParaContent(); print "."; .L_Say730; .L_SayX718;rtrue;
-];
-Array TX_S_240 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_240;
-[ R_TX_S_241
- tmp_0 ! Let/loop value, e.g., 'cage': container
- ;
- tmp_0=LocalParking-->0;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~You can't get out of the closed [cage].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~You can't get out of the closed [cage].~]
- say__p=1;! [2: ~You can't get out of the closed ~]
- ParaContent(); print "You can't get out of the closed ";! [3: cage]
- ParaContent(); PrintShortName(tmp_0);! [4: ~.~]
- ParaContent(); print "."; .L_Say731; .L_SayX719;rtrue;
-];
-Array TX_S_241 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_241;
-[ R_TX_S_242 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [get] off [the container exited from].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [get] off [the container exited from].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ off ~]
- ParaContent(); print " off ";! [6: the container exited from]
- ParaContent(); print (the) (MStack-->MstVO(20009,0));! [7: ~.~]
- ParaContent(); print "."; .L_Say732; .L_SayX720;rtrue;
-];
-Array TX_S_242 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_242;
-[ R_TX_S_243 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [get] out of [the container exited from].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [get] out of [the container exited from].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ out of ~]
- ParaContent(); print " out of ";! [6: the container exited from]
- ParaContent(); print (the) (MStack-->MstVO(20009,0));! [7: ~.~]
- ParaContent(); print "."; .L_Say733; .L_SayX721;rtrue;
-];
-Array TX_S_243 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_243;
-[ R_TX_S_244 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [get] out of [the container exited from].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [get] out of [the container exited from].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ out of ~]
- ParaContent(); print " out of ";! [6: the container exited from]
- ParaContent(); print (the) (MStack-->MstVO(20009,0));! [7: ~.~]
- ParaContent(); print "."; .L_Say734; .L_SayX722;rtrue;
-];
-Array TX_S_244 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_244;
-[ R_TX_S_245 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~But [we] [aren't] on [the noun] at the [if story tense is present
- tense]moment[otherwise]time[end if].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~But [we] [aren't] on [the noun] at the [if story tense is present tense]moment[otherwise]time[end if].~]
- say__p=1;! [2: ~But ~]
- ParaContent(); print "But ";! [3: we]
- ParaContent(); (PHR_763_r10 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ on ~]
- ParaContent(); print " on ";! [7: the noun]
- ParaContent(); print (the) noun;! [8: ~ at the ~]
- ParaContent(); print " at the ";! [9: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say735;! [10: ~moment~]
- ParaContent(); print "moment";! [11: otherwise]
-
- jump L_SayX723; .L_Say735;! [12: ~time~]
- ParaContent(); print "time";! [13: end if]
-
- .L_Say736; .L_SayX723;! [14: ~.~]
- ParaContent(); print "."; .L_Say737; .L_SayX724;rtrue;
-];
-Array TX_S_245 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_245;
-[ R_TX_S_246 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [get] off [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [get] off [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: get]
- ConjugateVerb_32(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ off ~]
- ParaContent(); print " off ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say738; .L_SayX725;rtrue;
-];
-Array TX_S_246 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_246;
-[ R_TX_S_247 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Darkness~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Darkness~]
- say__p=1;! [2: ~Darkness~]
- ParaContent(); print "Darkness"; .L_Say739; .L_SayX726;rtrue;
-];
-Array TX_S_247 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_247;
-[ R_TX_S_248
- tmp_0 ! Let/loop value, e.g., 'intermediate level': object
- tmp_1 ! Let/loop value, e.g., 'intermediate level count': number
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~ (on [the intermediate level])~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ (on [the intermediate level])~]
- say__p=1;! [2: ~ (on ~]
- ParaContent(); print " (on ";! [3: the intermediate level]
- ParaContent(); print (the) tmp_0;! [4: ~)~]
- ParaContent(); print ")"; .L_Say740; .L_SayX727;rtrue;
-];
-Array TX_S_248 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_248;
-[ R_TX_S_249
- tmp_0 ! Let/loop value, e.g., 'intermediate level': object
- tmp_1 ! Let/loop value, e.g., 'intermediate level count': number
- ;
- tmp_0=LocalParking-->0;
-tmp_1=LocalParking-->1;
-#ifdef DEBUG; if (suppress_text_substitution) { print "~ (in [the intermediate level])~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~ (in [the intermediate level])~]
- say__p=1;! [2: ~ (in ~]
- ParaContent(); print " (in ";! [3: the intermediate level]
- ParaContent(); print (the) tmp_0;! [4: ~)~]
- ParaContent(); print ")"; .L_Say741; .L_SayX728;rtrue;
-];
-Array TX_S_249 --> CONSTANT_PERISHABLE_TEXT_STORAGE R_TX_S_249;
-[ R_TX_S_250 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[It] [are] pitch dark, and [we] [can't see] a thing.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[It] [are] pitch dark, and [we] [can't see] a thing.~]
- say__p=1;! [2: it]
- ParaContent(); (PHR_789_r36 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ pitch dark, and ~]
- ParaContent(); print " pitch dark, and ";! [6: we]
- ParaContent(); (PHR_763_r10 ());! [7: ~ ~]
- ParaContent(); print " ";! [8: can't see]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_16); say__p=1; ! [9: ~ a thing.~]
- ParaContent(); print " a thing."; .L_Say742; .L_SayX729;rtrue;
-];
-Array TX_S_250 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_250;
-[ R_TX_S_251 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [look] around.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [look] around.~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: look]
- ConjugateVerb_43(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ around.~]
- ParaContent(); print " around."; .L_Say743; .L_SayX730;rtrue;
-];
-Array TX_S_251 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_251;
-[ R_TX_S_252 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [see] nothing unexpected in that direction.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [see] nothing unexpected in that direction.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: see]
- ConjugateVerb_16(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing unexpected in that direction.~]
- ParaContent(); print " nothing unexpected in that direction."; .L_Say744; .L_SayX731;rtrue;
-];
-Array TX_S_252 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_252;
-[ R_TX_S_253 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~In [the noun] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~In [the noun] ~]
- say__p=1;! [2: ~In ~]
- ParaContent(); print "In ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ ~]
- ParaContent(); print " "; .L_Say745; .L_SayX732;rtrue;
-];
-Array TX_S_253 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_253;
-[ R_TX_S_254 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [are] empty.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [are] empty.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ empty.~]
- ParaContent(); print " empty."; .L_Say746; .L_SayX733;rtrue;
-];
-Array TX_S_254 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_254;
-[ R_TX_S_255 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~On [the noun] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~On [the noun] ~]
- say__p=1;! [2: ~On ~]
- ParaContent(); print "On ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ ~]
- ParaContent(); print " "; .L_Say747; .L_SayX734;rtrue;
-];
-Array TX_S_255 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_255;
-[ R_TX_S_256 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [are] [if story tense is present tense]currently [end if]switched
- [if the noun is switched on]on[otherwise]off[end if].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [are] [if story tense is present tense]currently [end if]switched [if the noun is switched on]on[otherwise]off[end if].~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say748;! [7: ~currently ~]
- ParaContent(); print "currently ";! [8: end if]
-
- .L_Say748; .L_SayX735;! [9: ~switched ~]
- ParaContent(); print "switched ";! [10: if the noun is switched on]
-
- if (~~(((((Adj_82_t1_v10(noun))))))) jump L_Say749;! [11: ~on~]
- ParaContent(); print "on";! [12: otherwise]
-
- jump L_SayX736; .L_Say749;! [13: ~off~]
- ParaContent(); print "off";! [14: end if]
-
- .L_Say750; .L_SayX736;! [15: ~.~]
- ParaContent(); print "."; .L_Say751; .L_SayX737;rtrue;
-];
-Array TX_S_256 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_256;
-[ R_TX_S_257 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [see] nothing special about [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [see] nothing special about [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: see]
- ConjugateVerb_16(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing special about ~]
- ParaContent(); print " nothing special about ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say752; .L_SayX738;rtrue;
-];
-Array TX_S_257 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_257;
-[ R_TX_S_258 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [look] closely at [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [look] closely at [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: look]
- ConjugateVerb_43(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ closely at ~]
- ParaContent(); print " closely at ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say753; .L_SayX739;rtrue;
-];
-Array TX_S_258 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_258;
-[ R_TX_S_259 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [find] nothing of interest.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [find] nothing of interest.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: find]
- ConjugateVerb_31(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing of interest.~]
- ParaContent(); print " nothing of interest."; .L_Say754; .L_SayX740;rtrue;
-];
-Array TX_S_259 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_259;
-[ R_TX_S_260 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [look] under [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [look] under [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: look]
- ConjugateVerb_43(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ under ~]
- ParaContent(); print " under ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say755; .L_SayX741;rtrue;
-];
-Array TX_S_260 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_260;
-[ R_TX_S_261 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [find] nothing of interest.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [find] nothing of interest.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: find]
- ConjugateVerb_31(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing of interest.~]
- ParaContent(); print " nothing of interest."; .L_Say756; .L_SayX742;rtrue;
-];
-Array TX_S_261 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_261;
-[ R_TX_S_262 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't see] inside, since [the noun] [are] closed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't see] inside, since [the noun] [are] closed.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't see]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_16); say__p=1; ! [5: ~ inside, since ~]
- ParaContent(); print " inside, since ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ ~]
- ParaContent(); print " ";! [8: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [9: ~ closed.~]
- ParaContent(); print " closed."; .L_Say757; .L_SayX743;rtrue;
-];
-Array TX_S_262 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_262;
-[ R_TX_S_263 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~In [the noun] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~In [the noun] ~]
- say__p=1;! [2: ~In ~]
- ParaContent(); print "In ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ ~]
- ParaContent(); print " "; .L_Say758; .L_SayX744;rtrue;
-];
-Array TX_S_263 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_263;
-[ R_TX_S_264 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [are] empty.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [are] empty.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ empty.~]
- ParaContent(); print " empty."; .L_Say759; .L_SayX745;rtrue;
-];
-Array TX_S_264 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_264;
-[ R_TX_S_265 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~On [the noun] ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~On [the noun] ~]
- say__p=1;! [2: ~On ~]
- ParaContent(); print "On ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ ~]
- ParaContent(); print " "; .L_Say760; .L_SayX746;rtrue;
-];
-Array TX_S_265 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_265;
-[ R_TX_S_266 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] nothing on [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] nothing on [the noun].~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing on ~]
- ParaContent(); print " nothing on ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say761; .L_SayX747;rtrue;
-];
-Array TX_S_266 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_266;
-[ R_TX_S_267 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [search] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [search] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: search]
- ConjugateVerb_54(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say762; .L_SayX748;rtrue;
-];
-Array TX_S_267 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_267;
-[ R_TX_S_268 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [discover] nothing of interest in [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [discover] nothing of interest in [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: discover]
- ConjugateVerb_27(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing of interest in ~]
- ParaContent(); print " nothing of interest in ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say763; .L_SayX749;rtrue;
-];
-Array TX_S_268 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_268;
-[ R_TX_S_269 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [look] at [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [look] at [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: look]
- ConjugateVerb_43(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ at ~]
- ParaContent(); print " at ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say764; .L_SayX750;rtrue;
-];
-Array TX_S_269 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_269;
-[ R_TX_S_270 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [don't] seem to be something [we] [can] lock.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [don't] seem to be something [we] [can] lock.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: don't]
- ConjugateVerb_79(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ seem to be something ~]
- ParaContent(); print " seem to be something ";! [7: we]
- ParaContent(); (PHR_763_r10 ());! [8: ~ ~]
- ParaContent(); print " ";! [9: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [10: ~ lock.~]
- ParaContent(); print " lock."; .L_Say765; .L_SayX751;rtrue;
-];
-Array TX_S_270 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_270;
-[ R_TX_S_271 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] locked at the [if story tense is present
- tense]moment[otherwise]time[end if].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] locked at the [if story tense is present tense]moment[otherwise]time[end if].~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ locked at the ~]
- ParaContent(); print " locked at the ";! [5: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say766;! [6: ~moment~]
- ParaContent(); print "moment";! [7: otherwise]
-
- jump L_SayX752; .L_Say766;! [8: ~time~]
- ParaContent(); print "time";! [9: end if]
-
- .L_Say767; .L_SayX752;! [10: ~.~]
- ParaContent(); print "."; .L_Say768; .L_SayX753;rtrue;
-];
-Array TX_S_271 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_271;
-[ R_TX_S_272 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~First [we] [would have] to close [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~First [we] [would have] to close [the noun].~]
- say__p=1;! [2: ~First ~]
- ParaContent(); print "First ";! [3: we]
- ParaContent(); (PHR_763_r10 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: would have]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_2); say__p=1; ! [6: ~ to close ~]
- ParaContent(); print " to close ";! [7: the noun]
- ParaContent(); print (the) noun;! [8: ~.~]
- ParaContent(); print "."; .L_Say769; .L_SayX754;rtrue;
-];
-Array TX_S_272 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_272;
-[ R_TX_S_273 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the second noun][Those] [don't] seem to fit the lock.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the second noun][Those] [don't] seem to fit the lock.~]
- say__p=1;! [2: regarding the second noun]
- ParaContent(); RegardingSingleObject(second);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: don't]
- ConjugateVerb_79(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ seem to fit the lock.~]
- ParaContent(); print " seem to fit the lock."; .L_Say770; .L_SayX755;rtrue;
-];
-Array TX_S_273 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_273;
-[ R_TX_S_274 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [lock] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [lock] [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: lock]
- ConjugateVerb_42(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say771; .L_SayX756;rtrue;
-];
-Array TX_S_274 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_274;
-[ R_TX_S_275 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [lock] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [lock] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: lock]
- ConjugateVerb_42(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say772; .L_SayX757;rtrue;
-];
-Array TX_S_275 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_275;
-[ R_TX_S_276 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][Those] [don't] seem to be something [we] [can] unlock.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][Those] [don't] seem to be something [we] [can] unlock.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: don't]
- ConjugateVerb_79(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ seem to be something ~]
- ParaContent(); print " seem to be something ";! [7: we]
- ParaContent(); (PHR_763_r10 ());! [8: ~ ~]
- ParaContent(); print " ";! [9: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [10: ~ unlock.~]
- ParaContent(); print " unlock."; .L_Say773; .L_SayX758;rtrue;
-];
-Array TX_S_276 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_276;
-[ R_TX_S_277 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] unlocked at the [if story tense is present
- tense]moment[otherwise]time[end if].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] unlocked at the [if story tense is present tense]moment[otherwise]time[end if].~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ unlocked at the ~]
- ParaContent(); print " unlocked at the ";! [5: if story tense is present tense]
-
- if (~~((((story_tense == I106_present_tense))))) jump L_Say774;! [6: ~moment~]
- ParaContent(); print "moment";! [7: otherwise]
-
- jump L_SayX759; .L_Say774;! [8: ~time~]
- ParaContent(); print "time";! [9: end if]
-
- .L_Say775; .L_SayX759;! [10: ~.~]
- ParaContent(); print "."; .L_Say776; .L_SayX760;rtrue;
-];
-Array TX_S_277 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_277;
-[ R_TX_S_278 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the second noun][Those] [don't] seem to fit the lock.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the second noun][Those] [don't] seem to fit the lock.~]
- say__p=1;! [2: regarding the second noun]
- ParaContent(); RegardingSingleObject(second);! [3: those]
- ParaContent(); (PHR_774_r21 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: don't]
- ConjugateVerb_79(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ seem to fit the lock.~]
- ParaContent(); print " seem to fit the lock."; .L_Say777; .L_SayX761;rtrue;
-];
-Array TX_S_278 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_278;
-[ R_TX_S_279 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [unlock] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [unlock] [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: unlock]
- ConjugateVerb_20(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say778; .L_SayX762;rtrue;
-];
-Array TX_S_279 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_279;
-[ R_TX_S_280 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [unlock] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [unlock] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: unlock]
- ConjugateVerb_20(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say779; .L_SayX763;rtrue;
-];
-Array TX_S_280 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_280;
-[ R_TX_S_281 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [aren't] something [we] [can] switch.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [aren't] something [we] [can] switch.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ something ~]
- ParaContent(); print " something ";! [7: we]
- ParaContent(); (PHR_763_r10 ());! [8: ~ ~]
- ParaContent(); print " ";! [9: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [10: ~ switch.~]
- ParaContent(); print " switch."; .L_Say780; .L_SayX764;rtrue;
-];
-Array TX_S_281 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_281;
-[ R_TX_S_282 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] already on.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] already on.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ already on.~]
- ParaContent(); print " already on."; .L_Say781; .L_SayX765;rtrue;
-];
-Array TX_S_282 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_282;
-[ R_TX_S_283 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [switch] [the noun] on.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [switch] [the noun] on.~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: switch]
- ConjugateVerb_60(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ on.~]
- ParaContent(); print " on."; .L_Say782; .L_SayX766;rtrue;
-];
-Array TX_S_283 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_283;
-[ R_TX_S_284 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [aren't] something [we] [can] switch.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [aren't] something [we] [can] switch.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ something ~]
- ParaContent(); print " something ";! [7: we]
- ParaContent(); (PHR_763_r10 ());! [8: ~ ~]
- ParaContent(); print " ";! [9: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [10: ~ switch.~]
- ParaContent(); print " switch."; .L_Say783; .L_SayX767;rtrue;
-];
-Array TX_S_284 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_284;
-[ R_TX_S_285 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] already off.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] already off.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ already off.~]
- ParaContent(); print " already off."; .L_Say784; .L_SayX768;rtrue;
-];
-Array TX_S_285 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_285;
-[ R_TX_S_286 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [switch] [the noun] off.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [switch] [the noun] off.~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: switch]
- ConjugateVerb_60(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ off.~]
- ParaContent(); print " off."; .L_Say785; .L_SayX769;rtrue;
-];
-Array TX_S_286 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_286;
-[ R_TX_S_287 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [aren't] something [we] [can] open.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [aren't] something [we] [can] open.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ something ~]
- ParaContent(); print " something ";! [7: we]
- ParaContent(); (PHR_763_r10 ());! [8: ~ ~]
- ParaContent(); print " ";! [9: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [10: ~ open.~]
- ParaContent(); print " open."; .L_Say786; .L_SayX770;rtrue;
-];
-Array TX_S_287 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_287;
-[ R_TX_S_288 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [seem] to be locked.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [seem] to be locked.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: seem]
- ConjugateVerb_55(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ to be locked.~]
- ParaContent(); print " to be locked."; .L_Say787; .L_SayX771;rtrue;
-];
-Array TX_S_288 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_288;
-[ R_TX_S_289 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] already open.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] already open.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ already open.~]
- ParaContent(); print " already open."; .L_Say788; .L_SayX772;rtrue;
-];
-Array TX_S_289 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_289;
-[ R_TX_S_290 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [open] [the noun], revealing ~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [open] [the noun], revealing ~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: open]
- ConjugateVerb_45(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~, revealing ~]
- ParaContent(); print ", revealing "; .L_Say789; .L_SayX773;rtrue;
-];
-Array TX_S_290 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_290;
-[ R_TX_S_291 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [open] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [open] [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: open]
- ConjugateVerb_45(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say790; .L_SayX774;rtrue;
-];
-Array TX_S_291 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_291;
-[ R_TX_S_292 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [open] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [open] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: open]
- ConjugateVerb_45(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say791; .L_SayX775;rtrue;
-];
-Array TX_S_292 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_292;
-[ R_TX_S_293 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [open].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [open].~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: open]
- ConjugateVerb_45(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~.~]
- ParaContent(); print "."; .L_Say792; .L_SayX776;rtrue;
-];
-Array TX_S_293 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_293;
-[ R_TX_S_294 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [aren't] something [we] [can] close.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [aren't] something [we] [can] close.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ something ~]
- ParaContent(); print " something ";! [7: we]
- ParaContent(); (PHR_763_r10 ());! [8: ~ ~]
- ParaContent(); print " ";! [9: can]
- ConjugateVerb_15(CV_POS, PNToVP(), story_tense); say__p=1; ! [10: ~ close.~]
- ParaContent(); print " close."; .L_Say793; .L_SayX777;rtrue;
-];
-Array TX_S_294 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_294;
-[ R_TX_S_295 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They're] already closed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They're] already closed.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they're]
- ParaContent(); (PHR_788_r35 ());! [4: ~ already closed.~]
- ParaContent(); print " already closed."; .L_Say794; .L_SayX778;rtrue;
-];
-Array TX_S_295 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_295;
-[ R_TX_S_296 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [close] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [close] [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: close]
- ConjugateVerb_25(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say795; .L_SayX779;rtrue;
-];
-Array TX_S_296 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_296;
-[ R_TX_S_297 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [close] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [close] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: close]
- ConjugateVerb_25(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say796; .L_SayX780;rtrue;
-];
-Array TX_S_297 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_297;
-[ R_TX_S_298 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [close].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [close].~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: close]
- ConjugateVerb_25(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~.~]
- ParaContent(); print "."; .L_Say797; .L_SayX781;rtrue;
-];
-Array TX_S_298 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_298;
-[ R_TX_S_299 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't wear] [regarding the noun][those]!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't wear] [regarding the noun][those]!~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't wear]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_13); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [7: those]
- ParaContent(); (PHR_773_r20 ());! [8: ~!~]
- ParaContent(); print "!"; .L_Say798; .L_SayX782;rtrue;
-];
-Array TX_S_299 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_299;
-[ R_TX_S_300 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [aren't] holding [regarding the noun][those]!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [aren't] holding [regarding the noun][those]!~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ holding ~]
- ParaContent(); print " holding ";! [6: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [7: those]
- ParaContent(); (PHR_773_r20 ());! [8: ~!~]
- ParaContent(); print "!"; .L_Say799; .L_SayX783;rtrue;
-];
-Array TX_S_300 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_300;
-[ R_TX_S_301 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We]['re] already wearing [regarding the noun][those]!~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We]['re] already wearing [regarding the noun][those]!~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ already wearing ~]
- ParaContent(); print " already wearing ";! [5: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [6: those]
- ParaContent(); (PHR_773_r20 ());! [7: ~!~]
- ParaContent(); print "!"; .L_Say800; .L_SayX784;rtrue;
-];
-Array TX_S_301 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_301;
-[ R_TX_S_302 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [put] on [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [put] on [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: put]
- ConjugateVerb_51(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ on ~]
- ParaContent(); print " on ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say801; .L_SayX785;rtrue;
-];
-Array TX_S_302 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_302;
-[ R_TX_S_303 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [put] on [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [put] on [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: put]
- ConjugateVerb_51(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ on ~]
- ParaContent(); print " on ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say802; .L_SayX786;rtrue;
-];
-Array TX_S_303 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_303;
-[ R_TX_S_304 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [aren't] wearing [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [aren't] wearing [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ wearing ~]
- ParaContent(); print " wearing ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say803; .L_SayX787;rtrue;
-];
-Array TX_S_304 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_304;
-[ R_TX_S_305 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We]['re] carrying too many things already.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We]['re] carrying too many things already.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: 're]
- ConjugateVerb_74(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ carrying too many things already.~]
- ParaContent(); print " carrying too many things already."; .L_Say804; .L_SayX788;rtrue;
-];
-Array TX_S_305 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_305;
-[ R_TX_S_306 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [take] off [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [take] off [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: take]
- ConjugateVerb_61(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ off ~]
- ParaContent(); print " off ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say805; .L_SayX789;rtrue;
-];
-Array TX_S_306 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_306;
-[ R_TX_S_307 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [take] off [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [take] off [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: take]
- ConjugateVerb_61(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ off ~]
- ParaContent(); print " off ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say806; .L_SayX790;rtrue;
-];
-Array TX_S_307 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_307;
-[ R_TX_S_308 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [aren't] holding [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [aren't] holding [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ holding ~]
- ParaContent(); print " holding ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say807; .L_SayX791;rtrue;
-];
-Array TX_S_308 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_308;
-[ R_TX_S_309 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [can't give] [the noun] to [ourselves].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [can't give] [the noun] to [ourselves].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: can't give]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_33); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ to ~]
- ParaContent(); print " to ";! [8: ourselves]
- ParaContent(); (PHR_766_r13 ());! [9: ~.~]
- ParaContent(); print "."; .L_Say808; .L_SayX792;rtrue;
-];
-Array TX_S_309 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_309;
-[ R_TX_S_310 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The second noun] [aren't] able to receive things.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The second noun] [aren't] able to receive things.~]
- say__p=1;! [2: the second noun]
- ParaContent(); print (The) second;! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ able to receive things.~]
- ParaContent(); print " able to receive things."; .L_Say809; .L_SayX793;rtrue;
-];
-Array TX_S_310 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_310;
-[ R_TX_S_311 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first taking [the noun] off)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first taking [the noun] off)[command clarification break]~]
- say__p=1;! [2: ~(first taking ~]
- ParaContent(); print "(first taking ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ off)~]
- ParaContent(); print " off)";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say810; .L_SayX794;rtrue;
-];
-Array TX_S_311 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_311;
-[ R_TX_S_312 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The second noun] [don't] seem interested.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The second noun] [don't] seem interested.~]
- say__p=1;! [2: the second noun]
- ParaContent(); print (The) second;! [3: ~ ~]
- ParaContent(); print " ";! [4: don't]
- ConjugateVerb_79(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ seem interested.~]
- ParaContent(); print " seem interested."; .L_Say811; .L_SayX795;rtrue;
-];
-Array TX_S_312 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_312;
-[ R_TX_S_313 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The second noun] [are] carrying too many things already.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The second noun] [are] carrying too many things already.~]
- say__p=1;! [2: the second noun]
- ParaContent(); print (The) second;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ carrying too many things already.~]
- ParaContent(); print " carrying too many things already."; .L_Say812; .L_SayX796;rtrue;
-];
-Array TX_S_313 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_313;
-[ R_TX_S_314 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [give] [the noun] to [the second noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [give] [the noun] to [the second noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: give]
- ConjugateVerb_33(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ to ~]
- ParaContent(); print " to ";! [8: the second noun]
- ParaContent(); print (the) second;! [9: ~.~]
- ParaContent(); print "."; .L_Say813; .L_SayX797;rtrue;
-];
-Array TX_S_314 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_314;
-[ R_TX_S_315 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [give] [the noun] to [us].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [give] [the noun] to [us].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: give]
- ConjugateVerb_33(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ to ~]
- ParaContent(); print " to ";! [8: us]
- ParaContent(); (PHR_764_r11 ());! [9: ~.~]
- ParaContent(); print "."; .L_Say814; .L_SayX798;rtrue;
-];
-Array TX_S_315 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_315;
-[ R_TX_S_316 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [give] [the noun] to [the second noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [give] [the noun] to [the second noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: give]
- ConjugateVerb_33(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~ to ~]
- ParaContent(); print " to ";! [8: the second noun]
- ParaContent(); print (the) second;! [9: ~.~]
- ParaContent(); print "."; .L_Say815; .L_SayX799;rtrue;
-];
-Array TX_S_316 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_316;
-[ R_TX_S_317 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [aren't] holding [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [aren't] holding [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ holding ~]
- ParaContent(); print " holding ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say816; .L_SayX800;rtrue;
-];
-Array TX_S_317 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_317;
-[ R_TX_S_318 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The second noun] [are] unimpressed.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The second noun] [are] unimpressed.~]
- say__p=1;! [2: the second noun]
- ParaContent(); print (The) second;! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ unimpressed.~]
- ParaContent(); print " unimpressed."; .L_Say817; .L_SayX801;rtrue;
-];
-Array TX_S_318 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_318;
-[ R_TX_S_319 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~That [seem] unnecessary.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~That [seem] unnecessary.~]
- say__p=1;! [2: ~That ~]
- ParaContent(); print "That ";! [3: seem]
- ConjugateVerb_55(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ unnecessary.~]
- ParaContent(); print " unnecessary."; .L_Say818; .L_SayX802;rtrue;
-];
-Array TX_S_319 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_319;
-[ R_TX_S_320 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~(first taking [the noun] off)[command clarification break]~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~(first taking [the noun] off)[command clarification break]~]
- say__p=1;! [2: ~(first taking ~]
- ParaContent(); print "(first taking ";! [3: the noun]
- ParaContent(); print (the) noun;! [4: ~ off)~]
- ParaContent(); print " off)";! [5: command clarification break]
- ParaContent(); CommandClarificationBreak(); .L_Say819; .L_SayX803;rtrue;
-];
-Array TX_S_320 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_320;
-[ R_TX_S_321 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Futile.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Futile.~]
- say__p=1;! [2: ~Futile.~]
- ParaContent(); print "Futile."; .L_Say820; .L_SayX804;rtrue;
-];
-Array TX_S_321 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_321;
-[ R_TX_S_322 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [lack] the nerve when it [if story tense is the past
- tense]came[otherwise]comes[end if] to the crucial moment.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [lack] the nerve when it [if story tense is the past tense]came[otherwise]comes[end if] to the crucial moment.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: lack]
- ConjugateVerb_38(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ the nerve when it ~]
- ParaContent(); print " the nerve when it ";! [6: if story tense is the past tense]
-
- if (~~((((story_tense == I107_past_tense))))) jump L_Say821;! [7: ~came~]
- ParaContent(); print "came";! [8: otherwise]
-
- jump L_SayX805; .L_Say821;! [9: ~comes~]
- ParaContent(); print "comes";! [10: end if]
-
- .L_Say822; .L_SayX805;! [11: ~ to the crucial moment.~]
- ParaContent(); print " to the crucial moment."; .L_Say823; .L_SayX806;rtrue;
-];
-Array TX_S_322 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_322;
-[ R_TX_S_323 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Violence [aren't] the answer to this one.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Violence [aren't] the answer to this one.~]
- say__p=1;! [2: ~Violence ~]
- ParaContent(); print "Violence ";! [3: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ the answer to this one.~]
- ParaContent(); print " the answer to this one."; .L_Say824; .L_SayX807;rtrue;
-];
-Array TX_S_323 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_323;
-[ R_TX_S_324 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [don't] get much from that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [don't] get much from that.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: don't]
- ConjugateVerb_79(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ get much from that.~]
- ParaContent(); print " get much from that."; .L_Say825; .L_SayX808;rtrue;
-];
-Array TX_S_324 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_324;
-[ R_TX_S_325 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [might not] like that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [might not] like that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense); say__p=1; ! [5: ~ like that.~]
- ParaContent(); print " like that."; .L_Say826; .L_SayX809;rtrue;
-];
-Array TX_S_325 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_325;
-[ R_TX_S_326 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no reply.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no reply.~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no reply.~]
- ParaContent(); print " no reply."; .L_Say827; .L_SayX810;rtrue;
-];
-Array TX_S_326 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_326;
-[ R_TX_S_327 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [talk] to [ourselves] a while.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [talk] to [ourselves] a while.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: talk]
- ConjugateVerb_62(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ to ~]
- ParaContent(); print " to ";! [6: ourselves]
- ParaContent(); (PHR_766_r13 ());! [7: ~ a while.~]
- ParaContent(); print " a while."; .L_Say828; .L_SayX811;rtrue;
-];
-Array TX_S_327 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_327;
-[ R_TX_S_328 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~This [provoke] no reaction.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~This [provoke] no reaction.~]
- say__p=1;! [2: ~This ~]
- ParaContent(); print "This ";! [3: provoke]
- ConjugateVerb_48(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ no reaction.~]
- ParaContent(); print " no reaction."; .L_Say829; .L_SayX812;rtrue;
-];
-Array TX_S_328 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_328;
-[ R_TX_S_329 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There] [are] no reply.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There] [are] no reply.~]
- say__p=1;! [2: there]
- ParaContent(); (PHR_790_r37 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ no reply.~]
- ParaContent(); print " no reply."; .L_Say830; .L_SayX813;rtrue;
-];
-Array TX_S_329 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_329;
-[ R_TX_S_330 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Time [pass].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Time [pass].~]
- say__p=1;! [2: ~Time ~]
- ParaContent(); print "Time ";! [3: pass]
- ConjugateVerb_46(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~.~]
- ParaContent(); print "."; .L_Say831; .L_SayX814;rtrue;
-];
-Array TX_S_330 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_330;
-[ R_TX_S_331 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [wait].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [wait].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: wait]
- ConjugateVerb_65(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~.~]
- ParaContent(); print "."; .L_Say832; .L_SayX815;rtrue;
-];
-Array TX_S_331 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_331;
-[ R_TX_S_332 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [achieve] nothing by this.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [achieve] nothing by this.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: achieve]
- ConjugateVerb_21(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing by this.~]
- ParaContent(); print " nothing by this."; .L_Say833; .L_SayX816;rtrue;
-];
-Array TX_S_332 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_332;
-[ R_TX_S_333 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [touch] [themselves].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [touch] [themselves].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: touch]
- ConjugateVerb_18(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: themselves]
- ParaContent(); (PHR_785_r32 ());! [7: ~.~]
- ParaContent(); print "."; .L_Say834; .L_SayX817;rtrue;
-];
-Array TX_S_333 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_333;
-[ R_TX_S_334 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [might not like] that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [might not like] that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not like]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense, ConjugateVerb_40); say__p=1; ! [5: ~ that.~]
- ParaContent(); print " that."; .L_Say835; .L_SayX818;rtrue;
-];
-Array TX_S_334 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_334;
-[ R_TX_S_335 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [touch] [us].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [touch] [us].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: touch]
- ConjugateVerb_18(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: us]
- ParaContent(); (PHR_764_r11 ());! [7: ~.~]
- ParaContent(); print "."; .L_Say836; .L_SayX819;rtrue;
-];
-Array TX_S_335 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_335;
-[ R_TX_S_336 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [touch] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [touch] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: touch]
- ConjugateVerb_18(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say837; .L_SayX820;rtrue;
-];
-Array TX_S_336 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_336;
-[ R_TX_S_337 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [feel] nothing unexpected.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [feel] nothing unexpected.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: feel]
- ConjugateVerb_30(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing unexpected.~]
- ParaContent(); print " nothing unexpected."; .L_Say838; .L_SayX821;rtrue;
-];
-Array TX_S_337 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_337;
-[ R_TX_S_338 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [touch] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [touch] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: touch]
- ConjugateVerb_18(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say839; .L_SayX822;rtrue;
-];
-Array TX_S_338 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_338;
-[ R_TX_S_339 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~But [we] [aren't] holding [regarding the noun][those].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~But [we] [aren't] holding [regarding the noun][those].~]
- say__p=1;! [2: ~But ~]
- ParaContent(); print "But ";! [3: we]
- ParaContent(); (PHR_763_r10 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ holding ~]
- ParaContent(); print " holding ";! [7: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [8: those]
- ParaContent(); (PHR_773_r20 ());! [9: ~.~]
- ParaContent(); print "."; .L_Say840; .L_SayX823;rtrue;
-];
-Array TX_S_339 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_339;
-[ R_TX_S_340 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [wave] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [wave] [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: wave]
- ConjugateVerb_66(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say841; .L_SayX824;rtrue;
-];
-Array TX_S_340 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_340;
-[ R_TX_S_341 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [wave] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [wave] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: wave]
- ConjugateVerb_66(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say842; .L_SayX825;rtrue;
-];
-Array TX_S_341 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_341;
-[ R_TX_S_342 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [are] fixed in place.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [are] fixed in place.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ fixed in place.~]
- ParaContent(); print " fixed in place."; .L_Say843; .L_SayX826;rtrue;
-];
-Array TX_S_342 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_342;
-[ R_TX_S_343 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [are] unable to.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [are] unable to.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ unable to.~]
- ParaContent(); print " unable to."; .L_Say844; .L_SayX827;rtrue;
-];
-Array TX_S_343 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_343;
-[ R_TX_S_344 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [might not like] that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [might not like] that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not like]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense, ConjugateVerb_40); say__p=1; ! [5: ~ that.~]
- ParaContent(); print " that."; .L_Say845; .L_SayX828;rtrue;
-];
-Array TX_S_344 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_344;
-[ R_TX_S_345 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Nothing obvious [happen].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Nothing obvious [happen].~]
- say__p=1;! [2: ~Nothing obvious ~]
- ParaContent(); print "Nothing obvious ";! [3: happen]
- ConjugateVerb_35(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~.~]
- ParaContent(); print "."; .L_Say846; .L_SayX829;rtrue;
-];
-Array TX_S_345 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_345;
-[ R_TX_S_346 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [pull] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [pull] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: pull]
- ConjugateVerb_49(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say847; .L_SayX830;rtrue;
-];
-Array TX_S_346 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_346;
-[ R_TX_S_347 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [are] fixed in place.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [are] fixed in place.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ fixed in place.~]
- ParaContent(); print " fixed in place."; .L_Say848; .L_SayX831;rtrue;
-];
-Array TX_S_347 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_347;
-[ R_TX_S_348 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [are] unable to.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [are] unable to.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ unable to.~]
- ParaContent(); print " unable to."; .L_Say849; .L_SayX832;rtrue;
-];
-Array TX_S_348 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_348;
-[ R_TX_S_349 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [might not like] that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [might not like] that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not like]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense, ConjugateVerb_40); say__p=1; ! [5: ~ that.~]
- ParaContent(); print " that."; .L_Say850; .L_SayX833;rtrue;
-];
-Array TX_S_349 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_349;
-[ R_TX_S_350 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Nothing obvious [happen].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Nothing obvious [happen].~]
- say__p=1;! [2: ~Nothing obvious ~]
- ParaContent(); print "Nothing obvious ";! [3: happen]
- ConjugateVerb_35(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~.~]
- ParaContent(); print "."; .L_Say851; .L_SayX834;rtrue;
-];
-Array TX_S_350 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_350;
-[ R_TX_S_351 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [push] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [push] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: push]
- ConjugateVerb_50(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say852; .L_SayX835;rtrue;
-];
-Array TX_S_351 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_351;
-[ R_TX_S_352 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [are] fixed in place.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [are] fixed in place.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ fixed in place.~]
- ParaContent(); print " fixed in place."; .L_Say853; .L_SayX836;rtrue;
-];
-Array TX_S_352 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_352;
-[ R_TX_S_353 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [are] unable to.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [are] unable to.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ unable to.~]
- ParaContent(); print " unable to."; .L_Say854; .L_SayX837;rtrue;
-];
-Array TX_S_353 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_353;
-[ R_TX_S_354 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [might not like] that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [might not like] that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not like]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense, ConjugateVerb_40); say__p=1; ! [5: ~ that.~]
- ParaContent(); print " that."; .L_Say855; .L_SayX838;rtrue;
-];
-Array TX_S_354 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_354;
-[ R_TX_S_355 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Nothing obvious [happen].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Nothing obvious [happen].~]
- say__p=1;! [2: ~Nothing obvious ~]
- ParaContent(); print "Nothing obvious ";! [3: happen]
- ConjugateVerb_35(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~.~]
- ParaContent(); print "."; .L_Say856; .L_SayX839;rtrue;
-];
-Array TX_S_355 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_355;
-[ R_TX_S_356 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [turn] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [turn] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: turn]
- ConjugateVerb_64(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say857; .L_SayX840;rtrue;
-];
-Array TX_S_356 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_356;
-[ R_TX_S_357 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [cannot] be pushed from place to place.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [cannot] be pushed from place to place.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: cannot]
- ConjugateVerb_15(CV_NEG, PNToVP(), story_tense); say__p=1; ! [5: ~ be pushed from place to place.~]
- ParaContent(); print " be pushed from place to place."; .L_Say858; .L_SayX841;rtrue;
-];
-Array TX_S_357 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_357;
-[ R_TX_S_358 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[regarding the noun][They] [aren't] a direction.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[regarding the noun][They] [aren't] a direction.~]
- say__p=1;! [2: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [3: they]
- ParaContent(); (PHR_778_r25 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [6: ~ a direction.~]
- ParaContent(); print " a direction."; .L_Say859; .L_SayX842;rtrue;
-];
-Array TX_S_358 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_358;
-[ R_TX_S_359 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [cannot] be pushed up or down.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [cannot] be pushed up or down.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: cannot]
- ConjugateVerb_15(CV_NEG, PNToVP(), story_tense); say__p=1; ! [5: ~ be pushed up or down.~]
- ParaContent(); print " be pushed up or down."; .L_Say860; .L_SayX843;rtrue;
-];
-Array TX_S_359 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_359;
-[ R_TX_S_360 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [cannot] be pushed from here.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [cannot] be pushed from here.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: cannot]
- ConjugateVerb_15(CV_NEG, PNToVP(), story_tense); say__p=1; ! [5: ~ be pushed from here.~]
- ParaContent(); print " be pushed from here."; .L_Say861; .L_SayX844;rtrue;
-];
-Array TX_S_360 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_360;
-[ R_TX_S_361 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [cannot] be pushed from place to place.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [cannot] be pushed from place to place.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: cannot]
- ConjugateVerb_15(CV_NEG, PNToVP(), story_tense); say__p=1; ! [5: ~ be pushed from place to place.~]
- ParaContent(); print " be pushed from place to place."; .L_Say862; .L_SayX845;rtrue;
-];
-Array TX_S_361 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_361;
-[ R_TX_S_362 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [might not like] that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [might not like] that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not like]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense, ConjugateVerb_40); say__p=1; ! [5: ~ that.~]
- ParaContent(); print " that."; .L_Say863; .L_SayX846;rtrue;
-];
-Array TX_S_362 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_362;
-[ R_TX_S_363 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [achieve] nothing by this.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [achieve] nothing by this.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: achieve]
- ConjugateVerb_21(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing by this.~]
- ParaContent(); print " nothing by this."; .L_Say864; .L_SayX847;rtrue;
-];
-Array TX_S_363 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_363;
-[ R_TX_S_364 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [squeeze] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [squeeze] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: squeeze]
- ConjugateVerb_59(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say865; .L_SayX848;rtrue;
-];
-Array TX_S_364 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_364;
-[ R_TX_S_365 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~That was a rhetorical question.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~That was a rhetorical question.~]
- say__p=1;! [2: ~That was a rhetorical question.~]
- ParaContent(); print "That was a rhetorical question."; .L_Say866; .L_SayX849;rtrue;
-];
-Array TX_S_365 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_365;
-[ R_TX_S_366 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~That was a rhetorical question.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~That was a rhetorical question.~]
- say__p=1;! [2: ~That was a rhetorical question.~]
- ParaContent(); print "That was a rhetorical question."; .L_Say867; .L_SayX850;rtrue;
-];
-Array TX_S_366 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_366;
-[ R_TX_S_367 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~This dangerous act [would achieve] little.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~This dangerous act [would achieve] little.~]
- say__p=1;! [2: ~This dangerous act ~]
- ParaContent(); print "This dangerous act ";! [3: would achieve]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_21); say__p=1; ! [4: ~ little.~]
- ParaContent(); print " little."; .L_Say868; .L_SayX851;rtrue;
-];
-Array TX_S_367 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_367;
-[ R_TX_S_368 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~The dreadful truth [are], this [are not] a dream.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~The dreadful truth [are], this [are not] a dream.~]
- say__p=1;! [2: ~The dreadful truth ~]
- ParaContent(); print "The dreadful truth ";! [3: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~, this ~]
- ParaContent(); print ", this ";! [5: are not]
- ConjugateVerb_0(CV_NEG, PNToVP(), story_tense); say__p=1; ! [6: ~ a dream.~]
- ParaContent(); print " a dream."; .L_Say869; .L_SayX852;rtrue;
-];
-Array TX_S_368 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_368;
-[ R_TX_S_369 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~What a good idea.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~What a good idea.~]
- say__p=1;! [2: ~What a good idea.~]
- ParaContent(); print "What a good idea."; .L_Say870; .L_SayX853;rtrue;
-];
-Array TX_S_369 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_369;
-[ R_TX_S_370 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [smell] nothing unexpected.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [smell] nothing unexpected.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: smell]
- ConjugateVerb_57(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing unexpected.~]
- ParaContent(); print " nothing unexpected."; .L_Say871; .L_SayX854;rtrue;
-];
-Array TX_S_370 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_370;
-[ R_TX_S_371 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [sniff].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [sniff].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: sniff]
- ConjugateVerb_58(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~.~]
- ParaContent(); print "."; .L_Say872; .L_SayX855;rtrue;
-];
-Array TX_S_371 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_371;
-[ R_TX_S_372 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [hear] nothing unexpected.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [hear] nothing unexpected.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: hear]
- ConjugateVerb_36(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing unexpected.~]
- ParaContent(); print " nothing unexpected."; .L_Say873; .L_SayX856;rtrue;
-];
-Array TX_S_372 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_372;
-[ R_TX_S_373 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [listen].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [listen].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: listen]
- ConjugateVerb_41(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~.~]
- ParaContent(); print "."; .L_Say874; .L_SayX857;rtrue;
-];
-Array TX_S_373 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_373;
-[ R_TX_S_374 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [taste] nothing unexpected.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [taste] nothing unexpected.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: taste]
- ConjugateVerb_63(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ nothing unexpected.~]
- ParaContent(); print " nothing unexpected."; .L_Say875; .L_SayX858;rtrue;
-];
-Array TX_S_374 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_374;
-[ R_TX_S_375 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [taste] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [taste] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: taste]
- ConjugateVerb_63(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say876; .L_SayX859;rtrue;
-];
-Array TX_S_375 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_375;
-[ R_TX_S_376 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Cutting [regarding the noun][them] up [would achieve] little.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Cutting [regarding the noun][them] up [would achieve] little.~]
- say__p=1;! [2: ~Cutting ~]
- ParaContent(); print "Cutting ";! [3: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [4: them]
- ParaContent(); (PHR_781_r28 ());! [5: ~ up ~]
- ParaContent(); print " up ";! [6: would achieve]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_21); say__p=1; ! [7: ~ little.~]
- ParaContent(); print " little."; .L_Say877; .L_SayX860;rtrue;
-];
-Array TX_S_376 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_376;
-[ R_TX_S_377 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [jump] on the spot.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [jump] on the spot.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: jump]
- ConjugateVerb_37(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ on the spot.~]
- ParaContent(); print " on the spot."; .L_Say878; .L_SayX861;rtrue;
-];
-Array TX_S_377 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_377;
-[ R_TX_S_378 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [jump] on the spot.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [jump] on the spot.~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: jump]
- ConjugateVerb_37(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ on the spot.~]
- ParaContent(); print " on the spot."; .L_Say879; .L_SayX862;rtrue;
-];
-Array TX_S_378 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_378;
-[ R_TX_S_379 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [would achieve] nothing by this.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [would achieve] nothing by this.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: would achieve]
- ConjugateVerb_73(CV_POS, PNToVP(), story_tense, ConjugateVerb_21); say__p=1; ! [5: ~ nothing by this.~]
- ParaContent(); print " nothing by this."; .L_Say880; .L_SayX863;rtrue;
-];
-Array TX_S_379 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_379;
-[ R_TX_S_380 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There's] nothing suitable to drink here.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There's] nothing suitable to drink here.~]
- say__p=1;! [2: there's]
- ParaContent(); (PHR_794_r41 ());! [3: ~ nothing suitable to drink here.~]
- ParaContent(); print " nothing suitable to drink here."; .L_Say881; .L_SayX864;rtrue;
-];
-Array TX_S_380 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_380;
-[ R_TX_S_381 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Oh, don't [if American dialect option is
- active]apologize[otherwise]apologise[end if].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Oh, don't [if American dialect option is active]apologize[otherwise]apologise[end if].~]
- say__p=1;! [2: ~Oh, don't ~]
- ParaContent(); print "Oh, don't ";! [3: if american dialect option is active]
-
- if (~~(((((Adj_25_t1_v16(5))))))) jump L_Say882;! [4: ~apologize~]
- ParaContent(); print "apologize";! [5: otherwise]
-
- jump L_SayX865; .L_Say882;! [6: ~apologise~]
- ParaContent(); print "apologise";! [7: end if]
-
- .L_Say883; .L_SayX865;! [8: ~.~]
- ParaContent(); print "."; .L_Say884; .L_SayX866;rtrue;
-];
-Array TX_S_381 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_381;
-[ R_TX_S_382 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[There's] nothing sensible to swing here.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[There's] nothing sensible to swing here.~]
- say__p=1;! [2: there's]
- ParaContent(); (PHR_794_r41 ());! [3: ~ nothing sensible to swing here.~]
- ParaContent(); print " nothing sensible to swing here."; .L_Say885; .L_SayX867;rtrue;
-];
-Array TX_S_382 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_382;
-[ R_TX_S_383 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The noun] [might not like] that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The noun] [might not like] that.~]
- say__p=1;! [2: the noun]
- ParaContent(); print (The) noun;! [3: ~ ~]
- ParaContent(); print " ";! [4: might not like]
- ConjugateVerb_70(CV_NEG, PNToVP(), story_tense, ConjugateVerb_40); say__p=1; ! [5: ~ that.~]
- ParaContent(); print " that."; .L_Say886; .L_SayX868;rtrue;
-];
-Array TX_S_383 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_383;
-[ R_TX_S_384 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [rub] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [rub] [the noun].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: rub]
- ConjugateVerb_52(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say887; .L_SayX869;rtrue;
-];
-Array TX_S_384 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_384;
-[ R_TX_S_385 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [rub] [the noun].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [rub] [the noun].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: rub]
- ConjugateVerb_52(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ ~]
- ParaContent(); print " ";! [6: the noun]
- ParaContent(); print (the) noun;! [7: ~.~]
- ParaContent(); print "."; .L_Say888; .L_SayX870;rtrue;
-];
-Array TX_S_385 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_385;
-[ R_TX_S_386 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~No, [we] [can't set] [regarding the noun][those] to anything.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~No, [we] [can't set] [regarding the noun][those] to anything.~]
- say__p=1;! [2: ~No, ~]
- ParaContent(); print "No, ";! [3: we]
- ParaContent(); (PHR_763_r10 ());! [4: ~ ~]
- ParaContent(); print " ";! [5: can't set]
- ConjugateVerb_77(CV_POS, PNToVP(), story_tense, ConjugateVerb_56); say__p=1; ! [6: ~ ~]
- ParaContent(); print " ";! [7: regarding the noun]
- ParaContent(); RegardingSingleObject(noun);! [8: those]
- ParaContent(); (PHR_773_r20 ());! [9: ~ to anything.~]
- ParaContent(); print " to anything."; .L_Say889; .L_SayX871;rtrue;
-];
-Array TX_S_386 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_386;
-[ R_TX_S_387 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [wave].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [wave].~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: wave]
- ConjugateVerb_66(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~.~]
- ParaContent(); print "."; .L_Say890; .L_SayX872;rtrue;
-];
-Array TX_S_387 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_387;
-[ R_TX_S_388 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[The actor] [wave].~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[The actor] [wave].~]
- say__p=1;! [2: the actor]
- ParaContent(); print (The) actor;! [3: ~ ~]
- ParaContent(); print " ";! [4: wave]
- ConjugateVerb_66(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~.~]
- ParaContent(); print "."; .L_Say891; .L_SayX873;rtrue;
-];
-Array TX_S_388 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_388;
-[ R_TX_S_389 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Nothing [are] on sale.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Nothing [are] on sale.~]
- say__p=1;! [2: ~Nothing ~]
- ParaContent(); print "Nothing ";! [3: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ on sale.~]
- ParaContent(); print " on sale."; .L_Say892; .L_SayX874;rtrue;
-];
-Array TX_S_389 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_389;
-[ R_TX_S_390 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~Little [are] to be achieved by that.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~Little [are] to be achieved by that.~]
- say__p=1;! [2: ~Little ~]
- ParaContent(); print "Little ";! [3: are]
- ConjugateVerb_0(CV_POS, PNToVP(), story_tense); say__p=1; ! [4: ~ to be achieved by that.~]
- ParaContent(); print " to be achieved by that."; .L_Say893; .L_SayX875;rtrue;
-];
-Array TX_S_390 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_390;
-[ R_TX_S_391 ;
- #ifdef DEBUG; if (suppress_text_substitution) { print "~[We] [aren't] feeling especially drowsy.~"; rtrue; }
- #endif; ! DEBUG
- ! [1: ~[We] [aren't] feeling especially drowsy.~]
- say__p=1;! [2: we]
- ParaContent(); (PHR_768_r15 ());! [3: ~ ~]
- ParaContent(); print " ";! [4: aren't]
- ConjugateVerb_76(CV_POS, PNToVP(), story_tense); say__p=1; ! [5: ~ feeling especially drowsy.~]
- ParaContent(); print " feeling especially drowsy."; .L_Say894; .L_SayX876;rtrue;
-];
-Array TX_S_391 --> CONSTANT_PACKED_TEXT_STORAGE R_TX_S_391;
-
-
-
-Array Rel_Record_0 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "equality relation"
- RELS_TEST
- 0 KD2_relation_of_values Rel_Handler_0 "is";
-[ Rel_Handler_0
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == Y) rtrue; rfalse;
- default: RunTimeProblem(RTP_RELMINIMAL, task, 0, Rel_Record_0);
- }
- rfalse;
-];
-Array Rel_Record_1 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "provision relation"
- RELS_TEST
- 0 KD3_relation_of_objects Rel_Handler_1 "provides";
-[ Rel_Handler_1
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (false) rtrue; rfalse;
- default: RunTimeProblem(RTP_RELMINIMAL, task, 0, Rel_Record_1);
- }
- rfalse;
-];
-Array Rel_Record_3 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "universal relation"
- RELS_TEST
- 0 KD3_relation_of_objects Rel_Handler_3 "relates";
-[ Rel_Handler_3
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (((RlnGetF(X, RR_HANDLER))(X, RELS_TEST, Y))) rtrue; rfalse;
- default: RunTimeProblem(RTP_RELMINIMAL, task, 0, Rel_Record_3);
- }
- rfalse;
-];
-Array Rel_Record_5 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "meaning relation"
- RELS_TEST
- 0 KD3_relation_of_objects Rel_Handler_5 "means";
-[ Rel_Handler_5
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if ((BlkValueCompare(X(CV_MEANING), Y)==0)) rtrue; rfalse;
- default: RunTimeProblem(RTP_RELMINIMAL, task, 0, Rel_Record_5);
- }
- rfalse;
-];
-Array Rel_Record_15 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "containment relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_LOOKUP_ANY
- 0 KD3_relation_of_objects Rel_Handler_15 "contains";
-[ Rel_Handler_15
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == ContainerOf(Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_15(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(OBJECT_TY);
- } else {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_15(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(OBJECT_TY);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_15(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_15(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- objectloop (Z1 ofclass Object) {
- objectloop (Z3 ofclass Object) {
- if (Rel_Handler_15(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- objectloop (Z1 ofclass Object) {
- objectloop (Z3 ofclass Object) {
- if (Rel_Handler_15(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: MoveObject(Y,X); rtrue;
- RELS_ASSERT_FALSE: rfalse; rtrue;
- }
- rfalse;
-];
-Array Rel_Record_17 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "support relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_LOOKUP_ANY
- 0 KD4_relation_of_supporters_to_ Rel_Handler_17 "supports";
-[ Rel_Handler_17
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == SupporterOf(Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK6_First: Z1: Z1=Z1.IK6_Link) {
- if (Rel_Handler_17(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_17(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK6_First: Z1: Z1=Z1.IK6_Link) {
- if (Rel_Handler_17(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_17(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK6_First: Z1: Z1=Z1.IK6_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_17(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK6_First: Z1: Z1=Z1.IK6_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_17(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: MoveObject(Y,X); rtrue;
- RELS_ASSERT_FALSE: rfalse; rtrue;
- }
- rfalse;
-];
-Array Rel_Record_19 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "incorporation relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_LOOKUP_ANY
- 0 KD5_relation_of_things Rel_Handler_19 "incorporates";
-[ Rel_Handler_19
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == (Y.component_parent)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_19(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_19(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_19(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_19(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_19(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_19(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: MakePart(Y,X); rtrue;
- RELS_ASSERT_FALSE: rfalse; rtrue;
- }
- rfalse;
-];
-Array Rel_Record_21 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "carrying relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_LOOKUP_ANY
- 0 KD6_relation_of_people_to_thin Rel_Handler_21 "carries";
-[ Rel_Handler_21
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == CarrierOf(Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- if (Rel_Handler_21(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_21(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- if (Rel_Handler_21(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_21(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_21(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_21(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: MoveObject(Y,X); rtrue;
- RELS_ASSERT_FALSE: rfalse; rtrue;
- }
- rfalse;
-];
-Array Rel_Record_23 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "holding relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_LOOKUP_ANY
- 0 KD6_relation_of_people_to_thin Rel_Handler_23 "holds";
-[ Rel_Handler_23
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == HolderOf(Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- if (Rel_Handler_23(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_23(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- if (Rel_Handler_23(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_23(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_23(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_23(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: MoveObject(Y,X); rtrue;
- RELS_ASSERT_FALSE: rfalse; rtrue;
- }
- rfalse;
-];
-Array Rel_Record_25 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "wearing relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_LOOKUP_ANY
- 0 KD6_relation_of_people_to_thin Rel_Handler_25 "wears";
-[ Rel_Handler_25
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == WearerOf(Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- if (Rel_Handler_25(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_25(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- if (Rel_Handler_25(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_25(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_25(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK8_First: Z1: Z1=Z1.IK8_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_25(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: WearObject(Y,X); rtrue;
- RELS_ASSERT_FALSE: rfalse; rtrue;
- }
- rfalse;
-];
-Array Rel_Record_27 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "possession relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_LOOKUP_ANY
- 0 KD3_relation_of_objects Rel_Handler_27 "has";
-[ Rel_Handler_27
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == OwnerOf(Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- rfalse;
- } else {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- rfalse;
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- } else {
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- } else if (Y == RLIST_ALL_Y) {
- }
- return X;
- RELS_ASSERT_TRUE: MoveObject(Y,X); rtrue;
- RELS_ASSERT_FALSE: rfalse; rtrue;
- }
- rfalse;
-];
-Array Rel_Record_31 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "visibility relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST
- 0 KD5_relation_of_things Rel_Handler_31 "can-see";
-[ Rel_Handler_31
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (TestVisibility(X,Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_31(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_31(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_31(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_31(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_31(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_31(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- }
- rfalse;
-];
-Array Rel_Record_33 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "touchability relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST
- 0 KD5_relation_of_things Rel_Handler_33 "can-touch";
-[ Rel_Handler_33
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (TestTouchability(X,Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_33(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_33(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_33(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_33(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_33(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_33(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- }
- rfalse;
-];
-Array Rel_Record_35 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "concealment relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST
- 0 KD5_relation_of_things Rel_Handler_35 "conceals";
-[ Rel_Handler_35
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (TestConcealment(X,Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_35(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_35(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_35(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_35(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_35(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_35(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- }
- rfalse;
-];
-Array Rel_Record_37 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "enclosure relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST
- 0 KD3_relation_of_objects Rel_Handler_37 "encloses";
-[ Rel_Handler_37
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (IndirectlyContains(X,Y)) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_37(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(OBJECT_TY);
- } else {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_37(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(OBJECT_TY);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_37(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- objectloop (Z1 ofclass Object) {
- if (Rel_Handler_37(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- objectloop (Z1 ofclass Object) {
- objectloop (Z3 ofclass Object) {
- if (Rel_Handler_37(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- objectloop (Z1 ofclass Object) {
- objectloop (Z3 ofclass Object) {
- if (Rel_Handler_37(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- }
- rfalse;
-];
-Array Rel_Record_67 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "leading-through relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_X_UNIQUE+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_SHOW+RELS_ROUTE_FIND
- door_to KD7_relation_of_rooms_to_doors Rel_Handler_67 "Leading-through relates one room ( called the other side ) to various doors";
-[ Rel_Handler_67
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == (RGuard_f0_0(Y))) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK1_First: Z1: Z1=Z1.IK1_Link) {
- if (Rel_Handler_67(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=nothing: false: ) {
- if (Rel_Handler_67(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK1_First: Z1: Z1=Z1.IK1_Link) {
- if (Rel_Handler_67(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=nothing: false: ) {
- if (Rel_Handler_67(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK1_First: Z1: Z1=Z1.IK1_Link) {
- for (Z3=nothing: false: ) {
- if (Rel_Handler_67(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK1_First: Z1: Z1=Z1.IK1_Link) {
- for (Z3=nothing: false: ) {
- if (Rel_Handler_67(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: (RGuard_MT_0(X,Y)); rtrue;
- RELS_ASSERT_FALSE: (RGuard_MF_0(X,Y)); rtrue;
- RELS_SHOW: Relation_RShowOtoO(rr, false); rtrue;
- RELS_EMPTY: return Relation_EmptyOtoO(rr, false, (X == 1));
- RELS_ROUTE_FIND: return OtoVRelRouteTo(RlnGetF(rr, RR_STORAGE), X, Y);
- RELS_ROUTE_FIND_COUNT: return RelFollowVector(OtoVRelRouteTo(RlnGetF(rr, RR_STORAGE), X, Y), X, Y);
- }
- rfalse;
-];
-Array Rel_Record_69 -->
- 0 (101515264) RELATION_TY MAX_POSITIVE_NUMBER NULL NULL
- "lock-fitting relation"
- RELS_TEST+RELS_LOOKUP_ANY+RELS_LOOKUP_ALL_X+RELS_LOOKUP_ALL_Y+RELS_LIST+RELS_X_UNIQUE+RELS_ASSERT_TRUE+RELS_ASSERT_FALSE+RELS_SHOW+RELS_ROUTE_FIND
- with_key KD5_relation_of_things Rel_Handler_69 "Lock-fitting relates one thing ( called the matching key ) to various things";
-[ Rel_Handler_69
- rr ! Implied call parameter
- task ! Implied call parameter
- X ! Implied call parameter
- Y ! Implied call parameter
- Z1 ! loop counter
- Z2 ! loop counter
- Z3 ! loop counter
- Z4 ! loop counter
- ;
- switch (task) {
- RELS_TEST: if (X == (RGuard_f0_1(Y))) rtrue; rfalse;
- RELS_LOOKUP_ANY: if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_69(rr, RELS_TEST, Z1, X)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_69(rr, RELS_TEST, X, Z1)) {
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return Z1;
- }
- }
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rfalse;
- return DefaultValueOfKOV(10);
- }
- RELS_LOOKUP_ALL_X, RELS_LOOKUP_ALL_Y: LIST_OF_TY_SetLength(Y, 0);
- if (task == RELS_LOOKUP_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_69(rr, RELS_TEST, Z1, X)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- } else {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- if (Rel_Handler_69(rr, RELS_TEST, X, Z1)) {
- LIST_OF_TY_InsertItem(Y, Z1);
- }
- }
- }
- return Y;
- RELS_LIST: LIST_OF_TY_SetLength(X, 0);
- if (Y == RLIST_ALL_X) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_69(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z1, false, 0, true);
- }
- }
- }
- } else if (Y == RLIST_ALL_Y) {
- for (Z1=IK2_First: Z1: Z1=Z1.IK2_Link) {
- for (Z3=IK2_First: Z3: Z3=Z3.IK2_Link) {
- if (Rel_Handler_69(rr, RELS_TEST, Z1, Z3)) {
- LIST_OF_TY_InsertItem(X, Z3, false, 0, true);
- }
- }
- }
- }
- return X;
- RELS_ASSERT_TRUE: (RGuard_MT_1(X,Y)); rtrue;
- RELS_ASSERT_FALSE: (RGuard_MF_1(X,Y)); rtrue;
- RELS_SHOW: Relation_RShowOtoO(rr, false); rtrue;
- RELS_EMPTY: return Relation_EmptyOtoO(rr, false, (X == 1));
- RELS_ROUTE_FIND: return OtoVRelRouteTo(RlnGetF(rr, RR_STORAGE), X, Y);
- RELS_ROUTE_FIND_COUNT: return RelFollowVector(OtoVRelRouteTo(RlnGetF(rr, RR_STORAGE), X, Y), X, Y);
- }
- rfalse;
-];
-[ CreateDynamicRelations
- i ! loop counter
- rel ! new relation
- ;
- ];
-[ RProperty obj cl pr; if (obj ofclass cl) return obj.pr; return nothing; ];
-! Routines guarding leading-through(L, R)
-[ RGuard_f0_0
- X ! which is related to at most one object
- ;
- if (X ofclass K4_door) return (X.door_to);
- return nothing;
-];
-[ RGuard_f1_0
- X ! which is related to at most one object
- ;
- return nothing;
-];
-[ RGuard_T_0
- L ! left member of pair
- R ! right member of pair
- ;
- rfalse;
-];
-[ RGuard_MT_0
- L ! left member of pair
- R ! right member of pair
- ;
- if ((L ofclass K1_room) && (R ofclass K4_door)) {
- R.door_to = L; rtrue;
- }
- RunTimeProblem(RTP_RELKINDVIOLATION, L, R, Rel_Record_67);
-];
-[ RGuard_MF_0
- L ! left member of pair
- R ! right member of pair
- ;
- if ((L ofclass K1_room) && (R ofclass K4_door)) {
- Relation_NowN1toV(R,door_to,L); rtrue;
- }
- RunTimeProblem(RTP_RELKINDVIOLATION, L, R, Rel_Record_67);
-];
-! Routines guarding lock-fitting(L, R)
-[ RGuard_f0_1
- X ! which is related to at most one object
- ;
- if (X ofclass K2_thing) return (X.with_key);
- return nothing;
-];
-[ RGuard_f1_1
- X ! which is related to at most one object
- ;
- return nothing;
-];
-[ RGuard_T_1
- L ! left member of pair
- R ! right member of pair
- ;
- rfalse;
-];
-[ RGuard_MT_1
- L ! left member of pair
- R ! right member of pair
- ;
- if ((L ofclass K2_thing) && (R ofclass K2_thing)) {
- R.with_key = L; rtrue;
- }
- RunTimeProblem(RTP_RELKINDVIOLATION, L, R, Rel_Record_69);
-];
-[ RGuard_MF_1
- L ! left member of pair
- R ! right member of pair
- ;
- if ((L ofclass K2_thing) && (R ofclass K2_thing)) {
- Relation_NowN1toV(R,with_key,L); rtrue;
- }
- RunTimeProblem(RTP_RELKINDVIOLATION, L, R, Rel_Record_69);
-];
-
-
-
-
-
-
-[ Noun_Filter_0
- x ! saved value of noun
- ;
- x=noun;
- return ((noun ofclass K3_direction));
-];
-[ Noun_Filter_1
- x ! saved value of noun
- ;
- x=noun;
- return ((noun ofclass K3_direction));
-];
-[ Noun_Filter_2
- x ! saved value of noun
- ;
- x=noun;
- return ((noun ofclass K3_direction));
-];
-[ Noun_Filter_3
- x ! saved value of noun
- ;
- x=noun;
- return ((noun ofclass K2_thing) && ((Adj_82_t1_v10(noun))));
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Chronology
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Scheme I
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Present and Past
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Chronology Point
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ChronologyPoint pt;
- for (pt=0:ptpt = present_chronological_record-->pt;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Update Chronological Records Rule
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ UPDATE_CHRONOLOGICAL_RECORDS_R pt;
- for (pt=0: pt 0 0;
-
-Constant NO_PAST_TENSE_CONDS 0;
-Constant NO_PAST_TENSE_ACTIONS 0;
-
-[ TestSinglePastState
- past_flag ! Implied call parameter
- pt ! Implied call parameter
- turn_end ! Implied call parameter
- wanted ! Implied call parameter
- old ! internal use only
- new ! internal use only
- trips ! internal use only
- consecutives ! internal use only
- ;
- if (past_flag) {
- new = (past_chronological_record-->pt) & 1;
- trips = ((past_chronological_record-->pt) & $$11111110)/2;
- consecutives = ((past_chronological_record-->pt) & $$111111100000000)/256;
- } else {
- old = (present_chronological_record-->pt) & 1;
- trips = ((present_chronological_record-->pt) & $$11111110)/2;
- consecutives = ((present_chronological_record-->pt) & $$111111100000000)/256;
- switch(pt) {
- default: print "*** No such past tense condition ***^"; new = false;
- }
- if (new) {
- if (old == false) { trips++; if (trips > 127) trips = 127; }
- if (turn_end) { consecutives++; if (consecutives > 127) consecutives = 127; }
- } else {
- consecutives = 0;
- }
- present_chronological_record-->pt = new + 2*trips + 256*consecutives;
- }
- switch(wanted) {
- 0: if (new) return new;
- 1: if (new) return trips;
- 2: if (new) return consecutives+1; ! Plus one because we count the current turn
- 4: return new;
- 5: return trips;
- 6: return consecutives;
- }
- return 0;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Scheme II
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Past Action Routines
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Track Actions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TrackActions readjust oow i;
- for (i=0: PastActionsI6Routines-->i: i++) {
- if ((PastActionsI6Routines-->i).call()) {
- ! Yes, the current action matches action pattern i:
- if (readjust) continue;
- (TimesActionHasHappened-->i)++;
- if (LastTurnActionHappenedOn-->i ~= turns + 5) {
- LastTurnActionHappenedOn-->i = turns + 5;
- ActionCurrentlyHappeningFlag->i = 1;
- if (keep_silent == false)
- (TurnsActionHasBeenHappening-->i)++;
- }
- } else {
- ! No, the current action doesn't match action pattern i:
- if (oow == false) {
- if (keep_silent == false) { TurnsActionHasBeenHappening-->i = 0; }
- if (LastTurnActionHappenedOn-->i ~= turns + 5)
- ActionCurrentlyHappeningFlag->i = 0;
- }
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Chronology.i6t: Storage
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array TimesActionHasHappened-->(NO_PAST_TENSE_ACTIONS+1);
-Array TurnsActionHasBeenHappening-->(NO_PAST_TENSE_ACTIONS+1);
-Array LastTurnActionHappenedOn-->(NO_PAST_TENSE_ACTIONS+1);
-Array ActionCurrentlyHappeningFlag->(NO_PAST_TENSE_ACTIONS+1);
-
-Array past_chronological_record-->(NO_PAST_TENSE_CONDS+1);
-Array present_chronological_record-->(NO_PAST_TENSE_CONDS+1);
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Grammar
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-[ Parse_Name_GV1
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV2
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV3
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV4
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV5
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV6
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV7
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV8
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV9
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV10
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV11
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV12
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV13
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (Cond_Token_12() == GPR_FAIL) jump Fail_1;
- if (NextWordStopped() ~= 'your') jump Fail_1;
- if (NextWordStopped() ~= 'former') jump Fail_1;
- if (NextWordStopped() ~= 'self') jump Fail_1;
- try_from_wn = wn; f = true; continue;
- .Fail_1; wn = try_from_wn;
- if (Cond_Token_13() == GPR_FAIL) jump Fail_2;
- if (NextWordStopped() ~= 'my') jump Fail_2;
- if (NextWordStopped() ~= 'former') jump Fail_2;
- if (NextWordStopped() ~= 'self') jump Fail_2;
- try_from_wn = wn; f = true; continue;
- .Fail_2; wn = try_from_wn;
- if (Cond_Token_14() == GPR_FAIL) jump Fail_3;
- if (NextWordStopped() ~= 'former') jump Fail_3;
- if (NextWordStopped() ~= 'self') jump Fail_3;
- try_from_wn = wn; f = true; continue;
- .Fail_3; wn = try_from_wn;
- if (Cond_Token_15() == GPR_FAIL) jump Fail_4;
- if (NextWordStopped() ~= 'former') jump Fail_4;
- try_from_wn = wn; f = true; continue;
- .Fail_4; wn = try_from_wn;
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Parse_Name_GV93
- original_wn ! first word of text parsed
- group_wn ! first word matched against A/B/C/... disjunction
- try_from_wn ! position to try matching from
- n ! number of words matched
- f ! flag: sufficiently good match found to justify success
- w ! for use by individual grammar lines
- rv ! for use by individual grammar lines
- g ! temporary: success flag for parsing visibles
- ss ! temporary: saves 'self' in distinguishing visibles
- spn ! temporary: saves 'parsed_number' in parsing visibles
- pass ! pass counter (1 to 3)
- pass1_n ! value of n recorded during pass 1
- pass2_n ! value of n recorded during pass 2
- ;
- #ifdef DEBUG;
- if (parser_trace >= 3) print "Parse_name called^";
- #endif;
- if (parser_action == ##TheSame) return 0;
- original_wn = wn;
- for (pass = 1: pass <= 3: pass++) {
- wn = original_wn;
- try_from_wn = wn; f = false; n = 0;
- while (true) {
- ! On pass 1 only, advance wn past name property words
- ! (but do not do this for ##TheSame, when wn is undefined)
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- if (pass == 1 or 2) {
- }
- if ((parser_action ~= ##TheSame) && (pass == 1)) {
- while (WordInProperty(NextWordStopped(), self, name)) f = true;
- wn--; try_from_wn = wn;
- }
- break;
- } ! End of endless loop
- while (WordInProperty(NextWordStopped(), self, name)) n++;
- if ((f) || (n>0)) n = n + try_from_wn - original_wn;
- if (pass == 1) pass1_n = n;
- if (pass == 2) pass2_n = n;
- } ! End of pass loop
- #ifdef DEBUG;
- if (parser_trace >= 3)
- print "Pass 1: ", pass1_n, " Pass 2: ", pass2_n, " Pass 3: ", n, "^";
- #endif;
- if (pass1_n > n) n = pass1_n;
- if (pass2_n > n) n = pass2_n;
- wn = original_wn + n;
- if (n == 0) return -1;
- DetectPluralWord(original_wn, n);
- return n;
-];
-[ Consult_Grammar_94
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'restart') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_95
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'restore') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_96
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'amusing') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_97
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'quit') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_98
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'undo') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_99
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'lynne') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_100
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'stand') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_101
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'sit') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-[ Consult_Grammar_102
- range_from ! call parameter: word number of snippet start
-
- range_words ! call parameter: snippet length
-
- original_wn ! first word of text parsed
-
- group_wn ! first word matched against A/B/C/... disjunction
-
- w ! for use by individual grammar lines
-
- rv ! for use by individual grammar lines
-
- ;
- wn = range_from; original_wn = wn; rv = GPR_PREPOSITION;
- if (NextWordStopped() ~= 'lie') jump Fail_1;
- if ((range_words==0) || (wn-range_from==range_words)) return rv;
- .Fail_1; rv = GPR_PREPOSITION; wn = original_wn;
- return GPR_FAIL;
-];
-Verb 'take' 'carry' 'hold'
- * 'inventory' -> Inv
- * multi -> Take
- * 'off' noun -> Disrobe
- * noun 'off' -> Disrobe
- * multiinside 'from' noun -> Remove
- * multiinside 'off' noun -> Remove
-;
-Verb 'get'
- * 'out' / 'off' / 'down' / 'up' -> Exit
- * 'in' / 'on' -> Enter
- * multi -> Take
- * 'in' / 'into' / 'on' / 'onto' noun -> Enter
- * 'off' / 'down' noun -> GetOff
- * multiinside 'from' noun -> Remove
-;
-Verb 'pick'
- * 'up' multi -> Take
- * multi 'up' -> Take
-;
-Verb 'stand'
- * -> Exit
- * 'up' -> Exit
- * 'on' noun -> Enter
-;
-Verb 'remove'
- * held -> Disrobe
- * multiinside 'from' noun -> Remove
-;
-Verb 'shed' 'doff' 'disrobe'
- * held -> Disrobe
-;
-Verb 'wear' 'don'
- * held -> Wear
-;
-Verb 'put'
- * 'on' held -> Wear
- * held 'on' -> Wear
- * 'down' multiheld -> Drop
- * multiheld 'down' -> Drop
- * multiexcept 'in' / 'inside' / 'into' noun -> Insert
- * multiexcept 'on' / 'onto' noun -> PutOn
-;
-Verb 'insert'
- * multiexcept 'in' / 'into' noun -> Insert
-;
-Verb 'drop' 'throw' 'discard'
- * multiheld -> Drop
- * held 'at' / 'against' noun -> ThrowAt
- * multiexcept 'in' / 'into' / 'down' noun -> Insert
- * multiexcept 'on' / 'onto' noun -> PutOn
-;
-Verb 'give' 'pay' 'offer' 'feed'
- * creature held -> Give reverse
- * held 'to' creature -> Give
-;
-Verb 'show' 'present' 'display'
- * creature held -> Show reverse
- * held 'to' creature -> Show
-;
-Verb 'go' 'walk' 'run'
- * -> Go
- * noun=Noun_Filter_0 -> Go
- * noun -> Enter
- * 'into' / 'in' / 'inside' / 'through' noun -> Enter
-;
-Verb 'inventory' 'i//' 'inv'
- * -> Inv
-;
-Verb 'look' 'l//'
- * -> Look
- * noun -> Examine
- * 'at' noun -> Examine
- * 'inside' / 'in' / 'into' / 'through' noun -> Search
- * 'under' noun -> LookUnder
- * 'up' topic 'in' noun -> Consult reverse
-;
-Verb 'consult'
- * noun 'on' / 'about' topic -> Consult
-;
-Verb 'open' 'unwrap' 'uncover'
- * noun -> Open
- * noun 'with' held -> Unlock
-;
-Verb 'close' 'shut' 'cover'
- * noun -> Close
- * 'up' noun -> Close
- * 'off' noun -> SwitchOff
-;
-Verb 'enter' 'cross'
- * -> Enter
- * noun -> Enter
-;
-Verb 'sit'
- * 'on' / 'in' / 'inside' noun -> Enter
- * 'on' 'top' 'of' noun -> Enter
-;
-Verb 'exit' 'leave' 'out'
- * -> Exit
-;
-Verb 'examine' 'x//' 'watch' 'describe' 'check'
- * noun -> Examine
-;
-Verb 'read'
- * noun -> Examine
- * 'about' topic 'in' noun -> Consult reverse
- * topic 'in' noun -> Consult reverse
-;
-Verb 'yes' 'y//'
- * -> Yes
-;
-Verb 'no'
- * -> No
-;
-Verb 'sorry'
- * -> Sorry
-;
-Verb 'search'
- * noun -> Search
-;
-Verb 'wave'
- * -> WaveHands
- * noun -> Wave
-;
-Verb 'set' 'adjust'
- * noun 'to' topic -> SetTo
-;
-Verb 'pull' 'drag'
- * noun -> Pull
-;
-Verb 'push' 'move' 'shift' 'clear' 'press'
- * noun -> Push
- * noun noun=Noun_Filter_1 -> PushDir
- * noun 'to' noun=Noun_Filter_2 -> PushDir
-;
-Verb 'turn' 'rotate' 'twist' 'unscrew' 'screw'
- * noun -> Turn
- * noun 'on' -> SwitchOn
- * 'on' noun -> SwitchOn
- * noun 'off' -> SwitchOff
- * 'off' noun -> SwitchOff
-;
-Verb 'switch'
- * noun=Noun_Filter_3 -> SwitchOff
- * noun -> SwitchOn
- * 'on' noun -> SwitchOn
- * noun 'on' -> SwitchOn
- * noun 'off' -> SwitchOff
- * 'off' noun -> SwitchOff
-;
-Verb 'lock'
- * noun 'with' held -> Lock
-;
-Verb 'unlock'
- * noun 'with' held -> Unlock
-;
-Verb 'attack' 'break' 'smash' 'hit' 'fight' 'torture' 'wreck' 'crack' 'destroy' 'murder' 'kill' 'punch' 'thump'
- * noun -> Attack
-;
-Verb 'wait' 'z//'
- * -> Wait
-;
-Verb 'answer' 'say' 'shout' 'speak'
- * topic 'to' creature -> Answer reverse
-;
-Verb 'tell'
- * creature 'about' topic -> Tell
-;
-Verb 'ask'
- * creature 'for' noun -> AskFor
- * creature 'about' topic -> Ask
-;
-Verb 'eat'
- * held -> Eat
-;
-Verb 'sleep' 'nap'
- * -> Sleep
-;
-Verb 'climb' 'scale'
- * noun -> Climb
- * 'up' / 'over' noun -> Climb
-;
-Verb 'buy' 'purchase'
- * noun -> Buy
-;
-Verb 'squeeze' 'squash'
- * noun -> Squeeze
-;
-Verb 'swing'
- * noun -> Swing
- * 'on' noun -> Swing
-;
-Verb 'wake' 'awake' 'awaken'
- * -> Wake
- * 'up' -> Wake
- * creature -> WakeOther
- * creature 'up' -> WakeOther
- * 'up' creature -> WakeOther
-;
-Verb 'kiss' 'embrace' 'hug'
- * creature -> Kiss
-;
-Verb 'think'
- * -> Think
-;
-Verb 'smell' 'sniff'
- * -> Smell
- * noun -> Smell
-;
-Verb 'listen'
- * -> Listen
- * 'to' noun -> Listen
-;
-Verb 'hear'
- * noun -> Listen
-;
-Verb 'taste'
- * noun -> Taste
-;
-Verb 'touch' 'feel'
- * noun -> Touch
-;
-Verb 'rub' 'shine' 'polish' 'sweep' 'clean' 'dust' 'wipe' 'scrub'
- * noun -> Rub
-;
-Verb 'tie' 'attach' 'fasten'
- * noun 'to' noun -> Tie
-;
-Verb 'burn' 'light'
- * noun -> Burn
-;
-Verb 'drink' 'swallow' 'sip'
- * noun -> Drink
-;
-Verb 'cut' 'slice' 'prune' 'chop'
- * noun -> Cut
-;
-Verb 'jump' 'skip' 'hop'
- * -> Jump
-;
-Verb 'score'
- * -> Score
-;
-Verb 'quit'
- * -> Quit
-;
-Verb 'q//'
- * -> Quit
-;
-Verb 'save'
- * -> Save
-;
-Verb 'restart'
- * -> Restart
-;
-Verb 'restore'
- * -> Restore
-;
-Verb 'verify'
- * -> Verify
-;
-Verb 'version'
- * -> Version
-;
-Verb 'script'
- * -> ScriptOn
- * 'on' -> ScriptOn
- * 'off' -> ScriptOff
-;
-Verb 'transcript'
- * -> ScriptOn
- * 'on' -> ScriptOn
- * 'off' -> ScriptOff
-;
-Verb 'superbrief'
- * -> LMode3
-;
-Verb 'short'
- * -> LMode3
-;
-Verb 'verbose'
- * -> LMode2
-;
-Verb 'long'
- * -> LMode2
-;
-Verb 'brief'
- * -> LMode1
-;
-Verb 'normal'
- * -> LMode1
-;
-Verb 'nouns'
- * -> Pronouns
-;
-Verb 'pronouns'
- * -> Pronouns
-;
-Verb 'notify'
- * -> NotifyOn
- * 'on' -> NotifyOn
- * 'off' -> NotifyOff
-;
-
-
-
-
-
-#IFTRUE (0 == 1);
-[ UnknownVerb; verb_wordnum = 0; return 'no.verb'; ];
-[ PrintVerb v;
- if (v == 'no.verb') { print "do something to"; rtrue; }
- rfalse;
-];
-#Ifnot;
-[ UnknownVerb; rfalse; ]; [ PrintVerb v; rfalse; ];
-#ENDIF;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Deferred Propositions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Miscellaneous Loose Ends
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-
-Constant TX_PS_51 = ">";
-Constant TX_PS_58 = "? ";
-Array TX_L_58 --> CONSTANT_PACKED_TEXT_STORAGE TX_PS_58;
-Constant TX_PS_3 = "An Interactive Fiction";
-Constant TX_PS_43 = "As good-looking as ever.";
-Constant TX_PS_52 = "Fiction";
-Constant TX_PS_31 = "Living Room";
-Constant TX_PS_2 = "Lynne Simulator";
-Constant TX_PS_4 = "Lynne";
-Constant TX_PS_49 = "NUC";
-Constant TX_PS_48 = "Nintendo Switch";
-Constant TX_PS_50 = "PS2";
-Constant TX_PS_44 = "Petra";
-Constant TX_PS_56 = "QUIT";
-Constant TX_PS_53 = "RESTART";
-Constant TX_PS_54 = "RESTORE a saved game";
-Constant TX_PS_47 = "TV";
-Constant TX_PS_57 = "UNDO the last command";
-Constant TX_PS_32 = "Your living room. The floor is always a mess, no matter how much time you spend cleaning it up. Cables run across the floor from the wall to the sofa. Various junk has accumulated on the arms of the sofa, which frequently gets knocked off onto the floor, or worse, falls between the cushions.^^A lesbian pride flag adorns the sofa. It's supposed to be placed so that the white stripe in the middle is right on top of the back cushion, but as always, it's been made skewiff and hangs too far down on the sitting side.";
-Constant TX_PS_45 = "Your loving partner of three years.";
-Constant TX_PS_42 = "Yourself";
-Constant TX_PS_9 = "animals";
-Constant TX_PS_14 = "backdrops";
-Constant TX_PS_39 = "carpet";
-Constant TX_PS_11 = "containers";
-Constant TX_PS_15 = "devices";
-Constant TX_PS_17 = "directions";
-Constant TX_PS_10 = "doors";
-Constant TX_PS_28 = "down";
-Constant TX_PS_25 = "east";
-Constant TX_PS_46 = "entertainment unit";
-Constant TX_PS_29 = "inside";
-Constant TX_PS_34 = "large bin";
-Constant TX_PS_33 = "lesbian pride flag";
-Constant TX_PS_7 = "men";
-Constant TX_PS_38 = "mess of cables";
-Constant TX_PS_18 = "north";
-Constant TX_PS_20 = "northeast";
-Constant TX_PS_21 = "northwest";
-Constant TX_PS_30 = "outside";
-Constant TX_PS_6 = "people";
-Constant TX_PS_13 = "player's holdalls";
-Constant TX_PS_37 = "power board";
-Constant TX_PS_16 = "regions";
-Constant TX_PS_55 = "see some suggestions for AMUSING things to do";
-Constant TX_PS_40 = "sofa";
-Constant TX_PS_22 = "south";
-Constant TX_PS_23 = "southeast";
-Constant TX_PS_24 = "southwest";
-Constant TX_PS_5 = "supporters";
-Constant TX_PS_35 = "switch pro controller";
-Constant TX_PS_19 = "the";
-Constant TX_PS_36 = "third party switch controller";
-Constant TX_PS_27 = "up";
-Constant TX_PS_12 = "vehicles";
-Constant TX_PS_26 = "west";
-Constant TX_PS_8 = "women";
-Constant TX_PS_41 = "yourself";
-Array TX_L_41 --> CONSTANT_PACKED_TEXT_STORAGE TX_PS_41;
-
-#ifndef p0_specification; Constant p0_specification = 0; #endif;
-#ifndef p1_indefinite_appearance_tex; Constant p1_indefinite_appearance_tex = 0; #endif;
-#ifndef p2_variable_initial_value; Constant p2_variable_initial_value = 0; #endif;
-#ifndef list_together; Constant list_together = 0; #endif;
-#ifndef short_name; Constant short_name = 0; #endif;
-#ifndef plural; Constant plural = 0; #endif;
-#ifndef article; Constant article = 0; #endif;
-#ifndef description; Constant description = 0; #endif;
-#ifndef map_region; Constant map_region = 0; #endif;
-#ifndef initial; Constant initial = 0; #endif;
-#ifndef p10_opposite; Constant p10_opposite = 0; #endif;
-#ifndef door_to; Constant door_to = 0; #endif;
-#ifndef capacity; Constant capacity = 0; #endif;
-#ifndef with_key; Constant with_key = 0; #endif;
-#ifndef p14_adaptive_text_viewpoint; Constant p14_adaptive_text_viewpoint = 0; #endif;
-#ifndef pluralname; Constant pluralname = 0; #endif;
-#ifndef proper; Constant proper = 0; #endif;
-#ifndef ambigpluralname; Constant ambigpluralname = 0; #endif;
-#ifndef privately_named; Constant privately_named = 0; #endif;
-#ifndef light; Constant light = 0; #endif;
-#ifndef visited; Constant visited = 0; #endif;
-#ifndef light; Constant light = 0; #endif;
-#ifndef edible; Constant edible = 0; #endif;
-#ifndef static; Constant static = 0; #endif;
-#ifndef scenery; Constant scenery = 0; #endif;
-#ifndef clothing; Constant clothing = 0; #endif;
-#ifndef pushable; Constant pushable = 0; #endif;
-#ifndef moved; Constant moved = 0; #endif;
-#ifndef concealed; Constant concealed = 0; #endif;
-#ifndef workflag; Constant workflag = 0; #endif;
-#ifndef mentioned; Constant mentioned = 0; #endif;
-#ifndef enterable; Constant enterable = 0; #endif;
-#ifndef transparent; Constant transparent = 0; #endif;
-#ifndef open; Constant open = 0; #endif;
-#ifndef openable; Constant openable = 0; #endif;
-#ifndef lockable; Constant lockable = 0; #endif;
-#ifndef locked; Constant locked = 0; #endif;
-#ifndef female; Constant female = 0; #endif;
-#ifndef neuter; Constant neuter = 0; #endif;
-#ifndef on; Constant on = 0; #endif;
-#ifndef p57_recurring; Constant p57_recurring = 0; #endif;
-#ifndef vector; Constant vector = 0; #endif;
-#ifndef room_index; Constant room_index = 0; #endif;
-#ifndef door_dir; Constant door_dir = 0; #endif;
-#ifndef door_to; Constant door_to = 0; #endif;
-#ifndef absent; Constant absent = 0; #endif;
-#ifndef cap_short_name; Constant cap_short_name = 0; #endif;
-#ifndef mark_as_room; Constant mark_as_room = 0; #endif;
-#ifndef mark_as_thing; Constant mark_as_thing = 0; #endif;
-#ifndef component_parent; Constant component_parent = 0; #endif;
-#ifndef component_child; Constant component_child = 0; #endif;
-#ifndef component_sibling; Constant component_sibling = 0; #endif;
-#ifndef regional_found_in; Constant regional_found_in = 0; #endif;
-#ifndef IK1_Count; Constant IK1_Count = 0; #endif;
-#ifndef IK1_Link; Constant IK1_Link = 0; #endif;
-#ifndef IK2_Count; Constant IK2_Count = 0; #endif;
-#ifndef IK2_Link; Constant IK2_Link = 0; #endif;
-#ifndef IK3_Count; Constant IK3_Count = 0; #endif;
-#ifndef IK3_Link; Constant IK3_Link = 0; #endif;
-#ifndef IK4_Count; Constant IK4_Count = 0; #endif;
-#ifndef IK4_Link; Constant IK4_Link = 0; #endif;
-#ifndef IK5_Count; Constant IK5_Count = 0; #endif;
-#ifndef IK5_Link; Constant IK5_Link = 0; #endif;
-#ifndef IK6_Count; Constant IK6_Count = 0; #endif;
-#ifndef IK6_Link; Constant IK6_Link = 0; #endif;
-#ifndef IK7_Count; Constant IK7_Count = 0; #endif;
-#ifndef IK7_Link; Constant IK7_Link = 0; #endif;
-#ifndef IK8_Count; Constant IK8_Count = 0; #endif;
-#ifndef IK8_Link; Constant IK8_Link = 0; #endif;
-#ifndef IK9_Count; Constant IK9_Count = 0; #endif;
-#ifndef IK9_Link; Constant IK9_Link = 0; #endif;
-#ifndef IK10_Count; Constant IK10_Count = 0; #endif;
-#ifndef IK10_Link; Constant IK10_Link = 0; #endif;
-#ifndef IK11_Count; Constant IK11_Count = 0; #endif;
-#ifndef IK11_Link; Constant IK11_Link = 0; #endif;
-#ifndef IK12_Count; Constant IK12_Count = 0; #endif;
-#ifndef IK12_Link; Constant IK12_Link = 0; #endif;
-#ifndef IK13_Count; Constant IK13_Count = 0; #endif;
-#ifndef IK13_Link; Constant IK13_Link = 0; #endif;
-#ifndef IK14_Count; Constant IK14_Count = 0; #endif;
-#ifndef IK14_Link; Constant IK14_Link = 0; #endif;
-#ifndef IK15_Count; Constant IK15_Count = 0; #endif;
-#ifndef IK15_Link; Constant IK15_Link = 0; #endif;
-#ifndef KD_Count; Constant KD_Count = 0; #endif;
-#ifndef name; Constant name = 0; #endif;
-#ifndef parse_name; Constant parse_name = 0; #endif;
-#ifndef action_bitmap; Constant action_bitmap = 0; #endif;
-
-#IFNDEF cap_short_name;
-Constant cap_short_name = short_name;
-#ENDIF;
-
-Array Runtime_Quotations_Displayed --> 1;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Block Values
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifdef TARGET_ZCODE;
-Constant MEMORY_HEAP_SIZE = 8192;
-#ifnot;
-Constant MEMORY_HEAP_SIZE = 32768;
-#endif;
-
-Array Closure_0 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Abs ! routine to call
- "abs function" ! name
-;
-Array Closure_1 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Root ! routine to call
- "root function" ! name
-;
-Array Closure_2 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- PHR_424_r4 ! routine to call
- "rsqr function" ! name
-;
-Array Closure_3 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Ceiling ! routine to call
- "ceiling function" ! name
-;
-Array Closure_4 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Floor ! routine to call
- "floor function" ! name
-;
-Array Closure_5 -->
- KD9_phrase_real_number_to_numb ! phrase real number -> number
- REAL_NUMBER_TY_to_NUMBER_TY ! routine to call
- "int function" ! name
-;
-Array Closure_6 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Log ! routine to call
- "log function" ! name
-;
-Array Closure_7 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Exp ! routine to call
- "exp function" ! name
-;
-Array Closure_8 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Sin ! routine to call
- "sin function" ! name
-;
-Array Closure_9 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Cos ! routine to call
- "cos function" ! name
-;
-Array Closure_10 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Tan ! routine to call
- "tan function" ! name
-;
-Array Closure_11 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Arcsin ! routine to call
- "arcsin function" ! name
-;
-Array Closure_12 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Arccos ! routine to call
- "arccos function" ! name
-;
-Array Closure_13 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Arctan ! routine to call
- "arctan function" ! name
-;
-Array Closure_14 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Sinh ! routine to call
- "sinh function" ! name
-;
-Array Closure_15 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Cosh ! routine to call
- "cosh function" ! name
-;
-Array Closure_16 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- REAL_NUMBER_TY_Tanh ! routine to call
- "tanh function" ! name
-;
-Array Closure_17 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- PHR_442_r5 ! routine to call
- "arcsinh function" ! name
-;
-Array Closure_18 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- PHR_443_r6 ! routine to call
- "arccosh function" ! name
-;
-Array Closure_19 -->
- KD8_phrase_real_number_to_real ! phrase real number -> real number
- PHR_444_r7 ! routine to call
- "arctanh function" ! name
-;
-
-Array KD0_rule --> ! rule
- RULE_TY 2 ACTION_NAME_TY NIL_TY;
-Array KD1_activity --> ! activity
- ACTIVITY_TY 1 NIL_TY;
-Array KD2_relation_of_values --> ! relation of values
- RELATION_TY 2 VALUE_TY VALUE_TY;
-Array KD3_relation_of_objects --> ! relation of objects
- RELATION_TY 2 OBJECT_TY OBJECT_TY;
-Array KD4_relation_of_supporters_to_ --> ! relation of supporters to things
- RELATION_TY 2 10 10;
-Array KD5_relation_of_things --> ! relation of things
- RELATION_TY 2 10 10;
-Array KD6_relation_of_people_to_thin --> ! relation of people to things
- RELATION_TY 2 10 10;
-Array KD7_relation_of_rooms_to_doors --> ! relation of rooms to doors
- RELATION_TY 2 10 10;
-Array KD8_phrase_real_number_to_real --> ! phrase real number -> real number
- PHRASE_TY 2 REAL_NUMBER_TY;
-Array KD9_phrase_real_number_to_numb --> ! phrase real number -> number
- PHRASE_TY 2 NUMBER_TY;
-[ DefaultValueFinder
- K ! Implied call parameter
- ;
- return 0;
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Blocks
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant BLK_HEADER_N = 0;
-Constant BLK_HEADER_FLAGS = 1;
-Constant BLK_FLAG_MULTIPLE = $$00000001;
-Constant BLK_FLAG_16_BIT = $$00000010;
-Constant BLK_FLAG_WORD = $$00000100;
-Constant BLK_FLAG_RESIDENT = $$00001000;
-Constant BLK_FLAG_TRUNCMULT = $$00010000;
-Constant BLK_HEADER_KOV = 1;
-Constant BLK_HEADER_RCOUNT = 2;
-
-Constant BLK_DATA_OFFSET = 3*WORDSIZE;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Multiple Blocks
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant BLK_DATA_MULTI_OFFSET = BLK_DATA_OFFSET + 2*WORDSIZE;
-Constant BLK_NEXT 3;
-Constant BLK_PREV 4;
-
-! Constant BLKVALUE_TRACE = 1; ! Uncomment this for debugging purposes
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: The Heap
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array Flex_Heap -> MEMORY_HEAP_SIZE + 16; ! Plus 16 to allow room for head-free-block
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Initialisation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ HeapInitialise n bsize blk2;
- blk2 = Flex_Heap + 16;
- Flex_Heap->BLK_HEADER_N = 4;
- Flex_Heap-->BLK_HEADER_KOV = 0;
- Flex_Heap-->BLK_HEADER_RCOUNT = MAX_POSITIVE_NUMBER;
- Flex_Heap->BLK_HEADER_FLAGS = BLK_FLAG_MULTIPLE;
- Flex_Heap-->BLK_NEXT = blk2;
- Flex_Heap-->BLK_PREV = NULL;
- for (bsize=1: bsize < MEMORY_HEAP_SIZE: bsize=bsize*2) n++;
- blk2->BLK_HEADER_N = n;
- blk2-->BLK_HEADER_KOV = 0;
- blk2-->BLK_HEADER_RCOUNT = 0;
- blk2->BLK_HEADER_FLAGS = BLK_FLAG_MULTIPLE;
- blk2-->BLK_NEXT = NULL;
- blk2-->BLK_PREV = Flex_Heap;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Net Free Space
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ HeapNetFreeSpace multiple txb asize;
- for (txb=Flex_Heap-->BLK_NEXT: txb~=NULL: txb=txb-->BLK_NEXT) {
- asize = asize + FlexSize(txb);
- if (multiple) asize = asize - BLK_DATA_MULTI_OFFSET;
- else asize = asize - BLK_DATA_OFFSET;
- }
- return asize;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Make Space
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant SMALLEST_BLK_WORTH_ALLOCATING = 12; ! i.e. 2^12 = 4096 bytes
-
-[ HeapMakeSpace size multiple newblocksize newblock B n;
- for (::) {
- if (multiple) {
- if (HeapNetFreeSpace(multiple) >= size) rtrue;
- } else {
- if (HeapLargestFreeBlock(0) >= size) rtrue;
- }
- newblocksize = 1;
- for (n=0: (nBLK_HEADER_N = n;
- newblock-->BLK_HEADER_KOV = 0;
- newblock-->BLK_HEADER_RCOUNT = 0;
- newblock->BLK_HEADER_FLAGS = BLK_FLAG_MULTIPLE;
- newblock-->BLK_NEXT = NULL;
- newblock-->BLK_PREV = NULL;
- for (B = Flex_Heap-->BLK_NEXT:B ~= NULL:B = B-->BLK_NEXT)
- if (B-->BLK_NEXT == NULL) {
- B-->BLK_NEXT = newblock;
- newblock-->BLK_PREV = B;
- jump Linked;
- }
- Flex_Heap-->BLK_NEXT = newblock;
- newblock-->BLK_PREV = Flex_Heap;
- .Linked; ;
- #ifdef BLKVALUE_TRACE;
- print "Increasing heap to free space map: "; FlexDebugDecomposition(Flex_Heap, 0);
- #endif;
- }
- rtrue;
-];
-
-[ HeapLargestFreeBlock multiple txb asize best;
- best = 0;
- for (txb=Flex_Heap-->BLK_NEXT: txb~=NULL: txb=txb-->BLK_NEXT) {
- asize = FlexSize(txb);
- if (multiple) asize = asize - BLK_DATA_MULTI_OFFSET;
- else asize = asize - BLK_DATA_OFFSET;
- if (asize > best) best = asize;
- }
- return best;
-];
-
-[ HeapDebug full;
- if (full) {
- print "Managing a heap of initially ", MEMORY_HEAP_SIZE+16, " bytes.^";
- print HeapNetFreeSpace(false), " bytes currently free.^";
- print "Free space decomposition: "; FlexDebugDecomposition(Flex_Heap);
- print "Free space map: "; FlexDebug(Flex_Heap);
- } else {
- print HeapNetFreeSpace(false), " of ", MEMORY_HEAP_SIZE+16, " bytes free.^";
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Block Allocation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexAllocate size kov flags
- dsize n m free_block min_m max_m smallest_oversized_block secondhalf i hsize head tail;
-
- if (HeapMakeSpace(size, flags & BLK_FLAG_MULTIPLE) == false) FlexError("ran out");
-
- ! Calculate the header size for a block of this KOV
- if (flags & BLK_FLAG_MULTIPLE) hsize = BLK_DATA_MULTI_OFFSET;
- else hsize = BLK_DATA_OFFSET;
- ! Calculate the data size
- n=0; for (dsize=1: ((dsize < hsize+size) || (n<3+(WORDSIZE/2))): dsize=dsize*2) n++;
-
- ! Seek a free block closest to the correct size, but starting from the
- ! block after the fixed head-free-block, which we can't touch
- min_m = 10000; max_m = 0;
- for (free_block = Flex_Heap-->BLK_NEXT:
- free_block ~= NULL:
- free_block = free_block-->BLK_NEXT) {
- m = free_block->BLK_HEADER_N;
- ! Current block the ideal size
- if (m == n) jump CorrectSizeFound;
- ! Current block too large: find the smallest which is larger than needed
- if (m > n) {
- if (min_m > m) {
- min_m = m;
- smallest_oversized_block = free_block;
- }
- }
- ! Current block too small: find the largest which is smaller than needed
- if (m < n) {
- if (max_m < m) {
- max_m = m;
- }
- }
- }
-
- if (min_m == 10000) {
- ! Case I: No block is large enough to hold the entire size
- if (flags & BLK_FLAG_MULTIPLE == 0) FlexError("too fragmented");
- ! Set dsize to the size in bytes if the largest block available
- for (dsize=1: max_m > 0: dsize=dsize*2) max_m--;
- ! Split as a head (dsize-hsize), which we can be sure fits into one block,
- ! plus a tail (size-(dsize-hsize), which might be a list of blocks
- head = FlexAllocate(dsize-hsize, kov, flags);
- if (head == 0) FlexError("for head block not available");
- tail = FlexAllocate(size-(dsize-hsize), kov, flags);
- if (tail == 0) FlexError("for tail block not available");
- head-->BLK_NEXT = tail;
- tail-->BLK_PREV = head;
- return head;
- }
-
- ! Case II: No block is the right size, but some exist which are too big
- ! Set dsize to the size in bytes of the smallest oversized block
- for (dsize=1,m=1: m<=min_m: dsize=dsize*2) m++;
- free_block = smallest_oversized_block;
- while (min_m > n) {
- ! Repeatedly halve free_block at the front until the two smallest
- ! fragments left are the correct size: then take the frontmost
- dsize = dsize/2;
- ! print "Halving size to ", dsize, "^";
- secondhalf = free_block + dsize;
- secondhalf-->BLK_NEXT = free_block-->BLK_NEXT;
- if (secondhalf-->BLK_NEXT ~= NULL)
- (secondhalf-->BLK_NEXT)-->BLK_PREV = secondhalf;
- secondhalf-->BLK_PREV = free_block;
- free_block-->BLK_NEXT = secondhalf;
- free_block->BLK_HEADER_N = (free_block->BLK_HEADER_N) - 1;
- secondhalf->BLK_HEADER_N = free_block->BLK_HEADER_N;
- secondhalf-->BLK_HEADER_KOV = free_block-->BLK_HEADER_KOV;
- secondhalf-->BLK_HEADER_RCOUNT = 0;
- secondhalf->BLK_HEADER_FLAGS = free_block->BLK_HEADER_FLAGS;
- min_m--;
- }
-
- ! Once that is done, free_block points to a block which is exactly the
- ! right size, so we can fall into...
-
- ! Case III: There is a free block which has the correct size.
- .CorrectSizeFound;
- ! Delete the free block from the double linked list of free blocks: note
- ! that it cannot be the head of this list, which is fixed
- if (free_block-->BLK_NEXT == NULL) {
- ! We remove final block, so previous is now final
- (free_block-->BLK_PREV)-->BLK_NEXT = NULL;
- } else {
- ! We remove a middle block, so join previous to next
- (free_block-->BLK_PREV)-->BLK_NEXT = free_block-->BLK_NEXT;
- (free_block-->BLK_NEXT)-->BLK_PREV = free_block-->BLK_PREV;
- }
- free_block-->BLK_HEADER_KOV = KindAtomic(kov);
- free_block-->BLK_HEADER_RCOUNT = 1;
- free_block->BLK_HEADER_FLAGS = flags;
- if (flags & BLK_FLAG_MULTIPLE) {
- free_block-->BLK_NEXT = NULL;
- free_block-->BLK_PREV = NULL;
- }
-
- ! Zero out the data bytes in the memory allocated
- for (i=hsize:ii=0;
- return free_block;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Errors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexError reason;
- print "*** Memory ", (string) reason, " ***^";
- RunTimeProblem(RTP_HEAPERROR);
- @quit;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Merging
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexMergeInternal block first last pv nx;
- first = block; last = block;
- while (last-->BLK_NEXT == last+FlexSize(last))
- last = last-->BLK_NEXT;
- while ((first-->BLK_PREV + FlexSize(first-->BLK_PREV) == first) &&
- (first-->BLK_PREV ~= Flex_Heap))
- first = first-->BLK_PREV;
- pv = first-->BLK_PREV;
- nx = last-->BLK_NEXT;
- #ifdef BLKVALUE_TRACE;
- print "Merging: "; FlexDebugDecomposition(pv-->BLK_NEXT, nx); print "^";
- #endif;
- if (FlexRecutInternal(first, last)) {
- #ifdef BLKVALUE_TRACE;
- print " --> "; FlexDebugDecomposition(pv-->BLK_NEXT, nx); print "^";
- #endif;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Recutting
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexRecutInternal first last tsize backsize mfrom mto bnext backend n dsize fine_so_far;
- if (first == last) rfalse;
- mfrom = first; mto = last + FlexSize(last);
- bnext = last-->BLK_NEXT;
- fine_so_far = true;
- for (:mto>mfrom: mto = mto - backsize) {
- for (n=0, backsize=1: backsize*2 <= mto-mfrom: n++) backsize=backsize*2;
- if ((fine_so_far) && (backsize == FlexSize(last))) {
- bnext = last; last = last-->BLK_PREV;
- bnext-->BLK_PREV = last;
- last-->BLK_NEXT = bnext;
- continue;
- }
- fine_so_far = false; ! From this point, "last" is meaningless
- backend = mto - backsize;
- backend->BLK_HEADER_N = n;
- backend-->BLK_HEADER_KOV = 0;
- backend-->BLK_HEADER_RCOUNT = 0;
- backend->BLK_HEADER_FLAGS = BLK_FLAG_MULTIPLE;
- backend-->BLK_NEXT = bnext;
- if (bnext ~= NULL) {
- bnext-->BLK_PREV = backend;
- bnext = backend;
- }
- }
- if (fine_so_far) rfalse;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Deallocation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexFree block fromtxb ptxb;
- if (block == 0) return;
- if ((block->BLK_HEADER_FLAGS) & BLK_FLAG_RESIDENT) return;
- if ((block->BLK_HEADER_N) & $80) return; ! not a flexible block at all
- if ((block->BLK_HEADER_FLAGS) & BLK_FLAG_MULTIPLE) {
- if (block-->BLK_PREV ~= NULL) (block-->BLK_PREV)-->BLK_NEXT = NULL;
- fromtxb = block;
- for (:(block-->BLK_NEXT)~=NULL:block = block-->BLK_NEXT) ;
- while (block ~= fromtxb) {
- ptxb = block-->BLK_PREV; FlexFreeSingleBlockInternal(block); block = ptxb;
- }
- }
- FlexFreeSingleBlockInternal(block);
-];
-
-[ FlexFreeSingleBlockInternal block free nx;
- block-->BLK_HEADER_KOV = 0;
- block-->BLK_HEADER_RCOUNT = 0;
- block->BLK_HEADER_FLAGS = BLK_FLAG_MULTIPLE;
- for (free = Flex_Heap:free ~= NULL:free = free-->BLK_NEXT) {
- nx = free-->BLK_NEXT;
- if (nx == NULL) {
- free-->BLK_NEXT = block;
- block-->BLK_PREV = free;
- block-->BLK_NEXT = NULL;
- FlexMergeInternal(block);
- return;
- }
- if (UnsignedCompare(nx, block) == 1) {
- free-->BLK_NEXT = block;
- block-->BLK_PREV = free;
- block-->BLK_NEXT = nx;
- nx-->BLK_PREV = block;
- FlexMergeInternal(block);
- return;
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Resizing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexResize block req newsize dsize newblk kov n i otxb flags;
- if (block == 0) FlexError("failed resizing null block");
- kov = block-->BLK_HEADER_KOV;
- flags = block->BLK_HEADER_FLAGS;
- if (flags & BLK_FLAG_MULTIPLE == 0) FlexError("failed resizing inextensible block");
- otxb = block;
- newsize = req;
- for (:: block = block-->BLK_NEXT) {
- n = block->BLK_HEADER_N;
- for (dsize=1: n>0: n--) dsize = dsize*2;
- i = dsize - BLK_DATA_MULTI_OFFSET;
- newsize = newsize - i;
- if (newsize > 0) {
- if (block-->BLK_NEXT ~= NULL) continue;
- newblk = FlexAllocate(newsize, kov, flags);
- if (newblk == 0) rfalse;
- block-->BLK_NEXT = newblk;
- newblk-->BLK_PREV = block;
- return;
- }
- if (block-->BLK_NEXT ~= NULL) {
- FlexFree(block-->BLK_NEXT);
- block-->BLK_NEXT = NULL;
- }
- return;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Block Size
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexSize txb bsize n; ! Size of an individual block, including header
- if (txb == 0) return 0;
- for (bsize=1: nBLK_HEADER_N: bsize=bsize*2) n++;
- return bsize;
-];
-
-[ FlexTotalSize txb size_in_bytes; ! Combined size of multiple-blocks for a value
- if (txb == 0) return 0;
- if ((txb->BLK_HEADER_FLAGS) & BLK_FLAG_MULTIPLE == 0)
- return FlexSize(txb) - BLK_DATA_OFFSET;
- for (:txb~=NULL:txb=txb-->BLK_NEXT) {
- size_in_bytes = size_in_bytes + FlexSize(txb) - BLK_DATA_MULTI_OFFSET;
- }
- return size_in_bytes;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Flex.i6t: Debugging Routines
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ FlexDebug txb n k i bsize tot dtot kov;
- if (txb == 0) "Block never created.";
- kov = txb-->BLK_HEADER_KOV;
- print "Block ", txb, " (kov ", kov, "): ";
- for (:txb~=NULL:txb = txb-->BLK_NEXT) {
- if (k++ == 100) " ... and so on.";
- if (txb-->BLK_HEADER_KOV ~= kov)
- print "*Wrong kov=", txb-->BLK_HEADER_KOV, "* ";
- n = txb->BLK_HEADER_N;
- for (bsize=1:n>0:n--) bsize=bsize*2;
- i = bsize - BLK_DATA_OFFSET;
- dtot = dtot+i;
- tot = tot+bsize;
- print txb, "(", bsize, ") > ";
- }
- print dtot, " data in ", tot, " bytes^";
-];
-
-[ FlexDebugDecomposition from to txb pf;
- if (to==0) to = NULL;
- for (txb=from:(txb~=to) && (txb~=NULL):txb=txb-->BLK_NEXT) {
- if (pf) print "+";
- print FlexSize(txb);
- pf = true;
- }
- print "^";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Overview
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RC_INFINITY = MAX_POSITIVE_NUMBER;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Short Block Format
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant BLK_BVBITMAP = $ff;
-
-Constant BLK_BVBITMAP_LONGBLOCK = $10; ! Word 1 of SB is pointer to LB
-Constant BLK_BVBITMAP_TEXT = $20; ! BV holds a TEXT_TY value
-Constant BLK_BVBITMAP_CONSTANT = $40; ! BV holds a TEXT_TY value
-
-#IFTRUE WORDSIZE == 4;
-Constant BLK_BVBITMAP_LONGBLOCKMASK = $ffffff10;
-Constant BLK_BVBITMAP_TEXTMASK = $ffffff20;
-Constant BLK_BVBITMAP_CONSTANTMASK = $ffffff40;
-#IFNOT;
-Constant BLK_BVBITMAP_LONGBLOCKMASK = $ff10;
-Constant BLK_BVBITMAP_TEXTMASK = $ff20;
-Constant BLK_BVBITMAP_CONSTANTMASK = $ff40;
-#ENDIF;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Long Block Access
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueGetLongBlock bv o;
- if (bv) {
- o = bv-->0;
- if (o == 0) return bv + WORDSIZE;
- if (o & BLK_BVBITMAP == o) {
- if (o & BLK_BVBITMAP_LONGBLOCK) return bv-->1;
- return 0;
- }
- return o;
- }
- return bv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Weak Kind
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueWeakKind bv o;
- if (bv) {
- o = bv-->0;
- if (o == 0) return bv-->(BLK_HEADER_KOV+1);
- if (o & BLK_BVBITMAP == o) {
- if (o & BLK_BVBITMAP_TEXT) return TEXT_TY;
- o = bv-->1;
- }
- return o-->BLK_HEADER_KOV;
- }
- return NIL_TY;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Reference counting
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueGetRefCountPrimitive bv long_block;
- long_block = BlkValueGetLongBlock(bv);
- if (long_block) return long_block-->BLK_HEADER_RCOUNT;
- return RC_INFINITY;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Changing Reference Counts
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueIncRefCountPrimitive bv long_block refc;
- long_block = BlkValueGetLongBlock(bv);
- if (long_block) {
- refc = long_block-->BLK_HEADER_RCOUNT;
- if (refc < RC_INFINITY) long_block-->BLK_HEADER_RCOUNT = refc + 1;
- }
-];
-
-[ BlkValueDecRefCountPrimitive bv long_block refc;
- long_block = BlkValueGetLongBlock(bv);
- if (long_block) {
- refc = long_block-->BLK_HEADER_RCOUNT;
- if (refc < RC_INFINITY) {
- refc--;
- if (refc < 0) BlkValueError("reference count negative");
- long_block-->BLK_HEADER_RCOUNT = refc;
- }
- return refc;
- }
- return RC_INFINITY;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Long Block Capacity
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueLBCapacity bv long_block array_size_in_bytes entry_size_in_bytes flags;
- long_block = BlkValueGetLongBlock(bv);
- if (long_block == 0) return 0;
-
- array_size_in_bytes = FlexTotalSize(long_block);
-
- flags = long_block->BLK_HEADER_FLAGS;
- entry_size_in_bytes = 1;
- if (flags & BLK_FLAG_16_BIT) entry_size_in_bytes = 2;
- else if (flags & BLK_FLAG_WORD) entry_size_in_bytes = WORDSIZE;
-
- return array_size_in_bytes / entry_size_in_bytes;
-];
-
-[ BlkValueSetLBCapacity bv new_capacity long_block flags entry_size_in_bytes;
- if (bv == 0) rfalse;
- BlkMakeMutable(bv);
- long_block = BlkValueGetLongBlock(bv);
- if (long_block == 0) rfalse;
-
- flags = long_block->BLK_HEADER_FLAGS;
- entry_size_in_bytes = 1;
- if (flags & BLK_FLAG_16_BIT) entry_size_in_bytes = 2;
- else if (flags & BLK_FLAG_WORD) entry_size_in_bytes = WORDSIZE;
-
- FlexResize(long_block, new_capacity*entry_size_in_bytes);
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Long Block Array Access
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueRead from pos do_not_indirect
- long_block chunk_size_in_bytes header_size_in_bytes flags entry_size_in_bytes seek_byte_position;
- if (from == 0) rfalse;
- if (do_not_indirect)
- long_block = from;
- else
- long_block = BlkValueGetLongBlock(from);
-
- flags = long_block->BLK_HEADER_FLAGS;
- entry_size_in_bytes = 1;
- if (flags & BLK_FLAG_16_BIT) entry_size_in_bytes = 2;
- else if (flags & BLK_FLAG_WORD) entry_size_in_bytes = WORDSIZE;
-
- if (flags & BLK_FLAG_MULTIPLE) header_size_in_bytes = BLK_DATA_MULTI_OFFSET;
- else header_size_in_bytes = BLK_DATA_OFFSET;
-
- seek_byte_position = pos*entry_size_in_bytes;
- for (: long_block~=NULL: long_block=long_block-->BLK_NEXT) {
- chunk_size_in_bytes = FlexSize(long_block) - header_size_in_bytes;
- if ((seek_byte_position >= 0) && (seek_byte_position0;
- 2: #Iftrue (WORDSIZE == 2); return long_block-->0;
- #ifnot; return (long_block->0)*256 + (long_block->1);
- #endif;
- 4: return long_block-->0;
- }
- }
- seek_byte_position = seek_byte_position - chunk_size_in_bytes;
- }
- "*** BlkValueRead: reading from index out of range: ", pos, " in ", from, " ***";
-];
-
-[ BlkValueWrite to pos val do_not_indirect
- long_block chunk_size_in_bytes header_size_in_bytes flags entry_size_in_bytes seek_byte_position;
- if (to == 0) rfalse;
- if (do_not_indirect)
- long_block = to;
- else {
- BlkMakeMutable(to);
- long_block = BlkValueGetLongBlock(to);
- }
-
- flags = long_block->BLK_HEADER_FLAGS;
- entry_size_in_bytes = 1;
- if (flags & BLK_FLAG_16_BIT) entry_size_in_bytes = 2;
- else if (flags & BLK_FLAG_WORD) entry_size_in_bytes = WORDSIZE;
-
- if (flags & BLK_FLAG_MULTIPLE) header_size_in_bytes = BLK_DATA_MULTI_OFFSET;
- else header_size_in_bytes = BLK_DATA_OFFSET;
-
- seek_byte_position = pos*entry_size_in_bytes;
- for (:long_block~=NULL:long_block=long_block-->BLK_NEXT) {
- chunk_size_in_bytes = FlexSize(long_block) - header_size_in_bytes;
- if ((seek_byte_position >= 0) && (seek_byte_position0 = val;
- 2: #Iftrue (WORDSIZE == 2); long_block-->0 = val;
- #ifnot; long_block->0 = (val/256)%256; long_block->1 = val%256;
- #endif;
- 4: long_block-->0 = val;
- }
- return;
- }
- seek_byte_position = seek_byte_position - chunk_size_in_bytes;
- }
- "*** BlkValueWrite: writing to index out of range: ", pos, " in ", to, " ***";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: First Zero Entry
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueSeekZeroEntry from
- long_block chunk_size_in_bytes header_size_in_bytes flags entry_size_in_bytes
- byte_position addr from_addr to_addr;
- if (from == 0) return -1;
- long_block = BlkValueGetLongBlock(from);
-
- flags = long_block->BLK_HEADER_FLAGS;
- entry_size_in_bytes = 1;
- if (flags & BLK_FLAG_16_BIT) entry_size_in_bytes = 2;
- else if (flags & BLK_FLAG_WORD) entry_size_in_bytes = WORDSIZE;
-
- if (flags & BLK_FLAG_MULTIPLE) header_size_in_bytes = BLK_DATA_MULTI_OFFSET;
- else header_size_in_bytes = BLK_DATA_OFFSET;
-
- byte_position = 0;
- for (: long_block~=NULL: long_block=long_block-->BLK_NEXT) {
- chunk_size_in_bytes = FlexSize(long_block) - header_size_in_bytes;
- from_addr = long_block + header_size_in_bytes;
- to_addr = from_addr + chunk_size_in_bytes;
- switch(entry_size_in_bytes) {
- 1:
- for (addr = from_addr: addr < to_addr: addr++)
- if (addr->0 == 0)
- return byte_position + addr - from_addr;
- 2:
- #iftrue (WORDSIZE == 2);
- for (addr = from_addr: addr < to_addr: addr=addr+2)
- if (addr-->0 == 0)
- return (byte_position + addr - from_addr)/2;
- #ifnot;
- for (addr = from_addr: addr < to_addr: addr=addr+2)
- if ((addr->0 == 0) && (addr->1 == 0))
- return (byte_position + addr - from_addr)/2;
- #endif;
- 4:
- for (addr = from_addr: addr < to_addr: addr=addr+4)
- if (addr-->0 == 0)
- return (byte_position + addr - from_addr)/4;
- }
- byte_position = byte_position + chunk_size_in_bytes;
- }
- return -1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Mass Copy Entries
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueMassCopyEntries to_bv from_bv no_entries_to_copy
- from_long_block from_addr from_bytes_left from_header_size_in_bytes
- to_long_block to_addr to_bytes_left to_header_size_in_bytes
- bytes_to_copy flags entry_size_in_bytes min;
-
- BlkMakeMutable(to_bv);
-
- from_long_block = BlkValueGetLongBlock(from_bv);
- to_long_block = BlkValueGetLongBlock(to_bv);
-
- flags = from_long_block->BLK_HEADER_FLAGS;
- entry_size_in_bytes = 1;
- if (flags & BLK_FLAG_16_BIT) entry_size_in_bytes = 2;
- else if (flags & BLK_FLAG_WORD) entry_size_in_bytes = WORDSIZE;
-
- if ((flags & (BLK_FLAG_MULTIPLE + BLK_FLAG_TRUNCMULT)) &&
- (BlkValueSetLBCapacity(to_bv, no_entries_to_copy) == false))
- BlkValueError("copy resizing failed");
-
- if (flags & BLK_FLAG_MULTIPLE) from_header_size_in_bytes = BLK_DATA_MULTI_OFFSET;
- else from_header_size_in_bytes = BLK_DATA_OFFSET;
- flags = to_long_block->BLK_HEADER_FLAGS;
- if (flags & BLK_FLAG_MULTIPLE) to_header_size_in_bytes = BLK_DATA_MULTI_OFFSET;
- else to_header_size_in_bytes = BLK_DATA_OFFSET;
-
- from_addr = from_long_block + from_header_size_in_bytes;
- from_bytes_left = FlexSize(from_long_block) - from_header_size_in_bytes;
- to_addr = to_long_block + to_header_size_in_bytes;
- to_bytes_left = FlexSize(to_long_block) - to_header_size_in_bytes;
-
- bytes_to_copy = entry_size_in_bytes*no_entries_to_copy;
- while (true) {
- if (from_bytes_left == 0) {
- from_long_block = from_long_block-->BLK_NEXT;
- if (from_long_block == 0) BlkValueError("copy destination exhausted");
- from_addr = from_long_block + from_header_size_in_bytes;
- from_bytes_left = FlexSize(from_long_block) - from_header_size_in_bytes;
- } else if (to_bytes_left == 0) {
- to_long_block = to_long_block-->BLK_NEXT;
- if (to_long_block == 0) BlkValueError("copy source exhausted");
- to_addr = to_long_block + to_header_size_in_bytes;
- to_bytes_left = FlexSize(to_long_block) - to_header_size_in_bytes;
- } else {
- min = from_bytes_left; if (to_bytes_left < min) min = to_bytes_left;
- if (bytes_to_copy <= min) {
- Memcpy(to_addr, from_addr, bytes_to_copy);
- return;
- }
- Memcpy(to_addr, from_addr, min);
- bytes_to_copy = bytes_to_copy - min;
- from_addr = from_addr + min;
- from_bytes_left = from_bytes_left - min;
- to_addr = to_addr + min;
- to_bytes_left = to_bytes_left - min;
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Mass Copy From Array
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueMassCopyFromArray to_bv from_array from_entry_size no_entries_to_copy
- to_long_block to_addr to_entries_left to_header_size to_entry_size
- flags;
-
- BlkMakeMutable(to_bv);
-
- to_long_block = BlkValueGetLongBlock(to_bv);
-
- flags = to_long_block->BLK_HEADER_FLAGS;
- to_entry_size = 1;
- if (flags & BLK_FLAG_16_BIT) to_entry_size = 2;
- else if (flags & BLK_FLAG_WORD) to_entry_size = WORDSIZE;
-
- if ((flags & (BLK_FLAG_MULTIPLE + BLK_FLAG_TRUNCMULT)) &&
- (BlkValueSetLBCapacity(to_bv, no_entries_to_copy) == false))
- BlkValueError("copy resizing failed");
-
- if (flags & BLK_FLAG_MULTIPLE) to_header_size = BLK_DATA_MULTI_OFFSET;
- else to_header_size = BLK_DATA_OFFSET;
-
- to_addr = to_long_block + to_header_size;
- to_entries_left = (FlexSize(to_long_block) - to_header_size)/to_entry_size;
-
- while (no_entries_to_copy > to_entries_left) {
- Arrcpy(to_addr, to_entry_size, from_array, from_entry_size, to_entries_left);
- no_entries_to_copy = no_entries_to_copy - to_entries_left;
- from_array = from_array + to_entries_left*from_entry_size;
- to_long_block = to_long_block-->BLK_NEXT;
- if (to_long_block == 0) BlkValueError("copy source exhausted");
- to_addr = to_long_block + to_header_size;
- to_entries_left = (FlexSize(to_long_block) - to_header_size)/to_entry_size;
- }
- if (no_entries_to_copy > 0) {
- Arrcpy(to_addr, to_entry_size, from_array, from_entry_size, no_entries_to_copy);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: KOVS Routines
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant CREATE_KOVS = 1;
-Constant CAST_KOVS = 2;
-Constant DESTROY_KOVS = 3;
-Constant MAKEMUTABLE_KOVS = 4;
-Constant COPYKIND_KOVS = 5;
-Constant EXTENT_KOVS = 6;
-Constant COPYQUICK_KOVS = 7;
-Constant COPYSB_KOVS = 8;
-Constant KINDDATA_KOVS = 9;
-Constant COPY_KOVS = 10;
-Constant COMPARE_KOVS = 11;
-Constant READ_FILE_KOVS = 12;
-Constant WRITE_FILE_KOVS = 13;
-Constant HASH_KOVS = 14;
-Constant DEBUG_KOVS = 15;
-
-! Constant BLKVALUE_TRACE; ! Uncomment this to expose masses of tracery
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Creation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueCreate strong_kind short_block kovs;
-
- kovs = KOVSupportFunction(strong_kind, "impossible allocation");
- short_block = kovs(CREATE_KOVS, strong_kind, short_block);
-
- #ifdef BLKVALUE_TRACE; print "Created: ", (BlkValueDebug) short_block, "^"; #endif;
-
- ! The new value is represented in I6 as the pointer to its short block:
- return short_block;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Errors
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueError reason;
- print "*** Value handling failed: ", (string) reason, " ***^";
- RunTimeProblem(RTP_HEAPERROR);
- @quit;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Short Block Allocation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueCreateSB1 short_block val;
- if (short_block == 0)
- short_block = FlexAllocate(WORDSIZE, 0, BLK_FLAG_WORD) + BLK_DATA_OFFSET;
- short_block-->0 = val;
- return short_block;
-];
-
-[ BlkValueCreateSB2 short_block val1 val2;
- if (short_block == 0)
- short_block = FlexAllocate(2*WORDSIZE, 0, BLK_FLAG_WORD) + BLK_DATA_OFFSET;
- short_block-->0 = val1; short_block-->1 = val2;
- return short_block;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Block Values On Stack
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ StackFramingInitialise;
- I7SFRAME = blockv_stack + WORDSIZE*BLOCKV_STACK_SIZE;
-];
-
-[ StackFrameCreate size new;
- new = I7SFRAME - WORDSIZE*size;
- if (new < blockv_stack) { RunTimeProblem(RTP_HEAPERROR); @quit; }
- I7SFRAME = new;
-];
-
-[ BlkValueCreateOnStack offset strong_kind;
- BlkValueCreate(strong_kind, I7SFRAME + WORDSIZE*offset);
-];
-
-[ BlkValueFreeOnStack offset;
- BlkValueFree(I7SFRAME + WORDSIZE*offset);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Freeing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueFree bv kovs d;
- if (bv == 0) return;
-
- ! Dispose of any data in the long block
- kovs = KOVSupportFunction(BlkValueWeakKind(bv), "impossible deallocation");
- BlkValueDestroyPrimitive(bv, kovs);
-
- ! Free any heap memory occupied by the short block
- d = bv - Flex_Heap;
- if ((d >= 0) && (d < MEMORY_HEAP_SIZE + 16))
- FlexFree(bv - BLK_DATA_OFFSET);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Quick Copy
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueQuickCopyPrimitive to_bv from_bv kovs;
- BlkValueDestroyPrimitive(to_bv, kovs);
- kovs(COPYSB_KOVS, to_bv, from_bv);
- BlkValueIncRefCountPrimitive(from_bv);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Short Block Copy
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueCopySB1 to_bv from_bv;
- to_bv-->0 = from_bv-->0;
- if (to_bv-->0 == 0) to_bv-->0 = from_bv + WORDSIZE;
-];
-
-[ BlkValueCopySB2 to_bv from_bv;
- to_bv-->0 = from_bv-->0;
- to_bv-->1 = from_bv-->1;
- if (to_bv-->1 == 0) to_bv-->1 = from_bv + 2*WORDSIZE;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Slow Copy
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueSlowCopyPrimitive to_bv from_bv kovs recycling
- k from_long_block no_entries_to_copy;
- k = kovs(KINDDATA_KOVS, to_bv, from_bv);
-
- from_long_block = BlkValueGetLongBlock(from_bv);
- if (from_long_block) {
- if (recycling) BlkValueRecyclePrimitive(to_bv, kovs);
- no_entries_to_copy = kovs(EXTENT_KOVS, from_bv);
- if (no_entries_to_copy == -1) no_entries_to_copy = BlkValueLBCapacity(from_bv);
- BlkValueMassCopyEntries(to_bv, from_bv, no_entries_to_copy);
-!print "So to: "; BlkValueDebug(to_bv); print "^";
-
- }
-
- kovs(COPY_KOVS, to_bv, from_bv, k);
-!print "Whence to: "; BlkValueDebug(to_bv); print "^";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Copy
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueCopy to_bv from_bv to_kind from_kind kovs;
- if (to_bv == 0) BlkValueError("copy to null value");
- if (from_bv == 0) BlkValueError("copy from null value");
- if (to_bv == from_bv) return;
-
- #ifdef BLKVALUE_TRACE;
- print "Copy: ", (BlkValueDebug) to_bv, " to equal ", (BlkValueDebug) from_bv, "^";
- #endif;
-
- to_kind = BlkValueWeakKind(to_bv);
- from_kind = BlkValueWeakKind(from_bv);
- if (to_kind ~= from_kind) BlkValueError("copy incompatible kinds");
-
- kovs = KOVSupportFunction(to_kind, "impossible copy");
-
- if (kovs(COPYQUICK_KOVS, to_bv, from_bv))
- BlkValueQuickCopyPrimitive(to_bv, from_bv, kovs);
- else
- BlkValueSlowCopyPrimitive(to_bv, from_bv, kovs, true);
-
- return to_bv;
-];
-
-[ BlkValueCopyAZ to_bv from_bv;
- if (from_bv) return BlkValueCopy(to_bv, from_bv);
- return to_bv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Destruction
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueDestroyPrimitive bv kovs long_block;
- #ifdef BLKVALUE_TRACE; print "Destroying ", (BlkValueDebug) bv, "^"; #endif;
- if (BlkValueDecRefCountPrimitive(bv) == 0) {
- kovs(DESTROY_KOVS, bv);
- long_block = BlkValueGetLongBlock(bv);
- if (long_block) FlexFree(long_block);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Recycling
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueRecyclePrimitive bv kovs;
- #ifdef BLKVALUE_TRACE; print "Recycling ", (BlkValueDebug) bv, "^"; #endif;
- if (BlkValueDecRefCountPrimitive(bv) == 0) {
- kovs(DESTROY_KOVS, bv);
- BlkValueIncRefCountPrimitive(bv);
- } else {
- BlkValueCreate(BlkValueWeakKind(bv), bv);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Mutability
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkMakeMutable bv block bv_kind kovs sb_size;
- if (bv == 0) BlkValueError("tried to make null block mutable");
-
- if (BlkValueGetRefCountPrimitive(bv) > 1) {
- #ifdef BLKVALUE_TRACE; print "Make mutable: ", (BlkValueDebug) bv, "^"; #endif;
-
- BlkValueDecRefCountPrimitive(bv);
-
- bv_kind = BlkValueWeakKind(bv);
- kovs = KOVSupportFunction(bv_kind, "impossible mutability");
-
- sb_size = kovs(MAKEMUTABLE_KOVS, bv);
- if (sb_size > 0) {
- @push I7SFRAME;
- StackFrameCreate(sb_size);
- BlkValueCreateOnStack(0, bv_kind);
- kovs(COPYKIND_KOVS, I7SFRAME, bv);
- BlkValueSlowCopyPrimitive(I7SFRAME, bv, kovs, false);
- kovs(COPYSB_KOVS, bv, I7SFRAME);
- @pull I7SFRAME;
- }
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Casting
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueCast to_bv original_kind original_value kovs;
- kovs = KOVSupportFunction(BlkValueWeakKind(to_bv), "impossible cast");
- kovs(CAST_KOVS, to_bv, original_kind, original_value);
- return to_bv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Comparison
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueCompare bv_left bv_right kind_left kind_right kovs;
- if ((bv_left == 0) && (bv_right == 0)) return 0;
- if (bv_left == 0) return 1;
- if (bv_right == 0) return -1;
-
- kind_left = BlkValueWeakKind(bv_left);
- kind_right = BlkValueWeakKind(bv_right);
- if (kind_left ~= kind_right) return kind_left - kind_right;
-
- kovs = KOVSupportFunction(kind_left, "impossible comparison");
- return kovs(COMPARE_KOVS, bv_left, bv_right);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Hashing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ GetHashValue kind value;
- if (KOVIsBlockValue(kind)) return BlkValueHash(value);
- return value;
-];
-
-[ BlkValueHash bv bv_kind kovs;
- if (bv == 0) return 0;
- bv_kind = BlkValueWeakKind(bv);
- kovs = KOVSupportFunction(bv_kind, "impossible hashing");
- return kovs(HASH_KOVS, bv);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Serialisation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueReadFromFile bv auxf ch bv_kind kovs;
- kovs = KOVSupportFunction(bv_kind);
- if (kovs) return kovs(READ_FILE_KOVS, bv, auxf, ch);
- rfalse;
-];
-
-[ BlkValueWriteToFile bv bv_kind kovs;
- kovs = KOVSupportFunction(bv_kind);
- if (kovs) return kovs(WRITE_FILE_KOVS, bv);
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Debugging
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkValueDebug bv flag refc long_block kovs;
- print "(BV";
- if (bv) {
- BlkDebugAddress(bv, flag);
- long_block = BlkValueGetLongBlock(bv);
- if (long_block) {
- if (bv-->0 == 0) print "..."; else print "-->";
- print "L"; BlkDebugAddress(long_block, flag);
- print " 2**", long_block->BLK_HEADER_N;
- refc = BlkValueGetRefCountPrimitive(bv);
- if (refc == RC_INFINITY) print " resident";
- else { print " ", refc, " ref"; if (refc ~= 1) print "s"; }
- }
- kovs = KOVSupportFunction(BlkValueWeakKind(bv));
- if (kovs) kovs(DEBUG_KOVS, bv);
- }
- print ")";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Printing Memory Addresses
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkDebugAddress addr flag d;
- if (flag) { print "###"; return; }
-
- d = addr - blockv_stack;
- if ((d >= 0) && (d <= WORDSIZE*BLOCKV_STACK_SIZE)) {
- print "s+", (BlkPrintHexadecimal) d;
- d = addr - I7SFRAME;
- print "=f"; if (d >= 0) print "+"; print d;
- return;
- }
-
- d = addr - Flex_Heap;
- if ((d >= 0) && (d < MEMORY_HEAP_SIZE + 16)) {
- print "h+", (BlkPrintHexadecimal) d;
- return;
- }
-
- print (BlkPrintHexadecimal) addr;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! BlockValues.i6t: Hexadecimal Printing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ BlkPrintHexadecimal v;
- #iftrue WORDSIZE == 4;
- if (v & $ffff0000) {
- if (v & $ff000000) {
- BlkPrintHexDigit(v / $10000000);
- BlkPrintHexDigit(v / $1000000);
- }
- BlkPrintHexDigit(v / $100000);
- BlkPrintHexDigit(v / $10000);
- }
- #endif;
- BlkPrintHexDigit(v / $1000);
- BlkPrintHexDigit(v / $100);
- BlkPrintHexDigit(v / $10);
- BlkPrintHexDigit(v);
-];
-
-[ BlkPrintHexDigit v;
- v = v & $F;
- if (v < 10) print v; else print (char) 'A' + v - 10;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Block Format
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant CONSTANT_PACKED_TEXT_STORAGE = BLK_BVBITMAP_TEXT + BLK_BVBITMAP_CONSTANT + 1;
-Constant CONSTANT_PERISHABLE_TEXT_STORAGE = BLK_BVBITMAP_TEXT + BLK_BVBITMAP_CONSTANT + 2;
-Constant PACKED_TEXT_STORAGE = BLK_BVBITMAP_TEXT + 3;
-Constant UNPACKED_TEXT_STORAGE = BLK_BVBITMAP_TEXT + BLK_BVBITMAP_LONGBLOCK + 4;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Extent Of Long Block
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Extent arg1 x;
- x = BlkValueSeekZeroEntry(arg1);
- if (x < 0) return -1; ! should not happen, of course
- return x+1;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Character Set
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF TARGET_ZCODE;
-Constant TEXT_TY_Storage_Flags = BLK_FLAG_MULTIPLE;
-Constant ZSCII_Tables;
-#IFNOT;
-Constant TEXT_TY_Storage_Flags = BLK_FLAG_MULTIPLE + BLK_FLAG_16_BIT;
-Constant Large_Unicode_Tables;
-#ENDIF;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! UnicodeData.i6t: Source
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant UNIC_NCT = 10000; ! Safe as highest case-change delta is 8383
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! UnicodeData.i6t: ZSCII Casing Tables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF ZSCII_Tables;
-Array CharCasingChart0 -->
- $0061 ( 26) ( -32) $009b ( 3) ( 3) $00a1 ( 1) (UNIC_NCT)
- $00a4 ( 2) ( 3) $00a6 ( 1) (UNIC_NCT) $00a9 ( 6) ( 6)
- $00b5 ( 5) ( 5) $00bf ( 5) ( 5) $00c9 ( -3) ( 1)
- $00cd ( 3) ( 3) $00d3 ( -3) ( 1) $00d7 ( 2) ( 2)
- $00dc ( 1) ( 1) $0000
-;
-
-Array CharCasingChart1 -->
- $0041 ( 26) ( 32) $009e ( 3) ( -3) $00a7 ( 2) ( -3)
- $00af ( 6) ( -6) $00ba ( 5) ( -5) $00c4 ( 5) ( -5)
- $00ca ( -3) ( -1) $00d0 ( 3) ( -3) $00d4 ( -3) ( -1)
- $00d9 ( 2) ( -2) $00dd ( 1) ( -1) $0000
-;
-#ENDIF; ! ZSCII_Tables
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! UnicodeData.i6t: Small Unicode Casing Tables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF Small_Unicode_Tables;
-Array CharCasingChart0 -->
- $0061 ( 26) ( -32) $00aa ( 1) (UNIC_NCT) $00b5 ( 1) (UNIC_NCT) $00ba ( 1) (UNIC_NCT)
- $00df ( 1) (UNIC_NCT) $00e0 ( 23) ( -32) $00f8 ( 7) ( -32) $00ff ( 1) (UNIC_NCT)
- $0000
-;
-
-Array CharCasingChart1 -->
- $0041 ( 26) ( 32) $00c0 ( 23) ( 32) $00d8 ( 7) ( 32) $0000
-;
-
-#ENDIF; ! Small_Unicode_Tables
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! UnicodeData.i6t: Large Unicode Casing Tables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF Large_Unicode_Tables;
-Array CharCasingChart0 -->
- $0061 ( 26) ( -32) $00aa ( 1) (UNIC_NCT) $00b5 ( 1) ( 743) $00ba ( 1) (UNIC_NCT)
- $00df ( 1) (UNIC_NCT) $00e0 ( 23) ( -32) $00f8 ( 7) ( -32) $00ff ( 1) ( 121)
- $0101 ( -47) ( -1) $0131 ( 1) ( -232) $0133 ( -5) ( -1) $0138 ( 1) (UNIC_NCT)
- $013a ( -15) ( -1) $0149 ( 1) (UNIC_NCT) $014b ( -45) ( -1) $017a ( -5) ( -1)
- $017f ( 1) ( -300) $0180 ( 1) (UNIC_NCT) $0183 ( -3) ( -1) $0188 ( 1) ( -1)
- $018c ( 1) ( -1) $018d ( 1) (UNIC_NCT) $0192 ( 1) ( -1) $0195 ( 1) ( 97)
- $0199 ( 1) ( -1) $019a ( 2) (UNIC_NCT) $019e ( 1) ( 130) $01a1 ( -5) ( -1)
- $01a8 ( 1) ( -1) $01aa ( 2) (UNIC_NCT) $01ad ( 1) ( -1) $01b0 ( 1) ( -1)
- $01b4 ( -3) ( -1) $01b9 ( 1) ( -1) $01ba ( 1) (UNIC_NCT) $01bd ( 1) ( -1)
- $01be ( 1) (UNIC_NCT) $01bf ( 1) ( 56) $01c6 ( 1) ( -2) $01c9 ( 1) ( -2)
- $01cc ( 1) ( -2) $01ce ( -15) ( -1) $01dd ( 1) ( -79) $01df ( -17) ( -1)
- $01f0 ( 1) (UNIC_NCT) $01f3 ( 1) ( -2) $01f5 ( 1) ( -1) $01f9 ( -39) ( -1)
- $0221 ( 1) (UNIC_NCT) $0223 ( -17) ( -1) $0234 ( 3) (UNIC_NCT) $0250 ( 3) (UNIC_NCT)
- $0253 ( 1) ( -210) $0254 ( 1) ( -206) $0255 ( 1) (UNIC_NCT) $0256 ( 2) ( -205)
- $0258 ( 1) (UNIC_NCT) $0259 ( 1) ( -202) $025a ( 1) (UNIC_NCT) $025b ( 1) ( -203)
- $025c ( 4) (UNIC_NCT) $0260 ( 1) ( -205) $0261 ( 2) (UNIC_NCT) $0263 ( 1) ( -207)
- $0264 ( 4) (UNIC_NCT) $0268 ( 1) ( -209) $0269 ( 1) ( -211) $026a ( 5) (UNIC_NCT)
- $026f ( 1) ( -211) $0270 ( 2) (UNIC_NCT) $0272 ( 1) ( -213) $0273 ( 2) (UNIC_NCT)
- $0275 ( 1) ( -214) $0276 ( 10) (UNIC_NCT) $0280 ( 1) ( -218) $0281 ( 2) (UNIC_NCT)
- $0283 ( 1) ( -218) $0284 ( 4) (UNIC_NCT) $0288 ( 1) ( -218) $0289 ( 1) (UNIC_NCT)
- $028a ( 2) ( -217) $028c ( 6) (UNIC_NCT) $0292 ( 1) ( -219) $0293 ( 29) (UNIC_NCT)
- $0390 ( 1) (UNIC_NCT) $03ac ( 1) ( -38) $03ad ( 3) ( -37) $03b0 ( 1) (UNIC_NCT)
- $03b1 ( 17) ( -32) $03c2 ( 1) ( -31) $03c3 ( 9) ( -32) $03cc ( 1) ( -64)
- $03cd ( 2) ( -63) $03d0 ( 1) ( -62) $03d1 ( 1) ( -57) $03d5 ( 1) ( -47)
- $03d6 ( 1) ( -54) $03d7 ( 1) (UNIC_NCT) $03d9 ( -23) ( -1) $03f0 ( 1) ( -86)
- $03f1 ( 1) ( -80) $03f2 ( 1) ( 7) $03f3 ( 1) (UNIC_NCT) $03f5 ( 1) ( -96)
- $03f8 ( 1) ( -1) $03fb ( 1) ( -1) $0430 ( 32) ( -32) $0450 ( 16) ( -80)
- $0461 ( -33) ( -1) $048b ( -53) ( -1) $04c2 ( -13) ( -1) $04d1 ( -37) ( -1)
- $04f9 ( 1) ( -1) $0501 ( -15) ( -1) $0561 ( 38) ( -48) $0587 ( 1) (UNIC_NCT)
- $1d00 ( 44) (UNIC_NCT) $1d62 ( 10) (UNIC_NCT) $1e01 (-149) ( -1) $1e96 ( 5) (UNIC_NCT)
- $1e9b ( 1) ( -59) $1ea1 ( -89) ( -1) $1f00 ( 8) ( 8) $1f10 ( 6) ( 8)
- $1f20 ( 8) ( 8) $1f30 ( 8) ( 8) $1f40 ( 6) ( 8) $1f50 ( 1) (UNIC_NCT)
- $1f51 ( 1) ( 8) $1f52 ( 1) (UNIC_NCT) $1f53 ( 1) ( 8) $1f54 ( 1) (UNIC_NCT)
- $1f55 ( 1) ( 8) $1f56 ( 1) (UNIC_NCT) $1f57 ( 1) ( 8) $1f60 ( 8) ( 8)
- $1f70 ( 2) ( 74) $1f72 ( 4) ( 86) $1f76 ( 2) ( 100) $1f78 ( 2) ( 128)
- $1f7a ( 2) ( 112) $1f7c ( 2) ( 126) $1f80 ( 8) ( 8) $1f90 ( 8) ( 8)
- $1fa0 ( 8) ( 8) $1fb0 ( 2) ( 8) $1fb2 ( 1) (UNIC_NCT) $1fb3 ( 1) ( 9)
- $1fb4 ( -3) (UNIC_NCT) $1fb7 ( 1) (UNIC_NCT) $1fbe ( 1) ( -7205) $1fc2 ( 1) (UNIC_NCT)
- $1fc3 ( 1) ( 9) $1fc4 ( -3) (UNIC_NCT) $1fc7 ( 1) (UNIC_NCT) $1fd0 ( 2) ( 8)
- $1fd2 ( 2) (UNIC_NCT) $1fd6 ( 2) (UNIC_NCT) $1fe0 ( 2) ( 8) $1fe2 ( 3) (UNIC_NCT)
- $1fe5 ( 1) ( 7) $1fe6 ( 2) (UNIC_NCT) $1ff2 ( 1) (UNIC_NCT) $1ff3 ( 1) ( 9)
- $1ff4 ( -3) (UNIC_NCT) $1ff7 ( 1) (UNIC_NCT) $2071 ( 1) (UNIC_NCT) $207f ( 1) (UNIC_NCT)
- $210a ( 1) (UNIC_NCT) $210e ( 2) (UNIC_NCT) $2113 ( 1) (UNIC_NCT) $212f ( 1) (UNIC_NCT)
- $2134 ( 1) (UNIC_NCT) $2139 ( 1) (UNIC_NCT) $213d ( 1) (UNIC_NCT) $2146 ( 4) (UNIC_NCT)
- $fb00 ( 7) (UNIC_NCT) $fb13 ( 5) (UNIC_NCT) $ff41 ( 26) ( -32) $0000
-;
-
-Array CharCasingChart1 -->
- $0041 ( 26) ( 32) $00c0 ( 23) ( 32) $00d8 ( 7) ( 32) $0100 ( -47) ( 1)
- $0130 ( 1) ( -199) $0132 ( -5) ( 1) $0139 ( -15) ( 1) $014a ( -45) ( 1)
- $0178 ( 1) ( -121) $0179 ( -5) ( 1) $0181 ( 1) ( 210) $0182 ( -3) ( 1)
- $0186 ( 1) ( 206) $0187 ( 1) ( 1) $0189 ( 2) ( 205) $018b ( 1) ( 1)
- $018e ( 1) ( 79) $018f ( 1) ( 202) $0190 ( 1) ( 203) $0191 ( 1) ( 1)
- $0193 ( 1) ( 205) $0194 ( 1) ( 207) $0196 ( 1) ( 211) $0197 ( 1) ( 209)
- $0198 ( 1) ( 1) $019c ( 1) ( 211) $019d ( 1) ( 213) $019f ( 1) ( 214)
- $01a0 ( -5) ( 1) $01a6 ( 1) ( 218) $01a7 ( 1) ( 1) $01a9 ( 1) ( 218)
- $01ac ( 1) ( 1) $01ae ( 1) ( 218) $01af ( 1) ( 1) $01b1 ( 2) ( 217)
- $01b3 ( -3) ( 1) $01b7 ( 1) ( 219) $01b8 ( 1) ( 1) $01bc ( 1) ( 1)
- $01c4 ( 1) ( 2) $01c7 ( 1) ( 2) $01ca ( 1) ( 2) $01cd ( -15) ( 1)
- $01de ( -17) ( 1) $01f1 ( 1) ( 2) $01f4 ( 1) ( 1) $01f6 ( 1) ( -97)
- $01f7 ( 1) ( -56) $01f8 ( -39) ( 1) $0220 ( 1) ( -130) $0222 ( -17) ( 1)
- $0386 ( 1) ( 38) $0388 ( 3) ( 37) $038c ( 1) ( 64) $038e ( 2) ( 63)
- $0391 ( 17) ( 32) $03a3 ( 9) ( 32) $03d2 ( 3) (UNIC_NCT) $03d8 ( -23) ( 1)
- $03f4 ( 1) ( -60) $03f7 ( 1) ( 1) $03f9 ( 1) ( -7) $03fa ( 1) ( 1)
- $0400 ( 16) ( 80) $0410 ( 32) ( 32) $0460 ( -33) ( 1) $048a ( -53) ( 1)
- $04c0 ( 1) (UNIC_NCT) $04c1 ( -13) ( 1) $04d0 ( -37) ( 1) $04f8 ( 1) ( 1)
- $0500 ( -15) ( 1) $0531 ( 38) ( 48) $10a0 ( 38) (UNIC_NCT) $1e00 (-149) ( 1)
- $1ea0 ( -89) ( 1) $1f08 ( 8) ( -8) $1f18 ( 6) ( -8) $1f28 ( 8) ( -8)
- $1f38 ( 8) ( -8) $1f48 ( 6) ( -8) $1f59 ( -7) ( -8) $1f68 ( 8) ( -8)
- $1fb8 ( 2) ( -8) $1fba ( 2) ( -74) $1fc8 ( 4) ( -86) $1fd8 ( 2) ( -8)
- $1fda ( 2) ( -100) $1fe8 ( 2) ( -8) $1fea ( 2) ( -112) $1fec ( 1) ( -7)
- $1ff8 ( 2) ( -128) $1ffa ( 2) ( -126) $2102 ( 1) (UNIC_NCT) $2107 ( 1) (UNIC_NCT)
- $210b ( 3) (UNIC_NCT) $2110 ( 3) (UNIC_NCT) $2115 ( 1) (UNIC_NCT) $2119 ( 5) (UNIC_NCT)
- $2124 ( 1) (UNIC_NCT) $2126 ( 1) ( -7517) $2128 ( 1) (UNIC_NCT) $212a ( 1) ( -8383)
- $212b ( 1) ( -8262) $212c ( 2) (UNIC_NCT) $2130 ( 2) (UNIC_NCT) $2133 ( 1) (UNIC_NCT)
- $213e ( 2) (UNIC_NCT) $2145 ( 1) (UNIC_NCT) $ff21 ( 26) ( 32) $0000
-;
-
-#ENDIF; ! Large_Unicode_Tables
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Char.i6t: Char Is Of Case
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CharIsOfCase c case
- i tab min max len par;
- if (c<'A') rfalse;
- if (case == 0) {
- if ((c >= 'a') && (c <= 'z')) rtrue;
- tab = CharCasingChart0;
- } else {
- if ((c >= 'A') && (c <= 'Z')) rtrue;
- tab = CharCasingChart1;
- }
- if (c<128) rfalse;
- while (tab-->i) {
- min = tab-->i; i++;
- len = tab-->i; i++;
- i++;
- par = 0;
- if (len<0) { par = 1; len = -len; }
- if (c < min) rfalse;
- if (c < min+len) {
- if (par) { if ((c-min) % 2 == 0) rtrue; }
- else { rtrue; }
- }
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Char.i6t: Char To Case
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CharToCase c case
- i tab min max len par del f;
- if (c<'A') return c;
- if (case == 1) {
- if ((c >= 'a') && (c <= 'z')) return c-32;
- tab = CharCasingChart0;
- } else {
- if ((c >= 'A') && (c <= 'Z')) return c+32;
- tab = CharCasingChart1;
- }
- if (c<128) return c;
- while (tab-->i) {
- min = tab-->i; i++;
- len = tab-->i; i++;
- del = tab-->i; i++;
- par = 0;
- if (len<0) { par = 1; len = -len; }
- if (c < min) return c;
- if (c < min+len) {
- f = false;
- if (par) { if ((c-min) % 2 == 0) f = true; }
- else { f = true; }
- if (f) {
- if (del == UNIC_NCT) return c;
- return c+del;
- }
- }
- }
- return c;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Char.i6t: Reversing Case
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#IFDEF TARGET_ZCODE;
-[ TEXT_TY_RevCase ch;
- if (ch<'A') return ch;
- if ((ch >= 'a') && (ch <= 'z')) return ch-'a'+'A';
- if ((ch >= 'A') && (ch <= 'Z')) return ch-'A'+'a';
- if (ch<128) return ch;
- if ((ch >= 155) && (ch <= 157)) return ch+3; ! a, o, u umlaut in ZSCII
- if ((ch >= 158) && (ch <= 160)) return ch-3; ! A, O, U umlaut
- if ((ch >= 164) && (ch <= 165)) return ch+3; ! e, i umlaut
- if ((ch >= 167) && (ch <= 168)) return ch-3; ! E, I umlaut
- if ((ch >= 169) && (ch <= 174)) return ch+6; ! a, e, i, o, u, y acute
- if ((ch >= 175) && (ch <= 180)) return ch-6; ! A, E, I, O, U, Y acute
- if ((ch >= 181) && (ch <= 185)) return ch+5; ! a, e, i, o, u grave
- if ((ch >= 186) && (ch <= 190)) return ch-5; ! A, E, I, O, U grave
- if ((ch >= 191) && (ch <= 195)) return ch+5; ! a, e, i, o, u circumflex
- if ((ch >= 196) && (ch <= 200)) return ch-5; ! A, E, I, O, U circumflex
- if (ch == 201) return 202; ! a circle
- if (ch == 202) return 201; ! A circle
- if (ch == 203) return 204; ! o slash
- if (ch == 204) return 203; ! O slash
- if ((ch >= 205) && (ch <= 207)) return ch+3; ! a, n, o tilde
- if ((ch >= 208) && (ch <= 210)) return ch-3; ! A, N, O tilde
- if (ch == 211) return 212; ! ae ligature
- if (ch == 212) return 211; ! AE ligature
- if (ch == 213) return 214; ! c cedilla
- if (ch == 214) return 213; ! C cedilla
- if (ch == 215 or 216) return ch+2; ! thorn, eth
- if (ch == 217 or 218) return ch-2; ! Thorn, Eth
- if (ch == 220) return 221; ! oe ligature
- if (ch == 221) return 220; ! OE ligature
- return ch;
-];
-#IFNOT;
-[ TEXT_TY_RevCase ch;
- if (ch<'A') return ch;
- if ((ch >= 'a') && (ch <= 'z')) return ch-'a'+'A';
- if ((ch >= 'A') && (ch <= 'Z')) return ch-'A'+'a';
- if (ch<128) return ch;
- if (CharIsOfCase(ch, 0)) return CharToCase(ch, 1);
- if (CharIsOfCase(ch, 1)) return CharToCase(ch, 0);
- return ch;
-];
-#ENDIF;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Char.i6t: Testing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ CharTestCases case i j;
- for (i=32: i<$E0; i++) {
- if ((i>=127) && (i<155)) continue;
- print i, " - ", (char) i, " -";
- if (CharIsOfCase(i, 0)) print " lower";
- if (CharIsOfCase(i, 1)) print " upper";
- j = CharToCase(i, 0); if (j ~= i) print " tolower: ", (char) j;
- j = CharToCase(i, 1); if (j ~= i) print " toupper: ", (char) j;
- print "^";
- }
-];
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: KOV Support
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Support task arg1 arg2 arg3;
- switch(task) {
- CREATE_KOVS: return TEXT_TY_Create(arg2);
- CAST_KOVS: TEXT_TY_Cast(arg1, arg2, arg3);
- MAKEMUTABLE_KOVS: return TEXT_TY_Mutable(arg1);
- COPYQUICK_KOVS: rtrue;
- COPYSB_KOVS: TEXT_TY_CopySB(arg1, arg2);
- KINDDATA_KOVS: return 0;
- EXTENT_KOVS: return TEXT_TY_Extent(arg1);
- COMPARE_KOVS: return TEXT_TY_Compare(arg1, arg2);
- READ_FILE_KOVS: if (arg3 == -1) rtrue;
- return TEXT_TY_ReadFile(arg1, arg2, arg3);
- WRITE_FILE_KOVS: return TEXT_TY_WriteFile(arg1);
- HASH_KOVS: return TEXT_TY_Hash(arg1);
- DEBUG_KOVS: TEXT_TY_Debug(arg1);
- }
- ! We choose not to respond to: DESTROY_KOVS, COPYKIND_KOVS, COPY_KOVS
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Debugging
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Debug txt;
- switch (txt-->0) {
- CONSTANT_PACKED_TEXT_STORAGE: print " = cp~", (PrintI6Text) txt-->1, "~";
- CONSTANT_PERISHABLE_TEXT_STORAGE: print " = cp~", (PrintI6Text) txt-->1, "~";
- PACKED_TEXT_STORAGE: print " = p~", (PrintI6Text) txt-->1, "~";
- UNPACKED_TEXT_STORAGE: print " = ~", (TEXT_TY_Say) txt, "~";
- default: print " broken?";
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Creation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Create short_block x;
- return BlkValueCreateSB2(short_block, PACKED_TEXT_STORAGE, EMPTY_TEXT_PACKED);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Copy Short Block
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_CopySB to_bv from_bv;
- BlkValueCopySB2(to_bv, from_bv);
- if (to_bv-->0 & BLK_BVBITMAP_CONSTANTMASK) to_bv-->0 = PACKED_TEXT_STORAGE;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Transmutation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Transmute txt;
- TEXT_TY_Temporarily_Transmute(txt);
-];
-
-[ TEXT_TY_Temporarily_Transmute txt x;
- if ((txt) && (txt-->0 & BLK_BVBITMAP_LONGBLOCKMASK == 0)) {
- x = txt-->1; ! The old value was a packed string
-
- txt-->0 = UNPACKED_TEXT_STORAGE;
- txt-->1 = FlexAllocate(32, TEXT_TY, TEXT_TY_Storage_Flags);
- if (x ~= EMPTY_TEXT_PACKED) TEXT_TY_CastPrimitive(txt, false, x);
-
- return x;
- }
- return 0;
-];
-
-[ TEXT_TY_Untransmute txt pk cp x;
- if ((pk) && (txt-->0 == UNPACKED_TEXT_STORAGE)) {
- x = txt-->1; ! The old value was an unpacked string
- FlexFree(x);
- txt-->0 = cp;
- txt-->1 = pk; ! The value earlier returned by TEXT_TY_Temporarily_Transmute
- }
- return txt;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Mutability
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Mutable txt;
- if (txt-->0 & BLK_BVBITMAP_LONGBLOCKMASK == 0) {
- TEXT_TY_Transmute(txt);
- return 0;
- }
- return 2; ! Tell BlockValue there's a long block pointer
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Casting
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Cast to_txt from_kind from_value;
- if (from_kind == TEXT_TY) {
- BlkValueCopy(to_txt, from_value);
- } else if (from_kind == SNIPPET_TY) {
- TEXT_TY_Transmute(to_txt);
- TEXT_TY_CastPrimitive(to_txt, true, from_value);
- } else BlkValueError("impossible cast to text");
-];
-
-[ SNIPPET_TY_to_TEXT_TY to_txt snippet;
- return BlkValueCast(to_txt, SNIPPET_TY, snippet);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Data Conversion
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifndef TEXT_TY_BufferSize;
-Constant TEXT_TY_BufferSize = 512;
-#endif;
-Constant TEXT_TY_NoBuffers = 2;
-
-#ifdef TARGET_ZCODE;
-Array TEXT_TY_Buffers -> TEXT_TY_BufferSize*TEXT_TY_NoBuffers; ! Where characters are bytes
-#ifnot;
-Array TEXT_TY_Buffers --> (TEXT_TY_BufferSize+2)*TEXT_TY_NoBuffers; ! Where characters are words
-#endif;
-
-Global RawBufferAddress = TEXT_TY_Buffers;
-Global RawBufferSize = TEXT_TY_BufferSize;
-
-Global TEXT_TY_CastPrimitiveNesting = 0;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Z Version
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifdef TARGET_ZCODE;
-[ TEXT_TY_CastPrimitive to_txt from_snippet from_value len news buffer;
- if (to_txt == 0) BlkValueError("no destination for cast");
- SuspendRTP();
- buffer = RawBufferAddress + TEXT_TY_CastPrimitiveNesting*TEXT_TY_BufferSize;
- TEXT_TY_CastPrimitiveNesting++;
- if (TEXT_TY_CastPrimitiveNesting > TEXT_TY_NoBuffers)
- FlexError("ran out with too many simultaneous text conversions");
-
- @push say__p; @push say__pc;
- ClearParagraphing(6);
- @output_stream 3 buffer;
- if (from_value) {
- if (from_snippet) print (PrintSnippet) from_value;
- else print (PrintI6Text) from_value;
- }
- @output_stream -3;
- @pull say__pc; @pull say__p;
- ResumeRTP();
-
- len = buffer-->0;
- if (len > RawBufferSize-1) len = RawBufferSize-1;
- buffer->(len+2) = 0;
-
- TEXT_TY_CastPrimitiveNesting--;
- BlkValueMassCopyFromArray(to_txt, buffer+2, 1, len+1);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Glulx Version
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-#ifnot; ! TARGET_ZCODE
-[ TEXT_TY_CastPrimitive to_txt from_snippet from_value
- len i stream saved_stream news buffer buffer_size memory_to_free results;
-
- if (to_txt == 0) BlkValueError("no destination for cast");
-
- buffer_size = (TEXT_TY_BufferSize + 2)*WORDSIZE;
-
- RawBufferSize = TEXT_TY_BufferSize;
- buffer = RawBufferAddress + TEXT_TY_CastPrimitiveNesting*buffer_size;
- TEXT_TY_CastPrimitiveNesting++;
- if (TEXT_TY_CastPrimitiveNesting > TEXT_TY_NoBuffers) {
- buffer = VM_AllocateMemory(buffer_size); memory_to_free = buffer;
- if (buffer == 0)
- FlexError("ran out with too many simultaneous text conversions");
- }
-
- if (unicode_gestalt_ok) {
- SuspendRTP();
- .RetryWithLargerBuffer;
- saved_stream = glk_stream_get_current();
- stream = glk_stream_open_memory_uni(buffer, RawBufferSize, filemode_Write, 0);
- glk_stream_set_current(stream);
-
- @push say__p; @push say__pc;
- ClearParagraphing(7);
- if (from_snippet) print (PrintSnippet) from_value;
- else print (PrintI6Text) from_value;
- @pull say__pc; @pull say__p;
-
- results = buffer + buffer_size - 2*WORDSIZE;
- glk_stream_close(stream, results);
- if (saved_stream) glk_stream_set_current(saved_stream);
- ResumeRTP();
-
- len = results-->1;
- if (len > RawBufferSize-1) {
- ! Glulx had to truncate text output because the buffer ran out:
- ! len is the number of characters which it tried to print
- news = RawBufferSize;
- while (news < len) news=news*2;
- i = VM_AllocateMemory(news*WORDSIZE);
- if (i ~= 0) {
- if (memory_to_free) VM_FreeMemory(memory_to_free);
- memory_to_free = i;
- buffer = i;
- RawBufferSize = news;
- buffer_size = (RawBufferSize + 2)*WORDSIZE;
- jump RetryWithLargerBuffer;
- }
- ! Memory allocation refused: all we can do is to truncate the text
- len = RawBufferSize-1;
- }
- buffer-->(len) = 0;
-
- TEXT_TY_CastPrimitiveNesting--;
- BlkValueMassCopyFromArray(to_txt, buffer, 4, len+1);
- } else {
- RunTimeProblem(RTP_NOGLULXUNICODE);
- }
- if (memory_to_free) VM_FreeMemory(memory_to_free);
-];
-#endif;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Comparison
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Compare left_txt right_txt rv;
- @push say__comp;
- say__comp = true;
- rv = TEXT_TY_Compare_Inner(left_txt, right_txt);
- @pull say__comp;
- return rv;
-];
-
-[ TEXT_TY_Compare_Inner left_txt right_txt
- pos ch1 ch2 capacity_left capacity_right fl fr cl cr cpl cpr;
- if (left_txt-->0 & BLK_BVBITMAP_LONGBLOCKMASK == 0) fl = true;
- if (right_txt-->0 & BLK_BVBITMAP_LONGBLOCKMASK == 0) fr = true;
-
- if (fl && fr) {
- if ((left_txt-->1 ofclass String) && (right_txt-->1 ofclass String))
- return left_txt-->1 - right_txt-->1;
- if ((left_txt-->1 ofclass Routine) && (right_txt-->1 ofclass Routine))
- return left_txt-->1 - right_txt-->1;
- cpl = left_txt-->0; cl = TEXT_TY_Temporarily_Transmute(left_txt);
- cpr = right_txt-->0; cr = TEXT_TY_Temporarily_Transmute(right_txt);
- } else if (fl) {
- cpl = left_txt-->0; cl = TEXT_TY_Temporarily_Transmute(left_txt);
- } else if (fr) {
- cpr = right_txt-->0; cr = TEXT_TY_Temporarily_Transmute(right_txt);
- }
- if ((cl) || (cr)) {
- pos = TEXT_TY_Compare(left_txt, right_txt);
- TEXT_TY_Untransmute(left_txt, cl, cpl);
- TEXT_TY_Untransmute(right_txt, cr, cpr);
- return pos;
- }
- capacity_left = BlkValueLBCapacity(left_txt);
- capacity_right = BlkValueLBCapacity(right_txt);
- for (pos=0:(pos0; p = TEXT_TY_Temporarily_Transmute(txt);
- rv = 0;
- len = BlkValueLBCapacity(txt);
- for (i=0: i0 & BLK_BVBITMAP_LONGBLOCKMASK == 0) return PrintI6Text(txt-->1);
- dsize = BlkValueLBCapacity(txt);
- for (i=0: i 0) {
- BlkValueWrite(mod, 0, CharToCase(BlkValueRead(mod, 0), 1));
- TEXT_TY_Say(mod);
- rc = true;
- say__p = 1;
- }
- BlkValueFree(mod);
- return rc;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Serialisation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_WriteFile txt len pos ch p cp;
- cp = txt-->0; p = TEXT_TY_Temporarily_Transmute(txt);
- len = BlkValueLBCapacity(txt);
- print "S";
- for (pos=0: pos<=len: pos++) {
- if (pos == len) ch = 0; else ch = BlkValueRead(txt, pos);
- if (ch == 0) {
- print "0;"; break;
- } else {
- print ch, ",";
- }
- }
- TEXT_TY_Untransmute(txt, p, cp);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Unserialisation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_ReadFile txt auxf ch i v dg pos tsize p;
- TEXT_TY_Transmute(txt);
- tsize = BlkValueLBCapacity(txt);
- while (ch ~= 32 or 9 or 10 or 13 or 0 or -1) {
- ch = FileIO_GetC(auxf);
- if (ch == ',' or ';') {
- if (pos+1 >= tsize) {
- if (BlkValueSetLBCapacity(txt, 2*pos) == false) break;
- tsize = BlkValueLBCapacity(txt);
- }
- BlkValueWrite(txt, pos++, v);
- v = 0;
- if (ch == ';') break;
- } else {
- dg = ch - '0';
- v = v*10 + dg;
- }
- }
- BlkValueWrite(txt, pos, 0);
- return txt;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Substitution
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_SubstitutedForm to txt;
- if (txt) {
- BlkValueCopy(to, txt);
- TEXT_TY_Transmute(to);
- }
- return to;
-];
-
-[ TEXT_TY_IsSubstituted txt;
- if ((txt) &&
- (txt-->0 & BLK_BVBITMAP_LONGBLOCKMASK == 0) &&
- (txt-->1 ofclass Routine)) rfalse;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Perishability
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_ExpandIfPerishable to from;
- if ((from) && (from-->0 == CONSTANT_PERISHABLE_TEXT_STORAGE))
- return TEXT_TY_SubstitutedForm(to, from);
- return from;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Recognition-only-GPR
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_ROGPR txt p cp r;
- if (txt == 0) return GPR_FAIL;
- cp = txt-->0; p = TEXT_TY_Temporarily_Transmute(txt);
- r = TEXT_TY_ROGPRI(txt);
- TEXT_TY_Untransmute(txt, p, cp);
- return r;
-];
-[ TEXT_TY_ROGPRI txt
- pos len wa wl wpos bdm ch own;
- bdm = true; own = wn;
- len = BlkValueLBCapacity(txt);
- for (pos=0: pos<=len: pos++) {
- if (pos == len) ch = 0; else ch = BlkValueRead(txt, pos);
- if (ch == 32 or 9 or 10 or 0) {
- if (bdm) continue;
- bdm = true;
- if (wpos ~= wl) return GPR_FAIL;
- if (ch == 0) break;
- } else {
- if (bdm) {
- bdm = false;
- if (NextWordStopped() == -1) return GPR_FAIL;
- wa = WordAddress(wn-1);
- wl = WordLength(wn-1);
- wpos = 0;
- }
- if (wa->wpos ~= ch or TEXT_TY_RevCase(ch)) return GPR_FAIL;
- wpos++;
- }
- }
- if (wn == own) return GPR_FAIL; ! Progress must be made to avoid looping
- return GPR_PREPOSITION;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Blobs
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant CHR_BLOB = 1; ! Construe as an array of characters
-Constant WORD_BLOB = 2; ! Of words
-Constant PWORD_BLOB = 3; ! Of punctuated words
-Constant UWORD_BLOB = 4; ! Of unpunctuated words
-Constant PARA_BLOB = 5; ! Of paragraphs
-Constant LINE_BLOB = 6; ! Of lines
-
-Constant REGEXP_BLOB = 7; ! Not a blob type as such, but needed as a distinct value
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Blob Access
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant WS_BRM = 1;
-Constant SKIPPED_BRM = 2;
-Constant ACCEPTED_BRM = 3;
-Constant ACCEPTEDP_BRM = 4;
-Constant ACCEPTEDN_BRM = 5;
-Constant ACCEPTEDPN_BRM = 6;
-
-[ TEXT_TY_BlobAccess txt blobtype ctxt wanted rtxt
- p1 p2 cp1 cp2 r;
- if (txt==0) return 0;
- if (blobtype == CHR_BLOB) return TEXT_TY_CharacterLength(txt);
- cp1 = txt-->0; p1 = TEXT_TY_Temporarily_Transmute(txt);
- cp2 = rtxt-->0; p2 = TEXT_TY_Temporarily_Transmute(rtxt);
- TEXT_TY_Transmute(ctxt);
- r = TEXT_TY_BlobAccessI(txt, blobtype, ctxt, wanted, rtxt);
- TEXT_TY_Untransmute(txt, p1, cp1);
- TEXT_TY_Untransmute(rtxt, p2, cp2);
- return r;
-];
-[ TEXT_TY_BlobAccessI txt blobtype ctxt wanted rtxt
- brm oldbrm ch i dsize csize blobcount gp cl j;
- dsize = BlkValueLBCapacity(txt);
- if (ctxt) csize = BlkValueLBCapacity(ctxt);
- else if (rtxt) "*** rtxt without ctxt ***";
- brm = WS_BRM;
- for (i=0:i= 2) brm = WS_BRM;
- LINE_BLOB: if (gp >= 1) brm = WS_BRM;
- default: brm = WS_BRM;
- }
- }
- } else {
- gp = false;
- if ((blobtype == WORD_BLOB or PWORD_BLOB or UWORD_BLOB) &&
- (ch == '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}'))
- gp = true;
- switch (oldbrm) {
- WS_BRM:
- brm = ACCEPTED_BRM;
- if (blobtype == WORD_BLOB) {
- if (gp) brm = SKIPPED_BRM;
- }
- if (blobtype == PWORD_BLOB) {
- if (gp) brm = ACCEPTEDP_BRM;
- }
- SKIPPED_BRM:
- if (blobtype == WORD_BLOB) {
- if (gp == false) brm = ACCEPTED_BRM;
- }
- ACCEPTED_BRM:
- if (blobtype == WORD_BLOB) {
- if (gp) brm = SKIPPED_BRM;
- }
- if (blobtype == PWORD_BLOB) {
- if (gp) brm = ACCEPTEDP_BRM;
- }
- ACCEPTEDP_BRM:
- if (blobtype == PWORD_BLOB) {
- if (gp == false) brm = ACCEPTED_BRM;
- else {
- if ((ch == BlkValueRead(txt, i-1)) &&
- (ch == '-' or '.')) blobcount--;
- blobcount++;
- }
- }
- ACCEPTEDN_BRM:
- if (blobtype == WORD_BLOB) {
- if (gp) brm = SKIPPED_BRM;
- }
- if (blobtype == PWORD_BLOB) {
- if (gp) brm = ACCEPTEDP_BRM;
- }
- ACCEPTEDPN_BRM:
- if (blobtype == PWORD_BLOB) {
- if (gp == false) brm = ACCEPTED_BRM;
- else {
- if ((ch == BlkValueRead(txt, i-1)) &&
- (ch == '-' or '.')) blobcount--;
- blobcount++;
- }
- }
- }
- }
- if (brm == ACCEPTED_BRM or ACCEPTEDP_BRM) {
- if (oldbrm ~= brm) blobcount++;
- if ((ctxt) && (blobcount == wanted)) {
- if (rtxt) {
- BlkValueWrite(ctxt, cl, 0);
- TEXT_TY_Concatenate(ctxt, rtxt, CHR_BLOB);
- csize = BlkValueLBCapacity(ctxt);
- cl = TEXT_TY_CharacterLength(ctxt);
- if (brm == ACCEPTED_BRM) brm = ACCEPTEDN_BRM;
- if (brm == ACCEPTEDP_BRM) brm = ACCEPTEDPN_BRM;
- } else {
- if (cl+1 >= csize) {
- if (BlkValueSetLBCapacity(ctxt, 2*cl) == false) break;
- csize = BlkValueLBCapacity(ctxt);
- }
- BlkValueWrite(ctxt, cl++, ch);
- }
- } else {
- if (rtxt) {
- if (cl+1 >= csize) {
- if (BlkValueSetLBCapacity(ctxt, 2*cl) == false) break;
- csize = BlkValueLBCapacity(ctxt);
- }
- BlkValueWrite(ctxt, cl++, ch);
- }
- }
- } else {
- if ((rtxt) && (brm ~= ACCEPTEDN_BRM or ACCEPTEDPN_BRM)) {
- if (cl+1 >= csize) {
- if (BlkValueSetLBCapacity(ctxt, 2*cl) == false) break;
- csize = BlkValueLBCapacity(ctxt);
- }
- BlkValueWrite(ctxt, cl++, ch);
- }
- }
- }
- if (ctxt) BlkValueWrite(ctxt, cl++, 0);
- return blobcount;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Get Blob
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_GetBlob ctxt txt wanted blobtype;
- if (txt==0) return;
- if (blobtype == CHR_BLOB) return TEXT_TY_GetCharacter(ctxt, txt, wanted);
- TEXT_TY_BlobAccess(txt, blobtype, ctxt, wanted);
- return ctxt;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Replace Blob
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_ReplaceBlob blobtype txt wanted rtxt ctxt ilen rlen i p cp;
- TEXT_TY_Transmute(txt);
- cp = rtxt-->0; p = TEXT_TY_Temporarily_Transmute(rtxt);
- if (blobtype == CHR_BLOB) {
- ilen = TEXT_TY_CharacterLength(txt);
- rlen = TEXT_TY_CharacterLength(rtxt);
- wanted--;
- if ((wanted >= 0) && (wanted0; p1 = TEXT_TY_Temporarily_Transmute(ftxt);
- cp2 = rtxt-->0; p2 = TEXT_TY_Temporarily_Transmute(rtxt);
- r = TEXT_TY_ReplaceTextI(blobtype, txt, ftxt, rtxt);
- TEXT_TY_Untransmute(ftxt, p1, cp1);
- TEXT_TY_Untransmute(rtxt, p2, cp2);
- return r;
-];
-
-[ TEXT_TY_ReplaceTextI blobtype txt ftxt rtxt
- ctxt csize ilen flen i cl mpos ch chm whitespace punctuation;
- if (blobtype == REGEXP_BLOB or CHR_BLOB)
- return TEXT_TY_Replace_RE(blobtype, txt, ftxt, rtxt);
-
- ilen = TEXT_TY_CharacterLength(txt);
- flen = TEXT_TY_CharacterLength(ftxt);
- ctxt = BlkValueCreate(TEXT_TY);
- TEXT_TY_Transmute(ctxt);
- csize = BlkValueLBCapacity(ctxt);
- mpos = 0;
-
- whitespace = true; punctuation = false;
- for (i=0:i<=ilen:i++) {
- ch = BlkValueRead(txt, i);
- .MoreMatching;
- chm = BlkValueRead(ftxt, mpos++);
- if (mpos == 1) {
- switch (blobtype) {
- WORD_BLOB:
- if ((whitespace == false) && (punctuation == false)) chm = -1;
- }
- }
- whitespace = false;
- if (ch == 10 or 13 or 32 or 9) whitespace = true;
- punctuation = false;
- if (ch == '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}') {
- if (blobtype == WORD_BLOB) chm = -1;
- punctuation = true;
- }
- if (ch == chm) {
- if (mpos == flen) {
- if (i == ilen) chm = 0;
- else chm = BlkValueRead(txt, i+1);
- if ((blobtype == CHR_BLOB) ||
- (chm == 0 or 10 or 13 or 32 or 9) ||
- (chm == '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}')) {
- mpos = 0;
- cl = cl - (flen-1);
- BlkValueWrite(ctxt, cl, 0);
- TEXT_TY_Concatenate(ctxt, rtxt, CHR_BLOB);
- csize = BlkValueLBCapacity(ctxt);
- cl = TEXT_TY_CharacterLength(ctxt);
- continue;
- }
- }
- } else {
- mpos = 0;
- }
- if (cl+1 >= csize) {
- if (BlkValueSetLBCapacity(ctxt, 2*cl) == false) break;
- csize = BlkValueLBCapacity(ctxt);
- }
- BlkValueWrite(ctxt, cl++, ch);
- }
- BlkValueCopy(txt, ctxt);
- BlkValueFree(ctxt);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Character Length
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_CharacterLength txt ch i dsize p cp r;
- if (txt==0) return 0;
- cp = txt-->0; p = TEXT_TY_Temporarily_Transmute(txt);
- dsize = BlkValueLBCapacity(txt); r = dsize;
- for (i=0:i0 & BLK_BVBITMAP_LONGBLOCKMASK == 0) {
- if (txt-->1 == EMPTY_TEXT_PACKED) rtrue;
- rfalse;
- }
- if (TEXT_TY_CharacterLength(txt) == 0) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Get Character
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_GetCharacter ctxt txt i ch p cp;
- if (txt==0) return 0;
- cp = txt-->0; p = TEXT_TY_Temporarily_Transmute(txt);
- TEXT_TY_Transmute(ctxt);
- if ((i<=0) || (i>TEXT_TY_CharacterLength(txt))) ch = 0;
- else ch = BlkValueRead(txt, i-1);
- BlkValueWrite(ctxt, 0, ch);
- BlkValueWrite(ctxt, 1, 0);
- TEXT_TY_Untransmute(txt, p, cp);
- return ctxt;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Text.i6t: Casing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_CharactersOfCase txt case i ch len p cp r;
- if (txt==0) return 0;
- cp = txt-->0; p = TEXT_TY_Temporarily_Transmute(txt);
- len = TEXT_TY_CharacterLength(txt);
- r = true;
- for (i=0:i0; pk = TEXT_TY_Temporarily_Transmute(txt);
- TEXT_TY_Transmute(ctxt);
- len = TEXT_TY_CharacterLength(txt);
- if (BlkValueSetLBCapacity(ctxt, len+1)) {
- bnd = 1;
- for (i=0:i0; p = TEXT_TY_Temporarily_Transmute(from_txt);
- r = TEXT_TY_ConcatenateI(to_txt, from_txt, blobtype, ref_txt);
- TEXT_TY_Untransmute(from_txt, p, cp);
- return r;
-];
-
-[ TEXT_TY_ConcatenateI to_txt from_txt blobtype ref_txt
- pos len ch i tosize x y case;
- switch(blobtype) {
- CHR_BLOB, 0:
- pos = TEXT_TY_CharacterLength(to_txt);
- len = TEXT_TY_CharacterLength(from_txt);
- if (BlkValueSetLBCapacity(to_txt, pos+len+1) == false) return to_txt;
- for (i=0:i0; p = TEXT_TY_Temporarily_Transmute(from_txt);
- len = TEXT_TY_CharacterLength(from_txt);
- if (len > 118) len = 118;
- #ifdef TARGET_ZCODE;
- buffer->1 = len; at = 2;
- #ifnot;
- buffer-->0 = len; at = 4;
- #endif;
- for (i=0:i(i+at) = CharToCase(BlkValueRead(from_txt, i), 0);
- for (:at+i<120:i++) buffer->(at+i) = ' ';
- VM_Tokenise(buffer, parse);
- players_command = 100 + WordCount(); ! The snippet variable "player's command"
- TEXT_TY_Untransmute(from_txt, p, cp);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Debugging
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global TEXT_TY_RE_Trace = false; ! Change to true for (a lot of) debugging data in use
-[ TEXT_TY_RE_SetTrace F; TEXT_TY_RE_Trace = F; ];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Algorithm
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Class Codes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! Character classes
-
-Constant NEWLINE_RE_CC = -1;
-Constant TAB_RE_CC = -2;
-Constant DIGIT_RE_CC = -3;
-Constant NONDIGIT_RE_CC = -4;
-Constant WHITESPACE_RE_CC = -5;
-Constant NONWHITESPACE_RE_CC = -6;
-Constant PUNCTUATION_RE_CC = -7;
-Constant NONPUNCTUATION_RE_CC = -8;
-Constant WORD_RE_CC = -9;
-Constant NONWORD_RE_CC = -10;
-Constant ANYTHING_RE_CC = -11;
-Constant NOTHING_RE_CC = -12;
-Constant RANGE_RE_CC = -13;
-Constant LCASE_RE_CC = -14;
-Constant NONLCASE_RE_CC = -15;
-Constant UCASE_RE_CC = -16;
-Constant NONUCASE_RE_CC = -17;
-
-! Control structures
-
-Constant SUBEXP_RE_CC = -20;
-Constant DISJUNCTION_RE_CC = -21;
-Constant CHOICE_RE_CC = -22;
-Constant QUANTIFIER_RE_CC = -23;
-Constant IF_RE_CC = -24;
-Constant CONDITION_RE_CC = -25;
-Constant THEN_RE_CC = -26;
-Constant ELSE_RE_CC = -27;
-
-! Substring matchers
-
-Constant VARIABLE_RE_CC = -30;
-Constant LITERAL_RE_CC = -31;
-
-! Positional matchers
-
-Constant START_RE_CC = -40;
-Constant END_RE_CC = -41;
-Constant BOUNDARY_RE_CC = -42;
-Constant NONBOUNDARY_RE_CC = -43;
-Constant ALWAYS_RE_CC = -44;
-Constant NEVER_RE_CC = -45;
-
-! Mode switches
-
-Constant SENSITIVITY_RE_CC = -50;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Packets
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RE_MAX_PACKETS = 32;
-
-Constant RE_PACKET_SIZE = 14; ! Words of memory used per packet
-Constant RE_PACKET_SIZE_IN_BYTES = WORDSIZE*RE_PACKET_SIZE; ! Bytes used per packet
-
-Array RE_PACKET_space --> RE_MAX_PACKETS*RE_PACKET_SIZE;
-
-Constant RE_CCLASS = 0; ! One of the class codes defined above
-Constant RE_PAR1 = 1; ! Three parameters whose meaning depends on class code
-Constant RE_PAR2 = 2;
-Constant RE_PAR3 = 3;
-Constant RE_NEXT = 4; ! Younger sibling in the compiled tree
-Constant RE_PREVIOUS = 5; ! Elder sibling
-Constant RE_DOWN = 6; ! Child
-Constant RE_UP = 7; ! Parent
-Constant RE_DATA1 = 8; ! Backtracking data
-Constant RE_DATA2 = 9;
-Constant RE_CONSTRAINT = 10;
-Constant RE_CACHE1 = 11;
-Constant RE_CACHE2 = 12;
-Constant RE_MODES = 13;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Nodes
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_Node n cc par1 par2 par3 offset;
- if ((n<0) || (n >= RE_MAX_PACKETS)) rfalse;
- offset = RE_PACKET_space + n*RE_PACKET_SIZE_IN_BYTES;
- offset-->RE_CCLASS = cc;
- offset-->RE_PAR1 = par1;
- offset-->RE_PAR2 = par2;
- offset-->RE_PAR3 = par3;
- offset-->RE_NEXT = NULL;
- offset-->RE_PREVIOUS = NULL;
- offset-->RE_DOWN = NULL;
- offset-->RE_UP = NULL;
- offset-->RE_DATA1 = -1; ! Match start
- offset-->RE_DATA2 = -1; ! Match end
- offset-->RE_CONSTRAINT = -1; ! Rewind edge
- return offset;
-];
-
-[ TEXT_TY_RE_NodeAddress n;
- if ((n<0) || (n >= RE_MAX_PACKETS)) return -1;
- return RE_PACKET_space + n*RE_PACKET_SIZE_IN_BYTES;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Match Variables
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array RE_Subexpressions --> 11; ! Address of node for this subexpression
-Array Allocated_Match_Vars --> 10; ! Indexed text to hold values of the variables
-
-[ TEXT_TY_RE_DebugMatchVars txt
- offset n i;
- print RE_Subexpressions-->10, " collecting subexps^";
- for (n=0:(n10) && (n<10): n++) {
- offset = RE_Subexpressions-->n;
- print "Subexp ", offset-->RE_PAR1,
- " = [", offset-->RE_DATA1, ",", offset-->RE_DATA2, "] = ";
- for (i=offset-->RE_DATA1:iRE_DATA2:i++)
- print (char) BlkValueRead(txt, i);
- print "^";
- }
-];
-
-[ TEXT_TY_RE_CreateMatchVars txt
- offset n i ch ctxt cl csize;
- for (n=0:(n10) && (n<10): n++) {
- offset = RE_Subexpressions-->n;
- if (Allocated_Match_Vars-->n) BlkValueFree(Allocated_Match_Vars-->n);
- Allocated_Match_Vars-->n = BlkValueCreate(TEXT_TY);
- TEXT_TY_Transmute(Allocated_Match_Vars-->n);
- ctxt = Allocated_Match_Vars-->n;
- csize = BlkValueLBCapacity(ctxt);
- cl = 0;
- for (i=offset-->RE_DATA1:iRE_DATA2:i++) {
- ch = BlkValueRead(txt, i);
- if (cl+1 >= csize) {
- if (BlkValueSetLBCapacity(ctxt, 2*cl) == false) break;
- csize = BlkValueLBCapacity(ctxt);
- }
- BlkValueWrite(ctxt, cl++, ch);
- }
- BlkValueWrite(ctxt, cl, 0);
- }
-];
-
-[ TEXT_TY_RE_EmptyMatchVars txt
- n;
- for (n=0:(n10) && (n<10): n++)
- if (Allocated_Match_Vars-->n ~= 0)
- BlkValueWrite(Allocated_Match_Vars-->n, 0, 0);
-];
-
-[ TEXT_TY_RE_GetMatchVar vn
- offset;
- if ((vn<0) || (vn>=10) || (vn >= RE_Subexpressions-->10)) return EMPTY_TEXT_VALUE;
- offset = RE_Subexpressions-->vn;
- if (offset == 0) return EMPTY_TEXT_VALUE;
- if (offset-->RE_DATA1 < 0) return EMPTY_TEXT_VALUE;
- if (Allocated_Match_Vars-->vn == 0) {
- print "*** ", vn, " unallocated! ***^";
- return EMPTY_TEXT_VALUE;
- }
- return Allocated_Match_Vars-->vn;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Markers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_MV_End n end
- offset;
- offset = RE_Subexpressions-->n;
- if (end==0) return offset-->RE_DATA1;
- return offset-->RE_DATA2;
-];
-
-[ TEXT_TY_RE_Clear_Markers token;
- for (: token ~= NULL: token = token-->RE_NEXT) {
- if (token-->RE_DOWN ~= NULL) TEXT_TY_RE_Clear_Markers(token-->RE_DOWN);
- token-->RE_DATA1 = -1;
- token-->RE_DATA2 = -1;
- token-->RE_CONSTRAINT = -1;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Debugging
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_DebugTree ftxt detail;
- print "Pattern: ", (TEXT_TY_Say) ftxt, "^";
- TEXT_TY_RE_DebugSubtree(ftxt, 1, RE_PACKET_space, detail);
-];
-
-[ TEXT_TY_RE_DebugSubtree ftxt depth offset detail
- cup;
- if (offset ~= NULL) {
- cup = offset-->RE_UP;
- if (offset-->RE_PREVIOUS ~= NULL) print "*** broken initial previous ***^";
- }
- while (offset ~= NULL) {
- if (offset-->RE_UP ~= cup) print "*** broken up matching ***^";
- spaces(depth*2);
- TEXT_TY_RE_DebugNode(offset, ftxt, detail);
- if (offset-->RE_DOWN ~= NULL) {
- if ((offset-->RE_DOWN)-->RE_UP ~= offset)
- print "*** broken down/up ***^";
- TEXT_TY_RE_DebugSubtree(ftxt, depth+1, offset-->RE_DOWN, detail);
- }
- if (offset-->RE_NEXT ~= NULL) {
- if ((offset-->RE_NEXT)-->RE_PREVIOUS ~= offset)
- print "*** broken next/previous ***^";
- }
- offset = offset-->RE_NEXT;
- }
-];
-
-[ TEXT_TY_RE_DebugNode offset ftxt detail
- i par1 par2 par3;
- if (offset == NULL) "[NULL]";
- print "[", (offset-RE_PACKET_space)/(RE_PACKET_SIZE_IN_BYTES), "] ";
- ! for (i=0:ii, " ";
- par1 = offset-->RE_PAR1;
- par2 = offset-->RE_PAR2;
- par3 = offset-->RE_PAR3;
- switch (offset-->RE_CCLASS) {
- DIGIT_RE_CC: print "DIGIT";
- NONDIGIT_RE_CC: print "NONDIGIT";
- UCASE_RE_CC: print "UCASE";
- NONUCASE_RE_CC: print "NONUCASE";
- LCASE_RE_CC: print "LCASE";
- NONLCASE_RE_CC: print "NONLCASE";
- WHITESPACE_RE_CC: print "WHITESPACE";
- NONWHITESPACE_RE_CC: print "NONWHITESPACE";
- PUNCTUATION_RE_CC: print "PUNCTUATION";
- NONPUNCTUATION_RE_CC: print "NONPUNCTUATION";
- WORD_RE_CC: print "WORD";
- NONWORD_RE_CC: print "NONWORD";
- ALWAYS_RE_CC: print "ALWAYS";
- NEVER_RE_CC: print "NEVER";
- START_RE_CC: print "START";
- END_RE_CC: print "END";
- BOUNDARY_RE_CC: print "BOUNDARY";
- NONBOUNDARY_RE_CC: print "NONBOUNDARY";
- ANYTHING_RE_CC: print "ANYTHING";
- NOTHING_RE_CC: print "NOTHING";
- RANGE_RE_CC: print "RANGE"; if (par3 == true) print " (negated)";
- print " ";
- for (i=par1:i= 0) print "= V", par1;
- if (par2 == 1) {
- if (par3 == 0) print " (?=...) lookahead";
- else print " (?<=...) lookbehind of width ", par3;
- }
- if (par2 == 2) {
- if (par3 == 0) print " (?!...) negated lookahead";
- else print " (?...) possessive";
- NEWLINE_RE_CC: print "NEWLINE";
- TAB_RE_CC: print "TAB";
- QUANTIFIER_RE_CC: print "QUANTIFIER min=", par1, " max=", par2;
- if (par3) print " (lazy)"; else print " (greedy)";
- LITERAL_RE_CC: print "LITERAL";
- print " ";
- for (i=par1:i= 1) print " = V", par1;
- CONDITION_RE_CC: print "CONDITION"; if (par1 >= 1) print " = V", par1;
- THEN_RE_CC: print "THEN";
- ELSE_RE_CC: print "ELSE";
- }
- if (detail)
- print ": ", offset-->RE_DATA1, ", ", offset-->RE_DATA2, ", ", offset-->RE_CONSTRAINT;
- print "^";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Compiling Tree For Substring Search
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_CHR_CompileTree ftxt exactly
- root literal fto no_packets token attach_to;
-
- fto = TEXT_TY_CharacterLength(ftxt);
-
- root = TEXT_TY_RE_Node(0, SUBEXP_RE_CC, 0, 0, 0);
- literal = TEXT_TY_RE_Node(1, LITERAL_RE_CC, 0, fto, 0);
-
- root-->RE_DOWN = literal;
- literal-->RE_UP = root;
-
- if (exactly) {
- no_packets = 2;
- if (no_packets+3 > RE_MAX_PACKETS) return "regexp too complex";
- exactly = RE_PACKET_space-->RE_DOWN;
- token = TEXT_TY_RE_Node(no_packets++, START_RE_CC, 0, 0, 0);
- RE_PACKET_space-->RE_DOWN = token; token-->RE_UP = RE_PACKET_space;
- attach_to = TEXT_TY_RE_Node(no_packets++, SUBEXP_RE_CC, -1, 3, 0);
- token-->RE_NEXT = attach_to; attach_to-->RE_PREVIOUS = token;
- attach_to-->RE_UP = RE_PACKET_space;
- attach_to-->RE_NEXT = TEXT_TY_RE_Node(no_packets++, END_RE_CC, 0, 0, 0);
- (attach_to-->RE_NEXT)-->RE_PREVIOUS = attach_to;
- (attach_to-->RE_NEXT)-->RE_UP = RE_PACKET_space;
- attach_to-->RE_DOWN = exactly;
- while (exactly ~= NULL) {
- exactly-->RE_UP = attach_to; exactly = exactly-->RE_NEXT;
- }
- }
-
- no_packets = TEXT_TY_RE_ExpandChoices(RE_PACKET_space, no_packets);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Compiling Tree For Regexp Search
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array Subexp_Posns --> 20;
-[ TEXT_TY_RE_CompileTree ftxt exactly
- no_packets ffrom fto cc par1 par2 par3
- quantifiable token attach_to no_subs blevel bits;
-
- fto = TEXT_TY_CharacterLength(ftxt);
- if (fto == 0) {
- TEXT_TY_RE_Node(no_packets++, NEVER_RE_CC, 0, 0, 0); ! Empty regexp never matches
- return 1;
- }
-
- attach_to = TEXT_TY_RE_Node(no_packets++, SUBEXP_RE_CC, 0, 0, 0);
- RE_Subexpressions-->0 = attach_to; RE_Subexpressions-->10 = 1; no_subs = 1;
-
- quantifiable = false; blevel = 0;
-
- for (ffrom = 0: ffrom < fto: ) {
- cc = BlkValueRead(ftxt, ffrom++); par1 = 0; par2 = 0; par3 = 0;
- if (cc == '\') {
- if (ffrom == fto) return "Search pattern not terminated";
- cc = BlkValueRead(ftxt, ffrom++);
- switch (cc) {
- 'b': cc = BOUNDARY_RE_CC;
- 'B': cc = NONBOUNDARY_RE_CC;
- 'd': cc = DIGIT_RE_CC;
- 'D': cc = NONDIGIT_RE_CC;
- 'l': cc = LCASE_RE_CC;
- 'L': cc = NONLCASE_RE_CC;
- 'n': cc = NEWLINE_RE_CC;
- 'p': cc = PUNCTUATION_RE_CC;
- 'P': cc = NONPUNCTUATION_RE_CC;
- 's': cc = WHITESPACE_RE_CC;
- 'S': cc = NONWHITESPACE_RE_CC;
- 't': cc = TAB_RE_CC;
- 'u': cc = UCASE_RE_CC;
- 'U': cc = NONUCASE_RE_CC;
- 'w': cc = WORD_RE_CC;
- 'W': cc = NONWORD_RE_CC;
- default:
- if ((cc >= '1') && (cc <= '9')) {
- par1 = cc-'0';
- cc = VARIABLE_RE_CC;
- } else {
- if (((cc >= 'a') && (cc <= 'z')) ||
- ((cc >= 'A') && (cc <= 'Z'))) return "unknown escape";
- cc = LITERAL_RE_CC;
- par1 = ffrom-1; par2 = ffrom;
- }
- }
- quantifiable = true;
- } else {
- switch (cc) {
- '(': par2 = 0;
- !if (BlkValueRead(ftxt, ffrom) == ')') return "empty subexpression";
- if (BlkValueRead(ftxt, ffrom) == '?') {
- ffrom++;
- bits = true;
- if (BlkValueRead(ftxt, ffrom) == '-') { ffrom++; bits = false; }
- else if (BlkValueRead(ftxt, ffrom) == '<') { ffrom++; bits = false; }
- switch (cc = BlkValueRead(ftxt, ffrom++)) {
- '#': while (BlkValueRead(ftxt, ffrom++) ~= 0 or ')') ;
- if (BlkValueRead(ftxt, ffrom-1) == 0)
- return "comment never ends";
- continue;
- '(': cc = BlkValueRead(ftxt, ffrom);
- if ((cc == '1' or '2' or '3' or '4' or
- '5' or '6' or '7' or '8' or '9') &&
- (BlkValueRead(ftxt, ffrom+1) ==')')) {
- ffrom = ffrom + 2;
- par1 = cc - '0';
- } else ffrom--;
- cc = IF_RE_CC; ! (?(...)...) conditional
- quantifiable = false;
- if (blevel == 20) return "subexpressions too deep";
- Subexp_Posns-->(blevel++) = TEXT_TY_RE_NodeAddress(no_packets);
- jump CClassKnown;
- '=': par2 = 1; ! (?=...) lookahead/behind
- par3 = 0; if (bits == false) par3 = -1;
- '!': par2 = 2; ! (?!...) negated lookahead/behind
- par3 = 0; if (bits == false) par3 = -1;
- ':': par2 = 3; ! (?:...) uncollecting subexpression
- '>': par2 = 4; ! (?>...) possessive
- default:
- if (BlkValueRead(ftxt, ffrom) == ')') {
- if (cc == 'i') {
- cc = SENSITIVITY_RE_CC; par1 = bits; ffrom++;
- jump CClassKnown;
- }
- }
- if (BlkValueRead(ftxt, ffrom) == ':') {
- if (cc == 'i') {
- par1 = bits; par2 = 3; par3 = bits+1; ffrom++;
- jump AllowForm;
- }
- }
- return "unknown (?...) form";
- }
- }
- .AllowForm;
- if (par2 == 0) par1 = no_subs++; else par1 = -1;
- cc = SUBEXP_RE_CC;
- quantifiable = false;
- if (blevel == 20) return "subexpressions too deep";
- Subexp_Posns-->(blevel++) = TEXT_TY_RE_NodeAddress(no_packets);
- ')': if (blevel == 0) return "subexpression bracket mismatch";
- blevel--;
- attach_to = Subexp_Posns-->blevel;
- if (attach_to-->RE_DOWN == NULL) {
- if (no_packets >= RE_MAX_PACKETS) return "regexp too complex";
- attach_to-->RE_DOWN =
- TEXT_TY_RE_Node(no_packets++, ALWAYS_RE_CC, 0, 0, 0);
- (attach_to-->RE_DOWN)-->RE_UP = attach_to;
- }
- quantifiable = true;
- continue;
- '.': cc = ANYTHING_RE_CC; quantifiable = true;
- '|': cc = CHOICE_RE_CC; quantifiable = false;
- '^': cc = START_RE_CC; quantifiable = false;
- '$': cc = END_RE_CC; quantifiable = false;
- '{': if (quantifiable == false) return "quantifier misplaced";
- par1 = 0; par2 = -1; bits = 1;
- while ((cc=BlkValueRead(ftxt, ffrom++)) ~= 0 or '}') {
- if (cc == ',') {
- bits++;
- if (bits >= 3) return "too many colons in ?{...}";
- continue;
- }
- if ((cc >= '0') || (cc <= '9')) {
- if (bits == 1) {
- if (par1 < 0) par1 = 0;
- par1 = par1*10 + (cc-'0');
- } else {
- if (par2 < 0) par2 = 0;
- par2 = par2*10 + (cc-'0');
- }
- } else return "non-digit in ?{...}";
- }
- if (cc ~= '}') return "{x,y} quantifier never ends";
- cc = QUANTIFIER_RE_CC;
- if (par2 == -1) {
- if (bits == 2) par2 = 30000;
- else par2 = par1;
- }
- if (par1 > par2) return "{x,y} with x greater than y";
- if (BlkValueRead(ftxt, ffrom) == '?') { ffrom++; par3 = true; }
- quantifiable = false;
- '<', '[': par3 = false; if (cc == '<') bits = '>'; else bits = ']';
- if (BlkValueRead(ftxt, ffrom) == '^') { ffrom++; par3 = true; }
- par1 = ffrom;
- if (BlkValueRead(ftxt, ffrom) == bits) { ffrom++; }
- while (cc ~= bits or 0) {
- cc = BlkValueRead(ftxt, ffrom++);
- if (cc == '\') {
- cc = BlkValueRead(ftxt, ffrom++);
- if (cc ~= 0) cc = BlkValueRead(ftxt, ffrom++);
- }
- }
- if (cc == 0) return "Character range never ends";
- par2 = ffrom-1;
- if ((par2 > par1 + 1) &&
- (BlkValueRead(ftxt, par1) == ':') &&
- (BlkValueRead(ftxt, par2-1) == ':') &&
- (BlkValueRead(ftxt, par2-2) ~= '\'))
- return "POSIX named character classes unsupported";
- bits = TEXT_TY_RE_RangeSyntaxCorrect(ftxt, par1, par2);
- if (bits) return bits;
- if (par1 < par2) cc = RANGE_RE_CC;
- else cc = NOTHING_RE_CC;
- quantifiable = true;
- '*': if (quantifiable == false) return "quantifier misplaced";
- cc = QUANTIFIER_RE_CC;
- par1 = 0; par2 = 30000;
- if (BlkValueRead(ftxt, ffrom) == '?') { ffrom++; par3 = true; }
- quantifiable = false;
- '+': if (quantifiable == false) return "quantifier misplaced";
- cc = QUANTIFIER_RE_CC;
- par1 = 1; par2 = 30000;
- if (BlkValueRead(ftxt, ffrom) == '?') { ffrom++; par3 = true; }
- quantifiable = false;
- '?': if (quantifiable == false) return "quantifier misplaced";
- cc = QUANTIFIER_RE_CC;
- par1 = 0; par2 = 1;
- if (BlkValueRead(ftxt, ffrom) == '?') { ffrom++; par3 = true; }
- quantifiable = false;
- }
- }
-
- .CClassKnown;
-
- if (cc >= 0) {
- quantifiable = true;
- if ((attach_to-->RE_CCLASS == LITERAL_RE_CC) &&
- (BlkValueRead(ftxt, ffrom) ~= '*' or '+' or '?' or '{')) {
- (attach_to-->RE_PAR2)++;
- if (TEXT_TY_RE_Trace == 2) {
- print "Extending literal by ", cc, "=", (char) cc, "^";
- }
- continue;
- }
- cc = LITERAL_RE_CC; par1 = ffrom-1; par2 = ffrom;
- }
-
- if (no_packets >= RE_MAX_PACKETS) return "regexp too complex";
-
- if (TEXT_TY_RE_Trace == 2) {
- print "Attaching packet ", no_packets+1, " to ";
- TEXT_TY_RE_DebugNode(attach_to, ftxt);
- TEXT_TY_RE_DebugTree(ftxt);
- }
-
- token = TEXT_TY_RE_Node(no_packets++, cc, par1, par2, par3);
-
- if ((token-->RE_CCLASS == SUBEXP_RE_CC) && (token-->RE_PAR2 == 0)) {
- RE_Subexpressions-->(token-->RE_PAR1) = token;
- (RE_Subexpressions-->10)++;
- }
-
- if ((attach_to-->RE_CCLASS == SUBEXP_RE_CC or CHOICE_RE_CC or IF_RE_CC) &&
- (attach_to-->RE_DOWN == NULL)) {
- attach_to-->RE_DOWN = token; token-->RE_UP = attach_to;
- } else {
- if ((token-->RE_CCLASS == CHOICE_RE_CC) &&
- ((attach_to-->RE_UP)-->RE_CCLASS == CHOICE_RE_CC)) {
- no_packets--; token = attach_to-->RE_UP;
- } else {
- if (token-->RE_CCLASS == CHOICE_RE_CC) {
- while (attach_to-->RE_PREVIOUS ~= NULL)
- attach_to = attach_to-->RE_PREVIOUS;
- }
- if (token-->RE_CCLASS == QUANTIFIER_RE_CC or CHOICE_RE_CC) {
- token-->RE_PREVIOUS = attach_to-->RE_PREVIOUS;
- token-->RE_UP = attach_to-->RE_UP;
- if ((attach_to-->RE_UP ~= NULL) && (attach_to-->RE_PREVIOUS == NULL))
- (attach_to-->RE_UP)-->RE_DOWN = token;
- token-->RE_DOWN = attach_to;
- bits = attach_to;
- while (bits ~= NULL) {
- bits-->RE_UP = token;
- bits = bits-->RE_NEXT;
- }
- attach_to-->RE_PREVIOUS = NULL;
- if (token-->RE_PREVIOUS ~= NULL)
- (token-->RE_PREVIOUS)-->RE_NEXT = token;
- } else {
- attach_to-->RE_NEXT = token; token-->RE_PREVIOUS = attach_to;
- token-->RE_UP = attach_to-->RE_UP;
- }
- }
- }
-
- if (token-->RE_CCLASS == CHOICE_RE_CC) {
- if (no_packets >= RE_MAX_PACKETS) return "regexp too complex";
- token-->RE_NEXT = TEXT_TY_RE_Node(no_packets++, CHOICE_RE_CC, 0, 0, 0);
- (token-->RE_NEXT)-->RE_PREVIOUS = token;
- (token-->RE_NEXT)-->RE_UP = token-->RE_UP;
- token = token-->RE_NEXT;
- }
-
- attach_to = token;
-
- if (TEXT_TY_RE_Trace == 2) {
- print "Result:^";
- TEXT_TY_RE_DebugTree(ftxt);
- }
-
- }
-
- if (blevel ~= 0) return "subexpression bracket mismatch";
-
- if (exactly) {
- if (no_packets+3 > RE_MAX_PACKETS) return "regexp too complex";
- exactly = RE_PACKET_space-->RE_DOWN;
- token = TEXT_TY_RE_Node(no_packets++, START_RE_CC, 0, 0, 0);
- RE_PACKET_space-->RE_DOWN = token; token-->RE_UP = RE_PACKET_space;
- attach_to = TEXT_TY_RE_Node(no_packets++, SUBEXP_RE_CC, -1, 3, 0);
- token-->RE_NEXT = attach_to; attach_to-->RE_PREVIOUS = token;
- attach_to-->RE_UP = RE_PACKET_space;
- attach_to-->RE_NEXT = TEXT_TY_RE_Node(no_packets++, END_RE_CC, 0, 0, 0);
- (attach_to-->RE_NEXT)-->RE_PREVIOUS = attach_to;
- (attach_to-->RE_NEXT)-->RE_UP = RE_PACKET_space;
- attach_to-->RE_DOWN = exactly;
- while (exactly ~= NULL) {
- exactly-->RE_UP = attach_to; exactly = exactly-->RE_NEXT;
- }
- }
-
- no_packets = TEXT_TY_RE_ExpandChoices(RE_PACKET_space, no_packets);
-
- if (TEXT_TY_RE_Trace) {
- print "Compiled pattern:^";
- TEXT_TY_RE_DebugTree(ftxt);
- }
-
- bits = TEXT_TY_RE_CheckTree(RE_PACKET_space, no_subs); if (bits) return bits;
-
- return no_packets;
-];
-
-[ TEXT_TY_RE_RangeSyntaxCorrect ftxt rf rt
- i chm;
- for (i=rf: i= 'a') && (chm <= 'z')) ||
- ((chm >= 'A') && (chm <= 'Z'))) {
- if (chm ~= 's' or 'S' or 'p' or 'P' or 'w' or 'W' or 'd'
- or 'D' or 'n' or 't' or 'l' or 'L' or 'u' or 'U')
- return "Invalid escape in {} range";
- }
- }
- if ((i+2 BlkValueRead(ftxt, i+2)) return "Invalid {} range";
- i=i+2;
- }
- }
- rfalse;
-];
-
-[ TEXT_TY_RE_ExpandChoices token no_packets
- rv prev nex holder new ct n cond_node then_node else_node;
- while (token ~= NULL) {
- if (token-->RE_CCLASS == IF_RE_CC) {
- if ((token-->RE_DOWN)-->RE_CCLASS == CHOICE_RE_CC) {
- for (nex=token-->RE_DOWN, n=0: nex~=NULL: nex=nex-->RE_NEXT) n++;
- if (n~=2) return "conditional has too many clauses";
- if (no_packets >= RE_MAX_PACKETS) return "regexp too complex";
- cond_node = TEXT_TY_RE_Node(no_packets++, CONDITION_RE_CC, 0, 0, 0);
- if (token-->RE_PAR1 >= 1) {
- cond_node-->RE_PAR1 = token-->RE_PAR1;
- }
- then_node = token-->RE_DOWN;
- then_node-->RE_CCLASS = THEN_RE_CC;
- else_node = then_node-->RE_NEXT;
- else_node-->RE_CCLASS = ELSE_RE_CC;
- if (cond_node-->RE_PAR1 < 1) {
- cond_node-->RE_DOWN = then_node-->RE_DOWN;
- then_node-->RE_DOWN = (then_node-->RE_DOWN)-->RE_NEXT;
- if (then_node-->RE_DOWN ~= NULL)
- (then_node-->RE_DOWN)-->RE_PREVIOUS = NULL;
- (cond_node-->RE_DOWN)-->RE_NEXT = NULL;
- (cond_node-->RE_DOWN)-->RE_UP = cond_node;
- }
- token-->RE_DOWN = cond_node; cond_node-->RE_UP = token;
- cond_node-->RE_NEXT = then_node; then_node-->RE_PREVIOUS = cond_node;
- } else {
- if (no_packets >= RE_MAX_PACKETS) return "regexp too complex";
- cond_node = TEXT_TY_RE_Node(no_packets++, CONDITION_RE_CC, 0, 0, 0);
- if (no_packets >= RE_MAX_PACKETS) return "regexp too complex";
- then_node = TEXT_TY_RE_Node(no_packets++, THEN_RE_CC, 0, 0, 0);
- if (token-->RE_PAR1 >= 1) {
- cond_node-->RE_PAR1 = token-->RE_PAR1;
- then_node-->RE_DOWN = token-->RE_DOWN;
- } else {
- cond_node-->RE_DOWN = token-->RE_DOWN;
- then_node-->RE_DOWN = (token-->RE_DOWN)-->RE_NEXT;
- (cond_node-->RE_DOWN)-->RE_NEXT = NULL;
- (cond_node-->RE_DOWN)-->RE_UP = cond_node;
- }
- token-->RE_DOWN = cond_node;
- cond_node-->RE_UP = token; cond_node-->RE_NEXT = then_node;
- then_node-->RE_PREVIOUS = cond_node; then_node-->RE_UP = token;
- then_node-->RE_NEXT = NULL;
- if (then_node-->RE_DOWN ~= NULL)
- (then_node-->RE_DOWN)-->RE_PREVIOUS = NULL;
- for (nex = then_node-->RE_DOWN: nex ~= NULL: nex = nex-->RE_NEXT) {
- nex-->RE_UP = then_node;
- }
- }
-
- if (cond_node-->RE_DOWN ~= NULL) {
- nex = cond_node-->RE_DOWN;
- if ((nex-->RE_CCLASS ~= SUBEXP_RE_CC) ||
- (nex-->RE_NEXT ~= NULL) ||
- (nex-->RE_PAR2 ~= 1 or 2)) {
- !TEXT_TY_RE_DebugSubtree(0, 0, nex, true);
- return "condition not lookahead/behind";
- }
- }
- }
- if ((token-->RE_CCLASS == CHOICE_RE_CC) && (token-->RE_PAR1 < 1)) {
- prev = token-->RE_PREVIOUS;
- nex = token-->RE_NEXT;
- while ((nex ~= NULL) && (nex-->RE_CCLASS == CHOICE_RE_CC))
- nex = nex-->RE_NEXT;
- holder = token-->RE_UP; if (holder == NULL) return "bang";
- if (no_packets >= RE_MAX_PACKETS) return "regexp too complex";
- new = TEXT_TY_RE_Node(no_packets++, DISJUNCTION_RE_CC, 0, 0, 0);
- holder-->RE_DOWN = new; new-->RE_UP = holder;
- if (prev ~= NULL) {
- prev-->RE_NEXT = new; new-->RE_PREVIOUS = prev;
- }
- if (nex ~= NULL) {
- nex-->RE_PREVIOUS = new; new-->RE_NEXT = nex;
- }
- new-->RE_DOWN = token;
- token-->RE_PREVIOUS = NULL;
- ct = 1;
- while (token ~= NULL) {
- token-->RE_PAR1 = ct++;
- token-->RE_UP = new;
- if ((token-->RE_NEXT ~= NULL) &&
- ((token-->RE_NEXT)-->RE_CCLASS ~= CHOICE_RE_CC))
- token-->RE_NEXT = NULL;
- token = token-->RE_NEXT;
- }
- new-->RE_PAR1 = ct-1;
- if (token ~= NULL) token-->RE_NEXT = NULL;
- token = new; continue;
- }
- if (token-->RE_DOWN ~= NULL) {
- no_packets = TEXT_TY_RE_ExpandChoices(token-->RE_DOWN, no_packets);
- if ((no_packets<0) || (no_packets >= RE_MAX_PACKETS)) break;
- }
- token = token-->RE_NEXT;
- }
- return no_packets;
-];
-
-[ TEXT_TY_RE_CheckTree token no_subs
- rv;
- while (token ~= NULL) {
- if (token-->RE_CCLASS == VARIABLE_RE_CC) {
- if (token-->RE_PAR1 >= no_subs) return "reference to nonexistent group";
- }
- if ((token-->RE_CCLASS == SUBEXP_RE_CC) &&
- (token-->RE_PAR2 == 1 or 2) &&
- (token-->RE_PAR3 == -1)) {
- token-->RE_PAR3 = TEXT_TY_RE_Width(token-->RE_DOWN);
- if (token-->RE_PAR3 == -1) return "variable length lookbehind not implemented";
- }
- if (token-->RE_DOWN ~= NULL) {
- rv = TEXT_TY_RE_CheckTree(token-->RE_DOWN, no_subs);
- if (rv) return rv;
- }
- token = token-->RE_NEXT;
- }
- rfalse;
-];
-
-[ TEXT_TY_RE_Width token downwards
- w rv aw choice;
- while (token ~= NULL) {
- switch (token-->RE_CCLASS) {
- DIGIT_RE_CC, NONDIGIT_RE_CC, WHITESPACE_RE_CC, NONWHITESPACE_RE_CC,
- PUNCTUATION_RE_CC, NONPUNCTUATION_RE_CC, WORD_RE_CC, NONWORD_RE_CC,
- ANYTHING_RE_CC, NOTHING_RE_CC, RANGE_RE_CC, NEWLINE_RE_CC, TAB_RE_CC,
- UCASE_RE_CC, NONUCASE_RE_CC, LCASE_RE_CC, NONLCASE_RE_CC:
- w++;
- START_RE_CC, END_RE_CC, BOUNDARY_RE_CC, NONBOUNDARY_RE_CC, ALWAYS_RE_CC:
- ;
- LITERAL_RE_CC:
- w = w + token-->RE_PAR2 - token-->RE_PAR1;
- VARIABLE_RE_CC:
- return -1;
- IF_RE_CC:
- rv = TEXT_TY_RE_Width((token-->RE_DOWN)-->RE_NEXT);
- if (rv == -1) return -1;
- if (rv ~= TEXT_TY_RE_Width(((token-->RE_DOWN)-->RE_NEXT)-->RE_NEXT))
- return -1;
- w = w + rv;
- SUBEXP_RE_CC:
- if (token-->RE_PAR2 == 1 or 2) rv = 0;
- else {
- rv = TEXT_TY_RE_Width(token-->RE_DOWN);
- if (rv == -1) return -1;
- }
- w = w + rv;
- QUANTIFIER_RE_CC:
- if (token-->RE_PAR1 ~= token-->RE_PAR2) return -1;
- rv = TEXT_TY_RE_Width(token-->RE_DOWN);
- if (rv == -1) return -1;
- w = w + rv*(token-->RE_PAR1);
- DISJUNCTION_RE_CC:
- aw = -1;
- for (choice = token-->RE_DOWN: choice ~= NULL: choice = choice-->RE_NEXT) {
- rv = TEXT_TY_RE_Width(choice-->RE_DOWN);
- !print "Option found ", rv, "^";
- if (rv == -1) return -1;
- if ((aw >= 0) && (aw ~= rv)) return -1;
- aw = rv;
- }
- w = w + aw;
- SENSITIVITY_RE_CC:
- ;
- }
- if (downwards) return w;
- if (token ~= NULL) token = token-->RE_NEXT;
- }
- return w;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Parser
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global TEXT_TY_RE_RewindCount;
-[ TEXT_TY_RE_PrintNoRewinds; print TEXT_TY_RE_RewindCount; ];
-
-Constant CIS_MFLAG = 1;
-Constant ACCUM_MFLAG = 2;
-
-[ TEXT_TY_RE_Parse ftxt txt ipos insens
- ilen rv root i initial_mode;
-
- ilen = TEXT_TY_CharacterLength(txt);
- if ((ipos<0) || (ipos>ilen)) return -1;
-
- root = RE_PACKET_space;
-
- initial_mode = 0; if (insens) initial_mode = CIS_MFLAG;
-
- TEXT_TY_RE_Clear_Markers(RE_PACKET_space);
-
- for (:ipos<=ilen:ipos++) {
- if ((RE_PACKET_space-->RE_DOWN ~= NULL) &&
- ((RE_PACKET_space-->RE_DOWN)-->RE_CCLASS == START_RE_CC) &&
- (ipos>0)) { rv = -1; break; }
- if (ipos > 0) TEXT_TY_RE_EraseConstraints(RE_PACKET_space, initial_mode);
- TEXT_TY_RE_RewindCount = 0;
- rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ilen, RE_PACKET_space, initial_mode);
- if (rv >= 0) break;
- }
-
- if (rv == -1) {
- root-->RE_DATA1 = -1;
- root-->RE_DATA2 = -1;
- } else {
- root-->RE_DATA1 = ipos;
- root-->RE_DATA2 = ipos+rv;
- }
- return rv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Parse At Position
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_ParseAtPosition ftxt txt ifrom ito token mode_flags
- outcome ipos npos rv i ch edge rewind_this;
-
- if (ifrom > ito) return -1;
-
- ipos = ifrom;
-
- .Rewind;
- while (token ~= NULL) {
- outcome = false;
- if (TEXT_TY_RE_Trace) {
- print "Matching at ", ipos, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
-
- if (iposRE_MODES = mode_flags; ! Save in case of backtrack
-
- switch (token-->RE_CCLASS) {
-
- ! Should never happen
-
- CHOICE_RE_CC: return "internal error";
-
- ! Mode switches
-
- SENSITIVITY_RE_CC:
- if (token-->RE_PAR1) mode_flags = mode_flags | CIS_MFLAG;
- else mode_flags = mode_flags & (~CIS_MFLAG);
- outcome = true;
-
- ! Zero-length positional markers
-
- ALWAYS_RE_CC:
- outcome = true;
- NEVER_RE_CC:
- START_RE_CC:
- if (ipos == 0) outcome = true;
- END_RE_CC:
- if (BlkValueRead(txt, ipos) == 0) outcome = true;
- BOUNDARY_RE_CC:
- rv = 0;
- if (BlkValueRead(txt, ipos) == 0 or 10 or 13 or 32 or 9
- or '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}') rv++;
- if (ipos == 0) ch = 0;
- else ch = BlkValueRead(txt, ipos-1);
- if (ch == 0 or 10 or 13 or 32 or 9
- or '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}') rv++;
- if (rv == 1) outcome = true;
- NONBOUNDARY_RE_CC:
- rv = 0;
- if (BlkValueRead(txt, ipos) == 0 or 10 or 13 or 32 or 9
- or '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}') rv++;
- if (ipos == 0) ch = 0;
- else ch = BlkValueRead(txt, ipos-1);
- if (ch == 0 or 10 or 13 or 32 or 9
- or '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}') rv++;
- if (rv ~= 1) outcome = true;
-
- ! Control constructs
-
- IF_RE_CC:
- i = token-->RE_PAR1; ch = false;
- if (TEXT_TY_RE_Trace) {
- print "Trying conditional from ", ipos, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- if (i >= 1) {
- if ((i10) &&
- ((RE_Subexpressions-->i)-->RE_DATA1 >= 0)) ch = true;
- } else {
- rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ito,
- (token-->RE_DOWN)-->RE_DOWN, mode_flags);
- if (rv >= 0) ch = true;
- }
- if (TEXT_TY_RE_Trace) {
- print "Condition found to be ", ch, "^";
- }
- if (ch) {
- rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ito,
- ((token-->RE_DOWN)-->RE_NEXT)-->RE_DOWN, mode_flags);
- !print "Then clause returned ", rv, "^";
- } else {
- if ((((token-->RE_DOWN)-->RE_NEXT)-->RE_NEXT) == NULL)
- rv = 0; ! The empty else clause matches
- else rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ito,
- (((token-->RE_DOWN)-->RE_NEXT)-->RE_NEXT)-->RE_DOWN, mode_flags);
- !print "Else clause returned ", rv, "^";
- }
- if (rv >= 0) {
- outcome = true;
- ipos = ipos + rv;
- }
- DISJUNCTION_RE_CC:
- if (TEXT_TY_RE_Trace) {
- print "Trying disjunction from ", ipos, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- for (ch = token-->RE_DOWN: ch ~= NULL: ch = ch-->RE_NEXT) {
- if (ch-->RE_PAR1 <= token-->RE_CONSTRAINT) continue;
- if (TEXT_TY_RE_Trace) {
- print "Trying choice at ", ipos, ": ";
- TEXT_TY_RE_DebugNode(ch, ftxt, true);
- }
- rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ito,
- ch-->RE_DOWN, mode_flags);
- if (rv >= 0) {
- token-->RE_DATA1 = ipos; ! Where match was made
- token-->RE_DATA2 = ch-->RE_PAR1; ! Option taken
- ipos = ipos + rv;
- outcome = true;
- if (TEXT_TY_RE_Trace) {
- print "Choice worked with width ", rv, ": ";
- TEXT_TY_RE_DebugNode(ch, ftxt, true);
- }
- break;
- } else {
- if (mode_flags & ACCUM_MFLAG == false)
- TEXT_TY_RE_FailSubexpressions(ch-->RE_DOWN);
- }
- }
- if (outcome == false) {
- if (TEXT_TY_RE_Trace) {
- print "Failed disjunction from ", ipos, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- token-->RE_DATA1 = ipos; ! Where match was tried
- token-->RE_DATA2 = -1; ! No option was taken
- }
- SUBEXP_RE_CC:
- if (token-->RE_PAR2 == 1 or 2) {
- npos = ipos - token-->RE_PAR3;
- if (npos<0) rv = -1; ! Lookbehind fails: nothing behind
- else rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, npos, ito, token-->RE_DOWN,
- mode_flags);
- } else {
- switch (token-->RE_PAR3) {
- 0: rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ito, token-->RE_DOWN,
- mode_flags);
- 1: rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ito, token-->RE_DOWN,
- mode_flags & (~CIS_MFLAG));
- 2: rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, ipos, ito, token-->RE_DOWN,
- mode_flags | CIS_MFLAG);
- }
- }
- npos = ipos;
- if (rv >= 0) npos = ipos + rv;
- switch (token-->RE_PAR2) {
- 1: if (rv >= 0) rv = 0;
- 2: if (rv >= 0) rv = -1; else rv = 0;
- }
- if (rv >= 0) {
- token-->RE_DATA1 = ipos;
- ipos = ipos + rv;
- token-->RE_DATA2 = npos;
- outcome = true;
- } else {
- if (mode_flags & ACCUM_MFLAG == false) {
- token-->RE_DATA1 = -1;
- token-->RE_DATA2 = -1;
- }
- }
- if (token-->RE_PAR2 == 2) TEXT_TY_RE_FailSubexpressions(token, true);
- QUANTIFIER_RE_CC:
- token-->RE_DATA1 = ipos;
- if ((token-->RE_DOWN)-->RE_CCLASS == SUBEXP_RE_CC) {
- (token-->RE_DOWN)-->RE_CACHE1 = -1;
- (token-->RE_DOWN)-->RE_CACHE2 = -1;
- }
- if (TEXT_TY_RE_Trace) {
- print "Trying quantifier from ", ipos, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- if (token-->RE_PAR3 == false) { ! Greedy quantifier
- !edge = ito; if (token-->RE_CONSTRAINT >= 0) edge = token-->RE_CONSTRAINT;
- edge = token-->RE_PAR2;
- if (token-->RE_CONSTRAINT >= 0) edge = token-->RE_CONSTRAINT;
- rv = -1;
- for (i=0, npos=ipos: iRE_DOWN,
- mode_flags | ACCUM_MFLAG);
- if (rv < 0) break;
- if ((token-->RE_DOWN)-->RE_CCLASS == SUBEXP_RE_CC) {
- (token-->RE_DOWN)-->RE_CACHE1 = (token-->RE_DOWN)-->RE_DATA1;
- (token-->RE_DOWN)-->RE_CACHE2 = (token-->RE_DOWN)-->RE_DATA2;
- }
- if ((rv == 0) && (token-->RE_PAR2 == 30000) && (i>=1)) { i++; break; }
- npos = npos + rv;
- }
- if ((i >= token-->RE_PAR1) && (i <= token-->RE_PAR2))
- outcome = true;
- } else { ! Lazy quantifier
- edge = token-->RE_PAR1;
- if (token-->RE_CONSTRAINT > edge) edge = token-->RE_CONSTRAINT;
- for (i=0, npos=ipos: (nposRE_PAR2): i++) {
- if (i >= edge) break;
- if (TEXT_TY_RE_Trace) {
- print "Trying quant rep ", i+1, " at ", npos, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- rv = TEXT_TY_RE_ParseAtPosition(ftxt, txt, npos, ito, token-->RE_DOWN,
- mode_flags | ACCUM_MFLAG);
- if (rv < 0) break;
- if ((token-->RE_DOWN)-->RE_CCLASS == SUBEXP_RE_CC) {
- (token-->RE_DOWN)-->RE_CACHE1 = (token-->RE_DOWN)-->RE_DATA1;
- (token-->RE_DOWN)-->RE_CACHE2 = (token-->RE_DOWN)-->RE_DATA2;
- }
- if ((rv == 0) && (token-->RE_PAR2 == 30000) && (i>=1)) { i++; break; }
- npos = npos + rv;
- }
- if ((i >= edge) && (i <= token-->RE_PAR2))
- outcome = true;
- }
- if (outcome) {
- if (token-->RE_PAR3 == false) { ! Greedy quantifier
- if (i > token-->RE_PAR1) { ! I.e., if we have been greedy
- token-->RE_DATA2 = i-1; ! And its edge limitation
- } else {
- token-->RE_DATA2 = -1;
- }
- } else { ! Lazy quantifier
- if (i < token-->RE_PAR2) { ! I.e., if we have been lazy
- token-->RE_DATA2 = i+1; ! And its edge limitation
- } else {
- token-->RE_DATA2 = -1;
- }
- }
- ipos = npos;
- if ((i == 0) && (mode_flags & ACCUM_MFLAG == false))
- TEXT_TY_RE_FailSubexpressions(token-->RE_DOWN);
- if ((token-->RE_DOWN)-->RE_CCLASS == SUBEXP_RE_CC) {
- (token-->RE_DOWN)-->RE_DATA1 = (token-->RE_DOWN)-->RE_CACHE1;
- (token-->RE_DOWN)-->RE_DATA2 = (token-->RE_DOWN)-->RE_CACHE2;
- }
- if (TEXT_TY_RE_Trace) {
- print "Successful quant reps ", i, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- } else {
- !token-->RE_DATA2 = -1;
- if (mode_flags & ACCUM_MFLAG == false)
- TEXT_TY_RE_FailSubexpressions(token-->RE_DOWN);
- if (TEXT_TY_RE_Trace) {
- print "Failed quant reps ", i, ": ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- }
-
- ! Character classes
-
- NOTHING_RE_CC: ;
- ANYTHING_RE_CC: if (ch) outcome = true; ipos++;
- WHITESPACE_RE_CC:
- if (ch == 10 or 13 or 32 or 9) { outcome = true; ipos++; }
- NONWHITESPACE_RE_CC:
- if ((ch) && (ch ~= 10 or 13 or 32 or 9)) { outcome = true; ipos++; }
- PUNCTUATION_RE_CC:
- if (ch == '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}') { outcome = true; ipos++; }
- NONPUNCTUATION_RE_CC:
- if ((ch) && (ch ~= '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}')) { outcome = true; ipos++; }
- WORD_RE_CC:
- if ((ch) && (ch ~= 10 or 13 or 32 or 9
- or '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}')) { outcome = true; ipos++; }
- NONWORD_RE_CC:
- if (ch == 10 or 13 or 32 or 9
- or '.' or ',' or '!' or '?'
- or '-' or '/' or '"' or ':' or ';'
- or '(' or ')' or '[' or ']' or '{' or '}') { outcome = true; ipos++; }
- DIGIT_RE_CC:
- if (ch == '0' or '1' or '2' or '3' or '4'
- or '5' or '6' or '7' or '8' or '9') { outcome = true; ipos++; }
- NONDIGIT_RE_CC:
- if ((ch) && (ch ~= '0' or '1' or '2' or '3' or '4'
- or '5' or '6' or '7' or '8' or '9')) { outcome = true; ipos++; }
- LCASE_RE_CC:
- if (CharIsOfCase(ch, 0)) { outcome = true; ipos++; }
- NONLCASE_RE_CC:
- if ((ch) && (CharIsOfCase(ch, 0) == false)) { outcome = true; ipos++; }
- UCASE_RE_CC:
- if (CharIsOfCase(ch, 1)) { outcome = true; ipos++; }
- NONUCASE_RE_CC:
- if ((ch) && (CharIsOfCase(ch, 1) == false)) { outcome = true; ipos++; }
- NEWLINE_RE_CC: if (ch == 10) { outcome = true; ipos++; }
- TAB_RE_CC: if (ch == 9) { outcome = true; ipos++; }
- RANGE_RE_CC:
- if (TEXT_TY_RE_Range(ch, ftxt,
- token-->RE_PAR1, token-->RE_PAR2, token-->RE_PAR3, mode_flags & CIS_MFLAG))
- { outcome = true; ipos++; }
-
- ! Substring matches
-
- LITERAL_RE_CC:
- rv = TEXT_TY_RE_MatchSubstring(txt, ipos,
- ftxt, token-->RE_PAR1, token-->RE_PAR2, mode_flags & CIS_MFLAG);
- if (rv >= 0) { ipos = ipos + rv; outcome = true; }
- VARIABLE_RE_CC:
- i = token-->RE_PAR1;
- if ((RE_Subexpressions-->i)-->RE_DATA1 >= 0) {
- rv = TEXT_TY_RE_MatchSubstring(txt, ipos,
- txt, (RE_Subexpressions-->i)-->RE_DATA1,
- (RE_Subexpressions-->i)-->RE_DATA2, mode_flags & CIS_MFLAG);
- if (rv >= 0) { ipos = ipos + rv; outcome = true; }
- }
- .NeverMatchIncompleteVar;
- }
-
- if (outcome == false) {
- if (TEXT_TY_RE_RewindCount++ >= 10000) {
- if (TEXT_TY_RE_RewindCount == 10001) {
- style bold; print "OVERFLOW^"; style roman;
- }
- return -1;
- }
- if (TEXT_TY_RE_Trace) {
- print "Rewind sought from failure at pos ", ipos, " with: ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- if ((token-->RE_CCLASS == QUANTIFIER_RE_CC) &&
- (TEXT_TY_RE_SeekBacktrack(token-->RE_DOWN, ftxt, false, ito, false)))
- jump RewindFound;
- if (mode_flags & ACCUM_MFLAG == false) TEXT_TY_RE_FailSubexpressions(token);
- token = token-->RE_PREVIOUS;
- while (token ~= NULL) {
- if (TEXT_TY_RE_SeekBacktrack(token, ftxt, true, ito, false)) {
- .RewindFound;
- ipos = token-->RE_DATA1;
- mode_flags = token-->RE_MODES;
- if (mode_flags & ACCUM_MFLAG == false)
- TEXT_TY_RE_FailSubexpressions(token, true);
- if (ipos == -1)
- TEXT_TY_RE_DebugTree(ftxt, true);
- if (TEXT_TY_RE_Trace) {
- print "^[", ifrom, ",", ito, "] rewinding to ", ipos, " at ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- jump Rewind;
- }
- token = token-->RE_PREVIOUS;
- }
- if (TEXT_TY_RE_Trace)
- print "^Rewind impossible^";
- return -1;
- }
-
- token = token-->RE_NEXT;
- }
- return ipos - ifrom;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Backtracking
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_SeekBacktrack token ftxt downwards ito report_only
- untried;
- for (: token ~= NULL: token = token-->RE_NEXT) {
- if ((TEXT_TY_RE_Trace) && (report_only == false)) {
- print "Scan for rewind: ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- if ((token-->RE_CCLASS == SUBEXP_RE_CC) &&
- (token-->RE_PAR2 == 1 or 2 or 4)) {
- if (downwards) rfalse;
- continue;
- }
- if (token-->RE_DOWN ~= NULL) {
- if ((TEXT_TY_RE_Trace) && (report_only == false)) print "Descend^";
- if (TEXT_TY_RE_SeekBacktrack(token-->RE_DOWN, ftxt, false, ito, report_only)) rtrue;
- }
- untried = false;
- switch (token-->RE_CCLASS) {
- DISJUNCTION_RE_CC:
- if ((token-->RE_DATA2 >= 1) &&
- (token-->RE_DATA2 < token-->RE_PAR1) &&
- (token-->RE_CONSTRAINT < token-->RE_PAR1)) { ! Matched but earlier than last
- if (report_only) rtrue;
- if (token-->RE_CONSTRAINT == -1)
- token-->RE_CONSTRAINT = 1;
- else
- (token-->RE_CONSTRAINT)++;
- untried = true;
- }
- QUANTIFIER_RE_CC:
- if (token-->RE_CONSTRAINT ~= -2) {
- if ((TEXT_TY_RE_Trace) && (report_only == false)) {
- print "Quant with cons not -2: ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- if (token-->RE_DATA2 >= 0) {
- if (report_only) rtrue;
- token-->RE_CONSTRAINT = token-->RE_DATA2;
- untried = true;
- }
- }
- }
- if (untried) {
- if (TEXT_TY_RE_Trace) {
- print "Grounds for rewind at: ";
- TEXT_TY_RE_DebugNode(token, ftxt, true);
- }
- TEXT_TY_RE_EraseConstraints(token-->RE_NEXT);
- TEXT_TY_RE_EraseConstraints(token-->RE_DOWN);
- rtrue;
- }
- if (downwards) rfalse;
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Fail Subexpressions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_FailSubexpressions token downwards;
- for (: token ~= NULL: token = token-->RE_NEXT) {
- if (token-->RE_DOWN ~= NULL) TEXT_TY_RE_FailSubexpressions(token-->RE_DOWN);
- if (token-->RE_CCLASS == SUBEXP_RE_CC) {
- token-->RE_DATA1 = -1;
- token-->RE_DATA2 = -1;
- }
- if (downwards) break;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Erasing Constraints
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_EraseConstraints token;
- while (token ~= NULL) {
- switch (token-->RE_CCLASS) {
- DISJUNCTION_RE_CC: token-->RE_CONSTRAINT = -1;
- QUANTIFIER_RE_CC: token-->RE_CONSTRAINT = -1;
- }
- if (token-->RE_DOWN) TEXT_TY_RE_EraseConstraints(token-->RE_DOWN);
- token = token-->RE_NEXT;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Matching Literal Text
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_MatchSubstring txt ipos mtxt mfrom mto insens
- i ch;
- if (mfrom < 0) return 0;
- if (insens)
- for (i=mfrom:i= chm) && (ch <= upper)) rtrue;
- if (insens) {
- crev = TEXT_TY_RevCase(ch);
- if ((crev >= chm) && (crev <= upper)) rtrue;
- }
- i=i+2;
- } else {
- if (chm == ch) rtrue;
- if ((insens) && (chm == TEXT_TY_RevCase(ch))) rtrue;
- }
- }
- }
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Search And Replace
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_Replace_RE ftxtype txt ftxt rtxt insens exactly
- r p p1 p2 cp cp1 cp2;
- !print "Find: "; BlkValueDebug(ftxt); print "^";
- !print "Rep: "; BlkValueDebug(rtxt); print "^";
- !print "In: "; BlkValueDebug(txt); print "^";
- if (rtxt == 0 or 1) { cp = txt-->0; p = TEXT_TY_Temporarily_Transmute(txt); }
- else TEXT_TY_Transmute(txt);
- cp1 = ftxt-->0; p1 = TEXT_TY_Temporarily_Transmute(ftxt);
- cp2 = rtxt-->0; p2 = TEXT_TY_Temporarily_Transmute(rtxt);
- r = TEXT_TY_Replace_REI(ftxtype, txt, ftxt, rtxt, insens, exactly);
- TEXT_TY_Untransmute(ftxt, p1, cp1);
- TEXT_TY_Untransmute(rtxt, p2, cp2);
- if (rtxt == 0 or 1) TEXT_TY_Untransmute(txt, p, cp);
- return r;
-];
-
-[ TEXT_TY_Replace_REI ftxtype txt ftxt rtxt insens exactly
- ctxt csize ilen i cl mpos cpos ch chm;
-
- ilen = TEXT_TY_CharacterLength(txt);
-
- TEXT_TY_RE_Err = 0;
- switch (ftxtype) {
- REGEXP_BLOB: i = TEXT_TY_RE_CompileTree(ftxt, exactly);
- CHR_BLOB: i = TEXT_TY_CHR_CompileTree(ftxt, exactly);
- default: "*** bad ftxtype ***";
- }
-
- if ((i<0) || (i>RE_MAX_PACKETS)) {
- TEXT_TY_RE_Err = i;
- print "*** Regular expression error: ", (string) TEXT_TY_RE_Err, " ***^";
- RunTimeProblem(RTP_REGEXPSYNTAXERROR);
- return 0;
- }
-
- if (TEXT_TY_RE_Trace) {
- TEXT_TY_RE_DebugTree(ftxt);
- print "(compiled to ", i, " packets)^";
- }
-
- if (ftxtype == REGEXP_BLOB) TEXT_TY_RE_EmptyMatchVars();
- mpos = 0; chm = 0; cpos = 0;
- while (TEXT_TY_RE_Parse(ftxt, txt, mpos, insens) >= 0) {
- chm++;
-
- if (TEXT_TY_RE_Trace) {
- print "^*** Match ", chm, " found (", RE_PACKET_space-->RE_DATA1, ",",
- RE_PACKET_space-->RE_DATA2, "): ";
- if (RE_PACKET_space-->RE_DATA1 == RE_PACKET_space-->RE_DATA2) {
- print "";
- }
- for (i=RE_PACKET_space-->RE_DATA1:iRE_DATA2:i++) {
- print (char) BlkValueRead(txt, i);
- }
- print " ***^";
- }
-
- if (rtxt == 0) break; ! Accept only one match, replace nothing
-
- if (rtxt ~= 0 or 1) {
- if (chm == 1) {
- ctxt = BlkValueCreate(TEXT_TY);
- TEXT_TY_Transmute(ctxt);
- csize = BlkValueLBCapacity(ctxt);
- }
-
- for (i=cpos:iRE_DATA1:i++) {
- ch = BlkValueRead(txt, i);
- if (cl+1 >= csize) {
- if (BlkValueSetLBCapacity(ctxt, 2*cl) == false) break;
- csize = BlkValueLBCapacity(ctxt);
- }
- BlkValueWrite(ctxt, cl++, ch);
- }
- BlkValueWrite(ctxt, cl, 0);
-
- TEXT_TY_Concatenate(ctxt, rtxt, ftxtype, txt);
- csize = BlkValueLBCapacity(ctxt);
- cl = TEXT_TY_CharacterLength(ctxt);
- }
-
- mpos = RE_PACKET_space-->RE_DATA2; cpos = mpos;
- if (RE_PACKET_space-->RE_DATA1 == RE_PACKET_space-->RE_DATA2)
- mpos++;
-
- if (TEXT_TY_RE_Trace) {
- if (chm == 100) { ! Purely to keep the output from being excessive
- print "(Stopping after 100 matches.)^"; break;
- }
- }
- }
- if (chm > 0) {
- if (rtxt ~= 0 or 1) {
- for (i=cpos:i= csize) {
- if (BlkValueSetLBCapacity(ctxt, 2*cl) == false) break;
- csize = BlkValueLBCapacity(ctxt);
- }
- BlkValueWrite(ctxt, cl++, ch);
- }
- }
-
- if (ftxtype == REGEXP_BLOB) {
- TEXT_TY_RE_CreateMatchVars(txt);
- if (TEXT_TY_RE_Trace)
- TEXT_TY_RE_DebugMatchVars(txt);
- }
-
- if (rtxt ~= 0 or 1) {
- BlkValueWrite(ctxt, cl, 0);
- BlkValueCopy(txt, ctxt);
- BlkValueFree(ctxt);
- }
- }
- return chm;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RegExp.i6t: Concatenation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TEXT_TY_RE_Concatenate txt_to txt_from blobtype txt_ref
- pos len ch i tosize x y case;
- if ((txt_to==0) || (BlkValueWeakKind(txt_to) ~= TEXT_TY)) rfalse;
- if ((txt_from==0) || (BlkValueWeakKind(txt_from) ~= TEXT_TY)) return txt_to;
- pos = TEXT_TY_CharacterLength(txt_to);
- tosize = BlkValueLBCapacity(txt_to);
- len = TEXT_TY_CharacterLength(txt_from);
- for (i=0:i= 0) ch = BlkValueRead(txt_from, ++i);
- if ((ch >= '0') && (ch <= '9')) {
- ch = ch - '0';
- if (ch < RE_Subexpressions-->10) {
- x = (RE_Subexpressions-->ch)-->RE_DATA1;
- y = (RE_Subexpressions-->ch)-->RE_DATA2;
- if (x >= 0) {
- for (:x= tosize) {
- if (BlkValueSetLBCapacity(txt_to, 2*tosize) == false) break;
- tosize = BlkValueLBCapacity(txt_to);
- }
- if (case >= 0)
- BlkValueWrite(txt_to, pos++, CharToCase(ch, case));
- else
- BlkValueWrite(txt_to, pos++, ch);
- }
- }
- }
- continue;
- }
-
- }
- if (pos+1 >= tosize) {
- if (BlkValueSetLBCapacity(txt_to, 2*tosize) == false) break;
- tosize = BlkValueLBCapacity(txt_to);
- }
- BlkValueWrite(txt_to, pos++, ch);
- }
- BlkValueWrite(txt_to, pos, 0);
- return txt_to;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Block Format
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant STORA_ACTION_F = 0;
-Constant STORA_NOUN_F = 1;
-Constant STORA_SECOND_F = 2;
-Constant STORA_ACTOR_F = 3;
-Constant STORA_REQUEST_F = 4;
-Constant STORA_COMMAND_TEXT_F = 5;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: KOV Support
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Support task arg1 arg2 arg3;
- switch(task) {
- CREATE_KOVS: return STORED_ACTION_TY_Create(arg2);
- DESTROY_KOVS: STORED_ACTION_TY_Destroy(arg1);
- MAKEMUTABLE_KOVS: return 1;
- COPYQUICK_KOVS: rtrue;
- COPYSB_KOVS: BlkValueCopySB1(arg1, arg2);
- KINDDATA_KOVS: return 0;
- EXTENT_KOVS: return 6;
- COPY_KOVS: STORED_ACTION_TY_Copy(arg1, arg2);
- COMPARE_KOVS: return STORED_ACTION_TY_Compare(arg1, arg2);
- HASH_KOVS: return STORED_ACTION_TY_Hash(arg1);
- DEBUG_KOVS: print " = ", (STORED_ACTION_TY_Say) arg1;
- }
- ! We choose not to respond to: CAST_KOVS, COPYKIND_KOVS, READ_FILE_KOVS, WRITE_FILE_KOVS
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Creation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Create sb stora;
- stora = FlexAllocate(6*WORDSIZE, STORED_ACTION_TY, BLK_FLAG_WORD);
- BlkValueWrite(stora, STORA_ACTION_F, ##Wait, true); ! action
- BlkValueWrite(stora, STORA_NOUN_F, 0, true); ! noun
- BlkValueWrite(stora, STORA_SECOND_F, 0, true); ! second
- BlkValueWrite(stora, STORA_ACTOR_F, player, true); ! actor
- BlkValueWrite(stora, STORA_REQUEST_F, false, true); ! whether a request
- BlkValueWrite(stora, STORA_COMMAND_TEXT_F, 0, true); ! text of command if necessary, 0 if not
- return BlkValueCreateSB1(sb, stora);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Setting Up
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_New a n s ac req stora;
- if (stora == 0) stora = BlkValueCreate(STORED_ACTION_TY);
- BlkValueWrite(stora, STORA_ACTION_F, a);
- BlkValueWrite(stora, STORA_NOUN_F, n);
- BlkValueWrite(stora, STORA_SECOND_F, s);
- BlkValueWrite(stora, STORA_ACTOR_F, ac);
- BlkValueWrite(stora, STORA_REQUEST_F, req);
- BlkValueWrite(stora, STORA_COMMAND_TEXT_F, 0);
- return stora;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Destruction
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Destroy stora toc;
- toc = BlkValueRead(stora, STORA_COMMAND_TEXT_F);
- if (toc) BlkValueFree(toc);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Copying
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Copy storato storafrom tocfrom tocto;
- tocfrom = BlkValueRead(storafrom, STORA_COMMAND_TEXT_F);
- if (tocfrom == 0) return;
- tocto = BlkValueCreate(TEXT_TY);
- BlkValueCopy(tocto, tocfrom);
- BlkValueWrite(storato, STORA_COMMAND_TEXT_F, tocto);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Comparison
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Compare storaleft storaright delta itleft itright;
- delta = BlkValueRead(storaleft, STORA_ACTION_F) - BlkValueRead(storaright, STORA_ACTION_F);
- if (delta) return delta;
- delta = BlkValueRead(storaleft, STORA_NOUN_F) - BlkValueRead(storaright, STORA_NOUN_F);
- if (delta) return delta;
- delta = BlkValueRead(storaleft, STORA_SECOND_F) - BlkValueRead(storaright, STORA_SECOND_F);
- if (delta) return delta;
- delta = BlkValueRead(storaleft, STORA_ACTOR_F) - BlkValueRead(storaright, STORA_ACTOR_F);
- if (delta) return delta;
- delta = BlkValueRead(storaleft, STORA_REQUEST_F) - BlkValueRead(storaright, STORA_REQUEST_F);
- if (delta) return delta;
- itleft = BlkValueRead(storaleft, STORA_COMMAND_TEXT_F);
- itright = BlkValueRead(storaright, STORA_COMMAND_TEXT_F);
- if ((itleft ~= 0) && (itright ~= 0))
- return TEXT_TY_Support(COMPARE_KOVS, itleft, itright);
- return itleft - itright;
-];
-
-[ STORED_ACTION_TY_Distinguish stora1 stora2;
- if (STORED_ACTION_TY_Compare(stora1, stora2) == 0) rfalse;
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Hashing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Hash stora rv it;
- rv = BlkValueRead(stora, STORA_ACTION_F);
- rv = rv * 33 + BlkValueRead(stora, STORA_NOUN_F);
- rv = rv * 33 + BlkValueRead(stora, STORA_SECOND_F);
- rv = rv * 33 + BlkValueRead(stora, STORA_ACTOR_F);
- rv = rv * 33 + BlkValueRead(stora, STORA_REQUEST_F);
- it = BlkValueRead(stora, STORA_COMMAND_TEXT_F);
- if (it ~= 0)
- rv = rv * 33 + TEXT_TY_Support(HASH_KOVS, it);
- return rv;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Printing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Say stora text_of_command saved_command saved_pn saved_action K1 K2 at cf cw;
- if ((stora==0) || (BlkValueWeakKind(stora) ~= STORED_ACTION_TY)) return;
- text_of_command = BlkValueRead(stora, STORA_COMMAND_TEXT_F);
- if (text_of_command) {
- saved_command = BlkValueCreate(TEXT_TY);
- BlkValueCast(saved_command, SNIPPET_TY, players_command);
- SetPlayersCommand(text_of_command);
- }
- saved_pn = parsed_number; saved_action = action;
- action = BlkValueRead(stora, STORA_ACTION_F);
- cf = consult_from; cw = consult_words;
- at = FindAction(-1);
- K1 = ActionData-->(at+AD_NOUN_KOV);
- K2 = ActionData-->(at+AD_SECOND_KOV);
- if (K1 ~= OBJECT_TY) {
- parsed_number = BlkValueRead(stora, STORA_NOUN_F);
- if ((K1 == UNDERSTANDING_TY) && (text_of_command == 0)) {
- if (saved_command == 0) saved_command = BlkValueCreate(TEXT_TY);
- BlkValueCast(saved_command, SNIPPET_TY, players_command);
- text_of_command = BlkValueCreate(TEXT_TY);
- BlkValueCopy(text_of_command, parsed_number);
- SetPlayersCommand(text_of_command);
- parsed_number = players_command;
- consult_from = parsed_number/100; consult_words = parsed_number%100;
- }
- }
- if (K2 ~= OBJECT_TY) {
- parsed_number = BlkValueRead(stora, STORA_SECOND_F);
- if ((K2 == UNDERSTANDING_TY) && (text_of_command == 0)) {
- if (saved_command == 0) saved_command = BlkValueCreate(TEXT_TY);
- BlkValueCast(saved_command, SNIPPET_TY, players_command);
- text_of_command = BlkValueCreate(TEXT_TY);
- BlkValueCopy(text_of_command, parsed_number);
- SetPlayersCommand(text_of_command);
- parsed_number = players_command;
- consult_from = parsed_number/100; consult_words = parsed_number%100;
- }
- }
- DB_Action(
- BlkValueRead(stora, STORA_ACTOR_F),
- BlkValueRead(stora, STORA_REQUEST_F),
- BlkValueRead(stora, STORA_ACTION_F),
- BlkValueRead(stora, STORA_NOUN_F),
- BlkValueRead(stora, STORA_SECOND_F), true);
- parsed_number = saved_pn; action = saved_action;
- consult_from = cf; consult_words = cw;
- if (text_of_command) {
- SetPlayersCommand(saved_command);
- BlkValueFree(saved_command);
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Involvement
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Involves stora item at;
- at = FindAction(BlkValueRead(stora, STORA_ACTION_F));
- if (at) {
- if ((ActionData-->(at+AD_NOUN_KOV) == OBJECT_TY) &&
- (BlkValueRead(stora, STORA_NOUN_F) == item)) rtrue;
- if ((ActionData-->(at+AD_SECOND_KOV) == OBJECT_TY) &&
- (BlkValueRead(stora, STORA_SECOND_F) == item)) rtrue;
- }
- if (BlkValueRead(stora, STORA_ACTOR_F) == item) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Nouns
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Part stora ind at ado;
- if (ind == STORA_NOUN_F or STORA_SECOND_F) {
- if (ind == STORA_NOUN_F) ado = AD_NOUN_KOV; else ado = AD_SECOND_KOV;
- at = FindAction(BlkValueRead(stora, STORA_ACTION_F));
- if ((at) && (ActionData-->(at+ado) == OBJECT_TY)) return BlkValueRead(stora, ind);
- return nothing;
- }
- return BlkValueRead(stora, ind);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Pattern Matching
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Array SAT_Tmp-->7;
-[ STORED_ACTION_TY_Adopt stora at;
- SAT_Tmp-->1 = action;
- SAT_Tmp-->2 = noun;
- SAT_Tmp-->3 = second;
- SAT_Tmp-->4 = actor;
- SAT_Tmp-->5 = act_requester;
- SAT_Tmp-->6 = parsed_number;
- action = BlkValueRead(stora, STORA_ACTION_F);
- at = FindAction(-1);
- if (ActionData-->(at+AD_NOUN_KOV) == OBJECT_TY)
- noun = BlkValueRead(stora, STORA_NOUN_F);
- else {
- parsed_number = BlkValueRead(stora, STORA_NOUN_F);
- noun = nothing;
- }
- if (ActionData-->(at+AD_SECOND_KOV) == OBJECT_TY)
- second = BlkValueRead(stora, STORA_SECOND_F);
- else {
- parsed_number = BlkValueRead(stora, STORA_SECOND_F);
- second = nothing;
- }
- actor = BlkValueRead(stora, STORA_ACTOR_F);
- if (BlkValueRead(stora, STORA_REQUEST_F)) act_requester = player; else act_requester = nothing;
-];
-
-[ STORED_ACTION_TY_Unadopt;
- action = SAT_Tmp-->1;
- noun = SAT_Tmp-->2;
- second = SAT_Tmp-->3;
- actor = SAT_Tmp-->4;
- act_requester = SAT_Tmp-->5;
- parsed_number = SAT_Tmp-->6;
- return SAT_Tmp-->0;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Current Action
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Current stora at text_of_command;
- if ((stora==0) || (BlkValueWeakKind(stora) ~= STORED_ACTION_TY)) return 0;
- BlkValueWrite(stora, STORA_ACTION_F, action);
- at = FindAction(-1);
-
- if (ActionData-->(at+AD_NOUN_KOV) == OBJECT_TY)
- BlkValueWrite(stora, STORA_NOUN_F, noun);
- else
- BlkValueWrite(stora, STORA_NOUN_F, parsed_number);
- if (ActionData-->(at+AD_SECOND_KOV) == OBJECT_TY)
- BlkValueWrite(stora, STORA_SECOND_F, second);
- else
- BlkValueWrite(stora, STORA_SECOND_F, parsed_number);
- BlkValueWrite(stora, STORA_ACTOR_F, actor);
- if (act_requester) BlkValueWrite(stora, STORA_REQUEST_F, true);
- else BlkValueWrite(stora, STORA_REQUEST_F, false);
-
- if ((at) && ((ActionData-->(at+AD_NOUN_KOV) == UNDERSTANDING_TY) ||
- (ActionData-->(at+AD_SECOND_KOV) == UNDERSTANDING_TY))) {
- text_of_command = BlkValueRead(stora, STORA_COMMAND_TEXT_F);
- if (text_of_command == 0) {
- text_of_command = BlkValueCreate(TEXT_TY);
- BlkValueWrite(stora, STORA_COMMAND_TEXT_F, text_of_command);
- }
- BlkValueCast(text_of_command, SNIPPET_TY, players_command);
- } else BlkValueWrite(stora, STORA_COMMAND_TEXT_F, 0);
-
- return stora;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! StoredAction.i6t: Trying
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ STORED_ACTION_TY_Try stora ks text_of_command saved_command;
- if ((stora==0) || (BlkValueWeakKind(stora) ~= STORED_ACTION_TY)) return;
- if (ks) { @push keep_silent; keep_silent=1; }
- text_of_command = BlkValueRead(stora, STORA_COMMAND_TEXT_F);
- if (text_of_command) {
- saved_command = BlkValueCreate(TEXT_TY);
- BlkValueCast(saved_command, SNIPPET_TY, players_command);
- SetPlayersCommand(text_of_command);
- }
- TryAction(
- BlkValueRead(stora, STORA_REQUEST_F),
- BlkValueRead(stora, STORA_ACTOR_F),
- BlkValueRead(stora, STORA_ACTION_F),
- BlkValueRead(stora, STORA_NOUN_F),
- BlkValueRead(stora, STORA_SECOND_F));
- if (text_of_command) {
- SetPlayersCommand(saved_command);
- BlkValueFree(saved_command);
- }
- if (ks) { @pull keep_silent; }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Block Format
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant LIST_ITEM_KOV_F = 0; ! The kind of the items
-Constant LIST_LENGTH_F = 1; ! The number of items
-Constant LIST_ITEM_BASE = 2; ! List items begin at this entry
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: KOV Support
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_OF_TY_Support task arg1 arg2 arg3;
- switch(task) {
- CREATE_KOVS: return LIST_OF_TY_Create(arg1, arg2);
- DESTROY_KOVS: LIST_OF_TY_Destroy(arg1);
- MAKEMUTABLE_KOVS: return 1;
- COPYKIND_KOVS: return LIST_OF_TY_CopyKind(arg1, arg2);
- COPYQUICK_KOVS: return LIST_OF_TY_QuickCopy(arg1, arg2);
- COPYSB_KOVS: BlkValueCopySB1(arg1, arg2);
- KINDDATA_KOVS: return LIST_OF_TY_KindData(arg1, arg2);
- EXTENT_KOVS: return BlkValueRead(arg1, LIST_LENGTH_F) + LIST_ITEM_BASE;
- COPY_KOVS: LIST_OF_TY_Copy(arg1, arg2, arg3);
- COMPARE_KOVS: return LIST_OF_TY_Compare(arg1, arg2);
- HASH_KOVS: return LIST_OF_TY_Hash(arg1);
- DEBUG_KOVS: print " = {", (LIST_OF_TY_Say) arg1, "} of kind ",
- BlkValueRead(arg1, LIST_ITEM_KOV_F);
- }
- ! We choose not to respond to: CAST_KOVS, READ_FILE_KOVS, WRITE_FILE_KOVS
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Creation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_OF_TY_Create skov sb list;
- skov = KindBaseTerm(skov, 0);
- list = FlexAllocate(27*WORDSIZE, LIST_OF_TY, BLK_FLAG_MULTIPLE + BLK_FLAG_WORD);
- BlkValueWrite(list, LIST_ITEM_KOV_F, skov, true);
- BlkValueWrite(list, LIST_LENGTH_F, 0, true);
- sb = BlkValueCreateSB1(sb, list);
- return sb;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Destruction
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_OF_TY_Destroy list no_items i k;
- k = BlkValueRead(list, LIST_ITEM_KOV_F);
- if (KOVIsBlockValue(k)) {
- no_items = BlkValueRead(list, LIST_LENGTH_F);
- for (i=0: i ex) {
- if (BlkValueSetLBCapacity(list, len+LIST_ITEM_BASE) == false)
- return 0;
- }
- if (kov) BlkValueWrite(list, LIST_ITEM_KOV_F, kov);
- else BlkValueWrite(list, LIST_ITEM_KOV_F, OBJECT_TY);
- BlkValueWrite(list, LIST_LENGTH_F, len);
- obj = 0;
- for (i=0: i no_items+1))) {
- print "*** Couldn't add at entry ", posn, " in the list ";
- LIST_OF_TY_Say(list, true);
- print ", which has entries in the range 1 to ", no_items, " ***^";
- RunTimeProblem(RTP_LISTRANGEERROR);
- rfalse;
- }
- ex = BlkValueLBCapacity(list);
- if (no_items+LIST_ITEM_BASE+1 > ex) {
- if (BlkValueSetLBCapacity(list, ex+16) == false) return 0;
- }
- if (KOVIsBlockValue(contents_kind)) {
- nv = BlkValueCreate(contents_kind);
- BlkValueCopy(nv, v);
- v = nv;
- }
- if (posnflag) {
- posn--;
- for (i=no_items:i>posn:i--) {
- BlkValueWrite(list, i+LIST_ITEM_BASE,
- BlkValueRead(list, i-1+LIST_ITEM_BASE));
- }
- BlkValueWrite(list, posn+LIST_ITEM_BASE, v);
- } else {
- BlkValueWrite(list, no_items+LIST_ITEM_BASE, v);
- }
- BlkValueWrite(list, LIST_LENGTH_F, no_items+1);
- return list;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Append List
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_OF_TY_AppendList list more posnflag posn nodups v i j no_items msize ex nv;
- if ((list==0) || (BlkValueWeakKind(list) ~= LIST_OF_TY)) return false;
- if ((more==0) || (BlkValueWeakKind(more) ~= LIST_OF_TY)) return list;
- no_items = BlkValueRead(list, LIST_LENGTH_F);
- BlkValueWrite(list, LIST_LENGTH_F, no_items); ! Forces the list to be mutable
- if ((posnflag) && ((posn<1) || (posn > no_items+1))) {
- print "*** Couldn't add at entry ", posn, " in the list ";
- LIST_OF_TY_Say(list, true);
- print ", which has entries in the range 1 to ", no_items, " ***^";
- RunTimeProblem(RTP_LISTRANGEERROR);
- rfalse;
- }
- msize = BlkValueRead(more, LIST_LENGTH_F);
- ex = BlkValueLBCapacity(list);
- if (no_items+msize+LIST_ITEM_BASE > ex) {
- if (BlkValueSetLBCapacity(list, no_items+msize+LIST_ITEM_BASE+8) == false)
- return 0;
- }
- if (posnflag) {
- posn--;
- for (i=no_items+msize:i>=posn+msize:i--) {
- BlkValueWrite(list, i+LIST_ITEM_BASE,
- BlkValueRead(list, i-msize+LIST_ITEM_BASE));
- }
- ! BlkValueWrite(list, posn, v);
- for (j=0: j to) || (from <= 0) || (to > no_items)) {
- if (forgive) {
- if (from <= 0) from = 1;
- if (to >= no_items) to = no_items;
- if (from > to) return list;
- } else {
- print "*** Couldn't remove entries ", from, " to ", to, " from the list ";
- LIST_OF_TY_Say(list, true);
- print ", which has entries in the range 1 to ", no_items, " ***^";
- RunTimeProblem(RTP_LISTRANGEERROR);
- rfalse;
- }
- }
- to--; from--;
- d = to-from+1;
- if (KOVIsBlockValue(BlkValueRead(list, LIST_ITEM_KOV_F)))
- for (i=0: i ex) {
- if (BlkValueSetLBCapacity(list, newsize+LIST_ITEM_BASE) == false)
- return 0;
- }
- dv = DefaultValueOfKOV(BlkValueRead(list, LIST_ITEM_KOV_F));
- for (i=no_items: i newsize) {
- if (this_way_only == 1) return list;
- if (truncation_end == -1) {
- if (KOVIsBlockValue(BlkValueRead(list, LIST_ITEM_KOV_F)))
- for (i=0: ino_items)) {
- if (forgive) return false;
- print "*** Couldn't read from entry ", i, " of a list which";
- switch (no_items) {
- 0: print " is empty ***^";
- 1: print " has only one entry, numbered 1 ***^";
- default: print " has entries numbered from 1 to ", no_items, " ***^";
- }
- RunTimeProblem(RTP_LISTRANGEERROR);
- if (no_items >= 1) i = 1;
- else return false;
- }
- return BlkValueRead(list, LIST_ITEM_BASE+i-1);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Write Item
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ WriteLIST_OF_TY_GetItem list i val no_items;
- if ((list==0) || (BlkValueWeakKind(list) ~= LIST_OF_TY)) return false;
- no_items = BlkValueRead(list, LIST_LENGTH_F);
- if ((i<=0) || (i>no_items)) {
- print "*** Couldn't write to list entry ", i, " of a list which";
- switch (no_items) {
- 0: print " is empty ***^";
- 1: print " has only one entry, numbered 1 ***^";
- default: print " has entries numbered from 1 to ", no_items, " ***^";
- }
- return RunTimeProblem(RTP_LISTRANGEERROR);
- }
- BlkValueWrite(list, LIST_ITEM_BASE+i-1, val);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Put Item
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_OF_TY_PutItem list i v no_items nv;
- if ((list==0) || (BlkValueWeakKind(list) ~= LIST_OF_TY)) return false;
- no_items = BlkValueRead(list, LIST_LENGTH_F);
- if (KOVIsBlockValue(BlkValueRead(list, LIST_ITEM_KOV_F))) {
- nv = BlkValueCreate(BlkValueRead(list, LIST_ITEM_KOV_F));
- BlkValueCopy(nv, v);
- v = nv;
- }
- if ((i<=0) || (i>no_items)) return false;
- BlkValueWrite(list, LIST_ITEM_BASE+i-1, v);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Multiple Object List
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_OF_TY_Mol list len i;
- if ((list==0) || (BlkValueWeakKind(list) ~= LIST_OF_TY)) return 0;
- len = multiple_object-->0;
- LIST_OF_TY_SetLength(list, len);
- for (i=1: i<=len: i++)
- LIST_OF_TY_PutItem(list, i, multiple_object-->i);
- return list;
-];
-
-[ LIST_OF_TY_Set_Mol list len i;
- if ((list==0) || (BlkValueWeakKind(list) ~= LIST_OF_TY)) return 0;
- len = BlkValueRead(list, LIST_LENGTH_F);
- if (len > 63) len = 63;
- multiple_object-->0 = len;
- for (i=1: i<=len: i++)
- multiple_object-->i = BlkValueRead(list, LIST_ITEM_BASE+i-1);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Reversing
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ LIST_OF_TY_Reverse list no_items i v;
- if ((list==0) || (BlkValueWeakKind(list) ~= LIST_OF_TY)) return 0;
- no_items = BlkValueRead(list, LIST_LENGTH_F);
- if (no_items < 2) return list;
- for (i=0:i*20:i--)
- BlkValueWrite(list, LIST_ITEM_BASE+i,
- BlkValueRead(list, LIST_ITEM_BASE+i-1));
- BlkValueWrite(list, LIST_ITEM_BASE, v);
- }
- return list;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Lists.i6t: Sorting
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Global LIST_OF_TY_Sort_cf;
-
-[ LIST_OF_TY_Sort list dir prop cf i j no_items v;
- BlkMakeMutable(list);
- no_items = BlkValueRead(list, LIST_LENGTH_F);
- if (dir == 2) {
- if (no_items < 2) return;
- for (i=1:i j) return 1;
- if (i < j) return -1;
- return 0;
- } else
- return cf(i, j);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Combinations.i6t: Block Format
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant COMBINATION_KIND_F = 0; ! Strong kind ID
-Constant COMBINATION_ITEM_BASE = 1; ! List items begin at this entry
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Combinations.i6t: KOV Support
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ COMBINATION_TY_Support task arg1 arg2 arg3;
- switch(task) {
- CREATE_KOVS: return COMBINATION_TY_Create(arg1, arg2);
- DESTROY_KOVS: COMBINATION_TY_Destroy(arg1);
- MAKEMUTABLE_KOVS: return 1;
- COPYKIND_KOVS: return COMBINATION_TY_CopyKind(arg1, arg2);
- COPYQUICK_KOVS: rtrue;
- COPYSB_KOVS: BlkValueCopySB1(arg1, arg2);
- KINDDATA_KOVS: return COMBINATION_TY_KindData(arg1);
- EXTENT_KOVS: return -1;
- COPY_KOVS: COMBINATION_TY_Copy(arg1, arg2, arg3);
- COMPARE_KOVS: return COMBINATION_TY_Compare(arg1, arg2);
- HASH_KOVS: return COMBINATION_TY_Hash(arg1);
- DEBUG_KOVS: print " = ", (COMBINATION_TY_Say) arg1;
- }
- ! We choose not to respond to: CAST_KOVS, READ_FILE_KOVS, WRITE_FILE_KOVS
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Combinations.i6t: Creation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ COMBINATION_TY_Create kind sb long_block N i bk v;
- N = KindBaseArity(kind);
- long_block = FlexAllocate(
- (COMBINATION_ITEM_BASE+N)*WORDSIZE, COMBINATION_TY, BLK_FLAG_WORD);
- BlkValueWrite(long_block, COMBINATION_KIND_F, kind, true);
- for (i=0: i0) print ", ";
- bk = KindBaseTerm(kind, i);
- v = BlkValueRead(comb, i+COMBINATION_ITEM_BASE);
- if (bk == LIST_OF_TY) LIST_OF_TY_Say(v, 1);
- else PrintKindValuePair(bk, v);
- }
- print ")";
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Block Format
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RRV_NAME RR_NAME-5; ! Packed string, e.g. "containment relation"
-Constant RRV_PERMISSIONS RR_PERMISSIONS-5; ! A bitmap of what operations this supports
-Constant RRV_STORAGE RR_STORAGE-5; ! Data location, depending on format
-Constant RRV_KIND RR_KIND-5; ! Strong kind ID of the relation
-Constant RRV_HANDLER RR_HANDLER-5; ! Routine to perform operations on this
-Constant RRV_DESCRIPTION RR_DESCRIPTION-5; ! Packed string, e.g. "contains"
-Constant RRV_USED 6;
-Constant RRV_FILLED 7;
-Constant RRV_DATA_BASE 8;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: KOV Support
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RELATION_TY_Support task arg1 arg2 arg3;
- switch(task) {
- CREATE_KOVS: return RELATION_TY_Create(arg1, 0, arg2);
- DESTROY_KOVS: RELATION_TY_Destroy(arg1);
- MAKEMUTABLE_KOVS: return 1;
- COPYQUICK_KOVS: rtrue;
- COPYSB_KOVS: BlkValueCopySB1(arg1, arg2);
- KINDDATA_KOVS: return 0;
- EXTENT_KOVS: return -1;
- COPY_KOVS: RELATION_TY_Copy(arg1, arg2);
- COMPARE_KOVS: return RELATION_TY_Compare(arg1, arg2);
- HASH_KOVS: return arg1;
- DEBUG_KOVS: print " = ", (RELATION_TY_Say) arg1;
- }
- ! We choose not to respond to: CAST_KOVS, COPYKIND_KOVS, READ_FILE_KOVS, WRITE_FILE_KOVS
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Other Definitions
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! valencies
-Constant RRVAL_V_TO_V 0;
-Constant RRVAL_V_TO_O RELS_Y_UNIQUE;
-Constant RRVAL_O_TO_V RELS_X_UNIQUE;
-Constant RRVAL_O_TO_O RELS_X_UNIQUE+RELS_Y_UNIQUE;
-Constant RRVAL_EQUIV RELS_EQUIVALENCE+RELS_SYMMETRIC;
-Constant RRVAL_SYM_V_TO_V RELS_SYMMETRIC;
-Constant RRVAL_SYM_O_TO_O RELS_SYMMETRIC+RELS_X_UNIQUE+RELS_Y_UNIQUE;
-
-! dictionary entry flags
-Constant RRF_USED $0001; ! entry contains a value
-Constant RRF_DELETED $0002; ! entry used to contain a value
-Constant RRF_SINGLE $0004; ! entry's Y is a value, not a list
-Constant RRF_HASX $0010; ! 2-in-1 entry contains a corresponding key
-Constant RRF_HASY $0020; ! 2-in-1 entry contains a corresponding value
-Constant RRF_ENTKEYX $0040; ! 2-in-1 entry key is left side KOV
-Constant RRF_ENTKEYY $0080; ! 2-in-1 entry key is right side KOV
-
-! permission/task constants (those commented out here are generated by I7)
-!Constant RELS_SYMMETRIC $8000;
-!Constant RELS_EQUIVALENCE $4000;
-!Constant RELS_X_UNIQUE $2000;
-!Constant RELS_Y_UNIQUE $1000;
-!Constant RELS_TEST $0800;
-!Constant RELS_ASSERT_TRUE $0400;
-!Constant RELS_ASSERT_FALSE $0200;
-!Constant RELS_SHOW $0100;
-!Constant RELS_ROUTE_FIND $0080;
-!Constant RELS_ROUTE_FIND_COUNT $0040;
-Constant RELS_COPY $0020;
-Constant RELS_DESTROY $0010;
-!Constant RELS_LOOKUP_ANY $0008;
-!Constant RELS_LOOKUP_ALL_X $0004;
-!Constant RELS_LOOKUP_ALL_Y $0002;
-!Constant RELS_LIST $0001;
-
-Constant RELS_EMPTY $0003;
-Constant RELS_SET_VALENCY $0005;
-
-! RELS_LOOKUP_ANY mode selection constants
-Constant RLANY_GET_X 1;
-Constant RLANY_GET_Y 2;
-Constant RLANY_CAN_GET_X 3;
-Constant RLANY_CAN_GET_Y 4;
-
-! RELS_LIST mode selection constant
-Constant RLIST_ALL_X 1;
-Constant RLIST_ALL_Y 2;
-Constant RLIST_ALL_PAIRS 3;
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Tunable Parameters
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-Constant RRP_MIN_SIZE 8; ! minimum number of entries (DO NOT CHANGE)
-Constant RRP_PERTURB_SHIFT 5; ! affects the probe sequence
-Constant RRP_RESIZE_SMALL 4; ! resize factor for small tables
-Constant RRP_RESIZE_LARGE 2; ! resize factor for large tables
-Constant RRP_LARGE_IS 256; ! how many entries make a table "large"?
-Constant RRP_CROWDED_IS 2; ! when filled entries outnumber unfilled by _ to 1
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Abstract Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RelationTest relation task X Y handler rv;
- handler = RlnGetF(relation, RR_HANDLER);
- return handler(relation, task, X, Y);
-];
-
-[ RlnGetF rel fld i;
- rel = BlkValueGetLongBlock(rel);
- return rel-->fld;
-];
-
-[ RlnSetF rel fld v;
- rel = BlkValueGetLongBlock(rel);
- rel-->fld = v;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Empty Relations
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ EmptyRelationHandler relation task X Y;
- if (task == RELS_EMPTY) rtrue;
- rfalse;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Creation
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RELATION_TY_Create kov from sb rel i skov handler;
- rel = FlexAllocate((RRV_DATA_BASE + 3*RRP_MIN_SIZE)*WORDSIZE,
- RELATION_TY, BLK_FLAG_WORD+BLK_FLAG_MULTIPLE);
- if ((from == 0) && (kov ~= 0)) from = DefaultValueFinder(kov);
- if (from) {
- for (i=0: i= 0: at--) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (tmp & RRF_USED) {
- if (kx) BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1));
- if (ky) BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2));
- }
- at--;
- }
- return;
- } else if (task == RELS_COPY) {
- X = KOVIsBlockValue(kx); Y = KOVIsBlockValue(ky);
- if (~~(X || Y)) return;
- at = BlkValueRead(rel, RRV_STORAGE);
- while (at >= 0) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (tmp & RRF_USED) {
- if (X) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1);
- tmp = BlkValueCopy(BlkValueCreate(kx), tmp);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, tmp);
- }
- if (Y) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- tmp = BlkValueCopy(BlkValueCreate(ky), tmp);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, tmp);
- }
- }
- at--;
- }
- return;
- } else if (task == RELS_SHOW) {
- print (string) BlkValueRead(rel, RRV_DESCRIPTION), ":^";
- if (sym) {
- kov = KOVComparisonFunction(kx);
- if (~~kov) kov = UnsignedCompare;
- }
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (tmp & RRF_USED) {
- X = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1);
- Y = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- if (sym && (kov(X, Y) > 0)) continue;
- print " ";
- PrintKindValuePair(kx, X);
- if (sym) print " <=> "; else print " >=> ";
- PrintKindValuePair(ky, Y);
- print "^";
- }
- }
- return;
- } else if (task == RELS_EMPTY) {
- if (BlkValueRead(rel, RRV_USED) == 0) rtrue;
- if (X == 1) {
- DoubleHashSetRelationHandler(rel, RELS_DESTROY);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- BlkValueWrite(rel, tmp, 0);
- BlkValueWrite(rel, tmp + 1, 0);
- BlkValueWrite(rel, tmp + 2, 0);
- }
- BlkValueWrite(rel, RRV_USED, 0);
- BlkValueWrite(rel, RRV_FILLED, 0);
- rtrue;
- }
- rfalse;
- } else if (task == RELS_LOOKUP_ANY) {
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- if (BlkValueRead(rel, tmp) & RRF_USED) {
- if (Y == RLANY_GET_X or RLANY_CAN_GET_X) {
- v = BlkValueRead(rel, tmp + 2);
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(v, X) ~= 0) continue;
- } else {
- if (v ~= X) continue;
- }
- if (Y == RLANY_CAN_GET_X) rtrue;
- return BlkValueRead(rel, tmp + 1);
- } else {
- v = BlkValueRead(rel, tmp + 1);
- if (KOVIsBlockValue(kx)) {
- if (BlkValueCompare(v, X) ~= 0) continue;
- } else {
- if (v ~= X) continue;
- }
- if (Y == RLANY_CAN_GET_Y) rtrue;
- return BlkValueRead(rel, tmp + 2);
- }
- }
- }
- if (Y == RLANY_GET_X or RLANY_GET_Y)
- print "*** Lookup failed: value not found ***^";
- rfalse;
- } else if (task == RELS_LOOKUP_ALL_X) {
- if (BlkValueWeakKind(Y) ~= LIST_OF_TY) rfalse;
- LIST_OF_TY_SetLength(Y, 0);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- if (BlkValueRead(rel, tmp) & RRF_USED) {
- v = BlkValueRead(rel, tmp + 2);
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(v, X) ~= 0) continue;
- } else {
- if (v ~= X) continue;
- }
- LIST_OF_TY_InsertItem(Y, BlkValueRead(rel, tmp + 1));
- }
- }
- return Y;
- } else if (task == RELS_LOOKUP_ALL_Y) {
- if (BlkValueWeakKind(Y) ~= LIST_OF_TY) rfalse;
- LIST_OF_TY_SetLength(Y, 0);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- if (BlkValueRead(rel, tmp) & RRF_USED) {
- v = BlkValueRead(rel, tmp + 1);
- if (KOVIsBlockValue(kx)) {
- if (BlkValueCompare(v, X) ~= 0) continue;
- } else {
- if (v ~= X) continue;
- }
- LIST_OF_TY_InsertItem(Y, BlkValueRead(rel, tmp + 2));
- }
- }
- return Y;
- } else if (task == RELS_LIST) {
- if (X == 0 || BlkValueWeakKind(X) ~= LIST_OF_TY) rfalse;
- LIST_OF_TY_SetLength(X, 0);
- switch (Y) {
- RLIST_ALL_X, RLIST_ALL_Y:
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- if (BlkValueRead(rel, tmp) & RRF_USED) {
- tmp++;
- if (Y == RLIST_ALL_Y) tmp++;
- v = BlkValueRead(rel, tmp);
- LIST_OF_TY_InsertItem(X, v, false, 0, true);
- }
- }
- return X;
- RLIST_ALL_PAIRS:
- ! LIST_OF_TY_InsertItem will make a deep copy of the item,
- ! so we can reuse a single combination value here
-
- Y = BlkValueCreate(kov);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- if (BlkValueRead(rel, tmp) & RRF_USED) {
- v = BlkValueRead(rel, tmp + 1);
- BlkValueWrite(Y, COMBINATION_ITEM_BASE, v);
- v = BlkValueRead(rel, tmp + 2);
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + 1, v);
- LIST_OF_TY_InsertItem(X, Y);
- }
- }
- BlkValueWrite(Y, COMBINATION_ITEM_BASE, 0);
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + 1, 0);
- BlkValueFree(Y);
- return X;
- }
- rfalse;
- }
- at = DoubleHashSetLookUp(rel, kx, ky, X, Y);
- switch(task) {
- RELS_TEST:
- if (at >= 0) rtrue;
- rfalse;
- RELS_ASSERT_TRUE:
- if (at >= 0) rtrue;
- at = ~at;
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) + 1);
- if (BlkValueRead(rel, RRV_DATA_BASE + 3*at) == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_USED+RRF_SINGLE);
- if (KOVIsBlockValue(kx)) { X = BlkValueCopy(BlkValueCreate(kx), X); }
- if (KOVIsBlockValue(ky)) { Y = BlkValueCopy(BlkValueCreate(ky), Y); }
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, X);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, Y);
- DoubleHashSetCheckResize(rel);
- rtrue;
- RELS_ASSERT_FALSE:
- if (at < 0) rtrue;
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) - 1);
- if (KOVIsBlockValue(kx))
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1));
- if (KOVIsBlockValue(ky))
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2));
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_DELETED);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, 0);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, 0);
- rtrue;
- }
-];
-
-[ DoubleHashSetLookUp rel kx ky X Y hashv i free mask perturb flags;
- ! calculate a hash value for the pair
- hashv = GetHashValue(kx, x) + GetHashValue(ky, y);
- ! look in the first expected slot
- mask = BlkValueRead(rel, RRV_STORAGE);
- i = hashv & mask;
- flags = BlkValueRead(rel, RRV_DATA_BASE + 3*i);
- if (flags == 0) return ~i;
- if (DoubleHashSetEntryMatches(rel, i, kx, ky, X, Y)) return i;
- ! not here, keep looking in sequence
- free = -1;
- if (flags & RRF_DELETED) free = i;
- perturb = hashv;
- hashv = i;
- for (::) {
- hashv = hashv*5 + perturb + 1;
- i = hashv & mask;
- flags = BlkValueRead(rel, RRV_DATA_BASE + 3*i);
- if (flags == 0) {
- if (free >= 0) return ~free;
- return ~i;
- }
- if (DoubleHashSetEntryMatches(rel, i, kx, ky, X, Y))
- return i;
- if ((free < 0) && (flags & RRF_DELETED)) free = i;
- #ifdef TARGET_ZCODE;
- @log_shift perturb (-RRP_PERTURB_SHIFT) -> perturb;
- #ifnot;
- @ushiftr perturb RRP_PERTURB_SHIFT perturb;
- #endif;
- }
-];
-
-[ DoubleHashSetCheckResize rel filled ext newext temp i at kov kx ky F X Y;
- filled = BlkValueRead(rel, RRV_FILLED);
- ext = BlkValueRead(rel, RRV_STORAGE) + 1;
- if (filled >= (ext - filled) * RRP_CROWDED_IS) {
- ! copy entries to temporary space
- temp = FlexAllocate(ext * (3*WORDSIZE), TEXT_TY, BLK_FLAG_WORD+BLK_FLAG_MULTIPLE);
- for (i=0: i= RRP_LARGE_IS) newext = ext * RRP_RESIZE_LARGE;
- else newext = ext * RRP_RESIZE_SMALL;
- BlkValueSetLBCapacity(rel, RRV_DATA_BASE + newext*3);
- BlkValueWrite(rel, RRV_STORAGE, newext - 1);
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_USED));
- for (i=0: i= 0) { print "*** Duplicate entry while resizing ***^"; rfalse; }
- at = ~at;
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, F);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, X);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, Y);
- }
- ! done with temporary space
- FlexFree(temp);
- }
-];
-
-[ DoubleHashSetEntryMatches rel at kx ky X Y cx cy;
- cx = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1);
- if (KOVIsBlockValue(kx)) {
- if (BlkValueCompare(cx, X) ~= 0) rfalse;
- } else {
- if (cx ~= X) rfalse;
- }
- cy = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(cy, Y) ~= 0) rfalse;
- } else {
- if (cy ~= Y) rfalse;
- }
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Hash List Relation Handler
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ HashListRelationHandler rel task X Y sym kov kx ky;
- kov = BlkValueRead(rel, RRV_KIND);
- kx = KindBaseTerm(kov, 0); ky = KindBaseTerm(kov, 1);
- return HashCoreRelationHandler(rel, task, kx, ky, X, Y, 1);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Hash Table Relation Handler
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ HashTableRelationHandler rel task X Y kov kx ky;
- kov = BlkValueRead(rel, RRV_KIND);
- kx = KindBaseTerm(kov, 0); ky = KindBaseTerm(kov, 1);
- return HashCoreRelationHandler(rel, task, kx, ky, X, Y, 0);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Reversed Hash Table Relation Handler
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ ReversedHashTableRelationHandler rel task X Y kov kx ky swap;
- kov = BlkValueRead(rel, RRV_KIND);
- kx = KindBaseTerm(kov, 0); ky = KindBaseTerm(kov, 1);
- switch (task) {
- RELS_SET_VALENCY:
- return RELATION_TY_SetValency(rel, X);
- RELS_TEST, RELS_ASSERT_TRUE, RELS_ASSERT_FALSE:
- return HashCoreRelationHandler(rel, task, ky, kx, Y, X, 0);
- RELS_LOOKUP_ANY:
- switch (Y) {
- RLANY_GET_X: Y = RLANY_GET_Y;
- RLANY_GET_Y: Y = RLANY_GET_X;
- RLANY_CAN_GET_X: Y = RLANY_CAN_GET_Y;
- RLANY_CAN_GET_Y: Y = RLANY_CAN_GET_X;
- }
- RELS_LOOKUP_ALL_X:
- task = RELS_LOOKUP_ALL_Y;
- RELS_LOOKUP_ALL_Y:
- task = RELS_LOOKUP_ALL_X;
- RELS_SHOW:
- swap=X; X=Y; Y=swap;
- swap=kx; kx=ky; ky=swap;
- RELS_LIST:
- switch (Y) {
- RLIST_ALL_X: Y = RLIST_ALL_Y;
- RLIST_ALL_Y: Y = RLIST_ALL_X;
- }
- }
- return HashCoreRelationHandler(rel, task, kx, ky, X, Y, 0);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Symmetric Relation Handlers
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ SymDoubleHashSetRelationHandler rel task X Y;
- if (task == RELS_ASSERT_TRUE or RELS_ASSERT_FALSE)
- DoubleHashSetRelationHandler(rel, task, Y, X);
- return DoubleHashSetRelationHandler(rel, task, X, Y, 1);
-];
-
-[ SymHashListRelationHandler rel task X Y;
- if (task == RELS_ASSERT_TRUE or RELS_ASSERT_FALSE)
- HashListRelationHandler(rel, task, Y, X);
- return HashListRelationHandler(rel, task, X, Y);
-];
-
-[ Sym2in1HashTableRelationHandler rel task X Y;
- if (task == RELS_ASSERT_TRUE or RELS_ASSERT_FALSE)
- TwoInOneHashTableRelationHandler(rel, task, Y, X);
- return TwoInOneHashTableRelationHandler(rel, task, X, Y, 1);
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Hash Core Relation Handler
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ HashCoreRelationHandler rel task kx ky X Y mult sym rev at tmp fl;
- if (task == RELS_SET_VALENCY) {
- return RELATION_TY_SetValency(rel, X);
- } else if (task == RELS_DESTROY) {
- ! clear
- kx = KOVIsBlockValue(kx); ky = KOVIsBlockValue(ky);
- if (~~(kx || ky)) return;
- at = BlkValueRead(rel, RRV_STORAGE);
- while (at >= 0) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (fl & RRF_USED) {
- if (kx) BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1));
- if (ky || ~~(fl & RRF_SINGLE))
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2));
- }
- at--;
- }
- return;
- } else if (task == RELS_COPY) {
- X = KOVIsBlockValue(kx); Y = KOVIsBlockValue(ky);
- if (~~(X || Y)) return;
- at = BlkValueRead(rel, RRV_STORAGE);
- while (at >= 0) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (fl & RRF_USED) {
- if (X) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1);
- tmp = BlkValueCopy(BlkValueCreate(kx), tmp);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, tmp);
- }
- if (Y || ~~(fl & RRF_SINGLE)) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- tmp = BlkValueCopy(BlkValueCreate(BlkValueWeakKind(tmp)), tmp);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, tmp);
- }
- }
- at--;
- }
- return;
- } else if (task == RELS_SHOW) {
- print (string) BlkValueRead(rel, RRV_DESCRIPTION), ":^";
- ! Z-machine doesn't have the room to let us pass sym/rev as parameters
- switch (RELATION_TY_GetValency(rel)) {
- RRVAL_SYM_V_TO_V:
- sym = 1;
- tmp = KOVComparisonFunction(kx);
- if (~~tmp) tmp = UnsignedCompare;
- RRVAL_O_TO_V:
- rev = 1;
- }
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (fl & RRF_USED) {
- X = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1);
- Y = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- if (fl & RRF_SINGLE) {
- if (sym && tmp(X, Y) > 0) continue;
- print " ";
- if (rev) PrintKindValuePair(ky, Y);
- else PrintKindValuePair(kx, X);
- if (sym) print " <=> "; else print " >=> ";
- if (rev) PrintKindValuePair(kx, X);
- else PrintKindValuePair(ky, Y);
- print "^";
- } else {
- for (mult=1: mult<=LIST_OF_TY_GetLength(Y): mult++) {
- fl = LIST_OF_TY_GetItem(Y, mult);
- if (sym && tmp(X, fl) > 0) continue;
- print " ";
- if (rev) PrintKindValuePair(ky, fl);
- else PrintKindValuePair(kx, X);
- if (sym) print " <=> "; else print " >=> ";
- if (rev) PrintKindValuePair(kx, X);
- else PrintKindValuePair(ky, fl);
- print "^";
- }
- }
- }
- }
- return;
- } else if (task == RELS_EMPTY) {
- if (BlkValueRead(rel, RRV_USED) == 0) rtrue;
- if (X == 1) {
- HashCoreRelationHandler(rel, RELS_DESTROY);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- BlkValueWrite(rel, tmp, 0);
- BlkValueWrite(rel, tmp + 1, 0);
- BlkValueWrite(rel, tmp + 2, 0);
- }
- BlkValueWrite(rel, RRV_USED, 0);
- BlkValueWrite(rel, RRV_FILLED, 0);
- rtrue;
- }
- rfalse;
- } else if (task == RELS_LOOKUP_ANY) {
- if (Y == RLANY_GET_Y or RLANY_CAN_GET_Y) {
- at = HashCoreLookUp(rel, kx, X);
- if (at >= 0) {
- if (Y == RLANY_CAN_GET_Y) rtrue;
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- tmp = BlkValueRead(rel, tmp + 2);
- if (fl & RRF_SINGLE) return tmp;
- return LIST_OF_TY_GetItem(tmp, 1);
- }
- } else {
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- if (fl & RRF_USED) {
- sym = BlkValueRead(rel, tmp + 2);
- if (fl & RRF_SINGLE) {
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(X, sym) ~= 0) continue;
- } else {
- if (X ~= sym) continue;
- }
- } else {
- if (LIST_OF_TY_FindItem(sym, X) == 0) continue;
- }
- if (Y == RLANY_CAN_GET_X) rtrue;
- return BlkValueRead(rel, tmp + 1);
- }
- }
- }
- if (Y == RLANY_GET_X or RLANY_GET_Y)
- print "*** Lookup failed: value not found ***^";
- rfalse;
- } else if (task == RELS_LOOKUP_ALL_X) {
- if (BlkValueWeakKind(Y) ~= LIST_OF_TY) rfalse;
- LIST_OF_TY_SetLength(Y, 0);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- if (fl & RRF_USED) {
- sym = BlkValueRead(rel, tmp + 2);
- if (fl & RRF_SINGLE) {
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(X, sym) ~= 0) continue;
- } else {
- if (X ~= sym) continue;
- }
- } else {
- if (LIST_OF_TY_FindItem(sym, X) == 0) continue;
- }
- LIST_OF_TY_InsertItem(Y, BlkValueRead(rel, tmp + 1));
- }
- }
- return Y;
- } else if (task == RELS_LOOKUP_ALL_Y) {
- if (BlkValueWeakKind(Y) ~= LIST_OF_TY) rfalse;
- LIST_OF_TY_SetLength(Y, 0);
- at = HashCoreLookUp(rel, kx, X);
- if (at >= 0) {
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- tmp = BlkValueRead(rel, tmp + 2);
- if (fl & RRF_SINGLE)
- LIST_OF_TY_InsertItem(Y, tmp);
- else
- LIST_OF_TY_AppendList(Y, tmp);
- }
- return Y;
- } else if (task == RELS_LIST) {
- if (BlkValueWeakKind(X) ~= LIST_OF_TY) rfalse;
- LIST_OF_TY_SetLength(X, 0);
- switch (Y) {
- RLIST_ALL_X:
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- if (fl & RRF_USED)
- LIST_OF_TY_InsertItem(X, BlkValueRead(rel, tmp + 1));
- }
- return X;
- RLIST_ALL_Y:
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- if (fl & RRF_USED) {
- tmp = BlkValueRead(rel, tmp + 2);
- if (fl & RRF_SINGLE)
- LIST_OF_TY_InsertItem(X, tmp, false, 0, true);
- else
- LIST_OF_TY_AppendList(X, tmp, false, 0, true);
- }
- }
- return X;
- RLIST_ALL_PAIRS:
- if (RELATION_TY_GetValency(rel) == RRVAL_O_TO_V) rev = 1;
- ! LIST_OF_TY_InsertItem will make a deep copy of the item,
- ! so we can reuse a single combination value here
- Y = BlkValueCreate(COMBINATION_TY, tmp);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- if (fl & RRF_USED) {
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + rev, BlkValueRead(rel, tmp + 1));
- tmp = BlkValueRead(rel, tmp + 2);
- if (fl & RRF_SINGLE) {
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + 1 - rev, tmp);
- LIST_OF_TY_InsertItem(X, Y);
- } else {
- for (mult = LIST_OF_TY_GetLength(tmp): mult > 0: mult--) {
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + 1 - rev,
- LIST_OF_TY_GetItem(tmp, mult));
- LIST_OF_TY_InsertItem(X, Y);
- }
- }
- }
- }
- BlkValueWrite(Y, COMBINATION_ITEM_BASE, 0);
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + 1, 0);
- BlkValueFree(Y);
- return X;
- }
- rfalse;
- }
- at = HashCoreLookUp(rel, kx, X);
- switch(task) {
- RELS_TEST:
- if (at < 0) rfalse;
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- if (fl & RRF_SINGLE) {
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(tmp, Y) == 0) rtrue;
- } else {
- if (tmp == Y) rtrue;
- }
- rfalse;
- } else {
- return LIST_OF_TY_FindItem(tmp, Y);
- }
- RELS_ASSERT_TRUE:
- if (at < 0) {
- ! no entry exists for this key, just add one
- at = ~at;
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) + 1);
- if (BlkValueRead(rel, RRV_DATA_BASE + 3*at) == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_USED+RRF_SINGLE);
- if (KOVIsBlockValue(kx)) { X = BlkValueCopy(BlkValueCreate(kx), X); }
- if (KOVIsBlockValue(ky)) { Y = BlkValueCopy(BlkValueCreate(ky), Y); }
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, X);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, Y);
- HashCoreCheckResize(rel);
- break;
- }
- ! an entry exists: could be a list or a single value
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at); ! flags
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2); ! value or list
- if (fl & RRF_SINGLE) {
- ! if Y is the same as the stored key, we have nothing to do
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(tmp, Y) == 0) rtrue;
- } else {
- if (tmp == Y) rtrue;
- }
- ! it's different: either replace it or expand into a list,
- ! depending on the value of mult
- if (mult) {
- fl = BlkValueCreate(LIST_OF_TY); ! new list
- BlkValueWrite(fl, LIST_ITEM_KOV_F, ky);
- LIST_OF_TY_SetLength(fl, 2);
- BlkValueWrite(fl, LIST_ITEM_BASE, tmp); ! do not copy
- LIST_OF_TY_PutItem(fl, 2, Y); ! copy if needed
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, fl);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_USED);
- } else {
- if (KOVIsBlockValue(ky)) {
- BlkValueFree(tmp);
- Y = BlkValueCopy(BlkValueCreate(ky), Y);
- }
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, Y);
- }
- } else {
- ! if Y is present already, do nothing. otherwise add it.
- LIST_OF_TY_InsertItem(tmp, Y, 0, 0, 1);
- }
- rtrue;
- RELS_ASSERT_FALSE:
- if (at < 0) rtrue;
- ! an entry exists: could be a list or a single value
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at); ! flags
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2); ! value or list
- if (fl & RRF_SINGLE) {
- ! if the stored key isn't Y, we have nothing to do
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(tmp, Y) ~= 0) rtrue;
- } else {
- if (tmp ~= Y) rtrue;
- }
- ! delete the entry
- if (KOVIsBlockValue(ky))
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2));
- .DeleteEntryIgnoringY;
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) - 1);
- if (KOVIsBlockValue(kx))
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1));
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_DELETED);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, 0);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, 0);
- } else {
- ! remove Y from the list if present
- LIST_OF_TY_RemoveValue(tmp, Y, 1);
- ! if the list is now empty, delete the whole entry
- if (LIST_OF_TY_GetLength(tmp) == 0) {
- BlkValueFree(tmp);
- jump DeleteEntryIgnoringY;
- }
- }
- rtrue;
- }
- rtrue;
-];
-
-[ HashCoreLookUp rel kx X hashv i free mask perturb flags;
-!print "[HCLU rel=", rel, " kx=", kx, " X=", X, ": ";
- ! calculate a hash value for the key
- hashv = GetHashValue(kx, x);
- ! look in the first expected slot
- mask = BlkValueRead(rel, RRV_STORAGE);
- i = hashv & mask;
-!print "hv=", hashv, ", trying ", i;
- flags = BlkValueRead(rel, RRV_DATA_BASE + 3*i);
- if (flags == 0) {
-!print " - not found]^";
- return ~i;
- }
- if (HashCoreEntryMatches(rel, i, kx, X)) {
-!print " - found]^";
- return i;
- }
- ! not here, keep looking in sequence
- free = -1;
- if (flags & RRF_DELETED) free = i;
- perturb = hashv;
- hashv = i;
- for (::) {
- hashv = hashv*5 + perturb + 1;
- i = hashv & mask;
-!print ", ", i;
- flags = BlkValueRead(rel, RRV_DATA_BASE + 3*i);
- if (flags == 0) {
-!print " - not found]^";
- if (free >= 0) return ~free;
- return ~i;
- }
- if (HashCoreEntryMatches(rel, i, kx, X)) {
-!print " - found]^";
- return i;
- }
- if ((free < 0) && (flags & RRF_DELETED)) free = i;
- #ifdef TARGET_ZCODE;
- @log_shift perturb (-RRP_PERTURB_SHIFT) -> perturb;
- #ifnot;
- @ushiftr perturb RRP_PERTURB_SHIFT perturb;
- #endif;
- }
-];
-
-[ HashCoreCheckResize rel filled ext newext temp i at kov kx F X Y;
- filled = BlkValueRead(rel, RRV_FILLED);
- ext = BlkValueRead(rel, RRV_STORAGE) + 1;
- if (filled >= (ext - filled) * RRP_CROWDED_IS) {
- ! copy entries to temporary space
- temp = FlexAllocate(ext * (3*WORDSIZE), TEXT_TY, BLK_FLAG_WORD+BLK_FLAG_MULTIPLE);
- for (i=0: i= RRP_LARGE_IS) newext = ext * RRP_RESIZE_LARGE;
- else newext = ext * RRP_RESIZE_SMALL;
- BlkValueSetLBCapacity(rel, RRV_DATA_BASE + newext*3);
- BlkValueWrite(rel, RRV_STORAGE, newext - 1);
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_USED));
- for (i=0: i= 0) { print "*** Duplicate entry while resizing ***^"; rfalse; }
- at = ~at;
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, F);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, X);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, Y);
- }
- ! done with temporary space
- FlexFree(temp);
- }
-];
-
-[ HashCoreEntryMatches rel at kx X cx cy;
- cx = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1);
- if (KOVIsBlockValue(kx)) {
- if (BlkValueCompare(cx, X) ~= 0) rfalse;
- } else {
- if (cx ~= X) rfalse;
- }
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Equivalence Hash Table Relation Handler
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ EquivHashTableRelationHandler rel task X Y kx at at2 tmp fl i ext;
- kx = KindBaseTerm(BlkValueRead(rel, RRV_KIND), 0);
- if (task == RELS_SET_VALENCY) {
- return RELATION_TY_SetValency(rel, X);
- } else if (task == RELS_DESTROY) {
- ! clear
- if (KOVIsBlockValue(kx)) {
- at = BlkValueRead(rel, RRV_STORAGE);
- while (at >= 0) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (fl & RRF_USED) {
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1));
- }
- at--;
- }
- }
- return;
- } else if (task == RELS_COPY) {
- if (KOVIsBlockValue(kx)) {
- at = BlkValueRead(rel, RRV_STORAGE);
- while (at >= 0) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (fl & RRF_USED) {
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1);
- tmp = BlkValueCopy(BlkValueCreate(kx), tmp);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1);
- }
- at--;
- }
- }
- return;
- } else if (task == RELS_SHOW) {
- print (string) BlkValueRead(rel, RRV_DESCRIPTION), ":^";
- ext = BlkValueRead(rel, RRV_STORAGE);
- ! flag all items by negating their group numbers
- for (at=0, X=RRV_DATA_BASE: at<=ext: at++, X=X+3)
- if (BlkValueRead(rel, X) & RRF_USED)
- BlkValueWrite(rel, X + 2, -(BlkValueRead(rel, X + 2)));
- ! display groups, unflagging them as we go
- for (at=0, X=RRV_DATA_BASE, fl=0: at<=ext: at++, X=X+3, fl=0) {
- if (BlkValueRead(rel, X) & RRF_USED) {
- fl = BlkValueRead(rel, X + 2);
- if (fl > 0) continue; ! already visited
- BlkValueWrite(rel, X + 2, -fl); ! unflag it
- ! display the group starting with this member, but only
- ! if there are more members in the group
- tmp = BlkValueRead(rel, X + 1);
- i = 0;
- for (at2=at+1, Y=RRV_DATA_BASE+3*at2: at2<=ext: at2++, Y=Y+3) {
- if (BlkValueRead(rel, Y) & RRF_USED) {
- if (BlkValueRead(rel, Y + 2) ~= fl) continue;
- BlkValueWrite(rel, Y + 2, -fl);
- if (~~i) {
- ! print the saved first member
- print " { ";
- PrintKindValuePair(kx, tmp);
- i = 1;
- }
- print ", ";
- PrintKindValuePair(kx, BlkValueRead(rel, Y + 1));
- }
- }
- if (i) print " }^";
- }
- }
- return;
- } else if (task == RELS_EMPTY) {
- ! never empty since R(x,x) is always true
- rfalse;
- } else if (task == RELS_LOOKUP_ANY) {
- ! kind of a cheat, but it's faster than searching for a better value to return
- if (Y == RLANY_CAN_GET_X or RLANY_CAN_GET_Y) rtrue;
- return X;
- } else if (task == RELS_LOOKUP_ALL_X or RELS_LOOKUP_ALL_Y) {
- if (BlkValueWeakKind(Y) ~= LIST_OF_TY) rfalse;
- LIST_OF_TY_SetLength(Y, 0);
- BlkValueWrite(Y, LIST_ITEM_KOV_F, kx);
- at = HashCoreLookUp(rel, kx, X);
- if (at < 0) {
- LIST_OF_TY_InsertItem(Y, X);
- } else {
- X = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 3*at;
- fl = BlkValueRead(rel, tmp);
- if (fl & RRF_USED) {
- if (BlkValueRead(rel, tmp + 2) ~= X) continue;
- LIST_OF_TY_InsertItem(Y, BlkValueRead(rel, tmp + 1));
- }
- }
- }
- return Y;
- } else if (task == RELS_LIST) {
- print "*** Domains of equivalence relations cannot be listed ***^";
- return X;
- }
- at = HashCoreLookUp(rel, kx, X);
- at2 = HashCoreLookUp(rel, kx, Y);
- switch(task) {
- RELS_TEST:
- if (at < 0) {
- ! X is a loner, but could still be true if X == Y
- if (KOVIsBlockValue(kx)) {
- if (BlkValueCompare(X, Y) == 0) rtrue;
- } else {
- if (X == Y) rtrue;
- }
- rfalse;
- }
- if (at2 < 0) rfalse;
- if (at == at2) rtrue;
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- if (BlkValueRead(rel, RRV_DATA_BASE + 3*at2 + 2) == tmp) rtrue;
- rfalse;
- RELS_ASSERT_TRUE:
- ! if X and Y are the same, we have nothing to do
- if (KOVIsBlockValue(kx)) {
- if (BlkValueCompare(X, Y) == 0) rtrue;
- } else {
- if (X == Y) rtrue;
- }
- if (at < 0) {
- if (at2 < 0) {
- ! X and Y both missing: find a new group number and add both entries
- tmp = 0; ! candidate group number
- ext = BlkValueRead(rel, RRV_STORAGE);
- for (i=0: i<=ext: i++) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*i);
- if (fl & RRF_USED) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*i + 2);
- if (fl > tmp) tmp = fl;
- }
- }
- tmp++; ! new group number
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) + 2);
- ! add X entry
- at = ~at;
- if (KOVIsBlockValue(kx)) { X = BlkValueCopy(BlkValueCreate(kx), X); }
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (fl == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_USED+RRF_SINGLE);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, X);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, tmp);
- ! add Y entry. at2 might change if X and Y have the same hash code.
- at2 = ~(HashCoreLookUp(rel, kx, Y));
- if (KOVIsBlockValue(kx)) { Y = BlkValueCopy(BlkValueCreate(kx), Y); }
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at2);
- if (fl == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at2, RRF_USED+RRF_SINGLE);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at2 + 1, Y);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at2 + 2, tmp);
- jump CheckResize;
- }
- ! X missing, Y present: add a new X entry
- at = ~at;
- if (KOVIsBlockValue(kx)) { X = BlkValueCopy(BlkValueCreate(kx), X); }
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) + 1);
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at);
- if (fl == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_USED+RRF_SINGLE);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, X);
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at2 + 2);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, tmp);
- jump CheckResize;
- }
- if (at2 < 0) {
- ! X present, Y missing: add a new Y entry
- at2 = ~at2;
- if (KOVIsBlockValue(kx)) { Y = BlkValueCopy(BlkValueCreate(kx), Y); }
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) + 1);
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at2);
- if (fl == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at2, RRF_USED+RRF_SINGLE);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at2 + 1, Y);
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at2 + 2, tmp);
- jump CheckResize;
- }
- ! X and Y both present: merge higher group into lower group
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2); ! higher group
- fl = BlkValueRead(rel, RRV_DATA_BASE + 3*at2 + 2); ! lower group
- if (tmp < fl) { i = tmp; tmp = fl; fl = i; }
- ext = BlkValueRead(rel, RRV_STORAGE);
- for (at=0: at<=ext: at++) {
- i = RRV_DATA_BASE + 3*at + 2;
- if (BlkValueRead(rel, i) == tmp)
- BlkValueWrite(rel, i, fl);
- }
- .CheckResize;
- HashCoreCheckResize(rel);
- rtrue;
- RELS_ASSERT_FALSE:
- ! if X and Y are already in different groups, we have nothing to do
- if (at < 0 || at2 < 0) rtrue;
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 3*at + 2);
- if (BlkValueRead(rel, RRV_DATA_BASE + 3*at2 + 2) ~= tmp) rtrue;
- ! delete the entry for X
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) - 1);
- if (KOVIsBlockValue(kx))
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 3*at + 1));
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at, RRF_DELETED);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 1, 0);
- BlkValueWrite(rel, RRV_DATA_BASE + 3*at + 2, 0);
- rtrue;
- }
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Two-In-One Hash Table Relation Handler
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ TwoInOneHashTableRelationHandler rel task X Y sym kov kx ky at at2 tmp fl;
- kov = BlkValueRead(rel, RRV_KIND);
- kx = KindBaseTerm(kov, 0); ky = KindBaseTerm(kov, 1);
- if (task == RELS_SET_VALENCY) {
- return RELATION_TY_SetValency(rel, X);
- } else if (task == RELS_DESTROY) {
- ! clear
- kx = KOVIsBlockValue(kx); ky = KOVIsBlockValue(ky);
- if (~~(kx || ky)) return;
- at = BlkValueRead(rel, RRV_STORAGE);
- while (at >= 0) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if (fl & RRF_USED)
- if ((kx && (fl & RRF_ENTKEYX)) || (ky && (fl & RRF_ENTKEYY))) {
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 4*at + 1));
- }
- at--;
- }
- return;
- } else if (task == RELS_COPY) {
- X = KOVIsBlockValue(kx); Y = KOVIsBlockValue(ky);
- if (~~(X || Y)) return;
- at = BlkValueRead(rel, RRV_STORAGE);
- while (at >= 0) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if (fl & RRF_USED) {
- if ((X && (fl & RRF_ENTKEYX)) || (Y && (fl & RRF_ENTKEYY))) {
- ! copy the entry key
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 1);
- if (fl & RRF_ENTKEYX)
- tmp = BlkValueCopy(BlkValueCreate(kx), tmp);
- else
- tmp = BlkValueCopy(BlkValueCreate(ky), tmp);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 1, tmp);
- ! update references in X/Y fields pointing here
- if (fl & RRF_HASX) {
- at2 = TwoInOneLookUp(rel, kx,
- BlkValueRead(rel, RRV_DATA_BASE + 4*at + 2),
- RRF_ENTKEYX);
- if (at2 >= 0)
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at2 + 3, tmp);
- }
- if (fl & RRF_HASY) {
- at2 = TwoInOneLookUp(rel, ky,
- BlkValueRead(rel, RRV_DATA_BASE + 4*at + 3),
- RRF_ENTKEYY);
- if (at2 >= 0)
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at2 + 2, tmp);
- }
- }
- }
- at--;
- }
- return;
- } else if (task == RELS_SHOW) {
- print (string) BlkValueRead(rel, RRV_DESCRIPTION), ":^";
- if (sym) {
- kov = KOVComparisonFunction(kx);
- if (~~kov) kov = UnsignedCompare;
- }
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if ((fl & (RRF_USED+RRF_ENTKEYX+RRF_HASY)) ==
- (RRF_USED+RRF_ENTKEYX+RRF_HASY)) {
- X = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 1);
- Y = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 3);
- if (sym && kov(X, Y) > 0) continue;
- print " ";
- PrintKindValuePair(kx, X);
- if (sym) print " <=> "; else print " >=> ";
- PrintKindValuePair(ky, Y);
- print "^";
- }
- }
- return;
- } else if (task == RELS_EMPTY) {
- if (BlkValueRead(rel, RRV_USED) == 0) rtrue;
- if (X == 1) {
- TwoInOneHashTableRelationHandler(rel, RELS_DESTROY);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 4*at;
- BlkValueWrite(rel, tmp, 0);
- BlkValueWrite(rel, tmp + 1, 0);
- BlkValueWrite(rel, tmp + 2, 0);
- BlkValueWrite(rel, tmp + 3, 0);
- }
- BlkValueWrite(rel, RRV_USED, 0);
- BlkValueWrite(rel, RRV_FILLED, 0);
- rtrue;
- }
- rfalse;
- } else if (task == RELS_LOOKUP_ANY) {
- switch (Y) {
- RLANY_GET_X, RLANY_CAN_GET_X:
- at = TwoInOneLookUp(rel, ky, X, RRF_ENTKEYY);
- if (at >= 0) {
- tmp = RRV_DATA_BASE + 4*at;
- if (BlkValueRead(rel, tmp) & RRF_HASX) {
- if (Y == RLANY_CAN_GET_X) rtrue;
- return BlkValueRead(rel, tmp + 2);
- }
- }
- RLANY_GET_Y, RLANY_CAN_GET_Y:
- at = TwoInOneLookUp(rel, kx, X, RRF_ENTKEYX);
- if (at >= 0) {
- tmp = RRV_DATA_BASE + 4*at;
- if (BlkValueRead(rel, tmp) & RRF_HASY) {
- if (Y == RLANY_CAN_GET_Y) rtrue;
- return BlkValueRead(rel, tmp + 3);
- }
- }
- }
- if (Y == RLANY_GET_X or RLANY_GET_Y)
- print "*** Lookup failed: value not found ***^";
- rfalse;
- } else if (task == RELS_LOOKUP_ALL_X) {
- at = TwoInOneLookUp(rel, ky, X, RRF_ENTKEYY);
- if (at >= 0) {
- tmp = RRV_DATA_BASE + 4*at;
- if (BlkValueRead(rel, tmp) & RRF_HASX)
- LIST_OF_TY_InsertItem(Y, BlkValueRead(rel, tmp + 2));
- }
- return Y;
- } else if (task == RELS_LOOKUP_ALL_Y) {
- at = TwoInOneLookUp(rel, kx, X, RRF_ENTKEYX);
- if (at >= 0) {
- tmp = RRV_DATA_BASE + 4*at;
- if (BlkValueRead(rel, tmp) & RRF_HASY)
- LIST_OF_TY_InsertItem(Y, BlkValueRead(rel, tmp + 3));
- }
- return Y;
- } else if (task == RELS_LIST) {
- switch (Y) {
- RLIST_ALL_X:
- fl = RRF_USED+RRF_ENTKEYX+RRF_HASY;
- jump ListEntryKeys;
- RLIST_ALL_Y:
- fl = RRF_USED+RRF_ENTKEYY+RRF_HASX;
- .ListEntryKeys;
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 4*at;
- if ((BlkValueRead(rel, tmp) & fl) == fl)
- LIST_OF_TY_InsertItem(X, BlkValueRead(rel, tmp + 1), false, 0, true);
- }
- RLIST_ALL_PAIRS:
- tmp = BlkValueRead(X, LIST_ITEM_KOV_F);
- if (KindAtomic(tmp) ~= COMBINATION_TY) rfalse;
- ! LIST_OF_TY_InsertItem will make a deep copy of the item,
- ! so we can reuse a single combination value here
- Y = BlkValueCreate(tmp);
- for (at = BlkValueRead(rel, RRV_STORAGE): at >= 0: at--) {
- tmp = RRV_DATA_BASE + 4*at;
- fl = BlkValueRead(rel, tmp);
- if ((fl & (RRF_USED+RRF_ENTKEYX+RRF_HASY)) ==
- (RRF_USED+RRF_ENTKEYX+RRF_HASY)) {
- BlkValueWrite(Y, COMBINATION_ITEM_BASE, BlkValueRead(rel, tmp + 1));
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + 1, BlkValueRead(rel, tmp + 3));
- LIST_OF_TY_InsertItem(X, Y);
- }
- }
- BlkValueWrite(Y, COMBINATION_ITEM_BASE, 0);
- BlkValueWrite(Y, COMBINATION_ITEM_BASE + 1, 0);
- BlkValueFree(Y);
- return X;
- }
- return X;
- }
- at = TwoInOneLookUp(rel, kx, X, RRF_ENTKEYX);
- switch(task) {
- RELS_TEST:
- if (at < 0) rfalse;
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if (~~(fl & RRF_HASY)) rfalse;
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 3);
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(tmp, Y) == 0) rtrue;
- } else {
- if (tmp == Y) rtrue;
- }
- rfalse;
- RELS_ASSERT_TRUE:
- if (at < 0) {
- ! create a new forward entry
- at = ~at;
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) + 1);
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if (fl == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- fl = RRF_USED+RRF_HASY+RRF_ENTKEYX;
- if (kx == ky || ~~(KOVIsBlockValue(kx) || KOVIsBlockValue(ky)))
- fl = fl + RRF_ENTKEYY;
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at, fl);
- if (KOVIsBlockValue(kx)) { X = BlkValueCopy(BlkValueCreate(kx), X); }
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 1, X);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 2, 0);
- } else {
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if (fl & RRF_HASY) {
- ! if the Y we're inserting is already there, we're done
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 3);
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(tmp, Y) == 0) rtrue;
- } else {
- if (tmp == Y) rtrue;
- }
- ! it's different, so delete the reverse entry
- at2 = TwoInOneLookUp(rel, ky, tmp, RRF_ENTKEYY);
- if (at2 >= 0) TwoInOneDelete(rel, at2, kx, ky, RRF_ENTKEYY);
- } else {
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at, fl + RRF_HASY);
- }
- ! use the existing copy of X
- X = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 1);
- }
- ! use the existing copy of Y if there is one
- at2 = TwoInOneLookUp(rel, ky, Y, RRF_ENTKEYY);
- if (KOVIsBlockValue(ky)) {
- if (at2 >= 0)
- Y = BlkValueRead(rel, RRV_DATA_BASE + 4*at2 + 1);
- else
- Y = BlkValueCopy(BlkValueCreate(ky), Y);
- }
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 3, Y);
- if (at2 >= 0) {
- ! delete existing reverse entry (and its own forward entry)
- TwoInOneDelete(rel, at2, kx, ky, RRF_ENTKEYY, 1);
- } else {
- at2 = ~at2;
- }
- ! create reverse entry
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) + 1);
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at2);
- if (fl == 0)
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_FILLED) + 1);
- fl = fl | (RRF_USED+RRF_HASX+RRF_ENTKEYY);
- if (kx == ky || ~~(KOVIsBlockValue(kx) || KOVIsBlockValue(ky)))
- fl = fl | RRF_ENTKEYX;
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at2, fl);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at2 + 1, Y);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at2 + 2, X);
- TwoInOneCheckResize(rel);
- rtrue;
- RELS_ASSERT_FALSE:
- ! we only have work to do if the entry exists and has a Y which
- ! matches the Y we're deleting
- if (at < 0) rtrue;
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if ((fl & RRF_HASY) == 0) rtrue;
- tmp = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 3);
- if (KOVIsBlockValue(ky)) {
- if (BlkValueCompare(tmp, Y) ~= 0) rtrue;
- } else {
- if (tmp ~= Y) rtrue;
- }
- TwoInOneDelete(rel, at, kx, ky, RRF_ENTKEYX, 1);
- rtrue;
- }
-];
-
-[ TwoInOneDelete rel at kx ky ekflag both fl at2 E i;
-!print "[2in1DEL at=", at, " (E=", BlkValueRead(rel, RRV_DATA_BASE + 4*at + 1), ") ekflag=", ekflag, " both=", both, "]^";
- fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- if (ekflag == RRF_ENTKEYX) {
- if (fl & RRF_HASY) {
- i = RRV_DATA_BASE + 4*at + 3;
- if (both) E = BlkValueRead(rel, i);
- BlkValueWrite(rel, i, 0);
- ! delete matching Y<-X entry if needed
- if (both) {
- at2 = TwoInOneLookUp(rel, ky, E, RRF_ENTKEYY);
- if (at2 >= 0) TwoInOneDelete(rel, at2, kx, ky, RRF_ENTKEYY);
- if (at2 == at) fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- }
- fl = fl & ~RRF_HASY;
- }
- } else {
- if (fl & RRF_HASX) {
- i = RRV_DATA_BASE + 4*at + 2;
- if (both) E = BlkValueRead(rel, i);
- BlkValueWrite(rel, i, 0);
- ! delete matching X->Y entry if needed
- if (both) {
- at2 = TwoInOneLookUp(rel, kx, E, RRF_ENTKEYX);
- if (at2 >= 0) {
- TwoInOneDelete(rel, at2, kx, ky, RRF_ENTKEYX);
- if (at2 == at) fl = BlkValueRead(rel, RRV_DATA_BASE + 4*at);
- }
- }
- fl = fl & ~RRF_HASX;
- }
- }
- if ((fl & (RRF_HASX+RRF_HASY)) == 0) {
- ! entry is now empty, mark it deleted
- if (((fl & RRF_ENTKEYX) && KOVIsBlockValue(kx)) ||
- ((ky ~= kx) && (fl & RRF_ENTKEYY) && KOVIsBlockValue(ky))) {
- BlkValueFree(BlkValueRead(rel, RRV_DATA_BASE + 4*at + 1));
- }
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at, RRF_DELETED);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 1, 0);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 2, 0);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 3, 0);
- BlkValueWrite(rel, RRV_USED, BlkValueRead(rel, RRV_USED) - 1);
- } else {
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at, fl);
- }
-];
-
-[ TwoInOneLookUp rel ke E ekflag hashv i free mask perturb flags;
-!print "[2in1LU rel=", rel, " ke=", ke, " E=", E, " ekf=", ekflag, ": ";
- ! calculate a hash value for the key
- hashv = GetHashValue(ke, E);
- ! look in the first expected slot
- mask = BlkValueRead(rel, RRV_STORAGE);
- i = hashv & mask;
-!print "hv=", hashv, ", trying ", i;
- flags = BlkValueRead(rel, RRV_DATA_BASE + 4*i);
- if (flags == 0) {
-!print " - not found]^";
- return ~i;
- }
- if ((flags & ekflag) && TwoInOneEntryMatches(rel, i, ke, E)) {
-!print " - found]^";
- return i;
- }
- ! not here, keep looking in sequence
- free = -1;
- if (flags & RRF_DELETED) free = i;
- perturb = hashv;
- hashv = i;
- for (::) {
- hashv = hashv*5 + perturb + 1;
- i = hashv & mask;
-!print ", ", i;
- flags = BlkValueRead(rel, RRV_DATA_BASE + 4*i);
- if (flags == 0) {
-!print " - not found]^";
- if (free >= 0) return ~free;
- return ~i;
- }
- if ((flags & ekflag) && TwoInOneEntryMatches(rel, i, ke, E)) {
-!print " - found]^";
- return i;
- }
- if ((free < 0) && (flags & RRF_DELETED)) free = i;
- #ifdef TARGET_ZCODE;
- @log_shift perturb (-RRP_PERTURB_SHIFT) -> perturb;
- #ifnot;
- @ushiftr perturb RRP_PERTURB_SHIFT perturb;
- #endif;
- }
-];
-
-[ TwoInOneCheckResize rel filled ext newext temp i at kov kx ky F E X Y;
- filled = BlkValueRead(rel, RRV_FILLED);
- ext = BlkValueRead(rel, RRV_STORAGE) + 1;
- if (filled >= (ext - filled) * RRP_CROWDED_IS) {
- ! copy entries to temporary space
- temp = FlexAllocate(ext * (4*WORDSIZE), TEXT_TY, BLK_FLAG_WORD+BLK_FLAG_MULTIPLE);
- for (i=0: i= RRP_LARGE_IS) newext = ext * RRP_RESIZE_LARGE;
- else newext = ext * RRP_RESIZE_SMALL;
- BlkValueSetLBCapacity(rel, RRV_DATA_BASE + newext*4);
- BlkValueWrite(rel, RRV_STORAGE, newext - 1);
- BlkValueWrite(rel, RRV_FILLED, BlkValueRead(rel, RRV_USED));
- for (i=0: i= 0) { print "*** Duplicate entry while resizing ***^"; rfalse; }
- at = ~at;
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at, F);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 1, E);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 2, X);
- BlkValueWrite(rel, RRV_DATA_BASE + 4*at + 3, Y);
- }
- ! done with temporary space
- FlexFree(temp);
- }
-];
-
-[ TwoInOneEntryMatches rel at ke E ce;
- ce = BlkValueRead(rel, RRV_DATA_BASE + 4*at + 1);
- if (KOVIsBlockValue(ke)) {
- if (BlkValueCompare(ce, E) ~= 0) rfalse;
- } else {
- if (ce ~= E) rfalse;
- }
- rtrue;
-];
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! RelationKind.i6t: Empty
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-[ RELATION_TY_Empty rel set handler;
- handler = RlnGetF(rel, RR_HANDLER);
- return handler(rel, RELS_EMPTY, set);
-];
-
-
-Array ResourceIDsOfFigures --> 0 1 0;
-
-Array ResourceIDsOfSounds --> 0 0;
-
-
-
-Array BC_0 --> PACKED_TEXT_STORAGE TX_PS_2;
-Array BC_1 --> PACKED_TEXT_STORAGE TX_PS_3;
-Array BC_2 --> PACKED_TEXT_STORAGE TX_PS_4;
-Array BC_3 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_4 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_5 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_6 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_7 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_8 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_9 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_10 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_11 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_12 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_13 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_14 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_15 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_16 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_17 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_18 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_19 --> PACKED_TEXT_STORAGE TX_PS_5;
-Array BC_20 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_21 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_22 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_23 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_24 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_25 --> PACKED_TEXT_STORAGE TX_PS_6;
-Array BC_26 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_27 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_28 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_29 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_30 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_31 --> PACKED_TEXT_STORAGE TX_PS_7;
-Array BC_32 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_33 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_34 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_35 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_36 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_37 --> PACKED_TEXT_STORAGE TX_PS_8;
-Array BC_38 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_39 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_40 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_41 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_42 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_43 --> PACKED_TEXT_STORAGE TX_PS_9;
-Array BC_44 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_45 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_46 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_47 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_48 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_49 --> PACKED_TEXT_STORAGE TX_PS_10;
-Array BC_50 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_51 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_52 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_53 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_54 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_55 --> PACKED_TEXT_STORAGE TX_PS_11;
-Array BC_56 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_57 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_58 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_59 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_60 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_61 --> PACKED_TEXT_STORAGE TX_PS_12;
-Array BC_62 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_63 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_64 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_65 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_66 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_67 --> PACKED_TEXT_STORAGE TX_PS_13;
-Array BC_68 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_69 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_70 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_71 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_72 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_73 --> PACKED_TEXT_STORAGE TX_PS_14;
-Array BC_74 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_75 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_76 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_77 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_78 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_79 --> PACKED_TEXT_STORAGE TX_PS_15;
-Array BC_80 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_81 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_82 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_83 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_84 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_85 --> PACKED_TEXT_STORAGE TX_PS_16;
-Array BC_86 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_87 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_88 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_89 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_90 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_91 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_92 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_93 --> PACKED_TEXT_STORAGE TX_PS_18;
-Array BC_94 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_95 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_96 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_97 --> PACKED_TEXT_STORAGE TX_PS_20;
-Array BC_98 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_99 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_100 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_101 --> PACKED_TEXT_STORAGE TX_PS_21;
-Array BC_102 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_103 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_104 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_105 --> PACKED_TEXT_STORAGE TX_PS_22;
-Array BC_106 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_107 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_108 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_109 --> PACKED_TEXT_STORAGE TX_PS_23;
-Array BC_110 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_111 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_112 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_113 --> PACKED_TEXT_STORAGE TX_PS_24;
-Array BC_114 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_115 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_116 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_117 --> PACKED_TEXT_STORAGE TX_PS_25;
-Array BC_118 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_119 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_120 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_121 --> PACKED_TEXT_STORAGE TX_PS_26;
-Array BC_122 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_123 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_124 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_125 --> PACKED_TEXT_STORAGE TX_PS_27;
-Array BC_126 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_127 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_128 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_129 --> PACKED_TEXT_STORAGE TX_PS_28;
-Array BC_130 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_131 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_132 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_133 --> PACKED_TEXT_STORAGE TX_PS_29;
-Array BC_134 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_135 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_136 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_137 --> PACKED_TEXT_STORAGE TX_PS_30;
-Array BC_138 --> PACKED_TEXT_STORAGE TX_PS_19;
-Array BC_139 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_140 --> PACKED_TEXT_STORAGE TX_PS_17;
-Array BC_141 --> PACKED_TEXT_STORAGE TX_PS_31;
-Array BC_142 --> PACKED_TEXT_STORAGE TX_PS_32;
-Array BC_143 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_144 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_145 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_146 --> PACKED_TEXT_STORAGE TX_PS_33;
-Array BC_147 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_148 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_149 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_150 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_151 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_152 --> PACKED_TEXT_STORAGE TX_PS_34;
-Array BC_153 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_154 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_155 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_156 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_157 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_158 --> PACKED_TEXT_STORAGE TX_PS_35;
-Array BC_159 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_160 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_161 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_162 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_163 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_164 --> PACKED_TEXT_STORAGE TX_PS_36;
-Array BC_165 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_166 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_167 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_168 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_169 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_170 --> PACKED_TEXT_STORAGE TX_PS_37;
-Array BC_171 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_172 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_173 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_174 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_175 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_176 --> PACKED_TEXT_STORAGE TX_PS_38;
-Array BC_177 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_178 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_179 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_180 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_181 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_182 --> PACKED_TEXT_STORAGE TX_PS_39;
-Array BC_183 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_184 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_185 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_186 --> PACKED_TEXT_STORAGE TX_PS_5;
-Array BC_187 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_188 --> PACKED_TEXT_STORAGE TX_PS_40;
-Array BC_189 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_190 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_191 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_192 --> PACKED_TEXT_STORAGE TX_PS_5;
-Array BC_193 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_194 --> PACKED_TEXT_STORAGE TX_PS_42;
-Array BC_195 --> PACKED_TEXT_STORAGE TX_PS_41;
-Array BC_196 --> PACKED_TEXT_STORAGE TX_PS_43;
-Array BC_197 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_198 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_199 --> PACKED_TEXT_STORAGE TX_PS_6;
-Array BC_200 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_201 --> PACKED_TEXT_STORAGE TX_PS_44;
-Array BC_202 --> PACKED_TEXT_STORAGE TX_PS_45;
-Array BC_203 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_204 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_205 --> PACKED_TEXT_STORAGE TX_PS_8;
-Array BC_206 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_207 --> PACKED_TEXT_STORAGE TX_PS_46;
-Array BC_208 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_209 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_210 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_211 --> PACKED_TEXT_STORAGE TX_PS_5;
-Array BC_212 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_213 --> PACKED_TEXT_STORAGE TX_PS_47;
-Array BC_214 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_215 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_216 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_217 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_218 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_219 --> PACKED_TEXT_STORAGE TX_PS_48;
-Array BC_220 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_221 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_222 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_223 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_224 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_225 --> PACKED_TEXT_STORAGE TX_PS_49;
-Array BC_226 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_227 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_228 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_229 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_230 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_231 --> PACKED_TEXT_STORAGE TX_PS_50;
-Array BC_232 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_233 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_234 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_235 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_236 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_237 --> PACKED_TEXT_STORAGE TX_PS_51;
-Array BC_238 --> PACKED_TEXT_STORAGE TX_PS_4;
-Array BC_239 --> PACKED_TEXT_STORAGE TX_PS_3;
-Array BC_240 --> PACKED_TEXT_STORAGE TX_PS_52;
-Array BC_241 --> PACKED_TEXT_STORAGE EMPTY_TEXT_PACKED;
-Array BC_242 --> PACKED_TEXT_STORAGE TX_PS_53;
-Array BC_243 --> PACKED_TEXT_STORAGE TX_PS_54;
-Array BC_244 --> PACKED_TEXT_STORAGE TX_PS_55;
-Array BC_245 --> PACKED_TEXT_STORAGE TX_PS_56;
-Array BC_246 --> PACKED_TEXT_STORAGE TX_PS_57;
-
-
-
-
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-! Output.i6t: Signing off
-! ==== ==== ==== ==== ==== ==== ==== ==== ==== ====
-
-! End of automatically generated I6 source
-! --------------------------------------------------------------------------
diff --git a/Lynne Simulator.inform/Build/gameinfo.dbg b/Lynne Simulator.inform/Build/gameinfo.dbg
deleted file mode 100644
index e8eca7a..0000000
--- a/Lynne Simulator.inform/Build/gameinfo.dbg
+++ /dev/null
@@ -1 +0,0 @@
-TARGET_GLULX 0name1true 1false 0Grammar__Version 2STRICT_MODE 0DEBUG 0WORDSIZE 4DICT_ENTRY_BYTES 16DICT_WORD_SIZE 9DICT_CHAR_SIZE 1NUM_ATTR_BYTES 7GOBJFIELD_CHAIN 2GOBJFIELD_NAME 3GOBJFIELD_PROPTAB 4GOBJFIELD_PARENT 5GOBJFIELD_SIBLING 6GOBJFIELD_CHILD 7GOBJ_EXT_START 32GOBJ_TOTAL_LENGTH 32INDIV_PROP_START 256temp_global 496896temp__global2 496900temp__global3 496904temp__global4 496908self 496912sender 496916sw__var 496920sys__glob0 496924sys__glob1 496928sys__glob2 496932sys_statusline_flag 496936create256recreate257destroy258remaining259copy260call261print262print_to_array263FLOAT_INFINITY 2139095040FLOAT_NINFINITY -8388608FLOAT_NAN 2143289344auto.inf/home/lynne/Nextcloud/Projects/games/lynne-simulator/Lynne Simulator.inform/Build/auto.infInform 6inheritance class2instance variables table address (Z-code)3Main__ 60 6012Class0 581832Object1 581864Routine2 581896String3 581928NI_BUILD_COUNT 410953077031107913131LibSerial 410960080333108233330LibRelease 410968083434108543430LIBRARY_VERSION 612086535108863531PLUGIN_FILES 0089837109103722UUID_ARRAY 497816461true09144019854072Story 496940098842110074220Headline 57986001018431010314323Story_Author 57986801042441010594427ShowExtensionVersions 72 7212011305131218532 7501158525 8101217531ShowFullExtensionVersions 84 8418012225431372572 8701254555 9301317565 9901371571ShowOneExtension 102 10232013765831578632id0 10701436615 113014496118 11901511625 125015246218 13101577631DynamicMemoryAllocation 819201738721117687241TEXT_TY_BufferSize 102701795741118227438MAX_FIGURE_THUMBNAILS_IN_INDEX 5001849761118847646MATCH_LIST_WORDS 10001911781119337833DEFAULT_BRIEF_DESCRIPTIONS 001960801119868037USE_SCORING 002021841020368425NULL -10288511810290111826WORD_HIGHBIT-21474836480291211910293611934WORD_NEXTTOHIGHBIT 10737418240294712010297712040IMPROBABLE_VALUE -5590348630298812110301612138MAX_POSITIVE_NUMBER 21474836470302712210305712240MIN_NEGATIVE_NUMBER-21474836480306812310309912341REPARSE_CODE 10737418240311012410313412434unicode_gestalt_ok 496944052031831522818326HDR_MAGICNUMBER 00532518710535118736HDR_GLULXVERSION 40537818810540418836HDR_RAMSTART 80543118910545718936HDR_EXTSTART 120548419010551019036HDR_ENDMEM 160553719110556319136HDR_STACKSIZE 200559019210561619236HDR_STARTFUNC 240564319310566919336HDR_DECODINGTBL 280569619410572219436HDR_CHECKSUM 320574919510577519536ROM_INFO 360580219610582819636ROM_MEMORYLAYOUT 400586719710589319736ROM_INFORMVERSION 440592019810594619836ROM_COMPVERSION 480598519910601119936ROM_GAMERELEASE 520605020010607620036ROM_GAMESERIAL 540610420110613020136PowersOfTwo_TB 497862484false063082101658022221IncreasingPowersOfTwo_TB 497910644false065832241699824022NORMAL_VMSTY 00714724710716724730HEADER_VMSTY 30717824810719824830SUBHEADER_VMSTY 40720924910722924930ALERT_VMSTY 50724025010726025030NOTE_VMSTY 60727125110729125130BLOCKQUOTE_VMSTY 70730225210732225230INPUT_VMSTY 80733325310735325330CLR_DEFAULT 10750526010752026025CLR_BLACK 20753126110754626125CLR_RED 30755726210757226225CLR_GREEN 40758326310759826325CLR_YELLOW 50760926410762426425CLR_BLUE 60763526510765026525CLR_MAGENTA 70766126610767626625CLR_PURPLE 70768726636770226651CLR_CYAN 80771326710772826725CLR_AZURE 80773926736775426751CLR_WHITE 90776526810778026825WIN_ALL 00793227510794727525WIN_STATUS 10798127610799627625WIN_MAIN 20800727710802227725PARA_COMPLETED 10817828410820528437PARA_PROMPTSKIP 20821628510824328537PARA_SUPPRESSPROMPTSKIP 40825428610828128637PARA_NORULEBOOKBREAKS 80829228710831928737PARA_CONTENTEXPECTED 160833028810835828838POSSESS_PK 2560853129510854929528DEFART_PK 2570856029610857829628INDEFART_PK 2580858929710860729728RTP_BACKDROP 10876930410880030441RTP_EXITDOOR 20881130510884230541RTP_NOEXIT 30885330610888430641RTP_CANTCHANGE 40889530710892630741RTP_IMPREL 50893730810896830841RTP_RULESTACK 60897930910901030941RTP_TOOMANYRULEBOOKS 70903831010906931041RTP_TOOMANYEVENTS 80908031110911131141RTP_BADPROPERTY 90912231210915331241RTP_UNPROVIDED 100916431310919631342RTP_UNSET 110920731410923931442RTP_TOOMANYACTS 120925031510928231542RTP_CANTABANDON 130929331610932531642RTP_CANTEND 140933631710936831742RTP_CANTMOVENOTHING 150937931810941131842RTP_CANTREMOVENOTHING 160942231910945431942RTP_DIVZERO 170946532010949732042RTP_BADVALUEPROPERTY 180950832110954032142RTP_NOTBACKDROP 190955132210958332242RTP_TABLE_NOCOL 200959432310962632342RTP_TABLE_NOCORR 210963732410966932442RTP_TABLE_NOROW 220968032510971232542RTP_TABLE_NOENTRY 230972332610975532642RTP_TABLE_NOTABLE 240976632710979832742RTP_TABLE_NOMOREBLANKS 250980932810984132842RTP_TABLE_NOROWS 260985232910988432942RTP_TABLE_CANTSORT 270989533010992733042RTP_NOTINAROOM 280993833110997033142RTP_BADTOPIC 2909981332101001333242RTP_ROUTELESS 30010024333101005633342RTP_PROPOFNOTHING 31010067334101009933442RTP_DECIDEONWRONGKIND 32010110335101014233542RTP_DECIDEONNOTHING 33010153336101018533642RTP_TABLE_CANTSAVE 34010196337101022833742RTP_TABLE_WONTFIT 35010239338101027133842RTP_TABLE_BADFILE 36010282339101031433942RTP_LOWLEVELERROR 37010325340101035734042RTP_DONTIGNORETURNSEQUENCE 38010368341101040034142RTP_SAYINVALIDSNIPPET 39010411342101044334242RTP_SPLICEINVALIDSNIPPET 40010454343101048634342RTP_INCLUDEINVALIDSNIPPET 41010497344101052934442RTP_LISTWRITERMEMORY 42010540345101057234542RTP_CANTREMOVEPLAYER 43010583346101061534642RTP_CANTREMOVEDOORS 44010626347101065834742RTP_CANTCHANGEOFFSTAGE 45010669348101070134842RTP_MSTACKMEMORY 46010712349101074434942RTP_TYPECHECK 47010755350101078735042RTP_FILEIOERROR 48010798351101083035142RTP_HEAPERROR 49010841352101087335242RTP_LISTRANGEERROR 50010884353101091635342RTP_REGEXPSYNTAXERROR 51010927354101095935442RTP_NOGLULXUNICODE 52010970355101100235542RTP_BACKDROPONLY 53011013356101104535642RTP_NOTTHING 54011056357101108835742RTP_SCENEHASNTSTARTED 55011099358101113135842RTP_SCENEHASNTENDED 56011142359101117435942RTP_NEGATIVEROOT 57011185360101121736042RTP_TABLE_CANTRUNTHROUGH 58011228361101126036142RTP_CANTITERATE 59011271362101130336242RTP_WRONGASSIGNEDKIND 60011314363101134636342RTP_CANTBEOFFSTAGE 61011357364101138936442RTP_RELKINDVIOLATION 62011400365101143236542RTP_CANTMAKEPART 63011443366101147236639RTP_TEXTTOKENTOOHARD 64011483367101151536742RTP_TABLE_NOTABLE2 65011526368101155836842RTP_RELATIONCHANGEIMPOSSIBLE 66011569369101160236943RTP_RELMINIMAL 67011613370101164537042RTP_LISTSIZENEGATIVE 68011656371101168837142RTP_REGIONSNOTADJACENT 69011699372101173137242PRINTING_THE_NAME_ACT 0011889380101192438045PRINTING_THE_PLURAL_NAME_ACT 1011935381101197038145PRINTING_A_NUMBER_OF_ACT 2011981382101201638245PRINTING_ROOM_DESC_DETAILS_ACT 3012027383101206238345PRINTING_INVENTORY_DETAILS_ACT 4012073384101210838445LISTING_CONTENTS_ACT 5012119385101215438545GROUPING_TOGETHER_ACT 6012165386101220038645WRITING_A_PARAGRAPH_ABOUT_ACT 7012211387101224638745LISTING_NONDESCRIPT_ITEMS_ACT 8012257388101229238845PRINTING_NAME_OF_DARK_ROOM_ACT 9012304390101233939045PRINTING_DESC_OF_DARK_ROOM_ACT 10012350391101238639146PRINTING_NEWS_OF_DARKNESS_ACT 11012397392101243339246PRINTING_NEWS_OF_LIGHT_ACT 12012444393101248039346REFUSAL_TO_ACT_IN_DARK_ACT 13012491394101252739446CONSTRUCTING_STATUS_LINE_ACT 14012539396101257539646PRINTING_BANNER_TEXT_ACT 15012586397101262239746READING_A_COMMAND_ACT 16012634399101267039946DECIDING_SCOPE_ACT 17012681400101271740046DECIDING_CONCEALED_POSSESS_ACT 18012728401101276440146DECIDING_WHETHER_ALL_INC_ACT 19012775402101281140246CLARIFYING_PARSERS_CHOICE_ACT 20012822403101285840346ASKING_WHICH_DO_YOU_MEAN_ACT 21012869404101290540446PRINTING_A_PARSER_ERROR_ACT 22012916405101295240546SUPPLYING_A_MISSING_NOUN_ACT 23012963406101299940646SUPPLYING_A_MISSING_SECOND_ACT 24013010407101304640746IMPLICITLY_TAKING_ACT 25013057408101309340846STARTING_VIRTUAL_MACHINE_ACT 26013104409101314040946AMUSING_A_VICTORIOUS_PLAYER_ACT 27013152411101318841146PRINTING_PLAYERS_OBITUARY_ACT 28013199412101323541246DEALING_WITH_FINAL_QUESTION_ACT 29013246413101328241346PRINTING_LOCALE_DESCRIPTION_ACT 30013294415101333041546CHOOSING_NOTABLE_LOCALE_OBJ_ACT 31013341416101337741646PRINTING_LOCALE_PARAGRAPH_ACT 32013388417101342441746PRINTING_RESPONSE_ACT 33013436419101347241946STARTUP_RB 0013628426101366342645TURN_SEQUENCE_RB 1013674427101370942745SHUTDOWN_RB 2013720428101375542845WHEN_PLAY_BEGINS_RB 4013767430101380243045WHEN_PLAY_ENDS_RB 5013813431101384843145WHEN_SCENE_BEGINS_RB 6013859432101389443245WHEN_SCENE_ENDS_RB 7013905433101394043345ACTION_PROCESSING_RB 9013952435101398743545SETTING_ACTION_VARIABLES_RB 10013998436101403443646SPECIFIC_ACTION_PROCESSING_RB 11014045437101408143746ACCESSIBILITY_RB 13014093439101412943946REACHING_INSIDE_RB 14014140440101417644046REACHING_OUTSIDE_RB 15014187441101422344146VISIBLE_RB 16014234442101427044246PERSUADE_RB 17014282444101431844446UNSUCCESSFUL_ATTEMPT_RB 18014329445101436544546AFTER_RB 23014377447101441344746REPORT_RB 24014424448101446044846MULTIPLE_ACTION_PROCESSING_RB 26014472450101450845046UNKNOWN_TY-2147483602014654457101467845734VALUE_TY 2014689458101470145822POINTER_VALUE_TY 3014712459101473245930WORD_VALUE_TY 4014743460101476046027ARITHMETIC_VALUE_TY 5014771461101479446133REAL_ARITHMETIC_VALUE_TY 6014805462101483346238ENUMERATED_VALUE_TY 7014844463101486746333SAYABLE_VALUE_TY 8014878464101489846430COMBINED_VALUE_TY 9014909465101493046531OBJECT_TY 10014941466101495546624NUMBER_TY 11014966467101498046724REAL_NUMBER_TY 12014991468101501046829TRUTH_STATE_TY 13015021469101504046929TEXT_TY 14015051470101506347022UNICODE_CHARACTER_TY 15015074471101509947135USE_OPTION_TY 16015110472101512847228RESPONSE_TY 17015139473101515547326VERB_TY 18015166474101517847422SNIPPET_TY 19015189475101520447525TABLE_TY 20015215476101522847623EQUATION_TY 21015239477101525547726RULEBOOK_OUTCOME_TY 22015266478101529047834UNDERSTANDING_TY 23015301479101532247931INTERMEDIATE_TY 24015333480101535348030NIL_TY 25015364481101537548121KIND_VARIABLE_TY 26015386482101540748231PHRASE_TY 27015418483101543248324TUPLE_ENTRY_TY 28015443484101546248429VARIABLE_TY 29015473485101548948526RELATION_TY 30015500486101551648626RULE_TY 31015527487101553948722RULEBOOK_TY 32015550488101556648826ACTIVITY_TY 33015577489101559348926LIST_OF_TY 34015604490101561949025DESCRIPTION_OF_TY 35015630491101565249132PROPERTY_TY 36015663492101567949226TABLE_COLUMN_TY 37015690493101571049330COMBINATION_TY 38015721494101574049429DESCRIPTION_OF_ACTION_TY 39015751495101578049539STORED_ACTION_TY 40015791496101581249631ACTION_NAME_TY 41015823497101584249729TIME_TY 42015853498101586549822SCENE_TY 43015876499101588949923FIGURE_NAME_TY 44015900500101591950029SOUND_NAME_TY 45015930501101594850128EXTERNAL_FILE_TY 46015959502101598050231BASE_KIND_HWM 53015991503101600950328STUCK_PE 1016196511101621651130UPTO_PE 2016227512101624751230NUMBER_PE 3016258513101627851330ANIMA_PE 4016289514101630951430CANTSEE_PE 5016320515101634051530TOOLIT_PE 6016351516101637151630NOTHELD_PE 7016382517101640251730MULTI_PE 8016413518101643351830MMULTI_PE 9016444519101646451930VAGUE_PE 10016475520101649652031EXCEPT_PE 11016507521101652852131VERB_PE 12016539522101656052231SCENERY_PE 13016571523101659252331ITGONE_PE 14016603524101662452431JUNKAFTER_PE 15016635525101665652531TOOFEW_PE 16016667526101668852631NOTHING_PE 17016699527101672052731ASKSCOPE_PE 18016731528101675252831NOTINCONTEXT_PE 19016763529101678452931BLANKLINE_PE 20016795530101681653031ANIMAAGAIN_PE 21016879531101690053131COMMABEGIN_PE 22016911532101693253231MISSINGPERSON_PE 23016943533101696453331ANIMALISTEN_PE 24016975534101699653431TOTALK_PE 25017007535101702853531PARSING_REASON 0017189542101721354234TALKING_REASON 1017224543101724854334EACH_TURN_REASON 2017259544101728354434LOOPOVERSCOPE_REASON 5017294545101731854534TESTSCOPE_REASON 6017329546101735354634ILLEGAL_TT 0017502553101752455332ELEMENTARY_TT 1017572554101759455432PREPOSITION_TT 2017635555101765755532ROUTINE_FILTER_TT 3017689556101771155632ATTR_FILTER_TT 4017755557101777755732SCOPE_TT 5017809558101783155832GPR_TT 6017869559101789155932NOUN_TOKEN 0017938561101796056132HELD_TOKEN 1018011562101803356232MULTI_TOKEN 2018079563101810156332MULTIHELD_TOKEN 3018129564101815156432MULTIEXCEPT_TOKEN 4018162565101818456532MULTIINSIDE_TOKEN 5018195566101821756632CREATURE_TOKEN 6018228567101825056732SPECIAL_TOKEN 7018261568101828356832NUMBER_TOKEN 8018294569101831656932TOPIC_TOKEN 9018327570101834957032ENDIT_TOKEN 15018360571101838357133GPR_FAIL -1018583578101860657833GPR_PREPOSITION 0018656579101867857932GPR_NUMBER 1018703580101872558032GPR_MULTIPLE 2018736581101875858132GPR_REPARSE 1073741824018769582101880258243GPR_NOUN -256018813583101883858335GPR_HELD -255018890584101892358443GPR_MULTI -254018946585101897958543GPR_MULTIHELD -253018990586101902358643GPR_MULTIEXCEPT -252019034587101906758743GPR_MULTIINSIDE -251019078588101911158843GPR_CREATURE -250019122589101915558943NEWLINE_BIT 1019304596101934359649INDENT_BIT 2019382597101942159749FULLINV_BIT 4019461598101950059849ENGLISH_BIT 8019552599101959159949RECURSE_BIT 16019648600101968760049ALWAYS_BIT 32019735601101977460149TERSE_BIT 64019812602101985160249PARTINV_BIT 128019889603101992860349DEFART_BIT 256019986604102002560449WORKFLAG_BIT 512020071605102011060549ISARE_BIT 1024020250607102028960749CONCEAL_BIT 2048020336608102037560849NOARTICLE_BIT 4096020616611102065561149EXTRAINDENT_BIT 8192020703612102074261249CFIRSTART_BIT 16384020795613102083461349QUARTER_HOUR 15021022620102103962027HALF_HOUR 30021050621102106462124ONE_HOUR 60021075622102108862223TWELVE_HOURS 720021099623102111762328TWENTY_FOUR_HOURS 1440021128624102115262434EMPTY_TEXT_PACKED 411147021300631102132063130EMPTY_TEXT_VALUE 49797484false02132263212139563274TheEmptyTable 49798284false02153563912156263928Prop_Falsity 134 134702170264632173864639reason0obj4 13902172764628MAX_SCORE 49694802191165512193165521absent002208766312210366317animate102214666412216366418clothing202220466512222266519concealed302224266612226166620container402228466712230366720door502234766812236166815edible602240066912241666917enterable702244867012246767020light802248867112250367116lockable902253267212255067219locked1002257067312258667317moved1102260467412261967416on1202263867512265067513open1302269167612270567615openable1402273367712275167719scenery1502277167812278867818static1602280767912282367917supporter1702286368012288268020switchable1802292668112294668121talkable1902298768212300568219transparent2002307268312309368322visited2102312868412314568418worn2202316468512317868515male2302323368712324768715female2402331768812333368817neuter2502336168912337768917pluralname2602339569012341569021ambigpluralname2702343969112346469126proper2802349469212351069217remove_proper2902353469312355769324privately_named3002362369512364869526mentioned3102366269612368169620pushable3202369569712371369719mark_as_room3302372869912375069923mark_as_thing3402380370012382670024workflag3502388170212389970219workflag23602396570312398470320list_filter_permits 30024036704102407370447add_to_scope402425771112427871122article502433071212435071221capacity602439071312441171322component_child702444071412446471425component_parent802452371512454871526component_sibling902456271612458871627description1002460271712462271721door_dir1102464571812466271818door_to1202474471912476071917found_in1302480772012482472018initial1402488572112490172117list_together1502493272212495472223map_region1602501472312503372320parse_name1702504772412506872422plural1802513072512514572516regional_found_in1902521172612523772627room_index2002525172712527072720short_name2102531172812533272822vector2202535672912537172916with_key2302541273012542973018KD_Count2402545473212547173218IK1_Count2502552473312554273319IK2_Count2602559773412561573419IK4_Count2702568073512569873519IK5_Count2802575473612577273619IK6_Count2902577473712579273719IK8_Count3002579473812581273819IK1_link3102581574012583274018IK2_link3202589274112590974118IK5_link3302597274212598974218IK6_link3402599474312601174318IK8_link3502601674412603374418articles3602603974612605674618grammar3702611474712613074717inside_description3802618874812621574828short_name_indef3902627874912630574928life -1026514756102652575621ActionCount 77026675763102669176326##ListMiscellany409602683277012685877027##Miscellany409702686077112688277123##PluralFound409802688477212690777224##TheSame409902690977312692877320formal_rv 49695202707478012709078017formal_par0 49695602709278112711078119formal_par1 49696002711278212713078219formal_par2 49696402713278312715078319formal_par3 49696802715278412717078419formal_par4 49697202717278512719078519formal_par5 49697602719278612721078619formal_par6 49698002721278712723078719formal_par7 49698402723278812725078819unicode_temp 49698802725278912727178920RUCKSACK_CLASS 582568027284791112732179148location 49699202746880012749980032sline1 49699602753980112755280114sline2 497000027554801162756780129say__p 49700402757680412759380418say__pc 497008027595804202761380438say__pc_save 497012027615804402763880463say__n 49701602764080512765380514say__comp 497020027655805162767180532los_rv 49702402767380612769480622parameter_object 49702802769680712771980724parameter_value 49703202777680812779880823deferred_calling_list 4979901084false02782180912785580935property_to_be_totalled 49703602785781012788781031property_loop_sign 49704002792581112795081126suppress_scope_loops 49704402800181212802881228temporary_value 49704802803081312805281323BLOCKV_STACK_SIZE 2048028175818102822081855blockv_stack 49809881924false02823182112827182141I7SFRAME 49705202827382212828882216TEXT_TY_RE_Err 49705602829182412831682426LocalParking 5062902564false02831982612834482626standard_interpreter 49706002835382912838482932undo_flag 49706402838683012840283017deadflag 49706802841183312843083320story_complete 49707202843283412845783426resurrect_please 49707602845983512849083532not_yet_in_play 49708002849983812852883830turns 49708402857083912858683917the_time 49708802860884012863084023time_rate 49709202865384112867384121NUMBER_SCENES_CREATED 1028685843102871084335SCENE_ARRAY_SIZE 3028721844102876584454scene_started 506546124false02876784512880784541scene_ended 506558124false02880984612884784639scene_status 506570124false02884984712888884740scene_endings 506582124false02889084812893084841scene_latest_ending 506594124false02893284912897884947score 49709602898785212899985213last_score 49710002901685312903385318notify_mode 49710402906485412908685423left_hand_status_line 49710802911985512916385545right_hand_status_line 49711202919685612924485649player 49711602928585912929885914real_location 49712002931686012933686021visibility_ceiling 49712402935686112938186126visibility_levels 49712802942686212945086225SACK_OBJECT 49713202948086412949886419act_requester 49713602954686712956686721actor 49714002956886812958086813actors_location 49714402962786912964986923actor_location 49714802969187012971287022action 49715202973887112975187114meta 49715602975387212976487212inp1 49716002979187312980287312inp2 49716402980487412981587412multiple_object 5066064004false02981787512986087544toomany_flag 49716802990287612992187620multiflag 49717202995787712997387717multiple_object_item 49717603000987813003687828noun 49718003009587913010687912second 49718403012288013013588014keep_silent 49718803015888113017688119etype 49719203022788213023988213trace_actions 49719603028988313031388325untouchable_object 49720003031688513034188526untouchable_silence 49720403034388613036988627touch_persona 49720803037188713039188721special_word 49721203039488913041388920consult_from 49721603046889013048789020consult_words 49722003053089113055089121parsed_number 49722403058889213060889221special_number1 49722803064789313066989323special_number2 49723203070989413073189423parser_results 507006644false03077389613080189629parser_trace 49723603084089713086389724pronoun_word 49724003091389813093289820pronoun_obj 49724403099489913101289919players_command 49724803106090113108890129matched_text 49725203111690213113590220reason_the_action_failed 49725603115990313119090332understand_as_mistake_number 49726003122690413126190436particular_possession 49726403130890513133690529parser_action 49726803137690813139690821parser_one 49727203144690913146390918parser_two 49727603146591013148291018parameters 49728003148491113150191118action_to_be 49728403155291213157191220action_reversed 49728803161191313163391323wn 49729203167791413168691410num_words 49729603173391513174991517verb_word 49730003177991613179591617verb_wordnum 49730403183491713185391720scope_reason 49730803189392013192992037scope_token 49731203196892113198692119scope_error 49731603202592213204392219scope_stage 49732003204592313206392319advance_warning 49732403207992413210192423reason_code 49732803213892513216392526ats_flag 49733203218692713220592720ats_hls 49733603223392813224792815move_pushing 49734003225793113227693120move_from 49734403227893213229493217move_to 49734803229693313231093315move_by 49735203231293413232693415move_through 49735603232893513234793520lookmode 49736003239293913241193920c_style 49736403276995013278395015c_depth 49736803281395113282795115c_iterator 49737203285595213287295218lt_value 49737603290395313293795335listing_together 49738003297195413299495424listing_size 49738403305995513307895520c_margin 49738803310395613311895616inventory_stage 49739203317895713320495727prior_named_noun 49739603326895813329195824prior_named_list 49740003332495913334795924prior_named_list_gender 49740403338296013341296031story_tense 49740803346196113348396123story_viewpoint 49741203350896213353496227clr_fg 49741603357696513359396518clr_bg 49742003361596613363296618clr_fgstatus 49742403365496713367796724clr_bgstatus 49742803371396813373696824clr_on 49743203377296913378596914statuswin_current 49743603382897013385297025statuswin_cursize 49744003388997313391797329statuswin_size 49744403391997413394497426debug_flag 49744803395497713397597722debug_rules 49745203397797813399997823debug_scenes 49745603400197913402497924debug_rule_nesting 49746003402698013405198026gg_event 507070164false03447999813449999821gg_arguments 507086321false03450199913452999929gg_mainwin 4974640345311000134552100022gg_statuswin 4974680345541001134577100124gg_quotewin 4974720345791002134601100223gg_scriptfref 4974760346031003134627100325gg_scriptstr 4974800346291004134652100424gg_savestr 4974840346541005134675100522gg_commandstr 4974880346771006134701100625gg_command_reading 4974920347031007134732100730gg_foregroundchan 4974960347811008134809100829gg_backgroundchan 4975000348111009134839100929GLK_NULL 003485110111034861101120INPUT_BUFFER_LEN 26003487310131034895101332MAX_BUFFER_WORDS 2003493510141034956101431PARSE_BUFFER_LEN 6103496710151034988101531buffer 5071182641false0349911017135031101741buffer2 5073822641false0350331018135073101841buffer3 5076462641false0350751019135115101941parse 5079102444false0351171020135154102038parse2 5081542444false0351561021135193102138evtype_Arrange 503542110311035439103128evtype_CharInput 203545010321035470103230evtype_Hyperlink 803548110331035501103330evtype_LineInput 303551210341035532103430evtype_MouseInput 403554310351035564103531evtype_None 003557510361035590103625evtype_Redraw 603560110371035618103727evtype_SoundNotify 703562910381035651103832evtype_Timer 103566210391035678103926evtype_VolumeNotify 903568910401035712104033filemode_Read 203572310411035740104127filemode_ReadWrite 303575110421035773104232filemode_Write 103578410431035802104328filemode_WriteAppend 503581310441035837104434fileusage_BinaryMode 003584810451035872104534fileusage_Data 003588310461035901104628fileusage_InputRecord 303591210471035937104735fileusage_SavedGame 103594810481035971104833fileusage_TextMode 25603598210491036006104934fileusage_Transcript 203601710501036041105034fileusage_TypeMask 1503605210511036075105133gestalt_CharInput 103608610521036107105231gestalt_CharOutput 303611810531036140105332gestalt_CharOutput_ApproxPrint 103615110541036185105444gestalt_CharOutput_CannotPrint 003619610551036230105544gestalt_CharOutput_ExactPrint 203624110561036274105643gestalt_DateTime 2003628510571036306105731gestalt_DrawImage 703631710581036338105831gestalt_Graphics 603634910591036369105930gestalt_GraphicsCharInput 2303638010601036410106040gestalt_GraphicsTransparency 1403642110611036454106143gestalt_HyperlinkInput 1203646510621036492106237gestalt_Hyperlinks 1103650310631036526106333gestalt_LineInput 203653710641036558106431gestalt_LineInputEcho 1703656910651036595106536gestalt_LineTerminatorKey 1903660610661036636106640gestalt_LineTerminators 1803664710671036675106738gestalt_MouseInput 403668610681036708106832gestalt_ResourceStream 2203671910691036746106937gestalt_Sound 803675710701036774107027gestalt_Sound2 2103678510711036804107129gestalt_SoundMusic 1303681510721036838107233gestalt_SoundNotify 1003684910731036873107334gestalt_SoundVolume 903688410741036907107433gestalt_Timer 503691810751036935107527gestalt_Unicode 1503694610761036966107630gestalt_UnicodeNorm 1603697710771037001107734gestalt_Version 003701210781037031107829imagealign_InlineCenter 303704210791037069107937imagealign_InlineDown 203708010801037105108035imagealign_MarginLeft 403711610811037141108135imagealign_MarginRight 503715210821037178108236imagealign_InlineUp 103718910831037212108333keycode_Delete -703722310841037250108437keycode_Down -503726110851037286108535keycode_End -1303729710861037321108634keycode_Escape -803733210871037359108737keycode_Func1 -1703737010881037396108836keycode_Func10 -2603740710891037434108937keycode_Func11 -2703744510901037472109037keycode_Func12 -2803748310911037510109137keycode_Func2 -1803752110921037547109236keycode_Func3 -1903755810931037584109336keycode_Func4 -2003759510941037621109436keycode_Func5 -2103763210951037658109536keycode_Func6 -2203766910961037695109636keycode_Func7 -2303770610971037732109736keycode_Func8 -2403774310981037769109836keycode_Func9 -2503778010991037806109936keycode_Home -1203781711001037842110035keycode_Left -203785311011037878110135keycode_MAXVAL 2803788911021037908110229keycode_PageDown -1103791911031037948110339keycode_PageUp -1003795911041037986110437keycode_Return -603799711051038024110537keycode_Right -303803511061038061110636keycode_Tab -903807211071038096110734keycode_Unknown -103810711081038135110838keycode_Up -403814611091038169110933seekmode_Current 103818011101038200111030seekmode_End 203821111111038227111126seekmode_Start 003823811121038256111228style_Alert 503826711131038282111325style_BlockQuote 703829311141038313111430style_Emphasized 103832411151038344111530style_Header 303835511161038371111626style_Input 803838211171038397111725style_NUMSTYLES 1103840811181038428111830style_Normal 003843911191038455111926style_Note 603846611201038480112024style_Preformatted 203849111211038513112132style_Subheader 403852411221038543112229style_User1 903855411231038569112325style_User2 1003858011241038596112426stylehint_BackColor 803860711251038630112533stylehint_Indentation 003864111261038666112635stylehint_Justification 203867711271038704112737stylehint_NUMHINTS 1003871511281038738112833stylehint_Oblique 503874911291038770112931stylehint_ParaIndentation 103878111301038810113039stylehint_Proportional 603882111311038847113136stylehint_ReverseColor 903885811321038884113236stylehint_Size 303889511331038913113328stylehint_TextColor 703892411341038947113433stylehint_Weight 403895811351038978113530stylehint_just_Centered 203898911361039016113637stylehint_just_LeftFlush 003902711371039055113738stylehint_just_LeftRight 103906611381039094113838stylehint_just_RightFlush 303910511391039134113939winmethod_Above 203914511401039164114029winmethod_Below 303917511411039194114129winmethod_Border 003920511421039225114230winmethod_BorderMask 25603923611431039262114336winmethod_DirMask 1503927311441039295114432winmethod_DivisionMask 24003930611451039334114538winmethod_Fixed 1603934511461039365114630winmethod_Left 003937611471039394114728winmethod_NoBorder 25603940511481039429114834winmethod_Proportional 3203944011491039467114937winmethod_Right 103947811501039497115029wintype_AllTypes 003950811511039528115130wintype_Blank 203953911521039556115227wintype_Graphics 503956711531039587115330wintype_Pair 103959811541039614115426wintype_TextBuffer 303962511551039647115532wintype_TextGrid 403965811561039678115630glk_exit 141 14116039683115833976111622_vararg_count0 14903972411603 15503975011613glk_tick 157 15716039766116433984411682_vararg_count0 16503980711663 17103983311673glk_gestalt 173 17318039849117033995911742_vararg_count0ret4 18103991811723 18803994611733glk_gestalt_ext 191 19118039964117634010311802_vararg_count0ret4 19904006211783 20604009011793glk_window_iterate 209 20918040108118234023811862_vararg_count0ret4 21704019611843 22404022511853glk_window_get_rock 227 22718040243118834036611922_vararg_count0ret4 23504032411903 24204035311913glk_window_get_root 245 24518040371119434049011982_vararg_count0ret4 25304044811963 26004047711973glk_window_open 263 26318040495120034063612042_vararg_count0ret4 27104059412023 27804062312033glk_window_close 281 28116040641120634075712102_vararg_count0 28904071912083 29504074612093glk_window_get_size 297 29716040762121234088312162_vararg_count0 30504084512143 31104087212153glk_window_set_arrangement 313 31316040888121834102912222_vararg_count0 32104099112203 32704101812213glk_window_get_arrangement 329 32916041034122434117812282_vararg_count0 33704114012263 34304116712273glk_window_get_type 345 34518041183123034130612342_vararg_count0ret4 35304126412323 36004129312333glk_window_get_parent 363 36318041311123634144012402_vararg_count0ret4 37104139812383 37804142712393glk_window_clear 381 38116041445124234154612462_vararg_count0 38904150812443 39504153512453glk_window_move_cursor 397 39716041551124834167612522_vararg_count0 40504163812503 41104166512513glk_window_get_stream 413 41318041681125434181012582_vararg_count0ret4 42104176812563 42804179712573glk_window_set_echo_stream 431 43116041815126034194412642_vararg_count0 43904190612623 44504193312633glk_window_get_echo_stream 447 44718041949126634208812702_vararg_count0ret4 45504204612683 46204207512693glk_set_window 465 46516042093127234219012762_vararg_count0 47304215212743 47904217912753glk_window_get_sibling 481 48118042195127834232612822_vararg_count0ret4 48904228412803 49604231312813glk_stream_iterate 499 49918042331128434246112882_vararg_count0ret4 50704241912863 51404244812873glk_stream_get_rock 517 51718042466129034258912942_vararg_count0ret4 52504254712923 53204257612933glk_stream_open_file 535 53518042594129634273413002_vararg_count0ret4 54304269212983 55004272112993glk_stream_open_memory 553 55318042739130234290113062_vararg_count0ret4 56104285913043 56804288813053glk_stream_close 571 57116042906130834302213122_vararg_count0 57904298413103 58504301113113glk_stream_set_position 587 58716043027131434315313182_vararg_count0 59504311513163 60104314213173glk_stream_get_position 603 60318043158132034328913242_vararg_count0ret4 61104324713223 61804327613233glk_stream_set_current 621 62116043294132634340713302_vararg_count0 62904336913283 63504339613293glk_stream_get_current 637 63718043412133234353713362_vararg_count0ret4 64504349513343 65204352413353glk_stream_open_resource 655 65518043542133834368113422_vararg_count0ret4 66304363913403 67004366813413glk_fileref_create_temp 673 67318043686134434382413482_vararg_count0ret4 68104378213463 68804381113473glk_fileref_create_by_name 691 69118043829135034398113542_vararg_count0ret4 69904393913523 70604396813533glk_fileref_create_by_prompt 709 70918043986135634414013602_vararg_count0ret4 71704409813583 72404412713593glk_fileref_destroy 727 72716044145136234425313662_vararg_count0 73504421513643 74104424213653glk_fileref_iterate 743 74318044258136834439313722_vararg_count0ret4 75104435013703 75804438013713glk_fileref_get_rock 761 76118044398137434452513782_vararg_count0ret4 76904448213763 77604451213773glk_fileref_delete_file 779 77916044530138034464713842_vararg_count0 78704460813823 79304463613833glk_fileref_does_file_exist 795 79518044652138634479313902_vararg_count0ret4 80304475013883 81004478013893glk_fileref_create_from_fileref 813 81318044798139234496213962_vararg_count0ret4 82104491913943 82804494913953glk_put_char 831 83117044967139834506014022_vararg_count0 83904502114003 84604504914013glk_put_char_stream 848 84817045065140434518014082_vararg_count0 85604514114063 86304516914073glk_put_string 865 86517045185141034528314142_vararg_count0 87304524414123 88004527214133glk_put_string_stream 882 88217045288141634540814202_vararg_count0 89004536914183 89704539714193glk_put_buffer 899 89917045413142234553014262_vararg_count0 90704549114243 91404551914253glk_put_buffer_stream 916 91617045535142834567414322_vararg_count0 92404563514303 93104566314313glk_set_style 933 93317045679143434577314382_vararg_count0 94104573414363 94804576214373glk_set_style_stream 950 95017045778144034589414442_vararg_count0 95804585514423 96504588314433glk_get_char_stream 967 96719045899144634602214502_vararg_count0ret4 97504597914483 98304600914493glk_get_line_stream 986 98619046027145234617814562_vararg_count0ret4 99404613514543 100204616514553glk_get_buffer_stream 1005 100519046183145834633814622_vararg_count0ret4 101304629514603 102104632514613glk_char_to_lower 1024 102419046343146434646314682_vararg_count0ret4 103204642014663 104004645014673glk_char_to_upper 1043 104319046468147034658814742_vararg_count0ret4 105104654514723 105904657514733glk_stylehint_set 1062 106217046593147634671214802_vararg_count0 107004667314783 107704670114793glk_stylehint_clear 1079 107917046717148234683514862_vararg_count0 108704679614843 109404682414853glk_style_distinguish 1096 109619046840148834698014922_vararg_count0ret4 110404693714903 111204696714913glk_style_measure 1115 111519046985149434712414982_vararg_count0ret4 112304708114963 113104711114973glk_select 1134 113417047129150034724015042_vararg_count0 114204720115023 114904722915033glk_select_poll 1151 115117047245150634736615102_vararg_count0 115904732715083 116604735515093glk_request_line_event 1168 116817047371151234751815162_vararg_count0 117604747915143 118304750715153glk_cancel_line_event 1185 118517047523151834766415222_vararg_count0 119304762515203 120004765315213glk_request_char_event 1202 120217047669152434778315282_vararg_count0 121004774415263 121704777215273glk_cancel_char_event 1219 121917047788153034790015342_vararg_count0 122704786115323 123404788915333glk_request_mouse_event 1236 123617047905153634802115402_vararg_count0 124404798215383 125104801015393glk_cancel_mouse_event 1253 125317048026154234814015462_vararg_count0 126104810115443 126804812915453glk_request_timer_events 1270 127017048145154834826115522_vararg_count0 127804822215503 128504825015513glk_image_get_info 1287 128719048266155434840015582_vararg_count0ret4 129504835715563 130304838715573glk_image_draw 1306 130619048405156034853515642_vararg_count0ret4 131404849215623 132204852215633glk_image_draw_scaled 1325 132519048540156634869615702_vararg_count0ret4 133304865315683 134104868315693glk_window_flow_break 1344 134417048701157234881315762_vararg_count0 135204877415743 135904880215753glk_window_erase_rect 1361 136117048818157834895215822_vararg_count0 136904891315803 137604894115813glk_window_fill_rect 1378 137817048957158434909515882_vararg_count0 138604905615863 139304908415873glk_window_set_background_color 1395 139517049100159034923815942_vararg_count0 140304919915923 141004922715933glk_schannel_iterate 1412 141219049243159634938216002_vararg_count0ret4 142004933915983 142804936915993glk_schannel_get_rock 1431 143119049387160234951716062_vararg_count0ret4 143904947416043 144704950416053glk_schannel_create 1450 145019049522160834964816122_vararg_count0ret4 145804960516103 146604963516113glk_schannel_destroy 1469 146917049653161434976516182_vararg_count0 147704972616163 148404975416173glk_schannel_create_ext 1486 148619049770162034991016242_vararg_count0ret4 149404986716223 150204989716233glk_schannel_play_multi 1505 150519049915162635009116302_vararg_count0ret4 151305004816283 152105007816293glk_schannel_play 1524 152419050096163235022416362_vararg_count0ret4 153205018116343 154005021116353glk_schannel_play_ext 1543 154319050229163835037716422_vararg_count0ret4 155105033416403 155905036416413glk_schannel_stop 1562 156217050382164435048816482_vararg_count0 157005044916463 157705047716473glk_schannel_set_volume 1579 157917050493165035061716542_vararg_count0 158705057816523 159405060616533glk_sound_load_hint 1596 159617050622165635073416602_vararg_count0 160405069516583 161105072316593glk_schannel_set_volume_ext 1613 161317050739166235088316662_vararg_count0 162105084416643 162805087216653glk_schannel_pause 1630 163017050888166835099616722_vararg_count0 163805095716703 164505098516713glk_schannel_unpause 1647 164717051001167435111316782_vararg_count0 165505107416763 166205110216773glk_set_hyperlink 1664 166417051118168035122016842_vararg_count0 167205118116823 167905120916833glk_set_hyperlink_stream 1681 168117051225168635134916902_vararg_count0 168905131016883 169605133816893glk_request_hyperlink_event 1698 169817051354169235147816962_vararg_count0 170605143916943 171305146716953glk_cancel_hyperlink_event 1715 171517051483169835160517022_vararg_count0 172305156617003 173005159417013glk_buffer_to_lower_case_uni 1732 173219051610170435177117082_vararg_count0ret4 174005172817063 174805175817073glk_buffer_to_upper_case_uni 1751 175119051776171035193717142_vararg_count0ret4 175905189417123 176705192417133glk_buffer_to_title_case_uni 1770 177019051942171635210917202_vararg_count0ret4 177805206617183 178605209617193glk_buffer_canon_decompose_uni 1789 178919052114172235227917262_vararg_count0ret4 179705223617243 180505226617253glk_buffer_canon_normalize_uni 1808 180819052284172835244917322_vararg_count0ret4 181605240617303 182405243617313glk_put_char_uni 1827 182717052454173435255417382_vararg_count0 183505251517363 184205254317373glk_put_string_uni 1844 184417052559174035266617442_vararg_count0 185205262717423 185905265517433glk_put_buffer_uni 1861 186117052671174635279017502_vararg_count0 186905275117483 187605277917493glk_put_char_stream_uni 1878 187817052795175235291717562_vararg_count0 188605287817543 189305290617553glk_put_string_stream_uni 1895 189517052922175835305117622_vararg_count0 190305301217603 191005304017613glk_put_buffer_stream_uni 1912 191217053056176435319717682_vararg_count0 192005315817663 192705318617673glk_get_char_stream_uni 1929 192919053202177035333317742_vararg_count0ret4 193705329017723 194505332017733glk_get_buffer_stream_uni 1948 194819053338177635349517802_vararg_count0ret4 195605345217783 196405348217793glk_get_line_stream_uni 1967 196719053500178235365317862_vararg_count0ret4 197505361017843 198305364017853glk_stream_open_file_uni 1986 198619053658178835380717922_vararg_count0ret4 199405376417903 200205379417913glk_stream_open_memory_uni 2005 200519053812179435397717982_vararg_count0ret4 201305393417963 202105396417973glk_stream_open_resource_uni 2024 202419053982180035413018042_vararg_count0ret4 203205408718023 204005411718033glk_request_char_event_uni 2043 204317054135180635425718102_vararg_count0 205105421818083 205805424618093glk_request_line_event_uni 2060 206017054262181235441118162_vararg_count0 206805437218143 207505440018153glk_set_echo_line_event 2077 207717054416181835453818222_vararg_count0 208505449918203 209205452718213glk_set_terminators_line_event 2094 209417054543182435469418282_vararg_count0 210205465518263 210905468318273glk_current_time 2111 211117054699183035481218342_vararg_count0 211905477318323 212605480118333glk_current_simple_time 2128 212819054817183635494618402_vararg_count0ret4 213605490318383 214405493318393glk_time_to_date_utc 2147 214717054951184235511518462_vararg_count0 215505507618443 216205510418453glk_time_to_date_local 2164 216417055120184835528818522_vararg_count0 217205524918503 217905527718513glk_simple_time_to_date_utc 2181 218117055293185435546318582_vararg_count0 218905542418563 219605545218573glk_simple_time_to_date_local 2198 219817055468186035564218642_vararg_count0 220605560318623 221305563118633glk_date_to_time_utc 2215 221517055647186635581118702_vararg_count0 222305577218683 223005580018693glk_date_to_time_local 2232 223217055816187235598418762_vararg_count0 224005594518743 224705597318753glk_date_to_simple_time_utc 2249 224919055989187835616918822_vararg_count0ret4 225705612618803 226505615618813glk_date_to_simple_time_local 2268 226819056174188435635818882_vararg_count0ret4 227605631518863 228405634518873GG_MAINWIN_ROCK 20105649518951056521189536GG_STATUSWIN_ROCK 20205653218961056558189636GG_QUOTEWIN_ROCK 20305656918971056595189736GG_SAVESTR_ROCK 30105660618981056632189836GG_SCRIPTSTR_ROCK 30205664318991056669189936GG_COMMANDWSTR_ROCK 30305668019001056706190036GG_COMMANDRSTR_ROCK 30405671719011056743190136GG_SCRIPTFREF_ROCK 40105675419021056780190236GG_FOREGROUNDCHAN_ROCK 41005679119031056817190336GG_BACKGROUNDCHAN_ROCK 41105682819041056854190436HandleGlkEvent 2287 228710057006191125dummy10dummy24 229505698219111IdentifyGlkObject 2297 229710057033191225dummy10dummy24dummy38dummy412 230505700919121InitGlkWindow 2307 230710057060191325dummy10 231505703619131VM_PreInitialise 2317 231744057197192035751619302res0 232205722319215 232905728319225 2333057297192219 233505735919242 233805738819252 235005742719263 235405750019295 235805751519301VM_Initialise 2361 2361329057521193236011020022res0sty4i8 236605755019335 237305761019345 2377057624193419 237905794319415 238605810319462 239805814219473 240305817319484 241505824019493 242005827119504 243205848119605 244105850919615 2445058523196119 244805861519655 245305867919679 246405872519689 246805878519704 248705893019724 250605901119734 2526059102197413 254905919019769 2554059211197630 255905934619799 256905938719825 257405942019839 258505946819849 2589059496198513 259505954019869 2598059547198616 260405957919875 2624059568198637 2633059660198813 266105998519965 267106001819985 268006009220015 268706010920021GGRecoverObjects 2690 2690544060115200436262520772id0 269506039120095 269906041120105 270306043320115 270706045420125 271106047720135 271506049920145 271906051920155 272306054620165 272706057320175 273106061820195 273506064120205 273906075020235 274706077720255 276006082320265 276506084420279 2782060901202830 2797060949202932 2812061027203134 2817061080203234 2831061141203334 2836061194203434 2844061270203622 286806133520389 288606138920415 289906143520425 290306145620439 2920061513204430 2935061561204532 2950061610204631 2958061649204722 298106171420499 299806176820525 301106181520535 301506183620549 3032061896205533 3040061937205622 306406200220589 308106205420612 309406209320623 310706213920633 311106215520644 3128062211206529 3143062263206629 3151062300206714 317506235520694 319206240620713 3197062436207133 320706247820723 3212062508207233 322206260220765 323106262420771ENABLE_GLULX_ACCEL_R 3234 3234156062769208436331921072addr0res4 323906280120852 324506282020862 3249062834208616 325206284320872 325906286720882 326306288820892 326906292120902 327706294320912 328506296620922 329306299020932 330106301320942 331006305820952 331506307920962 332006311020972 332706313120982 333206315220992 334006317721002 334806320021012 335606322221022 336406324421032 337206326621042 338006328821052 338806331021062VM_Describe_Release 3390 339064063458211436362421202i0 339506348221152 340106350121162 340606353121172 340906354121182 341506357421197 3418063580211913 3424063591211924 3442063586211919 345106362321201VM_KeyChar 3454 3454676063763212736658022082win0nostat4done8res12ix16jx20ch24 345906380821285 346306384821295 3467063862212919 347206388421305 348406394921319 350106401821329 3505064047213313 3515064095213413 3519064126213513 3527064272213913 3591064306213947 3597064333214013 3605064368214113 3612064402214217 3615064432214322 3619064439214329 3626064477214421 3672064520214521 3684064574214625 3690064617214725 3703064666214828 3715064720214925 3721064763215025 3738064815215128 3750064869215225 3756064912215325 3770064449214339 3780065000215710 378406503821605 378706505621615 379606508921625 380106511421639 381306514421649 3829065210216613 3833065240216717 3842065284216817 3849065317216917 3853065346217017 3856065379217213 3872065441217413 3885065484217517 3894065520217617 389806556921799 391706562521809 3923065652218113 3931065688218213 3938065716218316 3944065731218331 395106575521855 396306582021869 3989065885218713 4000065938218813 4003065960218913 4007065987219018 4010065994219025 4016066025219117 4022066060219217 4028066093219317 4034066124219417 4044066148219441 4048066174219517 4052066206219621 4063066230219645 4072066289219745 4082066331219821 4093066001219032 4105066432220213 411606649122049 412706656722075VM_KeyDelay 4130 4130148066585221036711722282tenths0key4done8ix12 413506662222115 414506666222125 415806670422135 416206672922149 417406675922159 419306681522169 4199066842221713 4207066878221813 4214066914222014 4241066967222113 4250066999222213 425706703222255 426706707122265 427506710422275VM_ReadKeyboard 4278 4278372067122223036897622832a_buffer0a_table4done8ix12 428306716922315 429506723422329 431406734422349 4318067373223513 4328067421223613 4332067452223713 4339067557224113 4362067598224154 4368067625224213 4379067658224313 4388067693224413 4402067746224513 4410067782224613 4416067805224713 442006784222505 442306786022515 444606794922525 445106797422539 446306800422549 4479068070225613 4495068132225813 4509068182225917 4527068227226017 453106827222639 454606832422649 4552068337226422 4559068363226514 4565068377226528 457206840122675 458206846622689 460706854522699 461806862022725 462806871422745 463306874122759 464306878322769 464706897522831VM_CopyBuffer 4650 465048069117229036920322922bto0bfrom4i8 4655069153229110 4658069158229115 4665069183229140 4686069178229135 469506920222921VM_PrintToBuffer 4698 4698313069208229436983923102buf0len4a8b12c16 470306924422955 470806926122969 4766069361229813 480406942522998 482106945723004 4859069543230213 4894069616230410 491106965323059 494906972523073 497506978423085 4989069803230824 500006982223095VM_Tokenise 5011 5011471069844231237132923572buf0tab4cx8numwords12len16bx20ix24wx28wpos32wlen36val40res44dictlen48entrylen52 501606993323145 502606995223155 503207011223205 503507012423215 503807014223225 504507016923239 5066070204232344 507507021823249 5081070233232424 508507024823259 508907026523269 5120070299232643 5129070332232813 5172070388232869 518107041223309 520507045223319 522907049623329 523507051623339 5241070550233343 524807056723355 525907064323395 527207068023405 5276070721234210 5279070728234217 528607075823439 530507078923449 532407093723489 5330070964234836 533407099523499 5340071030235014 5343071037235021 5349071053235037 5385071047235031 5394071121235116 5400071147235142 5414071141235136 542307117723539 543207122123549 544907130023559 5469070742234231 547907132823571LTI_Insert 5482 5482146071334235937186123762i0ch4b8y12 548707145523635 549407158323675 550407159823685 5511071624236831 5516071708237110 5522071723237125 5528071734237136 5553071729237131 556207175523725 557407181923755 5589071849237535 562507186023761VM_InvalidDictionaryAddress 5628 562812072006238337207223862addr0 563307204123842 563807206323852VM_DictionaryAddressToNumber 5640 564080720772388372120238846w0 5645072109238835VM_NumberToDictionaryAddress 5648 564880721242389372167238946n0 5653072156238935gg_tokenbuf 50839891false0721702391172205239136GGWordCompare 5656 565656072210239337237623992str10str24ix8jx12 5661072250239410 5664072257239417 567007229323959 569407233123969 5698072344239622 5701072277239437 571007236523985DebugAction 5712 5712135072531240737285224152a0str4 571707255424085 5724072571240822 5744072607240858 574707262124095 5770072663240947 578807271624119 580207275424129 581307277724139 5817072786241318 5829072811241343 584407285124151DebugAttribute 5847 584793072857241737311424242a0str4 585207288324185 5863072919241841 588107297524209 589507301324219 590607303624229 5910073045242218 5922073070242243 593707311324241VM_CommandTableAddress 5940 594024073261243237332224342i0 594507328824332VM_PrintCommandWords 5964 596495073327243637363124442i0wd4j8dictlen12entrylen16 596907337724375 598207341424385 5986073454243910 5989073460243916 599507348724409 601207354324419 6026073593244213 6047073472243928 605607363024441VM_Seed_RNG 6059 605912073779245137381024532n0 606407379524522 606807380924531VM_AllocateMemory 6071 607126073952246037405124652amount0i4 607607398124612 608207399824622 6086074010246214 608907402124632 609407404024642VM_FreeMemory 6097 609725074056246737413724712address0i4 610207408224682 610807409924692 6112074111246914 611507412024702 611907413624711VM_Picture 6122 612258074283247837448624842resource_ID0 612707430824792 613907435024803 616207443124823 617707448524841VM_SoundEffect 6180 618049074491248637468224922resource_ID0 618507452024872 619707455924883 621107462224903 622607468124921VM_Style 6229 6229134074817249937519725092sty0 623407483225002 6243074867250121 6261074916250221 6279074965250321 6297075017250421 6315075064250521 6333075112250621 6351075165250721 636007519625091VM_UpperToLowerCase 6363 6363160753382516375391251656c0 6368075361251626VM_LowerToUpperCase 6379 6379160753952517375448251756c0 6384075418251726Glulx_PrintAnything 6395 6395165076146253437711025712_vararg_count0obj4mclass8 640307619625355 6407076220253529 641007623225365 641307625025375 641907627125385 6423076285253819 642607629825405 644007641025429 644907643925439 645207645825465 646207648725475 647107652825499 648307655825519 649207658625529 650407671025569 650907674525579 652107677525599 6525076813256013 6537076992256513 6540077018256613 6546077047256713 655407709525699 655707710925711Glulx_PrintAnyToArray 6560 6560100077115257337762425932_vararg_count0arr4arrlen8str12oldstr16len20 656807718225745 657107720025755 657407722125765 658007726125785 658807730025795 660807735325805 6612077367258019 661407738225825 662307741625845 663107746425865 664007750025875 664307752425885 664607754225895 665207757725905 665507759525915 665707761125925GG_ANYTOSTRING_LEN 6607763625951077657259531AnyToStrArr 508407671false0776592596177700259642Glulx_ChangeAnyToCString 6660 6660123077705259837805926102_vararg_count0ix4len8 666807775625995 667207778726005 667507780426015 668407782826025 668707784526035 669307787126045 670207791126055 671107793726065 671707797626079 672107800826085 677707803826095VM_ClearScreen 6783 678374078194261737850426262window0 678807822126185 679907826626199 680907830426209 6814078335262113 6824078381262213 682807841826255 6844078471262558 685407850326261VM_ScreenWidth 6857 685748078509262837868626332id0 686207853326295 686707855226305 6877078591263044 688207861426315 689607866026325VM_ScreenHeight 6905 690527078691263537879226382 690807871226365 692307876626375VM_SetWindowColours 6932 6932331078931264538051226862f0b4window8doclear12i16fwd20bwd24swin28 693707899126465 695307902326479 6957079035264721 696307909626499 697307912926509 6983079167265114 6986079173265120 6992079211265213 7004079293265317 7016079360265417 7031079448265617 7051079518265717 7071079192265139 708007965826629 7085079676266227 709507971926639 709907974626659 7123079825266613 7133079870266713 7156079958266813 7161079997266917 717308007026729 720108023226759 7211080271267548 7221080305267582 722808033126779 7234080362267813 7239080392267913 724408042826819 7250080459268213 7255080483268313 726008051126861VM_RestoreWindowColours 7263 726354080517268838082726942 726608058926895 727108064026909 728508073626919 730708080226929 731408082626941MakeColourWord 7317 731784080832269638095127002c0 732208085426975 7328080865269716 733108087926985 733708089226995VM_MainWindow 7401 740120081087270738117327102 740408110627085 741408115127095 741808117227101VM_StatusLineHeight 7421 742157081309271738152327222hgt0 742608133827185 7431081361271828 743408137327195 7441081403271935 744408141527205 747008149727215 747508152227221VM_MoveCursorInStatusLine 7478 747864081528272438176727302line0column4 748308157127255 7488081594272528 749108160627265 750108164027275 7505081657272722 7509081667272732 751308168527285 753408174527295 753908176627301Box__Routine 7542 7542230081907273738282027682maxwid0arr4ix8lines12lastnl16parwin20 754708195927385 755008200127395 756008202327415 756508205527429 757308208927439 758408213527449 7588082160274513 761808233127499 762908238427509 764808244627535 765208246527545 765708249227559 766708253127569 767708256827579 768008259227602 7689082629276110 7692082636276117 769808266327629 772008270027639 7734082728276337 7737082647276128 774608274527652 775408277427675 7759082791276722 776908281927681GlkListSub 7772 7772453082974277638437028162id0val4 777708299727775 779008304327785 779508306427799 782508312427809 783508316327819 7845083191278214 7860083218278314 7875083246278414 7890083279278514 7905083310278614 7914083347278720 792008338227899 793008342327909 7934083432279018 7946083483279118 795208351927929 796208356027939 797108359227949 798108363827959 7985083647279518 799408368427969 800008370327979 801808375627995 803108380228005 803508382328019 806508388228029 808208393528045 809508398228055 809908400328069 812908406328079 814608411728095 815808416228109 817108421428119 8175084239281213 8205084308281313 822208436928161grammar line 599993 5999970843982820584452282059VM_Undo 8225 822523084589282838466328312result_code0 823008461128292 823408463828302VM_Save_Undo 8248 824839084668283338481128372result_code0 825308469828345 825708472528355 8263084750283530 8270084770283550 827308478628365QUIT_THE_GAME_R 8287 828743084954284438511028492 829008497228452 829508500228462 830608506128473 831508508528482 8325085103284820 832708510928491RESTART_THE_GAME_R 8330 833044085256285638540828632 833308527728572 833808530728582 834708533428592 835708535628603 835908536828613 8368085394286129 837108540728631RESTORE_THE_GAME_R 8374 837496085554287038594828822res0fref4 837908558428712 838408561428722 839608566528732 8400085680287317 840308569528742 841808575928752 842708578728762 8432085808287623 843508582328772 844108584928782 845108588328792 845508591128812 8464085937288128 846708594728821SAVE_THE_GAME_R 8470 8470157086091288938685429112res0fref4 847508611828902 848008614828912 849208619928922 8496086214289217 849908622928932 851408629328942 852308632128952 8528086342289523 853108635728962 853708638028972 854308654529003 855008656729013 856008661729023 856408663529033 8573086661290329 857608667329043 857908668429062 858908673329072 859308675029082 8597086766290818 8606086789290841 8609086799290851 861208682029102 8621086843291025 862408685329111VERIFY_THE_STORY_FILE_R 8627 862748087005291838718829232res0 863208703529192 863708706529202 864108707929212 8645087095292118 8654087126292149 8657087136292159 866008714629222 8669087177292233 867208718729231SWITCH_TRANSCRIPT_ON_R 8675 8675130087338293038792729462 867808736329312 868308739329322 8688087418293227 8697087448293257 8700087458293267 870308746829332 870808749629343 872408757529353 8729087599293527 873208763829382 874808771529392 8753087738293925 875608775429402 876808780929412 8777087839294132 878008785029422 878708786529432 879008788629452 8799087916294532 880208792629461SWITCH_TRANSCRIPT_OFF_R 8805 880557088078295338832229592 880808810429542 881308813429552 8818088159295527 8827088190295558 8830088200295568 883308821029562 8842088241295633 884508825229572 885508830329582 885908832129591ANNOUNCE_STORY_FILE_VERSION_R 8862 8862271088479296638906029832ix0 886708851429672 887208854429682 887908855529692 888508859429707 8889088600297013 8901088627297040 8955088621297034 896408865729712 897008866929722 897608868729732 903308878029752 903808879829762 909508887329772 911908902129812 912608904729822 913008905929831DESCEND_TO_SPECIFIC_ACTION_R 9133 913327089216299038929529932 913608924729912 915708928729922Unsigned__Compare 9160 916025089426300038954130082x0y4 916508945030012 917108947030022 917408949130042 918008950930052 918308953030072RT__ChLDW 9185 918512089546301038959130132x0y4 919008956230112 919508957830122RT__ChLDB 9197 919712089596301538964230182x0y4 920208961230162 920708962930172AGAIN1__WD 6030040108662377010108686377034AGAIN2__WD 6043640108697377110108719377132AGAIN3__WD 6030040108730377210108754377234OOPS1__WD 6056120108765377310108788377333OOPS2__WD 6054840108799377410108821377432OOPS3__WD 6056120108832377510108855377533UNDO1__WD 6079320108866377610108889377633UNDO2__WD 6079320108900377710108923377733UNDO3__WD 6079320108934377810108957377833ALL1__WD 6030360108969378010108991378032ALL2__WD 6039000109002378110109025378133ALL3__WD 6040440109036378210109060378234ALL4__WD 6040600109071378310109100378339ALL5__WD 6032760109111378410109134378433AND1__WD 6031000109145378510109167378532AND2__WD 6031000109178378610109200378632AND3__WD 6031000109211378710109233378732BUT1__WD 6033400109244378810109266378832BUT2__WD 6040920109277378910109302378935BUT3__WD 6033400109313379010109335379032ME1__WD 6050520109346379110109367379131ME2__WD 6051960109378379210109403379235ME3__WD 6064920109414379310109437379333OF1__WD 6055160109448379410109469379431OF2__WD 6055160109480379510109501379531OF3__WD 6055160109512379610109533379631OF4__WD 6055160109544379710109565379731OTHER1__WD 6031160109576379810109602379836OTHER2__WD 6056440109613379910109637379934OTHER3__WD 6056440109648380010109672380034THEN1__WD 6072920109683380110109706380133THEN2__WD 6072920109717380210109740380233THEN3__WD 6072920109751380310109774380333NO1__WD 6052120109786380510109808380532NO2__WD 6053080109819380610109840380631NO3__WD 6053080109851380710109872380731YES1__WD 6083000109883380810109905380832YES2__WD 6083160109916380910109938380932YES3__WD 6083160109949381010109971381032AMUSING__WD 250109983381210110009381236FULLSCORE1__WD 260110020381310110048381338FULLSCORE2__WD 270110059381410110082381433QUIT1__WD 280110093381510110115381532QUIT2__WD 290110126381610110149381633RESTART__WD 300110160381710110186381736RESTORE__WD 310110197381810110223381836LanguagePronouns 508474524true011035738251110789383653LanguageDescriptors 5085262604true011092638431111986386653LanguageNumbers 5087862444true01121193873111255738811LanguageNumber 9209 920973401125623883311423839422n0f4 9214011258638845 92180112603388422 92240112617388436 9226011263138855 92310112648388522 92370112664388538 9241011270338875 9250011273438889 92560112746388821 9262011276338896 92840112812388955 92930112830388973 9297011284738915 9306011287538929 93120112887389221 9318011290438936 93400112950389352 93490112965389367 9353011299038965 9360011301538979 93660113027389721 9372011304438986 93920113088389850 93990113100389862 9403011311739005 9409011314239019 94150113154390121 9421011317439029 94400113216390251 94460113227390262 9450011324439045 9453011333039085 94590113342390817 9465011337339105 94750113398391113 94910113423391213 95070113448391313 95230113475391413 95390113501391513 95550113527391613 95710113552391713 95870113579391813 96030113606391913 96190113632392013 96350113657392113 96510113685392213 96670113713392313 96830113743392413 96990113773392513 97150113802392613 97310113831392713 97470113862392813 97630113892392913 97870113926393017 98010113954393113 98170113982393213 98320114010393313 98470114037393413 98620114064393513 98770114091393613 98920114120393713 99070114148393813 9913011418239409 99210114197394024 9940011423739421LanguageTimeOfDay 9943 99438101143703949311456339552hours0mins4i8 9948011440639505 9954011442439515 99580114436395117 9962011444839525 99680114460395217 9974011447539535 9997011451139545 100060114531395425 100150114549395443 10021011456239551LanguageDirection 10024 100241701147013962311474039642d0 10029011472339632 10038011473939641LanguageToInformese 10041 100416011487939713114901397125 100440114900397124LanguageAnimateGender 230115044397810115074397840LanguageInanimateGender 250115085397910115117397942LanguageContractionForms 20115129398110115157398138LanguageContraction 10047 100478201153313985311548539892text0 10052011536139865 101240115460398753 10127011547439885LanguageArticles 509030484false011548839911115736399751LanguageGNAsToArticles 509078484false011591640031115972400357LanguageVerb 10129 1012910401161084010311634240202i0 10134011612840115 101650116187401316 101830116226401416 102010116255401516 102190116287401616 102280116316401716 10230011633440195LanguageVerbLikesAdverb 10233 102334301163474022311645140262w0 10238011637840235 10274011644240255LanguageVerbMayBeName 10276 102766101164564028311658740322w0 10281011648540295 10335011657840315OffersLight 10337 1033739201170574054311739940652obj0j4 10342011708040555 10347011709640563 10381011712440573 104430117146405725 10527011717840583 10627011726040593 10653011732640604 10667011736440624 10727011739040645HasLightSource 10729 1072945701174044067311822840902i0j4ad8sr12po16 10734011743440682 10737011745840695 10771011748640705 10797011754640719 108590117578407213 10943011761240735 10954011763840745 11018011767940759 110430117727407613 110470117740407626 110520117766407713 110570117785407732 110620117814407813 110670117851407850 110710117879407913 110810117921408013 110860117940408032 110910117969408113 110950117983408127 111050118050408418 111080118056408424 111270118108408517 111630118087408455 11172011818240885 11184011821940895ComponentHasLight 11186 1118612401182334092311855641042o0obj4next_obj8 11191011826840932 11204011830440943 11215011833140953 11219011834840964 11230011838540974 11264011841440984 11276011844940994 11301011852341004 11308011854741032HidesLightSource 11310 1131023101185614106311878441122obj0 11315011858741075 11320011861841085 11386011866841095 11419011870141105 114530118724411028 11497011875341115lightflag 497504011891641191118940411925ADJUST_LIGHT_R 11541 1154120901190824126311997641582previous_light_condition0 11546011912741275 11551011916941285 11616011921541305 11625011928741316 11632011931241326 11634011933141355 11645011940541369 11649011943941379 11658011949341389 11660011951241415 11671011958641429 11678011960841433 11685011963441443 11694011968241453 11706011974441464 117150119766414626 11718011978241483 11727011982841493 11729011984741525 11742011991741536 11746011994841546 11748011996741575SilentlyConsiderLight 11750 117508901201274165312027241692 11753012015441665 11818012019641672 118230120211416717 118300120242416748 11837012026341682IsSeeThrough 11839 1183917701204094176312058741832obj0 11844012043141775 12014012057841824VisibilityParent 12016 1201613101207294190312089241942o0 12021012075341915 121280120824419176 12130012084141922 12134012084841929 12144012088141935FindVisibilityLevels 12147 121476801210394201312135142152lc0up4 12152012106842022 12161012109742033 12168012112942043 12174012116542063 12178012121442084 12188012126042094 121920121273420917 12195012128342104 12199012131142114 12208012132342133 12212012135042151TouchabilityCeiling 12215 122158501214964222312177942332original0o4p8 12220012153142232 12224012154642242 12228012156342256 12238012159742266 122540121620422629 12257012163542276 122610121653422724 12264012166842286 12287012174242297 12290012175742306 12297012176842322ScopeCeiling 12300 1230011701219174240312210542462pos0c4 12305012193842412 123200121980424144 12326012199742422 12382012201542432 123860122027424314 12389012204042442 124010122068424430 12414012209442452ObjectIsUntouchable 12417 1241721301222514253312299442762item0silent_flag4p8save_sp12decision16moving20x24 12422012231842542 12436012236342558 124490122384425529 124590122381425526 12463012241842564 12495012246242575 12499012248142585 12516012252142595 12522012254142632 125270122568426329 12532012260442642 125370122623426421 125430122639426437 12547012265942652 125510122677426520 12554012269042662 125570122703426615 12561012271542672 12575012276642683 125850122791426828 12591012281642698 12598012284142709 12601012286042712 12604012287442722 126080122895427223 12612012291442732 126160122926427314 12623012295042742 12627012297642752ACCESS_THROUGH_BARRIERS_R 12630 1263063901231474283312484643402ancestor0i4j8external12p16 12635012319942842 126400123218428421 126440123230428433 12648012324342862 12660012329442872 12722012343442893 12727012346342904 12738012352642915 12749012358342925 12752012360442953 12759012362342963 12762012369343012 12777012372443023 128380123747430226 128480123762430241 12851012378243033 128570123796430317 128610123803430324 12865012382443043 12877012385443054 12904012397343084 129650123996430827 12968012401743094 12984012405543105 12994012407443115 130000124088431119 130040124095431126 13012012418543182 13028012428043203 13039012442743233 130950124442432318 13098012446243243 13110012449243254 13137012461043284 13147012462843294 131530124647432923 13156012465743304 132120124672433019 13215012469343314 13231012473143325 13241012475043335 132470124764433319 132510124771433326 13259012480443382 13266012483843392CANT_REACH_INSIDE_CLOSED_R 13269 1326911201250124347312531543582 13272012504143482 13340012511043493 13345012513943504 13356012520243515 13366012525743525 13369012527843553 133760125295435520 13379012530643572CANT_REACH_OUTSIDE_CLOSED_R 13381 1338111201254824365312578743762 13384012551243662 13452012558143673 13457012561043684 13468012567343695 13478012572943705 13481012575043733 134880125767437320 13491012577843752CANT_REACH_INSIDE_ROOMS_R 13493 134936401259414383312623343942 13496012596943842 13516012602943853 13521012605843864 13532012612143875 13542012617543885 13545012619643913 135520126213439120 13555012622443932REQUISITION_STACK_SIZE 840126515440710126544440739requisition_stack 5091263364false012654644081126596440851requisition_stack_pointer 497508012659844091126634440937RequisitionStack 13557 135574201266394411312695044182len0top4addr8 13562012667144122 13569012671144132 135750126745441336 13577012676044142 13591012690244162 13596012693644172FreeStack 13599 135992901269554420312706244232addr0 13604012697244212 136080126987442117 13611012699644222 13625012706144231MarkedObjectArray 497512012721444301127242443029MarkedObjectLength 497516012724444311127273443130WriteListOfMarkedObjects 13628 1362877301272784433312870544762style0obj4common_parent8first12mixed_parentage16length20g24gc28 13633012736544362 13637012737544372 13644012737544372 13697012743244383 13703012744444393 137070127468443927 137110127481443940 137700127521444010 138300127555444044 13834012758344413 138440127608444128 13850012761944423 138560127633444217 13863012764844438 138690127661444321 13884012767444452 138880127695444523 13891012772244472 13895012774644486 139040127774444834 139160127814444911 139250127846444943 13937012788344508 13950012792544523 139540127950445228 13958012797844533 13969012802644543 13974012805744553 139790128085445531 13990012813444573 13995012815844584 14058012820344594 14061012821844604 14124012827644615 141580128299446128 14255012834944634 14258012836444644 14265012836444644 14281012842244655 143150128445446528 14346012848844683 14370012855044703 14380012858244713 143840128608447129 14388012863744732 14393012866544742 14398012869644752RegardingMarkedObjects 14401 1440115301288574483312925244982obj0length4g8gc12 14406012889944852 14410012890944862 14417012890944862 14467012896644873 14473012897844883 144830129003448828 14489012901444893 14495012903344904 14499012904444914 145070129077449210 145130129090449223 14528012910344942 14533012913144952 14538012916244962 145420129181449621 145460129209449649 14551012924244972RegardingSingleObject 14554 145542301292574500312936445042obj0 14559012928545012 14564012930845022 14569012933945032 14574012936345041RegardingNumber 14577 145772201293694506312947245102n0 14582012938945072 14587012941245082 14592012944345092 14596012947145101PNToVP 14599 145995901294774512312968145172gna0 14604012949045132 146110129522451334 14615012954745142 146200129569451424 14631012961045152 146520129659451551 14655012967045162PrintVerbAsValue 14658 146583301296864519312977345222vb0 14663012970845202 146670129721452015 14676012974845219 146820129763452124 14688012977245221VerbIsMeaningful 14691 146913501297784524312988345272vb0 14696012980045252 14724012987445262VerbIsModal 14726 147262301298884529312995045322vb0 14731012990545302 14747012994145312LWI_Storage 509462124false013010445391130140453937SetLWI 14749 147493401301444540313022545442a0b4c8 14754013015945412 14762013018145422 14771013020345432 14780013022445441RegardingLWI 14783 147833501302294545313036245492 14786013024445462 14795013028145472 14805013032545482 14815013036145491ResponseViaActivity 14818 148185001305094556313077145612R0 14823013053345572 148270130557455726 148310130581455750 14835013061345582 14843013064645592 14853013069145602 148570130722456033 148610130746456057 14865013077045611SEEK_ITF 00130932456810130944456822ADVANCE_ITF 10130955456910130970456925COALESCE_ITF 20130981457010130997457026START_ITF 30131008457110131021457123MarkedListIterator 14868 1486827501312514580313210646032obj0depth4required_lt8function12i16 14873013130845815 148770131328458125 14879013134845825 148830131370458227 14890013140345832 149000131438458417 149180131487458520 14939013155245879 149420131557458714 14950013158845885 14967013162945896 149730131658458935 149790131674459012 14987013170945917 14999013174445927 150370131858459359 15040013187445947 15088013194945958 15091013196545967 151130132023459665 15116013203945977 151190131696459034 15129013206345996 151310131579458736 15141013208946022ConcealedFromLists 15143 1514318001322474610313244546152obj0c4 15148013227446112 15216013232846122 15272013234646132 15321013243646142MarkedListCoalesce 15323 1532330701325954622313367646462o0i4lt8l12swap16m20 15328013263746237 153310132642462312 15339013267346243 15360013271946253 15377013285546279 153830132860462714 154220132952462867 15431013303846304 154380133067463033 15450013318846329 154560133195463216 15464013322646335 15496013337446356 155080133414463611 155120133419463616 155180133429463626 155450133424463621 15554013348546376 15567013355446396 15573013356446406 155800133593464035 155920133217463238 15602013363246424 156080132664462334 15618013364546452list_filter_routine 497520013382446531133850465327ObjectTreeIterator 15630 1563050101338554655313484846712obj0depth4required_lt8function12 15635013391046565 156970133960465655 15699013397746572 157060134004465729 15813013403146582 158190134061465832 15830013409746595 158360134126465934 15892013415046605 158960134172466027 159060134216466113 15962013424646629 159660134266466229 15968013451046643 160060134620466555 16009013463246663 160570134700466671 16061013471246673 160950134747466738 16099013475946683 161210134817466861 16125013482946693 16128013484746711ObjectTreeCoalesce 16131 1613147301349984678313597947002obj0memb4lt8later12 16136013512646817 161430135151468132 161990135136468117 16204013517546823 16215013520246833 16232013533846859 162910135415468658 16347013536246865 16376013551846884 163800135533468819 16383013563646909 164420135664469037 164980135657469030 16502013569046915 16524013582046936 16589013593546956 16601013596646992WriteListFrom 16604 1660437601362674712313728647412first0style4depth8noactivity12iter16a20ol24 16609013632247132 166130136340471320 166170136355471335 166210136370471350 16625013639047145 166290136400471415 166370136424471439 16645013646147155 166500136478471522 16655013649647162 166590136510471616 166680136539471645 16673013655547182 16680013655547182 16696013658947193 16710013661947203 16725013668647214 16749013672347245 16767013677247252 16771013679847263 167800136826472631 167920136869472714 16801013690747289 168090136937472839 16816013696247303 16824013699547314 16837013703247324 16845013705847344 16852013705847344 16865013710147355 16897013715447364 16961013722147405 169650137237474021 169690137252474036 169730137267474051 16977013728547411STANDARD_CONTENTS_LISTING_R 16980 169808001374464748313754047502 16983013747647492 17057013753947501PartitionList 17060 1706030501384454777313940948002first0no_objs4depth8partition_classes12partition_class_sizes16i20k24l28n32m36 170650138540477910 170680138545477915 170740138561477931 170850138556477926 17094013859147805 170980138607478110 171080138632478135 171340138621478124 17141013869247829 171550138737478313 171670138763478339 171790138810478418 172080138913478614 172340138877478514 172440138983478717 172700139059478821 172860139095478857 173230139145478921 173390139215479213 173460139228479226 17356013924747945 17362013939847995ListEqual 17365 1736569401395594807314024948232o10o24 17370013957748082 17394013962948093 17463013968448105 17532013973948115 17543013979748129 17677013988348139 17811013997348149 178470140009481513 178790140053481613 180140140170481914 18047014022248225WillRecurs 18059 1805916001402544825314045548302o0 18064014027248265 18073014031448275 18081014035848285 18217014044648295NumberOfGroupsInList 18219 1821916601405934837314145048592o0no_classes4depth8partition_classes12partition_class_sizes16no_groups20cl24memb28k32current_lt36lt40 18224014071048392 18231014074248402 18238014076648412 182420140799484210 182530140818484229 18260014090048449 182750140949484513 182810140954484518 18304014102748479 183080141097484810 183190141131484910 183620141289485214 183680141328485413 183720140834484245 18382014143148582LT_Compare 18385 1838511401414554861314180748732lt10lt24 18390014147648622 183960141492486218 18398014150348632 184020141517486316 18409014154248642 184130141556486416 18420014158148652 18432014162648663 184440141667486644 18469014169748673 18472014171248692 18484014175748703 18487014177248722WriteListR 18499 1849974201419594880314532649712o0depth4from_start8partition_classes12partition_class_sizes16cl20memb24index28k232l36m40no_classes44q48groups_to_do52current_lt56 18504014209448835 185080142112488323 18511014215248855 18515014217548866 18533014226248885 18550014233948895 185540142357488923 185570142407489210 185670142430489233 185870142424489227 185910142483489286 18600014249748945 18610014253448956 18622014256148966 18632014259948976 186410142633489740 186500142687489843 18659014271348999 18668014275549025 18686014281749035 18704014288349045 18712014295049056 18723014299749072 18747014308849102 187710143201491310 187890143253491362 18795014333649159 188100143386491610 188160143395491619 188360143460491713 188400143475491728 188460143514491767 18852014391449283 189000144035492967 189110144087493113 189330144140493166 189370144229493413 189410144261493513 189450144271493523 189500144289493541 189540144300493552 18958014431149364 18996014440249385 19002014441149395 19017014445249406 190230144457494011 19046014451649425 19077014457949436 19089014460449464 19096014469149485 19116014475749495 19127014479449505 19130014482249524 19137014485649534 19141014488349563 19168014497149593 19174014499549609 191830145041496113 191890145146496316 191980145202496513 192040145224496535 192100143269491378 19220014525749695 19229014529549705 19238014532549711WriteMultiClassGroup 19241 1924143001455024978314740250342cl0memb4depth8partition_class_sizes12pv16q20k224l28 19246014564149802 19251014565549812 192600145686498133 19278014572149832 19288014576749852 19301014581749863 19313014586349883 19324014589049893 19336014593549904 19341014595949914 193460145978499123 19354014601249924 193720146033499225 193790146063499310 19383014613449954 19386014615049969 193890146156499615 193960146178499637 194150146173499632 19424014622249974 194330146241499723 19439014625549984 19448014628249994 194570146314499936 19463014632950004 194720146361500036 19478014638050033 19486014639450043 194900146410500419 194940146434500443 19498014645950063 195100146490500634 19515014665950093 19526014677750123 195300146797501223 195340146821501247 19538014683950133 19546014685650153 19557014688350163 19569014692850174 19574014695250184 195790146971501823 19587014700350194 196030147024502010 19619014707250214 196270147098502130 19633014713950262 19643014727150302 196600147327503058 19663014738850332 19668014740150341WriteSingleClassGroup 19671 1967133001475565041314846650702cl0memb4depth8size12q16 19676014760150422 19681014761850435 196900147644504331 19708014767850442 19715014769750453 197250147731504537 19737014776250474 19747014779450485 197630147838504849 197750147865504910 19787014789950515 198030147943505149 198150147976505210 19827014801350563 19837014804450574 198530148088505748 19867014812950589 19879014816850603 198830148188506023 19888014821150613 19898014826350623 19902014828750642 19942014833450653 19956014835850663 19966014839050673 19983014842150689 19993014845250692 19998014846550701WriteAfterEntry 20001 20001199001486135077315299051902o0depth4p8recurse_flag12parenth_flag16eldest_child20child_count24combo28 20006014870650805 20011014873150815 20022014876850829 20032014882650839 20046014889250844 20049014890650854 201170148947508545 20123014896550864 201910149006508645 20197014902450874 203590149124508842 20365014914250894 203690149153508915 20378014921150904 20388014923550918 20408014927550928 20427014931550938 20446014935550948 20465014939550958 20484014943550968 20503014947550978 20513014951650994 205170149527509915 20526014958551019 20536014967851045 20546014971551059 20556014977351069 20570014983951074 206380149872510737 206470149902510767 2065701499365107101 20665014997351095 206990150002510934 207080150032510964 207180150066510998 20722015009351105 207560150122511034 207650150152511064 207750150185511097 20779015021851134 20815015024351145 20851015027051156 20855015034251177 208670150395511824 20877015043351196 20911015045551207 209690150469512021 209820150522512121 20995015057151237 210630150607512343 210760150682512443 21086015072051256 21094015076151286 21186015080551297 211900150825512927 211990150855512957 212110150913513027 212200150943513057 212290150973513087 21238015101051324 212420151028513222 21251015107051349 21261015116051372 21264015117851382 21267015120351392 21330015122551403 21352015129851414 21386015133551425 21392015135451435 213960151383514334 21473015141151465 21486015146451479 214950151493514738 215010151504514749 215110151537514782 21517015155851489 21521015159451515 21536015164851529 215700151683515313 215790151728515417 215880151772515518 215980151822515618 216110151878515724 216210151937515913 21625015197651619 217290152048516213 217380152093516317 217470152137516418 217570152187516518 217700152243516624 217800152302516813 21784015234451725 21797015239651736 21809015244051746 218190152473517439 21825015249251775 218340152519517732 21837015253451795 21842015256251809 21898015258451819 219020152600518125 219060152624518149 21910015265251829 21914015267851839 21922015271951849 219300152748518438 219340152770518460 21938015279651859 21954015283451869 21958015286051879 219620152880518729 219660152904518753 21970015292851889 219790152953518834 21988015298951901LIST_WRITER_INTERNAL_R 21991 21991601531335197315315851982 21994015315751981SayPhraseName 21997 219973901533015205315339552082closure0 22002015332552062 220060153343520620 22015015336652077 22033015339452081KindAtomic 22036 220363001535295215315362252182kind0 22041015354752162 220520153590521645 22055015360452172KindBaseArity 22066 220663001536275220315372052232kind0 22071015364852212 220820153691522145 22084015370252222KindBaseTerm 22096 220963801537255225315383252282kind0n4 22101015374752262 221120153790522645 22118015381052272DigitToValue 22134 221342801539735235315404752392c0n4 22139015399252362 22145015400452372 221560154024523722 22159015403652382GenerateRandomNumber 22162 221625601541965246315431252512n0m4s8 22167015422552472 221730154235524712 22176015424652482 221820154257524813 221860154264524820 221900154271524827 22194015428152492 22200015428752502R_DecimalNumber 221020154323525210154361525248R_PrintTimeOfDay 221020154372525310154411525349GroupChildren 22218 2221865001545535260315490552702par0value4 22223015458252615 22282015461652629 223580154679526310 224280154729526510 22499015476652675 225720154794526733 22655015482552685 227280154853526833 22811015488552695PrintSpaces 22868 228682801550455277315512552822n0 22873015506452785 22878015508852799 22884015510752809 22893015512452821RunRoutines 22896 228964901552655289315542052932obj0prop4 22901015529152905 229100155311529025 22914015533652915 22933015540052925SwapWorkflags 22945 2294517801555625300315579553092obj0lst4 22950015558653012 22957015558653012 22974015562253023 22977015563753033 230110155660530326 23015015567453043 23029015569753053 230630155719530525 23077015574153063 23091015576353073 230950155772530712 23120015579453091NO_USE_OPTIONS 280155944531610155963531629TestUseOption 23123 231233701559675317315615453262UO0 23128015602453205 23134015604853215 23140015607253225 23146015609653235 23152015612053245 23158015614553255PrintUseOption 23160 2316044901561585327315761553602UO0 23165015621653305 231740156240533112 231900156279533212 232060156339533312 232220156393533412 232380156449533512 232540156516533612 232700156560533712 232860156600533812 233020156657533912 233180156714534012 233340156757534113 233500156803534213 233660156839534313 233820156878534413 233980156927534513 234140156982534613 234300157031534713 234460157075534813 234620157119534913 234780157173535013 234940157220535113 235100157267535213 235250157310535313 235400157359535413 235550157410535513 235700157457535613 235850157511535713 236000157563535813 23606015761453601IntegerDivide 23609 236095201577585368315784553712A0B4 23614015777853692 236180157792536916 236270157821536945 23629015783253702IntegerRemainder 23661 236615201579905378315808053812A0B4 23666015801353792 236700158027537916 236790158056537945 23681015806753802UnsignedCompare 23713 237132501582245388315856654052x0y4u8v12 23718015827253902 23724015829253912 23727015831353932 23733015833153942 23736015835253962SignedCompare 23738 237382501587095413315878654172x0y4 23743015872954142 237490158740541413 23752015875154152 237580158763541514 23760015877454162ZRegion 23763 237637201589225424315906354312addr0 23768015894054255 237850158978542612 238050159005542718 238170159026542812 238290159046542911 23832015906254311Memcpy 23835 238351501591985438315946754452to_addr0from_addr4size8n12 23840015941754435 23847015946654451Arrcpy 23850 2385013301596025452316003054622to_array0to_entry_size4from_array8from_entry_size12no_entries16n20val24 23855015967954532 23861015971954543 23880015978154557 23892015984254568 238950159849545615 23901015987354574 23912015989854584 239330159927545833 23950015995354594 239560159863545629 23968015999054619 23980016002954621best_etype 497524016035554771160372547718nextbest_etype 497528016042354781160444547822parser_inflection 497532016050354801160527548025pattern 5094741284false016059454821160614548221pcount 497536016066254831160675548314pattern2 5096021284false016072354841160744548422pcount2 497540016080254851160816548515line_ttype 5097301284false016084854871160870548723line_tdata 5098581284false016092354881160945548823line_token 5099861284false016094754891160969548923nsns 497544016097254911160983549112params_wanted 497548016105254931161072549321inferfrom 497552016114954951161165549517inferword 497556016124954961161265549617dont_infer 497560016131654971161333549718cobj_flag 497564016137354991161393549921oops_from 497568016139655011161412550117saved_oops 497572016146655021161483550218oops_workspace 510114641false016152955031161556550328held_back_mode 497576016160355051161624550522hb_wn 497580016168255061161694550613usual_grammar_after 497584016183255091161858550927PATTERN_NULL 655350162174551710162194551730found_ttype 497588016224055191162258551919found_tdata 497592016231255201162330552019token_filter 497596016237755211162396552120length_of_noun 497600016245255231162473552322lookahead 497604016253255251162548552517multi_mode 497608016261355271162630552718multi_wanted 497612016266555281162684552820multi_had 497616016274055291162756552917multi_context 497620016281055301162830553021indef_mode 497624016289155321162908553218indef_type 497628016302255341163039553418indef_wanted 497632016309955351163118553520INDEF_ALL_WANTED 327670163196553610163220553634indef_guess_p 497636016322255371163242553721indef_owner 497640016328155381163299553819indef_cases 497644016335455391163372553919indef_possambig 497648016342855401163450554023indef_nspec_at 497652016358155421163602554222allow_plurals 497656016372155441163741554421take_all_rule 497660016380155461163821554621dict_flags_of_noun 497664016413755511164162555126pronoun__word 497668016428055531164300555321pronoun__obj 497672016433055541164349555420comma_word 6035160164390555610164411555631match_list 5101784004false016466755641164705556439match_classes 5105784004false016474755651164788556542match_scores 5109784004false016483355661164873556641number_matched 497676016491255671164933556722number_of_classes 497680016498855681165012556825match_length 497684016505655691165075556920match_from 497688016513355701165150557018WordCount 23983 2398312016551955823165549558233 239860165530558214WordAddress 23995 2399573016555355833165612558362wordnum0 240000165574558324WordLength 24068 2406870016561655843165667558454wordnum0 240730165636558423WordFrom 24138 241388501656805587316592555952w0p4i8j12wc16 241430165754558910 241530165766558922 24163016578955905 241750165814559030 24177016582855915 24188016584355925 241970165859559221 24204016587955935 242130165895559321 24220016591455945NextWord 24223 2422313301659305597316619956062i0j4wc8 242280166005559910 242360166021559926 24247016604556005 24255016605556015 242730166084560134 24275016609856025 24321016611756035 243300166133560321 24337016615356045 243460166169560421 24353016618856055NextWordStopped 24356 243564701662045608316636656122wc0 243610166269560946 24369016629456102 243830166323561031 243910166329561037 24394016634656115PrintSnippet 24403 2440314701665005619316683456272snip0from4to8i12w116w220 24408016653656202 244140166551562017 24428016657856212 24452016662556223 24461016666356233 24475016672156252 244850166745562526 24511016679456267 245150166802562615 245210166814562627 245380166809562622 24547016683356271SpliceSnippet 24550 2455044901668395629316762556472snip0t4i8w112w216nextw20at24endsnippet28newlen32 24555016689756302 245610166912563017 24575016693956312 24587016696656323 245970166994563231 24600016700456333 24614016706556352 246170167079563516 24620016709556362 24626016711256372 24643016714456382 246550167170563828 24679016722356392 24687016724356402 24717016733356417 247200167338564112 247380167369564143 248600167364564138 248700167457564249 24882016749156438 248920167505564322 249520167500564317 24961016752856442 24977016755756452 24990016759556462 249930167610564617 24996016762456471SpliceSnippet__TextPrinter 24999 249993601676305649316774756522t0endsnippet4 25004016767256502 25013016768956512 250170167707565120 250230167718565131 25032016774656521SnippetIncludes 25035 2503514301677525654316813856672test0snippet4w18w212wlen16i20j24 25040016779856552 250460167816565520 25060016784656562 25072016787356573 25081016791156583 25095016797356602 25112016800956613 25118016803656628 251290168055566227 251410168050566222 25146016807056634 251570168102566336 25176016812956662SnippetMatches 25178 251786501681435669316838556792snippet0topic_gpr4rv8 25183016818156702 25188016818856712 25191016821756722 25208016825856733 25224016830456743 25230016833356753 25232016834556772 25241016837656782UnpackGrammarLine 25243 2524342001685345686316949057152line_address0i4size8 252480168582568710 252510168588568716 25258016861056889 25304016864856899 25350016868856909 253960168595568723 25406016895156995 25412016899257005 25441016904657015 25447016908357025 25451016910557045 254550169133570510 25458016915657069 25464016920057079 254780169236570745 25482016925157089 25528016929057099 25537016932657109 255440169361571044 25552016938657119 25599016942457129 256460169141570518 25656016946457145AnalyseToken 25663 256635701694955717316971457252token0 25668016951957185 25674016955557199 25679016959257209 25684016962757219 25687016964557235 25702016968457245 25717016971357251DictionaryWordToVerbNum 25720 257203201698635732317009257412dword0verbnum4 25725016997657362 25735017001257375 25740017004157385 25749017007557402KeyboardPrimitive 25752 257521701702365748317041457532a_buffer0a_table4 25757017037057522Keyboard 25769 2576989501705595760317436158772a_buffer0a_table4nw8i12w16w220x124x228 25774017060557612 257780170621576118 25782017073057658 257850170736576514 257910170748576526 258470170743576521 25856017110057753 25863017111757763 25870017113757773 258800171259578049 25890017133357833 25894017135157844 258980171364578417 25903017138957854 25908017141557864 25917017146257874 25929017152357885 259400171560578842 25943017157857904 25952017162357914 25956017163957924 25960017178457983 25971017180357993 25999017185458004 260040171876580026 260130171909580059 260160171919580069 26020017193458014 260260171949580119 260350171982580152 260380171992580162 26042017200758024 260480172021580218 260570172054580251 260600172064580261 26064017220758079 260670172213580715 260740172239580741 261330172234580736 26142017242758124 26153017248158134 26164017264958189 261670172655581815 261730172667581827 262300172662581822 26239017270358194 26249017297558264 26265017303458274 26285017317258319 262880173178583115 262940173190583127 263100173185583122 26319017321958334 263250173308583510 263300173331583533 26340017335158366 263690173341583543 26378017353358425 26405017364258479 264080173648584715 264140173660584727 264900173655584722 26499017370158494 265090173782585050 26519017381458524 26522017385258573 26555017391658584 26562017393558594 26566017395158613 265740174041586325 26578017406658643 265840174079586416 26587017409658653 265910174108586515 26595017412558663 26601017414258674 26608017417258684 26617017420258694 266240174217586919 26630017426458714 26638017429158724 266470174317587230 26650017433058734 26654017434658753 26661017436058771Parser__parse 26664 26664887701745005884320711267652syntax0line4num_lines8line_address12i16j20k24token28l32m36inferred_go40 26669017458058862 26673017459658872 26730017463158882 26787017466758892 26844017470058902 26901017473358912 26905017488858985 26911017491858999 269150174942589933 26921017496259009 269270174984590031 269410175020590067 26951017504859019 26962017507759029 269680175094590226 269740175105590237 269850175100590232 26994017512559039 27002017514959049 270300175399590913 270520175441591013 270600175461591033 270680175502591118 270860175549591220 270920175560591231 271400175555591226 27149017559759159 27165017563359169 27168017566759212 27172017568359222 27182017572759235 271910175765592343 27203017581659243 27219017584259253 272280175867592528 27236017590859267 272480175948592647 27251017597959305 27256017610759355 272650176132593530 27273017617159365 272780176179593613 27281017623759395 27288017628359415 27304017634959445 273130176374594430 27321017641459465 27324017644159485 27332017647459499 273380176499595014 273410176505595020 273490176642595513 274110176707595713 274250176741595813 274390176774595913 274450176790595929 274480176796595935 274540176807595946 274720176802595941 274810176826595965 274870176851596113 274910176863596125 275000177186596917 275140177203596934 275260177243597022 275290177312597313 275400177334597335 275460176519595034 27556017736559759 27562017740859785 27567017743059795 27571017745059805 27581017749459815 27585017754359855 27589017756459865 27594017766759925 27600017769059935 27609017779859975 27616017782959989 276210177852599832 27625017787560002 27635017790860013 276400177936600131 27644017812160075 276640178164600748 27672017819260085 27683017823160099 276890178266601013 27694017829760114 27698017851260199 277080178548602013 277170178581602046 277200178603602113 277240178665602414 277270178671602420 277350178697602446 278330178692602441 27843017872960259 27859017875860263 278680178783602628 27876017882360276 27880017891060325 278910178952603314 278940178958603320 279020178984603346 280000178979603341 28010017901360355 28016017905360369 28021017907960379 28032017914360399 280630179208604013 28078017928860439 281010179357604413 281070179393604449 28111017941860479 281180179444604813 281770179495604913 282340179542605013 282930179589605113 283520179638605213 283570179648605223 284150179695605313 284200179707605325 284780179754605413 28481017977960569 284850179793605623 284900179808605638 284980179814605644 285090179847605716 285150179866605735 285270179907605910 28531018036460765 28555018079760849 285610180816608428 285650180836608448 285690180854608466 28573018087860859 285760180891608522 285800180905608536 28584018093360869 285880180949608625 285920180963608639 286000180978608654 28608018100760879 28622018104660889 286260181066608829 286300181080608843 28633018110160899 286420181124608932 28646018127260949 286680181326609513 287290181375609613 287870181422609713 288450181466609813 288490181498609913 28853018196561142 28859018199561158 288630182001611514 28870018202661164 28878018204361174 288870182064611725 288900182016611529 28899018209161202 28903018228461272 28910018243061322 289150182438613210 28920018246361332 28925018249561342 28938018253861352 28942018257061362 289510182593613625 28955018260861372 28959018262461383 289820182672613851 28986018269661393 289910182727613934 28995018298261482 29063018302861494 290680183057614933 290730183067614943 29077018323461552 29084018325161563 291070183299615651 29111018332361573 291160183347615727 29120018344961622 29129018358461672 29136018364461712 29142018366561723 29148018368661733 29185018375661744 29190018378761754 29194018381361792 29198018382561802 29208018387661822 29215018390161833 29251018399061852 29255018416661932 29278018422861943 29290018426661953 292950184286619523 29298018430761963 29303018433161973 29307018453462045 29328018465362085 29341018469762099 29346018472762109 29350018474562119 29354018482562165 29365018516062255 29383018535562315 29397018549362365 294020185514623626 29407018555762395 29414018558562406 29449018569762435 294540185720624328 29459018575162445 29463018636162585 294690186398626010 294720186407626019 29479018658562659 29489018666462689 294960186701626913 295030186724626936 295060186746627013 295150186768627035 295220186800627113 29528018704562799 29532018706862809 29536018709262819 295400187102628119 29544018712862829 29551018716162839 29555018718862849 29560018727462889 29568018744062959 295730187462629531 295770187495629614 295870187518629637 296440187579629713 296480187609629913 297040187652629956 297100187670630113 297670187730630217 298230187770630257 298270187796630317 299010188047630821 299080188070630844 299140188236631321 299220188266631421 299790188440631729 299870188480631825 300160188625632125 300240188717632329 300310188772632433 300370188890632629 300410189014633029 300580189144633233 301250189223633337 301330189269633437 302550189438633641 302700189525633837 302810189750634337 302890189798634433 303180189968634733 303390189998634763 303420190170635133 303490190229635237 303550190359635433 303590190434635629 303670190455635650 303750190495635725 304320190697636125 304400190728636325 305520190866636529 305600190934636629 305640190944636639 305690191010636726 306270191042636758 306300191051636767 306340191094636826 306390191110636842 306960191170636929 307160191256637029 307200191274637047 307230191283637056 307810191385637229 307880191442637333 307940191512637433 308030191535637456 308120191635637634 308180191647637646 308240191710637734 308280191722637746 308440191784637834 308500191796637846 308650191953638229 308740191976638252 308780192018638329 308840192030638341 308890192119638621 308920187555629674 30904019236263959 30908019238963969 309290192456639713 30934019276864049 30938019279164059 30942019281564069 309460192825640619 30950019285164079 30957019288464089 30962019291064099 30970019307064163 309740193093641714 309790193128641813 310450193187641914 310530193220642015 311280193272642067 311390193296642115 312070193349642215 312140193401642316 312180193455642517 312260193494642617 312320193507642630 312350193530642717 312420193569642916 312620193628643017 31265019366764328 31272019369864339 312810193800643514 312850193854643814 312880193106641727 31300019387764403 31308019390164423 313130193913644215 313180193950644313 313710193983644346 313750194013644513 314340194058644613 314850194130644913 314920194169645017 315420194317645413 315490194361645517 315530194408645617 315620194446645817 315880194521645917 316010194557645953 316200194613646017 316240194661646217 316280194709646321 316490194826646452 316570194863646521 316650194932646821 316700194943646832 316770195003647025 316870195055647129 316930195110647233 316980195125647248 317070195195647338 317130195260647433 317210195268647441 317250195333647629 317310195356647652 317340195391647729 317960195464647829 318040195506647929 318540195556648029 318580195639648417 318650195684648521 318710195735648621 318800195758648644 318860195806648721 318900195818648733 319060195885648821 319120195897648833 319180195983649217 319270196006649240 319310196036649317 319350196052649333 319430196582650517 319520196625650621 319600196661650721 319960196747650825 320010196770650848 320130196842651030 320160196848651036 320220196860651048 321160196855651043 321260196912651125 321320196954651225 321370196995651325 321410197222652017 321490197262652118 322120197322652222 322800197388652322 322840197402652336 322890197413652347 323480197458652392 323520197520652617 323600197560652718 324220197620652822 324900197686652922 324940197700652936 324990197711652947 325070197764653119 325650197796653151 326230197846653219 326330197880653321 327270198038653521 327320198083653621 327910198128653666 327950198384654517 328660198469654621 328710198514654721 328750198595655117 328820198618655140 328880198800655617 328920198905656017 328970198944656118 329070198997656221 329160199133656717 329750199194656817 330340199327657217 330480199389657321 331060199441657421 332240199518657521 332820199570657621 332890199611657725 332940199632657746 333000199691657825 333050199923658517 333760199998658621 334430200173659117 334480200215659221 334540200245659321 334580200297659517 334610193926644228 33473020054366049 334810200567660433 33487020059566059 335020200647660561 33508020084366109 335220200888661054 335250186425626037 33535020114466235 33541020116866245 33548020119966259 335530201243662613 335590201291662713 33563020132966299 33569020135666309 33578020139166319 335880201437663213 335970201476663313 33605020151066359 33666020155966369 33724020160266379 33782020164666389 338400201678663841 33846020171866399 33850020174266409 338560201771664038 33869020182166419 33872020214066525 33906020220566539 339190202234665338 33926020226266553 339380202308665549 33943020232766563 33956020241466579 33965020246666589 339770202512665855 33981020254466605 339870202574666035 33993020260766625 340000202635666233 340090202666666264 340120202676666274 34017020269766635 34025020272666646 340290202743666423 340410202784666511 340500202828666614 340530202834666620 340590202846666632 341530202841666627 34163020288266679 341690202900666727 34177020292566689 34183020294766705 341900202975667033 341990203006667064 34202020302266715 342090203050667133 342180203081667164 342210203091667174 34227020311966725 342340203147667233 342430203178667264 34246020319466735 342530203222667333 342620203253667364 342650203263667374 34271020329166745 342780203319667433 342870203350667464 34290020336666755 342970203394667533 343060203425667564 34309020344166765 343160203469667633 343250203500667664 34328020351666775 34335020355066789 343420203577667836 343510203608667867 343570203635667916 343680203672667953 34371020369466815 343780203722668133 343870203753668164 34390020376966825 343970203797668233 344060203828668264 34409020384466835 344160203872668333 344250203903668364 34428020391966845 344350203947668433 344440203978668464 34447020399466855 344540204024668535 344630204055668566 34466020407166865 344730204098668632 344840204140668674 34487020415666875 34495020418866886 346380204299669010 346970204374669113 347350204398669137 347460204437669176 347530204466669218 348290204507669259 348400204546669298 348470204575669318 349230204621669364 3493402046606693103 349410204689669418 350300204714669443 350410204753669482 350470204782669518 35104020483466979 351710204894669813 351780204919669838 351870204952669871 351930205001669938 352020205034669971 35205020506667025 352120205098670237 352210205129670268 35224020514567035 352310205175670335 352400205206670366 35243020522267045 352500205252670435 352590205283670466 35262020529967055 352690205332670538 352780205363670569 35281020537967065 352880205410670636 352990205447670673 35302020546367075 353090205489670731 353180205520670762 35321020553667085 35328020557267099 35333020559767109 353430205644671113 353490205685671213 353830205757671314 353920205811671413 35396020587067195 354300205925671960 35434020594267205 35438020595867215 35447020619267305 35451020664367455 35459020667567475 35467020669567485 35503020676567499 355110206798675012 355150206833675112 35518020685967539 35524020687967549 35529020690967558 35532020692767575 35537020695367585PARSER_ERROR_INTERNAL_R 35541 355416020727467723207300677229 355440207299677228PARSER_N_ERROR_INTERNAL_R 35547 355476020730467733207332677331 355500207331677330PARSER_COMMAND_INTERNAL_R 35553 355536020733667743207364677431 355560207363677430ParseTokenStopped 35559 355593302075016781320758867842x0y4 35564020752567822 355770207545678222 35580020756367832parsetoken_nesting 497692020759167861207620678630ParseToken 35592 3559244502076246787320847068162given_ttype0given_tdata4token_n8token12i16t20rv24 35597020768367882 35604020773867903 356080207756679021 356120207776679041 35616020779867913 356200207823679128 35624020784767928 356270207852679213 35635020788067934 356810207900679324 35684020791267944 357300207935679427 35733020794767954 357790207969679526 357820207870679231 35792020798467973 35796020801268002 35804020803568012 35825020809768022 35833020812168042 35840020817968063 35844020820868078 358510208228680728 35857020824568085 358600208254680814 35906020827968094 359090208288680913 35955020831468104 359580208323681013 360040208234680734 36014020835268123 360180208369681220 36022020839668133 360260208416681323 360300208436681343 36034020845868152ParseToken__ 36037 36037264102084756818322400972592given_ttype0given_tdata4token_n8token12l16o20i24j28k32and_parity36single_object40desc_wn44many_flag48token_allows_multiple52prev_indef_wanted56 36042020876868275 36046020879068285 36051020882168305 36062020887368329 360720208933683413 360830208964683513 360920209029683713 360990209061683817 361060209084683840 361210209173684013 361280209237684217 361350209260684240 361510209364684417 361560209408684613 361610209439684713 361700209495685013 361910209526685113 361980209560685217 362030209595685317 362060209664685613 362130209685685634 362280209762685813 362330209793685913 362420209851686213 362820209928686317 362980209995686613 363040210026686713 364320210154686917 364410210208687017 364430210258687216 364760210362687413 364840210380687513 364930210425687613 364980210449687637 365010210478687713 365310210545687817 365360210553687825 365420210572687844 365510210616687917 365560210624687925 365590210660688113 366290210735688217 366320210815688313 36645021099568899 366610211017688931 36663021124968959 366720211283689613 366850211347689717 366910211367689737 366960211402689817 367630211572690313 367680211592690333 367710211696690713 368380211785690813 36840021182869119 36848021185369139 36915021215769199 369210212179691931 36923021221169209 369380212251692049 36940021228369219 36949021231769249 36954021237469269 369610212397692632 36976021248469289 36985021251969319 36990021255469329 36995021260169349 370020212624693432 37008021270269369 37014021275969389 370210212782693832 37036021287669409 370420212888694021 370490212920694053 37061021297769439 37068021301769449 37080021307769479 37085021311369489 37088021318069525 37092021382769695 37095021386269705 37119021395769719 37123021399269735 371260214011697324 371300214030697343 37134021430669855 371410214329698528 37157021467969935 371650214695699321 37173021470669955 371780214727699526 37183021475169965 37193021477669975 37198021479869989 372030214816699827 37208021484169999 372150215060700418 372220215095700453 372280215066700424 372400215118700517 372920215152700551 372980215187700613 373040215217700643 373100215257700713 373150215287700813 373220215310700836 373280215356700913 37331021541670155 373580215458701547 373630215476701565 37368021550570175 373730215527701727 37378021563770225 37388021568170235 373920215695702319 373970215706702330 37399021600270355 37405021639570445 37412021643070459 37420021648570479 374270216508704732 37433021659570499 37446021665070509 374550216673705032 37458021672870519 374750216811705213 37479021687570549 374880216931705513 374950216957705539 375000216990705613 37505021702670589 375090217052705913 375140217091706017 375210217127706117 375260217157706217 375300217199706413 375420217235706449 375470217265706513 375560217294706613 37560021737170709 375680217408707113 375740217419707124 375990217494707317 376050217564707417 376130217610707522 376190217618707530 376260217650707621 377570217625707537 377670217779707817 37782021787570839 377890217901708413 377930217918708430 378010218028708617 378090218103708717 378170218149708822 378230218157708830 378300218191708921 378340218207708937 378920218274709037 379470218164708837 379570218369709317 379640218409709418 379960218608710113 380060218993710817 380130219029710917 380180219059711017 380220219102711313 380400219177711417 380450219211711517 380490219279711813 380530219296711830 380600219350712017 380640219366712033 380760219384712051 380850219443712217 380920219466712240 38117021971671339 38130021979471349 381390219817713432 38142021983571359 381460219861713613 381510219900713717 381580219936713817 381630219966713917 381670220008714113 381760220027714132 38180022085971589 38236022088271599 382420220938716113 382490220961716136 38270022105971649 38274022131571725 38283022170771855 38291022172871875 38355022185471909 383620221877719032 38383022196071939 383870222003719413 383920222018719428 383960222067719513 384010222095719613 38405022213071999 384320222173719952 38438022220972019 384420222240720213 384500222277720313 384590222326720413 384630222382720613 384700222405720636 38491022251272099 384960222531720928 38500022258972109 38504022266072135 38512022290972235 38516022293472249 38520022297272259 38528022302072289 38547022308072296 385590223133722959 385640223168723013 385790223243723117 385840223258723132 385900223303723217 385950223338723317 38598022338872375 38601022360072455 38613022367372479 386200223696724732 38636022378072499 38641022382272509 38645022385372519 38650022387572529 38654022390172555 386700223967725571 38675022399072575OTHER_BIT 10224175726610224191726626MY_BIT 20224244726710224260726726THAT_BIT 40224302726810224318726826PLURAL_BIT 80224329726910224345726926LIT_BIT 160224356727010224372727026UNLIT_BIT 320224383727110224399727126ResetDescriptors 38678 386784002244047273322461072792 38681022442672745 386850224442727421 386890224458727437 386930224476727455 38697022449972755 38701022452872765 38705022455572775 38711022458972785 38715022460972791ArticleDescriptors 38718 3871820702246157281322503472952o0x4flag8cto12type16n20 38723022466072825 387310224680728225 387330224700728410 387370224712728422 38742022473072859 387500224753728532 387530224780728713 387600224815728748 387660224786728719 387790224834728813 388310224886728917 388890224938729017 389030224976729055 38915022501372935 38923022502372945Descriptors 38925 3892574902251797302322732673562o0x4flag8cto12type16n20 38930022521773035 38937022524173045 389450225261730425 389470225281730610 389510225293730622 38956022531173079 389640225334730732 389670225361730913 389740225396730948 389800225367730919 389930225415731013 390460225467731117 390500225496731217 391080225548731317 391150225571731340 391200225606731417 391250225646731517 391910225722731717 391990225768731821 392570225823731921 392660225863732026 392830225922732126 392940226013732325 393050226070732425 393120226095732450 393200226180732817 393260226200732837 393340226251732917 393400226271732937 39352022633173329 393790226394733313 393840226410733329 393880226432733413 39396022648773369 394410226568733713 394460226584733729 394500226594733739 394560226639733813 394630226663733837 394680226694733913 39476022675073419 394820226780734210 395070226824734254 395150226830734260 395330226860734290 395360226865734295 395440226885734313 395500226899734327 395550226915734343 395590226939734413 395650226968734517 395700227003734617 395750227019734633 395790227029734643 395840227063734717 395920227102734817 39600022717273519 396520227264735213 39664022730573545 39672022731573555SafeSkipDescriptors 39674 396747702273317358322769973682 39677022735373592 396810227371735920 396850227389735938 39689022741073602 396930227431736023 396970227454736046 39701022747473612 397050227493736121 39709022751873632 39716022753673652 397200227558736524 39724022757873662 397280227597736621 397320227620736644 39736022764273672 397400227662736722 397440227680736740 39748022769873681PrepositionChain 39751 3975130402278427375322815373832wd0index4 39756022787373765 398080227903737635 39811022791873775 398730227958737745 39876022798673799 399280228016737939 39931022803573809 39937022804873815 40052022814173825CreatureTest 40055 4005511302282877390322845873952obj0 40060022830973915 40094022834173925 40126022837773935 40166022844973945NounDomain 40168 40168362202285957402324237377922domain10domain24context8dont_ask12first_word16i20j24k28l32answer_words36marker40 40173022870274055 40181022873574069 40197022879274079 40203022881374089 402090228843740913 402150228892741013 402240228921741042 402300228949741113 402390228978741142 402450229003741213 402540229032741242 402600229059741313 402690229088741342 402750229117741413 402840229146741442 402900229172741513 402990229201741542 403050229229741613 403100229251741635 403260229299741713 403290229321741813 403350229361741913 403430229399741951 403520229417741969 403560229449742013 403590229471742113 403780229552742314 40384022961774275 403880229635742723 403920229655742743 40398022967774295 40410022974074325 404170229763743228 40433022984074355 40442022998274405 404470230009744032 404550230015744038 40457023021374465 40466023025274479 404730230291744813 404810230321744913 40484023062474579 404930230659745813 405010230675745829 405090230693745913 405990230882746217 40605023102574695 40609023105374715 40617023108574726 40625023110774733 40641023116574744 40682023131474775 40692023136674785 40714023145774805 40724023152274845 40732023155074853 40736023156574866 407440231600748712 407470231606748718 40759023163674885 40876023170174896 408790231627748739 40889023171474903 408930231721749010 40898023174874919 40908023178174929 40913023181074939 40919023244175065 40923023246075076 409280232476750722 40931023249475089 409360232514750829 40942023254075099 40992023257075109 40995023258875132 409990232602751316 41008023299075215 410160233018752133 41020023319175262 41029023323775272 410410233284752749 41045023330975282 41049023331675289 41052023333475297 410560233340752913 41064023337275303 41170023345175314 41180023346375323 412650233502753242 412680233363752936 41278023351375342 41282023352075349 41294023355875357 41303023359575375 413080233618753728 413110233639753810 413150233645753816 41323023368375399 414290233759753985 41439023377775409 41485023381175429 415360233843754241 415480233863754261 41557023388575449 415670233899754423 41573023391975459 415830234026754910 415920233668753839 41602023407875525 416080234112755422 41617023431375625 41634023443275655 41643023455775705 41689023464375719 417140234746757213 417220234788757318 417250234794757324 417440234860757417 417900234896757517 418520234837757367 418620234953757713 418740234992757813 41877023501775809 41886023505775819 41890023516875877 418940235174758713 41900023519975883 419210235252758913 419370235296759013 419410235192758731 41950023588076055 41954023591176069 41965023594776079 419860236016760813 420020236060760913 42006023677876295 42024023682076305 420360236852763110 420500236882763140 420670236903763161 420890236898763156 420980236928763210 421010236934763216 421080236945763227 422300236940763222 42240023698876335 42304023701576345 42322023704876355 423350237094763551 42344023727176432 423530237296764327 42361023733576445 42366023737976465 42373023742576485 42389023748776502 423980237512765027 42406023755176515 42416023759276522 42437023766376545 42443023790476625 424490237935766236 424620238009766336 42472023805276645 42475023817676695 42492023830876747 424960238314767413 42502023833976753 42523023838376764 42539023841876774 425430238332767431 42552023845176805 42561023876976905 42565023880076919 42576023883676929 425970238905769313 426130238949769413 42617023912477025 426230239159770314 426280239173770328 426360239203770413 426910239236770446 426950239391770813 427070239430770913 427460239446770929 428100239536771313 428170239572771414 428780239764771913 428860239937772413 429950240007772517 430500240056772622 430570240088772654 430630240062772628 430760240115772721 431860240186772825 432410240283773025 432480240331773126 432760240450773325 432860240571773817 433560240688774017 433630240728774118 433910240929774713 434020240968774817 434110241330775717 434430241415775817 434490241426775828 434610239184770339 43471024184677745 43483024187777755 435220241893777521 435860241923777610 435920241945777632 436040241929777616 43617024196477779 43727024200777789 43766024203177799 437790242067777945 43786024234777905PARSER_CLARIF_INTERNAL_R 43790 437906024239877943242425779430 437930242424779429Adjudicate 43796 43796298202425617801325032580172context0i4j8k12good_ones16last20n24ultimate28flag32offset36 43801024264778035 43809024268078049 43834024278978069 43840024281078079 438460242840780813 438520242879780913 438610242908780942 438670242936781013 438760242965781042 438820242990781113 438910243019781142 438970243046781213 439060243075781242 439120243104781313 439210243133781342 439270243159781413 439360243188781442 439420243216781513 439470243238781535 439630243286781613 439660243308781713 439720243348781813 439800243386781851 439890243404781869 439930243436781913 439960243458782013 440150243539782214 44021024359678265 440280243618782627 440310243633782642 440390243665782710 440420243671782716 44049024369378289 44095024372178299 44141024375978309 44151024379678329 442170243853783313 442230243866783326 44227024388478349 443220244020783613 443280244033783626 44332024405178379 443980244113783813 444040244126783826 44408024414578409 444210244210784113 444280244251784217 444340244303784321 444400244316784334 444440244359784517 444500244411784621 445100244435784645 445160244448784658 445230244524785017 445360244598785121 445420244611785134 445460244637785217 445890244713785321 445950244726785334 44599024476978569 446190244832785713 446250244845785726 44629024487278599 447320243678782723 44742024493878615 44749024496278623 447890245120786510 447990245183786613 448220245273786734 448250245297786810 44835024534978694 448410245369786924 44847024539678714 44850024565278795 448600245701787954 44869024572978815 448740245750788126 44878024576978835 44887024579578845 448920245820788430 44895024583678865 44900024592478889 44908024595578899 449130246008789213 449200246031789236 449260246122789413 44929024615378985 44947024621678999 449710246340790113 449760246370790213 44979024639979049 449820246406790416 449900246449790514 450010246529790610 450090246464790529 450350246558790713 450380246580790813 450480246640790913 450620246715791017 451300246754791056 451340246780791117 452060246875791221 452090246902791417 452890246984791521 452920247011791717 453030247056791917 453090247088792021 453160247141792221 453220247153792233 453280247218792517 453310247228792527 453410247253792552 453450247289792713 453550247347792813 453610247380792917 453670247385792922 454250247465793117 454320247488793140 454410247595793517 454450247648793717 454520247671793740 45462024776179419 454770247832794213 454820247851794232 45488024788479435 454950247907794328 455010247943794413 455060247968794513 45509024799779479 45521024803779489 45526024809279509 455330248127795113 45548024821079539 455510248236795610 455540248242795616 455610248266795640 456060248261795635 45615024829479585 456190248310795910 456220248316795916 45630024834879609 456810248390796113 457370248415796138 457400248442796218 457460248450796226 457540248490796317 459120248590796421 459160248618796521 460100248469796245 460200248687796713 460260248702796728 460780248335795935 46088024874279696 460940248747796911 46099024879379725 46107024882679739 461220248896797414 461250248902797420 461330248938797513 461850248981797617 463620248921797439 46372024912979815 46378024916079829 463850249185798313 463890249210798418 463920249216798424 464000249258798517 464520249306798621 464980249348798721 465440249371798744 465500249400798821 465570249469799121 466100249522799225 467120249602799329 467160249235798443 46726024965779979 467300249707799913 467370249730799936 467430249828800113 46745024987880049 467520249901800432 46758025026880145 467640250280801417 46769025030380155ReviseMulti 46778 4677865002504758024325188380632second_p0i4low8 46783025052680265 46790025055480276 46826025069380315 468410250769803214 468480250781803226 468610250825803313 470160251009803517 470220251032803617 471160250806803251 47126025110980399 47134025114780425 47153025123980449 471600251262804432 47175025135680469 471830251399804718 471900251411804730 472030251459804817 472710251543804921 472770251570805021 473710251436804755 473810251659805313 47389025170780575 47397025175480595 474040251777805928 47419025183780615 474230251849806117 47426025187280625MakeMatch 47428 4742825502520198070325280480912obj0quality4i8 47433025206680725 474400252089807228 47455025215880745 47472025224980769 474790252272807632 47495025237080789 47498025238780805 47505025242680815 475120252456808135 475170252480808159 47524025252180839 475310252581808414 475340252587808420 475410252623808513 475930252606808439 47602025266780875 47667025272680895 476740252749808928 47680025280380911ConsultNounFilterToken 47683 4768312902528098093325304281032obj0sn4rv8 47688025284780945 47705025288880956 47710025290480966 47715025292180976 47721025295580986 47726025297180996 47729025299281015 47810025303381025SCORE__CHOOSEOBJ 10000253186811010253209811033SCORE__IFGOOD 5000253220811110253239811129SCORE__UNCONCEALED 1000253250811210253274811234SCORE__BESTLOC 600253285811310253304811329SCORE__NEXTBESTLOC 400253315811410253338811433SCORE__NOTCOMPASS 200253349811510253371811532SCORE__NOTSCENERY 100253382811610253404811632SCORE__NOTACTOR 50253415811710253434811729SCORE__GNA 10253445811810253459811824SCORE__DIVISOR 200253470811910253489811929PREFER_HELD 00253501812110253512812121ScoreMatchL 47812 47812153002535168122325696482062context0its_owner4its_score8obj12i16j20threshold24met28a_s32l_s36 47817025364181245 478260253674812438 47832025369181255 478410253724812538 47847025374181265 478560253774812638 47862025379181275 478710253824812738 47877025384181285 478820253874812838 47888025391081315 478950253933813128 47930025411381365 479340254135813627 47938025416581375 47958025421581389 479620254241813835 47966025427381405 479700254546814810 479730254552814816 47981025458681499 480270254608814931 480830254633814956 480860254646814969 48089025477381539 481040254825815361 48110025484081549 481250254904815473 48131025491981559 481740254967815557 48180025498281569 482230255034815661 48229025504981579 482410255099815759 48247025511581599 482540255176816113 482620255212816214 483990255397816513 484490255455816813 484520255482816913 484860255507816938 484900255552817113 484960255576817137 485050255638817317 485110255672817351 485200255742817521 485290255768817547 485350255824817713 485550255903817913 485890255926817936 485950255981818013 486010255999818031 486070256177818513 486780256253818617 486840256302818813 487820256389819013 487900256412819036 489820254571814835 489920256603819610 489950256609819616 49003025664381979 490560256686819813 490670256715819842 490750256733819860 490790256759819918 490830256765819924 490950256809820017 492010256862820117 493070256786819945 493170256929820313 493290256628819635 49339025696382061BestGuess 49342 4934239202570998213325771182312earliest0its_score4best8i12 49347025714182145 493500257155821419 493540257175821510 493570257181821516 49365025721582169 494160257254821713 494620257296821813 494680257320821837 494720257338821855 494760257200821535 49486025739282225 49494025742182237 494990257435822321 495090257489822412 49631025760882275 496360257622822719 49639025763782285 49685025766882295 49731025770082305SingleBestGuess 49734 4973415002578528238325816182462earliest0its_score4best8i12 49739025790082395 497430257915823920 497480257938824010 497510257944824016 49759025797882419 49805025801682429 498110258039824232 49815025806282439 498210258086824333 498250258104824351 498710257963824035 49881025814382455Identical 49884 4988433902582968253326035483042o10o24p18p212n116n220i24j28flag32 49889025833882545 49895025841982555 49901025846882565 49931025926482705 49957025931882717 49980025936882727 499860259395827234 499910259412827251 49996025943582737 500010259443827315 500120259475827347 50017025948982747 50023025951582757 50028025976282825 500390259774828217 50054025980182835 500650259813828317 500800259993828810 500830259999828816 50089026002182899 500920260044829014 500950260050829020 501010260074829113 501250260096829135 501290260057829027 50138026011482929 501410260006828823 501500260153829510 501530260159829516 50159026018182969 501620260204829714 501650260210829720 501710260234829813 501950260256829835 501990260217829727 50208026027482999 502110260166829523 50220026034683035PrintInferredCommand 50223 5022336002604938311326101983262from0singleton_noun4 50228026053683122 50231026056183132 50355026066483154 50359026068983172 50364026071383183 50420026077783193 50479026085183204 504850260862832015 504940260882832035 50500026090083223 50559026097283243 505650260983832414 505740261003832434 50580026101883261PrintCommand 50583 5058326502610248328326187083512from0i4k8spacing_flag12 50588026106483295 50592026108983309 50597026111283319 506090261150833213 506210261173833236 50630026120083339 506360261208833317 506400261244833510 506440261253833519 50652026127983369 50698026130483379 507070261327833732 50711026134583389 507150261363833827 50724026138983399 507280261403833923 507370261435833955 50740026146483409 507460261478834023 507550261510834055 50758026153983419 507670261574834213 507940261661834413 508100261705834517 508220261798834717 50831026184283499 508350261264833530 50845026186983511CantSee 50848 5084826302620038358326262283822i0w4e8 50853026202383595 50859026205083615 50864026208283629 508700262109836236 50873026214083655 508810262146836511 50889026216683665 50893026218683675 50901026221383683 509090262236836826 50917026224483693 50980026230683704 509860262322837020 51054026236483714 51074026244283725 51081026247783745 510870262507837435 51093026253983755 51097026257883805 511040262593838020 51108026261183815MultiAdd 51111 5111116102627688389326301583972o0i4j8 51116026278883905 51124026281783915 511300262848839136 511350262866839154 511380262884839210 511420262890839216 51148026291083939 512000262897839223 51209026295183945 51215026296083955 51261026298983965 51269026301483971MultiSub 51272 5127223502630208399326330984082o0i4j8k12 51277026304284005 512850263076840110 512890263082840116 51296026310284029 513490263151840318 513530263157840324 513600263169840336 514660263164840331 514760263228840413 514920263267840513 514940263089840123 51504026329184075MultiFilter 51507 5150717302633148410326350384172attr0i4j8o12 51512026335384125 515200263387841310 515240263393841316 51531026341584149 51577026344884159 516540263468841529 516630263481841542 516670263400841323 51677026350284171PlaceInScope 51680 516804902636348424326382584292O0opts4ws8 51685026370884252 516900263717842511 51696026373584262 517000263754842621 51712026378884277 51721026380784282 517260263816842811AddToScope 51729 517295702638308431326398384342obj0 51734026385084325 517410263869843224 51757026391884335 517640263939843326 517780263967843354 51783026398284341TestScope 51786 5178610902641228441326457484502obj0act4a8al12sr16x20y24 51791026415784425 517960264173844221 51801026419384435 518060264211844323 518100264227844339 518140264238844350 51818026426484445 518230264283844424 51828026432084455 518320264334844519 518390264355844540 51843026437284465 51853026441584475 518640264455844745 518690264474844764 51873026448984485 518770264511844827 518820264527844843 518870264543844859 51892026456384495LoopOverScope 51895 518959002645798452326496484602routine0act4x8y12a16al20 51900026461984535 519050264635845321 519100264653845339 519140264664845350 51918026469084545 51923026471684555 519270264730845519 519340264751845540 51938026476884565 51948026481184575 51953026485284585 51964026489684595 519690264912845921 519740264930845939 519780264941845950 51982026496384601SearchScope 51985 5198562302651018467326642585072domain10domain24context8i12 51990026514184682 519940265159846820 51997026517884705 52002026520584719 52007026525284739 520140265275847332 52020026534584759 52028026540184785 52038026544784795 52052026551484813 52070026562184834 52085026566884848 52101026573584874 52123026586684896 52135026590284914 522030265942849144 52212026596984924 52224026602384944 52228026604284955 522960266082849545 52305026611084965 52316026616585003 52335026620585014 52347026625685024 52475026630685035 52595026638485065 52605026642485071ScopeWithin 52608 5260816602665628514326698285262domain0nosearch4context8obj12next_obj16 52613026661685155 52617026674485195 52673026676985205 52677026679185219 52733026682485229 527520266902852313 52764026695985249 52771026698185261DoScopeActionAndRecurse 52774 5277444402671318533326847285812domain0nosearch4context8i12ad16n20obj24next_obj28 52779026720185342 52788026723785375 52842026734985393 52898026737285403 52902026738985414 52958026741785424 52977026748785435 52989026753985444 52996026757185492 53009026761285503 53020026764485513 53024026766185524 53035026769885534 53054026776885545 53065026781385554 53072026785185605 53083026788285615 53088026807585669 53121026813885699 531250268159857013 531320268193857113 531420268240857213 531490268291857513 531600268334857618 531630268340857624 531730268378857717 531860268410857821 532060268357857641 53215026847185811DoScopeAction 53218 5321816102686118588326915686052item0 53223026865485915 53230026868585929 53281026883585965 532850268853859623 53289026887585982 533000268918859921 533070268942859945 533210268982860025 533380269014860057 533590269076860135 53368026911786045 533720269137860425 53376026915586051MatchTextAgainstObject 53379 5337921902693028612327056786462item0i4 53384026933786135 534010269397861365 53404026940786152 53413026948086163 53419026949986173 53427026951786183 534390269551861837 53449026958086193 535140269641861964 53524026975386252 53530026977186262 53543026980386273 53557027042486394 53563027044886404 53576027048486415 53582027051786425 53589027054586444 53595027056686461TryGivenObject 53598 5359852202707078653327319687412obj0nomatch4threshold8k12w16j20 53603027077386555 536100270796865528 53650027088486582 536580270909865827 53660027100986625 53664027112486675 53672027115186686 536760271164866819 53678027118286699 536830271215867013 53688027127986719 53697027132786739 537040271350867332 53710027140886759 53713027154286815 53727027157586829 537320271597868231 53737027161186839 53748027165286849 537540271677868513 537610271718868913 537690271770869017 537770271828869213 537860271874869317 537910271895869338 537970271945869521 538020271992869625 538070272008869641 538110272024869657 538150272084869821 538230272142869921 538280272165869944 538340272269870413 538410272292870436 538560272364870613 538600272386870635 538700272416870713 53873027244487099 538770272456870921 53881027258087155 53886027260787175 53894027262887195 539060272659871936 539100272664871941 53914027268487215 539790272742872163 539830272749872170 53987027276987235 54005027283087259 540100272853872532 540130272860872539 540180272882872561 54022027290587269 54024027292187292 54028027293787302 54044027298987312 54052027300687322 54070027303687333 54076027305187343 54080027306387356 54101027313987363 54112027316387395 54116027318287405Refers 54120 5412013302733288748327384387682obj0wnum4wd8k12l16m20 54125027336087495 54128027350087555 541330273508875513 541380273519875524 541460273543875548 54151027355687575 54159027359687589 54168027364687599 541730273658875921 54176027367687609 54183027370787639 54188027373487645 541990273746876417 542180273780876510 542210273786876516 54227027380687669 542420273793876523 54251027383487675WordInProperty 54253 542537002738488770327400187752wd0obj4prop8k12l16m20 54258027388687715 542690273901877120 542880273938877210 542910273944877216 54297027396487739 543120273951877223 54321027399287745NounWord 54323 5432315502741358782327442887922i0j4s8 54328027415587835 54336027417587845 54339027419987855 543660274239878545 54369027425387865 543770274288878710 543840274301878723 543900274294878716 54396027431687889 544480274359878913 54458027437587905 54475027441787915TryNumber 54478 5447841602745638799327577888352wordnum0i4j8c12num16len20mul24tot28d32digit36 54483027461888005 544880274626880013 544930274640880027 545010274656880043 54506027466888015 54516027472988025 545220274741880217 54525027487988075 545310274894880720 545770274909880735 545860274925880751 54644027497388105 546500274987881019 54655027500188115 546610275015881119 54665027502888125 546710275042881219 54675027505488135 546810275068881319 54685027508088155 546880275089881514 546910275096881521 546970275119881710 547000275125881716 54707027514988189 54718027517188199 547240275191881929 547270275198881936 54731027522088209 547370275240882029 547410275247882036 54745027526988219 547510275289882129 547550275296882136 54759027531888229 547650275338882229 547690275345882236 54772027536788239 547780275387882329 547820275394882336 54785027541688249 547910275436882429 547950275443882436 54798027546588259 548040275485882529 548080275492882536 54811027551488269 548170275534882629 548210275541882636 54824027556388279 548300275583882729 548340275590882736 54837027561288289 548430275632882829 548470275639882836 54850027566188299 54854027569688319 548640275713883126 548700275134881725 54880027573788335 548860275750883318 54891027576588345GetGender 54894 548944102759108842327597788452person0 54899027593288435 54933027596888445GetGNAOfObject 54935 5493524302759828847327645488602obj0case4gender8 54940027601888485 549740276041884828 54978027605588495 550120276073884923 55016027609288505 550500276112885025 55054027613388515 550880276153885125 55092027617488525 55096027620188539 551000276216885324 551070276261885414 55111027630588565 551170276329885629 55123027635088575 551290276374885729 55135027639588585 551690276419885829 55175027644088595DetectPluralWord 55178 5517810802765968867327688288792at0n4i8w12swn16outcome20 55183027663688682 551880276646886812 55193027666188697 551960276665886911 55202027667888703 55210027670388713 552390276748887148 55242027675788723 55259027679688734 55265027683088744 552690276669886915 55278027685488772 55283027686588782SetPronoun 55286 5528616102770248886327723088922dword0value4x8 552910277059888710 552980277091888742 553040277065888716 55317027710688889 553690277155888913 554280277189888947 55435027721188915 55444027722988921PronounValue 55447 5544715002772358894327740888992dword0x4 554520277266889510 554590277298889542 554650277272889516 55478027731388969 555300277360889713 55595027739788985ResetVagueWords 55597 5559717027741389013277455890145obj0 556020277434890124 556110277454890144PronounNotice 55614 5561448202774608903327794189202obj0x4bm8g12 55619027749089045 556250277509890424 55628027751989062 55638027755189085 556840277585890910 556910277617890942 556970277591890916 55710027763289109 557760277686891113 55839027772089132 55886027777289143 55892027778589153 55938027781789168 559450277849891640 559510277823891614 55964027785989174 56030027790589185 56093027794089201PronounNoticeHeldObjects 56096 5609615302779468922327810089282x0 56101027800089242 561630278024892426 56244027805189262 56247027809189272YesOrNo 56249 5624918402782428935327892989532i0j4 56254027849489429 563160278548894263 56323027857489439 56339027861889449 56347027866889469 563510278717894713 563600278745894813 563870278807894913 56411027887389519 564200278910895146 56430027892889531YES_OR_NO_QUESTION_INTERNAL_R 56433 564336027893489553278966895535 564360278965895534NumberWord 56439 5643915202791048962327926589672o0i4n8 56444027912689635 564520279160896410 564590279173896423 564650279166896416 56472027918889659 565240279218896539 56589027925489665HIGHEST_DPMR_SCORE 40279502897710279524897732alt_match_list 5113784044false027952789791279572897946COBJ__Copy 56591 565914702795988982327967489852words0from4to8i12 56596027963389837 565990279638898312 56605027965489843 566260279647898321 56635027967389851COBJ__SwapMatches 56638 5663827202798348994328014690062i0x4 56643027987789962 56648027989889972 56657027993689982 56665027998090002 566720280004900026 56677028003090017 566810280035900112 56687028004990023 56745028007590033 56851028011890043 568970280040900117 56907028014590061ChooseObjects 56910 5691085302801519008328267991012obj0code4l8i12swn16spcount20 56915028019390092 56920028021590112 56928028025190133 56934028035790174 57004028055190234 57007028056690249 570110280571902414 57023028060590255 57080028065990265 57086028079290306 57089028081890325 570950280833903220 570990280594902437 57108028085490344 57111028087290372 57119028104790433 57123028106990443 57128028109390454 57134028112290465 57149028117590485 57162028121690504 57231028127490523 57235028129690533 57238028137890592 57243028138990602 57248028140890612 573040281454906148 57315028146590622 57372028151190633 57428028155690644 57433028157790654 57437028159790673 57446028162690684 574540281649906827 57462028165890694 574710281678906924 57475028168890704 575030281734907050 575110281740907056 57514028177290714 575590281841907173 575670281847907179 57571028186290724 57578028192290744 575820281942907424 575860281962907444 57590028198390754 57599028202390764 57622028214090784 576260282158907822 576300282178907842 57636028219890794 57640028221990804 57702028236690844 57707028237990854 57712028242690874 57719028245090884 577230282468908822 577270282488908842 57731028251190894 57736028253290904 57744028255490932 57749028257390942 57754028264890992 57759028266491002ScoreDabCombo 57763 577638402826849103328309291152a0b4result8 57768028271291042 577720282726910416 577750282747910437 577790282759910449 57783028277491052 57789028279891062 57793028282391072 577980282846910725 578030282856910735 57811028287891089 578160282888910819 57821028290391092 57829028292691102 578330282940911016 578370282952911028 578400282973911049 57844028307691142DefaultTopic 57847 578476028323191223283263912235 578500283245912217ParserError 57853 578532002832709126328335591292error_type0 57858028329591272 578620283311912718 57871028334691282Protect_I7_Arrays 51178284false028341191331283450913340EarlyInTurnSequence 497696028371791451283743914527IterationsOfTurnSequence 497700028374591461283776914632Main 57873 578739902837819148328423391632 57876028385691502 57883028386991512 578910283912915216 57898028395991543 57902028399091554 57907028402191564 579150284038915621 579190284052915635 579230284068915651 57927028408991574 57931028410891584 57940028414591594 57951028417991613 579630284221916145 57969028423291631VIRTUAL_MACHINE_STARTUP_R 57972 579722702843929170328451091752 57975028442091712 57984028446991722 57991028448791732 57997028450191742PLAYER_OBJECT_INIS 00284665918210284687918232START_OBJECT_INIS 10284698918310284719918331START_ROOM_INIS 20284730918410284749918429START_TIME_INIS 30284760918510284779918529DONE_INIS 40284790918610284803918623InitialSituation 511790204false028480691881284873918868INITIALISE_MEMORY_R 57999 579996702850289197328560892142 580020285071919823 58009028515992012 58013028523792032 58021028528692042 58030028533492052 58033028536092062 58036028538292082 58043028540892092 58050028547992102 58057028553092112 58064028559992132SEED_RANDOM_NUMBER_GENERATOR_R 58066 580664602857729221328587592252i0 58071028580792222 58074028581492229 58082028583692237 580860285841922312 580920285854922325 581010285849922320 58110028586692242POSITION_PLAYER_IN_MODEL_R 58112 5811216902860419232328675292542player_to_be0 58117028608492342 58124028610392352 58132028616092372 58142028619892382 58146028622192393 58155028627092403 58166028631592414 58186028638192428 58196028641792452 582020286447924532 582140286463924548 58226028650192469 582300286527924635 58237028655692482 582440286586924832 58251028661292502 582550286628925018 582580286653925043 582620286686925076 58270028670592522 58279028674392532ACTION_PRES 00286908926110286923926125NO_INPS_PRES 10286934926210286950926226INP1_PRES 20286961926310286974926323INP2_PRES 30286985926410286998926423PARSE_COMMAND_R 58281 582812602870519266328722192732 58284028706992672 58288028714492682 58291028717192702 58298028718992712 58305028721292722TreatParserResults 58307 583078402873729280328766692882 58310028739392812 583250287446928155 58330028746192832 58364028757092853 58375028761092863 583840287646928639 58388028766592881GENERATE_ACTION_R 58391 5839138102878179295328926393432i0 58396028783992962 58400028791492972 58404028794592992 58413028798593002 584160288010930027 584220288031930048 58426028805793022 584300288067930212 584340288077930222 58438028809793032 58451028814193043 584610288176930438 584660288191930453 58471028821393062 58484028825793073 584940288292930738 584990288307930753 58504028833093102 585110288345931017 585180288366931038 58524028838093112 585310288395931117 585380288418931140 58544028843593132 58550028845493143 58560028848993154 585660288512931527 585750288537931552 58578028855293164 58581028856693183 58586028858993194 58590028861493204 585960288637932027 58605028867093223 58613028869793233 58622028874693243 58640028879493254 58644028881693264 586490288831932619 58659028886293274 58677028892393285 58687028895993303 58696028900393332 58701028902293343 58708028905193353 58715028907893369 58730028911593382 587400289157933844 58748028917593392 587520289191933918 58755028921293412 587600289224934114 587670289244934134 58770028925493422GenerateMultipleActions 58772 5877219602894199350328990393632initial_location0k4item8 58777028946993512 58781028950493527 587850289509935212 58798028954293533 58844028957293543 58851028959293553 588560289609935520 588610289622935533 588830289663935574 588900289684935610 588950289697935623 589170289736935662 58921028975093573 589250289764935717 58928028977493583 58934028981393594 589400289836935927 589490289872935963 58952028988793604 589550289533935236 58965028990293631TIMED_EVENTS_R 58968 5896820102900519370329056993872i0d4event_timer8fire12rule16 58973029009993717 589770290104937112 58995029013893723 59014029018193734 590280290221937344 59031029023893744 59036029026393755 59076029029793765 590920290332937640 59099029036193785 59115029043593795 591260290461937931 59130029048293814 59134029049893825 59148029052893835 591570290131937139 59167029056093862SetTimedEvent 59169 5916915602907209394329110894032rule0event_time4absolute_time8i12b16 59174029077593957 591780290780939512 59195029081693963 592130290852939639 592170290857939644 59220029086893973 592400290911939746 592440290807939539 59253029092093992 592570290930939912 59268029097394002 59283029100394012 592870291022940121 59305029106794027 59322029110794031time_step 497704029125694101291272941017SetTime 59325 593253102912779412329137194152t0s4 59330029129494135 593340291308941319 593380291323941334 59342029134294145 593470291353941416 59353029137094151ADVANCE_TIME_R 59356 593566202915199422329186694362 59359029153994235 59365029155294245 59371029158494259 593760291604942529 593850291662942713 593930291687942813 593980291725942917 594040291753943017 59409029180994339 59416029185794352NOTE_OBJECT_ACQUISITIONS_R 59418 5941845202920269443329246494562obj0 59423029206294445 594850292089944432 59571029210994455 59578029210994455 59612029214594466 596250292182944643 59649029223194482 59711029226094493 59727029229594504 59803029231594512 59810029231594512 59854029242694533 59868029245594552RESURRECT_PLAYER_IF_ASKED_R 59870 598702802926259463329278794692 59873029265594642 59877029268194653 598840292701946523 59887029272994663 598900292743946617 598930292767946641 59896029277894682ASK_FINAL_QUESTION_R 59898 598983502929459476329311294832 59901029296894772 59907029299794793 59916029305094803 59923029307694813 59930029311194831READ_FINAL_ANSWER_R 59933 599335502932699490329342794972 59936029329194912 59943029331094922 59959029334594932 59972029338394942 59981029340994952 59986029341894962IMMEDIATELY_RESTART_VM_R 59988 599888029358595043293622950440 599910293611950429 599930293621950439IMMEDIATELY_RESTORE_SAVED_R 59996 5999617029378895113293856951171 599990293817951132 600030293833951148 600100293855951170IMMEDIATELY_QUIT_R 60013 600135029400895183294036951831 600160294028951823IMMEDIATELY_UNDO_R 60018 6001813029418895253294225952540 600210294208952523 600280294224952539PRINT_OBITUARY_HEADLINE_R 60031 6003114102943849532329487295482 60034029441595335 60040029443595345 60049029446295355 60055029447995365 600610294498953624 60070029453595375 600760294554953724 60085029459195385 600910294610953824 60100029464795395 60123029469295409 60129029471195419 60138029474295429 60144029476395445 60150029478095455 60158029480895465 601640294840954637 60170029486395475PRINT_FINAL_SCORE_R 60172 60172502950259555329511195582 60175029510295572DISPLAY_FINAL_STATUS_LINE_R 60177 601771302952729565329534495682 60180029530295662 601840295318956618 60188029533595672p3_list_grouping_key 150295488957610295524957646p4_printed_name 210295535957710295563957738p5_printed_plural_name 180295574957810295605957841p6_indefinite_article 50295616957910295647957941p7_description 100295658958010295686958038p8_map_region 160295697958110295723958136p9_initial_appearance 140295734958210295765958241p11_other_side 120295776958310295800958334p12_carrying_capacity 60295811958410295843958442p13_matching_key 230295854958510295881958537p15_plural_named 260295892958610295921958639p17_proper_named 280295932958710295957958735p19_ambiguously_plural 270295968958810296008958850p20_privately_named 300296019958910296056958947p22_lighted 80296067959010296086959029p24_visited 210296097959110296118959131p26_lit 80296129959210296144959225p28_edible 60296155959310296174959329p30_fixed_in_place 160296185959410296212959437p32_scenery 150296223959510296244959531p33_wearable 20296255959610296278959633p34_pushable_between_rooms 320296289959710296326959747p35_handled 110296337959810296356959829p37_undescribed 30296367959910296394959937p38_marked_for_listing 350296405960010296438960043p40_mentioned 310296449960110296474960135p42_enterable 70296485960210296510960235p44_transparent 200296521960310296550960339p45_open 130296561960410296576960425p47_openable 140296587960510296610960533p49_lockable 90296621960610296644960633p50_locked 100296655960710296674960729p52_female 240296685960810296704960829p54_neuter 250296715960910296734960929p55_switched_on 120296745961010296765961030p59 220296776961110296788961122p60 200296799961210296815961226p61 110296826961310296840961324p62 120296851961410296864961423p63 00296875961510296887961522p64 14920296898961610296918961630p65 330296929961710296947961728p66 340296958961810296977961829p67 80296988961910297010961932p68 70297021962010297042962031p69 90297053962110297076962133p70 190297087962210297110962233p71 250297121962310297136962325p72 310297147962410297161962424p73 260297172962510297187962525p74 320297198962610297212962624p75 15040297223962710297238962725p76 15060297249962810297263962824p77 270297274962910297289962925p78 15090297300963010297314963024p79 280297325963110297340963125p80 330297351963210297365963224p81 290297376963310297391963325p82 340297402963410297416963424p83 15150297427963510297442963525p84 15170297453963610297467963624p85 300297478963710297493963725p86 350297504963810297518963824p87 15210297529963910297544963925p88 15230297555964010297569964024p89 15250297580964110297596964126p90 15270297607964210297622964225p91 15290297633964310297649964326p92 15310297660964410297675964425p93 15330297686964510297702964526p94 15350297713964610297728964625p95 15370297739964710297755964726p96 15390297766964810297781964825p97 15410297792964910297808964926p98 15430297819965010297834965025p99 15450297845965110297861965126p100 15470297872965210297888965226p101 240297899965310297914965325p102 10297925965410297936965421p103 170297947965510297964965527p104 15520297975965610297995965630FBNA_PROP_NUMBER 2640298007965810298039965842p57_recurring264property_metadata 51181010084false02981089663130415998381attributed_property_offsets_SIZE 480304171984010304206984045attributed_property_offsets 5128181924false030420898411304278984171valued_property_offsets_SIZE 4130304289984210304351984272valued_property_offsets 51301016524false030435398431304415984363CreatePropertyOffsets 60190 60190230203044209845330887999372i0 601950304479984810 601980304484984815 602040304524984855 602500304520984851 602590304571984910 602620304576984915 602690304612984951 603170304608984947 60326030465098505 60385030470298515 60445030476698525 60505030482798535 60514030487798545 60523030492498555 60532030496798565 60541030501198575 60550030505998585 60559030510698595 60568030515098605 60628030519998615 60637030524398625 60646030528898635 60655030533398645 60715030539798655 60724030544898665 60733030549598675 60742030555198685 60751030560798695 60760030565398705 60769030570198715 60778030574798725 60787030579498735 60796030584298745 60805030589198755 60814030594198765 60823030599198775 60832030603898785 60841030608998795 60850030613998805 60859030619098815 60868030624198825 60878030629498835 60888030634098845 60898030639098855 60908030644098865 60918030648898875 60928030653698885 60938030658498895 60948030662898905 60959030667998915 60969030672398925 60979030677198935 60989030681798945 60999030686298955 61008030691098965 61069030696298975 61079030701698985 61089030707198995 61099030712599005 61109030717899015 61119030723399025 61129030728899035 61139030733599045 61149030738199055 61159030742899065 61169030747499075 61230030752199085 61291030756799095 61301030761499105 61362030766099115 61372030770799125 61382030775399135 61392030780099145 61402030784699155 61463030789399165 61524030793999175 61534030798699185 61544030803299195 61605030807999205 61666030812599215 61727030817399225 61788030822099235 61849030826899245 61910030831599255 61971030836399265 62032030841099275 62093030845899285 62154030850599295 62215030855399305 62276030860099315 62337030864899325 62398030869599335 62408030874199345 62418030878399355 62428030883199365 62489030887899371NUMBER_RULEBOOKS_CREATED 3620309023994510309053994540V0_printing_the_name 00309064994610309088994634V1_printing_the_plural_name 10309099994710309130994741V2_printing_a_number 20309141994810309165994834V3_printing_room_description 30309176994910309208994942V4_printing_inventory_detail 40309219995010309251995042V5_listing_contents 50309262995110309285995133V6_grouping_together 60309296995210309320995234V7_writing_a_paragraph_about 70309331995310309363995342V8_listing_nondescript_items 80309374995410309406995442V9_printing_the_name_of_a_da 90309417995510309449995542V10_printing_the_description 100309460995610309493995643V11_printing_the_announcemen 110309504995710309537995743V12_printing_the_announcemen 120309548995810309581995843V13_printing_a_refusal_to_ac 130309592995910309625995943V14_constructing_the_status_ 140309636996010309669996043V15_printing_the_banner_text 150309680996110309713996143V16_reading_a_command 160309724996210309750996236V17_deciding_the_scope 170309761996310309788996337V18_deciding_the_concealed_p 180309799996410309832996443V19_deciding_whether_all_inc 190309843996510309876996543V20_clarifying_the_parser_s_ 200309887996610309920996643V21_asking_which_do_you_mean 210309931996710309964996743V22_printing_a_parser_error 220309975996810310007996842V23_supplying_a_missing_noun 230310018996910310051996943V24_supplying_a_missing_seco 240310062997010310095997043V25_implicitly_taking 250310106997110310132997136V26_starting_the_virtual_mac 260310143997210310176997243V27_amusing_a_victorious_pla 270310187997310310220997343V28_printing_the_player_s_ob 280310231997410310264997443V29_handling_the_final_quest 290310275997510310308997543V30_printing_the_locale_desc 300310319997610310352997643V31_choosing_notable_locale_ 310310363997710310396997743V32_printing_a_locale_paragr 320310407997810310440997843V33_issuing_the_response_tex 330310451997910310484997943Activity_before_rulebooks 5146621404false0310487998113106399981153Activity_for_rulebooks 5148021404false0310642998313107919983150Activity_after_rulebooks 5149421404false0310794998513109469985153Activity_atb_rulebooks 515082351false0310949998713110529987104RELS_SYMMETRIC 327680311195999510311215999530RELS_EQUIVALENCE 163840311226999610311248999632RELS_X_UNIQUE 81920311259999710311278999729RELS_Y_UNIQUE 40960311289999810311308999829RELS_TEST 20480311319999910311334999925RELS_ASSERT_TRUE 1024031134510000103113671000032RELS_ASSERT_FALSE 512031137810001103114011000133RELS_SHOW 256031141210002103114271000225RELS_ROUTE_FIND 128031143810003103114591000331RELS_ROUTE_FIND_COUNT 64031147010004103114971000437RELS_LOOKUP_ANY 8031150810005103115291000531RELS_LOOKUP_ALL_X 4031154010006103115631000633RELS_LOOKUP_ALL_Y 2031157410007103115971000733RELS_LIST 1031160810008103116231000825REL_BLOCK_HEADER 101515264031171210012103117531001251PrintSceneName 62492 62492360311905100213312077100282value0 624970311966100245 6251003120071002526 6251903120451002618 625250312076100281A_PrintSceneName 62528 62528160312081100293312167100332value0 625330312144100325B_PrintSceneName 62544 62544200312171100343312262100382value0 625490312234100375R_PrintSceneName 62564 625641460312266100393312544100472a0b4 625690312356100435 6257703123781004327 625870312402100445 6259303124141004417 625960312428100455 6260203124391004516 626560312493100465PrintFigureName 62710 62710360312548100483312735100552value0 627150312610100515 6272803126551005230 6273703126971005318 627430312734100551A_PrintFigureName 62746 62746160312739100563312826100602value0 627510312803100595B_PrintFigureName 62762 62762200312830100613312922100652value0 627670312894100645R_PrintFigureName 62782 627821460312926100663313205100742a0b4 627870313017100705 6279503130391007027 628050313063100715 6281103130751007117 628140313089100725 6282003131001007216 628740313154100735PrintSoundName 62928 62928180313209100753313340100812value0 629330313270100785 6293703133031007918 629430313339100811A_PrintSoundName 62946 62946400313344100823313430100862value0 629510313407100855B_PrintSoundName 62986 62986440313434100873313525100912value0 629910313497100905R_PrintSoundName 63030 630301450313529100923313807101002a0b4 630350313619100965 6304303136411009627 630520313665100975 6305803136771009717 630610313691100985 6306703137021009816 631210313756100995PrintExternalFileName 63175 63175180313811101013313952101072value0 631800313879101045 6318403139121010518 631900313951101071A_PrintExternalFileName 63193 63193400313956101083314049101122value0 631980314026101115B_PrintExternalFileName 63233 63233440314053101133314151101172value0 632380314123101165R_PrintExternalFileName 63277 632771450314155101183314440101262a0b4 632820314252101225 6329003142741012227 632990314298101235 6330503143101012317 633080314324101245 6331403143351012416 633680314389101255E61 63422 634221270314444101273314902101392value0 634270314494101305 6344003145401013131 6345903145961013231 6347703146511013330 6349503147051013430 6351303147601013531 6353103148161013631 6354003148591013718 635460314901101391A_E61 63549 63549160314906101403314981101442value0 635540314958101435B_E61 63565 63565200314985101453315064101492value0 635700315037101485R_E61 63585 635851460315068101503315335101582a0b4 635900315147101545 6359803151691015427 636080315193101555 6361403152051015517 636170315219101565 6362303152301015616 636770315284101575E62 63731 637314880315339101593317478101902value0 637360315389101625 6374903154421016338 6376803155131016439 6378703155921016539 6380603156751016639 6382503157661016739 6384403158411016836 6386303159101016939 6388203159831017039 6390103160631017139 6392003161461017239 6393903162261017339 6395803163111017439 6397703163871017539 6399603164751017639 6401503165551017739 6403403166481017839 6405303167261017934 6407203167931018039 6409103168861018139 6411003169751018238 6412903170461018339 6414703171251018439 6416503171961018539 6418303172751018639 6420103173591018739 6421003174311018818 642160317477101901A_E62 64219 64219160317482101913317558101952value0 642240317534101945B_E62 64235 64235200317562101963317643102002value0 642400317614101995R_E62 64255 642551460317647102013317915102092a0b4 642600317726102055 6426803177481020527 642780317773102065 6428403177851020617 642870317799102075 6429303178101020716 643470317864102085E63 64401 644011080317919102103318303102212value0 644060317969102135 6441903180131021429 6443703180611021526 6445503181091021629 6447303181651021734 6449103182201021828 6450003182591021918 645060318302102211A_E63 64509 64509160318307102223318382102262value0 645140318359102255B_E63 64525 64525200318386102273318465102312value0 645300318438102305R_E63 64545 645451460318469102323318736102402a0b4 645500318548102365 6455803185701023627 645680318594102375 6457403186061023717 645770318620102385 6458303186311023816 646370318685102395E64 64691 646911270318740102413319263102532value0 646960318790102445 6470903188421024537 6472803189101024638 6474603189781024737 6476403190431024835 6478203191071024936 6480003191711025035 6480903192171025118 648150319262102531A_E64 64818 64818160319267102543319342102582value0 648230319319102575B_E64 64834 64834200319346102593319425102632value0 648390319398102625R_E64 64854 648541460319429102643319696102722a0b4 648590319508102685 6486703195301026827 648770319554102695 6488303195661026917 648860319580102705 6489203195911027016 649460319645102715E65 65000 65000540319700102733319916102812value0 650050319750102765 6501803197911027726 6503603198361027826 6504503198731027918 650510319915102811A_E65 65054 65054160319920102823319995102862value0 650590319972102855B_E65 65070 65070190319999102873320078102912value0 650750320051102905R_E65 65089 650891460320082102923320349103002a0b4 650940320161102965 6510203201831029627 651120320207102975 6511803202191029717 651210320233102985 6512703202441029816 651810320298102995E66 65235 65235720320353103013320644103102value0 652400320403103045 6525303204471030529 6527103205011030632 6528903205571030731 6529803205991030818 653040320643103101A_E66 65307 65307160320648103113320723103152value0 653120320700103145B_E66 65323 65323200320727103163320806103202value0 653280320779103195R_E66 65343 653431460320810103213321077103292a0b4 653480320889103255 6535603209111032527 653660320935103265 6537203209471032617 653750320961103275 6538103209721032716 654350321026103285PrintKindValuePair 65489 654899500321081103303323010103872k0v4 654940321173103345 655040321198103357 6551403212211033612 6553303212531033712 6555203212851033812 6557103213171033912 6559003213491034012 6560903213811034112 6562803214131034212 6564703214451034312 6566603214781034413 6568503215161034513 6570403215531034613 6572303215951034713 6574203216321034813 6576103216671034913 6578003217041035013 6579903217421035113 6581803217791035213 6583703218191035313 6585603218551035413 6587503218931035513 6589403219261035613 6591303219771035713 6593203220141035813 6595103220511035913 6597003220881036013 6598903221251036113 6600803221621036213 6602703222011036313 6604603222411036413 6606503222811036513 6608403223181036613 6610303223561036713 6612203223931036813 6614103224321036913 6616003224691037013 6617903225111037113 6619803225481037213 6621703225921037313 6623603226291037413 6625503226671037513 6627403227051037613 6629303227441037713 6631203227821037813 6633103228271037913 6634903228541038013 6636703228811038113 6638503229081038213 6640303229351038313 6642103229621038413 6643303229941038518 664360323009103871DefaultValueOfKOV 66439 664393510323014103883324085104262sk0k4 664440323096103925 664540323120103935 6646403231441039413 6647203231721039513 6648003231941039613 6648803232161039713 6649603232421039813 6651303232811039913 6652203233041040013 6653003233261040113 6653803233481040213 6655003233841040313 6655903234081040413 6657103234421040513 6657903234641040613 6659103234911040713 6660303235241040813 6661203235451040913 6662903235841041013 6663803236051041113 6665503236441041213 6666703236711041313 6667703236951041413 6668903237311041513 6670103237711041613 6671003237921041713 6671903238131041813 6673103238541041913 6674303239021042013 6675503239411042113 6676703239881042213 6677903240241042313 6678503240681042418 667870324084104261KOVComparisonFunction 66790 667902880324089104273325021104562k0 667950324153104305 668050324176104315 6681503242001043213 6682703242361043313 6683903242791043413 6685103243151043513 6686303243511043613 6687503243871043713 6688703244231043813 6689903244591043913 6691103244951044013 6692303245311044113 6693503245671044213 6694703246031044313 6695903246391044413 6697103246751044513 6698303247111044613 6699503247471044713 6700703247831044813 6701903248191044913 6703103248551045013 6704303248911045113 6705503249271045213 6706703249631045313 6707303250041045418 670750325020104561KOVDomainSize 67078 670781120325025104573325371104742k0 670830325081104605 670930325104104615 6710303251281046213 6711203251501046313 6712103251721046413 6712903251941046513 6713703252161046613 6714603252381046713 6715503252611046813 6716403252831046913 6717303253051047013 6718203253271047113 6718503253541047218 671870325370104741KOVIsBlockValue 67190 67190470325375104753325513104812k0 671950325433104785 672050325456104795 672350325504104805KOVSupportFunction 67237 67237940325517104823325904104962k0fail4 672420325612104865 672520325635104875 6726203256591048813 6727403256951048913 6728603257351049013 6729803257741049113 6731003258171049213 673160325860104945 6732003258701049415 673290325895104955I7_Kind_Name 67331 673312330325909104983326593105162k0 673360325964105015 6734503259821050123 673510326000105025 6736003260191050224 673660326038105035 6737503260611050328 673810326084105045 6739003261021050423 673960326120105055 6740503261431050528 674110326166105065 6742003261891050628 674260326212105075 6743503262341050727 674410326256105085 6745003262761050825 674560326296105095 6746503263161050925 674710326336105105 6748003263541051023 674860326371105115 6749503263911051125 675010326410105125 6751003264311051226 675160326451105135 6752503264721051326 675310326492105145 6754003265141051427 675460326535105155 6755503265661051536 675610326592105161RBNO_0 416125032660510518103266281051833RBNO_1 528032663910519103266611051932RBNO_2 529032667210520103267081052046RBNO_3 530032671910521103267571052148RBNO_4 531032676810522103267981052240RBNO_5 532032680910523103268361052337RBNO_6 416201032684710524103268751052438RBNO_7 416213032688610525103269091052533RBNO_8 416222032692010526103269451052635RBNO_9 416232032695610527103269811052735RBNO_10 416242032699210528103270231052841RBNO_11 416255032703410529103270571052933RBNO_12 539032706810530103270871053029RulebookOutcomePrintingRule 67564 67564290327091105313327240105362rbno0 675690327164105345 6757303271791053420 6758203272101053510 6759103272311053531KindHierarchy 5151171284false032737710545132764210545266IK1_First 583112032765310546103276811054638IK2_First 583144032769210547103277271054745IK3_First 1766032773810548103277591054831IK4_First 0032777010549103277891054929IK5_First 0032780010550103278191055029IK6_First 583336032783010551103278531055133IK7_First 0032786410552103278831055229IK8_First 583400032789410553103279131055329IK9_First 0032792410554103279431055429IK10_First 0032795410555103279741055530IK11_First 1776032798510556103280081055633IK12_First 0032801910557103280391055730IK13_First 0032805010558103280701055830IK14_First 0032808110559103281011055930IK15_First 0032811210560103281321056030No_Directions 12032814310561103281611056128DirectionObject_0 1766032821710563103282461056339DirectionObject_1 1784032825710564103282901056443DirectionObject_2 1786032830110565103283341056543DirectionObject_3 1788032834510566103283741056639DirectionObject_4 1790032838510567103284181056743DirectionObject_5 1792032842910568103284621056843DirectionObject_6 1794032847310569103285011056938DirectionObject_7 1796032851210570103285401057038DirectionObject_8 1798032855110571103285771057136DirectionObject_9 1800032858810572103286161057238DirectionObject_10 1168032862710573103286541057337DirectionObject_11 1167032866510574103286931057438Map_Storage 515245484false0328695105751328773105771VPH_Class4 58212003287761057913287911057916KOV_representatives 5152932124false032879310580132897110580179value_range265KOVP_43_P57 515505164true03291521058713291871058736KOVP_43_P7 515521164true03292411058913292751058935p14_adaptive_text_viewpoint266KOVP_47_P14 515537364true032944410595132964410595201K0_kind5 5822160329646105961329818106041K1_room6 5822480329821106061330063106171action_bitmap267K2_thing7 5822800330066106191330607106431K6_supporter8 5823120330610106451330888106591before268K8_person9 5823440330891106611331185106761K10_man10 5823760331188106781331405106881K11_woman11 5824080331408106901331626107001K12_animal12 5824400331629107021331817107101K4_door13 5824720331820107121332169107291K5_container14 5825040332172107311332535107481K14_vehicle15 5825360332538107501332763107601K15_player_s_holdall16 5825680332766107621333000107721K7_backdrop17 5826000333003107741333240107851K13_device18 5826320333243107871333464107971K9_region19 5826640333467107991333627108061p10_opposite269K3_direction20 5826960333630108081333889108201IK3_Count270IK3_Link271saved_short_name272cap_short_name273IK11_Count274IK11_Link275I71_swedish_language 1034560211313103456261131334I72_spanish_language 2034563711314103456611131434I73_french_language 3034567211315103456951131533I74_german_language 4034570611316103457291131633I75_english_language 5034574011317103457641131734I76_italian_language 6034577511318103457991131834I77_figure_of_cover 1034581011319103458331131933I78_entire_game 1034584411320103458631132029I80_didn_t_understand_error 1034587411321103459051132141I81_only_understood_as_far_a 2034591611322103459481132242I82_didn_t_understand_that_n 3034595911323103459911132342I83_can_only_do_that_to_some 4034600211324103460341132442I84_can_t_see_any_such_thing 5034604511325103460771132542I85_said_too_little_error 6034608811326103461171132639I86_aren_t_holding_that_erro 7034612811327103461601132742I87_can_t_use_multiple_objec 8034617111328103462031132842I88_can_only_use_multiple_ob 9034621411329103462461132942I89_not_sure_what_it_refers_ 10034625711330103462901133043I90_excepted_something_not_i 11034630111331103463341133143I91_not_a_verb_i_recognise_e 12034634511332103463781133243I92_not_something_you_need_t 13034638911333103464221133343I93_can_t_see_it_at_the_mome 14034643311334103464661133443I94_didn_t_understand_the_wa 15034647711335103465101133543I95_not_enough_of_those_avai 16034652111336103465541133643I96_nothing_to_do_error 17034656511337103465931133738I97_noun_did_not_make_sense_ 18034660411338103466371133843I98_referred_to_a_determinat 19034664811339103466811133943I99_i_beg_your_pardon_error 20034669211340103467241134042I100_can_t_again_the_address 21034673511341103467681134143I101_comma_can_t_begin_error 22034677911342103468121134243I102_can_t_see_whom_to_talk_ 23034682311343103468561134343I103_can_t_talk_to_inanimate 24034686711344103469001134443I104_didn_t_understand_addre 25034691111345103469441134543I106_present_tense 1034695511346103469771134632I107_past_tense 2034698811347103470071134729I108_perfect_tense 3034701811348103470401134832I109_past_perfect_tense 4034705111349103470781134937I110_future_tense 5034708911350103471101135031I112_first_person_singular 1034712111351103471511135140I113_second_person_singular 2034716211352103471931135241I114_third_person_singular 3034720411353103472341135340I115_first_person_plural 4034724511354103472731135438I116_second_person_plural 5034728411355103473131135539I117_third_person_plural 6034732411356103473521135638I119_nominative 1034736311357103473821135729I120_accusative 2034739311358103474121135829I122_neuter_gender 1034742311359103474451135932I123_masculine_gender 2034745611360103474811136035I124_feminine_gender 3034749211361103475161136134Global_Vars 515573404false0347518113621347864113731T0_final_question_options 515613244true03479971138313480751138379tab_0_0 515637324true03480771138413481501138474tab_0_1 515669324true03481521138513482001138549tab_0_2 515701324true034820211386134833511386134tab_0_3 515733324true034833711387134848111387145tab_0_4 515765324true034848311388134861011388128T1_locale_priorities 515797124true03486121138913486611138950tab_1_0 515809764true034866311390134892111390259tab_1_1 515885764true034892311391134917811391256TB_Blanks 51596191false03491801139213494211140412TableOfTables 515970204false03494231140513495131140591TC_KOV 67593 67593840349517114063350047114192tc0 675980349567114095 6760803495941141014 6761703496541141114 6762603497241141214 6763503497771141314 6764703498351141414 6765903499051141514 6766803499611141614 676710350027114185ActionData 51599018524true0350315114381354431115161AD_RECORDS 77035444211517103544571151725ANSTVC_7 67677 676771510354461115183354880115362pos0state4 676820354549115225 676880354575115239 6770603546081152342 677120354623115249 6772603546471152433 677320354662115259 6774603546861152533 677520354701115269 6776603547251152633 677720354740115279 6778603547641152733 677950354792115299 678010354807115309 678070354822115319 678130354837115329 678190354852115339 678250354869115355ANSTVC_9 67828 67828430354884115373355078115472pos0state4 678330354972115415 678390354998115429 6785303550221154233 678620355050115449 678680355067115465ANSTVC_11 67871 678711250355082115483355430115642pos0state4 678760355171115525 678820355197115539 6790003552201155332 679060355235115549 6792003552571155431 679260355272115559 6794003552901155527 679460355305115569 6796003553291155633 679690355357115589 679750355372115599 679810355387115609 679870355402115619 679930355419115635ANSTVC_12 67996 67996430355434115653355627115752pos0state4 680010355523115695 680070355549115709 6802103555711157031 680300355599115729 680360355616115745DB_Action_Details 68039 6803932380355631115763362614116612act0n4s8for_say12 680440355792115825 6805703558221158316 6807603558651158417 6808203558811158433 6808803559011158453 6809403559121158464 6811603559441158519 6812203559621158537 6812803559731158548 6813403559911158566 6814303560081158583 6815203560201158595 68158035603111585106 68164035604511585120 68170035606511585140 68176035607611585151 6819803561061158617 6820403561241158635 6821003561441158655 6821603561551158666 6823803561861158718 6824403562031158735 6825003562141158746 6825603562321158764 6826503562491158781 6827403562611158793 68280035627211587104 68286035628411587116 68292035630411587136 68298035631511587147 6832003563471158819 6832603563661158838 6833203563771158849 6833803563951158867 6834703564121158884 6835603564241158896 68362035643511588107 68368035644911588121 68374035646911588141 68380035648011588152 6840203565091158916 6840803565251158932 6841403565451158952 6842003565561158963 6844203565841159015 6844803565991159030 6845403566191159050 6846003566301159061 6848203566611159118 6848803566791159136 6849403566991159156 6850003567101159167 6852203567401159217 6854103567761159319 6854703567971159340 6855303568171159360 6855903568281159371 6858103568581159417 6860003568951159520 6860603569141159539 6861203569341159559 6861803569451159570 6864003569801159622 6864603570031159645 6865203570231159665 6865803570341159676 6868003570661159719 6868603570851159738 6869203571051159758 6869803571161159769 6872003571491159820 6872603571691159840 6873203571801159851 6873803571981159869 6874703572151159886 6875603572271159898 68762035723811598109 68768035725311598124 68774035727311598144 68780035728411598155 6881203573461159917 6881803573631159934 6882403573741159945 6883003573921159963 6883903574091159980 6884803574211159992 68854035743211599103 68860035744611599117 68866035746611599137 68872035747711599148 6889403575091160019 6890003575281160038 6890603575391160049 6891203575571160067 6892103575741160084 6893003575861160096 68936035759711600107 68942035761111600121 68948035763111600141 68954035764211600152 6897603576761160121 6898203576981160143 6898803577181160163 6899403577291160174 6901603577641160222 6902203577871160245 6902803578071160265 6903403578181160276 6905603578481160317 6906203578651160334 6906803578851160354 6907403578961160365 6909603579271160418 6910203579441160435 6910803579641160455 6911403579751160466 6913603580051160517 6914203580221160534 6914803580421160554 6915403580531160565 6917603580861160620 6918203581061160640 6918803581261160660 6919403581371160671 6921603581671160717 6922203581831160733 6922803581941160744 6923403582121160762 6924303582291160779 6925203582411160791 69258035825211607102 69264035826411607114 69270035828411607134 69276035829511607145 6929803583251160817 6930403583421160834 6931003583531160845 6931603583711160863 6932503583881160880 6933403584001160892 69340035841111608103 69346035842311608115 69352035844311608135 69358035845411608146 6938003584891160922 6938603585051160938 6939203585251160958 6939803585361160969 6942003585691161020 6942603585871161038 6943203585981161049 6943803586161161067 6944703586331161084 6945603586451161096 69462035865611610107 69468035866811610119 69474035868811610139 69480035869911610150 6950203587311161119 6950803587501161138 6951403587701161158 6952003587811161169 6954203588111161217 6954803588281161234 6955403588481161254 6956003588591161265 6958203588911161319 6958803589101161338 6959403589211161349 6960003589391161367 6960903589561161384 6961803589681161396 69624035897911613107 69630035899311613121 69636035901311613141 69642035902411613152 6967403590861161417 6968003591031161434 6968603591141161445 6969203591321161463 6970103591491161480 6971003591611161492 69716035917211614103 69722035918711614118 69728035920711614138 69734035921811614149 6976603592791161516 6977203592951161532 6977803593061161543 6978403593241161561 6979303593411161578 6980203593531161590 69808035936411615101 69814035937911615116 69820035939911615136 69826035941011615147 6985803594741161619 6986403594901161635 6987003595011161646 6987603595191161664 6988503595361161681 6989403595481161693 69900035955911616104 69906035957211616117 69912035959211616137 69918035960311616148 6994003596331161717 6995903596681161818 6996503596861161836 6997103597061161856 6997703597171161867 6999903597471161917 7000503597631161933 7001103597831161953 7001703597941161964 7003903598241162017 7004503598411162034 7005103598611162054 7005703598721162065 7007903599021162117 7008503599191162134 7009103599391162154 7009703599501162165 7011903599801162217 7012503599971162234 7013103600171162254 7013703600281162265 7015903600611162320 7016503600781162337 7017103600891162348 7017703601071162366 7018603601241162383 7019503601361162395 70201036014711623106 70207036015911623118 70213036017911623138 70219036019011623149 7024103602231162420 7024703602421162439 7025303602621162459 7025903602731162470 7028103603021162516 7030003603371162615 7031903603731162717 7032503603901162734 7033103604101162754 7033703604211162765 7035903604511162817 7037803604881162918 7039703605241163018 7040303605421163036 7040903605621163056 7041503605731163067 7043703606051163119 7044303606271163141 7044903606471163161 7045503606581163172 7047703606891163218 7048303607061163235 7048903607261163255 7049503607371163266 7051703607661163316 7052303607831163333 7052903608031163353 7053503608141163364 7055703608441163417 7057603608771163516 7058203608921163531 7058803609031163542 7059403609211163560 7060303609381163577 7061203609501163589 70618036096111635100 70624036097311635112 70630036099311635132 70636036100411635143 7065803610351163618 7066403610531163636 7067003610731163656 7067603610841163667 7069803611151163718 7071703611551163818 7072303611731163836 7072903611931163856 7073503612041163867 7075703612331163916 7076303612501163933 7076903612701163953 7077503612811163964 7079703613121164018 7080303613291164035 7080903613401164046 7081503613581164064 7082403613751164081 7083303613871164093 70839036139811640104 70845036141011640116 70851036143011640136 70857036144111640147 7088903615081164122 7090803615461164216 7091403615621164232 7092003615821164252 7092603615931164263 7094803616241164318 7095403616421164336 7096003616621164356 7096603616731164367 7098803617041164418 7100703617391164517 7102603617831164617 7104503618281164720 7106403618761164820 7108303619241164919 7110203619791165021 7112103620441165122 7114003621081165220 7115903621691165318 7117803622181165419 7119603622871165519 7121403623581165619 7123203624391165721 7125003625021165822 7126803625651165921 712740362613116611ActionCoding 5178423084false03626171166313633191167356ActionHappened 518150204false03633231167613633571167635InvSub 71277 71277200363363116793363413116812 712800363376116805TakeSub 71297 71297200363417116823363468116842 713000363431116835RemoveSub 71317 71317200363472116853363525116872 713200363488116865DropSub 71337 71337200363529116883363580116902 713400363543116895PutOnSub 71357 71357200363584116913363636116932 713600363599116925InsertSub 71377 71377200363640116943363693116962 713800363656116955EatSub 71397 71397200363697116973363747116992 714000363710116985GoSub 71417 71417200363751117003363800117022 714200363763117015EnterSub 71437 71437200363804117033363856117052 714400363819117045ExitSub 71457 71457200363860117063363911117082 714600363874117075GetOffSub 71477 71477200363915117093363968117112 714800363931117105LookSub 71497 71497200363972117123364023117142 715000363986117135ExamineSub 71517 71517200364027117153364081117172 715200364044117165LookUnderSub 71537 71537200364085117183364141117202 715400364104117195SearchSub 71557 71557200364145117213364198117232 715600364161117225ConsultSub 71577 71577200364202117243364256117262 715800364219117255LockSub 71597 71597200364260117273364311117292 716000364274117285UnlockSub 71617 71617200364315117303364368117322 716200364331117315SwitchOnSub 71637 71637200364372117333364427117352 716400364390117345SwitchOffSub 71657 71657200364431117363364487117382 716600364450117375OpenSub 71677 71677200364491117393364542117412 716800364505117405CloseSub 71697 71697200364546117423364598117442 717000364561117435WearSub 71717 71717200364602117453364653117472 717200364616117465DisrobeSub 71737 71737200364657117483364711117502 717400364674117495GiveSub 71757 71757200364715117513364766117532 717600364729117525ShowSub 71777 71777200364770117543364821117562 717800364784117555WakeOtherSub 71797 71797200364825117573364881117592 718000364844117585ThrowAtSub 71817 71817200364885117603364939117622 718200364902117615AttackSub 71837 71837200364943117633364996117652 718400364959117645KissSub 71857 71857200365000117663365051117682 718600365014117675AnswerSub 71877 71877200365055117693365108117712 718800365071117705TellSub 71897 71897200365112117723365163117742 719000365126117735AskSub 71917 71917200365167117753365217117772 719200365180117765AskForSub 71937 71937200365221117783365274117802 719400365237117795WaitSub 71957 71957200365278117813365329117832 719600365292117825TouchSub 71977 71977200365333117843365385117862 719800365348117855WaveSub 71997 71997200365389117873365440117892 720000365403117885PullSub 72017 72017200365444117903365495117922 720200365458117915PushSub 72037 72037200365499117933365550117952 720400365513117945TurnSub 72057 72057200365554117963365605117982 720600365568117975PushDirSub 72077 72077200365609117993365663118012 720800365626118005SqueezeSub 72097 72097200365667118023365721118042 721000365684118035YesSub 72117 72117200365725118053365775118072 721200365738118065NoSub 72137 72137200365779118083365828118102 721400365791118095BurnSub 72157 72157200365832118113365883118132 721600365846118125WakeSub 72177 72177200365887118143365938118162 721800365901118155ThinkSub 72197 72197200365942118173365994118192 722000365957118185SmellSub 72217 72217200365998118203366050118222 722200366013118215ListenSub 72237 72237200366054118233366107118252 722400366070118245TasteSub 72257 72257200366111118263366163118282 722600366126118275CutSub 72277 72277200366167118293366217118312 722800366180118305JumpSub 72297 72297200366221118323366272118342 723000366235118335TieSub 72317 72317200366276118353366326118372 723200366289118365DrinkSub 72337 72337200366330118383366382118402 723400366345118395SorrySub 72357 72357200366386118413366438118432 723600366401118425SwingSub 72377 72377200366442118443366494118462 723800366457118455RubSub 72397 72397200366498118473366548118492 724000366511118485SetToSub 72417 72417200366552118503366604118522 724200366567118515WaveHandsSub 72437 72437200366608118533366664118552 724400366627118545BuySub 72457 72457200366668118563366718118582 724600366681118575ClimbSub 72477 72477200366722118593366774118612 724800366737118605SleepSub 72497 72497200366778118623366830118642 725000366793118635QuitSub 72517 72517200366834118653366885118672 725200366848118665SaveSub 72537 72537200366889118683366940118702 725400366903118695RestoreSub 72557 72557200366944118713366998118732 725600366961118725RestartSub 72577 72577200367002118743367056118762 725800367019118755VerifySub 72597 72597200367060118773367113118792 726000367076118785ScriptOnSub 72617 72617200367117118803367172118822 726200367135118815ScriptOffSub 72637 72637200367176118833367232118852 726400367195118845VersionSub 72657 72657200367236118863367290118882 726600367253118875ScoreSub 72677 72677200367294118893367346118912 726800367309118905LMode3Sub 72697 72697200367350118923367403118942 727000367366118935LMode2Sub 72717 72717200367407118953367460118972 727200367423118965LMode1Sub 72737 72737200367464118983367517119002 727400367480118995NotifyOnSub 72757 72757200367521119013367576119032 727600367539119025NotifyOffSub 72777 72777200367580119043367636119062 727800367599119055PronounsSub 72797 72797200367640119073367695119092 728000367658119085MistakeActionSub 72817 72817270367700119113367840119162 728200367723119125 7282503677791191318 728370367827119155 728410367839119161R_9 72844 72844770369361119563369766119672tmp_00tmp_14 728490369492119605 7285403695091196022 7286703695861196210 7288903696311196255 7290303696241196248 729070369715119649 729190369757119669R_10 72921 72921400369866119713370016119762 729240369877119725 7292903698941197222 729420369960119745 729590370007119755R_11 72961 72961400370111119803370266119852 729640370122119815 7296903701391198122 729820370210119835 729990370257119845R_12 73001 73001270370359119893370495119942 730040370370119905 7300903703871199022 730220370462119925 730260370486119935R_13 73028 73028410370582119983370748120032 730310370593119995 7303603706101199922 730490370664120015 730530370696120025 7306003707111200220 7306703707391200248R_14 73069 73069460370845120073370968120122 730720370856120085 7307703708731200822 730900370919120105 731130370959120115R_16 73115 73115400372414120453372564120502 731180372425120465 7312303724421204622 731360372508120485 731530372555120495R_15 73155 73155400372684120543372830120592 731580372695120555 7316303727121205522 731760372774120575 731930372821120585R_17 73195 73195400372911120633373061120682 731980372922120645 7320303729391206422 732160373005120665 732330373052120675R_18 73235 73235400373154120723373477120822 732380373165120735 7324303731821207322 732560373260120755 732620373348120779 732690373430120799 732730373468120819R_19 73275 73275400374311120993374464121042 732780374322121005 7328303743391210022 732960374408121025 733130374455121035R_20 73315 73315320374560121083374737121132 733180374571121095 7332303745881210922 733360374676121115 733450374728121125R_799 73347 73347440375287121233375438121282 733500375299121245 7335503753161212422 733690375383121265 733890375429121275R_65 73391 733911660376152121393376965121522tmp_00 733960376217121425 734220376373121435 7342703763901214322 734400376466121455 734670376631121479 734710376680121489 7347803766951214824 7348103767071214836 73507037677112148100 735100376814121499 7351703768291214924 7352403768531214948 7353003768981215016 7353703769191215037 735550376956121519R_22 73557 73557510378442121833378894121912 735600378453121845 7356503784701218422 735780378569121865 735830378713121889 735870378810121899 7359403788251218924 736060378885121909R_21 73608 73608380379017121953379340122032 736110379028121965 7361603790451219622 736290379144121985 736340379276122009 736440379331122029R_23 73646 73646430379425122073379581122122 736490379436122085 7365403794531220822 736670379513122105 736870379572122115R_24 73689 73689430379667122163379824122212 736920379678122175 7369703796951221722 737100379756122195 737300379815122205R_25 73732 73732330379929122253380045122302 737350379940122265 7374003799571222622 737530380005122285 7376003800251222825 737630380036122295R_151 73765 73765420381012122453381238122552I7RBLK0 737700381030122465 737730381050122475 737810381075122485 737840381098122495 737870381121122505 737950381146122515 737980381169122525 738010381192122535 738040381212122545KERNEL_0 73807 738075620381242122563384674123452tmp_00tmp_14tmp_28 738120381425122615 738230381489122625 738280381506122635 7383303815231226322 738470381616122655 738730381725122675 739050381851122695 739590382038122719 739840382127122757 739870382186122775 7400503822721228011 740100382380122829 741310383282123079 7414803833681230913 741530383450123135 741700383542123159 741950383672123179 743130384563123425 7434103846091234312 7434803846301234333 743670384665123445R_174 74369 743691000384766123493385094123572 743720384778123505 743820384844123515 743870384861123525 7439203848781235222 744060384971123545 7444103850291235512 7444803850501235533 744670385085123565R_186 74469 744691590385236123613385975123782 744720385248123625 744830385314123635 744880385331123645 7449303853481236422 745070385411123665 745130385498123689 745200385621123715 745450385747123735 745700385863123755 7460003859101237612 7460703859311237633 746260385966123775R_26 74628 746281000387517124033387948124162 746310387528124045 7463603875451240422 746490387622124065 746660387699124085 746760387786124109 747030387893124139 747260387939124159R_27 74728 747281000388070124203388420124292 747310388081124215 7473603880981242122 747490388181124235 747920388275124247 7480203883001242432 7481403883491242512 748230388390124267 748260388411124285R_28 74828 74828610388546124333388724124382 748310388557124345 7483603885741243422 748490388647124365 748870388715124375R_29 74889 74889800388846124423389119124502 748920388857124435 7489703888741244322 749100388935124455 749470389037124479 749670389110124499R_30 74969 749691100389273124543389750124672 749720389284124555 7497703893011245522 749900389373124575 750260389493124599 750430389578124619 7505303896731246313 7507703897411246613R_31 75079 750791350389873124713390270124792 750820389884124725 7508703899011247222 751000390007124745 751740390179124769 752120390261124789R_32 75214 75214330390366124833390482124882 752170390377124845 7522203903941248422 752350390442124865 7524203904621248625 752450390473124875R_33 75247 75247390391651125053391853125132 752500391662125065 7525503916791250622 752680391740125085 752740391799125109 7528103918191251029 752840391844125129R_34 75286 75286520392004125173392289125252 752890392015125185 7529403920321251822 753070392130125205 753260392235125229 7533303922551252229 753360392280125249R_35 75338 75338640392439125293392714125372 753410392450125305 7534603924671253022 753590392556125325 753900392660125349 7539703926801253429 754000392705125369R_36 75402 75402640392871125413393164125492 754050392882125425 7541003928991254222 754230393002125445 754540393110125469 7546103931301254629 754640393155125489R_37 75466 75466420393831125603394023125682 754690393842125615 7547403938591256122 754870393908125635 754960393969125659 7550303939891256529 755060394014125679R_800 75508 755081090394822125803395359125882 755110394834125815 755400394973125825 7554503949901258222 755590395083125845 755630395156125855 7557003951711258520 7557603952311258580 75579039525912585108 75586039527612585125 7558903952941258612 7559603953151258633 756150395350125875R_801 75617 756171800395543125913396028126022 756200395555125925 757100395763125935 757150395780125945 7572003957971259422 757340395845125965 757570395916125985 757590395928125995 7576603959451259922 7576903959631260012 7577603959841260033 757950396019126015R_802 75797 757971280396597126123397316126212 758000396609126135 758430396793126145 758480396810126155 7585303968271261522 758670396959126175 758710397071126185 7587803970861261820 75884039718512618119 75887039721312618147 75894039723312618167 7589703972511261912 7590403972721261933 759230397307126205R_38 75925 759251170398261126343398619126432 759280398272126355 759760398418126365 759810398435126375 7598603984521263722 759990398506126395 7601203985371263936 7601503985561264112 7602203985771264133 760400398610126425R_242 76042 760421170398721126473399079126562 760450398733126485 760910398877126495 760960398894126505 7610103989111265022 761150398965126525 7612803989951265235 7613103990141265412 7613803990351265433 761570399070126555R_66 76159 761591090399876126673400447126812tmp_00 761640399954126705 762050400124126715 7621004001411267122 762230400217126735 762270400276126759 762290400349126785 7624104003841267912 7624804004051267933 762660400438126805R_67 76268 762681440401254126923401847127022tmp_00 762730401318126955 763140401488126965 7631904015051269622 763320401579126985 763360401635126995 7634304016501269920 7634604016621269932 7637204017151269985 76375040174612699116 76382040176612699136 7638504017841270012 7639204018051270033 764100401838127015R_68 76412 764121510402642127133403355127262tmp_00 764170402706127165 764580402876127175 7646304028931271722 764760402964127195 764800403012127205 7648704030271272020 765030403079127215 7651004030941272120 765160403196127225 765260403254127235 7653304032741272325 7653604032921272412 7654304033131272433 765610403346127255R_69 76563 76563460404028127373404151127422 765660404039127385 7657104040561273822 765840404102127405 766070404142127415R_74 76609 766091830405879127613406488127722 766120405890127625 766290405976127635 766930406222127645 7669804062391276422 767110406285127665 7672404063131276633 767270406325127685 7673404063451276825 7673704063631276912 7674404063841276933 7676504064251277012 7677204064461277033 767900406479127715R_70 76792 767921630406680127763407248127872 767950406691127775 768080406786127785 768560406982127795 7686104069991277922 768740407045127815 7688704070731278133 768900407085127835 7689704071051278325 7690004071231278412 7690704071441278433 7692804071851278512 7693504072061278533 769530407239127865R_73 76955 769551810407484127913408089128022 769580407495127925 769890407627127935 770370407823127945 7704204078401279422 770550407886127965 7706804079141279633 770710407926127985 7707804079461279825 7708104079641279912 7708804079851279933 7710904080261280012 7711604080471280033 771340408080128015R_72 77136 771361800408309128063408905128172 771390408320128075 771690408443128085 772170408639128095 7722204086561280922 772350408702128115 7724804087301281133 772510408742128135 7725804087621281325 7726104087801281412 7726804088011281433 7728904088421281512 7729604088631281533 773140408896128165R_71 77316 773161670409095128213409654128322 773190409106128225 773360409192128235 773840409388128245 7738904094051282422 774020409451128265 7741504094791282633 774180409491128285 7742504095111282825 7742804095291282912 7743504095501282933 7745604095911283012 7746304096121283033 774810409645128315R_75 77483 77483830410828128493411189128572 774860410839128505 775000410941128515 7750504109581285122 775180411047128535 775290411087128545 7753604111071285425 7753904111251285512 7754604111461285533 775640411180128565R_76 77566 77566830411338128613411700128692 775690411349128625 775830411452128635 7758804114691286322 776010411558128655 776120411598128665 7761904116181286625 7762204116361286712 7762904116571286733 776470411691128685R_77 77649 77649980411851128733412335128812 776520411862128745 776660411961128755 7767104119781287522 776840412077128775 776880412158128785 7769504121731287820 7770704122051287852 7771004122331287880 77717041225312878100 7772004122711287912 7772704122921287933 777450412326128805R_162 77747 777471150412479128853413093129012tmp_00 777520412543128885 777680412637128895 7777304126541288922 777870412751128915 778140412879128939 778220412955128969 778240412981128989 7783104130011289829 7783404130231289916 7784104130441289937 778600413084129009R_79 77862 778626450413902129163418380129932tmp_00tmp_14tmp_28ct_012ct_116 778670414168129235 7787204141851292322 778850414251129267 778880414328129285 7789104143401292817 7789404143631292912 779160414468129318 779300414436129308 779450414508129328 779580414640129349 7798804148501293613 7802604150421293817 7804104151671294021 7805104152951294521 7805404153071294533 780570415371129465 780630415445129489 780780415549129515 780820415597129525 7808904156121295220 781450415848129535 7814804158601295317 7815104158831295412 781730415988129568 781870415956129558 782020416028129578 782160416161129599 7824704163721296113 7828604165651296317 7830204166901296521 7830604167561296621 7831304167711296636 7833304169041296721 7833904170041296921 7834504171141297125 7835704172111297329 7836104172601297429 7836804172751297444 7837404173811297625 7837804174351297725 7838504174501297740 7844404177221297925 7844804178231298129 7845204178721298229 7845904178871298244 7846504179441298329 7847204179591298344 7847804180711298529 7848204181211298629 7848904181361298644 7849904183481299229 7850204183601299241 7850504183711299252R_78 78507 78507460418475129973418695130022 785100418486129985 7851504185031299822 785280418570130005 785320418619130015 7853904186341300120 7855104186861300172R_80 78553 785533320419365130133421490130492tmp_00tmp_14ct_08ct_112 785580419567130195 7856304195841301922 785760419669130215 7857904196811302117 7858204197041302212 786040419809130248 786180419777130238 786330419849130258 786470419981130279 7867804201911302913 7871604203881303117 7874104205461303321 7875604206801303525 7878204208811303825 7880204210191304121 7880904210391304141 7881604211541304621 7881904211661304633 788220421239130475 788260421306130485 7883304213211304820 78880042145113048150 78883042148113048180R_83 78885 788851210422379130623423079130812tmp_00tmp_14ct_08ct_112 788900422569130685 7889504225861306822 789080422656130705 789160422740130725 7891904227521307217 7892204227751307312 789440422875130758 789580422843130748 789720422915130768 789850422999130789 789980423047130809 7900104230591308021 7900404230701308032R_84 79006 79006410423222130853423606130972tmp_00 790110423289130885 7901604233061308822 790290423382130917 790330423493130935 790430423585130955 790450423597130965R_85 79047 790471550424472131103425562131362tmp_00tmp_14tmp_28ct_012ct_116 790520424725131175 7905704247421311722 790700424818131207 790740424931131225 790890425033131245 7909204250451312417 7909504250681312512 791170425168131278 791310425136131268 791450425208131288 791580425355131309 791820425454131329 7918504254661313221 791880425510131335 791900425522131345 7919704255421313425 792000425553131355R_86 79202 7920212380425691131403434025132772tmp_00tmp_14tmp_28tmp_312tmp_416tmp_520ct_024ct_128 792070426122131505 7921204261391315022 792250426215131537 792290426289131567 7923204263601315810 7925404264051315855 7926804263981315848 792720426498131609 792840426593131635 7928704266051316317 7929004266281316412 793120426728131668 793260426696131658 793400426768131678 793530426887131699 7936904270111317113 793890427134131749 793980427172131769 7940104271841317621 794040427250131775 7941004273351317914 7943204273801317959 7944604273731317952 7945004274681318113 7946204275761318317 794740427721131879 794840427845131899 7949404279621319113 7950804281361319413 7952204282651319617 7952804283601319821 7953204284111319921 7953904284261319936 7960804287391320121 7964004288981320325 7964404289691320425 7965104289841320440 7971904292831320625 7972304293541320725 7973004293691320740 7979504296851321017 7980704298111321221 7981104298941321321 7981804299091321336 7988604302111321521 7989004302891321621 7989704303041321636 7996204305821321919 7996504306761322219 7996904307961322422 7999104308411322467 8000504308341322460 8000904309761322621 8002304311031322825 8002704312431323029 8004004314061323329 8004304315551323721 8005504316841323925 8006704318441324317 8007504319841324517 8009604322841324721 8016504324591325021 8016904325511325121 8017604325661325136 8018304325661325136 8019904326221325224 8022704327061325325 8024404327801325525 8026804328251325623 8027804330261325917 8028404331211326121 8028804331721326221 8029504331871326236 8037804335041326417 8038204335411326517 8038904335561326532 8039504336061326617 8040204336211326632 8040904336451326656 8041204337231326717 8041604338571327013 804260433973132745 804280433985132755 8043504340051327525 804380434016132765R_87 80440 804401820434773132883435489133102tmp_00tmp_14 804450434894132925 8045004349111329222 804630434987132957 804670435086132987 805230435156133005 805390435257133029 805490435364133049 806080435437133075 806100435449133085 8061704354691330825 806200435480133095R_94 80622 806223100437812133373439407133612tmp_00tmp_14tmp_28 806270438000133425 806690438174133435 8067404381911334322 8068704383441334510 8073104384251334591 8075604384181334584 807610438606133479 8081604388261334913 8082504389161335113 8082904389751335213 8083604389901335228 8083904390021335240 8086504390561335294 8086804391281335313 8087204391721335413 8087904391871335428 8088604392111335452 808930439294133575 808950439306133585 8090204393261335825 8090504393441335912 8091204393651335933 809300439398133605R_88 80932 809321250439603133653440206133802tmp_00 809370439667133685 809780439837133695 8098304398541336922 809960439920133715 810090440023133739 810180440093133765 810200440105133775 8102704401251337725 8103004401431337812 8103704401641337833 810550440197133795R_89 81057 810571240440391133843440975133992tmp_00 810620440455133875 811030440625133885 8110804406421338822 811210440699133905 811330440792133929 811420440862133955 811440440874133965 8115104408941339625 8115404409121339712 8116104409331339733 811790440966133985R_90 81181 811811240441170134033441758134182tmp_00 811860441234134065 812270441404134075 8123204414211340722 812450441482134095 812570441575134119 812660441645134145 812680441657134155 8127504416771341525 8127804416951341612 8128504417161341633 813030441749134175R_91 81305 813051240441945134223442526134372tmp_00 813100442009134255 813510442179134265 8135604421961342622 813690442259134285 813810442344134309 813900442413134335 813920442425134345 8139904424451343425 8140204424631343512 8140904424841343533 814270442517134365R_92 81429 814291990442709134413444067134702tmp_00 814340442773134445 814760442943134455 8148104429601344522 814940443023134475 815060443113134499 8151004431931345113 8151404432491345213 8152104432641345228 815280443396134549 815380443506134569 8154204435911345813 8156204436921346013 8157104437841346213 8157504438411346313 8158204438561346328 815890443954134665 815910443966134675 8159804439861346725 8160104440041346812 8160804440251346833 816260444058134695R_93 81628 816285030444253134743447262135202tmp_00tmp_14tmp_28 816330444433134795 816750444603134805 8168004446201348022 816930444683134825 817060444871134849 8176204451151348613 8178204452291348813 8178604452881348913 8179304453031348928 8179604453151348940 8182204453691348994 8182504454451349013 8182904454891349113 8183604455041349128 8184304455281349152 8184604456221349213 8185904457481349422 8188304458051349479 8189804457981349472 8190204459321349621 8191104460361349821 8192304461671350025 8193504463101350417 8193904463661350517 8194604463811350532 8198404467281350617 8204904468281350817 8205304468651350917 8206004468801350932 8206604469301351017 8207304469451351032 8208004469691351056 8208304470591351213 820920447149135165 820940447161135175 8210104471811351725 8210404471991351812 8211104472201351833 821290447253135195R_96 82131 821313970447463135243449743135632tmp_00tmp_14tmp_28 821360447643135295 821780447813135305 8218304478301353022 821960447928135325 822230448075135349 8223604481561353613 8224504482731353818 8226904483321353877 8228404483251353870 8228804484511354017 8229704485461354217 8230904486681354421 8232104488081354813 8234104489111355013 8234504489631355113 8235204489781355128 8239004493211355213 8245504494131355413 8245904494461355513 8246604494611355528 8247204495071355613 8247904495221355628 8248604495461355652 824890449630135595 824910449642135605 8249804496621356025 8250104496801356112 8250804497011356133 825260449734135625R_97 82528 825284230449946135673452368136062tmp_00tmp_14tmp_28 825330450126135725 825750450296135735 8258004503131357322 825930450473135755 826460450700135779 8265904507811357913 8266804508981358118 8269204509571358177 8270704509501358170 8271104510761358317 8272004511711358517 8273204512931358721 8274404514331359113 8276404515361359313 8276804515881359413 8277504516031359428 8281304519461359513 8287804520381359713 8288204520711359813 8288904520861359828 8289504521321359913 8290204521471359928 8290904521711359952 829120452255136025 829140452267136035 8292104522871360325 8292404523051360412 8293104523261360433 829490452359136055R_98 82951 829511450453190136193453661136302 829540453201136205 829610453228136215 8296604532451362122 829790453328136235 830370453425136259 830410453486136269 8304804535011362624 8306004535331362656 8306304535631362686 8306904535951362816 8307604536161362837 830940453652136299R_99 83096 830961460453789136343454307136432 830990453800136355 831060453827136365 8311104538441363622 831240453923136385 831280453984136395 8313504539991363920 831470454198136405 8321504542451364112 8322204542661364133 832400454298136425R_100 83242 83242970455047136543455648136652 832450455059136555 832490455132136565 832540455149136575 8325904551661365722 832720455262136595 832830455405136619 832870455485136629 8329404555001366224 8330604555321366256 8331204555791366316 8331904556001366337 833370455639136649R_101 83339 833391020457662136983458300137142 833420457674136995 833460457747137005 833510457764137015 8335604577811370122 833690457842137035 833760457912137059 8338204580111370713 8338604580811370813 8339304580961370828 8340504581281370860 834080458199137109 8341404582311371216 8342104582521371237 834390458291137139R_102 83441 834411120458422137183459100137342 834440458434137195 834480458507137205 834530458524137215 8345804585411372122 834710458601137235 834880458680137259 8349404587951372713 8349804588811372813 8350504588961372828 8351704589281372860 835200458999137309 8352604590311373216 8353304590521373237 835510459091137339R_103 83553 835531430459225137383460101137562tmp_00 835580459291137415 835620459364137425 835670459381137435 8357204593981374322 835850459488137455 836230459628137479 8362904597571374913 8363304598571375013 8364004598721375028 8366004599291375085 836630460000137529 8366904600321375416 8367604600531375437 836940460092137559R_104 83696 836961770460231137603461662137902tmp_00tmp_14 837010460356137645 837060460429137655 837110460446137665 8371604604631376622 837290460574137697 837410460690137727 837520460813137745 837620460925137769 8377804610131377813 8378404611471378017 8378804612481378117 8379504612631378132 83824046134513781114 8382704614241378313 838300461529137869 8384604615931378816 8385304616141378837 838710461653137899R_105 83873 838731480461789137943462820138202tmp_00 838780461852137975 838830461925137985 838880461942137995 8389304619591379922 839060462016138027 839110462088138045 839310462226138069 839440462306138095 839480462379138119 8395404624921381313 8395804625761381413 8396504625911381428 8398504626481381485 839880462719138169 8399404627511381816 8400104627721381837 840190462811138199R_106 84021 840211240462948138243463935138452tmp_00 840260463023138275 840300463096138285 840350463113138295 8404004631301382922 840530463241138327 840650463328138345 840720463398138369 8407804635591383813 8408204636911383913 8408904637061383928 8410904637631383985 841120463834138419 8411804638661384316 8412504638871384337 841430463926138449R_107 84145 841451250464065138493464821138652 841480464077138505 841520464150138515 841570464167138525 8416204641841385222 841750464287138545 842050464403138569 8421104645171385813 8421504646021385913 8422204646171385928 8423404646491385960 842370464720138619 8424304647521386316 8425004647731386337 842680464812138649R_108 84270 842701080464938138693465608138852 842730464950138705 842770465023138715 842820465040138725 8428704650571387222 843000465116138745 843130465194138769 8431904653061387813 8432304653891387913 8433004654041387928 8434204654361387960 843450465507138819 8435104655391388316 8435804655601388337 843760465599138849R_109 84378 843781120465727138893466377139052 843810465739138905 843850465812138915 843900465829138925 8439504658461389222 844080465909138945 844250465993138969 8443104660901389813 8443504661581389913 8444204661731389928 8445404662051389960 844570466276139019 8446304663081390316 8447004663291390337 844880466368139049R_110 84490 844901080466508139093467183139252 844930466520139105 844970466593139115 845020466610139125 8450704666271391222 845200466693139145 845330466771139169 8453904668821391813 8454304669641391913 8455004669791391928 8456204670111391960 845650467082139219 8457104671141392316 8457804671351392337 845960467174139249R_111 84598 845983420467339139293470198139772tmp_00tmp_14tmp_28tmp_312 846030467605139355 846080467678139365 846130467695139375 8461804677121393722 846310467840139395 846550467993139419 8468304681451394415 8468604682721394618 8470804683191394665 8472204683121394658 8472604684761394817 8474404686361395021 8475104687651395413 8475604688601395617 8476204690491395821 8476604692011395921 8477304692161395936 8482004695011396117 8482404695201396136 8482904695351396151 8483204695491396165 8483504695801396217 8484404696181396317 8486904696791396417 8487604697191396517 8487904697341396532 8488204697481396546 8488904697721396570 8489304698911396817 8490704699951397021 8491304701171397528 8492004701381397549 8493804701891397621R_112 84940 849401180470327139813471083139972 849430470339139825 849470470412139835 849520470429139845 8495704704461398422 849700470574139865 849930470675139889 8499904707841399013 8500304708641399113 8501004708791399128 8502204709111399160 850250470982139939 8503104710141399516 8503804710351399537 850560471074139969R_113 85058 85058870471753140083472191140212 850610471765140095 850650471838140105 850700471855140115 8507504718721401122 850880471939140135 850990472005140155 851050472074140179 8511804721221401916 8512504721431401937 851430472182140209R_114 85145 851451260472863140323473656140492 851480472875140335 851520472948140345 851570472965140355 8516204729821403522 851750473046140375 851800473123140399 8518604731951404113 8519004732381404213 8519704732531404228 8520904732851404260 8521504734011404413 8521904734711404513 8522604734861404528 8523804735181404560 8524404735831404720 8525104736041404741 8526904736471404813R_115 85271 852711280474788140663475532140822 852740474800140675 852950474902140685 853000474919140695 8530504749361406922 853180475021140715 853340475110140739 8534004752261407513 8534404753131407613 8535104753281407628 8536304753601407660 853660475431140789 8537204754631408016 8537904754841408037 853970475523140819R_116 85399 853991740475672140863476765141122tmp_00 854040475739140895 854270475841140905 854320475858140915 8543704758751409122 854500475954140947 854610476020140965 854770476099140989 8548304761961410013 855000476298141039 8550604764241410513 8551004765211410613 8551704765361410628 8553704765931410685 855400476664141089 8554604766961411016 8555304767171411037 855710476756141119R_117 85573 85573910476903141163477239141242 855760476915141175 855970477017141185 856020477034141195 8560704770511411922 856200477128141215 8563704771741412212 8564404771951412233 856620477230141235R_119 85664 856641250478620141453479229141582 856670478632141465 857040478772141475 857090478789141485 8571404788061414822 857270478869141505 857330478965141529 857370479036141539 8574404790511415324 8575604790831415356 857590479146141555 8576204791641415612 8576904791851415633 857870479220141575R_118 85789 857891020479349141623479973141782 857920479361141635 857960479434141645 858010479451141655 8580604794681416522 858190479529141675 858260479599141699 8583204796911417113 8583604797541417213 8584304797691417228 8585504798011417260 858580479872141749 8586404799041417616 8587104799251417637 858890479964141779R_120 85891 858911180480107141823480781141982 858940480119141835 858980480192141845 859030480209141855 8590804802261418522 859210480304141875 859440480399141899 8595004804951419113 8595404805621419213 8596104805771419228 8597304806091419260 859760480680141949 8598204807121419616 8598904807331419637 860070480772141979R_121 86009 860091260480908142023481748142252 860120480920142035 860160480993142045 860210481010142055 8602604810271420522 860390481097142075 860540481171142099 860560481237142125 860710481310142149 860730481370142175 860790481475142199 860830481555142209 8609004815701422024 8610204816021422056 861050481665142225 8610804816831422312 8611504817041422333 861330481739142245R_122 86135 861351970481878142293483022142552 861380481890142305 861430481963142315 861480481980142325 8615304819971423222 861660482066142345 861820482146142369 8618804822701423813 8619204823651423913 8619904823801423928 862110482507142419 8621504825261424128 8622004825411424143 8622304825551424157 862260482578142429 862350482608142439 862600482657142449 862670482689142459 8627004827041424524 8627304827181424538 8628004827421424562 862840482818142489 8629904828951425013 8630504829491425320 8631204829701425341 8633004830131425413R_123 86332 863322850483167142593485696143092tmp_00 863370483239142625 863420483312142635 863470483329142645 8635204833461426422 863650483431142677 863750483501142695 863910483572142719 863930483663142745 864080483765142769 8642404839231427813 8644904840521428017 8645504841591428221 8645904842951428421 8646304843881428521 8647004844031428536 8649004844601428593 8649304845481428717 8649904846631429113 8651504848301429317 8654004849681429521 8654604850841429725 8655004852281429925 8655404853251430025 8656104853401430040 8658104853971430097 8658404854931430221 8659004856151430728 8659704856361430749 8661504856871430821R_124 86617 86617790486378143203486688143282 866200486390143215 866240486463143225 866290486480143235 8663404864971432322 866470486576143255 8666904866231432612 8667604866441432633 866940486679143275R_125 86696 866961260487372143393488171143562 866990487384143405 867030487457143415 867080487474143425 8671304874911434222 867260487555143445 867310487632143469 8673704877061434813 8674104877511434913 8674804877661434928 8676004877981434960 8676604879151435113 8677004879861435213 8677704880011435228 8678904880331435260 8679504880981435420 8680204881191435441 8682004881621435513R_126 86822 868221190489597143773490103143882 868250489609143785 868460489711143795 868510489728143805 8685604897451438022 868690489843143825 868940489974143849 8691404900341438616 8692104900551438637 869390490094143879R_127 86941 869411390490241143923491062144172 869440490253143935 869650490355143945 869700490372143955 8697504903891439522 869880490459143975 870030490533143999 870050490599144025 870200490672144049 870220490760144075 870330490856144095 870480490930144119 870500490979144145 8705304909971441512 8706004910181441533 870780491053144165R_128 87080 870801830491204144213492505144502tmp_00tmp_14tmp_28 870850491390144265 871080491492144275 871130491509144285 8711804915261442822 871320491622144317 871430491728144347 871540491854144377 871650491949144395 871710492020144419 8717704921301444313 8718104922111444413 8718804922261444428 87226049233314444135 872290492404144469 8723504924361444816 8724204924571444837 872610492496144499R_129 87263 872631310492655144543493409144702 872660492667144555 872870492769144565 872920492786144575 8729704928031445722 873110492877144595 873280492967144619 8733404930931446313 8733804931901446413 8734504932051446428 8735704932371446460 873600493308144669 8736604933401446816 8737304933611446837 873920493400144699R_130 87394 873942170493550144743494755145002 873970493562144755 874200493664144765 874250493681144775 8743004936981447722 874440493767144795 874600493847144819 8746604939871448313 8747004940981448413 8747704941131448428 874890494240144869 8749304942591448628 8749804942741448643 8750104942881448657 875040494311144879 875130494341144889 875380494390144899 875450494422144909 8754804944371449024 8755104944511449038 8755804944751449062 875620494551144939 8757704946281449513 8758304946821449820 8759004947031449841 8760904947461449913R_131 87611 876111540494911145043495901145232 876140494923145055 876360495025145065 876410495042145075 8764604950591450722 876600495154145095 876750495320145119 8769904954371451313 8770504955591451517 8770904956481451617 8771604956631451632 8772804956951451664 8773104957741451813 8773704958281452120 8774404958491452141 8776304958921452213R_132 87765 87765910496615145343496935145422 877680496627145355 877890496729145365 877940496746145375 8779904967631453722 878130496834145395 8782804968701454012 8783504968911454033 878540496926145415R_133 87856 878561250497779145553498517145732 878590497791145565 878800497893145575 878850497910145585 8789004979271455822 879040497991145605 879090498114145629 8792204982091456413 8792604982511456513 8793304982661456528 8794504982981456560 8794804983631456613 879510498433145705 8795304984521457112 8796004984731457133 879790498508145725R_134 87981 879811100498654145773499225145882 879840498666145785 880050498768145795 880100498785145805 8801504988021458022 880290498866145825 880340498979145849 880380499062145859 8804504990771458524 8805704991091458556 8806304991561458616 8807004991771458637 880890499216145879R_135 88091 880911210500855146113501361146222 880940500867146125 881150500969146135 881200500986146145 8812505010031461422 881390501101146165 881640501232146189 8818405012921462016 8819105013131462037 882100501352146219R_136 88212 882121410501506146263502327146512 882150501518146275 882360501620146285 882410501637146295 8824605016541462922 882600501724146315 882750501798146339 882770501864146365 882920501937146389 882940502025146415 883050502121146435 883200502195146459 883220502244146485 8832505022621464912 8833205022831464933 883510502318146505R_137 88353 883531830502478146553503773146842tmp_00tmp_14tmp_28 883580502664146605 883810502766146615 883860502783146625 8839105028001466222 884050502896146657 884160503002146687 884270503128146717 884380503223146735 884440503294146759 8845005034011467713 8845405034791467813 8846105034941467828 88499050360114678135 885020503672146809 8850805037041468216 8851505037251468237 885340503764146839R_138 88536 885361450503925146883504647147042 885390503937146895 885610504039146905 885660504056146915 8857105040731469122 885850504150146935 886150504263146959 8862105043601469713 8862505044281469813 8863205044431469828 8864405044751469860 886470504546147009 8865305045781470216 8866005045991470237 886790504638147039R_139 88681 886811310504804147083505554147242 886840504816147095 887050504918147105 887100504935147115 8871505049521471122 887290505026147135 887460505116147159 8875205052401471713 8875605053351471813 8876305053501471828 8877505053821471860 887780505453147209 8878405054851472216 8879105055061472237 888100505545147239R_140 88812 888122170505702147283506907147542 888150505714147295 888380505816147305 888430505833147315 8884805058501473122 888620505919147335 888780505999147359 8888405061391473713 8888805062501473813 8889505062651473828 889070506392147409 8891105064111474028 8891605064261474043 8891905064401474057 889220506463147419 889310506493147429 889560506542147439 889630506574147449 8896605065891474424 8896905066031474438 8897605066271474462 889800506703147479 8899505067801474913 8900105068341475220 8900805068551475241 8902705068981475313R_141 89029 890291580507070147583508165147792 890320507082147595 890540507184147605 890590507201147615 8906405072181476122 890780507313147635 890930507479147659 8911705075961476713 8912305076951476917 8912705078231477117 8913105079121477217 8913805079271477232 8915005079591477264 8915305080381477413 8915905080921477720 8916605081131477741 8918505081561477813R_142 89187 89187910508895147903509215147982 891900508907147915 892110509009147925 892160509026147935 8922105090431479322 892350509114147955 8925005091501479612 8925705091711479633 892760509206147975R_143 89278 892781250510084148113510822148292 892810510096148125 893020510198148135 893070510215148145 8931205102321481422 893260510296148165 893310510419148189 8934405105141482013 8934805105561482113 8935505105711482128 8936705106031482160 8937005106681482213 893730510738148265 8937505107571482712 8938205107781482733 894010510813148285R_144 89403 894031100510965148333511540148442 894060510977148345 894270511079148355 894320511096148365 8943705111131483622 894510511177148385 894560511292148409 894600511377148419 8946705113921484124 8947905114241484156 8948505114711484216 8949205114921484237 895110511531148439R_145 89513 895131270512602148613513349148772 895160512614148625 895200512687148635 895250512704148645 8953005127211486422 895440512810148665 895740512933148689 8958005130461487013 8958405131301487113 8959105131451487128 8960305131771487160 896060513248148739 8961205132801487516 8961905133011487537 896380513340148769R_146 89640 896401500513492148813514413149022 896430513504148825 896480513577148835 896530513594148845 8965805136111488422 896720513680148865 896870513760148889 8969305138841489013 8969705139791489113 8970405139941489128 897160514112148939 897410514209148959 8975605142861489713 8976205143401490020 8976905143611490041 8978805144041490113R_147 89790 897901340514541149063515388149242tmp_00 897950514608149095 897990514681149105 898040514698149115 8980905147151491122 898230514829149135 898500514961149159 8985605150671491713 8986005151441491813 8986705151591491828 8988705152161491885 898900515287149209 8989605153191492216 8990305153401492237 899220515379149239R_148 89924 899241190515530149283516215149442 899270515542149295 899310515615149305 899360515632149315 8994105156491493122 899550515748149335 899830515896149359 899940516004149379 9000905160881493913 9001505161421494220 9002205161631494241 9004105162061494313R_149 90043 90043720516885149553517163149632 900460516897149565 900500516970149575 900550516987149585 9006005170041495822 900740517064149605 9008705170981496112 9009405171191496133 901130517154149625R_150 90115 901151280517835149743518670149912 901180517847149755 901220517920149765 901270517937149775 9013205179541497722 901460518018149795 901510518095149819 9015705181921498313 9016105182601498413 9016805182751498428 9018005183071498460 9018605184191498613 9019005184851498713 9019705185001498728 9020905185321498760 9021505185971498920 9022205186181498941 9024105186611499013R_152 90243 902432120520049150123521060150322tmp_00 902480520120150155 902920520301150165 902970520318150175 9030205203351501722 903160520398150195 903220520517150219 903260520611150229 9033305206261502224 903530520751150245 9035705207701502424 9036205207851502439 9036505207991502453 903680520818150255 903770520844150265 904000520883150275 904070520911150285 9041005209261502820 9041305209401502834 9042005209641502858 9042705209951503012 9043405210161503033 904530521051150315R_153 90455 904552270521194150363522660150702tmp_00 904600521266150395 904650521339150405 904700521356150415 9047505213731504122 904890521454150447 904990521532150465 905260521616150489 905280521686150515 905560521770150539 905580521830150565 905640521904150589 9058005220331506013 9058405221231506113 9059105221381506128 9061105221951506185 9061705223341506313 9062105224271506413 9062805224421506428 9064805224991506485 906510522577150675 9065405225951506812 9066105226161506833 906800522651150695R_154 90682 906821580522792150743523553150902 906850522804150755 906900522877150765 906950522894150775 9070005229111507722 907140523028150795 907740523181150819 9078005232721508313 9078405233341508413 9079105233491508428 9080305233811508460 908060523452150869 9081205234841508816 9081905235051508837 908380523544150899R_155 90840 908402850523680150943525039151222 908430523692150955 908480523765150965 908530523782150975 9085805237991509722 908720523911150995 909340524064151019 9094005241981510313 9094405243031510413 9095105243181510428 909630524448151069 9096705244671510628 9097205244821510643 9097505244961510657 909780524519151079 909870524549151089 910310524616151099 910380524648151109 9104105246631511024 9104405246771511038 9105105247011511062 910550524777151139 9108905248771511513 910910524938151189 9109705249701512016 9110405249911512037 911230525030151219R_156 91125 91125420525161151263525387151362I7RBLK0 911300525179151275 911330525199151285 911410525224151295 911440525247151305 911470525270151315 911550525295151325 911580525318151335 911610525341151345 911640525361151355KERNEL_1 91167 911673940525391151373528136152142tmp_00tmp_14 911720525520151415 911770525593151425 911820525610151435 9118705256271514322 912010525692151467 912040525751151485 9122205258371515111 912270525945151539 913480526846151789 9136505269311518013 913700527012151845 913870527134151869 915050528025152115 9153305280711521212 9154005280921521233 915590528127152135R_157 91561 915611850528251152183529444152442 915640528263152195 915690528336152205 915740528353152215 9157905283701522122 915930528437152235 916190528539152259 9164505286401522713 9165105287391522917 9165505288051523017 9166205288201523032 9167405288521523064 9167705289311523213 916800529002152359 9168605291271523713 9169005292241523813 9169705292391523828 9170905292711523860 917120529343152409 9171805293751524216 9172505293961524237 917440529435152439R_158 91746 917462020530364152593531242152782 917490530376152605 917540530449152615 917590530466152625 9176405304831526222 917780530553152645 918040530683152669 918390530848152699 918930530994152725 919070531112152749 9192005311731527616 9192705311941527637 919460531233152779R_159 91948 919481480531365152823531943152932 919510531377152835 919560531450152845 919610531467152855 9196605314841528522 919800531635152875 920580531826152899 9206805318741529116 9207505318951529137 920940531934152929R_160 92096 920961480532072152973532658153082 920990532084152985 921040532157152995 921090532174153005 9211405321911530022 921280532342153025 922060532539153049 9221605325891530616 9222305326101530637 922420532649153079R_161 92244 92244420533328153193533554153292I7RBLK0 922490533346153205 922520533366153215 922600533391153225 922630533414153235 922660533437153245 922740533462153255 922770533485153265 922800533508153275 922830533528153285KERNEL_2 92286 9228618860533558153303546533155252tmp_00tmp_14tmp_28 922910533752153355 922960533825153365 923010533842153375 9230605338591533722 923200533922153395 923260533995153419 9233105341111534313 923420534214153479 9236005344031534913 9246005346531535117 9250905347811535321 9251105348831535621 9252105349921535825 9252505350611535925 9253205350761535940 9254705352131536125 9255705353341536329 9256105354091536429 9256805354241536444 9258305355851536629 9258705356621536729 9259405356771536744 9261005359161537319 9262505360411537517 9265405362121537823 9275505373911540323 9287405386301542721 9290805387751542925 9291705389051543129 9292105389901543229 9292805390051543244 9296905392291543429 9297805393691543633 9298205394581543733 9298905394731543748 9303005397341543933 9303405398321544033 9304105398471544048 9308205401401544425 9308605402101544525 9309305402251544540 9313505404571544821 9314405406011545025 9314805407041545125 9315505407191545140 9319605409351545325 9320505410891545529 9320905411961545629 9321605412111545644 9325705414861545829 9326105416021545929 9326805416171545944 9331005419431546513 9333705420801546717 9334105421571546817 9334805421721546832 9338905423971547017 9339305424751547117 9340005424901547132 934380542701154749 9346505427901547613 9346905428231547713 9347605428381547728 9348205429291547813 9352005430591548017 9352405431251548117 9353105431401548132 9357205433551548317 9357605434211548417 9358305434361548432 936210543647154879 9364805437721548913 9368405439401549117 9368805440421549217 9369505440571549232 9373705442791549417 9377305444351549621 9377705445211549721 9378405445361549736 9382605447601549921 9385305449141550125 9385705450001550225 9386405450151550240 9390505452561550425 9390905453401550525 9391605453551550540 939540545681155109 9402705458661551213 9403105459231551313 9403805459381551328 9407605460951551413 9408005461281551513 9408705461431551528 9409305461541551539 9409605462181551613 9411905463061551813 941210546360155219 941250546389155229 9413205464041552224 9413805464151552235 9414405464641552316 9415105464851552337 941700546524155249R_163 94172 94172960548121155503548515155612 941750548133155515 941790548206155525 941840548223155535 9418905482401555322 942030548298155555 942200548388155579 9424005484461555916 9424705484671555937 942660548506155609R_164 94268 94268960548655155653549059155762 942710548667155665 942750548740155675 942800548757155685 9428505487741556822 942990548837155705 943160548932155729 9433605489901557416 9434305490111557437 943620549050155759R_165 94364 943641900549194155803550584156122tmp_00 943690549269155835 943740549342155845 943790549359155855 9438405493761558522 943980549437155875 944050549497155899 944070549605155937 944190549692155955 944260549762155979 9443205498421559913 9444905499621560117 9445305500391560217 9446005500541560232 9448005501111560289 9448605502411560417 9449005503191560517 9449705503341560532 9451705503911560589 945200550483156089 9452605505151561016 9453305505361561037 945520550575156119R_166 94554 945542640550717156163552978156502 945570550729156175 945620550802156185 945670550819156195 9457205508361561922 945860550901156215 946000550985156239 9460705510791562513 9462805512671562717 9463205513721562817 9463905513871562832 9465105514191562864 9465805515381563017 9467905517371563221 9468305518491563321 9469005518641563336 9470205518961563368 9470805520241563521 9472905522321563725 9473305523491563825 9474005523641563840 9475205523961563872 9475805525671564025 9476205526781564125 9476905526931564140 9478105527251564172 947840552877156469 9479005529091564816 9479705529301564837 948160552969156499R_167 94818 948181270553108156543553810156702 948210553120156555 948250553193156565 948300553210156575 9483505532271565722 948490553297156595 948790553406156619 9488505535121566313 9488905535891566413 9489605536041566428 9490805536361566460 949110553709156669 9491705537411566816 9492405537621566837 949430553801156699R_168 94945 949452420553956156743556072157142 949480553968156755 949530554041156765 949580554058156775 9496305540751567722 949770554163156795 949930554258156819 9501005544031568313 9503405545261568517 9504005546331568721 9504405547621568921 9504805548481569021 9505505548631569036 9506705548951569068 9507005549841569217 9507605550931569613 9509305552471569817 9511705553791570021 9512305554951570225 9512705556331570425 9513105557241570525 9513805557391570540 9515005557711570572 9515305558691570721 9515905559911571228 9516605560121571249 9518505560631571321R_169 95187 951871250556202157183557101157392tmp_00 951920556277157215 951960556350157225 952010556367157235 9520605563841572322 952200556495157267 952320556583157285 952380556654157309 9524405567691573213 9524805568551573313 9525505568701573328 9527505569271573385 952780557000157359 9528405570321573716 9529105570531573737 953100557092157389R_170 95312 953127390557240157433562550158482tmp_00tmp_14 953170557366157475 953220557439157485 953270557456157495 9533205574731574922 953460557562157515 953690557649157539 953710557757157577 953830557866157595 9539805579821576211 954080558059157649 9541405581801576613 9544605583621576817 9545005584651576917 9545705584801576932 9548905587101577117 9549305588161577217 9550005588311577232 955290559017157759 9553305590361577528 9553805590511577543 9554105590651577557 955440559088157769 955530559118157779 955760559161157789 955830559193157799 9558605592081577924 9558905592221577938 9559605592461577962 956000559337157829 9561405594181578413 956210559508157885 956360559580157909 956390559666157935 956620559754157959 956640559832157997 956750559908158015 956910560014158039 957010560095158065 957180560200158089 9573305602921581013 9574005603831581217 9575605605331581421 9576005606351581521 9576705606501581536 9579905608401581721 9581505609981581925 9581905611041582025 9582605611191582040 9585805613531582225 9586205614551582325 9586905614701582340 9589805617101582713 9590205617291582732 9590705617441582747 9591005617581582761 9591305617851582813 9592205618191582913 9594605618711583013 9595305619071583113 9595605619221583128 9595905619361583142 9596605619601583166 9597005620571583413 9598405621521583617 9598705622521583913 9600405623401584113 960060562429158449 9602305624811584616 9603005625021584637 960490562541158479R_171 96051 96051730563232158593563526158672 960540563244158605 960580563317158615 960630563334158625 9606805633511586222 960820563430158645 9609605634611586512 9610305634821586533 961220563517158665R_172 96124 961242200564335158803565900159112 961270564347158815 961320564420158825 961370564437158835 9614205644541588322 961560564517158855 961620564590158879 9616705646751588913 9618405647861589117 9618805648541589217 9619505648691589232 9620705649011589264 9621305650211589417 9621705650891589517 9622405651041589532 9623605651361589564 962420565263158999 9625905653741590113 9626305654461590213 9627005654611590228 9628205654931590260 9628805656131590413 9629205656851590513 9629905657001590528 9631105657321590560 963140565816159085 9631605658351590912 9632305658561590933 963420565891159105R_173 96344 96344780566032159153566402159262 963470566044159165 963510566117159175 963560566134159185 9636105661511591822 963750566214159205 963810566288159229 9639405663331592416 9640105663541592437 964200566393159259R_175 96422 964221360567445159433568208159622tmp_00 964270567515159465 964310567588159475 964360567605159485 9644105676221594822 964550567709159517 964650567798159535 964920567925159559 9650805680521595713 9653005681351596020 9653705681561596041 9655605681991596113R_176 96558 965581440568343159663569336159872tmp_00 965630568413159695 965670568486159705 965720568503159715 9657705685201597122 965910568607159747 966010568696159765 966280568787159789 9663405689531598013 9663805690901598113 9664505691051598128 9666505691621598185 966680569235159839 9667405692671598516 9668105692881598537 967000569327159869R_177 96702 967021620569464159913570336160092tmp_00 967070569533159945 967120569606159955 967170569623159965 9672205696401599622 967360569734159985 967900569909160009 9679605700141600213 9680005700901600313 9680705701051600328 9682705701621600385 968300570235160059 9683605702671600716 9684305702881600737 968620570327160089R_178 96864 968641140570461160133571021160262tmp_00 968690570534160165 968730570607160175 968780570624160185 9688305706411601822 968970570732160205 969310570889160229 9695005709521602416 9695705709731602437 969760571012160259R_179 96978 969781050571697160373572231160502tmp_00 969830571774160405 969870571847160415 969920571864160425 9699705718811604222 970110572006160457 970420572134160475 9705505721661604812 9706205721871604833 970810572222160495R_180 97083 970831950573029160633574400160882 970860573041160645 970910573114160655 970960573131160665 9710105731481606622 971150573212160685 971210573289160709 9712705733861607213 9716405735341607417 9716805736181607517 9717505736331607532 9718705736651607564 9719305738041607717 9719705738911607817 9720405739061607832 9721605739381607864 9722205740941608113 9722605741851608213 9723305742001608228 9724505742321608260 972480574316160855 9725005743351608612 9725705743561608633 972760574391160875R_181 97278 97278820574527160923575004161052 972810574539160935 972850574612160945 972900574629160955 9729505746461609522 973090574709160975 973150574786160999 973220574892161019 9733205749351610316 9733905749561610337 973580574995161049R_182 97360 973601280575688161163576640161392 973630575700161175 973670575773161185 973720575790161195 9737705758071611922 973910575871161215 974060575947161239 974080576016161265 974230576090161289 974250576150161315 974310576310161339 974350576445161349 9744205764601613424 9745405764921613456 974570576557161365 9746005765751613712 9746705765961613733 974860576631161385R_183 97488 97488850577340161503577836161632tmp_00 974930577417161535 974970577490161545 975020577507161555 9750705775241615522 975210577632161587 975320577739161605 9754505777711616112 9755205777921616133 975710577827161625R_184 97573 97573920578663161763579208161892 975760578675161775 975800578748161785 975850578765161795 9759005787821617922 976040578846161815 976090578942161839 976130579008161849 9762005790231618424 9763205790551618456 976350579124161865 9763705791431618712 9764405791641618733 976630579199161885R_185 97665 97665750579340161933579737162042 976680579352161945 976720579425161955 976770579442161965 9768205794591619622 976960579522161985 977020579625162009 9771205796681620216 9771905796891620237 977380579728162039R_187 97740 977401130580883162233581390162362tmp_00tmp_14 977450581016162275 977510581043162285 9775605810601622822 9777005811411623010 9779205811881623057 9780605811811623050 978100581273162329 9782505813221623416 9783205813431623437 978510581381162359R_188 97853 978535120581509162403584570162932tmp_00tmp_14 978580581647162445 978650581674162455 9787005816911624522 978840581741162475 978880581771162485 9789505817861624820 979060581866162495 979320581978162519 979410582104162539 9795305822081625513 9795705822531625613 9796405822681625628 979760582397162589 979880582523162619 9801605826311626313 9802005826791626413 9802705826941626428 9806105828311626613 9806505828831626713 9807205828981626728 981030583006162705 981070583038162715 9811405830531627120 981240583164162737 9813405833001627510 9813805833091627519 981670583453162779 9819905835971627913 9820305836651628013 9821005836801628028 9824205838681628213 9824605839361628313 9825305839511628328 982820584159162859 9829205833431627553 983020584233162885 983060584265162895 9831305842801628920 983160584371162905 983200584435162915 9832705844501629120 9833705845061629176 9834405845271629197 983630584561162925R_189 98365 983653380584691162973587003163422 983680584703162985 983750584730162995 9838005847471629922 983940584818163015 984210584918163039 9842805849891630513 984300585152163089 9849905853391631013 985010585443163139 985100585576163159 9852205856971631713 9852605858221631913 9853005859121632013 9853705859271632028 9854905859591632060 985520586074163229 985650586200163259 9859305863211632713 9860005864011632917 9860205865741633213 9866005867581633417 9866205868491633713 9867505869311634020 9868205869521634041 9870105869941634113R_190 98703 987032290587139163463589178163962tmp_00tmp_14tmp_28 987080587330163515 987150587357163525 9872005873741635222 987340587458163545 9876205875631635711 9876605876511636011 987900587746163629 9879505878481636413 9880405879871636613 9881405880781636813 9882305881941637211 988470588299163749 9885205883931637613 9885605884621637813 9885905885591638013 9886505887061638217 9887505888061638417 9888405889221638713 9889305890111638913 989020589095163935 9890405891141639412 9891105891351639433 989300589169163955R_191 98932 989321040589290164003589814164162 989350589302164015 989410589329164025 9894605893461640222 989600589397164045 989690589479164069 989800589568164099 9899605896631641113 9900805897421641420 9901505897631641441 9903405898051641513R_192 99036 99036940590486164273590986164382 990390590498164285 990430590571164295 990480590588164305 9905305906051643022 990670590672164325 990730590762164349 990770590821164359 9908405908361643524 9909605908681643556 9910205909171643616 9910905909381643637 991280590977164379R_193 99130 991301810592201164593592989164722 991330592213164605 991400592240164615 9914505922571646122 991590592381164635 992020592593164659 992060592641164669 9921305926561646624 9921605926681646636 99243059273216466100 992460592770164679 9925305927851646724 992560592865164689 9928305929211647016 9929005929421647037 993090592980164719R_194 99311 993111260593104164763593671164882 993140593116164775 993200593143164785 9932505931601647822 993390593223164805 993560593339164829 993600593420164839 9936705934351648324 9937905934671648356 993820593547164849 9940905936031648616 9941605936241648637 994350593662164879R_195 99437 994373700593786164923595730165272 994400593798164935 994470593825164945 9945205938421649422 994660593905164965 994840594007164989 9951105942111650013 9953305943181650217 9953705943731650317 9954405943881650332 9955605945751650417 9962605946561650617 9963005946921650717 9963705947071650732 9964305947181650743 9964605948071650817 9967305949361651117 9970905950701651321 9972405951771651525 9972605952951651821 9973005953641651921 9973705953791651936 9974905954111651968 9975205955041652021 9977905956501652528 9978605956711652549 9980505957211652621R_196 99807 998072370595845165313596902165502 998100595857165325 998170595884165335 9982205959011653322 998360595964165355 998540596131165379 9987605962301653913 9988005962811654013 9988705962961654028 9989905965371654113 9996905966101654313 9997305966421654413 9998005966571654428 9998605966681654439 9998905967521654513 10001605968301654820 10002305968511654841 10004205968931654913R_197 100044 1000441260597014165543597740165662 1000470597026165555 1000530597053165565 10005805970701655622 1000720597130165585 1000890597326165609 1000930597489165619 10010005975041656124 10011205975361656156 1001150597616165629 10014205976721656416 10014905976931656437 1001680597731165659R_198 100170 1001701210597863165703598366165802 1001730597875165715 1001790597902165725 10018405979191657222 1001980597988165745 1002340598125165769 1002380598202165779 10024505982171657724 10025705982491657756 10026305982981657816 10027005983191657837 1002890598357165799R_199 100291 100291940599064165913599594166022 1002940599076165925 1002980599149165935 1003030599166165945 10030805991831659422 1003220599250165965 1003280599355165989 1003320599429165999 10033905994441659924 10035105994761659956 10035705995251660016 10036405995461660037 1003830599585166019R_200 100385 100385940600306166133600838166262 1003880600318166145 1003920600391166155 1003970600408166165 10040206004251661622 1004160600488166185 1004220600578166209 1004260600643166219 10043306006581662124 10044506006901662156 1004480600755166235 10045106007731662412 10045806007941662433 1004770600829166255R_201 100479 100479990601560166373602192166512 1004820601572166385 1004860601645166395 1004910601662166405 10049606016791664022 1005100601743166425 1005150601824166449 10052106019321664613 10052506020051664713 10053206020201664728 10054406020521664760 10055006021191664920 10055706021401664941 10057606021831665013R_202 100578 1005781310603044166643603781166802 1005810603056166655 1005850603129166665 1005900603146166675 10059506031631666722 1006090603262166695 1006430603393166719 10064906034911667313 10065306035601667413 10066006035751667428 10067206036071667460 1006750603680166769 10068106037121667816 10068806037331667837 1007070603772166799R_203 100709 1007091400603920166843604686167002 1007120603932166855 1007160604005166865 1007210604022166875 10072606040391668722 1007400604116166895 1007830604252166919 10078906043731669313 10079306044651669413 10080006044801669428 10081206045121669460 1008150604585166969 10082106046171669816 10082806046381669837 1008470604677166999R_204 100849 1008492360605646167153606635167332 1008520605658167165 1008770605756167175 1008820605773167185 10088706057901671822 1009010605886167205 1009120605954167229 1009160606001167239 10092306060161672324 1009350606195167249 1010050606260167269 1010090606288167279 10101606063031672724 10102206063141672735 1010280606414167299 1010320606470167309 10103906064851673024 10105106065171673056 10105706065661673116 10106406065871673137 1010830606626167329R_205 101085 1010852400606767167373607872167572 1010880606779167385 1011130606877167395 1011180606894167405 10112306069111674022 1011370607007167425 1011480607075167449 1011520607122167459 10115906071371674524 1011710607316167469 1012410607381167489 1012450607409167499 10125206074241674924 10125806074351674935 1012640607537167519 1012680607637167539 1012720607707167549 10127906077221675424 10129106077541675456 10129706078031675516 10130406078241675537 1013230607863167569R_206 101325 101325940608004167613608516167722 1013280608016167625 1013320608089167635 1013370608106167645 10134206081231676422 1013560608190167665 1013620608286167689 1013660608351167699 10137306083661676924 10138506083981676956 10139106084471677016 10139806084681677037 1014170608507167719R_207 101419 1014191400609239167833610029167972 1014220609251167845 1014430609353167855 1014480609370167865 10145306093871678622 1014670609450167885 1014730609558167909 1014770609641167919 10148406096561679124 10149606096881679156 1015020609798167939 1015060609864167949 10151306098791679424 10152506099111679456 10153106099601679516 10153806099811679537 1015570610020167969R_208 101559 1015591420611165168143612029168322 1015620611177168155 1015830611279168165 1015880611296168175 10159306113131681722 1016070611417168195 1016360611537168219 1016380611597168245 1016440611728168269 1016480611834168279 10165506118491682724 10166706118811682756 1016700611946168295 10167306119641683012 10168006119851683033 1016990612020168315R_209 101701 1017011270612176168363612998168522 1017040612188168375 1017250612290168385 1017300612307168395 10173506123241683922 1017490612382168415 1017620612460168439 10176806126331684513 10177206127771684613 10177906127921684628 10179106128241684660 1017940612897168489 10180006129291685016 10180706129501685037 1018260612989168519R_210 101828 1018281270613135168563613829168722 1018310613147168575 1018520613249168585 1018570613266168595 10186206132831685922 1018760613339168615 1018890613417168639 10189506135271686513 10189906136081686613 10190606136231686628 10191806136551686660 1019210613728168689 10192706137601687016 10193406137811687037 1019530613820168719R_211 101955 1019551650613978168763614983168922 1019580613990168775 1019810614092168785 1019860614109168795 10199106141261687922 1020050614322168815 1020540614531168839 10206006146611688513 10206406147621688613 10207106147771688628 10208306148091688660 1020860614882168889 10209206149141689016 10209906149351689037 1021180614974168919R_212 102120 102120890615703169033616009169112 1021230615715169045 1021440615817169055 1021490615834169065 10215406158511690622 1021680615910169085 10218106159441690912 10218806159651690933 1022070616000169105R_213 102209 1022091580616733169223617676169422 1022120616745169235 1022340616847169245 1022390616864169255 10224406168811692522 1022580616944169275 1022640617017169299 10226906171111693113 10227306171711693213 10228006171861693228 10229206172181693260 1022980617320169359 10231006174221693713 10231406174891693813 10232106175041693828 10233306175361693860 10233906176031694020 10234606176241694041 10236506176671694113R_214 102367 1023671420618704169573619572169752 1023700618716169585 1023910618818169595 1023960618835169605 10240106188521696022 1024150618956169625 1024440619076169649 1024460619136169675 1024520619269169699 1024560619377169709 10246306193921697024 10247506194241697056 1024780619489169725 10248106195071697312 10248806195281697333 1025070619563169745R_215 102509 1025091270619725169793620561169952 1025120619737169805 1025330619839169815 1025380619856169825 10254306198731698222 1025570619935169845 1025700620019169869 10257606201941698813 10258006203401698913 10258706203551698928 10259906203871698960 1026020620460169919 10260806204921699316 10261506205131699337 1026340620552169949R_216 102636 1026361650620714169993621719170152 1026390620726170005 1026620620828170015 1026670620845170025 10267206208621700222 1026860621058170045 1027350621267170069 10274106213971700813 10274506214981700913 10275206215131700928 10276406215451700960 1027670621618170119 10277306216501701316 10278006216711701337 1027990621710170149R_217 102801 102801890622449170263622759170342 1028040622461170275 1028250622563170285 1028300622580170295 10283506225971702922 1028490622660170315 10286206226941703212 10286906227151703233 1028880622750170335R_218 102890 1028901580623494170453624445170652 1028930623506170465 1029150623608170475 1029200623625170485 10292506236421704822 1029390623705170505 1029450623778170529 10295006238741705413 10295406239361705513 10296106239511705528 10297306239831705560 1029790624085170589 10299106241891706013 10299506242581706113 10300206242731706128 10301406243051706160 10302006243721706320 10302706243931706341 10304606244361706413R_219 103048 1030481120625290170783626046170962 1030510625302170795 1030550625375170805 1030600625392170815 10306506254091708122 1030790625491170835 1030950625572170859 1030970625632170885 1031030625754170909 1031070625851170919 10311406258661709124 10312606258981709156 1031290625963170935 10313206259811709412 10313906260021709433 1031580626037170955R_220 103160 1031601100626184171003626850171162 1031630626196171015 1031670626269171025 1031720626286171035 10317706263031710322 1031910626366171055 1032040626444171079 10321006265511710913 10321406266291711013 10322106266441711028 10323306266761711060 1032360626749171129 10324206267811711416 10324906268021711437 1032680626841171159R_221 103270 103270720627556171273627838171352 1032730627568171285 1032770627641171295 1032820627658171305 10328706276751713022 1033010627739171325 10331406277731713312 10332106277941713333 1033400627829171345R_222 103342 103342930628546171463629060171572 1033450628558171475 1033490628631171485 1033540628648171495 10335906286651714922 1033730628729171515 1033780628827171539 1033820628895171549 10338906289101715424 10340106289421715456 10340706289911715516 10341406290121715537 1034330629051171569R_223 103435 1034351120629914171703630670171882 1034380629926171715 1034420629999171725 1034470630016171735 10345206300331717322 1034660630115171755 1034820630196171779 1034840630256171805 1034900630378171829 1034940630475171839 10350106304901718324 10351306305221718356 1035160630587171855 10351906306051718612 10352606306261718633 1035450630661171875R_224 103547 1035471100630811171923631480172082 1035500630823171935 1035540630896171945 1035590630913171955 10356406309301719522 1035780630994171975 1035910631072171999 10359706311801720113 10360106312591720213 10360806312741720228 10362006313061720260 1036230631379172049 10362906314111720616 10363606314321720637 1036550631471172079R_225 103657 103657720632192172193632475172272 1036600632204172205 1036640632277172215 1036690632294172225 10367406323111722222 1036880632376172245 10370106324101722512 10370806324311722533 1037270632466172265R_226 103729 103729930633189172383633705172492 1037320633201172395 1037360633274172405 1037410633291172415 10374606333081724122 1037600633372172435 1037650633471172459 1037690633540172469 10377606335551724624 10378806335871724656 10379406336361724716 10380106336571724737 1038200633696172489R_227 103822 1038221250634625172643635438172822 1038250634637172655 1038290634710172665 1038340634727172675 10383906347441726722 1038530634848172695 1038820634968172719 1038840635028172745 1038900635148172769 1038940635243172779 10390106352581727724 10391306352901727756 1039160635355172795 10391906353731728012 10392606353941728033 1039450635429172815R_228 103947 1039471260635562172863636328173022 1039500635574172875 1039540635647172885 1039590635664172895 10396406356811728922 1039780635783172915 1040070635910172939 10401306360231729513 10401706361071729613 10402406361221729628 10403606361541729660 1040390636227172989 10404506362591730016 10405206362801730037 1040710636319173019R_229 104073 1040731100636458173063637121173222 1040760636470173075 1040800636543173085 1040850636560173095 10409006365771730922 1041040636633173115 1041170636711173139 10412306368201731513 10412706369001731613 10413406369151731628 10414606369471731660 1041490637020173189 10415506370521732016 10416206370731732037 1041810637112173219R_230 104183 104183720637797173333638072173412 1041860637809173345 1041900637882173355 1041950637899173365 10420006379161733622 1042140637973173385 10422706380071733912 10423406380281733933 1042530638063173405R_231 104255 1042553090638887173543640206173772 1042580638899173555 1042630638972173565 1042680638989173575 10427306390061735722 1042870639197173595 1044050639424173619 10441106395091736313 10441706396171736517 10442106396921736617 10442806397071736632 10444006398701736717 10451006399511736917 10451406399871737017 10452106400021737032 10452706400131737043 1045300640105173739 10453606401371737516 10454306401581737537 1045620640197173769R_232 104564 1045641710640330173813641465174042 1045670640342173825 1045720640415173835 1045770640432173845 10458206404491738422 1045960640512173865 1046020640585173889 10460706406791739013 10461106407391739113 10461806407541739128 10463006407861739160 1046360640896173949 10464906410051739613 10465306410721739713 10466006410871739728 10467206411191739760 10467806412221739913 10468206412781740013 10468906412931740028 10470106413251740060 10470706413921740220 10471406414131740241 10473306414561740313R_233 104735 1047351250642273174173643088174352 1047380642285174185 1047420642358174195 1047470642375174205 10475206423921742022 1047660642496174225 1047950642616174249 1047970642676174275 1048030642797174299 1048070642893174309 10481406429081743024 10482606429401743056 1048290643005174325 10483206430231743312 10483906430441743333 1048580643079174345R_234 104860 1048601100643221174393643890174552 1048630643233174405 1048670643306174415 1048720643323174425 10487706433401744222 1048910643398174445 1049040643476174469 10491006435871744813 10491406436691744913 10492106436841744928 10493306437161744960 1049360643789174519 10494206438211745316 10494906438421745337 1049680643881174549R_235 104970 104970720644566174663644843174742 1049730644578174675 1049770644651174685 1049820644668174695 10498706446851746922 1050010644744174715 10501406447781747212 10502106447991747233 1050400644834174735R_236 105042 1050421710645521174853646662175082 1050450645533174865 1050500645606174875 1050550645623174885 10506006456401748822 1050740645703174905 1050800645776174929 10508506458711749413 10508906459321749513 10509606459471749528 10510806459791749560 1051140646089174989 10512706461991750013 10513106462671750113 10513806462821750128 10515006463141750160 10515606464181750313 10516006464751750413 10516706464901750428 10517906465221750460 10518506465891750620 10519206466101750641 10521106466531750713R_237 105213 1052131270647592175233648341175392 1052160647604175245 1052200647677175255 1052250647694175265 10523006477111752622 1052440647802175285 1052740647925175309 10528006480371753213 10528406481201753313 10529106481351753328 10530306481671753360 1053060648240175359 10531206482721753716 10531906482931753737 1053380648332175389R_238 105340 1053401120648467175433649177175592 1053430648479175445 1053470648552175455 1053520648569175465 10535706485861754622 1053710648665175485 1053860648753175509 10539206488691755213 10539606489561755313 10540306489711755328 10541506490031755360 1054180649076175559 10542406491081755716 10543106491291755737 1054500649168175589R_239 105452 1054521120649307175633650007175792 1054550649319175645 1054590649392175655 1054640649409175665 10546906494261756622 1054830649495175685 1054980649575175709 10550406496951757213 10550806497861757313 10551506498011757328 10552706498331757360 1055300649906175759 10553606499381757716 10554306499591757737 1055620649998175789R_240 105564 105564730650683175903650967175982 1055670650695175915 1055710650768175925 1055760650785175935 10558106508021759322 1055950650867175955 10560906509021759612 10561606509231759633 1056350650958175975R_241 105637 1056371280651645176093652458176262 1056400651657176105 1056440651730176115 1056490651747176125 10565406517641761222 1056680651827176145 1056740651900176169 10567906519961761813 10568306520581761913 10569006520731761928 10570206521051761960 1057080652228176229 1057120652293176239 10571906523081762324 10573106523401762356 10573706523891762416 10574406524101762437 1057630652449176259R_243 105765 1057651120653300176393653968176552 1057680653312176405 1057720653385176415 1057770653402176425 10578206534191764222 1057960653492176445 1058110653578176469 10581706536771764813 10582106537471764913 10582806537621764928 10584006537941764960 1058430653867176519 10584906538991765316 10585606539201765337 1058750653959176549R_244 105877 1058771200654117176593654875176752 1058800654129176605 1058840654202176615 1058890654219176625 10589406542361766222 1059080654364176645 1059310654465176669 10593706545741766813 10594106546541766913 10594806546691766928 10596006547011766960 1059630654774176719 10596906548061767316 10597606548271767337 1059950654866176749R_245 105997 105997730655569176863655855176942 1060000655581176875 1060040655654176885 1060090655671176895 10601406556881768922 1060280655755176915 10604206557901769212 10604906558111769233 1060680655846176935R_246 106070 1060701280656551177053657372177222 1060730656563177065 1060770656636177075 1060820656653177085 10608706566701770822 1061010656733177105 1061070656806177129 10611206569041771413 10611606569681771513 10612306569831771528 10613506570151771560 1061410657140177189 1061450657207177199 10615206572221771924 10616406572541771956 10617006573031772016 10617706573241772037 1061960657363177219R_247 106198 1061981290658752177433659457177592 1062010658764177445 1062220658866177455 1062270658883177465 10623206589001774622 1062460658979177485 1062610659067177509 10626706591661775213 10627106592361775313 10627806592511775328 10629006592831775360 1062930659356177559 10629906593881775716 10630606594091775737 1063250659448177589R_248 106327 1063271210659591177633660291177792 1063300659603177645 1063510659705177655 1063560659722177665 10636106597391776622 1063750659807177685 1063820659879177709 10638806599891777213 10639206600701777313 10639906600851777328 10641106601171777360 1064140660190177759 10642006602221777716 10642706602431777737 1064460660282177789R_249 106448 1064481310660429177833661159177992 1064510660441177845 1064720660543177855 1064770660560177865 10648206605771778622 1064960660648177885 1065130660735177909 10651906608511779213 10652306609381779313 10653006609531779328 10654206609851779360 1065450661058177959 10655106610901779716 10655806611111779737 1065770661150177989R_250 106579 1065792100661300178033662381178262 1065820661312178045 1066050661414178055 1066100661431178065 10661506614481780622 1066290661517178085 1066440661641178109 1066480661732178119 10665506617471781124 1066670661866178129 10667106618851781228 10667606619001781243 10667906619141781257 1066820661937178139 1066910661967178149 1067160662016178159 1067230662048178169 10672606620631781624 10672906620771781638 10673606621011781662 1067400662177178199 10675506622541782113 10676106623081782420 10676806623291782441 10678706623721782513R_251 106789 1067891110662505178303663086178432 1067920662517178315 1068130662619178325 1068180662636178335 10682306626531783322 1068370662716178355 1068430662816178379 1068470662891178389 10685406629061783824 10686606629381783856 1068690663003178405 10687206630211784112 10687906630421784133 1068980663077178425R_252 106900 1069001380663240178473664075178632 1069030663252178485 1069240663354178495 1069290663371178505 10693406633881785022 1069480663528178525 1069720663637178549 10697806637601785613 10698206638541785713 10698906638691785728 10700106639011785760 1070040663974178599 10701006640061786116 10701706640271786137 1070360664066178629R_253 107038 107038990664783178743665112178822 1070410664795178755 1070620664897178765 1070670664914178775 10707206649311787722 1070860665000178795 10710906650471788012 10711606650681788033 1071350665103178815R_254 107137 1071371780665822178933666994179132 1071400665834178945 1071630665936178955 1071680665953178965 10717306659701789622 1071870666033178985 1071930666135179009 1071970666212179019 10720406662271790124 10721606662591790156 1072220666356179039 10722906664611790513 10723306665361790613 10724006665511790628 10725206665831790660 10725806667191790813 10726206668071790913 10726906668221790928 10728106668541790960 10728706669211791120 10729406669421791141 10731306669851791213R_255 107315 1073151290667982179283668687179442 1073180667994179295 1073390668096179305 1073440668113179315 10734906681301793122 1073630668209179335 1073780668297179359 10738406683961793713 10738806684661793813 10739506684811793828 10740706685131793860 1074100668586179409 10741606686181794216 10742306686391794237 1074420668678179439R_256 107444 1074441030668835179483669272179592 1074470668847179495 1074680668949179505 1074730668966179515 10747806689831795122 1074920669051179535 1074990669140179559 10751906692031795716 10752606692241795737 1075450669263179589R_257 107547 1075471110669398179633669967179762 1075500669410179645 1075710669512179655 1075760669529179665 10758106695461796622 1075950669609179685 1076010669703179709 1076050669772179719 10761206697871797124 10762406698191797156 1076270669884179735 10763006699021797412 10763706699231797433 1076560669958179755R_258 107658 107658980670615179873671220180022 1076610670627179885 1076650670700179895 1076700670717179905 10767506707341799022 1076890670797179925 1076950670880179949 1076990670968179969 1077030671025179979 10771006710401799724 10772206710721799756 1077250671137179995 10772806711551800012 10773506711761800033 1077540671211180015R_259 107756 1077562100672230180173673311180402 1077590672242180185 1077820672344180195 1077870672361180205 10779206723781802022 1078060672447180225 1078210672571180249 1078250672662180259 10783206726771802524 1078440672796180269 10784806728151802628 10785306728301802643 10785606728441802657 1078590672867180279 1078680672897180289 1078930672946180299 1079000672978180309 10790306729931803024 10790606730071803038 10791306730311803062 1079170673107180339 10793206731841803513 10793806732381803820 10794506732591803841 10796406733021803913R_260 107966 1079661310673468180443674112180602 1079690673480180455 1079900673582180465 1079950673599180475 10800006736161804722 1080140673687180495 1080310673774180519 10803706738471805313 10804106738911805413 10804806739061805428 10806006739381805460 1080630674011180569 10806906740431805816 10807606740641805837 1080950674103180599R_261 108097 1080971110674243180643674970180772 1081000674255180655 1081210674357180665 1081260674374180675 10813106743911806722 1081450674454180695 1081510674627180719 1081550674775180729 10816206747901807224 10817406748221807256 1081770674887180745 10818006749051807512 10818706749261807533 1082060674961180765R_262 108208 108208980675636180883676275181032 1082110675648180895 1082150675721180905 1082200675738180915 10822506757551809122 1082390675818180935 1082450675901180959 1082490676006180979 1082530676080180989 10826006760951809824 10827206761271809856 1082750676192181005 10827806762101810112 10828506762311810133 1083040676266181025R_263 108306 1083061040677041181163677679181322 1083090677053181175 1083130677126181185 1083180677143181195 10832306771601811922 1083370677221181215 1083440677291181239 10835006773891812513 10835406774581812613 10836106774731812628 10837306775051812660 1083760677578181289 10838206776101813016 10838906776311813037 1084080677670181319R_264 108410 108410940677792181363678326181492 1084130677804181375 1084170677877181385 1084220677894181395 10842706779111813922 1084410677974181415 1084470678065181439 1084510678131181449 10845806781461814424 10847006781781814456 1084730678243181465 10847606782611814712 10848306782821814733 1085020678317181485R_265 108504 1085041150679041181603679673181752 1085070679053181615 1085280679155181625 1085330679172181635 10853806791891816322 1085520679252181655 1085580679335181679 1085620679422181699 1085660679478181709 10857306794931817024 10858506795251817056 1085880679590181725 10859106796081817312 10859806796291817333 1086170679664181745R_266 108619 1086191210680383181863681056182022 1086220680395181875 1086430680497181885 1086480680514181895 10865306805311818922 1086670680592181915 1086740680662181939 10868006807631819513 10868406808351819613 10869106808501819628 10870306808821819660 1087060680955181989 10871206809871820016 10871906810081820037 1087380681047182019R_267 108740 1087401150681764182133682404182282 1087430681776182145 1087640681878182155 1087690681895182165 10877406819121821622 1087880681975182185 1087940682058182209 1087980682149182229 1088020682209182239 10880906822241822324 10882106822561822356 1088240682321182255 10882706823391822612 10883406823601822633 1088530682395182275R_268 108855 1088551150683106182393683738182542 1088580683118182405 1088790683220182415 1088840683237182425 10888906832541824222 1089030683317182445 1089090683400182469 1089130683487182489 1089170683543182499 10892406835581824924 10893606835901824956 1089390683655182515 10894206836731825212 10894906836941825233 1089680683729182535R_269 108970 1089701180684598182673685070182792 1089730684610182685 1089940684712182695 1089990684729182705 10900406847461827022 1090180684835182725 1090310684926182749 1090540684969182759 10906006850011827716 10906706850221827737 1090860685061182789R_270 109088 1090881030685213182833685624182912 1090910685225182845 1091120685327182855 1091170685344182865 10912206853611828622 1091360685494182885 10916306855591828912 10917006855801828933 1091890685615182905R_271 109191 1091911320686302183023687160183212 1091940686314183035 1091980686387183045 1092030686404183055 10920806864211830522 1092220686484183075 1092280686557183099 10923306866531831113 10923706867371831313 10924106867861831413 10924806868011831428 10926006868331831460 1092660686943183179 1092700686995183189 10927706870101831824 10928906870421831856 10929506870911831916 10930206871121831937 1093210687151183209R_272 109323 1093231370688084183363689107183602 1093260688096183375 1093300688169183385 1093350688186183395 10934006882031833922 1093540688264183415 1093610688334183439 10936706884151834513 10937206885251834717 10937606885971834817 10938306886121834832 10939506886441834864 10940106887801835113 10940506888501835213 10941206888651835228 10942406888971835260 1094270688970183549 1094300689023183575 10943206890421835812 10943906890631835833 1094580689098183595R_273 109460 1094601840689237183643690610183942 1094630689249183655 1094680689322183665 1094730689339183675 10947806893561836722 1094920689416183695 1095090689495183719 10951506895761837313 10952006896881837517 10952406897621837617 10953106897771837632 10954306898091837664 10954906899251837913 10955606900231838117 10956006900891838217 10956706901041838232 10957906901361838264 10958506902611838417 10958906903341838517 10959606903491838532 10960806903811838564 1096110690473183889 1096140690526183915 10961606905451839212 10962306905661839233 1096420690601183935R_274 109644 1096441280690734183983691557184152 1096470690746183995 1096510690819184005 1096560690836184015 10966106908531840122 1096750690916184035 1096810690989184059 10968606910911840713 10969006911591840813 10969706911741840828 10970906912061840860 1097150691328184119 1097190691392184129 10972606914071841224 10973806914391841256 10974406914881841316 10975106915091841337 1097700691548184149R_275 109772 1097721120692233184263692951184422 1097750692245184275 1097790692318184285 1097840692335184295 10978906923521842922 1098030692431184315 1098180692519184339 10982406926391843513 10982806927301843613 10983506927451843628 10984706927771843660 1098500692850184389 10985606928821844016 10986306929031844037 1098820692942184419R_276 109884 1098841280693619184533694424184702 1098870693631184545 1098910693704184555 1098960693721184565 10990106937381845622 1099150693801184585 1099210693874184609 10992606939681846213 10993006940281846313 10993706940431846328 10994906940751846360 1099550694196184669 1099590694259184679 10996606942741846724 10997806943061846756 10998406943551846816 10999106943761846837 1100100694415184699R_277 110012 1100121100695337184853696020185012 1100150695349184865 1100190695422184875 1100240695439184885 11002906954561848822 1100430695522184905 1100560695600184929 11006206957141849413 11006606957991849513 11007306958141849528 11008506958461849560 1100880695919184979 11009406959511849916 11010106959721849937 1101200696011185009R_278 110122 1101221100696138185053696760185212 1101250696150185065 1101290696223185075 1101340696240185085 11013906962571850822 1101530696316185105 1101660696394185129 11017206964811851413 11017606965391851513 11018306965541851528 11019506965861851560 1101980696659185179 11020406966911851916 11021106967121851937 1102300696751185209R_279 110232 1102321140696877185253697525185412 1102350696889185265 1102390696962185275 1102440696979185285 11024906969961852822 1102630697056185305 1102800697135185329 11028606972341853413 11029006973041853513 11029706973191853528 11030906973511853560 1103120697424185379 11031806974561853916 11032506974771853937 1103440697516185409R_280 110346 1103461320698185185523699091185712 1103490698197185535 1103530698270185545 1103580698287185555 11036306983041855522 1103770698367185575 1103830698440185599 11038806985361856113 11039206986331856313 11039606986951856413 11040306987101856428 11041506987421856460 1104210698863185679 1104250698926185689 11043206989411856824 11044406989731856856 11045006990221856916 11045706990431856937 1104760699082185709R_281 110478 1104781270700044185863700756186022 1104810700056185875 1105020700158185885 1105070700175185895 11051207001921858922 1105260700258185915 1105390700336185939 11054507004501859513 11054907005351859613 11055607005501859628 11056807005821859660 1105710700655185989 11057707006871860016 11058407007081860037 1106030700747186019R_282 110605 1106051270700884186063701535186222 1106080700896186075 1106290700998186085 1106340701015186095 11063907010321860922 1106530701091186115 1106660701169186139 11067207012561861513 11067607013141861613 11068307013291861628 11069507013611861660 1106980701434186189 11070407014661862016 11071107014871862037 1107300701526186219R_283 110732 1107321310701662186263702339186422 1107350701674186275 1107560701776186285 1107610701793186295 11076607018101862922 1107800701870186315 1107970701949186339 11080307020481863513 11080707021181863613 11081407021331863628 11082607021651863660 1108290702238186389 11083507022701864016 11084207022911864037 1108610702330186419R_284 110863 1108631500703019186533703954186722 1108660703031186545 1108880703133186555 1108930703150186565 11089807031671865622 1109120703230186585 1109180703303186609 11092307033991866213 11092707034961866413 11093107035581866513 11093807035731866528 11095007036051866560 1109560703726186689 1109600703789186699 11096707038041866924 11097907038361866956 11098507038851867016 11099207039061867037 1110110703945186719R_285 111013 1110131100704867186873705550187032 1110160704879186885 1110200704952186895 1110250704969186905 11103007049861869022 1110440705052186925 1110570705130186949 11106307052441869613 11106707053291869713 11107407053441869728 11108607053761869760 1110890705449186999 11109507054811870116 11110207055021870137 1111210705541187029R_286 111123 1111231100705668187073706290187232 1111260705680187085 1111300705753187095 1111350705770187105 11114007057871871022 1111540705846187125 1111670705924187149 11117307060111871613 11117707060691871713 11118407060841871728 11119607061161871760 1111990706189187199 11120507062211872116 11121207062421872137 1112310706281187229R_287 111233 1112331140706407187273707055187432 1112360706419187285 1112400706492187295 1112450706509187305 11125007065261873022 1112640706586187325 1112810706665187349 11128707067641873613 11129107068341873713 11129807068491873728 11131007068811873760 1113130706954187399 11131907069861874116 11132607070071874137 1113450707046187429R_288 111347 1113471320707715187543708621187732 1113500707727187555 1113540707800187565 1113590707817187575 11136407078341875722 1113780707897187595 1113840707970187619 11138907080661876313 11139307081631876513 11139707082251876613 11140407082401876628 11141607082721876660 1114220708393187699 1114260708456187709 11143307084711877024 11144507085031877056 11145107085521877116 11145807085731877137 1114770708612187729R_289 111479 1114791270710001187943710735188102 1114820710013187955 1115030710115187965 1115080710132187975 11151307101491879722 1115270710227187995 1115400710311188019 11154607104271880313 11155007105141880413 11155707105291880428 11156907105611880460 1115720710634188069 11157807106661880816 11158507106871880837 1116040710726188099R_290 111606 1116061310710876188143711608188302 1116090710888188155 1116300710990188165 1116350711007188175 11164007110241881722 1116540711098188195 1116710711188188219 11167707113021882313 11168107113871882413 11168807114021882428 11170007114341882460 1117030711507188269 11170907115391882816 11171607115601882837 1117350711599188299R_291 111737 1117371340711742188343712487188502 1117400711754188355 1117610711856188365 1117660711873188375 11177107118901883722 1117850711978188395 1118050712081188419 11181107121881884313 11181507122661884413 11182207122811884428 11183407123131884460 1118370712386188469 11184307124181884816 11185007124391884837 1118690712478188499R_292 111871 1118711280712622188543713328188702 1118740712634188555 1118950712736188565 1119000712753188575 11190507127701885722 1119190712837188595 1119330712924188619 11193907130301886313 11194307131071886413 11195007131221886428 11196207131541886460 1119650713227188669 11197107132591886816 11197807132801886837 1119970713319188699R_293 111999 111999850713471188743713806188822 1120020713483188755 1120230713585188765 1120280713602188775 11203307136191887722 1120470713697188795 11205607137411888012 11206307137621888033 1120820713797188815R_294 112084 1120841110713946188863714543188992 1120870713958188875 1121080714060188885 1121130714077188895 11211807140941888922 1121320714157188915 1121380714265188939 1121420714348188949 11214907143631889424 11216107143951889456 1121640714460188965 11216707144781889712 11217407144991889733 1121930714534188985R_295 112195 1121951140715241189103715889189262 1121980715253189115 1122020715326189125 1122070715343189135 11221207153601891322 1122260715420189155 1122430715499189179 11224907155981891913 11225307156681892013 11226007156831892028 11227207157151892060 1122750715788189229 11228107158201892416 11228807158411892437 1123070715880189259R_296 112309 1123091280716561189373717388189542 1123120716573189385 1123160716646189395 1123210716663189405 11232607166801894022 1123400716743189425 1123460716816189449 11235107169181894613 11235507169861894713 11236207170011894728 11237407170331894760 1123800717157189509 1123840717223189519 11239107172381895124 11240307172701895156 11240907173191895216 11241607173401895237 1124350717379189539R_297 112437 112437940718060189653718590189782 1124400718072189665 1124440718145189675 1124490718162189685 11245407181791896822 1124680718242189705 1124740718331189729 1124780718395189739 11248507184101897324 11249707184421897356 1125000718507189755 11250307185251897612 11251007185461897633 1125290718581189775R_298 112531 112531940719256189893719786190022 1125340719268189905 1125380719341189915 1125430719358189925 11254807193751899222 1125620719438189945 1125680719527189969 1125720719591189979 11257907196061899724 11259107196381899756 1125940719703189995 11259707197211900012 11260407197421900033 1126230719777190015R_299 112625 112625940720440190133720992190262 1126280720452190145 1126320720525190155 1126370720542190165 11264207205591901622 1126560720622190185 1126620720722190209 1126660720797190219 11267307208121902124 11268507208441902156 1126880720909190235 11269107209271902412 11269807209481902433 1127170720983190255R_300 112719 112719980721658190373722313190522 1127220721670190385 1127260721743190395 1127310721760190405 11273607217771904022 1127500721840190425 1127560721923190449 1127600722036190469 1127640722118190479 11277107221331904724 11278307221651904756 1127860722230190495 11278907222481905012 11279607222691905033 1128150722304190515R_301 112817 112817940722973190633723475190762 1128200722985190645 1128240723058190655 1128290723075190665 11283407230921906622 1128480723155190685 1128540723230190709 1128580723280190719 11286507232951907124 11287707233271907156 1128800723392190735 11288307234101907412 11289007234311907433 1129090723466190755R_302 112911 1129111280724141190873724944191042 1129140724153190885 1129180724226190895 1129230724243190905 11292807242601909022 1129420724323190925 1129480724396190949 11295307244991909613 11295707245681909713 11296407245831909728 11297607246151909760 1129820724726191009 1129860724779191019 11299307247941910124 11300507248261910156 11301107248751910216 11301807248961910237 1130370724935191039R_303 113039 1130391280725628191153726431191322 1130420725640191165 1130460725713191175 1130510725730191185 11305607257471911822 1130700725810191205 1130760725883191229 11308107259851912413 11308507260531912513 11309207260681912528 11310407261001912560 1131100726212191289 1131140726266191299 11312107262811912924 11313307263131912956 11313907263621913016 11314607263831913037 1131650726422191319R_304 113167 1131671280727091191433727916191602 1131700727103191445 1131740727176191455 1131790727193191465 11318407272101914622 1131980727273191485 1132040727346191509 11320907274491915213 11321307275181915313 11322007275331915328 11323207275651915360 1132380727687191569 1132420727751191579 11324907277661915724 11326107277981915756 11326707278471915816 11327407278681915837 1132930727907191599R_305 113295 113295940728570191713729160191842 1132980728582191725 1133020728655191735 1133070728672191745 11331207286891917422 1133260728752191765 1133320728871191789 1133360728965191799 11334307289801917924 11335507290121917956 1133580729077191815 11336107290951918212 11336807291161918233 1133870729151191835R_306 113389 1133891280729820191953730629192122 1133920729832191965 1133960729905191975 1134010729922191985 11340607299391919822 1134200730002192005 1134260730075192029 11343107301701920413 11343507302311920513 11344207302461920528 11345407302781920560 1134600730400192089 1134640730464192099 11347107304791920924 11348307305111920956 11348907305601921016 11349607305811921037 1135150730620192119R_307 113517 1135171110731309192233731880192362 1135200731321192245 1135410731423192255 1135460731440192265 11355107314571922622 1135650731520192285 1135710731615192309 1135750731685192319 11358207317001923124 11359407317321923156 1135970731797192335 11360007318151923412 11360707318361923433 1136260731871192355R_308 113628 113628980732540192473733179192622 1136310732552192485 1136350732625192495 1136400732642192505 11364507326591925022 1136590732722192525 1136650732805192549 1136690732910192569 1136730732984192579 11368007329991925724 11369207330311925756 1136950733096192595 11369807331141926012 11370507331351926033 1137240733170192615R_309 113726 113726940733863192733734503192862 1137290733875192745 1137330733948192755 1137380733965192765 11374307339821927622 1137570734045192785 1137630734189192809 1137670734308192819 11377407343231928124 11378607343551928156 1137890734420192835 11379207344381928412 11379907344591928433 1138180734494192855R_310 113820 113820980735163192973735802193122 1138230735175192985 1138270735248192995 1138320735265193005 11383707352821930022 1138510735345193025 1138570735428193049 1138610735533193069 1138650735607193079 11387207356221930724 11388407356541930756 1138870735719193095 11389007357371931012 11389707357581931033 1139160735793193115R_311 113918 1139181210736478193233737172193392 1139210736490193245 1139250736563193255 1139300736580193265 11393507365971932622 1139490736678193285 1139730736782193309 11397907368811933213 11398307369511933313 11399007369661933328 11400207369981933360 1140050737071193359 11401107371031933716 11401807371241933737 1140370737163193389R_312 114039 1140391280737832193503738633193672 1140420737844193515 1140460737917193525 1140510737934193535 11405607379511935322 1140700738014193555 1140760738087193579 11408107381801935913 11408507382391936013 11409207382541936028 11410407382861936060 1141100738406193639 1141140738468193649 11412107384831936424 11413307385151936456 11413907385641936516 11414607385851936537 1141650738624193669R_313 114167 1141671110739337193783739956193912 1141700739349193795 1141910739451193805 1141960739468193815 11420107394851938122 1142150739548193835 1142210739667193859 1142250739761193869 11423207397761938624 11424407398081938656 1142470739873193885 11425007398911938912 11425707399121938933 1142760739947193905R_314 114278 1142781280740646194023741407194192 1142810740658194035 1142850740731194045 1142900740748194055 11429507407651940522 1143090740828194075 1143150740901194099 11432007409841941113 11432407410331941213 11433107410481941228 11434307410801941260 1143490741190194159 1143530741242194169 11436007412571941624 11437207412891941656 11437807413381941716 11438507413591941737 1144040741398194189R_315 114406 114406980742055194303742656194452 1144090742067194315 1144130742140194325 1144180742157194335 11442307421741943322 1144370742237194355 1144430742320194379 1144470742406194399 1144510742461194409 11445807424761944024 11447007425081944056 1144730742573194425 11447607425911944312 11448307426121944333 1145020742647194445R_316 114504 114504940743316194563743856194692 1145070743328194575 1145110743401194585 1145160743418194595 11452107434351945922 1145350743498194615 1145410743592194639 1145450743661194649 11455207436761946424 11456407437081946456 1145670743773194665 11457007437911946712 11457707438121946733 1145960743847194685R_317 114598 114598940744516194803745064194932 1146010744528194815 1146050744601194825 1146100744618194835 11461507446351948322 1146290744698194855 1146350744796194879 1146390744869194889 11464607448841948824 11465807449161948856 1146610744981194905 11466407449991949112 11467107450201949133 1146900745055194925R_0 114692 11469270745309195023745372195062t_00 1146970745357195055R_1 114699 11469970745438195103745501195142t_00 1147040745486195135R_2 114706 11470670745567195183745630195222t_00 1147110745615195215R_3 114713 11471370745696195263745759195302t_00 1147180745744195295R_4 114720 11472070745825195343745888195382t_00 1147250745873195375R_5 114727 11472770745954195423746017195462t_00 1147320746002195455R_6 114734 11473470746083195503746146195542t_00 1147390746131195535R_7 114741 11474170746212195583746275195622t_00 1147460746260195615R_8 114748 11474870746341195663746404195702t_00 1147530746389195695R_39 114755 11475570746470195743746534195782t_00 1147600746519195775R_40 114762 11476270746600195823746664195862t_00 1147670746649195855R_41 114769 11476970746730195903746794195942t_00 1147740746779195935R_42 114776 11477670746860195983746924196022t_00 1147810746909196015R_43 114783 11478370746990196063747054196102t_00 1147880747039196095R_44 114790 11479070747120196143747184196182t_00 1147950747169196175R_45 114797 11479770747250196223747314196262t_00 1148020747299196255R_46 114804 11480470747380196303747444196342t_00 1148090747429196335R_47 114811 11481170747510196383747574196422t_00 1148160747559196415R_48 114818 11481870747640196463747704196502t_00 1148230747689196495R_49 114825 11482570747770196543747834196582t_00 1148300747819196575R_50 114832 11483270747900196623747964196662t_00 1148370747949196655R_51 114839 11483970748030196703748094196742t_00 1148440748079196735R_52 114846 11484670748160196783748224196822t_00 1148510748209196815R_53 114853 11485370748290196863748354196902t_00 1148580748339196895R_54 114860 11486070748420196943748484196982t_00 1148650748469196975R_55 114867 11486770748550197023748614197062t_00 1148720748599197055R_56 114874 11487470748680197103748744197142t_00 1148790748729197135R_57 114881 11488170748810197183748874197222t_00 1148860748859197215R_58 114888 11488870748940197263749004197302t_00 1148930748989197295R_59 114895 11489570749070197343749134197382t_00 1149000749119197375R_60 114902 11490270749200197423749264197462t_00 1149070749249197455R_61 114909 11490970749330197503749394197542t_00 1149140749379197535R_62 114916 11491670749460197583749524197622t_00 1149210749509197615R_63 114923 11492370749590197663749654197702t_00 1149280749639197695R_64 114930 11493070749720197743749784197782t_00 1149350749769197775R_95 114937 11493770749850197823749914197862t_00 1149420749899197855Adj_0_t1_v10 114944 114944470749918197873750079197932t_00 1149490750000197917 11496507500261979133 1149890750070197925Adj_1_t1_v10 114991 114991470750083197943750248198002t_00 1149960750168197987 11501207501941979833 1150360750239197995Adj_2_t1_v10 115038 115038470750252198013750413198072t_00 1150430750334198057 11505907503601980533 1150830750404198065Adj_3_t1_v10 115085 115085350750417198083750584198142t_00 1150900750502198127 11510607505281981233 1151180750575198135Adj_4_t1_v10 115120 115120460750588198153750763198212t_00 1151250750675198197 11514107507011981933 1151640750754198205Adj_5_t1_v10 115166 115166350750767198223750938198282t_00 1151710750854198267 11518707508801982633 1151990750929198275Adj_6_t1_v10 115201 115201460750942198293751121198352t_00 1152060751031198337 11522207510571983333 1152450751112198345Adj_7_t1_v10 115247 115247430751125198363751304198422t_00 1152520751212198407 11526807512381984033 1152880751295198415Adj_8_t1_v10 115290 115290540751308198433751495198492t_00 1152950751397198477 11531107514231984733 1153420751486198485Adj_9_t1_v10 115344 115344350751499198503751654198562t_00 1153490751586198547 11536507516121985433 1153770751645198555Adj_10_t1_v10 115379 115379460751658198573751821198632t_00 1153840751747198617 11540007517731986133 1154230751812198625Adj_11_t1_v10 115425 115425450751825198643751989198702t_00 1154300751912198687 11544607519381986833 1154680751980198695Adj_12_t1_v10 115470 115470350751993198713752166198772t_00 1154750752079198757 11549107521041987532 1155030752157198765Adj_13_t1_v11 115505 115505300752170198783752313198842t_00 1155100752252198825 1155330752304198835Adj_14_t1_v11 115535 115535300752317198853752465198912t_00 1155400752398198895 1155630752456198905Adj_15_t1_v11 115565 115565220752469198923752592198982t_00 1155700752555198965 1155850752583198975Adj_15_t1_v12 115587 115587380752596198993752780199052t_00 1155920752687199035 1156230752771199045Adj_16_t1_v11 115625 115625220752784199063752907199122t_00 1156300752870199105 1156450752898199115Adj_16_t1_v12 115647 115647380752911199133753095199192t_00 1156520753002199175 1156830753086199185Adj_17_t1_v14 115685 115685180753099199203753226199262t_00 1156900753182199245 1157010753217199255Adj_17_t1_v20 115703 115703290753230199273753372199332t_00 1157080753317199315 1157300753363199325Adj_17_t1_v32 115732 115732180753376199343753503199402t_00 1157370753459199385 1157480753494199395Adj_17_t1_v33 115750 115750180753507199413753634199472t_00 1157550753590199455 1157660753625199465Adj_17_t1_v34 115768 115768180753638199483753768199542t_00 1157730753721199525 1157840753759199535Adj_17_t1_v30 115786 115786190753772199553753907199612t_00 1157910753855199595 1158030753898199605Adj_18_t1_v14 115805 115805290753911199623754048199682t_00 1158100753998199665 1158320754039199675Adj_18_t1_v20 115834 115834290754052199693754204199752t_00 1158390754143199735 1158610754195199745Adj_18_t1_v32 115863 115863290754208199763754345199822t_00 1158680754295199805 1158900754336199815Adj_18_t1_v33 115892 115892290754349199833754486199892t_00 1158970754436199875 1159190754477199885Adj_18_t1_v34 115921 115921290754490199903754630199962t_00 1159260754577199945 1159480754621199955Adj_18_t1_v30 115950 115950300754634199973754779200032t_00 1159550754721200015 1159780754770200025Adj_19_t1_v14 115980 115980180754783200043754924200102t_00 1159850754872200085 1159960754915200095Adj_20_t1_v14 115998 115998290754928200113755077200172t_00 1160030755019200155 1160250755068200165Adj_21_t1_v43 116027 116027810755081200183755218200242t_00 1160320755167200225 1161060755209200235Adj_22_t1_v20 116108 116108290755222200253755362200312t_00 1161130755308200295 1161350755353200305Adj_23_t1_v20 116137 116137290755366200323755516200382t_00 1161420755456200365 1161640755507200375Adj_24_t1_v33 116166 116166180755520200393755649200452t_00 1161710755606200435 1161820755640200445Adj_25_t1_v16 116184 116184180755653200463755781200522t_00 1161890755737200505 1162000755772200515Adj_26_t1_v16 116202 116202290755785200533755921200592t_00 1162070755871200575 1162290755912200585Adj_27_t1_v30 116231 116231190755925200603756081200662t_00 1162360756014200645 1162480756072200655Adj_28_t1_v30 116250 116250190756085200673756237200732t_00 1162550756172200715 1162670756228200725Adj_29_t1_v30 116269 116269190756241200743756389200802t_00 1162740756329200785 1162860756380200795Adj_30_t1_v30 116288 116288190756393200813756545200872t_00 1162930756485200855 1163050756536200865Adj_31_t1_v30 116307 116307190756549200883756701200942t_00 1163120756641200925 1163240756692200935Adj_32_t1_v30 116326 116326190756705200953756861201012t_00 1163310756801200995 1163430756852201005Adj_33_t1_v18 116345 116345180756865201023756990201082t_00 1163500756948201065 1163610756981201075Adj_34_t1_v18 116363 116363290756994201093757129201152t_00 1163680757081201135 1163900757120201145Adj_35_t1_v18 116392 116392180757133201163757268201222t_00 1163970757221201205 1164080757259201215Adj_36_t1_v18 116410 116410290757272201233757414201292t_00 1164150757361201275 1164370757405201285Adj_37_t1_v12 116439 116439490757418201303757639201362t_00 1164440757509201345 1164860757630201355Adj_38_t1_v12 116488 116488490757643201373757868201432t_00 1164930757732201415 1165350757859201425Adj_39_t1_v12 116537 116537180757872201443758010201502t_00 1165420757961201485 1165530758001201495Adj_40_t1_v12 116555 116555290758014201513758155201572t_00 1165600758100201555 1165820758146201565Adj_41_t1_v10 116584 116584690758159201583758414201642t_00 1165890758256201627 11660507582822016233 1166510758405201635Adj_42_t1_v10 116653 116653230758418201653758579201712t_00 1166580758510201697 11666207585192016916 1166740758570201705Adj_43_t1_v10 116676 116676340758583201723758755201782t_00 1166810758677201767 11668507586862017616 1167080758746201775Adj_44_t1_v10 116710 116710230758759201793758916201852t_00 1167150758851201837 11671907588602018316 1167310758907201845Adj_45_t1_v10 116733 116733340758920201863759088201922t_00 1167380759014201907 11674207590232019016 1167650759079201915Adj_46_t1_v10 116767 116767230759092201933759264201992t_00 1167720759190201977 11677607591992019716 1167880759255201985Adj_47_t1_v10 116790 116790230759268202003759437202062t_00 1167950759363202047 11679907593722020416 1168110759428202055Adj_48_t1_v10 116813 116813340759441202073759618202132t_00 1168180759535202117 11682207595442021116 1168450759609202125Adj_49_t1_v10 116847 116847230759622202143759773202202t_00 1168520759709202187 11685607597182021816 1168680759764202195Adj_50_t1_v10 116870 116870340759777202213759934202272t_00 1168750759861202257 11687907598702022516 1169020759925202265Adj_51_t1_v10 116904 116904230759938202283760091202342t_00 1169090760025202327 11691307600342023216 1169250760082202335Adj_52_t1_v10 116927 116927340760095202353760259202412t_00 1169320760184202397 11693607601932023916 1169590760250202405Adj_53_t1_v10 116961 116961230760263202423760410202482t_00 1169660760346202467 11697007603552024616 1169820760401202475Adj_54_t1_v10 116984 116984340760414202493760572202552t_00 1169890760499202537 11699307605082025316 1170160760563202545Adj_55_t1_v10 117018 117018230760576202563760727202622t_00 1170230760662202607 11702707606712026016 1170390760718202615Adj_56_t1_v10 117041 117041340760731202633760893202692t_00 1170460760819202677 11705007608282026716 1170730760884202685Adj_57_t1_v10 117075 117075230760897202703761056202762t_00 1170800760991202747 11708407610002027416 1170960761047202755Adj_58_t1_v10 117098 117098340761060202773761222202832t_00 1171030761148202817 11710707611572028116 1171300761213202825Adj_59_t1_v10 117132 117132230761226202843761379202902t_00 1171370761313202887 11714107613222028816 1171530761370202895Adj_60_t1_v10 117155 117155230761383202913761538202972t_00 1171600761471202957 11716407614802029516 1171760761529202965Adj_61_t1_v10 117178 117178230761542202983761711203042t_00 1171830761644203027 11718707616532030216 1171990761702203035Adj_62_t1_v10 117201 117201230761715203053761866203112t_00 1172060761802203097 11721007618112030916 1172220761857203105Adj_63_t1_v10 117224 117224340761870203123762036203182t_00 1172290761959203167 11723307619682031616 1172560762027203175Adj_64_t1_v10 117258 117258230762040203193762199203252t_00 1172630762131203237 11726707621402032316 1172790762190203245Adj_65_t1_v10 117281 117281230762203203263762368203322t_00 1172860762301203307 11729007623102033016 1173020762359203315Adj_66_t1_v10 117304 117304340762372203333762548203392t_00 1173090762472203377 11731307624812033716 1173360762539203385Adj_67_t1_v10 117338 117338230762552203403762709203462t_00 1173430762641203447 11734707626502034416 1173590762700203455Adj_68_t1_v10 117361 117361340762713203473762881203532t_00 1173660762804203517 11737007628132035116 1173930762872203525Adj_69_t1_v10 117395 117395230762885203543763042203602t_00 1174000762974203587 11740407629832035816 1174160763033203595Adj_70_t1_v10 117418 117418340763046203613763211203672t_00 1174230763132203657 11742707631412036516 1174500763202203665Adj_71_t1_v10 117452 117452230763215203683763376203742t_00 1174570763306203727 11746107633152037216 1174730763367203735Adj_72_t1_v10 117475 117475230763380203753763527203812t_00 1174800763464203797 11748407634732037916 1174960763518203805Adj_73_t1_v10 117498 117498340763531203823763689203882t_00 1175030763617203867 11750707636262038616 1175300763680203875Adj_74_t1_v10 117532 117532230763693203893763848203952t_00 1175370763781203937 11754107637902039316 1175530763839203945Adj_75_t1_v10 117555 117555340763852203963764018204022t_00 1175600763942204007 11756407639512040016 1175870764009204015Adj_76_t1_v10 117589 117589230764022204033764177204092t_00 1175940764110204077 11759807641192040716 1176100764168204085Adj_77_t1_v10 117612 117612230764181204103764332204162t_00 1176170764267204147 11762107642762041416 1176330764323204155Adj_78_t1_v10 117635 117635340764336204173764498204232t_00 1176400764424204217 11764407644332042116 1176670764489204225Adj_79_t1_v10 117669 117669230764502204243764653204302t_00 1176740764588204287 11767807645972042816 1176900764644204295Adj_80_t1_v10 117692 117692340764657204313764815204372t_00 1176970764741204357 11770107647502043516 1177240764806204365Adj_81_t1_v10 117726 117726230764819204383764970204442t_00 1177310764905204427 11773507649142044216 1177470764961204435Adj_82_t1_v10 117749 117749230764974204453765126204512t_00 1177540765065204497 11775807650742044916 1177700765117204505Adj_83_t1_v10 117772 117772340765130204523765292204582t_00 1177770765222204567 11778107652312045616 1178040765283204575Adj_84_t1_v43 117806 117806220765296204593765445204652t_00 1178110765382204635 1178260765436204645Adj_85_t1_v43 117828 117828330765449204663765611204722t_00 1178330765539204705 1178590765602204715Adj_86_t1_v10 117861 117861220765615204733765770204792t_00 1178660765705204777 11787007657142047716 1178810765761204785Adj_87_t1_v10 117883 117883230765774204803765935204862t_00 1178880765864204847 11789207658732048416 1179040765926204855Adj_88_t1_v10 117906 117906230765939204873766101204932t_00 1179110766029204917 11791507660382049116 1179270766092204925Adj_9_t2_v10 117929 117929350766105204943766262205002t_00 1179340766192204987 11795007662182049833 1179620766253204995Adj_10_t2_v10 117964 117964340766266205013766426205072t_00 1179690766355205057 11798507663812050533 1179960766417205065Adj_17_t2_v30 117998 117998190766430205083766567205142t_00 1180030766513205125 1180150766558205135Adj_18_t2_v30 118017 118017180766571205153766713205212t_00 1180220766658205195 1180330766704205205Adj_27_t2_v30 118035 118035190766717205223766875205282t_00 1180400766806205265 1180520766866205275Adj_28_t2_v30 118054 118054190766879205293767033205352t_00 1180590766966205335 1180710767024205345Adj_29_t2_v30 118073 118073190767037205363767187205422t_00 1180780767125205405 1180900767178205415Adj_30_t2_v30 118092 118092190767191205433767345205492t_00 1180970767283205475 1181090767336205485Adj_31_t2_v30 118111 118111190767349205503767503205562t_00 1181160767441205545 1181280767494205555Adj_32_t2_v30 118130 118130190767507205573767665205632t_00 1181350767603205615 1181470767656205625Adj_42_t2_v10 118149 118149230767669205643767830205702t_00 1181540767761205687 11815807677702056816 1181700767821205695Adj_43_t2_v10 118172 118172250767834205713768003205772t_00 1181770767928205757 11818107679372057516 1181950767994205765Adj_44_t2_v10 118197 118197230768007205783768164205842t_00 1182020768099205827 11820607681082058216 1182180768155205835Adj_45_t2_v10 118220 118220250768168205853768333205912t_00 1182250768262205897 11822907682712058916 1182430768324205905Adj_46_t2_v10 118245 118245230768337205923768509205982t_00 1182500768435205967 11825407684442059616 1182660768500205975Adj_47_t2_v10 118268 118268230768513205993768682206052t_00 1182730768608206037 11827707686172060316 1182890768673206045Adj_48_t2_v10 118291 118291250768686206063768860206122t_00 1182960768780206107 11830007687892061016 1183140768851206115Adj_49_t2_v10 118316 118316230768864206133769015206192t_00 1183210768951206177 11832507689602061716 1183370769006206185Adj_50_t2_v10 118339 118339250769019206203769173206262t_00 1183440769103206247 11834807691122062416 1183620769164206255Adj_51_t2_v10 118364 118364230769177206273769330206332t_00 1183690769264206317 11837307692732063116 1183850769321206325Adj_52_t2_v10 118387 118387250769334206343769495206402t_00 1183920769423206387 11839607694322063816 1184100769486206395Adj_53_t2_v10 118412 118412230769499206413769646206472t_00 1184170769582206457 11842107695912064516 1184330769637206465Adj_54_t2_v10 118435 118435250769650206483769805206542t_00 1184400769735206527 11844407697442065216 1184580769796206535Adj_55_t2_v10 118460 118460230769809206553769960206612t_00 1184650769895206597 11846907699042065916 1184810769951206605Adj_56_t2_v10 118483 118483250769964206623770123206682t_00 1184880770052206667 11849207700612066616 1185060770114206675Adj_57_t2_v10 118508 118508230770127206693770286206752t_00 1185130770221206737 11851707702302067316 1185290770277206745Adj_58_t2_v10 118531 118531250770290206763770449206822t_00 1185360770378206807 11854007703872068016 1185540770440206815Adj_59_t2_v10 118556 118556230770453206833770606206892t_00 1185610770540206877 11856507705492068716 1185770770597206885Adj_60_t2_v10 118579 118579230770610206903770765206962t_00 1185840770698206947 11858807707072069416 1186000770756206955Adj_61_t2_v10 118602 118602230770769206973770938207032t_00 1186070770871207017 11861107708802070116 1186230770929207025Adj_62_t2_v10 118625 118625230770942207043771093207102t_00 1186300771029207087 11863407710382070816 1186460771084207095Adj_63_t2_v10 118648 118648250771097207113771260207172t_00 1186530771186207157 11865707711952071516 1186710771251207165Adj_64_t2_v10 118673 118673230771264207183771423207242t_00 1186780771355207227 11868207713642072216 1186940771414207235Adj_65_t2_v10 118696 118696230771427207253771592207312t_00 1187010771525207297 11870507715342072916 1187170771583207305Adj_66_t2_v10 118719 118719250771596207323771769207382t_00 1187240771696207367 11872807717052073616 1187420771760207375Adj_67_t2_v10 118744 118744230771773207393771930207452t_00 1187490771862207437 11875307718712074316 1187650771921207445Adj_68_t2_v10 118767 118767250771934207463772099207522t_00 1187720772025207507 11877607720342075016 1187900772090207515Adj_69_t2_v10 118792 118792230772103207533772260207592t_00 1187970772192207577 11880107722012075716 1188130772251207585Adj_70_t2_v10 118815 118815250772264207603772426207662t_00 1188200772350207647 11882407723592076416 1188380772417207655Adj_71_t2_v10 118840 118840230772430207673772591207732t_00 1188450772521207717 11884907725302077116 1188610772582207725Adj_72_t2_v10 118863 118863230772595207743772742207802t_00 1188680772679207787 11887207726882077816 1188840772733207795Adj_73_t2_v10 118886 118886250772746207813772901207872t_00 1188910772832207857 11889507728412078516 1189090772892207865Adj_74_t2_v10 118911 118911230772905207883773060207942t_00 1189160772993207927 11892007730022079216 1189320773051207935Adj_75_t2_v10 118934 118934250773064207953773227208012t_00 1189390773154207997 11894307731632079916 1189570773218208005Adj_76_t2_v10 118959 118959230773231208023773386208082t_00 1189640773319208067 11896807733282080616 1189800773377208075Adj_77_t2_v10 118982 118982230773390208093773541208152t_00 1189870773476208137 11899107734852081316 1190030773532208145Adj_78_t2_v10 119005 119005250773545208163773704208222t_00 1190100773633208207 11901407736422082016 1190280773695208215Adj_79_t2_v10 119030 119030230773708208233773859208292t_00 1190350773794208277 11903907738032082716 1190510773850208285Adj_80_t2_v10 119053 119053250773863208303774018208362t_00 1190580773947208347 11906207739562083416 1190760774009208355Adj_81_t2_v10 119078 119078230774022208373774173208432t_00 1190830774108208417 11908707741172084116 1190990774164208425Adj_82_t2_v10 119101 119101230774177208443774329208502t_00 1191060774268208487 11911007742772084816 1191220774320208495Adj_83_t2_v10 119124 119124250774333208513774492208572t_00 1191290774425208557 11913307744342085516 1191470774483208565Adj_84_t2_v43 119149 119149300774496208583774656208642t_00 1191540774582208625 1191770774647208635Adj_85_t2_v43 119179 119179220774660208653774818208712t_00 1191840774750208695 1191990774809208705Adj_86_t2_v10 119201 119201220774822208723774977208782t_00 1192060774912208767 11921007749212087616 1192210774968208775Adj_87_t2_v10 119223 119223230774981208793775142208852t_00 1192280775071208837 11923207750802088316 1192440775133208845Adj_88_t2_v10 119246 119246230775146208863775308208922t_00 1192510775236208907 11925507752452089016 1192670775299208915Adj_9_t3_v10 119269 119269340775312208933775470208992t_00 1192740775399208977 11929007754252089733 1193010775461208985Adj_10_t3_v10 119303 119303350775474209003775633209062t_00 1193080775563209047 11932407755892090433 1193360775624209055Adj_17_t3_v30 119338 119338180775637209073775775209132t_00 1193430775720209115 1193540775766209125Adj_18_t3_v30 119356 119356190775779209143775920209202t_00 1193610775866209185 1193730775911209195Adj_27_t3_v30 119375 119375180775924209213776083209272t_00 1193800776013209255 1193910776074209265Adj_28_t3_v30 119393 119393180776087209283776242209342t_00 1193980776174209325 1194090776233209335Adj_29_t3_v30 119411 119411180776246209353776397209412t_00 1194160776334209395 1194270776388209405Adj_30_t3_v30 119429 119429180776401209423776556209482t_00 1194340776493209465 1194450776547209475Adj_31_t3_v30 119447 119447180776560209493776715209552t_00 1194520776652209535 1194630776706209545Adj_32_t3_v30 119465 119465180776719209563776878209622t_00 1194700776815209605 1194810776869209615Adj_42_t3_v10 119483 119483250776882209633777049209692t_00 1194880776974209677 11949207769832096716 1195060777040209685Adj_43_t3_v10 119508 119508230777053209703777216209762t_00 1195130777147209747 11951707771562097416 1195290777207209755Adj_44_t3_v10 119531 119531250777220209773777383209832t_00 1195360777312209817 11954007773212098116 1195540777374209825Adj_45_t3_v10 119556 119556230777387209843777546209902t_00 1195610777481209887 11956507774902098816 1195770777537209895Adj_46_t3_v10 119579 119579250777550209913777728209972t_00 1195840777648209957 11958807776572099516 1196020777719209965Adj_47_t3_v10 119604 119604250777732209983777907210042t_00 1196090777827210027 11961307778362100216 1196270777898210035Adj_48_t3_v10 119629 119629230777911210053778079210112t_00 1196340778005210097 11963807780142100916 1196500778070210105Adj_49_t3_v10 119652 119652250778083210123778240210182t_00 1196570778170210167 11966107781792101616 1196750778231210175Adj_50_t3_v10 119677 119677230778244210193778392210252t_00 1196820778328210237 11968607783372102316 1196980778383210245Adj_51_t3_v10 119700 119700250778396210263778555210322t_00 1197050778483210307 11970907784922103016 1197230778546210315Adj_52_t3_v10 119725 119725230778559210333778714210392t_00 1197300778648210377 11973407786572103716 1197460778705210385Adj_53_t3_v10 119748 119748250778718210403778871210462t_00 1197530778801210447 11975707788102104416 1197710778862210455Adj_54_t3_v10 119773 119773230778875210473779024210532t_00 1197780778960210517 11978207789692105116 1197940779015210525Adj_55_t3_v10 119796 119796250779028210543779185210602t_00 1198010779114210587 11980507791232105816 1198190779176210595Adj_56_t3_v10 119821 119821230779189210613779342210672t_00 1198260779277210657 11983007792862106516 1198420779333210665Adj_57_t3_v10 119844 119844250779346210683779511210742t_00 1198490779440210727 11985307794492107216 1198670779502210735Adj_58_t3_v10 119869 119869230779515210753779668210812t_00 1198740779603210797 11987807796122107916 1198900779659210805Adj_59_t3_v10 119892 119892250779672210823779831210882t_00 1198970779759210867 11990107797682108616 1199150779822210875Adj_60_t3_v10 119917 119917250779835210893779996210952t_00 1199220779923210937 11992607799322109316 1199400779987210945Adj_61_t3_v10 119942 119942250780000210963780175211022t_00 1199470780102211007 11995107801112110016 1199650780166211015Adj_62_t3_v10 119967 119967250780179211033780336211092t_00 1199720780266211077 11997607802752110716 1199900780327211085Adj_63_t3_v10 119992 119992230780340211103780497211162t_00 1199970780429211147 12000107804382111416 1200130780488211155Adj_64_t3_v10 120015 120015250780501211173780666211232t_00 1200200780592211217 12002407806012112116 1200380780657211225Adj_65_t3_v10 120040 120040250780670211243780841211302t_00 1200450780768211287 12004907807772112816 1200630780832211295Adj_66_t3_v10 120065 120065230780845211313781012211372t_00 1200700780945211357 12007407809542113516 1200860781003211365Adj_67_t3_v10 120088 120088250781016211383781179211442t_00 1200930781105211427 12009707811142114216 1201110781170211435Adj_68_t3_v10 120113 120113230781183211453781342211512t_00 1201180781274211497 12012207812832114916 1201340781333211505Adj_69_t3_v10 120136 120136250781346211523781509211582t_00 1201410781435211567 12014507814442115616 1201590781500211575Adj_70_t3_v10 120161 120161230781513211593781669211652t_00 1201660781599211637 12017007816082116316 1201820781660211645Adj_71_t3_v10 120184 120184250781673211663781840211722t_00 1201890781764211707 12019307817732117016 1202070781831211715Adj_72_t3_v10 120209 120209250781844211733781997211792t_00 1202140781928211777 12021807819372117716 1202320781988211785Adj_73_t3_v10 120234 120234230782001211803782150211862t_00 1202390782087211847 12024307820962118416 1202550782141211855Adj_74_t3_v10 120257 120257250782154211873782315211932t_00 1202620782242211917 12026607822512119116 1202800782306211925Adj_75_t3_v10 120282 120282230782319211943782476212002t_00 1202870782409211987 12029107824182119816 1203030782467211995Adj_76_t3_v10 120305 120305250782480212013782641212072t_00 1203100782568212057 12031407825772120516 1203280782632212065Adj_77_t3_v10 120330 120330250782645212083782802212142t_00 1203350782731212127 12033907827402121216 1203530782793212135Adj_78_t3_v10 120355 120355230782806212153782959212212t_00 1203600782894212197 12036407829032121916 1203760782950212205Adj_79_t3_v10 120378 120378250782963212223783120212282t_00 1203830783049212267 12038707830582122616 1204010783111212275Adj_80_t3_v10 120403 120403230783124212293783273212352t_00 1204080783208212337 12041207832172123316 1204240783264212345Adj_81_t3_v10 120426 120426250783277212363783434212422t_00 1204310783363212407 12043507833722124016 1204490783425212415Adj_82_t3_v10 120451 120451250783438212433783596212492t_00 1204560783529212477 12046007835382124716 1204740783587212485Adj_83_t3_v10 120476 120476230783600212503783753212562t_00 1204810783692212547 12048507837012125416 1204970783744212555Adj_84_t3_v43 120499 120499220783757212573783911212632t_00 1205040783843212615 1205190783902212625Adj_85_t3_v43 120521 120521300783915212643784079212702t_00 1205260784005212685 1205490784070212695Adj_86_t3_v10 120551 120551240784083212713784244212772t_00 1205560784173212757 12056007841822127516 1205730784235212765Adj_87_t3_v10 120575 120575250784248212783784415212842t_00 1205800784338212827 12058407843472128216 1205980784406212835Adj_88_t3_v10 120600 120600250784419212853784587212912t_00 1206050784509212897 12060907845182128916 1206230784578212905TimedEventsTable 518170124true07847242129917847562129933TimedEventTimesTable 518182124true07847592130117847952130137rulebooks_array 51819414524false0784930213101794106213109177EMPTY_RULEBOOK 120625 12062570794111213123794189213162forbid_breaks0 1206300794180213155B0_startup 120632 1206326720794193213173797156214102forbid_breaks0rv4original_deadflag8 1206370794316213225 1206410794350213235 1206490794382213245 1206530794400213259 12065907944132132522 1206630794454213269 1206690794492213285 1206820794524213295 12068807945592132940 1206900794573213305 12069407945852133017 1207030794622213315 1207110794660213325 1207150794678213339 12072107946912133322 1207250794732213349 1207310794776213365 1207440794808213375 12075007948432133740 1207520794857213385 12075607948692133817 1207650794906213395 1207730794949213405 1207770794967213419 12078307949802134122 1207870795021213429 1207930795070213445 1208060795102213455 12081207951372134540 1208140795151213465 12081807951632134617 1208270795200213475 1208350795243213485 1208390795261213499 12084507952742134922 1208490795315213509 1208550795364213525 1208680795396213535 12087407954312135340 1208760795445213545 12088007954572135417 1208890795494213555 1208970795510213565 1209010795528213579 12090707955412135722 1209110795582213589 1209170795604213605 1209300795636213615 12093607956712136140 1209380795685213625 12094207956972136217 1209510795734213635 1209590795773213645 1209630795791213659 12096907958042136522 1209730795845213669 1209790795890213685 1209920795922213695 12099807959572136940 1210000795971213705 12100407959832137017 1210130796020213715 1210210796037213725 1210250796055213739 12103107960682137322 1210350796109213749 1210410796132213765 1210540796164213775 12106007961992137740 1210620796213213785 12106607962252137817 1210750796262213795 1210830796279213805 1210870796297213819 12109307963102138122 1210970796351213829 1211030796374213845 1211160796406213855 12112207964412138540 1211240796455213865 12112807964672138617 1211370796504213875 1211450796521213885 1211490796539213899 12115507965522138922 1211590796593213909 1211650796616213925 1211780796648213935 12118407966832139340 1211860796697213945 12119007967092139417 1211990796746213955 1212070796763213965 1212110796781213979 12121707967942139722 1212210796835213989 1212270796858214005 1212400796890214015 12124607969252140140 1212480796939214025 12125207969512140217 1212610796988214035 1212690797005214045 1212730797023214059 12127907970362140522 1212830797077214069 1212890797100214085 1213020797132214095B1_turn_sequence 121304 1213047340797160214113800355215122forbid_breaks0rv4original_deadflag8 1213090797289214165 1213130797323214175 1213210797351214185 1213250797369214199 12133107973822141922 1213350797423214209 1213410797457214225 1213540797489214235 12136007975242142340 1213620797538214245 12136607975502142417 1213750797587214255 1213830797603214265 1213870797621214279 12139307976342142722 1213970797675214289 1214030797697214305 1214160797729214315 12142207977642143140 1214240797778214325 12142807977902143217 1214370797827214335 1214450797857214345 1214490797875214359 12145507978882143522 1214590797929214369 1214650797965214385 1214780797997214395 12148407980322143940 1214860798046214405 12149007980582144017 1214990798095214415 1215070798112214425 1215110798130214439 12151707981432144322 1215210798184214449 1215270798207214465 1215400798239214475 12154607982742144740 1215480798288214485 12155207983002144817 1215610798337214495 1215690798354214505 1215730798372214519 12157907983852145122 1215830798426214529 1215890798449214545 1216020798481214555 12160807985162145540 1216100798530214565 12161407985422145617 1216230798579214575 1216310798606214585 1216350798624214599 12164107986372145922 1216450798678214609 1216510798711214625 1216640798743214635 12167007987782146340 1216720798792214645 12167607988042146417 1216850798841214655 1216930798868214665 1216970798886214679 12170307988992146722 1217070798940214689 1217130798973214705 1217260799005214715 12173207990402147140 1217340799054214725 12173807990662147217 1217470799103214735 1217550799146214745 1217590799164214759 12176507991772147522 1217690799218214769 1217750799267214785 1217880799299214795 12179407993342147940 1217960799348214805 12180007993602148017 1218090799397214815 1218170799414214825 1218210799432214839 12182707994452148322 1218310799486214849 1218370799509214865 1218500799541214875 12185607995762148740 1218580799590214885 12186207996022148817 1218710799639214895 1218790799666214905 1218830799684214919 12188907996972149122 1218930799738214929 1218990799771214945 1219120799803214955 12191807998382149540 1219200799852214965 12192407998642149617 1219330799901214975 1219410799940214985 1219450799958214999 12195107999712149922 1219550800012215009 1219610800057215025 1219740800089215035 12198008001242150340 1219820800138215045 12198608001502150417 1219950800187215055 1220030800204215065 1220070800222215079 12201308002352150722 1220170800276215089 1220230800299215105 1220360800331215115B2_shutdown 122038 1220382380800359215133801488215502forbid_breaks0rv4original_deadflag8 1220430800483215185 1220470800517215195 1220550800534215205 1220590800552215219 12206508005652152122 1220690800606215229 1220750800629215245 1220880800661215255 12209408006962152540 1220960800710215265 12210008007222152617 1221090800759215275 1221170800799215285 1221210800817215299 12212708008302152922 1221310800871215309 1221370800917215325 1221500800949215335 12215608009842153340 1221580800998215345 12216208010102153417 1221710801047215355 1221790801064215365 1221830801082215379 12218908010952153722 1221930801136215389 1221990801159215405 1222120801191215415 12221808012262154140 1222200801240215425 12222408012522154217 1222330801289215435 1222410801322215445 1222450801340215459 12225108013532154522 1222550801394215469 1222610801433215485 1222740801465215495B3_scene_changing 122276 122276480801492215513801779215622forbid_breaks0rv4 1222810801586215555 1222890801616215565 1222930801634215579 12229908016472155722 1223030801688215589 1223090801724215605 1223220801756215615B4_when_play_begins 122324 122324480801783215633802048215742forbid_breaks0rv4 1223290801879215675 1223370801897215685 1223410801915215699 12234708019282156922 1223510801969215709 1223570801993215725 1223700802025215735B5_when_play_ends 120625080205921575108020932157544B6_when_scene_begins 122372 122372560802097215763802438215902forbid_breaks0rv4p8 1223770802221215815 1223810802246215825 1223850802271215835 1223930802288215845 1223970802306215859 12240308023192158522 1224070802360215869 1224130802383215885 1224260802415215895B7_when_scene_ends 120625080244921591108024842159145B8_every_turn 120625080249521592108025252159240B9_action_processing 122428 1224286720802529215933805528216862forbid_breaks0rv4original_deadflag8 1224330802662215985 1224370802696215995 1224450802713216005 1224490802731216019 12245508027442160122 1224590802785216029 1224650802808216045 1224780802840216055 12248408028752160540 1224860802889216065 12249008029012160617 1224990802938216075 1225070802955216085 1225110802973216099 12251708029862160922 1225210803027216109 1225270803050216125 1225400803082216135 12254608031172161340 1225480803131216145 12255208031432161417 1225610803180216155 1225690803197216165 1225730803215216179 12257908032282161722 1225830803269216189 1225890803292216205 1226020803324216215 12260808033592162140 1226100803373216225 12261408033852162217 1226230803422216235 1226310803453216245 1226350803471216259 12264108034842162522 1226450803525216269 1226510803562216285 1226640803594216295 12267008036292162940 1226720803643216305 12267608036552163017 1226850803692216315 1226930803726216325 1226970803744216339 12270308037572163322 1227070803798216349 1227130803838216365 1227260803870216375 12273208039052163740 1227340803919216385 12273808039312163817 1227470803968216395 1227550804004216405 1227590804022216419 12276508040352164122 1227690804076216429 1227750804118216445 1227880804150216455 12279408041852164540 1227960804199216465 12280008042112164617 1228090804248216475 1228170804265216485 1228210804283216499 12282708042962164922 1228310804337216509 1228370804360216525 1228500804392216535 12285608044272165340 1228580804441216545 12286208044532165417 1228710804490216555 1228790804530216565 1228830804548216579 12288908045612165722 1228930804602216589 1228990804648216605 1229120804680216615 12291808047152166140 1229200804729216625 12292408047412166217 1229330804778216635 1229410804820216645 1229450804838216659 12295108048512166522 1229550804892216669 1229610804940216685 1229740804972216695 12298008050072166940 1229820805021216705 12298608050332167017 1229950805070216715 1230030805111216725 1230070805129216739 12301308051422167322 1230170805183216749 1230230805230216765 1230360805262216775 12304208052972167740 1230440805311216785 12304808053232167817 1230570805360216795 1230650805377216805 1230690805395216819 12307508054082168122 1230790805449216829 1230850805472216845 1230980805504216855B10_setting_action_variables 123100 1231002540805532216873806750217282forbid_breaks0rv4original_deadflag8 1231050805673216925 1231090805707216935 1231190805737216949 1231270805759216959 12313108057812169613 12313708057942169626 12314108058392169713 1231470805871216999 1231630805920217019 12316708059322170121 1231760805975217035 1231860806007217049 12319208060422170444 1231940806060217059 12319808060722170521 1232070806113217069 1232150806135217079 12321908061572170813 12322508061702170826 12322908062152170913 1232350806247217119 1232510806296217139 12325508063082171321 1232640806351217155 1232740806383217169 12328008064182171644 1232820806436217179 12328608064482171721 1232950806489217189 1233030806511217199 12330708065332172013 12331308065462172026 12331708065912172113 1233230806623217239 1233390806672217259 12334308066842172521 1233520806727217275B11_specific_action_processi 123354 1233544860806754217293808842217982forbid_breaks0rv4original_deadflag8 1233590806895217345 1233630806929217355 1233710806972217365 1233750806990217379 12338108070032173722 1233850807044217389 1233910807093217405 1234040807125217415 12341008071602174140 1234120807174217425 12341608071862174217 1234250807223217435 1234330807240217445 1234370807258217459 12344308072712174522 1234470807312217469 1234530807335217485 1234660807367217495 12347208074022174940 1234740807416217505 12347808074282175017 1234870807465217515 1234950807482217525 1234990807500217539 12350508075132175322 1235090807554217549 1235150807577217565 1235280807609217575 12353408076442175740 1235360807658217585 12354008076702175817 1235490807707217595 1235570807724217605 1235610807742217619 12356708077552176122 1235710807796217629 1235770807819217645 1235900807851217655 12359608078862176540 1235980807900217665 12360208079122176617 1236110807949217675 1236190807966217685 1236230807984217699 12362908079972176922 1236330808038217709 1236390808061217725 1236520808093217735 12365808081282177340 1236600808142217745 12366408081542177417 1236730808191217755 1236810808208217765 1236850808226217779 12369108082392177722 1236950808280217789 1237010808303217805 1237140808335217815 12372008083702178140 1237220808384217825 12372608083962178217 1237350808433217835 1237430808450217845 1237470808468217859 12375308084812178522 1237570808522217869 1237630808545217885 1237760808577217895 12378208086122178940 1237840808626217905 12378808086382179017 1237970808675217915 1238050808692217925 1238090808710217939 12381508087232179322 1238190808764217949 1238250808787217965 1238380808819217975B12_player_s_action_awarenes 123840 1238402380808846217993809914218362forbid_breaks0rv4original_deadflag8 1238450808987218045 1238490809021218055 1238570809038218065 1238610809056218079 12386708090692180722 1238710809110218089 1238770809133218105 1238900809165218115 12389608092002181140 1238980809214218125 12390208092262181217 1239110809263218135 1239190809280218145 1239230809298218159 12392908093112181522 1239330809352218169 1239390809375218185 1239520809407218195 12395808094422181940 1239600809456218205 12396408094682182017 1239730809505218215 1239810809522218225 1239850809540218239 12399108095532182322 1239950809594218249 1240010809617218265 1240140809649218275 12402008096842182740 1240220809698218285 12402608097102182817 1240350809747218295 1240430809764218305 1240470809782218319 12405308097952183122 1240570809836218329 1240630809859218345 1240760809891218355B13_accessibility 124078 124078480809918218373810221218482forbid_breaks0rv4 1240830810012218415 1240910810050218425 1240950810068218439 12410108100812184322 1241050810122218449 1241110810166218465 1241240810198218475B14_reaching_inside 124126 1241261260810225218493810988218742forbid_breaks0rv4original_deadflag8p12 1241310810384218555 1241350810418218565 1241390810443218575 1241430810468218585 1241510810506218595 1241550810524218609 12416108105372186022 1241650810578218619 1241710810622218635 1241840810654218645 12419008106892186440 1241920810703218655 12419608107152186517 1242050810752218665 1242090810777218675 1242170810816218685 1242210810834218699 12422708108472186922 1242310810888218709 1242370810933218725 1242500810965218735B15_reaching_outside 124252 124252560810992218753811379218892forbid_breaks0rv4p8 1242570811116218805 1242610811141218815 1242650811166218825 1242730811206218835 1242770811224218849 12428308112372188422 1242870811278218859 1242930811324218875 1243060811356218885B16_visibility 124308 124308480811383218903811641219012forbid_breaks0rv4 1243130811474218945 1243210811491218955 1243250811509218969 12433108115222189622 1243350811563218979 1243410811586218995 1243540811618219005B17_persuasion 120625081165221902108116832190241B18_unsuccessful_attempt_by 120625081169421903108117382190354B19_before 120625081174921904108117762190437B20_instead 124356 1243561140811780219053812351219262forbid_breaks0rv4original_deadflag8 1243610811904219105 1243650811938219115 1243730811956219125 1243770811974219139 12438308119872191322 1243870812028219149 1243930812052219165 1244060812084219175 12441208121192191740 1244140812133219185 12441808121452191817 1244270812182219195 1244350812200219205 1244390812218219219 12444508122312192122 1244490812272219229 1244550812296219245 1244680812328219255B21_check 120625081236221927108123882192736B22_carry_out 120625081239921928108124292192840B23_after 124470 124470740812433219293812811219442forbid_breaks0rv4 1244750812519219335 1244850812550219349 1244930812572219359 12449708125942193613 12450308126072193626 12450708126522193713 1245130812684219399 1245290812733219419 12453308127452194121 1245420812788219435B24_report 120625081282221945108128492194537B25_does_the_player_mean 124544 1245441660812853219463813694219752forbid_breaks0rv4original_deadflag8 1245490812990219515 1245530813024219525 1245630813056219539 1245710813077219549 12457508130992195513 12458108131122195526 12458508131572195613 1245910813188219589 1246070813237219609 12461108132492196021 1246200813292219625 1246300813327219639 12463608133622196344 1246380813380219649 12464208133922196421 1246510813433219659 1246590813455219669 12466308134772196713 12466908134902196726 12467308135352196813 1246790813567219709 1246950813616219729 12469908136282197221 1247080813671219745B26_multiple_action_processi 120625081370521976108137502197655B27_when_entire_game_begins 120625081376121977108138052197754B28_when_entire_game_ends 120625081381621978108138582197852B29_before_printing_the_name 124710 124710560813862219793814211219932forbid_breaks0rv4p8 1247150813994219845 1247190814019219855 1247230814044219865 1247310814061219875 1247350814079219889 12474108140922198822 1247450814133219899 1247510814156219915 1247640814188219925B30_for_printing_the_name 124766 124766560814215219943814601220082forbid_breaks0rv4p8 1247710814344219995 1247750814369220005 1247790814394220015 1247870814431220025 1247910814449220039 12479708144622200322 1248010814503220049 1248070814546220065 1248200814578220075B31_after_printing_the_name 120625081461222009108146562200954B32_before_printing_the_plur 120625081466722010108147122201055B33_for_printing_the_plural_ 124822 124822560814716220113815065220252forbid_breaks0rv4p8 1248270814848220165 1248310814873220175 1248350814898220185 1248430814915220195 1248470814933220209 12485308149462202022 1248570814987220219 1248630815010220235 1248760815042220245B34_after_printing_the_plura 120625081507622026108151212202655B35_before_printing_a_number 120625081513222027108151772202755B36_for_printing_a_number 124878 124878560815181220283815527220422forbid_breaks0rv4p8 1248830815310220335 1248870815335220345 1248910815360220355 1248990815377220365 1249030815395220379 12490908154082203722 1249130815449220389 1249190815472220405 1249320815504220415B37_after_printing_a_number 120625081553822043108155822204354B38_before_printing_room_des 120625081559322044108156382204455B39_for_printing_room_descri 120625081564922045108156942204555B40_after_printing_room_desc 120625081570522046108157502204655B41_before_printing_inventor 120625081576122047108158062204755B42_for_printing_inventory_d 120625081581722048108158622204855B43_after_printing_inventory 120625081587322049108159182204955B44_before_listing_contents 120625081592922050108159732205054B45_for_listing_contents 124934 124934560815977220513816368220652forbid_breaks0rv4p8 1249390816105220565 1249430816130220575 1249470816155220585 1249550816195220595 1249590816213220609 12496508162262206022 1249690816267220619 1249750816313220635 1249880816345220645B46_after_listing_contents 120625081637922066108164222206653B47_before_grouping_together 120625081643322067108164782206755B48_for_grouping_together 120625081648922068108165312206852B49_after_grouping_together 120625081654222069108165862206954B50_before_writing_a_paragra 120625081659722070108166422207055B51_for_writing_a_paragraph_ 120625081665322071108166982207155B52_after_writing_a_paragrap 120625081670922072108167542207255B53_before_listing_nondescri 120625081676522073108168102207355B54_for_listing_nondescript_ 120625081682122074108168662207455B55_after_listing_nondescrip 120625081687722075108169222207555B56_before_printing_the_name 120625081693322076108169782207655B57_for_printing_the_name_of 120625081698922077108170342207755B58_after_printing_the_name_ 120625081704522078108170902207855B59_before_printing_the_desc 120625081710122079108171462207955B60_for_printing_the_descrip 120625081715722080108172022208055B61_after_printing_the_descr 120625081721322081108172582208155B62_before_printing_the_anno 120625081726922082108173142208255B63_for_printing_the_announc 120625081732522083108173702208355B64_after_printing_the_annou 120625081738122084108174262208455B65_before_printing_the_anno 120625081743722085108174822208555B66_for_printing_the_announc 124990 124990560817486220863817835221002forbid_breaks0rv4p8 1249950817618220915 1249990817643220925 1250030817668220935 1250110817685220945 1250150817703220959 12502108177162209522 1250250817757220969 1250310817780220985 1250440817812220995B67_after_printing_the_annou 120625081784622101108178912210155B68_before_printing_a_refusa 120625081790222102108179472210255B69_for_printing_a_refusal_t 120625081795822103108180032210355B70_after_printing_a_refusal 120625081801422104108180592210455B71_before_constructing_the_ 120625081807022105108181152210555B72_for_constructing_the_sta 120625081812622106108181712210655B73_after_constructing_the_s 120625081818222107108182272210755B74_before_printing_the_bann 120625081823822108108182832210855B75_for_printing_the_banner_ 120625081829422109108183392210955B76_after_printing_the_banne 120625081835022110108183952211055B77_before_reading_a_command 120625081840622111108184512211155B78_for_reading_a_command 120625081846222112108185042211252B79_after_reading_a_command 120625081851522113108185592211354B80_before_deciding_the_scop 120625081857022114108186152211455B81_for_deciding_the_scope 120625081862622115108186692211553B82_after_deciding_the_scope 120625081868022116108187252211655B83_before_deciding_the_conc 120625081873622117108187812211755B84_for_deciding_the_conceal 120625081879222118108188372211855B85_after_deciding_the_conce 120625081884822119108188932211955B86_before_deciding_whether_ 120625081890422120108189492212055B87_for_deciding_whether_all 125046 1250463240818953221213820440221732forbid_breaks0rv4original_deadflag8p12 1250510819121221275 1250550819155221285 1250590819180221295 1250630819205221305 1250710819222221315 1250750819240221329 12508108192532213222 1250850819294221339 1250910819317221355 1251040819349221365 12511008193842213640 1251120819398221375 12511608194102213717 1251250819447221385 1251290819472221395 1251370819489221405 1251410819507221419 12514708195202214122 1251510819561221429 1251570819584221445 1251700819616221455 12517608196512214540 1251780819665221465 12518208196772214617 1251910819714221475 1251950819739221485 1252030819756221495 1252070819774221509 12521308197872215022 1252170819828221519 1252230819851221535 1252360819883221545 12524208199182215440 1252440819932221555 12524808199442215517 1252570819981221565 1252610820006221575 1252690820023221585 1252730820041221599 12527908200542215922 1252830820095221609 1252890820118221625 1253020820150221635 12530808201852216340 1253100820199221645 12531408202112216417 1253230820248221655 1253270820273221665 1253350820290221675 1253390820308221689 12534508203212216822 1253490820362221699 1253550820385221715 1253680820417221725B88_after_deciding_whether_a 120625082045122174108204962217455B89_before_clarifying_the_pa 120625082050722175108205522217555B90_for_clarifying_the_parse 120625082056322176108206082217655B91_after_clarifying_the_par 120625082061922177108206642217755B92_before_asking_which_do_y 120625082067522178108207202217855B93_for_asking_which_do_you_ 120625082073122179108207762217955B94_after_asking_which_do_yo 120625082078722180108208322218055B95_before_printing_a_parser 120625082084322181108208882218155B96_for_printing_a_parser_er 120625082089922182108209442218255B97_after_printing_a_parser_ 120625082095522183108210002218355B98_before_supplying_a_missi 120625082101122184108210562218455B99_for_supplying_a_missing_ 125370 1253702580821060221853822282222282forbid_breaks0rv4original_deadflag8p12 1253750821228221915 1253790821262221925 1253830821287221935 1253870821312221945 1253950821329221955 1253990821347221969 12540508213602219622 1254090821401221979 1254150821424221995 1254280821456222005 12543408214912220040 1254360821505222015 12544008215172220117 1254490821554222025 1254530821579222035 1254610821596222045 1254650821614222059 12547108216272220522 1254750821668222069 1254810821691222085 1254940821723222095 12550008217582220940 1255020821772222105 12550608217842221017 1255150821821222115 1255190821846222125 1255270821863222135 1255310821881222149 12553708218942221422 1255410821935222159 1255470821958222175 1255600821990222185 12556608220252221840 1255680822039222195 12557208220512221917 1255810822088222205 1255850822113222215 1255930822131222225 1255970822149222239 12560308221622222322 1256070822203222249 1256130822227222265 1256260822259222275B100_after_supplying_a_missi 120625082229322229108223382222955B101_before_supplying_a_miss 120625082234922230108223942223055B102_for_supplying_a_missing 120625082240522231108224502223155B103_after_supplying_a_missi 120625082246122232108225062223255B104_before_implicitly_takin 120625082251722233108225622223355B105_for_implicitly_taking 125628 125628560822566222343822957222482forbid_breaks0rv4p8 1256330822696222395 1256370822721222405 1256410822746222415 1256490822785222425 1256530822803222439 12565908228162224322 1256630822857222449 1256690822902222465 1256820822934222475B106_after_implicitly_taking 120625082296822249108230132224955B107_before_starting_the_vir 120625082302422250108230692225055B108_for_starting_the_virtua 125684 125684560823073222513823454222652forbid_breaks0rv4p8 1256890823205222565 1256930823230222575 1256970823255222585 1257050823288222595 1257090823306222609 12571508233192226022 1257190823360222619 1257250823399222635 1257380823431222645B109_after_starting_the_virt 120625082346522266108235102226655B110_before_amusing_a_victor 120625082352122267108235662226755B111_for_amusing_a_victoriou 120625082357722268108236222226855B112_after_amusing_a_victori 120625082363322269108236782226955B113_before_printing_the_pla 120625082368922270108237342227055B114_for_printing_the_player 125740 1257401920823738222713824809223052forbid_breaks0rv4original_deadflag8p12 1257450823906222775 1257490823940222785 1257530823965222795 1257570823990222805 1257650824028222815 1257690824046222829 12577508240592228222 1257790824100222839 1257850824144222855 1257980824176222865 12580408242112228640 1258060824225222875 12581008242372228717 1258190824274222885 1258230824299222895 1258310824331222905 1258350824349222919 12584108243622229122 1258450824403222929 1258510824441222945 1258640824473222955 12587008245082229540 1258720824522222965 12587608245342229617 1258850824571222975 1258890824596222985 1258970824636222995 1259010824654223009 12590708246672230022 1259110824708223019 1259170824754223035 1259300824786223045B115_after_printing_the_play 120625082482022306108248652230655B116_before_handling_the_fin 125932 1259321920824869223073825852223412forbid_breaks0rv4original_deadflag8p12 1259370825037223135 1259410825071223145 1259450825096223155 1259490825121223165 1259570825138223175 1259610825156223189 12596708251692231822 1259710825210223199 1259770825233223215 1259900825265223225 12599608253002232240 1259980825314223235 12600208253262232317 1260110825363223245 1260150825388223255 1260230825405223265 1260270825423223279 12603308254362232722 1260370825477223289 1260430825500223305 1260560825532223315 12606208255672233140 1260640825581223325 12606808255932233217 1260770825630223335 1260810825655223345 1260890825687223355 1260930825705223369 12609908257182233622 1261030825759223379 1261090825797223395 1261220825829223405B117_for_handling_the_final_ 126124 126124560825856223423826205223562forbid_breaks0rv4p8 1261290825988223475 1261330826013223485 1261370826038223495 1261450826055223505 1261490826073223519 12615508260862235122 1261590826127223529 1261650826150223545 1261780826182223555B118_after_handling_the_fina 120625082621622357108262612235755B119_before_printing_the_loc 126180 1261801260826265223583826951223832forbid_breaks0rv4original_deadflag8p12 1261850826433223645 1261890826467223655 1261930826492223665 1261970826517223675 1262050826534223685 1262090826552223699 12621508265652236922 1262190826606223709 1262250826629223725 1262380826661223735 12624408266962237340 1262460826710223745 12625008267222237417 1262590826759223755 1262630826784223765 1262710826801223775 1262750826819223789 12628108268322237822 1262850826873223799 1262910826896223815 1263040826928223825B120_for_printing_the_locale 126306 1263061260826955223843827641224092forbid_breaks0rv4original_deadflag8p12 1263110827123223905 1263150827157223915 1263190827182223925 1263230827207223935 1263310827224223945 1263350827242223959 12634108272552239522 1263450827296223969 1263510827319223985 1263640827351223995 12637008273862239940 1263720827400224005 12637608274122240017 1263850827449224015 1263890827474224025 1263970827491224035 1264010827509224049 12640708275222240422 1264110827563224059 1264170827586224075 1264300827618224085B121_after_printing_the_loca 120625082765222410108276972241055B122_before_choosing_notable 120625082770822411108277532241155B123_for_choosing_notable_lo 126432 126432560827757224123828106224262forbid_breaks0rv4p8 1264370827889224175 1264410827914224185 1264450827939224195 1264530827956224205 1264570827974224219 12646308279872242122 1264670828028224229 1264730828051224245 1264860828083224255B124_after_choosing_notable_ 120625082811722427108281622242755B125_before_printing_a_local 120625082817322428108282182242855B126_for_printing_a_locale_p 126488 1264885880828222224293830777225172forbid_breaks0rv4original_deadflag8p12 1264930828390224355 1264970828424224365 1265010828449224375 1265050828474224385 1265130828491224395 1265170828509224409 12652308285222244022 1265270828563224419 1265330828586224435 1265460828618224445 12655208286532244440 1265540828667224455 12655808286792244517 1265670828716224465 1265710828741224475 1265790828758224485 1265830828776224499 12658908287892244922 1265930828830224509 1265990828853224525 1266120828885224535 12661808289202245340 1266200828934224545 12662408289462245417 1266330828983224555 1266370829008224565 1266450829025224575 1266490829043224589 12665508290562245822 1266590829097224599 1266650829120224615 1266780829152224625 12668408291872246240 1266860829201224635 12669008292132246317 1266990829250224645 1267030829275224655 1267110829292224665 1267150829310224679 12672108293232246722 1267250829364224689 1267310829387224705 1267440829419224715 12675008294542247140 1267520829468224725 12675608294802247217 1267650829517224735 1267690829542224745 1267770829559224755 1267810829577224769 12678708295902247622 1267910829631224779 1267970829654224795 1268100829686224805 12681608297212248040 1268180829735224815 12682208297472248117 1268310829784224825 1268350829809224835 1268430829826224845 1268470829844224859 12685308298572248522 1268570829898224869 1268630829921224885 1268760829953224895 12688208299882248940 1268840830002224905 12688808300142249017 1268970830051224915 1269010830076224925 1269090830093224935 1269130830111224949 12691908301242249422 1269230830165224959 1269290830188224975 1269420830220224985 12694808302552249840 1269500830269224995 12695408302812249917 1269630830318225005 1269670830343225015 1269750830360225025 1269790830378225039 12698508303912250322 1269890830432225049 1269950830455225065 1270080830487225075 12701408305222250740 1270160830536225085 12702008305482250817 1270290830585225095 1270330830610225105 1270410830627225115 1270450830645225129 12705108306582251222 1270550830699225139 1270610830722225155 1270740830754225165B127_after_printing_a_locale 120625083078822518108308332251855B128_before_issuing_the_resp 120625083084422519108308892251955B129_for_issuing_the_respons 127076 127076560830893225203831288225342forbid_breaks0rv4p8 1270810831025225255 1270850831050225265 1270890831075225275 1270970831115225285 1271010831133225299 12710708311462252922 1271110831187225309 1271170831233225325 1271300831265225335B130_after_issuing_the_respo 120625083129922535108313442253555B131_check_taking_inventory 120625083135522536108313992253654B132_carry_out_taking_invent 127132 1271321140831403225373831987225582forbid_breaks0rv4original_deadflag8 1271370831544225425 1271410831578225435 1271490831595225445 1271530831613225459 12715908316262254522 1271630831667225469 1271690831690225485 1271820831722225495 12718808317572254940 1271900831771225505 12719408317832255017 1272030831820225515 1272110831837225525 1272150831855225539 12722108318682255322 1272250831909225549 1272310831932225565 1272440831964225575B133_report_taking_inventory 127246 127246480831991225593832265225702forbid_breaks0rv4 1272510832096225635 1272590832114225645 1272630832132225659 12726908321452256522 1272730832186225669 1272790832210225685 1272920832242225695B134_check_taking 127294 1272947340832269225713835287226722forbid_breaks0rv4original_deadflag8 1272990832399225765 1273030832433225775 1273110832451225785 1273150832469225799 12732108324822257922 1273250832523225809 1273310832547225825 1273440832579225835 12735008326142258340 1273520832628225845 12735608326402258417 1273650832677225855 1273730832695225865 1273770832713225879 12738308327262258722 1273870832767225889 1273930832791225905 1274060832823225915 12741208328582259140 1274140832872225925 12741808328842259217 1274270832921225935 1274350832939225945 1274390832957225959 12744508329702259522 1274490833011225969 1274550833035225985 1274680833067225995 12747408331022259940 1274760833116226005 12748008331282260017 1274890833165226015 1274970833183226025 1275010833201226039 12750708332142260322 1275110833255226049 1275170833279226065 1275300833311226075 12753608333462260740 1275380833360226085 12754208333722260817 1275510833409226095 1275590833427226105 1275630833445226119 12756908334582261122 1275730833499226129 1275790833523226145 1275920833555226155 12759808335902261540 1276000833604226165 12760408336162261617 1276130833653226175 1276210833671226185 1276250833689226199 12763108337022261922 1276350833743226209 1276410833767226225 1276540833799226235 12766008338342262340 1276620833848226245 12766608338602262417 1276750833897226255 1276830833915226265 1276870833933226279 12769308339462262722 1276970833987226289 1277030834011226305 1277160834043226315 12772208340782263140 1277240834092226325 12772808341042263217 1277370834141226335 1277450834159226345 1277490834177226359 12775508341902263522 1277590834231226369 1277650834255226385 1277780834287226395 12778408343222263940 1277860834336226405 12779008343482264017 1277990834385226415 1278070834403226425 1278110834421226439 12781708344342264322 1278210834475226449 1278270834499226465 1278400834531226475 12784608345662264740 1278480834580226485 12785208345922264817 1278610834629226495 1278690834647226505 1278730834665226519 12787908346782265122 1278830834719226529 1278890834743226545 1279020834775226555 12790808348102265540 1279100834824226565 12791408348362265617 1279230834873226575 1279310834891226585 1279350834909226599 12794108349222265922 1279450834963226609 1279510834987226625 1279640835019226635 12797008350542266340 1279720835068226645 12797608350802266417 1279850835117226655 1279930835135226665 1279970835153226679 12800308351662266722 1280070835207226689 1280130835231226705 1280260835263226715B135_carry_out_taking 128028 128028480835291226733835558226842forbid_breaks0rv4 1280330835389226775 1280410835407226785 1280450835425226799 12805108354382267922 1280550835479226809 1280610835503226825 1280740835535226835B136_report_taking 128076 128076480835562226853835826226962forbid_breaks0rv4 1280810835657226895 1280890835675226905 1280930835693226919 12809908357062269122 1281030835747226929 1281090835771226945 1281220835803226955B137_check_removing_it_from 128124 1281242380835830226973836905227342forbid_breaks0rv4original_deadflag8 1281290835970227025 1281330836004227035 1281410836022227045 1281450836040227059 12815108360532270522 1281550836094227069 1281610836118227085 1281740836150227095 12818008361852270940 1281820836199227105 12818608362112271017 1281950836248227115 1282030836266227125 1282070836284227139 12821308362972271322 1282170836338227149 1282230836362227165 1282360836394227175 12824208364292271740 1282440836443227185 12824808364552271817 1282570836492227195 1282650836510227205 1282690836528227219 12827508365412272122 1282790836582227229 1282850836606227245 1282980836638227255 12830408366732272540 1283060836687227265 12831008366992272617 1283190836736227275 1283270836754227285 1283310836772227299 12833708367852272922 1283410836826227309 1283470836850227325 1283600836882227335B138_carry_out_removing_it_f 120625083691622735108369612273555B139_report_removing_it_from 120625083697222736108370172273655B140_check_dropping 128362 1283623620837021227373838576227902forbid_breaks0rv4original_deadflag8 1283670837153227425 1283710837187227435 1283790837205227445 1283830837223227459 12838908372362274522 1283930837277227469 1283990837301227485 1284120837333227495 12841808373682274940 1284200837382227505 12842408373942275017 1284330837431227515 1284410837449227525 1284450837467227539 12845108374802275322 1284550837521227549 1284610837545227565 1284740837577227575 12848008376122275740 1284820837626227585 12848608376382275817 1284950837675227595 1285030837693227605 1285070837711227619 12851308377242276122 1285170837765227629 1285230837789227645 1285360837821227655 12854208378562276540 1285440837870227665 12854808378822276617 1285570837919227675 1285650837937227685 1285690837955227699 12857508379682276922 1285790838009227709 1285850838033227725 1285980838065227735 12860408381002277340 1286060838114227745 12861008381262277417 1286190838163227755 1286270838181227765 1286310838199227779 12863708382122277722 1286410838253227789 1286470838277227805 1286600838309227815 12866608383442278140 1286680838358227825 12867208383702278217 1286810838407227835 1286890838425227845 1286930838443227859 12869908384562278522 1287030838497227869 1287090838521227885 1287220838553227895B141_carry_out_dropping 128724 128724480838580227913838849228022forbid_breaks0rv4 1287290838680227955 1287370838698227965 1287410838716227979 12874708387292279722 1287510838770227989 1287570838794228005 1287700838826228015B142_report_dropping 128772 128772480838853228033839119228142forbid_breaks0rv4 1287770838950228075 1287850838968228085 1287890838986228099 12879508389992280922 1287990839040228109 1288050839064228125 1288180839096228135B143_check_putting_it_on 128820 1288203620839123228153840683228682forbid_breaks0rv4original_deadflag8 1288250839260228205 1288290839294228215 1288370839312228225 1288410839330228239 12884708393432282322 1288510839384228249 1288570839408228265 1288700839440228275 12887608394752282740 1288780839489228285 12888208395012282817 1288910839538228295 1288990839556228305 1289030839574228319 12890908395872283122 1289130839628228329 1289190839652228345 1289320839684228355 12893808397192283540 1289400839733228365 12894408397452283617 1289530839782228375 1289610839800228385 1289650839818228399 12897108398312283922 1289750839872228409 1289810839896228425 1289940839928228435 12900008399632284340 1290020839977228445 12900608399892284417 1290150840026228455 1290230840044228465 1290270840062228479 12903308400752284722 1290370840116228489 1290430840140228505 1290560840172228515 12906208402072285140 1290640840221228525 12906808402332285217 1290770840270228535 1290850840288228545 1290890840306228559 12909508403192285522 1290990840360228569 1291050840384228585 1291180840416228595 12912408404512285940 1291260840465228605 12913008404772286017 1291390840514228615 1291470840532228625 1291510840550228639 12915708405632286322 1291610840604228649 1291670840628228665 1291800840660228675B144_carry_out_putting_it_on 129182 129182480840687228693840961228802forbid_breaks0rv4 1291870840792228735 1291950840810228745 1291990840828228759 12920508408412287522 1292090840882228769 1292150840906228785 1292280840938228795B145_report_putting_it_on 129230 1292301140840965228813841550229022forbid_breaks0rv4original_deadflag8 1292350841103228865 1292390841137228875 1292470841155228885 1292510841173228899 12925708411862288922 1292610841227228909 1292670841251228925 1292800841283228935 12928608413182289340 1292880841332228945 12929208413442289417 1293010841381228955 1293090841399228965 1293130841417228979 12931908414302289722 1293230841471228989 1293290841495229005 1293420841527229015B146_check_inserting_it_into 129344 1293444240841554229033843362229642forbid_breaks0rv4original_deadflag8 1293490841695229085 1293530841729229095 1293610841747229105 1293650841765229119 12937108417782291122 1293750841819229129 1293810841843229145 1293940841875229155 12940008419102291540 1294020841924229165 12940608419362291617 1294150841973229175 1294230841991229185 1294270842009229199 12943308420222291922 1294370842063229209 1294430842087229225 1294560842119229235 12946208421542292340 1294640842168229245 12946808421802292417 1294770842217229255 1294850842235229265 1294890842253229279 12949508422662292722 1294990842307229289 1295050842331229305 1295180842363229315 12952408423982293140 1295260842412229325 12953008424242293217 1295390842461229335 1295470842479229345 1295510842497229359 12955708425102293522 1295610842551229369 1295670842575229385 1295800842607229395 12958608426422293940 1295880842656229405 12959208426682294017 1296010842705229415 1296090842723229425 1296130842741229439 12961908427542294322 1296230842795229449 1296290842819229465 1296420842851229475 12964808428862294740 1296500842900229485 12965408429122294817 1296630842949229495 1296710842967229505 1296750842985229519 12968108429982295122 1296850843039229529 1296910843063229545 1297040843095229555 12971008431302295540 1297120843144229565 12971608431562295617 1297250843193229575 1297330843211229585 1297370843229229599 12974308432422295922 1297470843283229609 1297530843307229625 1297660843339229635B147_carry_out_inserting_it_ 129768 129768480843366229653843640229762forbid_breaks0rv4 1297730843471229695 1297810843489229705 1297850843507229719 12979108435202297122 1297950843561229729 1298010843585229745 1298140843617229755B148_report_inserting_it_int 129816 1298161140843644229773844232229982forbid_breaks0rv4original_deadflag8 1298210843785229825 1298250843819229835 1298330843837229845 1298370843855229859 12984308438682298522 1298470843909229869 1298530843933229885 1298660843965229895 12987208440002298940 1298740844014229905 12987808440262299017 1298870844063229915 1298950844081229925 1298990844099229939 12990508441122299322 1299090844153229949 1299150844177229965 1299280844209229975B149_check_eating 129930 1299302380844236229993845301230362forbid_breaks0rv4original_deadflag8 1299350844366230045 1299390844400230055 1299470844418230065 1299510844436230079 12995708444492300722 1299610844490230089 1299670844514230105 1299800844546230115 12998608445812301140 1299880844595230125 12999208446072301217 1300010844644230135 1300090844662230145 1300130844680230159 13001908446932301522 1300230844734230169 1300290844758230185 1300420844790230195 13004808448252301940 1300500844839230205 13005408448512302017 1300630844888230215 1300710844906230225 1300750844924230239 13008108449372302322 1300850844978230249 1300910845002230265 1301040845034230275 13011008450692302740 1301120845083230285 13011608450952302817 1301250845132230295 1301330845150230305 1301370845168230319 13014308451812303122 1301470845222230329 1301530845246230345 1301660845278230355B150_carry_out_eating 130168 130168480845305230373845572230482forbid_breaks0rv4 1301730845403230415 1301810845421230425 1301850845439230439 13019108454522304322 1301950845493230449 1302010845517230465 1302140845549230475B151_report_eating 130216 130216480845576230493845840230602forbid_breaks0rv4 1302210845671230535 1302290845689230545 1302330845707230559 13023908457202305522 1302430845761230569 1302490845785230585 1302620845817230595B152_check_going 130264 1302643620845844230613847396231142forbid_breaks0rv4original_deadflag8 1302690845973230665 1302730846007230675 1302810846025230685 1302850846043230699 13029108460562306922 1302950846097230709 1303010846121230725 1303140846153230735 13032008461882307340 1303220846202230745 13032608462142307417 1303350846251230755 1303430846269230765 1303470846287230779 13035308463002307722 1303570846341230789 1303630846365230805 1303760846397230815 13038208464322308140 1303840846446230825 13038808464582308217 1303970846495230835 1304050846513230845 1304090846531230859 13041508465442308522 1304190846585230869 1304250846609230885 1304380846641230895 13044408466762308940 1304460846690230905 13045008467022309017 1304590846739230915 1304670846757230925 1304710846775230939 13047708467882309322 1304810846829230949 1304870846853230965 1305000846885230975 13050608469202309740 1305080846934230985 13051208469462309817 1305210846983230995 1305290847001231005 1305330847019231019 13053908470322310122 1305430847073231029 1305490847097231045 1305620847129231055 13056808471642310540 1305700847178231065 13057408471902310617 1305830847227231075 1305910847245231085 1305950847263231099 13060108472762310922 1306050847317231109 1306110847341231125 1306240847373231135B153_carry_out_going 130626 1306261760847400231153848224231442forbid_breaks0rv4original_deadflag8 1306310847533231205 1306350847567231215 1306430847585231225 1306470847603231239 13065308476162312322 1306570847657231249 1306630847681231265 1306760847713231275 13068208477482312740 1306840847762231285 13068808477742312817 1306970847811231295 1307050847829231305 1307090847847231319 13071508478602313122 1307190847901231329 1307250847925231345 1307380847957231355 13074408479922313540 1307460848006231365 13075008480182313617 1307590848055231375 1307670848073231385 1307710848091231399 13077708481042313922 1307810848145231409 1307870848169231425 1308000848201231435B154_report_going 130802 130802480848228231453848491231562forbid_breaks0rv4 1308070848322231495 1308150848340231505 1308190848358231519 13082508483712315122 1308290848412231529 1308350848436231545 1308480848468231555B155_check_entering 130850 1308504860848495231573850538232262forbid_breaks0rv4original_deadflag8 1308550848627231625 1308590848661231635 1308670848679231645 1308710848697231659 13087708487102316522 1308810848751231669 1308870848775231685 1309000848807231695 13090608488422316940 1309080848856231705 13091208488682317017 1309210848905231715 1309290848923231725 1309330848941231739 13093908489542317322 1309430848995231749 1309490849019231765 1309620849051231775 13096808490862317740 1309700849100231785 13097408491122317817 1309830849149231795 1309910849167231805 1309950849185231819 13100108491982318122 1310050849239231829 1310110849263231845 1310240849295231855 13103008493302318540 1310320849344231865 13103608493562318617 1310450849393231875 1310530849411231885 1310570849429231899 13106308494422318922 1310670849483231909 1310730849507231925 1310860849539231935 13109208495742319340 1310940849588231945 13109808496002319417 1311070849637231955 1311150849655231965 1311190849673231979 13112508496862319722 1311290849727231989 1311350849751232005 1311480849783232015 13115408498182320140 1311560849832232025 13116008498442320217 1311690849881232035 1311770849899232045 1311810849917232059 13118708499302320522 1311910849971232069 1311970849995232085 1312100850027232095 13121608500622320940 1312180850076232105 13122208500882321017 1312310850125232115 1312390850143232125 1312430850161232139 13124908501742321322 1312530850215232149 1312590850239232165 1312720850271232175 13127808503062321740 1312800850320232185 13128408503322321817 1312930850369232195 1313010850387232205 1313050850405232219 13131108504182322122 1313150850459232229 1313210850483232245 1313340850515232255B156_carry_out_entering 131336 131336480850542232273850811232382forbid_breaks0rv4 1313410850642232315 1313490850660232325 1313530850678232339 13135908506912323322 1313630850732232349 1313690850756232365 1313820850788232375B157_report_entering 131384 1313841140850815232393851395232602forbid_breaks0rv4original_deadflag8 1313890850948232445 1313930850982232455 1314010851000232465 1314050851018232479 13141108510312324722 1314150851072232489 1314210851096232505 1314340851128232515 13144008511632325140 1314420851177232525 13144608511892325217 1314550851226232535 1314630851244232545 1314670851262232559 13147308512752325522 1314770851316232569 1314830851340232585 1314960851372232595B158_check_exiting 131498 1314982380851399232613852465232982forbid_breaks0rv4original_deadflag8 1315030851530232665 1315070851564232675 1315150851582232685 1315190851600232699 13152508516132326922 1315290851654232709 1315350851678232725 1315480851710232735 13155408517452327340 1315560851759232745 13156008517712327417 1315690851808232755 1315770851826232765 1315810851844232779 13158708518572327722 1315910851898232789 1315970851922232805 1316100851954232815 13161608519892328140 1316180852003232825 13162208520152328217 1316310852052232835 1316390852070232845 1316430852088232859 13164908521012328522 1316530852142232869 1316590852166232885 1316720852198232895 13167808522332328940 1316800852247232905 13168408522592329017 1316930852296232915 1317010852314232925 1317050852332232939 13171108523452329322 1317150852386232949 1317210852410232965 1317340852442232975B159_carry_out_exiting 131736 131736480852469232993852737233102forbid_breaks0rv4 1317410852568233035 1317490852586233045 1317530852604233059 13175908526172330522 1317630852658233069 1317690852682233085 1317820852714233095B160_report_exiting 131784 1317841140852741233113853320233322forbid_breaks0rv4original_deadflag8 1317890852873233165 1317930852907233175 1318010852925233185 1318050852943233199 13181108529562331922 1318150852997233209 1318210853021233225 1318340853053233235 13184008530882332340 1318420853102233245 13184608531142332417 1318550853151233255 1318630853169233265 1318670853187233279 13187308532002332722 1318770853241233289 1318830853265233305 1318960853297233315B161_check_getting_off 131898 131898480853324233333853592233442forbid_breaks0rv4 1319030853423233375 1319110853441233385 1319150853459233399 13192108534722333922 1319250853513233409 1319310853537233425 1319440853569233435B162_carry_out_getting_off 131946 131946480853596233453853868233562forbid_breaks0rv4 1319510853699233495 1319590853717233505 1319630853735233519 13196908537482335122 1319730853789233529 1319790853813233545 1319920853845233555B163_report_getting_off 131994 1319941140853872233573854455233782forbid_breaks0rv4original_deadflag8 1319990854008233625 1320030854042233635 1320110854060233645 1320150854078233659 13202108540912336522 1320250854132233669 1320310854156233685 1320440854188233695 13205008542232336940 1320520854237233705 13205608542492337017 1320650854286233715 1320730854304233725 1320770854322233739 13208308543352337322 1320870854376233749 1320930854400233765 1321060854432233775B164_check_looking 120625085446623379108545012337945B165_carry_out_looking 132108 1321083000854505233803855819234252forbid_breaks0rv4original_deadflag8 1321130854640233855 1321170854674233865 1321250854692233875 1321290854710233889 13213508547232338822 1321390854764233899 1321450854788233915 1321580854820233925 13216408548552339240 1321660854869233935 13217008548812339317 1321790854918233945 1321870854936233955 1321910854954233969 13219708549672339622 1322010855008233979 1322070855032233995 1322200855064234005 13222608550992340040 1322280855113234015 13223208551252340117 1322410855162234025 1322490855180234035 1322530855198234049 13225908552112340422 1322630855252234059 1322690855276234075 1322820855308234085 13228808553432340840 1322900855357234095 13229408553692340917 1323030855406234105 1323110855424234115 1323150855442234129 13232108554552341222 1323250855496234139 1323310855520234155 1323440855552234165 13235008555872341640 1323520855601234175 13235608556132341717 1323650855650234185 1323730855668234195 1323770855686234209 13238308556992342022 1323870855740234219 1323930855764234235 1324060855796234245B166_report_looking 132408 132408480855823234263856088234372forbid_breaks0rv4 1324130855919234305 1324210855937234315 1324250855955234329 13243108559682343222 1324350856009234339 1324410856033234355 1324540856065234365B167_check_examining 120625085609923438108561362343847B168_carry_out_examining 132456 1324563620856140234393857700234922forbid_breaks0rv4original_deadflag8 1324610856277234445 1324650856311234455 1324730856329234465 1324770856347234479 13248308563602344722 1324870856401234489 1324930856425234505 1325060856457234515 13251208564922345140 1325140856506234525 13251808565182345217 1325270856555234535 1325350856573234545 1325390856591234559 13254508566042345522 1325490856645234569 1325550856669234585 1325680856701234595 13257408567362345940 1325760856750234605 13258008567622346017 1325890856799234615 1325970856817234625 1326010856835234639 13260708568482346322 1326110856889234649 1326170856913234665 1326300856945234675 13263608569802346740 1326380856994234685 13264208570062346817 1326510857043234695 1326590857061234705 1326630857079234719 13266908570922347122 1326730857133234729 1326790857157234745 1326920857189234755 13269808572242347540 1327000857238234765 13270408572502347617 1327130857287234775 1327210857305234785 1327250857323234799 13273108573362347922 1327350857377234809 1327410857401234825 1327540857433234835 13276008574682348340 1327620857482234845 13276608574942348417 1327750857531234855 1327830857549234865 1327870857567234879 13279308575802348722 1327970857621234889 1328030857645234905 1328160857677234915B169_report_examining 132818 132818480857704234933857971235042forbid_breaks0rv4 1328230857802234975 1328310857820234985 1328350857838234999 13284108578512349922 1328450857892235009 1328510857916235025 1328640857948235035B170_check_looking_under 120625085798223505108580232350551B171_carry_out_looking_under 132866 132866480858027235063858301235172forbid_breaks0rv4 1328710858132235105 1328790858150235115 1328830858168235129 13288908581812351222 1328930858222235139 1328990858246235155 1329120858278235165B172_report_looking_under 132914 132914480858305235183858576235292forbid_breaks0rv4 1329190858407235225 1329270858425235235 1329310858443235249 13293708584562352422 1329410858497235259 1329470858521235275 1329600858553235285B173_check_searching 132962 1329621140858580235303859160235512forbid_breaks0rv4original_deadflag8 1329670858713235355 1329710858747235365 1329790858765235375 1329830858783235389 13298908587962353822 1329930858837235399 1329990858861235415 1330120858893235425 13301808589282354240 1330200858942235435 13302408589542354317 1330330858991235445 1330410859009235455 1330450859027235469 13305108590402354622 1330550859081235479 1330610859105235495 1330740859137235505B174_carry_out_searching 120625085917123552108592122355251B175_report_searching 133076 1330761760859216235533860041235822forbid_breaks0rv4original_deadflag8 1330810859350235585 1330850859384235595 1330930859402235605 1330970859420235619 13310308594332356122 1331070859474235629 1331130859498235645 1331260859530235655 13313208595652356540 1331340859579235665 13313808595912356617 1331470859628235675 1331550859646235685 1331590859664235699 13316508596772356922 1331690859718235709 1331750859742235725 1331880859774235735 13319408598092357340 1331960859823235745 13320008598352357417 1332090859872235755 1332170859890235765 1332210859908235779 13322708599212357722 1332310859962235789 1332370859986235805 1332500860018235815B176_check_consulting_it_abo 120625086005223583108600972358355B177_carry_out_consulting_it 120625086010823584108601532358455B178_report_consulting_it_ab 133252 133252480860157235853860431235962forbid_breaks0rv4 1332570860262235895 1332650860280235905 1332690860298235919 13327508603112359122 1332790860352235929 1332850860376235945 1332980860408235955B179_check_locking_it_with 133300 1333002380860435235973861509236342forbid_breaks0rv4original_deadflag8 1333050860574236025 1333090860608236035 1333170860626236045 1333210860644236059 13332708606572360522 1333310860698236069 1333370860722236085 1333500860754236095 13335608607892360940 1333580860803236105 13336208608152361017 1333710860852236115 1333790860870236125 1333830860888236139 13338908609012361322 1333930860942236149 1333990860966236165 1334120860998236175 13341808610332361740 1334200861047236185 13342408610592361817 1334330861096236195 1334410861114236205 1334450861132236219 13345108611452362122 1334550861186236229 1334610861210236245 1334740861242236255 13348008612772362540 1334820861291236265 13348608613032362617 1334950861340236275 1335030861358236285 1335070861376236299 13351308613892362922 1335170861430236309 1335230861454236325 1335360861486236335B180_carry_out_locking_it_wi 133538 133538480861513236353861787236462forbid_breaks0rv4 1335430861618236395 1335510861636236405 1335550861654236419 13356108616672364122 1335650861708236429 1335710861732236445 1335840861764236455B181_report_locking_it_with 133586 133586480861791236473862064236582forbid_breaks0rv4 1335910861895236515 1335990861913236525 1336030861931236539 13360908619442365322 1336130861985236549 1336190862009236565 1336320862041236575B182_check_unlocking_it_with 133634 1336341760862068236593862900236882forbid_breaks0rv4original_deadflag8 1336390862209236645 1336430862243236655 1336510862261236665 1336550862279236679 13366108622922366722 1336650862333236689 1336710862357236705 1336840862389236715 13369008624242367140 1336920862438236725 13369608624502367217 1337050862487236735 1337130862505236745 1337170862523236759 13372308625362367522 1337270862577236769 1337330862601236785 1337460862633236795 13375208626682367940 1337540862682236805 13375808626942368017 1337670862731236815 1337750862749236825 1337790862767236839 13378508627802368322 1337890862821236849 1337950862845236865 1338080862877236875B183_carry_out_unlocking_it_ 133810 133810480862904236893863178237002forbid_breaks0rv4 1338150863009236935 1338230863027236945 1338270863045236959 13383308630582369522 1338370863099236969 1338430863123236985 1338560863155236995B184_report_unlocking_it_wit 133858 133858480863182237013863456237122forbid_breaks0rv4 1338630863287237055 1338710863305237065 1338750863323237079 13388108633362370722 1338850863377237089 1338910863401237105 1339040863433237115B185_check_switching_on 133906 1339061140863460237133864043237342forbid_breaks0rv4original_deadflag8 1339110863596237185 1339150863630237195 1339230863648237205 1339270863666237219 13393308636792372122 1339370863720237229 1339430863744237245 1339560863776237255 13396208638112372540 1339640863825237265 13396808638372372617 1339770863874237275 1339850863892237285 1339890863910237299 13399508639232372922 1339990863964237309 1340050863988237325 1340180864020237335B186_carry_out_switching_on 134020 134020480864047237353864320237462forbid_breaks0rv4 1340250864151237395 1340330864169237405 1340370864187237419 13404308642002374122 1340470864241237429 1340530864265237445 1340660864297237455B187_report_switching_on 134068 134068480864324237473864594237582forbid_breaks0rv4 1340730864425237515 1340810864443237525 1340850864461237539 13409108644742375322 1340950864515237549 1341010864539237565 1341140864571237575B188_check_switching_off 134116 1341161140864598237593865182237802forbid_breaks0rv4original_deadflag8 1341210864735237645 1341250864769237655 1341330864787237665 1341370864805237679 13414308648182376722 1341470864859237689 1341530864883237705 1341660864915237715 13417208649502377140 1341740864964237725 13417808649762377217 1341870865013237735 1341950865031237745 1341990865049237759 13420508650622377522 1342090865103237769 1342150865127237785 1342280865159237795B189_carry_out_switching_off 134230 134230480865186237813865460237922forbid_breaks0rv4 1342350865291237855 1342430865309237865 1342470865327237879 13425308653402378722 1342570865381237889 1342630865405237905 1342760865437237915B190_report_switching_off 134278 134278480865464237933865735238042forbid_breaks0rv4 1342830865566237975 1342910865584237985 1342950865602237999 13430108656152379922 1343050865656238009 1343110865680238025 1343240865712238035B191_check_opening 134326 1343261760865739238053866561238342forbid_breaks0rv4original_deadflag8 1343310865870238105 1343350865904238115 1343430865922238125 1343470865940238139 13435308659532381322 1343570865994238149 1343630866018238165 1343760866050238175 13438208660852381740 1343840866099238185 13438808661112381817 1343970866148238195 1344050866166238205 1344090866184238219 13441508661972382122 1344190866238238229 1344250866262238245 1344380866294238255 13444408663292382540 1344460866343238265 13445008663552382617 1344590866392238275 1344670866410238285 1344710866428238299 13447708664412382922 1344810866482238309 1344870866506238325 1345000866538238335B192_carry_out_opening 134502 134502480866565238353866833238462forbid_breaks0rv4 1345070866664238395 1345150866682238405 1345190866700238419 13452508667132384122 1345290866754238429 1345350866778238445 1345480866810238455B193_report_opening 134550 1345501140866837238473867416238682forbid_breaks0rv4original_deadflag8 1345550866969238525 1345590867003238535 1345670867021238545 1345710867039238559 13457708670522385522 1345810867093238569 1345870867117238585 1346000867149238595 13460608671842385940 1346080867198238605 13461208672102386017 1346210867247238615 1346290867265238625 1346330867283238639 13463908672962386322 1346430867337238649 1346490867361238665 1346620867393238675B194_check_closing 134664 1346641140867420238693867998238902forbid_breaks0rv4original_deadflag8 1346690867551238745 1346730867585238755 1346810867603238765 1346850867621238779 13469108676342387722 1346950867675238789 1347010867699238805 1347140867731238815 13472008677662388140 1347220867780238825 13472608677922388217 1347350867829238835 1347430867847238845 1347470867865238859 13475308678782388522 1347570867919238869 1347630867943238885 1347760867975238895B195_carry_out_closing 134778 134778480868002238913868270239022forbid_breaks0rv4 1347830868101238955 1347910868119238965 1347950868137238979 13480108681502389722 1348050868191238989 1348110868215239005 1348240868247239015B196_report_closing 134826 134826480868274239033868539239142forbid_breaks0rv4 1348310868370239075 1348390868388239085 1348430868406239099 13484908684192390922 1348530868460239109 1348590868484239125 1348720868516239135B197_check_wearing 134874 1348741760868543239153869365239442forbid_breaks0rv4original_deadflag8 1348790868674239205 1348830868708239215 1348910868726239225 1348950868744239239 13490108687572392322 1349050868798239249 1349110868822239265 1349240868854239275 13493008688892392740 1349320868903239285 13493608689152392817 1349450868952239295 1349530868970239305 1349570868988239319 13496308690012393122 1349670869042239329 1349730869066239345 1349860869098239355 13499208691332393540 1349940869147239365 13499808691592393617 1350070869196239375 1350150869214239385 1350190869232239399 13502508692452393922 1350290869286239409 1350350869310239425 1350480869342239435B198_carry_out_wearing 135050 135050480869369239453869637239562forbid_breaks0rv4 1350550869468239495 1350630869486239505 1350670869504239519 13507308695172395122 1350770869558239529 1350830869582239545 1350960869614239555B199_report_wearing 135098 135098480869641239573869906239682forbid_breaks0rv4 1351030869737239615 1351110869755239625 1351150869773239639 13512108697862396322 1351250869827239649 1351310869851239665 1351440869883239675B200_check_taking_off 135146 1351461140869910239693870491239902forbid_breaks0rv4original_deadflag8 1351510870044239745 1351550870078239755 1351630870096239765 1351670870114239779 13517308701272397722 1351770870168239789 1351830870192239805 1351960870224239815 13520208702592398140 1352040870273239825 13520808702852398217 1352170870322239835 1352250870340239845 1352290870358239859 13523508703712398522 1352390870412239869 1352450870436239885 1352580870468239895B201_carry_out_taking_off 135260 135260480870495239913870766240022forbid_breaks0rv4 1352650870597239955 1352730870615239965 1352770870633239979 13528308706462399722 1352870870687239989 1352930870711240005 1353060870743240015B202_report_taking_off 135308 135308480870770240033871038240142forbid_breaks0rv4 1353130870869240075 1353210870887240085 1353250870905240099 13533108709182400922 1353350870959240109 1353410870983240125 1353540871015240135B203_check_giving_it_to 135356 1353563620871042240153872601240682forbid_breaks0rv4original_deadflag8 1353610871178240205 1353650871212240215 1353730871230240225 1353770871248240239 13538308712612402322 1353870871302240249 1353930871326240265 1354060871358240275 13541208713932402740 1354140871407240285 13541808714192402817 1354270871456240295 1354350871474240305 1354390871492240319 13544508715052403122 1354490871546240329 1354550871570240345 1354680871602240355 13547408716372403540 1354760871651240365 13548008716632403617 1354890871700240375 1354970871718240385 1355010871736240399 13550708717492403922 1355110871790240409 1355170871814240425 1355300871846240435 13553608718812404340 1355380871895240445 13554208719072404417 1355510871944240455 1355590871962240465 1355630871980240479 13556908719932404722 1355730872034240489 1355790872058240505 1355920872090240515 13559808721252405140 1356000872139240525 13560408721512405217 1356130872188240535 1356210872206240545 1356250872224240559 13563108722372405522 1356350872278240569 1356410872302240585 1356540872334240595 13566008723692405940 1356620872383240605 13566608723952406017 1356750872432240615 1356830872450240625 1356870872468240639 13569308724812406322 1356970872522240649 1357030872546240665 1357160872578240675B204_carry_out_giving_it_to 135718 135718480872605240693872878240802forbid_breaks0rv4 1357230872709240735 1357310872727240745 1357350872745240759 13574108727582407522 1357450872799240769 1357510872823240785 1357640872855240795B205_report_giving_it_to 135766 135766480872882240813873152240922forbid_breaks0rv4 1357710872983240855 1357790873001240865 1357830873019240879 13578908730322408722 1357930873073240889 1357990873097240905 1358120873129240915B206_check_showing_it_to 135814 1358141760873156240933873984241222forbid_breaks0rv4original_deadflag8 1358190873293240985 1358230873327240995 1358310873345241005 1358350873363241019 13584108733762410122 1358450873417241029 1358510873441241045 1358640873473241055 13587008735082410540 1358720873522241065 13587608735342410617 1358850873571241075 1358930873589241085 1358970873607241099 13590308736202410922 1359070873661241109 1359130873685241125 1359260873717241135 13593208737522411340 1359340873766241145 13593808737782411417 1359470873815241155 1359550873833241165 1359590873851241179 13596508738642411722 1359690873905241189 1359750873929241205 1359880873961241215B207_carry_out_showing_it_to 120625087399524123108740402412355B208_report_showing_it_to 120625087405124124108740932412452B209_check_waking 135990 135990480874097241253874360241362forbid_breaks0rv4 1359950874191241295 1360030874209241305 1360070874227241319 13601308742402413122 1360170874281241329 1360230874305241345 1360360874337241355B210_carry_out_waking 120625087437124137108744092413748B211_report_waking 120625087442024138108744552413845B212_check_throwing_it_at 136038 1360381760874459241393875288241682forbid_breaks0rv4original_deadflag8 1360430874597241445 1360470874631241455 1360550874649241465 1360590874667241479 13606508746802414722 1360690874721241489 1360750874745241505 1360880874777241515 13609408748122415140 1360960874826241525 13610008748382415217 1361090874875241535 1361170874893241545 1361210874911241559 13612708749242415522 1361310874965241569 1361370874989241585 1361500875021241595 13615608750562415940 1361580875070241605 13616208750822416017 1361710875119241615 1361790875137241625 1361830875155241639 13618908751682416322 1361930875209241649 1361990875233241665 1362120875265241675B213_carry_out_throwing_it_a 120625087529924169108753442416955B214_report_throwing_it_at 120625087535524170108753982417053B215_check_attacking 136214 136214480875402241713875668241822forbid_breaks0rv4 1362190875499241755 1362270875517241765 1362310875535241779 13623708755482417722 1362410875589241789 1362470875613241805 1362600875645241815B216_carry_out_attacking 120625087567924183108757202418351B217_report_attacking 120625087573124184108757692418448B218_check_kissing 136262 1362621140875773241853876351242062forbid_breaks0rv4original_deadflag8 1362670875904241905 1362710875938241915 1362790875956241925 1362830875974241939 13628908759872419322 1362930876028241949 1362990876052241965 1363120876084241975 13631808761192419740 1363200876133241985 13632408761452419817 1363330876182241995 1363410876200242005 1363450876218242019 13635108762312420122 1363550876272242029 1363610876296242045 1363740876328242055B219_carry_out_kissing 120625087636224207108764012420749B220_report_kissing 120625087641224208108764482420846B221_check_answering_it_that 120625087645924209108765042420955B222_carry_out_answering_it_ 120625087651524210108765602421055B223_report_answering_it_tha 136376 136376480876564242113876838242222forbid_breaks0rv4 1363810876669242155 1363890876687242165 1363930876705242179 13639908767182421722 1364030876759242189 1364090876783242205 1364220876815242215B224_check_telling_it_about 136424 136424480876842242233877115242342forbid_breaks0rv4 1364290876946242275 1364370876964242285 1364410876982242299 13644708769952422922 1364510877036242309 1364570877060242325 1364700877092242335B225_carry_out_telling_it_ab 120625087712624235108771712423555B226_report_telling_it_about 136472 136472480877175242363877449242472forbid_breaks0rv4 1364770877280242405 1364850877298242415 1364890877316242429 13649508773292424222 1364990877370242439 1365050877394242455 1365180877426242465B227_check_asking_it_about 120625087746024248108775032424853B228_carry_out_asking_it_abo 120625087751424249108775592424955B229_report_asking_it_about 136520 136520480877563242503877836242612forbid_breaks0rv4 1365250877667242545 1365330877685242555 1365370877703242569 13654308777162425622 1365470877757242579 1365530877781242595 1365660877813242605B230_check_asking_it_for 136568 1365681140877840242623878424242832forbid_breaks0rv4original_deadflag8 1365730877977242675 1365770878011242685 1365850878029242695 1365890878047242709 13659508780602427022 1365990878101242719 1366050878125242735 1366180878157242745 13662408781922427440 1366260878206242755 13663008782182427517 1366390878255242765 1366470878273242775 1366510878291242789 13665708783042427822 1366610878345242799 1366670878369242815 1366800878401242825B231_carry_out_asking_it_for 120625087843524284108784802428455B232_report_asking_it_for 120625087849124285108785332428552B233_check_waiting 120625087854424286108785792428645B234_carry_out_waiting 120625087859024287108786292428749B235_report_waiting 136682 136682480878633242883878898242992forbid_breaks0rv4 1366870878729242925 1366950878747242935 1366990878765242949 13670508787782429422 1367090878819242959 1367150878843242975 1367280878875242985B236_check_touching 120625087890924300108789452430046B237_carry_out_touching 120625087895624301108789962430150B238_report_touching 136730 1367301760879000243023879824243312forbid_breaks0rv4original_deadflag8 1367350879133243075 1367390879167243085 1367470879185243095 1367510879203243109 13675708792162431022 1367610879257243119 1367670879281243135 1367800879313243145 13678608793482431440 1367880879362243155 13679208793742431517 1368010879411243165 1368090879429243175 1368130879447243189 13681908794602431822 1368230879501243199 1368290879525243215 1368420879557243225 13684808795922432240 1368500879606243235 13685408796182432317 1368630879655243245 1368710879673243255 1368750879691243269 13688108797042432622 1368850879745243279 1368910879769243295 1369040879801243305B239_check_waving 136906 136906480879828243323880091243432forbid_breaks0rv4 1369110879922243365 1369190879940243375 1369230879958243389 13692908799712433822 1369330880012243399 1369390880036243415 1369520880068243425B240_carry_out_waving 120625088010224344108801402434448B241_report_waving 136954 136954480880144243453880408243562forbid_breaks0rv4 1369590880239243495 1369670880257243505 1369710880275243519 13697708802882435122 1369810880329243529 1369870880353243545 1370000880385243555B242_check_pulling 137002 1370021760880412243573881234243862forbid_breaks0rv4original_deadflag8 1370070880543243625 1370110880577243635 1370190880595243645 1370230880613243659 13702908806262436522 1370330880667243669 1370390880691243685 1370520880723243695 13705808807582436940 1370600880772243705 13706408807842437017 1370730880821243715 1370810880839243725 1370850880857243739 13709108808702437322 1370950880911243749 1371010880935243765 1371140880967243775 13712008810022437740 1371220881016243785 13712608810282437817 1371350881065243795 1371430881083243805 1371470881101243819 13715308811142438122 1371570881155243829 1371630881179243845 1371760881211243855B243_carry_out_pulling 120625088124524387108812842438749B244_report_pulling 137178 137178480881288243883881553243992forbid_breaks0rv4 1371830881384243925 1371910881402243935 1371950881420243949 13720108814332439422 1372050881474243959 1372110881498243975 1372240881530243985B245_check_pushing 137226 1372261760881557244003882379244292forbid_breaks0rv4original_deadflag8 1372310881688244055 1372350881722244065 1372430881740244075 1372470881758244089 13725308817712440822 1372570881812244099 1372630881836244115 1372760881868244125 13728208819032441240 1372840881917244135 13728808819292441317 1372970881966244145 1373050881984244155 1373090882002244169 13731508820152441622 1373190882056244179 1373250882080244195 1373380882112244205 13734408821472442040 1373460882161244215 13735008821732442117 1373590882210244225 1373670882228244235 1373710882246244249 13737708822592442422 1373810882300244259 1373870882324244275 1374000882356244285B246_carry_out_pushing 120625088239024430108824292443049B247_report_pushing 137402 137402480882433244313882698244422forbid_breaks0rv4 1374070882529244355 1374150882547244365 1374190882565244379 13742508825782443722 1374290882619244389 1374350882643244405 1374480882675244415B248_check_turning 137450 1374501760882702244433883524244722forbid_breaks0rv4original_deadflag8 1374550882833244485 1374590882867244495 1374670882885244505 1374710882903244519 13747708829162445122 1374810882957244529 1374870882981244545 1375000883013244555 13750608830482445540 1375080883062244565 13751208830742445617 1375210883111244575 1375290883129244585 1375330883147244599 13753908831602445922 1375430883201244609 1375490883225244625 1375620883257244635 13756808832922446340 1375700883306244645 13757408833182446417 1375830883355244655 1375910883373244665 1375950883391244679 13760108834042446722 1376050883445244689 1376110883469244705 1376240883501244715B249_carry_out_turning 120625088353524473108835742447349B250_report_turning 137626 137626480883578244743883843244852forbid_breaks0rv4 1376310883674244785 1376390883692244795 1376430883710244809 13764908837232448022 1376530883764244819 1376590883788244835 1376720883820244845B251_check_pushing_it_to 137674 1376743620883847244863885407245392forbid_breaks0rv4original_deadflag8 1376790883984244915 1376830884018244925 1376910884036244935 1376950884054244949 13770108840672449422 1377050884108244959 1377110884132244975 1377240884164244985 13773008841992449840 1377320884213244995 13773608842252449917 1377450884262245005 1377530884280245015 1377570884298245029 13776308843112450222 1377670884352245039 1377730884376245055 1377860884408245065 13779208844432450640 1377940884457245075 13779808844692450717 1378070884506245085 1378150884524245095 1378190884542245109 13782508845552451022 1378290884596245119 1378350884620245135 1378480884652245145 13785408846872451440 1378560884701245155 13786008847132451517 1378690884750245165 1378770884768245175 1378810884786245189 13788708847992451822 1378910884840245199 1378970884864245215 1379100884896245225 13791608849312452240 1379180884945245235 13792208849572452317 1379310884994245245 1379390885012245255 1379430885030245269 13794908850432452622 1379530885084245279 1379590885108245295 1379720885140245305 13797808851752453040 1379800885189245315 13798408852012453117 1379930885238245325 1380010885256245335 1380050885274245349 13801108852872453422 1380150885328245359 1380210885352245375 1380340885384245385B252_carry_out_pushing_it_to 120625088541824540108854632454055B253_report_pushing_it_to 120625088547424541108855162454152B254_check_squeezing 138036 138036480885520245423885786245532forbid_breaks0rv4 1380410885617245465 1380490885635245475 1380530885653245489 13805908856662454822 1380630885707245499 1380690885731245515 1380820885763245525B255_carry_out_squeezing 120625088579724554108858382455451B256_report_squeezing 138084 138084480885842245553886109245662forbid_breaks0rv4 1380890885940245595 1380970885958245605 1381010885976245619 13810708859892456122 1381110886030245629 1381170886054245645 1381300886086245655B257_check_saying_yes 138132 138132480886113245673886380245782forbid_breaks0rv4 1381370886211245715 1381450886229245725 1381490886247245739 13815508862602457322 1381590886301245749 1381650886325245765 1381780886357245775B258_carry_out_saying_yes 120625088639124579108864332457952B259_report_saying_yes 120625088644424580108864832458049B260_check_saying_no 138180 138180480886487245813886753245922forbid_breaks0rv4 1381850886584245855 1381930886602245865 1381970886620245879 13820308866332458722 1382070886674245889 1382130886698245905 1382260886730245915B261_carry_out_saying_no 120625088676424593108868052459351B262_report_saying_no 120625088681624594108868542459448B263_check_burning 138228 138228480886858245953887122246062forbid_breaks0rv4 1382330886953245995 1382410886971246005 1382450886989246019 13825108870022460122 1382550887043246029 1382610887067246045 1382740887099246055B264_carry_out_burning 120625088713324607108871722460749B265_report_burning 120625088718324608108872192460846B266_check_waking_up 138276 138276480887223246093887489246202forbid_breaks0rv4 1382810887320246135 1382890887338246145 1382930887356246159 13829908873692461522 1383030887410246169 1383090887434246185 1383220887466246195B267_carry_out_waking_up 120625088750024621108875412462151B268_report_waking_up 120625088755224622108875902462248B269_check_thinking 138324 138324480887594246233887859246342forbid_breaks0rv4 1383290887690246275 1383370887708246285 1383410887726246299 13834708877392462922 1383510887780246309 1383570887804246325 1383700887836246335B270_carry_out_thinking 120625088787024635108879102463550B271_report_thinking 120625088792124636108879582463647B272_check_smelling 120625088796924637108880052463746B273_carry_out_smelling 120625088801624638108880562463850B274_report_smelling 138372 138372480888060246393888326246502forbid_breaks0rv4 1383770888157246435 1383850888175246445 1383890888193246459 13839508882062464522 1383990888247246469 1384050888271246485 1384180888303246495B275_check_listening_to 120625088833724651108883772465150B276_carry_out_listening_to 120625088838824652108884322465254B277_report_listening_to 138420 138420480888436246533888706246642forbid_breaks0rv4 1384250888537246575 1384330888555246585 1384370888573246599 13844308885862465922 1384470888627246609 1384530888651246625 1384660888683246635B278_check_tasting 120625088871724665108887522466545B279_carry_out_tasting 120625088876324666108888022466649B280_report_tasting 138468 138468480888806246673889071246782forbid_breaks0rv4 1384730888902246715 1384810888920246725 1384850888938246739 13849108889512467322 1384950888992246749 1385010889016246765 1385140889048246775B281_check_cutting 138516 138516480889075246793889339246902forbid_breaks0rv4 1385210889170246835 1385290889188246845 1385330889206246859 13853908892192468522 1385430889260246869 1385490889284246885 1385620889316246895B282_carry_out_cutting 120625088935024691108893892469149B283_report_cutting 120625088940024692108894362469246B284_check_jumping 120625088944724693108894822469345B285_carry_out_jumping 120625088949324694108895322469449B286_report_jumping 138564 138564480889536246953889801247062forbid_breaks0rv4 1385690889632246995 1385770889650247005 1385810889668247019 13858708896812470122 1385910889722247029 1385970889746247045 1386100889778247055B287_check_tying_it_to 138612 138612480889805247073890073247182forbid_breaks0rv4 1386170889904247115 1386250889922247125 1386290889940247139 13863508899532471322 1386390889994247149 1386450890018247165 1386580890050247175B288_carry_out_tying_it_to 120625089008424719108901272471953B289_report_tying_it_to 120625089013824720108901782472050B290_check_drinking 138660 138660480890182247213890447247322forbid_breaks0rv4 1386650890278247255 1386730890296247265 1386770890314247279 13868308903272472722 1386870890368247289 1386930890392247305 1387060890424247315B291_carry_out_drinking 120625089045824733108904982473350B292_report_drinking 120625089050924734108905462473447B293_check_saying_sorry 138708 138708480890550247353890819247462forbid_breaks0rv4 1387130890650247395 1387210890668247405 1387250890686247419 13873108906992474122 1387350890740247429 1387410890764247445 1387540890796247455B294_carry_out_saying_sorry 120625089083024747108908742474754B295_report_saying_sorry 120625089088524748108909262474851B296_check_swinging 138756 138756480890930247493891195247602forbid_breaks0rv4 1387610891026247535 1387690891044247545 1387730891062247559 13877908910752475522 1387830891116247569 1387890891140247585 1388020891172247595B297_carry_out_swinging 120625089120624761108912462476150B298_report_swinging 120625089125724762108912942476247B299_check_rubbing 138804 138804480891298247633891562247742forbid_breaks0rv4 1388090891393247675 1388170891411247685 1388210891429247699 13882708914422476922 1388310891483247709 1388370891507247725 1388500891539247735B300_carry_out_rubbing 120625089157324775108916122477549B301_report_rubbing 138852 138852480891616247763891881247872forbid_breaks0rv4 1388570891712247805 1388650891730247815 1388690891748247829 13887508917612478222 1388790891802247839 1388850891826247855 1388980891858247865B302_check_setting_it_to 138900 138900480891885247883892155247992forbid_breaks0rv4 1389050891986247925 1389130892004247935 1389170892022247949 13892308920352479422 1389270892076247959 1389330892100247975 1389460892132247985B303_carry_out_setting_it_to 120625089216624800108922112480055B304_report_setting_it_to 120625089222224801108922642480152B305_check_waving_hands 120625089227524802108923152480250B306_carry_out_waving_hands 120625089232624803108923702480354B307_report_waving_hands 138948 138948480892374248043892644248152forbid_breaks0rv4 1389530892475248085 1389610892493248095 1389650892511248109 13897108925242481022 1389750892565248119 1389810892589248135 1389940892621248145B308_check_buying 138996 138996480892648248163892911248272forbid_breaks0rv4 1390010892742248205 1390090892760248215 1390130892778248229 13901908927912482222 1390230892832248239 1390290892856248255 1390420892888248265B309_carry_out_buying 120625089292224828108929602482848B310_report_buying 120625089297124829108930062482945B311_check_climbing 139044 139044480893010248303893275248412forbid_breaks0rv4 1390490893106248345 1390570893124248355 1390610893142248369 13906708931552483622 1390710893196248379 1390770893220248395 1390900893252248405B312_carry_out_climbing 120625089328624842108933262484250B313_report_climbing 120625089333724843108933742484347B314_check_sleeping 139092 139092480893378248443893643248552forbid_breaks0rv4 1390970893474248485 1391050893492248495 1391090893510248509 13911508935232485022 1391190893564248519 1391250893588248535 1391380893620248545B315_carry_out_sleeping 120625089365424856108936942485650B316_report_sleeping 120625089370524857108937422485747B317_check_quitting_the_game 120625089375324858108937982485855B318_carry_out_quitting_the_ 139140 139140480893802248593894096248702forbid_breaks0rv4 1391450893907248635 1391530893935248645 1391570893953248659 13916308939662486522 1391670894007248669 1391730894041248685 1391860894073248695B319_report_quitting_the_gam 120625089410724871108941522487155B320_check_saving_the_game 120625089416324872108942062487253B321_carry_out_saving_the_ga 139188 139188480894210248733894504248842forbid_breaks0rv4 1391930894315248775 1392010894343248785 1392050894361248799 13921108943742487922 1392150894415248809 1392210894449248825 1392340894481248835B322_report_saving_the_game 120625089451524885108945592488554B323_check_restoring_the_gam 120625089457024886108946152488655B324_carry_out_restoring_the 139236 139236480894619248873894919248982forbid_breaks0rv4 1392410894724248915 1392490894755248925 1392530894773248939 13925908947862489322 1392630894827248949 1392690894864248965 1392820894896248975B325_report_restoring_the_ga 120625089493024899108949752489955B326_check_restarting_the_ga 120625089498624900108950312490055B327_carry_out_restarting_th 139284 139284480895035249013895335249122forbid_breaks0rv4 1392890895140249055 1392970895171249065 1393010895189249079 13930708952022490722 1393110895243249089 1393170895280249105 1393300895312249115B328_report_restarting_the_g 120625089534624913108953912491355B329_check_verifying_the_sto 120625089540224914108954472491455B330_carry_out_verifying_the 139332 139332480895451249153895761249262forbid_breaks0rv4 1393370895556249195 1393450895592249205 1393490895610249219 13935508956232492122 1393590895664249229 1393650895706249245 1393780895738249255B331_report_verifying_the_st 120625089577224927108958172492755B332_check_switching_the_sto 120625089582824928108958732492855B333_carry_out_switching_the 139380 139380480895877249293896185249402forbid_breaks0rv4 1393850895982249335 1393930896017249345 1393970896035249359 13940308960482493522 1394070896089249369 1394130896130249385 1394260896162249395B334_report_switching_the_st 120625089619624941108962412494155B335_check_switching_the_sto 120625089625224942108962972494255B336_carry_out_switching_the 139428 139428480896301249433896611249542forbid_breaks0rv4 1394330896406249475 1394410896442249485 1394450896460249499 13945108964732494922 1394550896514249509 1394610896556249525 1394740896588249535B337_report_switching_the_st 120625089662224955108966672495555B338_check_requesting_the_st 120625089667824956108967232495655B339_carry_out_requesting_th 139476 139476480896727249573897049249682forbid_breaks0rv4 1394810896832249615 1394890896874249625 1394930896892249639 13949908969052496322 1395030896946249649 1395090896994249665 1395220897026249675B340_report_requesting_the_s 120625089706024969108971052496955B341_check_requesting_the_sc 120625089711624970108971612497055B342_carry_out_requesting_th 139524 139524480897165249713897461249822forbid_breaks0rv4 1395290897270249755 1395370897299249765 1395410897317249779 13954708973302497722 1395510897371249789 1395570897406249805 1395700897438249815B343_report_requesting_the_s 120625089747224983108975172498355B344_check_preferring_abbrev 120625089752824984108975732498455B345_carry_out_preferring_ab 139572 139572480897577249853897881249962forbid_breaks0rv4 1395770897682249895 1395850897715249905 1395890897733249919 13959508977462499122 1395990897787249929 1396050897826249945 1396180897858249955B346_report_preferring_abbre 139620 139620480897885249973898197250082forbid_breaks0rv4 1396250897990250015 1396330898027250025 1396370898045250039 13964308980582500322 1396470898099250049 1396530898142250065 1396660898174250075B347_check_preferring_unabbr 120625089820825009108982532500955B348_carry_out_preferring_un 139668 139668480898257250103898565250212forbid_breaks0rv4 1396730898362250145 1396810898397250155 1396850898415250169 13969108984282501622 1396950898469250179 1397010898510250195 1397140898542250205B349_report_preferring_unabb 139716 139716480898569250223898885250332forbid_breaks0rv4 1397210898674250265 1397290898713250275 1397330898731250289 13973908987442502822 1397430898785250299 1397490898830250315 1397620898862250325B350_check_preferring_someti 120625089889625034108989412503455B351_carry_out_preferring_so 139764 139764480898945250353899269250462forbid_breaks0rv4 1397690899050250395 1397770899093250405 1397810899111250419 13978708991242504122 1397910899165250429 1397970899214250445 1398100899246250455B352_report_preferring_somet 139812 139812480899273250473899591250582forbid_breaks0rv4 1398170899378250515 1398250899418250525 1398290899436250539 13983508994492505322 1398390899490250549 1398450899536250565 1398580899568250575B353_check_switching_score_n 120625089960225059108996472505955B354_carry_out_switching_sco 139860 139860480899651250603899963250712forbid_breaks0rv4 1398650899756250645 1398730899793250655 1398770899811250669 13988308998242506622 1398870899865250679 1398930899908250695 1399060899940250705B355_report_switching_score_ 139908 139908480899967250723900275250832forbid_breaks0rv4 1399130900072250765 1399210900107250775 1399250900125250789 13993109001382507822 1399350900179250799 1399410900220250815 1399540900252250825B356_check_switching_score_n 120625090028625084109003312508455B357_carry_out_switching_sco 139956 139956480900335250853900649250962forbid_breaks0rv4 1399610900440250895 1399690900478250905 1399730900496250919 13997909005092509122 1399830900550250929 1399890900594250945 1400020900626250955B358_report_switching_score_ 140004 140004480900653250973900963251082forbid_breaks0rv4 1400090900758251015 1400170900794251025 1400210900812251039 14002709008252510322 1400310900866251049 1400370900908251065 1400500900940251075B359_check_requesting_the_pr 120625090097425109109010192510955B360_carry_out_requesting_th 140052 140052480901023251103901341251212forbid_breaks0rv4 1400570901128251145 1400650901168251155 1400690901186251169 14007509011992511622 1400790901240251179 1400850901286251195 1400980901318251205B361_report_requesting_the_p 120625090135225122109013972512255DetectSceneChange 140100 1401002600901531251313902690251652chs0ch4 1401050901619251355 1401170901656251369 14012109016932513713 14012509017162513813 14013009017342513831 14013609017832513913 14015209018202513950 14016209018472513977 14017009018692513999 14017909019012514013 14018909019522514113 14019709019922514213 14021509020472514313 14022309020882514413 1402260902121251475 1402360902158251489 14024009021952514913 14024409022182515013 14024909022362515031 14025509022872515113 14026309023092515135 14027309023622515213 14028209023942515313 14029009024362515413 14030809024912515513 14031509025322515613 1403180902578251605 14032409025902516017 1403360902640251625 14034109026502516215 1403580902681251645ShowSceneStatus 140360 140360710902709251683903086251812chs0sc4ch8 1403650902818251735 1403770902855251749 1404050902964251769 14041609030112517713 14042209030582517813 1404280903085251811AD_ACTION 0090350725202109035202520223AD_REQUIREMENTS 1090356625203109035852520329AD_NOUN_KOV 2090364325204109036582520425AD_SECOND_KOV 3090370325205109037202520527AD_VARIABLES_CREATOR 4090376625206109037902520634AD_VARIABLES_ID 5090384125207109038602520729AD_RECORD_SIZE 6090391325209109039312520928FindAction 140431 1404311000903936252113904097252192fa0t4 1404360903954252122 14044209039682521216 1404470903982252132 1404510903990252142 1404630904022252153 14051709040482521529 1405200904060252163 1405290904088252182ActionNumberIndexed 140531 140531880904102252213904226252242i0 1405360904126252222 14054709041582522234 1406170904215252232TOUCH_NOUN_ABIT 1090437925231109044092523140TOUCH_SECOND_ABIT 2090442025232109044502523240LIGHT_ABIT 4090446125233109044912523340NEED_NOUN_ABIT 8090450225234109045322523440NEED_SECOND_ABIT 16090454325235109045732523540OUT_OF_WORLD_ABIT 32090458425236109046142523640CARRY_NOUN_ABIT 64090462525237109046552523740CARRY_SECOND_ABIT 128090466625238109046962523840NeedToCarryNoun 140619 1406191409047012524039047652524067 14062209047242524026NeedToCarrySecondNoun 140633 1406331509047692524139048352524169 14063609047922524126NeedToTouchNoun 140648 1406481409048392524239049032524267 14065109048622524226NeedToTouchSecondNoun 140662 1406621409049072524339049732524369 14066509049302524326NeedLightForAction 140676 1406761409049772524439050362524462 14067909050002524426TestActionMask 140690 140690880905041252463905200252522match0mask4at8 1406950905073252472 1407050905096252482 1407080905119252492 1407680905163252502 1407760905190252512TryAction 140778 1407786230905337252593906904253022req0by4ac8n12s16stora20smeta24tbits28saved_command32text_of_command36 1407830905411252602 14078709054222526013 1408150905478252612 1408210905502252622 1408270905518252632 14083009055312526315 14083309055522526336 14083709055642526348 1408410905577252642 14084509055982526423 1408500905613252652 14085409056252526514 14085809056342526523 14086509056632526552 1408680905684252672 1408780905706252682 1408830905718252693 14094909057662526951 14095709057852527010 14096209057952527020 1409670905818252713 14103309058682527153 14104109058872527210 14104609058972527220 1410510905920252733 1411890906055252754 1411990906099252764 1412120906160252774 1412220906206252784 1412330906255252794 1412420906294252804 1412480906317252815 14125309063382528126 14125809063482528136 1412670906397252835 14127209064182528326 14127709064282528336 1412830906469252854 1412920906503252864 14129609065232528624 1413000906547252874 14130509065652528722 1413130906611252912 1413350906645252932 1413390906668252943 14134309066892529424 1413470906711252953 1413560906747252963 1413650906781252992 14137009067952529916 1413740906817253002 14137809068292530014 14138209068412530026 14138509068622530047 1413880906876253012 1413980906903253021R_Process 141401 141401460907048253093907165253132a0i4j8 1414060907066253102 14141009070782531014 1414140907094253115 14141909071042531115 14142409071142531125 1414360907140253125 14144009071522531217 1414440907164253131converted_action_outcome 49770809073002532019073362532037GVS_Convert 141447 141447400907340253213907496253252ac0n4s8 1414520907361253222 1414660907412253232 14147309074502532340 1414840907488253242ConvertToRequest 141487 141487690907501253273907657253322X0AN4Y8Z12 1414920907529253282 1414990907564253292 14150509075812532919 1415300907618253307 1415530907649253312ConvertToGoingWithPush 141556 1415561540907662253343908091253472i0oldrm4newrm8infl12 1415610907706253352 1415660907715253362 14158009077632533650 14159009077802533667 1415940907796253372 1415990907815253382 1416100907842253392 1416240907870253402 1416340907898253412 14163809079222534126 1416480907940253422 1416540907964253433 14166709079992534338 1416900908037253443 1417000908065253459 1417070908083253462ImplicitTake 141710 1417102000908231253543908781253682obj0ks4 1417150908253253552 14172109082762535525 1417340908327253573 1417470908365253584 1417590908415253602 1417680908438253612 14177209084572536121 1417770908478253622 14178009084922536216 14178309085072536231 1417920908530253632 14179609085492536321 1418240908601253647 1418480908649253652 14185509086732536526 14185809086882536541 14186109087022536555 14186809087262536579 1418720908746253662 1419080908772253672LookAfterGoing 141910 141910200908924253753908991253782 1419130908941253762 1419200908960253772 1419270908990253781AbbreviatedRoomDescription 141930 1419303760909146253853909810254012prior_action0pos4frame_id8 1419350909202253862 1419400909228253882 1419480909246253892 1419610909273253902 1420310909333253913 1420910909382253923 1421610909456253933 1421700909503253943 1421930909578253953 1422170909649253972 1422240909697253982 14222809097112539816 1422980909786254002 1423030909809254011BeginAction 142306 1423061090909949254083910353254202a0n4s8moi12notrack16rv20 1423110909985254092 1423180910006254112 14232209100202541116 14232609100322541128 14233009100462541142 14233309100582541154 1423370910088254132 14234209101002541314 14234709101102541324 14235209101222541336 14235709101352541349 1423620910164254142 14237009101832541421 1423780910209254162 14238209102372541630 14238509102492541642 14238909102632541656 14239309102752541668 1423970910292254182 14240109103142541824 1424120910341254192ActionPrimitive 142415 1424158390910496254273912599254892rv0p14p28p312p416p520frame_id24 1424200910542254282 1424290910587254302 14243909106392543054 1424460910664254312 1424500910696254332 1424540910712254342 1424650910738254352 1425350910796254363 1425950910844254373 1426650910919254392 1426750910957254403 14268109109802544026 14269009110162544062 1426930911030254413 1426990911053254424 1427690911127254433 1427780911173254443 1427810911186254472 1427900911248254502 1428070911293254513 14281309113042545114 14281709113142545124 14282109113322545142 14282609113432545153 14283109113522545162 1428360911365254523 1428590911394254533 14286509114062545315 1428740911432254552 1428820911464254572 1428920911492254582 1429030911529254593 14291309115722545946 14291609115822545956 1429260911605254607 14293109116172546019 14293809116492546051 1429490911683254619 14295809117212546147 1429660911763254632 1429740911786254642 1429930911831254653 14299909118422546514 14302209118692546541 1430280911884254663 14304109119142546717 14305909119462546814 1430650911994254705 1430700912029254716 14308909121222547413 1430950912158254763 14310109121702547615 1431050912184254773 1431140912264254802 14312309122872548025 1431300912310254812 1431360912334254823 1431470912361254833 1432170912437254852 1432260912482254862 14323609125342548654 1432430912559254872 1432520912590254882ACTION_PROCESSING_INTERNAL_R 143254 143254609127392549639127702549634 14325709127692549633ActionVariablesNotTypeSafe 143260 1432606260912908255033915593255822mask0noun_kova4second_kova8at12 1432650912967255042 14327509129882550423 1432780913040255062 1433380913084255072 1433980913399255152 1434100913455255166 14341709134722551623 14342309134852551636 1434290913507255176 1434420913562255186 14344709135722551816 1434510913616255202 1434630913674255216 1434760913729255226 14348109137392552216 1434850913788255252 1435450913831255262 14355309138632552634 14355809138732552644 1435600913884255272 1435640913896255292 1435710913918255306 1435770913954255317 14358309139772553130 14359209140132553166 14359509140342553210 1436020914063255356 1436080914099255367 14361409141222553630 14362309141582553666 14362609141792553710 1436290914198255396 1436420914256255407 14364509142772554028 14364809143112554110 14365709143682554210 14366009143982554310 14366509144312554411 1436690914457255458 14367509144802554531 14368409145162554567 14368709145382554611 1436900914565255496 1437030914630255507 14370909146532555030 14371809146892555066 14372109147102555110 1437240914729255552 1437310914751255566 1437370914789255577 14374309148122555730 14375209148482555766 14375509148692555810 1437620914898255616 1437680914936255627 14377409149592556230 14378309149952556266 14378609150162556310 1437890915035255656 14380209151002556610 14380509151212556631 14380809151552556710 14381709152142556810 14382009152442556910 14382509152792557011 1438290915305255718 14383509153282557131 14384409153642557167 14384709153862557211 1438500915416255756 1438630915485255767 14386909155082557630 14387809155442557666 14388109155652557710 1438840915584255812BASIC_VISIBILITY_R 143886 1438861060915741255893916181256052 1438890915762255902 1438920915790255912 1439300915906255953 1439390915951255963 1439510916008255974 14396009160342559730 1439630916050255993 1439720916093256003 1439800916142256013 1439870916161256023 1439900916172256042BASIC_ACCESSIBILITY_R 143992 1439923590916332256123917443256522mask0at4 1439970916364256132 1440000916392256142 1440100916414256152 1440130916436256162 1440730916480256182 1440960916537256193 1441130916573256204 1441200916593256214 1441280916647256224 1441340916676256234 14414309167052562333 1441460916718256244 1441530916738256254 1441610916792256264 1441640916805256283 1441930916865256294 1442000916885256304 1442080916938256314 1442110916954256352 1442340917015256363 1442510917053256374 1442580917073256384 1442660917126256394 1442720917155256404 14428109171842564033 1442840917197256414 1442910917217256424 1442990917271256434 1443020917284256453 1443310917346256464 1443380917366256474 1443460917419256484 1443490917434256512CARRYING_REQUIREMENTS_R 144351 1443513630917596256593918321256872mask0at4 1443560917632256612 1443660917654256622 1443690917676256632 1444290917720256652 1444520917777256663 1445010917834256674 1445120917884256684 1445520917912256695 1445590917933256705 1445670917989256715 1445700918010256762 1445930918071256773 1446430918132256784 1446540918185256795 1446940918215256805 1447010918236256815 1447090918292256825 1447120918312256862STANDARD_IMPLICIT_TAKING_R 144714 144714140918477256943918547256972 1447170918506256952 1447260918538256962REQUESTED_ACTIONS_REQUIRE_R 144728 144728790918715257043919077257192rv0 1447330918748257052 1447430918794257063 1447460918810257073 1447490918824257083 1447590918860257093 1447690918899257104 1447770918951257115 1447870918997257125 1447900919015257144 14479909190372571426 1448020919050257163 1448050919068257182CARRY_OUT_REQUESTED_ACTIONS_R 144807 144807990919236257263919687257412rv0 1448120919271257272 1448220919317257283 14482509193382572824 1448280919365257293 1448440919407257303 1448570919466257314 1448690919526257325 14487909195702573249 1448820919591257353 1448850919614257363 1448940919642257373 1449010919667257383 1449040919678257402Details_of_Specific_Action 519646204false09198352574819198712574837GenericVerbSub 144906 1449061130919876257503920502257662ch0co4re8vis12rv16 1449110919909257512 1449150919942257522 1449200919975257542 1449280920015257552 14493309200252575512 1449400920066257562 1449500920113257572 1449590920180257582 1449680920251257592 1449770920320257612 1449880920377257622 14500509204362576261 1450120920461257642 1450160920494257652WORK_OUT_DETAILS_OF_SPECIFIC_R 145019 1450191580920669257733921131257802 1450220920702257742 1450510920786257752 1450820920870257762 1451130920954257772 1451440921038257782 1451750921122257792TestActionBitmap 145177 1451772040921272257873921660258012obj0act4i8j12k16bitmap20 1451820921312257882 14518609213322578822 1451960921367257903 1452090921413257913 1452210921446257932 14522709214612579317 1452530921501257947 14526009215112579417 1452670921535257953 1453190921569257964 1453460921608257983 14535209216172579812 14535909216332579828 14536309216402579835 14536909215262579432 1453790921651258002UpdateActionBitmap 145381 145381410921665258033921775258062 1453840921686258042 1453960921718258052 14540609217382580522 1454190921774258061SetActionBitmap 145422 1454222980921780258083922175258212obj0act4i8j12k16bitmap20 1454270921824258097 14543409218342580917 1454410921858258103 1454940921892258114 1455080921930258125 1455200921963258135 1455430921996258145 1455680922033258164 1455860922081258174 1456840922132258193 14569009221412581912 14569709221572581928 14570109221642581935 14570709218492580932 1457170922174258211SayActionName 145720 1457203009223182582839223692582854act0 14572509223372582822 14574709223682582853DA_Name 145750 1457504509223742583039224502583079n0 14575509223852583014 14577109224132583042 14578309224342583063 14579209224492583078DA_Topic 145795 1457951410922454258313922686258422x0a4b8c12d16i20cf24cw28 1458000922483258322 14580609224952583214 1458120922508258332 1458180922525258347 14582509225352583417 14583709225302583412 1458430922548258353 14584809225562583511 14585809225762583531 1458680922602258368 14587209226062583612 1458820922622258374 14589909226122583618 1459080922647258393 14591809226592583915 1459270922674258412 1459330922685258421DA_Number 145936 1459361109226902584339227132584326n0 14594109227032584316 14594409227122584325DA_TruthState 145947 1459472709227172584439227792584465n0 14595209227342584420 14595609227442584430 14596509227642584450 14597109227782584464DB_Action 145974 1459741240922783258453923144258542ac0acr4act8n12s16for_say20t24at28l32j36v40c44clc48 1459790922835258462 1459890922885258473 1460050922923258482 1460170922965258493 14602109229742584912 1460450923020258508 1460600923045258522 1460800923085258532 14608909231222585339 1460950923143258541MAX_NESTED_ACTIVITIES 20092330125861109233272586136activities_sp 49771209233292586219233532586225activities_stack 519666804false09233552586319234032586349activity_parameters_stack 519746804false09234052586419234622586458inhibit_flag 49771609236152587119236382587124saved_debug_rules 49772009236402587219236682587229FixInhibitFlag 146098 1460981590923672258733924290258892n0act4inhibit_rule_debugging8 1461030923723258747 14610609237272587411 1461140923752258753 1461600923782258763 1462010924000258795 14620509237432587427 1462150924035258812 1462240924096258823 1462300924131258833 1462340924152258852 1462430924213258863 1462490924250258882 1462540924289258891TestActivity 146257 1462572050924438258963924705259062A0desc4val8i12 1462620924471258977 14626509244752589711 1462730924498258983 1463260924534258994 1463300924550259005 14638809246102590111 1463920924625259025 14644709246842590311 14645009244912589727 1464600924696259052ActivityEmpty 146462 1464623140924844259133925132259212A0x4 1464670924864259142 1465130924900259152 1465690924952259162 1466150924985259172 1466710925037259182 1467170925072259192 1467730925124259202RulebookEmpty 146776 146776640925137259233925217259262rb0 1467810925156259242 1468370925209259252ProcessActivityRulebook 146840 146840380925372259333925555259402rulebook0parameter4rv8 1468450925421259342 1468480925434259352 14685209254492593517 1468560925468259362 1468690925517259372 1468720925530259382 1468760925546259392CarryOutActivity 146878 146878390925708259473925813259522A0o4rv8 1468830925734259482 1468930925756259492 1469040925781259502 1469140925801259512BeginActivity 146917 1469173280925948259593926380259692A0o4x8 1469220925970259602 14692909260142596046 1469400926055259612 1469900926103259622 1470550926146259632 1470620926165259642 1470710926190259652 14712009262232596535 14712509262352596547 1471310926261259662 1471880926325259672 14723709263562596733 1472420926369259682ForActivity 147245 1472451790926513259763926720259812A0o4x8 1472500926533259772 14729909265662597735 14730409265782597747 1473100926604259782 1473670926665259792 14741609266962597933 1474210926709259802EndActivity 147424 1474242870926853259883927254259982A0o4rv8x12 1474290926876259892 1475020926952259903 14755109269852599036 14755609269972599048 1475620927024259913 1476190927089259923 14766809271202599234 1476730927134259933 14768109271512599320 1476880927171259943 1476970927198259953 1477000927213259972AbandonActivity 147711 1477111140927391260053927602260122A0o4 1477160927413260062 1477870927489260073 14779509275062600720 1478020927526260083 1478110927553260093 1478140927565260112ResourceUsageFlags 51982661false0927741260191927777260209DisplayFigure 147825 1478251300927911260273928099260312resource_ID0one_time4 1478300927948260282 14788309280012602855 1478860928010260292 1479310928051260302 14793709280622603013 14794609280872603038 1479520928098260311PlaySound 147955 1479551250928239260383928469260432resource_ID0one_time4 1479600928272260392 14796409282942603924 1479670928336260402 14802009283892604055 1480230928398260412 1480680928439260422 1480770928468260431AUXF_MAGIC 0092876226057109287762605724AUXF_MAGIC_VALUE 16339092882426058109288482605834AUXF_STATUS 1092891026059109289252605925AUXF_STATUS_IS_CLOSED 1092896126060119289862606036AUXF_STATUS_IS_OPEN_FOR_READ 2092904326061119290752606143AUXF_STATUS_IS_OPEN_FOR_WRITE 3092908726062119291202606244AUXF_STATUS_IS_OPEN_FOR_APPEND 4092913226063119291662606345AUXF_BINARY 2092917726064109291922606425AUXF_STREAM 3092925626065109292712606525AUXF_FILENAME 4092933226066109293492606627AUXF_IFID_OF_OWNER 5092939626067109294182606732NO_EXTERNAL_FILES 0092967726075109296962607529TableOfExternalFiles 51983284false09296982607619297322607635FileIO_Error 148080 1480801420929865260843930220260952extf0err_text4struc8 1480850929901260852 1480960929951260863 1481200930029260883 1481660930068260893 1482110930175260932 1482200930209260942FileIO_Exists 148222 1482221550930512261093931003261202extf0fref4struc8rv12usage16 1482270930554261102 1482360930609261112 1482820930647261122 1482990930718261132 14831209307432611327 1483180930779261147 1483230930808261152 1483550930922261172 1483650930963261182 1483740930991261192FileIO_Ready 148377 1483772040931138261273931816261452extf0struc4fref8usage12str16ch20 1483820931183261282 1483910931238261292 1484370931276261302 1484540931347261312 14846709313722613127 1484730931408261327 1484780931437261332 1485100931551261352 1485220931603261363 1485310931632261373 1485330931644261392 1485450931697261402 1485550931729261412 1485640931756261422 1485730931784261432 1485780931808261442FileIO_MarkReady 148581 1485812930931821261473932849261702extf0readiness4struc8fref12str16ch20usage24 1485860931880261482 1485970931928261493 1486120931984261502 1486580932022261512 1486750932093261522 14868809321182615227 1486940932154261537 1486990932183261542 1487310932297261562 1487430932349261573 1487520932378261583 1487670932446261602 1487820932500261613 1487910932529261623 1488060932595261642 1488180932653261652 1488280932703261662 14883209327182616617 14883909327332616632 1488430932744261672 1488530932794261682 1488620932821261692 1488710932848261701FileIO_Open 148874 1488748520932984261773935823262612extf0write_flag4append_flag8struc12fref16str20mode24ix28ch32not_this_ifid36owner40force_header44usage48 1488790933092261792 1488900933140261803 1489050933196261812 1489510933234261822 1489680933305261832 1489830933357261843 1489980933422261852 14901109334472618527 1490170933483261867 1490220933512261872 1490540933626261892 1490580933646261903 1490620933668261914 1490660933700261924 1490780933752261935 1490850933784261958 1490920933819261973 1490960933843261983 1491080933896261994 1491170933926262004 1491320934006262032 1491440934050262042 1491530934078262052 14915709340922620516 1491720934155262062 1491840934183262072 1491890934203262083 1491930934223262094 1492080934287262114 1492200934342262123 1492290934373262133 1492380934424262144 1492440934444262159 14924809344502621515 14926009344772621542 14931409344712621536 1493230934509262164 1493570934573262193 1493690934627262203 1493790934653262213 14939109346772622127 1493950934695262223 1494010934713262234 1494160934787262243 1494260934813262253 14943209348302622520 1494360934848262263 1494460934874262273 14945209348912622720 1494560934909262283 1494660934935262293 14947209349522622920 1494760934970262303 1494870935008262313 1494910935018262323 14950009350432623228 1495040935053262333 14951009350842623411 1495240935112262355 1495340935140262365 14954009351562623621 1495440935176262375 14955909351972623726 1495630935223262385 14956909352382623820 14957209351002623427 1495810935253262404 1495850935287262415 1495950935315262425 14960109353322624222 1496040935359262453 1496100935381262464 1496200935408262474 14963209354282624724 1496380935441262493 1496420935465262504 1496540935513262514 1496630935542262524 1496780935630262562 1496900935670262582 1497020935716262592 1497110935743262602FileIO_Close 149726 1497262190935959262683936657262852extf0struc4 1497310935986262692 1497420936034262703 1497570936090262712 1498030936128262722 1498340936260262763 1498490936331262772 1498740936431262803 1498930936498262813 1499120936568262832 1499300936611262842 1499420936656262851FileIO_GetC 149945 1499451030936796262923937037262972extf0struc4 1499500936822262932 14996109368682629348 1499640936880262942 1500100936918262952 15002509369752629559 1500280936987262962FileIO_PutC 150048 1500481410937176263043937607263142extf0char4struc8 1500530937207263052 15006409372532630548 1500670937266263063 1500820937326263072 1501280937364263082 1501530937462263113 1501680937551263132FileIO_PrintLine 150189 1501891280937743263213938051263312extf0ch4struc8 1501940937777263222 1502050937825263233 1502200937885263242 1502660937936263263 1502760937962263273 1502810937986263283 15029309380082632825 15029909380192632836 1503020938030263293 1503140938050263311FileIO_PrintContents 150317 1503171430938191263383938585263482extf0tab4struc8 1503220938230263392 1503330938278263403 1503480938336263412 1503940938374263422 1504070938401263433 1504220938478263442 1504330938522263452 1504480938556263462 1504570938577263472FileIO_PutContents 150460 1504601830938721263553939327263712extf0text4append_flag8struc12str16ch20oldstream24 1504650938788263562 1504760938836263573 1504910938894263582 1505370938932263592 1505500938959263603 1505650939035263612 1505730939074263622 1505860939119263632 1505890939142263642 15059209391562636416 1505950939172263652 1506040939196263662 1506130939216263672 1506220939237263682 15062609392522636817 1506350939288263692 15063809393032636917 1506410939318263702FileIO_PutTable 150643 1506431760939471263783940018263912extf0tab4rv8struc12oldstream16 1506480939518263792 1506590939566263803 1506740939632263812 1507200939670263822 1507330939697263833 1507480939776263842 1507560939815263852 1507680939858263862 1507780939881263872 1507870939902263882 15079109399172638817 1508000939953263892 15080409399612638910 1508160940010263902FileIO_GetTable 150819 1508191380940023263933940412264032extf0tab4struc8 1508240940057263942 1508350940105263953 1508500940172263962 1508960940210263972 1509090940237263983 1509240940316263992 1509350940360264002 1509450940383264012 1509540940404264022MAX_MSTACK_FRAME 8094138326437109414072643734MSTACK_CAPACITY 20094141826438109414382643830MSTACK_SIZE 160094144926439109414952643956MStack 5198406404false09414982644119415262644129MStack_Top 49772409415282644219415492644222Mstack_Create_Frame 150957 1509572070941717264493942128264642creator0id4extent8 1509620941757264502 1509650941784264512 1509900941825264522 1509930941851264532 1510050941909264543 1510160941958264553 1510230941980264563 1510250941992264582 1510330942007264592 1510850942034264602 1510930942049264612 1511010942084264622 1511610942120264632Mstack_Destroy_Frame 151164 151164530942267264713942495264772creator0id4pos8 1511690942305264722 1511790942335264732 1511820942382264742 1511890942450264752 15119309424632647515 1512140942487264762MStack_Frame_Extent 49772809426292648419426592648431Mstack_Seek_Frame 151217 1512172160942664264863942975264962id0pos4 1512220942691264872 1512270942710264882 1512860942755264893 1513350942793264903 1513420942828264913 1513500942880264923 15141609429082649231 1514270942926264942 1514310942952264952Mstack_Backtrace 151433 1514333500943110265033943553265152pos0k4 1514380943135265042 1514580943194265052 1514630943213265062 1515160943243265073 1515650943281265083 1515720943316265093 1515800943368265103 1516780943472265128 15168109434772651213 15168809435052651241 15176109435002651236 1517700943538265133 1517800943552265151MstVO 151783 1517831050943698265223944048265352id0off4pos8 1517880943717265232 1517980943747265242 1518020943765265253 1518320943885265283 1518340943897265302 1518460943946265313 1518790944019265323 1518810944031265342MstVON 151888 151888750944205265423944471265522id0off4pos8 1518930944225265432 1519030944255265442 1519070944273265453 1519090944320265472 1519210944369265483 1519540944442265493 1519560944454265512rulebook_var_creators 52048014524false094463726560194540926560773RBSTVC_9 151963 151963800945422265624945616265722pos0state4 1519680945510265665 1519740945536265679 15202509455602656733 1520340945588265699 1520400945605265715RBSTVC_11 152043 1520433720945621265734946062265932pos0state4 1520480945710265775 1520550945736265789 15210209457582657831 1521080945773265799 15215509457952657931 1521610945810265809 15220809458282658027 1522140945843265819 15226109458612658127 1522670945876265829 15231409458942658227 1523200945909265839 15236709459312658331 1523760945959265859 1523820945974265869 1523880945989265879 1523940946004265889 1524000946019265899 1524060946034265909 1524120946051265925MStack_CreateRBVars 152415 152415730946068265963946275266082rb0cr4 1524200946180266031 1524680946223266062 15247209462362660615 1524750946245266072 1524850946274266081MStack_DestroyRBVars 152488 152488730946280266103946489266222rb0cr4 1524930946393266171 1525410946436266202 15254509464492662015 1525480946458266212 1525580946488266221activity_var_creators 5219321404false094663126629194673226629102MStack_CreateAVVars 152561 152561760946738266323946860266362av0cr4 1525660946766266332 1526120946800266342 15261609468132663415 1526190946822266352 1526340946859266361MStack_DestroyAVVars 152637 152637760946865266383946989266422av0cr4 1526420946894266392 1526880946928266402 15269209469412664015 1526950946950266412 1527100946988266421Perform_Undo 152713 152713880947131266493947503266552 1527160947220266512 15272109472572665139 15273009472832665165 15273309472932665175 1527360947304266522 15274009473262665224 15274909473522665250 15275209473622665260 1527550947373266532 15276109473952665324 15277009474212665350 15277309474312665360 1527760947442266542 15278609474642665424 15279509474902665450 1527980947502266551ANNOUNCE_SCORE_R 152801 152801230947652266623947817266672 1528040947671266632 15280909477272666428 15281809477512666452 1528210947816266671SWITCH_SCORE_NOTIFY_ON_R 152824 152824180947980266743948116266782 1528270948007266752 15283209480632667628 1528390948115266781REP_SWITCH_NOTIFY_ON_R 152842 152842110948298266853948428266882 1528450948323266862 1528500948427266881SWITCH_SCORE_NOTIFY_OFF_R 152853 152853180948592266953948729266992 1528560948620266962 15286109486762669728 1528680948728266991REP_SWITCH_NOTIFY_OFF_R 152871 152871110948912267063949044267092 1528740948938267072 1528790949043267091PREFER_SOMETIMES_ABBREVIATED_R 152882 152882160949225267163949301267192 1528850949258267172 1528900949288267182 1528950949300267191REP_PREFER_SOMETIMES_ABBR_R 152898 152898320949506267263949639267292 1529010949536267272 1529060949566267282 15291509495932672829 15292409496282672864 1529270949638267291PREFER_UNABBREVIATED_R 152930 152930160949820267363949888267392 1529330949845267372 1529380949875267382 1529430949887267391REP_PREFER_UNABBREVIATED_R 152946 152946320950087267463950218267492 1529490950116267472 1529540950146267482 15296309501732674829 15297209502072674863 1529750950217267491PREFER_ABBREVIATED_R 152978 152978160950399267563950465267592 1529810950422267572 1529860950452267582 1529910950464267591REP_PREFER_ABBREVIATED_R 152994 152994320950665267663950792267692 1529970950692267672 1530020950722267682 15301109507492676829 15302009507812676861 1530230950791267691ANNOUNCE_PRONOUN_MEANINGS_R 153026 1530263750950965267763951748268032x0y4c8d12 1530310951003267772 1530360951033267782 1530450951070267802 1530570951101267812 15306609511242678125 1530720951131267832 15307609511432678314 15308509511782678349 1530880951194267857 15309809512362678549 15310409512092678522 1531170951249267863 1531840951300267873 1532420951332267883 15324809513472678818 15326009513912678910 15326909514262678945 1532780951445267903 1532840951452267913 15329409514652679116 1533000951479267923 1533100951541267944 1533230951579267972 1533320951606267983 15335609516422679839 1533650951679267993 15336909516912679915 1533760951711268003 15338509517262680018 1533890951742268022ClearParagraphing 153401 153401140952050268173952098268192r0 1534060952072268182 15340909520842681814 1534120952097268191DivideParagraphPoint 153415 153415660952103268213952610268322 1534180952196268232 1534220952212268243 15342509522222682413 15342809522342682425 1534340952272268253 1534380952295268263 15344609523262682634 1534520952365268273 15346009524042682742 1534660952523268302 1534720952566268312 1534780952609268321AdjustParagraphPoint 153481 153481160952615268343952791268372 1534840952734268362 15348809527522683620 1534940952790268371ParaContent 153497 153497240952796268393952910268442 1535000952810268402 1535080952850268413 1535140952894268423 1535180952909268441GoingLookBreak 153521 153521260952915268463953002268492 1535240952932268472 15353209529672684737 1535350952978268482 1535440953001268491CommandClarificationBreak 153547 153547180953007268513953070268542 1535500953035268522 1535530953046268532 1535620953069268541RunParagraphOn 153565 153565210953075268563953259268612 1535680953162268582 1535710953175268592 1535770953213268602 1535830953258268611SpecialLookSpacingBreak 153586 153586150953264268633953411268672 1535890953360268652 1535920953373268662 1535980953410268671EnsureBreakBeforePrompt 153601 153601380953416268693953572268742 1536040953442268702 1536240953537268723 1536270953548268732 1536360953571268741PrintSingleParagraph 153639 153639390953577268763953727268822matter0 1536440953607268772 1536480953620268782 1536540953664268792 1536630953686268802 1536720953713268812 1536750953726268821STextSubstitution 153678 153678180953865268893953914268912 1536810953885268902 15368709539022689019 1536930953913268911PrintPrompt 153696 153696710954048268983954220269062i0 1537010954064268992 1537080954087269002 1537150954100269012 1537250954114269022 1537320954142269032 1537480954177269042 1537550954196269052 1537640954219269061pending_boxed_quotation 49773209543622691319543922691331DisplayBoxedQuotation 153767 153767130954444269153954500269172Q0 1537720954470269162 1537770954499269171ClearBoxedText 153780 1537801100954505269193954904269342i0 1537850954524269202 1537900954562269218 15379309545672692113 1538090954609269224 1538280954680269235 1538320954713269245 15383509546012692147 1538440954728269263 1538600954791269283 1538690954816269293 1538740954845269303 1538830954871269323 1538870954903269341NotifyTheScore 153890 15389080955050269413955337269532d0 1538950955336269531DrawStatusLine 153898 1538981840955612269673956258269862width0posb4 1539030955640269682 15390609556542696816 1539090955670269692 1539180955716269702 15392709557402697026 1539370955775269712 1539420955802269723 15395009558282697229 1539560955847269733 1539790955863269743 1539880955888269753 1540000955949269764 1540100955985269774 1540190956024269784 1540290956063269794 1540380956106269813 15404809561392698136 1540550956160269832 1540640956184269842 1540730956228269852 15407609562432698517 1540790956257269861T_SL_Score_Moves 52207284false09564132699419564832699471SL_Score_Moves 154082 154082130956488269963956596269992 1540850956505269972 15408909565262699723 1540920956595269991T_SL_Location 52208084false09565992700119566632700165SL_Location 154095 1540951040956668270033957111270152even_before0 1541000956694270042 15410809567432700451 1541110956752270052 1541200956781270063 1541290956830270073 1541410956892270085 1541500956926270093 1541620956983270113 1541690957009270123 15417509570452701239 1541870957075270138 1541960957110270151DARKNESS_NAME_INTERNAL_R 154199 154199609571162701739571432701730 15420209571422701729Banner 154205 1542052070957277270243957938270492 1542080957288270254 1542170957332270264 1542300957391270276 1542390957417270283 1542480957439270293 1542560957465270303 1542590957477270313 1542710957525270333 15427709575392703317 1542890957593270353 1542920957605270363 1542990957630270373 1543230957695270383 15432909577102703818 1543610957723270393 1543850957794270413 1543910957847270443 1543970957878270463 1544000957898270485 1544090957937270491DecimalNumber 154412 1544121109580862705639581172705634num0 15441709581052705622 15442009581162705633EnglishNumber 154423 1544231709582652706339583022706340n0 15442809582822706320 15443709583012706339PrintI6Text 154440 154440630958440270703958580270752x0 1544450958456270712 15446109584782707124 1544700958497270722 15448609585202707225 1544920958535270732 1545000958572270742I7_String 154503 1545031709585842707639586142707633x0 15450809585972707616 15451709586132707632PrintOrRun 154520 154520790958804270833959178271002obj0prop4no_break8pv12st16routine_return_value20 1545250958863270842 15452809588752708414 1545320958888270852 1545360958907270863 15454509589262708622 1545520958967270883 1545710959017270902 1545740959030270912 1545780959060270923 1545820959074270933 1545860959102270944 1545890959115270954 1545960959148270992StorageForShortName 5220882541false09593222710719593582710737CPrintOrRun 154599 1545992790959363271093959985271262obj0prop4v8length12i16 1546040959401271105 1546400959461271119 1546590959527271136 1546730959565271149 15471209596232711513 15473909596912711614 1547530959734271195 1547610959773271215 15478509598662712210 15478909598782712222 15479909599022712246 15485609598972712241 1548650959943271235 15487109599592712321 1548750959976271255Cap 154878 154878330959990271283960073271312str0nocaps4 1548830960010271295 15488709600222712917 15489909600512713010 1549080960072271311PSN__ 154911 1549111370960215271383960556271472o0 1549160960228271395 15492009602422713919 15492909602722713949 1549320960285271405 15495309603212714113 15496809603482714140 15498009603672714213 15500109604042714250 15500909604232714313 15502409604642714354 1550270960481271455 1550360960511271465 1550450960555271471caps_mode 49773609607092715419607332715425STANDARD_NAME_PRINTING_R 155048 1550482830960738271563961722271832obj0 1550530960769271572 1550570960796271585 1550610960817271596 15507009608472715936 1550730960865271615 15509409609032716213 15510909609322716242 15512109609522716313 15514209609912716352 15515009610112716413 15516509610542716456 1551680961072271665 1551740961102271679 15518609611392716746 15519809611882716814 1552070961232271699 1552100961367271745 15524309614662717552 1552460961478271765 1552810961579271786 1552850961603271796 1552880961621271815 15531609616892718173 1553190961701271825 1553280961721271831PRINT_PROTAGONIST_INTERNAL_R 155331 155331609618632719039618942719034 15533409618932719033short_name_case 49774009620352719719620572719723PrefaceByArticle 155337 1553373760962062271993964223272562obj0acode4pluralise8capitalise12i16artform20findout24artval28 1553420962141272005 1553550962178272019 1553840962250272029 15538809622782720313 15540609623282720513 1554210962364272069 15542509623792720624 1554280962395272079 15543709624142720728 1554400962433272105 1554500962462272115 1554540962487272129 15547209625192721241 1554780962540272145 1555240962577272165 1555460962737272205 15557409627812722049 1555780963807272445 1555820963830272459 15558609638572724613 15561609639572724813 1556430964026272499 1556640964119272535 1556940964176272545 15569809641912725420 1557010964203272555 1557100964222272561IndefArt 155713 1557131780964367272633964808272722obj0i4 1557180964384272642 15572209644002726418 15573109644302726448 1557340964443272655 15573909644592726521 1557440964482272665 15577809645042726627 15578309645232726646 15579209645422726665 15579709645582726681 1558000964572272675 1558380964667272689 15585009646992726841 15586509647232726865 1558700964747272699 1558730964765272715 15588309647912727131 1558880964807272721CIndefArt 155891 1558912020964813272743965335272902obj0i4 1558960964831272752 15590009648472727518 15590909648772727548 1559120964890272765 15591709649062727621 1559220964929272775 1559560964956272786 1559610964977272793 1559660965000272806 1559750965024272816 1559800965045272826 1559840965069272836 1559870965087272855 1560250965182272869 15604309652202728647 15605809652442728671 1560630965268272879 1560660965286272895 15608509653182728937 1560900965334272901DefArt 156093 1560931040965340272923965577272992obj0i4 1560980965358272935 15610309653742729321 1561070965398272945 1561570965454272959 15616209654732729528 15617109654922729547 1561760965516272969 1561790965534272985 15618909655602729831 1561940965576272991CDefArt 156197 1561971900965582273013966024273162obj0i4 1562020965601273025 15620709656172730221 1562110965641273035 1562670965711273046 1562720965735273056 1562770965758273066 1562860965782273076 1562910965803273086 1562950965827273096 1562980965845273115 1563480965901273129 15635309659202731228 15636209659392731247 1563670965963273139 1563700965981273155 15637909660072731531 1563840966023273161PrintShortName 156387 156387320966029273183966123273212obj0i4 1563920966055273195 15639709660712731921 1564020966094273205 15641109661062732017 1564160966122273211I7_SOO_PAR 156419 1564192409662612732839663392732881oldval0count4 15642409662862732828 15643009663022732844 15643309663162732858I7_SOO_RAN 156443 1564433909663432732939664632733064oldval0count4v8 15644809663702732930 15645409663862732946 1564570966401273302 15646109664132733014 15646709664332733034 15647909664522733053I7_SOO_STI 156482 1564822409664672733139665562733192oldval0count4v8 15648709664942733130 15649109665062733142 15649409665212733157I7_SOO_CYC 156506 1565062409665602733239666432733286oldval0count4 15651109665852733228 15651709665952733238 15652309666152733258 15652709666272733270I7_SOO_STOP 156530 1565302409666472733339667352733391oldval0count4 15653509666732733329 15654109666832733339 15654709667032733359 15655109667192733375I7_SOO_TAP 156554 1565548109667392733439669162733591oldval0count4tn8rn12c16 15655909667722733436 15656509667882733452 15656809668022733466 1565820966827273352 15659109668492733524 15659509668532733528 15660109668692733544 15660709668822733557 15661209668932733568 15662309668622733537 15663209669152733590I7_SOO_TRAN 156635 1566357109669202733639670402733759oldval0count4 15664009669462733629 15664609669642733647 1566530966983273372I7_SOO_TPAR 156706 1567067109670442733839671642733959oldval0count4 15671109670702733829 15671709670882733847 1567240967107273392I7_SOO_SHUF 522342321false09671672734119671882734122I7_SOO_SHU 156777 1567776470967193273433968123273672oldval0count4sd8ct12v16i20j24s28ssd32scope36cc40base44 1567820967251273442 1567880967268273452 15681909672852734519 15685009673072734541 15688109673252734559 1569120967344273462 15691809673602734618 1569300967395273472 15693609674112734718 1569440967483273503 1569500967501273513 1569840967572273533 15698809675872735318 15699709676072735338 1570000967622273548 15700309676262735412 15700909676392735425 15705409676342735420 1570630967661273553 1570670967678273568 15707009676822735612 1570810967702273574 15712009677242735726 15713109677442735746 15713609677542735756 1571400967765273584 15718509677852735824 15727709678182735857 15732209676922735622 1573320967907273613 1573830967934273623 1573890967940273629 15739509679592736228 15739809679672736236 1574010968086273662RR_NAME 5096827527374109682902737425RR_PERMISSIONS 6096830127375109683182737527RR_STORAGE 7096832927376109683432737624RR_KIND 8096835427377109683652737721RR_HANDLER 9096837627378109683902737824RR_DESCRIPTION 10096840127379109684192737928VALENCY_MASK 61440096857327386109686472738684RELATION_TY_EquivalenceAdjective 157424 1574241670968651273873969301274032rel0set4perms8state12handler16 1574290968715273882 1574400968754273892 15744909687842738932 1574530968799273902 15745809688122739015 1574610968827273912 1574690968862273923 1574760968898273933 15748709689312739336 1574960968967273952 1575040969002273963 1575110969038273973 15752209690662739731 1575310969102273992 1575430969140274002 1575540969177274012 1575760969242274023 1575880969300274031RELATION_TY_SymmetricAdjective 157591 1575911330969306274053969802274152rel0set4perms8state12handler16 1575960969368274062 1576070969407274072 15761809694352740730 1576220969450274082 15762709694632740815 1576300969478274092 15763809695092740933 1576470969542274102 15765509695732741033 1576640969606274112 1576760969644274122 1576870969681274132 1577090969746274143 1577210969801274151RELATION_TY_OToOAdjective 157724 1577241960969807274173970609274342rel0set4perms8state12handler16i20 1577290969866274182 1577400969905274192 15775209699792741976 1577560969994274202 15776109700072742015 1577640970022274212 1577720970057274223 15778109700892742235 1577880970122274233 15779709701542742335 1578040970187274243 15781309702172742433 1578200970255274262 1578280970290274273 15783709703172742730 1578440970350274283 15785309703772742830 1578600970412274302 1578720970450274312 1578830970487274322 1579050970552274333 1579170970608274341RELATION_TY_OToVAdjective 157920 1579202160970614274363971461274542rel0set4perms8state12handler16 1579250970671274372 1579360970710274382 15794809707702743862 1579520970785274392 15795709707982743915 1579600970813274402 1579680970848274413 15797709708802744135 1579840970913274423 15799309709402744230 1580000970973274433 15801109710012744331 1580200971035274443 15802909710652744433 1580360971103274462 1580440971138274473 15805309711652744730 1580600971198274483 15806909712252744830 1580760971260274502 1580880971298274512 1580990971335274522 1581210971400274533 1581330971460274541RELATION_TY_VToOAdjective 158136 1581362160971466274563972313274742rel0set4perms8state12handler16 1581410971523274572 1581520971562274582 15816409716222745862 1581680971637274592 15817309716502745915 1581760971665274602 1581840971700274613 15819309717272746130 1582000971760274623 15820909717922746235 1582160971825274633 15822709718532746331 1582360971887274643 15824509719172746433 1582520971955274662 1582600971990274673 15826909720172746730 1582760972050274683 15828509720772746830 1582920972112274702 1583040972150274712 1583150972187274722 1583370972252274733 1583490972312274741RELATION_TY_VToVAdjective 158352 1583521770972318274763973034274922rel0set4perms8state12handler16 1583570972375274772 1583680972414274782 15837709724622747850 1583810972477274792 15838609724902747915 1583890972505274802 1583970972540274813 15840609725672748130 1584130972600274823 15842209726272748230 1584290972662274842 1584370972697274853 15844609727292748535 1584530972762274863 15846209727942748635 1584690972829274882 1584810972867274892 1584920972904274902 1585140972969274913 1585260973033274921Relation_Now1to1 158529 158529940973183274993973415275032obj10relation_property4obj28ol12 1585340973251275002 15853809732612750012 15854509732612750012 1585580973306275013 15857309733402750137 1585990973373275022 15860309733832750212 1586200973414275031Relation_NowN1toV 158623 158623430973420275053973570275072obj10relation_property4obj28 1586280973487275062 15864709735352750650 1586630973569275071Relation_Now1to1V 158666 1586661010973575275093973886275172obj10obj24KOV8relation_property12ol16N20 1586710973650275102 1586750973664275113 1586850973695275128 15868909737012751214 1586950973717275134 1587120973772275145 15873109737082751221 1587400973823275162 15874409738332751612 1587640973885275171Relation_NowN1toVV 158767 158767480973891275193974080275222obj10obj24KOV8relation_property12 1587720973963275202 1587930974030275213 1588120974079275221Relation_NowS1to1 158815 1588151830974239275293974677275362obj10relation_property4obj28 1588200974315275302 1588810974447275323 15889409744772753233 1589210974529275333 15893409745592753333 1589610974611275343 15897809746422753434 1589950974676275361Relation_NowSN1to1 158998 1589981130974682275383974990275442obj10relation_property4obj28 1590030974760275392 1590760974930275423 15909209749582754231 1591080974989275441Relation_NowS1to1V 159111 1591111340974995275463975447275532obj10obj24KOV8relation_property12 1591160975076275472 1591310975123275483 1591590975208275492 1591740975256275503 1592020975341275512 1592220975394275522 1592420975446275531Relation_NowSN1to1V 159245 159245630975452275553975696275602obj10obj24KOV8relation_property12 1592500975535275562 1592670975592275573 1592860975643275583 1593050975695275601VTOVS_LEFT_INDEX_PROP 0097586027567109758852756735VTOVS_RIGHT_INDEX_PROP 1097589627568109759222756836VTOVS_LEFT_DOMAIN_SIZE 2097593327569109759592756936VTOVS_RIGHT_DOMAIN_SIZE 3097597027570109759972757037VTOVS_LEFT_PRINTING_ROUTINE 4097600827571109760392757141VTOVS_RIGHT_PRINTING_ROUTINE 5097605027572109760822757242VTOVS_CACHE_BROKEN 6097609327573109761152757332VTOVS_CACHE 7097612627574109761412757425Relation_NowVtoV 159308 1593083330976146275763976991275942obj10relation4obj28sym12pr16pr220i124i228vtov_structure32 1593130976216275772 15932309762452757731 1593420976295275782 1593530976344275792 1593630976390275802 1593740976438275812 1593860976510275822 1593900976522275833 15941909765712758352 1594330976592275848 1594500976651275859 1594560976665275862 1594600976678275873 15948909767282758753 1595030976750275888 1595200976809275899 1595260976823275902 1595450976881275912 1596030976923275922 1596130976940275932 1596380976990275941Relation_NowNVtoV 159641 1596413500976996275963977873276142obj10relation4obj28sym12pr16pr220i124i228vtov_structure32 1596460977067275972 15965609770962759731 1596750977147275982 1596860977196275992 1596960977242276002 1597070977290276012 1597190977362276022 1597230977374276033 15975209774232760352 1597660977444276048 1597830977503276059 1597890977517276062 1597930977530276073 15982209775802760753 1598360977602276088 1598530977661276099 1598590977675276102 1598780977733276112 1599360977775276122 1599460977792276132 15996309778242761334 1599880977872276141Relation_TestVtoV 159991 1599913050977878276163978648276332obj10relation4obj28sym12pr16pr220i124i228vtov_structure32 1599960977949276172 1600070977998276182 1600170978044276192 1600280978092276202 16003809781202762030 16004209781322762042 16004609781452762055 1600500978160276212 1600540978172276223 16008309782212762252 16009709782442762310 16010909782882762354 1601140978306276249 1601200978320276252 1601240978333276263 16015309783832762653 16016709784072762710 16017909784512762754 1601840978469276289 1601900978483276292 1602090978541276302 1602670978583276312 1602770978600276322 16029409786392763241Relation_NowEquiv 160296 1602961290978798276403979151276462obj10relation_property4obj28big12little16 1603010978857276412 16031209788872764132 1603230978921276422 16032909789402764221 1603320978949276432 16033809789692764322 16034909790022764355 1603600979035276442 1603670979035276442 1603800979082276453 16039509791172764538 1604220979150276461Relation_NowNEquiv 160425 1604251210979156276483979460276562obj10relation_property4obj28old12new16 1604300979213276492 16044109792432764932 1604520979274276502 16045809792902765018 1604610979299276512 1604640979309276522 1604710979309276522 1604840979356276533 16049909793902765337 1605200979421276542 1605260979429276552 1605430979459276561Relation_NowEquivV 160546 1605461410979465276583979937276702obj10obj24KOV8relation_property12n16big20little24i28 1605510979533276592 1605640979581276602 1605770979632276612 16058309796512766121 1605860979660276622 1605920979682276633 1606050979734276643 1606180979785276662 1606280979815276677 16063209798202766712 1606380979833276683 1606550979885276694 16067509798262766718 1606840979936276701Relation_NowNEquivV 160687 1606871310979942276723980344276832obj10obj24KOV8relation_property12n16old20new24i28 1606920980008276732 1607050980057276742 1607180980105276752 16072409801212767518 1607270980130276762 1607300980140276772 1607400980170276787 16074409801752767812 1607500980188276793 1607670980239276804 16078009801812767818 1607890980284276812 1607950980292276822 1608150980343276831Relation_ShowVtoV 160818 1608187170980496276903982325277442relation0sym4x8obj112obj216pr20pr224proutine128proutine232vtov_structure36 1608230980583276912 1608340980632276922 1608440980678276932 1608550980726276942 1608660980785276952 1608770980847276972 1608870980866276983 1608940980866276983 1609080980900276995 1609150980900276995 1609290980937277005 16093909809612770029 1609420980975277015 1609570981027277026 16096109810412770220 16098509810972770276 1609890981109277036 1610040981138277046 16100809811472770415 16101709811692770437 1610230981191277056 1610600981228277083 1610630981240277102 1610730981264277113 1610800981264277113 16109409813032771210 16109809813102771217 1611130981371277135 1611280981423277146 16113209814372771420 16115609814932771476 1611600981505277156 1611810981545277166 1611940981574277176 16120009813572771264 1612200981599277203 1612230981611277222 1612330981642277238 16123709816492772315 1612530981686277245 1612600981686277245 1612730981723277255 1612880981775277266 16129209817892772620 16131609818452772676 1613200981857277276 1613260981874277286 1613390981903277296 16137009816742772340 1613800981951277323 1613830981968277347 16138709819752773414 16140309820172773510 16140709820242773517 1614220982082277364 1614370982133277375 16144109821472773719 16146509822032773775 1614690982214277385 1614750982230277395 1614880982258277405 1614940982279277415 1615070982307277425 16151309820712773564 16152209820002773439 1615320982324277441Relation_ShowOtoO 161535 1615353400982469277513983427277782relation0sym4x8relation_property12t16N20obj124obj228 1615400982536277522 1615510982588277532 1615700982658277542 1615800982681277552 1615870982705277563 1615940982705277563 1616080982755277574 1616190982789277584 16162909828132775828 1616320982826277594 16163609828412775919 1616390982854277604 16164309828682776018 16166709829242776074 1616710982934277614 1616860982961277624 16169009829702776213 16169909829912776234 1617050983011277634 1617350983055277668 16173909830632776616 1617460983085277674 1617590983134277684 16176909831582776828 1617720983171277694 16177609831862776919 1617790983199277704 16178309832132777018 16180709832692777074 1618110983279277714 1618170983294277724 1618270983326277734 16183109833352777313 16184009833562777334 1618460983376277744 1618560983408277754 16186209830722776625 1618720983426277781Relation_RShowOtoO 161875 1618756490983580277853985353278402relation0sym4x8relation_property12obj116obj220t124t228N132N236 1618800983656277862 1618910983708277872 1619100983779277882 1619300983851277892 1619370983876277903 1619440983902277914 1619510983926277925 1619580983926277925 1619710983978277936 16198609840142779342 1619890984029277946 16199309840432779420 16201709840992779476 1620210984111277956 1620360984140277966 1620420984162277976 1620820984210278014 1620920984242278029 16209609842502780217 1621030984274278035 1621100984274278035 1621230984326278046 16213809843622780442 1621410984377278056 16214509843912780520 16216909844472780576 1621730984459278066 16217909844712780618 1621890984506278076 1621950984528278086 16222009842602780227 1622340984578278133 1622440984604278143 1622510984630278154 16225809846592781610 16226209846672781618 1622680984692278176 16228509847442781758 1622880984759278186 16229209847732781820 16231609848292781876 1623200984841278196 1623350984870278206 1623410984892278216 1623510984927278226 16235709846772781628 1623810984963278264 1623910984995278279 16239509850032782717 16240209850322782810 16240609850402782818 1624120985065278296 16242909851172782958 1624320985132278306 16243609851462783020 16246009852022783076 1624640985214278316 1624700985231278326 1624800985266278336 1624860985288278346 1624960985323278356 16250209850502782828 16251109850132782727 1625210985352278401RSE_Flip 162524 162524450985498278473985633278502KOV0v4relation_property8x12 1625290985535278482 16254209855772784844 1625460985586278492 1625660985632278501RSE_Set 162569 162569230985637278513985733278532KOV0v4relation_property8 1625740985671278522 16259009857242785255Relation_ShowEquiv 162592 16259211780985737278543988496279362relation0relation_property4obj18obj212v16c20d24somegroups28t32N36x40 1625970985818278552 1626210985875278562 1626320985927278572 1626510985997278582 1626610986020278592 1626680986044278603 1626750986044278603 1626880986092278614 1627240986146278623 1627310986146278623 1627450986196278634 1627600986234278645 16277109862622786433 1627740986273278655 1627810986273278655 16281509863052786537 1628390986331278665 1628460986331278665 1628590986383278676 1628740986424278687 1628880986451278697 1629050986486278707 1629210986508278735 1629270986524278746 1629310986548278756 1629370986567278766 1629460986611278776 16295509866352787812 1629830986674278813 1629900986674278813 16302409867062788135 1630480986730278823 16305109867372788210 16305809867372788210 1630710986785278834 16308509868192788338 16309109868242788343 1631150986849278843 16311909868612788415 1631220986871278853 16312609868872788519 16313509869082788540 1631410986922278863 16314709869352788616 16315609869742788655 1631650986996278878 1631680987007278883 16317409870192788815 1631800987033278893 1631860987065278903 16319209870762789014 1631980987089278913 1632040987102278923 1632110987102278923 1632240987150278934 1632380987186278945 1632780987314278978 16328209873242789718 1632880987346278984 16330009873352789729 1633090987391278998 16331309874012789918 1633200987425279004 1633360987472279015 1633490987519279025 16335209875352790310 16335609875452790320 1633620987569279046 1633790987623279057 16338509875562790331 1633940987632279065 1634010987648279076 1634050987672279086 1634110987690279096 16341409877072791011 16341809877172791021 1634240987744279117 1634410987801279128 16344709878122791219 1634570987848279138 16346709878612791321 16347309878722791332 1634790987890279148 1634910987935279158 16349709877282791032 1635060987960279186 16351509879832791912 16353509874122789929 1635450988041279223 1635520988041279223 16358609880732792235 1636100988097279233 1636130988111279248 16361709881212792418 1636230988143279254 16363809881842792545 16364409881322792429 1636530988191279263 16365709882032792615 1636600988213279273 16366409882292792719 16367309882502792740 1636790988264279283 16368509882762792815 16369409882922792831 1636970988303279293 1637030988335279303 16370909883462793014 1637150988359279313 1637210988377279328 16372509883872793218 1637310988409279334 1637460988454279345 16375809883982793229 1637670988495279361Relation_EmptyOtoO 163770 1637703510988642279433989760279842relation0sym4clear8relation_property12obj116obj220t124t228N132N236 1637750988722279442 1637860988774279452 1638050988845279462 1638250988917279472 1638310988942279483 1638380988942279483 1638510988992279494 1638620989026279504 1638660989042279515 16387009890532795116 16388909890962795210 1639040989130279568 16390809891382795616 1639140989161279574 1639270989211279584 1639310989227279595 16393509892382795916 16395709892952796010 16395909891482795626 1639680989316279642 1639750989334279653 1639810989360279664 1639880989360279664 1640010989411279675 1640120989446279685 1640160989463279696 16402009894742796917 16403909895182797011 1640540989556279749 16405809895642797417 1640640989588279755 1640770989639279765 1640810989656279776 16408509896672797717 16410709897252797811 16410909895742797427 1641180989752279832Relation_EmptyEquiv 164121 1641213320989764279853990628280132relation0sym4clear8relation_property12obj116obj220t24N28v32 1641260989840279872 1641370989892279882 1641560989962279892 1641660989985279902 1641710990000279913 1641750990009279923 1641810990034279934 1641880990034279934 1642010990083279945 1642370990132279969 16424109901402799617 1642470990161279975 16427309901492799626 1642820990216279993 1642850990228280012 1642910990252280023 1642980990252280023 1643110990300280034 1643180990300280034 1643310990349280045 1643830990452280078 16438709904602800716 1643930990485280089 16439909904982800822 1644050990519280095 16443209905072800831 16444109904692800725 1644500990620280122Relation_EmptyVtoV 164453 1644535390990632280143992126280612relation0sym4clear8vtov_structure12obj116obj220pr24pr228proutine132proutine236 1644580990724280152 1644690990773280162 1644790990819280172 1644900990867280182 1645010990926280192 1645120990988280212 1645220991007280223 1645290991007280223 1645420991040280234 1645490991040280234 1645620991077280245 16457209911012802429 1645750991115280255 1645900991167280266 16459409911782802617 16461709912342802711 1646400991255280303 1646430991267280322 1646530991291280333 1646600991291280333 1646730991329280349 16467709913362803416 1646920991397280355 1647070991449280366 16471109914602803617 16473409915162803711 16473609913832803463 1647550991537280403 1647580991549280422 1647680991580280438 16477209915872804315 1647870991623280444 1647940991623280444 1648070991660280455 1648220991712280466 16482609917232804617 16484909917792804711 16486109916122804340 1648700991800280503 1648730991817280527 16487709918242805214 1648920991864280538 16489609918712805315 1649110991929280544 1649260991980280555 1649410992032280566 16494509920432805617 16496809920992805711 16497009919182805362 16497909918492805239 1649890992118280602FAST_ROUTE_FINDING 0099235628071109923742807128NUM_DOORS 0099258428083109925972808323NUM_ROOMS 1099260828084109926212808423DoorRoutingViable 52237411false09926242808619926622808639map_has_changed 49774409926652808819926942808830last_filter 49774809926962808919927142808919last_use_doors 497752099271628089219927372808942SignalMapChange 164992 1649921109927422809139927842809145 16499509927592809120 16500009927832809144MapRouteTo 165003 1650035620992789280933994114281302from0to4filter8use_doors12count16oy20oyi24ds28 1650080992844280942 16501209928652809423 1650140992882280952 16501809929012809521 1650200992918280962 16502609929342809618 1650280992951280972 16504109929882809739 1650430993005280982 16505609930402809837 1650580993057280992 16507209931192809964 1650770993144281002 1650800993154281012 1650870993154281012 1651210993191281023 1651340993231281034 16514909932562810329 1651540993283281044 1651800993320281064 16519409933442810628 1651990993371281074 1652270993399281102 1652300993409281112 1652370993409281112 1652540993445281123 1652570993459281133 16536809935442811463 1653720993557281153 16542209935912811537 1654270993617281163 1654710993648281173 1654880993659281192 16549309937112812030 1655030993757281213 16550709937822812128 16551209938042812150 1655170993864281242 16552109938752812413 1655430993930281252FWMatrix 52237544false09942862813819943242813839FastRouteTo 165565 1655652420994329281403994703281502from0to4filter8use_doors12diri16i20dir24oy28 1655700994382281412 16557609943982814118 1655780994415281422 1656630994492281432 16566709945042814314 1656690994521281442 1657540994601281452 1657570994606281457 1657640994606281457 1657800994648281463 16578609946632814618 1657890994677281473 1658050994686281492FastCountRouteTo 165807 1658071080994708281523994894281572from0to4filter8use_doors12k16 1658120994755281532 16581809947712815318 1658200994782281542 1659050994859281552 16590909948712815514 1659120994883281562ComputeFWMatrix 165915 16591514500994899281593996713282062filter0use_doors4oy8ox12oj16axy20ayj24axj28dir32diri36nd40row44 1659200994972281602 1659270994972281602 16596309950052816035 1659780995031281613 1659850995031281613 16601909950642816136 1660330995091281624 1661330995151281642 1661400995151281642 16617609951842816435 1661910995212281653 1662060995255281668 16620909952632816616 1662160995296281674 1662740995330281684 1663280995395281695 1664130995476281705 1664170995494281724 1665130995603281745 16651609956192817421 1665200995638281755 1665310995661281765 1665340995681281775 1665880995747281786 1666730995829281796 16667609952832816636 1666970995860281852 1667040995860281852 16674009958932818535 1667550995919281863 1667620995919281863 16679809959522818636 1668130995981281874 1668980996060281884 1669040996077281895 1669110996077281895 16694709961102818938 1669620996141281906 1670470996222281916 1670530996350281947 1671380996440281967 1671530996508281988 1673620996712282061MAX_ROUTE_LENGTH 60099937528286109994012828636RelationRouteTo 167365 16736515709994062828831000074283072relation0from4to8count12handler16 1673700999456282892 1673740999471282903 16737809994922829024 1673810999505282913 16738509995242829122 1673880999537282923 16739209995562829222 1673980999579282943 16740209996002829424 1674040999618282953 16740809996372829522 1674100999655282963 16741409996742829622 1674160999694282982 16742209997102829818 1674240999727282992 1674420999797283003 1674510999830283013 1674530999850283032 16746609998902830342 1674680999907283042 1674790999949283052 16748309999602830513 16750201000020283062RelFollowVector 167522 16752254010000792830931000250283142rv0from4to8obj12i16 16752701000115283102 167531010001342831021 16753401000146283112 16753701000153283119 16754101000166283122 167553010002132831249 167559010002182831254 16757301000239283132OtoVRelRouteTo 167576 16757681010004072832131000667283292relation_property0from4to8previous12 16758101000459283222 16761101000537283233 16762201000572283243 16763901000596283253 167645010006182832525 16764801000631283263 16765501000650283282VtoORelRouteTo 167657 16765794010008242833631001106283452relation_property0from4to8next12start16 16766201000879283372 16766601000894283382 16769601000978283393 16770701001011283403 16772401001033283413 167730010010492834119 16774201001072283423 16774901001089283442VtoVRelRouteTo 167751 167751498010012722835231002398283842relation0from4to8count12obj16obj220related24progressed28left_ix32pr236i40vtov_structure44 16775601001369283532 16776701001418283542 16778001001454283553 16780201001509283562 16781201001560283572 16782301001608283582 16783001001608283582 167859010016632835857 16788501001680283592 16790201001713283613 16790501001735283623 16791201001735283623 16794301001794283634 16795601001821283645 16796301001821283645 16800601001901283656 16802101001953283667 16804301001993283677 16804701002018283687 16807101002048283723 16807801002048283723 16810701002107283734 16814801002150283743 168161010021672837420 16816401002176283753 168168010022012837528 16817501002212283772 16817901002227283783 168192010022552837831 16819501002268283793 168198010022752837910 16820201002289283803 168214010023362838050 168220010023412838055 16823401002363283813 16823701002377283832FastVtoVRelRouteTo 168249 1682491232010025642839131005684284822relation0from4to8count12domainsize16cache20cache224left_ix28ox32oy36oj40offset44axy48axj52ayj56 16825401002669283932 16827401002745283942 16829301002811283952 16832101002869283963 16832901002896283974 16834901002952283984 16835901002995283994 16838401003065284005 16840401003129284015 16841101003129284015 16842501003167284026 16843201003167284026 16844601003206284037 16846101003256284048 16848901003314284058 16850101003340284068 16852501003391284088 16855301003449284098 16856401003475284108 168599010035142841210 168602010035202841216 168609010035512841311 168612010035572841317 16861901003586284147 16863801003627284157 168644010036522841613 168647010036582841619 16865301003689284179 16867201003732284189 168677010037562841910 168687010037942842010 168698010038242842110 168712010038732842211 168728010039122842311 168757010036732841634 168767010035722841332 168777010035352841231 16878701004004284294 16879101004021284305 16882801004084284315 168832010041002843121 16883501004115284325 16883801004137284344 16887501004197284354 16888201004215284365 16888901004215284365 16890201004253284376 168917010042752843728 16893001004289284384 16893201004319284404 16895201004375284414 16896601004427284424 16899101004497284435 16901101004561284445 16901801004561284445 16903201004599284456 16903901004599284456 16905301004638284467 16906801004688284478 16909601004746284488 16910801004773284498 16912301004817284518 16915101004875284528 16916201004902284538 169195010049462845510 169198010049522845516 169205010049832845611 169208010049892845617 16921501005018284577 16923401005060284587 169240010050852845913 169243010050912845919 16924901005122284609 16926801005166284619 169273010051902846210 169283010052282846310 169294010052592846410 169308010053082846511 169324010053482846611 169353010051062845934 169363010050042845632 169373010049672845531 16938301005442284724 16938701005459284735 16942401005523284745 169428010055392847421 16943101005554284755 16943401005576284774 16947201005644284802 169476010056552848013 16947901005667284812IterateRelations 169481 16948126010058322848931005916284932callback0 16948601005860284902 16949501005889284915 16950401005915284931RTP_Buffer 522379284false0100604628500110060682850023RunTimeProblem 169507 16950780010060722850131006316285112n0par14par28par312ln16file20 16951201006114285022 16952401006144285033 16953201006167285043 16954101006193285053 16955001006218285063 16955901006243285073 16956801006266285083 16957701006293285102 16958401006315285111ClearRTP 169587 16958722010063202851231006378285152 16959001006331285132 16959801006353285142 16960601006377285151SuspendRTP 169609 16960915010063822851631006419285182 16961201006395285172 16962101006418285181ResumeRTP 169624 16962414010064232851931006460285212 16962701006435285202 16963501006459285211RunTimeProblemShow 169638 1696382067010064642852231014515287212n0par14par28par312ln16file20i24c28 16964301006516285232 169665010065482852334 16966801006557285242 169679010065772852422 16968201006587285262 16969001006609285272 16969901006634285282 16970801006658285292 16971701006682285302 16972601006704285312 16973501006728285322 16974301006751285342 16975201006788285352 16975601006800285363 16977101006839285373 169775010068542853718 16978401006886285388 16979301006912285393 16979901006927285412 16980501006940285422 16981501006971285444 16986101007094285474 16989201007191285497 16993801007340285527 16998401007467285554 17003901007630285584 17005501007704285604 17007101007780285624 17010201007871285644 17014801008018285674 17019401008185285704 17021001008259285724 17022601008339285744 17024201008423285764 17025801008485285784 17027401008549285804 17029001008612285824 17032101008753285854 17036701008877285884 17039801008999285914 17042901009128285944 17046001009248285974 17050901009407286004 17053401009519286034 17055001009612286054 17058101009743286084 17061201009884286114 17064301010020286144 17067401010154286174 17070501010287286204 17073601010426286234 17076701010547286264 17079801010674286294 17081401010784286324 17083001010889286354 17086101011026286384 17087701011124286404 17089301011190286424 17090901011250286444 17092501011331286464 17095901011467286494 17099301011607286524 17102701011741286554 17104301011817286574 17105901011892286594 17107501011966286614 17109101012041286634 17110701012126286654 17112301012187286674 17113901012268286694 17115501012328286714 17117101012400286734 17118701012484286754 17121801012609286784 17123401012680286804 17125001012756286824 17126601012833286844 17131201012974286874 17134301013098286904 17137401013217286934 17139001013302286954 17142701013498286994 17149401013735287034 17157001013963287074 17160001014066287104 17161501014152287124 17163001014243287144 17166901014381287174 17169601014503287202 17170201014514287211MAX_TIMERS 001014661287281010146752872824RunTimeError 171705 171705387010146792872931016191287572n0p14p28 17171001014723287315 17174301014788287325 171753010148132873313 171769010148802873413 171824010150112873613 171879010151552873813 171903010153612874113 171934010154352874213 171965010155712874413 171981010156472874513 171999010157142874613 172014010157802874713 172044010158582874813 172059010159322874913 172068010160102875016 17207401016043287525 17208001016155287565 17208901016190287571ArgumentTypeFailed 172092 17209231010163432876431016427287662line0file4 17209701016374287652 17212001016426287661CheckKindReturned 172123 17212349010165772877331016741287782V0K4 17212801016601287742 172141010166182877419 17214401016629287752 172148010166472877520 17216001016690287767 17216901016730287772WhetherProvides 172172 172172498010168802878531017760288152obj0either_or4p8issue_rtp12off16i20textual24a28l32 17217701016943287862 17219301016982287872 172198010169912878711 17220201017000287882 17220701017019287893 172216010170452878929 17226501017091287908 17231601017134287919 17236401017170287922 17236901017185287933 172373010172002879318 17238301017240287943 17238501017252287962 172433010172872879637 17243901017297287982 172452010173332879838 17245601017356287992 17247001017387288003 17248101017407288013 17248701017426288024 17249301017438288034 172552010174882880354 17255501017513288044 17261701017548288072 172621010175632880717 17263301017610288082 17263501017640288113 17263901017664288123 17265201017693288133 172656010177082881318 17266801017751288143PrintPropertyName 172670 172670122010177652881731017916288222p0off4textual8 17267501017801288182 172680010178102881811 17268401017819288192 17273201017855288202 17278001017891288212 17278901017915288221ScanPropertyMetadata 172792 172792128010180612882931018192288332obj0off4i8 17279701018099288307 172801010181062883014 17285401018141288313 172908010181342883042 17291801018183288322GetEitherOrProperty 172920 172920156010183372884031018559288482o0p4 17292501018363288412 17292801018390288422 172933010183992884211 17293701018408288432 17296001018452288443 172969010184782884429 173046010184982884449 17304801018510288453 17307401018550288472SetEitherOrProperty 173076 173076150010187042885531018998288662o0p4negate8adj12 17308101018741288562 173086010187522885613 173090010187602885621 17309401018781288572 17309801018794288583 17310801018812288599 17313101018855288603 17313501018872288614 173144010188962886128 173161010189122886144 17318001018939288634 173189010189632886328 173206010189782886343 17322301018997288661GProperty 173226 173226289010191352887331019805288922K0V4pr8obj12 17323101019158288742 173237010191782887422 173244010191922887436 17329001019224288752 173294010192402887518 173306010192842887562 17330801019295288762 17332201019320288773 17332801019345288784 173334010193642887823 17334601019384288794 173368010194252887945 17338001019443288804 17338201019457288823 17339801019485288834 17341701019554288843 17343901019597288854 173448010196352888542 17345001019649288863 17347801019694288883 17349401019722288894 17351301019796288915WriteGProperty 173515 173515207010199482889931020357289092K0V4pr8val12obj16 17352001019980289002 173526010200002890022 173533010200142890036 17357901020046289012 173583010200622890118 173595010201062890162 17359701020117289022 17360301020141289033 173625010201822890344 17364501020208289053 17366701020249289064 17367801020296289073 173691010203192890726 17371901020356289091PROPERTY_TY_Say 173722 17372217010205032891631020546289182v0 17372701020523289172 17373601020545289181RS_NEITHER 001020700289251010207152892525RS_SUCCEEDS 101020726289261010207412892625RS_FAILS 201020752289271010207652892723latest_rule_result 522407124false0102076828929110207982892931RecordRuleOutcome 173739 173739134010208032893131021208289402usage0rule14rule28 17374401020841289322 17378501020947289343 17380101020986289352 17382501021056289363 17384401021109289372 17385201021142289382 17386101021175289392 17387001021207289401process_rulebook_count 4977560102134428947110213732894730debugging_rules 4977600102140728948110214372894831FollowRulebook 173873 173873395010214772895031023258290012rulebook0parameter4no_paragraph_skips8rv12ss16spv20 17387801021543289522 17388201021555289532 17390901021633289543 17391501021701289553 17391701021712289572 173921010217292895719 173925010217472895737 17392901021780289582 173933010218032895825 17393701021883289602 17394201021938289622 17394701021963289633 17395701022002289643 17396601022082289672 17398001022148289683 17402801022183289693 17403701022214289704 174043010222522897042 17405201022286289714 174056010222982897116 17406501022339289724 17407201022371289734 174078010224092897342 17409001022455289754 17409601022479289783 174100010224912897815 17410901022531289793 17411401022558289803 174120010225712898016 17412801022609289818 174132010226172898116 17413601022636289832 17414001022674289853 17414501022700289864 17415401022770289874 174160010228022898736 17416401022833289884 17419201022875289899 174204010229182898952 17421001022955289909 174222010229952899049 17423101023047289943 17423601023071289954 17424501023140289963 17425201023181289982 17425701023211289992 174261010232222899913 17426501023246290002RulebookParBreak 174268 17426827010232632900331023405290062no_paragraph_skips0 17427301023301290042 17428501023380290053 17429201023404290061ActRulebookSucceeds 174295 17429524010235532901331023654290162rule_id0 17430001023583290142 174304010235962901415 17430901023633290152 17431601023653290161ActRulebookFails 174319 17431924010236592901831023754290212rule_id0 17432401023686290192 174328010236992901915 17433301023736290202 17434001023753290211RulebookSucceeds 174343 17434320010237592902331023845290252weak_kind0value4 17434801023794290242 17436001023844290251RulebookFails 174363 17436320010238502902731023930290292weak_kind0value4 17436801023882290282 17438001023929290291RuleHasNoOutcome 174383 17438315010239352903131023992290332 17438601023954290322 17439501023991290331SetRulebookOutcome 174398 17439816010239972903531024049290372a0 17440301024020290362 17441101024048290371RulebookOutcome 174414 17441430010241982904431024321290482a0 17441901024218290452 17442701024247290462 174439010242902904645 17444201024301290472RulebookFailed 174444 17444417010243262905031024399290522 17444701024343290512 174459010243902905149RulebookSucceeded 174461 17446117010244042905431024483290562 17446401024424290552 174476010244742905552ResultOfRule 174478 17447881010244882905831024745290672RB0V4F8K12a16 17448301024514290592 174487010245222905910 17449901024549290602 17450701024578290612 17451901024625290623 17452801024655290633 174532010246622906310 17454201024697290652 17454601024704290659 17455701024734290662RulebookNames 52241914484false010249152907511041473294381RulePrintingRule 174559 1745596432010415052944331073754298102R0p14 17456401041553294452 17457601041601294463 17463701041655294489 174646010416712944825 174652010417262944880 17465501041752294499 174664010417692944926 174670010418112944968 17467301041837294509 174682010418542945026 174688010418912945063 17469101041917294519 174700010419342945126 174706010419692945161 17470901041995294529 174718010420122945226 174724010420412945255 17472701042067294539 174736010420842945326 174742010421232945365 17474501042149294549 174754010421662945426 174760010421972945457 17476301042223294559 174772010422402945526 174778010422752945561 17478101042301294569 174790010423182945626 174796010423532945661 17479901042379294579 174808010423962945726 174814010424342945764 17481701042460294589 174826010424772945826 174832010425422945891 17483501042569294599 174844010425862945926 174850010426422945982 17485301042669294609 174862010426862946026 174868010427132946053 17487101042740294619 174880010427572946126 174886010427852946154 17488901042812294629 174898010428292946226 174904010428762946273 17490701042903294639 174916010429202946326 174922010429792946385 17492501043006294649 174934010430232946426 174940010430492946452 17494301043076294659 174952010430932946526 174958010431232946556 17496101043150294669 174970010431672946626 174976010431932946652 17497901043220294679 174988010432372946726 174994010432952946784 17499701043322294689 175006010433392946826 175012010433662946853 17501501043393294699 175024010434102946926 175030010434562946972 17503301043483294709 175042010435002947026 175048010435562947082 17505101043583294719 175060010436002947126 175066010436552947181 17506901043682294729 175078010436992947226 175084010437612947288 17508701043788294739 175096010438052947326 175102010438412947362 17510501043868294749 175114010438852947426 175120010439512947492 17512301043978294759 175132010439952947526 175138010440322947563 17514101044059294769 175150010440762947626 175156010441182947668 17515901044145294779 175168010441622947726 175174010442102947774 17517701044237294789 175186010442542947826 175192010443082947880 17519501044335294799 175204010443522947926 175210010443992947973 17521301044426294809 175222010444432948026 175228010444872948070 17523101044514294819 175240010445312948126 175246010445742948169 17524901044601294829 175258010446182948226 175264010446762948284 17526701044703294839 175276010447202948326 175282010447772948383 17528501044804294849 175294010448212948426 175300010448642948469 17530301044891294859 175312010449082948526 175318010449362948554 17532101044963294869 175330010449802948626 175336010450082948654 17533901045035294879 175348010450522948726 175354010450862948760 17535701045113294889 175366010451302948826 175372010451672948863 17537501045194294899 175384010452112948926 175390010452502948965 17539301045277294909 175402010452942949026 175408010453432949075 17541101045370294919 175420010453872949126 175426010454312949170 17542901045458294929 175438010454752949226 175444010455172949268 17544701045544294939 175456010455612949326 175462010456052949370 17546501045632294949 175474010456492949426 175480010456802949457 17548301045707294959 175492010457242949526 175498010457702949572 17550101045797294969 175510010458142949626 175516010458822949694 17551901045909294979 175528010459262949726 175534010459832949783 17553701046010294989 175546010460272949826 175552010460942949893 17555501046121294999 175564010461382949926 175570010461972949985 17557301046224295009 175582010462412950026 175588010462962950081 17559101046323295019 175600010463402950126 175606010463982950184 17560901046425295029 175618010464422950226 175624010464892950273 17562701046516295039 175636010465332950326 175642010466062950399 17564501046633295049 175654010466502950426 1756600104672529504101 17566301046752295059 175672010467692950526 175678010468052950562 17568101046832295069 175690010468492950626 175696010468882950665 17569901046915295079 175708010469332950727 175714010469842950778 17571701047011295089 175726010470292950827 175732010470632950861 17573501047090295099 175744010471082950927 175750010471462950965 17575301047173295109 175762010471912951027 175768010472322951068 17577101047259295119 175780010472772951127 175786010473232951173 17578901047350295129 175798010473682951227 175804010474112951270 17580701047438295139 175816010474562951327 175822010475002951371 17582501047527295149 175834010475452951427 175840010475912951473 17584301047618295159 175852010476362951527 175858010476692951560 17586101047696295169 175870010477142951627 175876010477492951662 17587901047776295179 175888010477942951727 175894010478412951774 17589701047868295189 175906010478862951827 175912010479582951899 17591501047985295199 175924010480032951927 175930010480482951972 17593301048075295209 175942010480932952027 175948010481232952057 17595101048150295219 175960010481682952127 175966010482052952164 17596901048232295229 175978010482502952227 175984010482952952272 17598701048322295239 175996010483402952327 176002010483792952366 17600501048406295249 176014010484242952427 176020010484612952464 17602301048488295259 176032010485062952527 176038010485402952561 17604101048567295269 176050010485852952627 176056010486212952663 17605901048648295279 176068010486662952727 176074010487142952775 17607701048741295289 176086010487592952827 176092010488002952868 17609501048827295299 176104010488452952927 176110010488892952971 17611301048916295309 176122010489342953027 176128010489932953086 17613101049020295319 176140010490382953127 176146010490702953159 17614901049097295329 176158010491152953227 176164010491542953266 17616701049181295339 176176010491992953327 176182010492482953376 17618501049275295349 176194010492932953427 176200010493332953467 17620301049360295359 176212010493782953527 176218010494222953571 17622101049449295369 176230010494672953627 176236010495192953679 17623901049546295379 176248010495642953727 176254010496072953770 17625701049634295389 176266010496522953827 176272010497102953885 17627501049737295399 176284010497552953927 176290010497862953958 17629301049813295409 176302010498312954027 176308010498682954064 17631101049895295419 176320010499132954127 176326010499512954165 17632901049978295429 176338010499962954227 176344010500482954279 17634701050075295439 176356010500932954327 176362010501362954370 17636501050163295449 176374010501812954427 176380010502302954476 17638301050257295459 176392010502752954527 176398010503252954577 17640101050352295469 176410010503702954627 176416010504252954682 17641901050452295479 176428010504702954727 176434010505162954773 17643701050543295489 176446010505612954827 176452010506222954888 17645501050650295499 176464010506682954927 176470010507012954960 17647301050729295509 176482010507472955027 176488010507862955066 17649101050814295519 176500010508322955127 176506010508722955167 17650901050900295529 176518010509182955227 176524010509562955265 17652701050984295539 176536010510022955327 176542010510612955386 17654501051089295549 176554010511072955427 176560010511512955471 17656301051179295559 176572010511972955527 176578010512552955585 17658101051283295569 176590010513012955627 176596010513312955657 17659901051359295579 176608010513772955727 176614010514142955764 17661701051442295589 176626010514602955827 176632010515032955870 17663501051531295599 176644010515492955927 176650010515852955963 17665301051613295609 176662010516312956027 176668010516822956078 17667101051710295619 176680010517282956127 176686010517772956176 17668901051805295629 176698010518232956227 176704010518672956271 17670701051895295639 176716010519132956327 176722010519522956366 17672501051980295649 176734010519982956427 176740010520302956459 17674301052058295659 176752010520762956527 176758010521142956565 17676101052142295669 176770010521602956627 176776010521962956663 17677901052224295679 176788010522422956727 176794010522842956769 17679701052312295689 176806010523302956827 176812010523682956865 17681501052396295699 176824010524142956927 176830010524472956960 17683301052475295709 176842010524932957027 176848010525342957068 17685101052562295719 176860010525802957127 176866010526342957181 17686901052662295729 176878010526802957227 176884010527292957276 17688701052757295739 176896010527752957327 176902010528222957374 17690501052850295749 176914010528682957427 176920010529122957471 17692301052940295759 176932010529582957527 176938010530182957587 17694101053046295769 176950010530642957627 176956010531082957671 17695901053136295779 176968010531542957727 176974010532072957780 17697701053235295789 176986010532532957827 176992010532852957859 17699501053313295799 177004010533312957927 177010010533702957966 17701301053398295809 177022010534162958027 177028010534612958072 17703101053489295819 177040010535072958127 177046010535462958166 17704901053574295829 177058010535922958227 177064010536422958277 17706701053670295839 177076010536882958327 177082010537312958370 17708501053759295849 177094010537772958427 177100010538172958467 17710301053845295859 177112010538632958527 177118010538942958558 17712101053922295869 177130010539402958627 177136010539782958665 17713901054006295879 177148010540242958727 177154010540652958768 17715701054093295889 177166010541112958827 177172010541462958862 17717501054174295899 177184010541922958927 177190010542272958962 17719301054255295909 177202010542732959027 177208010543152959069 17721101054343295919 177220010543612959127 177226010544032959169 17722901054431295929 177238010544492959227 177244010544922959270 17724701054520295939 177256010545382959327 177262010545832959372 17726501054611295949 177274010546292959427 177280010546682959466 17728301054696295959 177292010547142959527 177298010547552959568 17730101054783295969 177310010548012959627 177316010548572959683 17731901054885295979 177328010549032959727 177334010549352959759 17733701054963295989 177346010549812959827 177352010550162959862 17735501055044295999 177364010550622959927 177370010550952959960 17737301055123296009 177382010551412960027 177388010551742960060 17739101055202296019 177400010552202960127 177406010552532960160 17740901055281296029 177418010552992960227 177424010553322960260 17742701055360296039 177436010553782960327 177442010554082960357 17744501055436296049 177454010554542960427 177460010554952960468 17746301055523296059 177472010555412960527 177478010555852960571 17748101055613296069 177490010556312960627 177496010556682960664 17749901055696296079 177508010557142960727 177514010557622960775 17751701055790296089 177526010558082960827 177532010558652960884 17753501055893296099 177544010559112960927 177550010559632960979 17755301055991296109 177562010560092961027 177568010560502961068 17757101056078296119 177580010560962961127 177586010561372961168 17758901056165296129 177598010561832961227 177604010562272961271 17760701056255296139 177616010562732961327 177622010563042961358 17762501056332296149 177634010563502961427 177640010563902961467 17764301056418296159 177652010564362961527 177658010564832961574 17766101056511296169 177670010565292961627 177676010565662961664 17767901056594296179 177688010566122961727 177694010566612961776 17769701056689296189 177706010567072961827 177712010567382961858 17771501056766296199 177724010567842961927 177730010568222961965 17773301056850296209 177742010568682962027 177748010569102962069 17775101056938296219 177760010569562962127 177766010570072962178 17776901057035296229 177778010570532962227 177784010571042962278 17778701057132296239 177796010571502962327 177802010571832962360 17780501057211296249 177814010572292962427 177820010572692962467 17782301057297296259 177832010573152962527 177838010573632962575 17784101057391296269 177850010574092962627 177856010574572962675 17785901057485296279 177868010575032962727 177874010575392962763 17787701057567296289 177886010575852962827 177892010576282962870 17789501057656296299 177904010576742962927 177910010577232962976 17791301057751296309 177922010577692963027 177928010578192963077 17793101057847296319 177940010578652963127 177946010579022963164 17794901057930296329 177958010579482963227 177964010579922963271 17796701058020296339 177976010580382963327 177982010580792963368 17798501058107296349 177994010581252963427 178000010581642963466 17800301058192296359 178012010582102963527 178018010582552963572 17802101058283296369 178030010583012963627 178036010583322963658 17803901058360296379 178048010583782963727 178054010584262963775 17805701058454296389 178066010584722963827 178072010585102963865 17807501058538296399 178084010585562963927 178090010585982963969 17809301058626296409 178102010586442964027 178108010586922964075 17811101058720296419 178120010587382964127 178126010587692964158 17812901058797296429 178138010588152964227 178144010588532964265 17814701058881296439 178156010588992964327 178162010589442964372 17816501058972296449 178174010589902964427 178180010590312964468 17818301059059296459 178192010590772964527 178198010591222964572 17820101059150296469 178210010591682964627 178216010591992964658 17821901059227296479 178228010592452964727 178234010592832964765 17823701059311296489 178246010593292964827 178252010593742964872 17825501059402296499 178264010594202964927 178270010594812964988 17827301059509296509 178282010595272965027 178288010595612965061 17829101059589296519 178300010596072965127 178306010596482965168 17830901059676296529 178318010596942965227 178324010597402965273 17832701059768296539 178336010597862965327 178342010598232965364 17834501059851296549 178354010598692965427 178360010599102965468 17836301059938296559 178372010599562965527 178378010600002965571 17838101060028296569 178390010600462965627 178396010600732965654 17839901060101296579 178408010601192965727 178414010601762965784 17841701060204296589 178426010602222965827 178432010602522965857 17843501060280296599 178444010602982965927 178450010603352965964 17845301060363296609 178462010603812966027 178468010604272966073 17847101060455296619 178480010604732966127 178486010605232966177 17848901060551296629 178498010605692966227 178504010605972966255 17850701060625296639 178516010606432966327 178522010606702966354 17852501060698296649 178534010607162966427 178540010607642966475 17854301060792296659 178552010608102966527 178558010608682966585 17856101060896296669 178570010609142966627 178576010609462966659 17857901060974296679 178588010609922966727 178594010610222966757 17859701061050296689 178606010610682966827 178612010610992966858 17861501061127296699 178624010611452966927 178630010611732966955 17863301061201296709 178642010612192967027 178648010612492967057 17865101061277296719 178660010612952967127 178666010613262967158 17866901061354296729 178678010613722967227 178684010614002967255 17868701061428296739 178696010614462967327 178702010614732967354 17870501061501296749 178714010615192967427 178720010615632967471 17872301061591296759 178732010616092967527 178738010616542967572 17874101061682296769 178750010617002967627 178756010617382967665 17875901061766296779 178768010617842967727 178774010618232967766 17877701061851296789 178786010618692967827 178792010619122967870 17879501061940296799 178804010619582967927 178810010619952967964 17881301062023296809 178822010620412968027 178828010620822968068 17883101062110296819 178840010621282968127 178846010621632968162 17884901062191296829 178858010622092968227 178864010622562968274 17886701062284296839 178876010623022968327 178882010623352968360 17888501062363296849 178894010623812968427 178900010624132968459 17890301062441296859 178912010624592968527 178918010624882968556 17892101062516296869 178930010625342968627 178936010625812968674 17893901062609296879 178948010626272968727 178954010626602968760 17895701062688296889 178966010627062968827 178972010627382968859 17897501062766296899 178984010627842968927 178990010628132968956 17899301062841296909 179002010628592969027 179008010629062969074 17901101062934296919 179020010629522969127 179026010629852969160 17902901063013296929 179038010630312969227 179044010630632969259 17904701063091296939 179056010631092969327 179062010631382969356 17906501063166296949 179074010631842969427 179080010632272969470 17908301063255296959 179092010632732969527 179098010633162969570 17910101063344296969 179110010633622969627 179116010633982969663 17911901063426296979 179128010634442969727 179134010634812969764 17913701063509296989 179146010635272969827 179152010635722969872 17915501063600296999 179164010636182969927 179170010636602969969 17917301063688297009 179182010637062970027 179188010637522970073 17919101063780297019 179200010637982970127 179206010638292970158 17920901063857297029 179218010638752970227 179224010639062970258 17922701063934297039 179236010639522970327 179242010639822970357 17924501064010297049 179254010640282970427 179260010640562970455 17926301064084297059 179272010641022970527 179278010641322970557 17928101064160297069 179290010641782970627 179296010642072970656 17929901064235297079 179308010642532970727 179314010642832970757 17931701064311297089 179326010643292970827 179332010643602970858 17933501064388297099 179344010644062970927 179350010644352970956 17935301064463297109 179362010644812971027 179368010645092971055 17937101064537297119 179380010645552971127 179386010645842971156 17938901064612297129 179398010646302971227 179404010646562971253 17940701064684297139 179416010647022971327 179422010647312971356 17942501064759297149 179434010647772971427 179440010648102971460 17944301064838297159 179452010648562971527 179458010648852971556 17946101064913297169 179470010649312971627 179476010649702971666 17947901064998297179 179488010650162971727 179494010650452971756 17949701065073297189 179506010650912971827 179512010651252971861 17951501065153297199 179524010651712971927 179530010652052971961 17953301065233297209 179542010652512972027 179548010652782972054 17955101065306297219 179560010653242972127 179566010653532972156 17956901065381297229 179578010653992972227 179584010654282972256 17958701065456297239 179596010654932972346 179602010655302972383 17960501065558297249 179614010655962972447 179620010656342972485 17962301065662297259 179632010656942972541 179638010657262972573 17964101065754297269 179650010657972972652 179656010658402972695 17965901065868297279 179668010659112972752 179674010659542972795 17967701065982297289 179686010660212972848 179692010660662972893 17969501066094297299 179704010661212972936 179710010661482972963 17971301066176297309 179722010662032973036 179728010662302973063 17973101066258297319 179740010662882973139 179746010663182973169 17974901066346297329 179758010663852973248 179764010664242973287 17976701066452297339 179776010664802973337 179782010665082973365 17978501066536297349 179794010665632973436 179800010665902973463 17980301066618297359 179812010666582973549 179818010666982973589 17982101066726297369 179830010667592973642 179836010667962973679 17983901066824297379 179848010668542973739 179854010668912973776 17985701066919297389 179866010669532973843 179872010669872973877 17987501067015297399 179884010670462973940 179890010670772973971 17989301067105297409 179902010671412974045 179908010671772974081 17991101067205297419 179920010672452974149 1799260106729629741100 17992901067324297429 179938010673662974251 179944010674082974293 17994701067436297439 179956010674772974350 1799620106752929743102 17996501067557297449 179974010676002974452 1799800106765029744102 17998301067678297459 179992010677162974547 179998010677542974585 18000101067782297469 180010010678212974648 180016010678722974699 18001901067900297479 180028010679382974747 180034010679772974786 18003701068005297489 180046010680452974849 1800520106809729748101 18005501068125297499 180064010681602974944 180070010681952974979 18007301068223297509 180082010682642975050 180088010683052975091 18009101068333297519 180100010683692975145 180106010684052975181 18010901068433297529 180118010684712975247 180124010685152975291 18012701068543297539 180136010685802975346 180142010686172975383 18014501068645297549 180154010686832975447 180160010687212975485 18016301068749297559 180172010687862975546 180178010688302975590 18018101068858297569 180190010689002975651 180196010689422975693 18019901068970297579 180208010690112975750 180214010690522975791 18021701069080297589 180226010691172975846 180232010691542975883 18023501069182297599 180244010692222975949 180250010692622975989 18025301069290297609 180262010693292976048 180268010693682976087 18027101069396297619 180280010694292976142 180286010694692976182 18028901069497297629 180298010695352976247 180304010695732976285 18030701069601297639 180316010696332976341 180322010696652976373 18032501069693297649 180334010697332976449 180340010697732976489 18034301069801297659 180352010698382976546 180358010698792976587 18036101069907297669 180370010699472976649 180376010699922976694 18037901070020297679 180388010700512976740 180394010700822976771 18039701070110297689 180406010701412976840 180412010701722976871 18041501070200297699 180424010702322976941 180430010702682976977 18043301070296297709 180442010703362977049 180448010703852977098 18045101070413297719 180460010704412977137 180466010704692977165 18046901070497297729 180478010705252977237 180484010705532977265 18048701070581297739 180496010706122977340 180502010706432977371 18050501070671297749 180514010707022977440 180520010707332977471 18052301070761297759 180532010707972977545 180538010708332977581 18054101070861297769 180550010708962977644 180556010709412977689 18055901070969297779 180568010710052977745 180574010710512977791 18057701071079297789 180586010711212977851 180592010711672977897 18059501071195297799 180604010712242977938 180610010712572977971 18061301071285297809 180622010713182978042 180628010713692978093 18063101071397297819 180640010714342978146 1806460107150529781117 18064901071533297829 180658010715682978244 180664010716212978297 18066701071649297839 180676010716882978348 1806820107176129783121 18068501071789297849 180694010718322978452 1807000107189329784113 18070301071921297859 180712010719612978549 1807180107204229785130 18072101072070297869 180730010721072978646 180736010721502978689 18073901072178297879 180748010722132978744 1807540107227529787106 18075701072303297889 180766010723412978847 180772010723852978891 18077501072413297899 180784010724492978945 1807900107251229789108 18079301072540297909 180802010725802979049 180808010726242979093 18081101072652297919 180820010726692979126 180826010727052979162 18082901072733297929 180838010727502979226 180844010727852979261 18084701072813297939 180856010728302979326 180862010728762979372 18086501072904297949 180874010729222979427 180880010729682979473 18088301072996297959 180892010730142979527 180898010730702979583 18090101073098297969 180910010731162979627 180916010731422979653 18091901073170297979 180928010731882979727 180934010732382979777 18093701073266297989 180946010732842979827 1809520107344829798191 18095501073476297999 180964010734942979927 180970010735402979973 18097301073563298013 18098801073753298101RULEBOOK_TY_to_RULE_TY 180991 1809918010738902981731073928298192r0 18099601073917298182DebugRulebooks 180999 18099970010740662982631074229298312subs0parameter4i8 18100401074100298272 18103201074135298282 18104701074172298292 181051010741872982917 18106001074216298302 18106601074228298311DB_Rule 181069 18106973010742342983331074469298392R0N4blocked8 18107401074256298342 181078010742662983412 18108101074275298352 18110201074373298372 181106010743952983724 18111801074409298382 18113901074468298391I7S_Tab 4977640107459829846110746122984615I7S_Col 4977680107467329847110746872984715I7S_Dir 4977720107473229848110747462984815I7S_Swap 4977760107480929849110748242984916I7S_Comp 4977800107487229850110748872985016SetSortDomain 181142 18114218010751862986131075252298642swapf0compf4 18114701075214298622 18115201075233298632 18115701075251298641SortArray 181160 18116034010752572986631075678298812tab0col4dir8size12test_flag16algorithm20 18116501075306298672 18117001075322298682 18117501075338298692 18118001075449298752 18119101075677298811SortRange 181194 18119445010758122988831075949298952x0y4algorithm8 18119901075838298892 181209010758532988917 18121201075862298902 18121601075881298913 18122601075912298933 18123601075948298951CompareFields 181239 18123940010760962990231076298299082x0y4 18124401076235299072ExchangeFields 181279 18127928010763032991031076486299182x0y4r8 18128401076438299152 18130401076474299172OldSortAlgorithm 181307 181307106010766192992531076844299372x0y4f8i12j16 18131201076649299272 181322010766642992717 18132501076673299282 18132901076684299292 18133301076698299303 18133601076716299318 181340010767202993112 181346010767402993212 181352010767462993218 18135801076759299335 18137201076795299346 181382010768172993428 181386010768272993438 181389010767502993222 181398010767242993116 18141001076843299371InsertionSortAlgorithm 181413 18141396010769822994431077202299552from0to4i8j12 18141801077020299462 18142801077047299478 181434010770592994720 18144001077083299489 181444010770902994816 18145001077112299495 18146801077149299506 181485010771822995110 181488010771002994826 181497010770672994728 18150601077201299551InPlaceMergeSortAlgorithm 181509 181509101010773442996231077657299732from0to4middle8 18151401077388299642 18152401077412299653 181534010774312996522 18153701077441299663 18154701077477299673 18155001077489299692 18156001077515299702 18157001077558299712 18158001077599299722 18160701077656299731IPMS_Lower 181610 18161071010776622997531077896299872from0to4val8len12half16mid20 18161501077701299772 18162101077719299782 18162601077740299793 18163201077757299803 18163801077778299813 18165201077816299824 18165801077835299834 181671010778662998410 18167801077882299862IPMS_Upper 181681 18168171010779012998931078140300032from0to4val8len12half16mid20 18168601077940299912 18169201077958299922 18169701077979299933 18170301077996299943 18170901078017299953 18172301078053299964 18173001078077299984 18173601078096299994 18174901078126300022IPMS_Reverse 181752 18175243010781453000531078224300092from0to4 18175701078168300062 18176301078190300073 18179201078223300091IPMS_Rotate 181795 18179565010782293001131078397300172from0mid4to8n12val16shift20p124p228 18180001078274300132 181812010783043001332 18181501078314300142 18182901078343300152 18184301078370300162 18185701078396300171IPMS_Merge 181860 181860195010784023001931079125300422from0pivot4to8len112len216first_cut20second_cut24len1128len2232new_mid36 18186501078481300212 181873010785133002134 18187601078523300222 18188601078548300233 18190001078587300243 18191001078619300253 18191301078632300272 18191901078654300283 18192501078673300293 18193101078702300303 18194401078752300313 18195301078794300333 18195901078813300343 18196501078844300353 18197801078896300363 18198401078928300382 18199601078973300392 18200201079004300402 18202501079058300412 18205201079124300421TB_COLUMN_REAL 3276801079264300491010792913004937TB_COLUMN_SIGNED 1638401079302300501010793293005037TB_COLUMN_TOPIC 819201079340300511010793673005137TB_COLUMN_DONTSORTME 409601079378300521010794053005237TB_COLUMN_NOBLANKBITS 204801079416300531010794433005337TB_COLUMN_CANEXCHANGE 102401079454300541010794813005437TB_COLUMN_ALLOCATED 51201079492300551010795193005537TB_COLUMN_NUMBER 51101079530300561010795573005637COL_HSIZE 201079602300581010796133005821TableFindCol 182055 18205584010798053006531080020300712tab0col4f8i12no_cols16n20 18206001079842300662 18207001079867300677 182074010798723006712 18208001079891300683 182109010799383006850 182112010798843006724 18212101079949300692 182125010799583006911 182135010799963006949 18213701080009300702TableRows 182139 18213937010801603007831080275300812tab0first_col4 18214401080186300792 182155010802073007923 182159010802273007943 18216101080238300802TABLE_NOVALUE -55903486301080414300881010804463008842CheckTableEntryIsBlank_LU 52386781false0108057530095110807123010313CheckTableEntryIsNonBlank_LU 52387581false0108071430104110808543011213CheckTableEntryIsBlank 182176 182176263010809973011931081415301302tab0col4row8i12at16 18218101081039301202 182187010810553012018 18219801081086301212 18220201081108301222 18223301081164301233 18226601081240301252 18229301081295301262 18229901081303301272 18232701081338301282 18243701081406301292ForceTableEntryBlank 182439 182439332010815583013731082043301492tab0col4row8i12at16oldv20flags24 18244401081609301382 182450010816253013818 18246101081656301392 18246501081678301402 18248501081704301412 18250901081743301422 18253201081812301433 18254101081833301442 18256901081881301452 182578010819163014537 18258101081925301462 18258701081933301472 18261501081968301482 18276801082042301491ForceTableEntryNonBlank 182771 182771397010821903015631082807301742tab0col4row8i12at16oldv20flags24tc28kov32 18277601082251301572 182782010822673015718 18279301082296301582 18279701082318301592 182824010823653015949 18282701082374301602 18284701082400301612 18287101082439301622 18289401082512301643 18290101082532301653 18292601082577301663 18293601082597301673 18294501082625301684 18297801082686301712 18298401082694301722 18301201082729301732 18316501082806301741TableSwapBlankBits 183168 183168989010829523018131083796302052tab0row14row28col12at116at220bit124bit228 18317301083009301822 183179010830253018218 18319001083054301832 18319401083076301842 183221010831233018449 18322401083132301852 18323001083141301862 18325801083178301872 18326401083187301882 18329201083224301892 18340001083292301902 18350801083360301912 183512010833703019112 18351601083385301922 183520010833953019212 18352401083409301932 183530010834273019320 18353301083436301942 18353801083450301953 18369101083535301973 18384801083627302003 18400101083709302023 18415401083795302051TableMoveBlankBitsDown 184157 1841571064010839443021231084963302422tab0row14row28col12at16atp120bit24rx28 18416201084002302132 184168010840183021318 18417901084047302142 18418301084069302152 184210010841163021549 18421301084125302162 184219010841333021610 18422501084170302182 18425301084206302192 18436101084272302202 184365010842813022011 18436901084352302227 184373010843603022215 18438001084378302233 18441201084419302243 18444001084454302253 18455501084524302264 18471201084615302294 184865010843683022223 18487501084739302342 18490301084775302352 18490801084788302363 18506501084878302393 18521801084962302421TableRowCorr 185221 185221244010851123024931085782302702tab0col4lookup_value8lookup_col12i16j20f24v28 18522601085167302502 185232010851833025018 18524501085218302512 18525601085243302522 18527001085276302532 185297010853213025347 18530101085327302542 18530501085343302558 185309010853473025512 18531501085362302564 18533001085397302574 185354010854663025842 18535701085479302594 18537001085526302605 185373010853523025517 18538501085557302638 185389010855613026312 18539501085576302644 185419010856563026542 18542201085669302664 185441010857173026652 185444010855663026317 18545301085735302692ExistsTableRowCorr 185465 185465247010857873027231086371302902tab0col4entry8i12k16v20f24kov28 18547001085834302732 185476010858503027318 18548701085879302742 18549001085902302752 18549301085908302762 185520010859493027643 18552701085960302777 185554010860053027752 18555801086011302782 18556801086037302797 185572010860413027911 18557901086055302803 18560301086090302813 185627010861553028168 18563001086167302823 18564001086186302837 185660010862293028350 18567201086245302847 185685010862813028443 185691010863033028513 185697010863193028529 185700010860463027916 18571001086360302892TableLookUpCorr 185712 185712489010865283029731087745303342tab0col14col28lookup_value12write_flag16write_value20cola124cola228i32j36v40f44 18571701086616302982 185723010866333029819 18573601086670302992 185742010866873029919 18575501086724303002 18576601086745303012 18577701086766303022 18578701086782303032 18579001086788303042 185817010868343030448 18582101086840303052 185848010868823030544 18585201086893303067 185856010869073030621 18586301086921303073 18587401086939303093 185902010870153030979 18590601087027303103 18591201087044303114 185925010870873031147 185932010871063031210 18593801087123303134 185958010871803031361 18596501087204303154 185971010872273031527 18597501087243303173 18598001087264303184 185986010872853031825 18600501087337303199 18602101087387303204 18603101087416303218 18605201087448303228 18608601087492303238 18612001087536303248 18613201087562303264 18613401087576303283 18614501087593303293 186173010876723033052 18617601087684303313 186179010869123030626 18618901087698303332ExistsTableLookUpCorr 186201 186201305010877503033631088513303582tab0col14col28lookup_value12cola116cola220i24j28f32 18620601087819303372 186212010878363033719 18622401087874303382 186230010878913033819 18624201087929303392 18624901087958303402 186260010879783034022 18627101087999303412 18628101088015303422 18628401088021303432 186311010880673034348 18631501088073303442 186342010881153034444 18634601088126303457 186350010881403034521 18635701088154303463 186394010882413034752 18639801088253303483 18640401088270303494 186426010883213034955 186432010883403035010 18643801088357303514 186467010884223035169 18647301088446303534 186488010884773035335 18649101088493303553 186494010881453034526 18650401088504303572TableLookUpEntry 186506 186506415010886583036531089689303922tab0col4index8write_flag12write_value16v20 18651101088716303662 186515010887303036616 18652601088774303672 186532010887903036718 18654501088825303682 18656501088874303693 186577010889193036948 18658101088934303712 18658601088954303723 18659601088981303737 18660801089025303745 18664301089078303757 18665501089122303765 18671601089216303787 18672801089260303795 18678801089354303817 18680901089397303827 18682101089441303835 18684601089489303853 18684801089501303872 18687201089541303882 18689601089614303893 186916010896663038955 18691801089678303912ExistsTableLookUpEntry 186921 18692193010896943039431089983304022tab0col4index8v12 18692601089735303952 186932010897513039518 18694301089780303962 18694601089803303972 18696401089855303982 18698801089895303992 18701101089975304012TableRowIsBlank 187014 18701479010901193040931090302304152tab0j4k8 18701901090150304107 187023010901543041011 18703701090174304113 18706701090234304123 187081010901653041022 18709001090294304142TableBlankOutRow 187093 18709362010903073041731090454304212tab0row4k8 18709801090336304182 187102010903483041814 18711301090396304197 187117010904003041911 18713101090418304203 187143010904113041922 18715201090453304211TableBlankOutColumn 187155 18715564010904593042331090626304282tab0col4n8k12 18716001090493304242 187164010905053042414 18717501090548304252 18718501090574304267 187189010905783042611 18719501090590304273 187207010905833042616 18721601090625304281TableBlankOutAll 187219 18721962010906313043031090782304352tab0n4k8 18722401090658304312 187228010906703043114 18723901090713304322 18724901090739304337 187253010907433043311 18725901090755304343 187269010907483043316 18727801090781304351TableBlankRows 187281 18728156010907873043731090944304432tab0i4j8c12 18728601090814304382 18729601090860304397 187300010908643043911 18730601090876304403 187319010909053044032 187325010908693043916 18733401090933304422TableFilledRows 187337 18733728010909493044531091017304472tab0 18734201090971304462TableBlankRow 187365 18736563010910223044931091185304552tab0i4j8 18737001091046304502 18738001091072304517 187384010910763045111 18739001091088304523 187403010911173045232 187406010910813045116 18741501091128304532 18742501091174304542TableRandomRow 187428 187428104010913213046231091570304712tab0i4j8k12 18743301091348304632 18744301091369304642 18745301091396304652 187457010914063046512 18746901091453304662 187475010914623046611 18748401091483304677 187488010914873046711 18749401091501304683 187507010915393046841 18751301091546304693 187517010915563046913 187520010914923046716 18752901091569304711TableSwapRows 187532 187532184010917053047831092024304892tab0i4j8k12l16v120v224 18753701091739304792 187543010917493047912 18754601091758304802 18755601091777304817 187560010917813048111 18756701091795304823 18759101091829304833 18761501091863304843 18764001091897304853 18766501091931304863 18768301091986304874 187703010917863048116 18771301092023304891TableCompareRows 187716 187716339010921623049631093234305292tab0col4row18row212dir16val120val224bl128bl232f36 18772101092223304972 187727010922393049718 18773901092275304982 18776301092315304992 18778701092355305002 187796010923823050029 18780901092427305012 187818010924543050129 18783101092499305022 18784301092539305033 187852010925663050330 18785401092578305043 187858010925963050421 18786001092644305063 18787301092684305077 187886010927163050739 18788801092732305087 18789501092753305103 187908010927853051035 18791101092799305113 18791301092813305132 187917010928223051311 18792001092835305142 187924010928443051411 18793101092860305152 18795101092884305162 18796001092917305173 187974010929543051740 18797701092966305183 18798001092985305199 18799101093013305203 188005010930573052047 18800801093069305213 18801101093088305229 18802001093118305233 188026010931353052320 18802901093147305243 18803201093170305263 188046010932073052640 18804901093219305273 18805201093233305291TableMoveRowDown 188055 188055222010933733053631093781305512tab0r14r28rx12k16l20m24v28f32 18806001093415305372 188066010934273053714 18806901093436305382 18807901093455305397 188083010934593053911 18809001093473305403 18809301093486305413 18811701093520305423 188126010935443054227 18813001093561305438 188134010935673054314 18814001093584305444 18816801093621305454 18819301093656305464 188202010936803054628 188206010935733054320 18821501093696305483 18824001093730305493 188244010937373054910 188264010934643053916 18827401093780305511TableShuffle 188277 18827776010939143055831094069305622tab0i4to8 18828201093938305592 18830201093986305602 18831201094019305617 188316010940233056111 188322010940343056122 188341010940293056117 18835001094068305621TableNextRow 188353 188353722010942033056931096455306382tab0col4row8dir12i16k20val24v28dv32min_dv36min_at40signed_arithmetic44f48blk52z56 18835801094287305702 188364010943033057018 18837601094339305712 18839601094363305722 188405010943923057231 18840901094405305732 18841601094762305842 18842001094780305853 18842401094811305867 188430010948253058621 188440010948473058643 18845001094881305887 188456010948953058821 188462010949093058835 18846901094938305909 18849301094976305912 188497010949993059125 188507010950243059150 18851101095054305932 18852101095075305942 18852801095098305958 188532010951023059512 18853901095120305967 18856301095159305977 18858701095231305988 18859101095247305997 18859501095265306008 18859901095277306015 188603010952913060119 188610010953033060131 18862101095336306025 18866901095459306055 18867501095475306065 18867901095502306075 18872101095590306105 18877601095716306137 188780010957253061316 188784010957383061329 188788010951073059517 18880201095773306168 188806010957773061612 18881301095795306177 18883701095834306187 18886101095906306198 18886501095922306207 18886901095940306218 18887301095955306228 188877010959693062222 188884010959823062235 18889501096015306235 18894301096138306265 18894901096154306275 18895301096181306285 18899501096269306315 18905001096395306347 189054010964043063416 189058010964173063429 189062010957823061617 18907201096439306372TableMoveBlanksToBack 189075 189075124010966003064531097046306602tab0fromrow4torow8i12fbl16lnbl20blc24 18908001096657306462 189086010966783064623 18908901096687306472 189092010966963064711 18909501096712306487 189099010967233064818 18910501096740306493 18911801096774306504 189122010967883065018 18912601096800306514 18913501096821306534 189139010967333064828 18914801096836306552 18916401096881306563 18917601096960306573 18919201097005306592TableSort 189199 189199199010971763066731097771306862tab0col4dir8test_flag12algorithm16i20j24k28f32 18920401097233306687 189208010972373066811 18922201097257306693 18923301097298306703 18925101097340306717 189263010972483066822 18927201097392306732 189278010974083067318 18929001097444306742 18930001097465306752 18931301097504306762 18931701097523306773 189323010975623067742 18933301097595306802 18934901097644306812 18937501097697306832 18937901097716306843 189385010977393068426 18939501097770306861PrintTableName 189398 18939872010979133069331098187307012T0 18940301097932306942 189416010979613069518 189422010979883069545 189434010980253069630 189440010980663069671 189452010980983069725 189458010981343069761 189461010981543069912 18946701098186307011TablePrint 189470 189470307010983323070831099037307332tab0i4j8k12row16col20v24tc28kov32 18947501098377307097 189479010983813070911 18949301098401307103 18950401098442307113 189522010983923070922 18953101098503307142 18954101098524307152 18955401098563307162 18958401098618307177 189588010986243071713 18959501098647307188 189599010986533071814 18961401098678307194 18963901098724307204 18965701098757307214 189666010987803072127 18967001098800307224 18969401098838307234 18971801098909307245 18972701098936307265 189740010989783072647 18974301098991307275 189749010986663071827 18975901099013307303 189765010986313071720 18977501099028307322TableRead 189777 189777819010992043074131101459308162tab0auxf4row8maxrow12col16ch20v24sgn28dg32j36tc40kov44 18978201099266307427 189786010992723074213 18980001099296307433 18981101099339307443 18982901099389307457 189841010992853074226 18985001099441307472 18986001099509307497 189864010995163074914 18987001099540307503 189880010995293074927 18988901099577307527 189893010995843075214 18990001099643307543 18991001099669307553 18991601099689307564 189934010997183075633 18994701099745307574 189959010997683075727 18997201099803307598 189976010998103075915 18999101099836307604 189997010998523076020 190003010998593076027 19000701099877307614 190019010998973076124 19002301099907307624 19004801099953307634 19006601099986307644 190075011000093076427 19007901100073307664 19008301100085307674 19008901100106307685 19009901100134307695 190105011001483076919 19010901100167307705 190115011001843077022 190125011002083077046 19012901100230307715 19013301100248307734 19016001100297307745 19017201100355307764 19019101100399307774 19019501100412307785 19022201100462307796 19025501100556307826 19027501100604307835 19028201100629307855 19028801100648307865 190299011006743078631 19030301100693307875 19030701100721307896 19031701100750307906 19032301100770307916 190334011007963079132 19033701100808307926 19035001100833307945 19035601100876307974 19038301100930307985 19040601101025308014 190418011010473080126 190431010998243075929 19044101101077308033 19045901101111308044 190484011011623080455 19048801101180308054 190500011011993080523 19050301101216308064 190516010995973075227 19052601101258308102 190550011012923081036 19056301101317308112 190569011013313081116 19057201101351308132 19058401101411308152PrintRank 190596 19059617011016183082431101890308362i0j4v8 19060101101884308352TableColumnDebug 190613 190613173011020253084331102423308582tab0col4k8i12v16tc20kov24 19061801102065308442 190624011020813084418 19063601102117308452 19064601102138308462 19067101102182308472 19068101102206308487 190685011022103084811 19069101102224308493 190697011022333084912 19070301102247308503 19072701102282308513 19075101102350308524 19076001102374308544 190770011022153084816 19077901102410308572 19078301102422308581TableRowDebug 190786 190786204011024283086031102856308772tab0i4col8k12v16tc20kov24 19079101102465308612 19080101102486308622 190813011025063086222 19082501102522308632 19084001102554308647 190844011025613086414 19085901102586308653 19086501102599308663 19089001102644308673 19090001102664308683 19092401102699308693 19094801102767308704 19095701102792308724 19096701102823308734 190973011025753086428 19098301102843308762 19098701102855308771TableDebug 190990 19099068011028613087931102994308832tab0i4k8 19099501102882308802 191004011029033088023 19101001102915308812 19102001102941308827 191024011029453088211 191030011029573088223 191040011029803088246 191046011029503088216 19105501102993308831HolderOf 191058 191058173011031373089031103327308952o0 19106301103150308912 191074011031933089145 19108001103210308922 191097011032413089233 19110901103269308932 191172011032913089324 19122901103310308942ParentOf 191231 19123168011033323089731103379309002o0 19123601103345308982 19124001103352308989 19129601103368308992CoreOf 191299 19129952011033843090231103498309052o0 19130401103395309032 191334011034623090369 19134801103487309042CoreOfParentOfCoreOf 191351 191351156011035033090731103746309122o0 19135601103528309082 191386011035953090869 19140001103620309092 19140401103627309099 19146001103643309102 191490011037103091069 19150401103735309112LocationOf 191507 191507194011038983091931104322309342o0 19151201103913309202 191544011039523092041 19154601103969309212 19156201103996309223 191622011040283092235 19162501104052309233 19163601104083309252 19165201104191309273 19166301104223309292 19166701104237309303 191683011042603093026 19168601104272309313 19169901104305309332CommonAncestor 191701 19170184011043273093631104524309452o10o24i8j12 19170601104354309372 19171601104372309382 19172601104397309407 191733011044063094016 191743011044033094013 19174701104442309418 191754011044513094117 191764011044483094114 19176801104483309424 191774011044953094216 19178301104507309442IndirectlyContains 191785 191785135011045293094731104884309572o10o24 19179001104556309482 19179601104605309492 19182801104659309503 19184201104699309513 19185601104738309523 19185801104750309542 19187301104792309557 191886011048343095549 191896011048123095527 191909011048533095568 19191801104875309562WhetherIn 191920 191920118011050343096431105338309762obj0 19192501105050309652 19195901105077309663 19197201105123309673 19197401105135309692 191990011051623096929 19200201105215309702 19201801105244309713 19202401105279309723 19202601105291309742 19203601105329309752ContainerOf 192038 192038154011054883098331105728309912A0p4 19204301105506309842 192059011055293098425 19207101105551309852 19212701105567309862 192131011055853098620 19213301105602309872 192149011056303098730 19215201105641309882 192168011056643098825 19217101105675309892 192187011057003098927 19219001105711309902TestContainmentRange 192192 192192233011057333099331106019310042obj0e4f8 19219701105764309942 19221301105795309953 19222001105795309953 19225101105852309964 192257011058633099615 19227001105875309973 19227201105895309992 19230501105940310003 192309011059583100021 19236601105979310013 19242301106002310032SupporterOf 192425 19242588011061653101131106294310162obj0p4 19243001106185310122 19248601106203310132 192490011062213101320 19249201106238310142 192508011062663101430 19251101106277310152CarrierOf 192513 192513120011064413102331106557310272obj0p4 19251801106459310242 19257401106477310252 192628011065293102554 19263101106540310262WearerOf 192633 192633120011067033103431106816310382obj0p4 19263801106720310352 19269401106738310362 192748011067883103652 19275101106799310372OwnerOf 192753 19275386011069613104531107055310492obj0p4 19275801106977310462 19281401106995310472 192834011070273104734 19283701107038310482MakePart 192839 192839207011071973105631107518310642P0Of4First8 19284401107219310572 192850011072363105719 19286201107282310582 192920011072973105817 192929011073073105827 19294301107322310592 192947011073433105923 192956011073583105938 19295901107369310602 192972011073933106026 19298101107409310612 19299801107435310622 19300901107464310632 193026011074883106326 19304301107517310641DetachPart 193046 193046206011075233106631107989310782P0From4Daddy8O12 19305101107551310672 193062011075793106730 19307801107610310682 193082011076343106826 193098011076653106857 19310101107676310692 19311601107712310703 19314001107759310713 193156011077903107134 19315901107807310737 193173011078373107337 193184011078343107334 19318801107864310743 19320301107899310754 19322701107945310764 193243011079763107635 19324901107988310781MoveObject 193252 193252559011081283108531109266311222F0T4opt8going_mode12was16L20 19325701108166310862 193261011081843108620 19327201108229310872 19328901108260310883 19330501108290310894 193318011083063108920 19334201108343310904 193363011083953109056 19338401108433310919 19339301108446310924 19339601108458310933 19340501108489310944 193418011085053109420 19343801108538310954 19344101108552310973 19345501108599310992 193471011086243109927 19348501108671311002 193494011086973110028 19350601108742311012 193522011087703110130 19353601108814311022 19357001108834311033 19358401108850311043 193620011088623110415 19362301108874311062 19363201108890311072 19363701108919311083 193643011089383110822 193653011089563110840 19365601108968311093 19367001109008311104 19368001109030311114 193684011090483111122 19369501109094311124 19370901109129311135 19376501109155311145 19377501109189311155 19378501109206311165 19379501109231311175 19379801109252311212 19380801109265311221RemoveFromPlay 193811 193811152011092713112431109649311322F0 19381601109290311252 193820011093083112520 19383101109355311262 193837011093723112619 19384801109418311272 193864011094413112725 19387501109486311282 193888011095213112837 19389901109565311292 193913011095793112916 19392201109595311302 193938011096223113029 19395101109638311312 19396001109648311321OnStage 193963 193963288011097873113931110311311562O0set4x8 19396801109805311402 19398301109837311412 19398901109854311423 19400701109890311434 19402301109923311444 19403801109959311454 19405401109992311464 194070011100213114633 194103011100473114659 19410601110059311474 194117011100833114728 194121011100923114737 194125011100993114744 19412901110114311484 194185011101293114819 194189011101383114828 194193011101453114835 19419701110160311494 19420301110176311522 19421401110197311532 194222011102243115329 19423101110244311542 194239011102713115429 19424901110302311552PlayerTo 194251 194251131011104583116331110906311772newplace0flag4L8 19425601110488311645 19426601110518311655 194270011105363116523 19428101110580311662 194284011105933116615 19428801110613311675 19429801110642311685 19430201110660311695 19430601110690311705 19431301110717311715 19432001110746311725 19432701110774311735 194331011107893117320 19434301110801311745 194349011108163117420 19436301110843311755 194369011108583117520 19437601110892311765 19437901110905311771MoveDuringGoing 194382 19438247011110533118431111191311902F0T4 19438701111075311852 19440601111103311862 19441201111128311873 19442201111161311883 19442601111190311901FoundEverywhere 194429 19442960111133731197311113623119728 194432011113543119720BackdropEverywhere 194435 19443574011115103120431111647312102O0 19444001111533312052 19445601111564312063 19448901111592312073 19450701111638312092ChangePlayer 194509 194509356011117963121731112643312392obj0flag4 19451401111820312182 194530011118513121833 19454201111896312192 194555011119223121928 19456701111975312202 194580011120013122028 19459201112048312212 194598011120673122121 19460101112080312235 19461501112108312245 194649011121383122435 19466301112163312255 19467201112193312266 19469701112243312276 19472001112309312295 19472401112327312305 19473301112357312316 19475801112412312335 194792011124373123330 19480601112494312345 19483401112529312365 194844011125603123636 19484801112590312375 19485501112617312385 19486201112642312391MoveFloatingObjects 194865 194865510011127893124631113867312742toroom0i4k8l12m16address20flag24 19487001112839312472 194874011128623124725 19487801112890312485 194882011129133124828 19488501112925312495 19489201112950312509 19490301112981312519 194943011130313125213 194965011130803125317 194975011131513125517 194991011131763125542 195004011132173125624 195040011132343125641 195053011132833125817 195064011133213125922 195067011133273125928 195078011133693126021 195089011134063126121 195103011134273126142 195107011134733126221 195149011135313126325 195185011135513126345 195195011135933126425 195199011133423125943 195209011136623126717 195213011136833126738 195249011137003126755 195258011137383126913 195332011138043127014 19537201113866312741MoveBackdrop 195375 195375113011138723127631114124312842bd0D4x8address12 19538001113902312772 195396011139343127734 19540801113980312782 19542301114013312793 19543401114039312803 19544801114064312819 19546501114082312822 19547801114100312832 19548501114123312841BackdropLocation 195488 195488392011142713129131115166313272O0target4address8m12x16i20k24l28r32sl36 19549301114322312922 195527011143403129220 19552901114357312932 19560001114433312943 19560301114456312952 19561401114480312962 19561901114502312973 19563001114526312988 195633011145323129814 19564401114557312994 19565501114577313004 19567001114604313015 19567401114623313025 19567801114642313036 19568201114666313046 19569401114685313056 195698011146993130520 195702011147143130535 19570801114749313076 19571501114749313076 19573101114788313087 19573501114808313097 19574701114828313107 195751011148423131021 195755011148573131036 19576801114886313135 19577501114917313155 19579101114949313166 19579801114949313166 19581401114986313177 19582701115028313188 19583801115064313199 19585401115092313216 195865011151203132134 195868011145473129829 19587801115149313262WearObject 195880 19588073011153113133431115410313382X0P4opt8 19588501115332313352 19588801115357313362 195924011153723133617 19593601115396313372 19595001115409313381MapConnection 195953 195953197011155553134531116050313602from_room0dir4in_direction8through_door12 19595801115612313472 19599201115679313483 19607301115769313503 196089011158033135037 19609201115826313513 19610801115865313524 19611101115884313534 19611501115909313544 19612601115951313554 19612901115970313564 196145011160043135638 19614801116033313592DoorFrom 196150 19615037011160553136231116162313662obj0dir4rv8 19615501116077313632 19616601116109313642 196182011161333136426 19618501116145313652RoomOrDoorFrom 196187 196187157011161673136831116464313752obj0dir4use_doors8in_direction12sl16through_door20 19619201116231313692 19622601116292313703 19630701116376313723 196339011164213137248 19634201116447313742AssertMapConnection 196344 196344243011164693137731116888313902r10dir4r28in_direction12 19634901116514313782 19635601116534313792 19643701116615313812 19645701116678313823 19653801116747313833 19654101116759313852 19655701116797313863 19656901116838313873 19657201116850313892 19658401116887313901AssertMapUnconnection 196587 196587213011168933139231117224314032r10dir4r28in_direction12 19659201116940313932 19659901116960313942 19668001117041313962 19669601117069313973 19670801117110313983 19671101117122314002 19671701117148314013 19679701117215314022TestAdjacency 196800 196800156011173723141031117671314172R10R24i8row12 19680501117400314112 196821011174263141128 19683401117476314127 196850011175023141233 19686001117547314132 19687501117589314147 196881011176113141429 196893011175943141412 19689901117625314153 19695401117662314162TestRegionalContainment 196956 196956248011178303142431118302314422obj0region4o8 19696101117869314252 19696701117923314262 19699901117967314273 19703201117997314283 19703901117997314283 19705501118031314294 19706801118075314305 19709101118119314323 19709301118131314342 197109011181603143431 19711901118184314352 19712201118213314362 19713301118234314372 19713701118248314383 19714301118274314393 19720201118293314412FrontSideOfDoor 197204 197204110011184373144931118587314522D0 197209011184563144922 19722401118492314502 197237011185173145027 19725701118556314512BackSideOfDoor 197314 19731456011185923145431118739314572D0 197319011186103145421 19733401118646314552 197347011186713145527 19736801118710314562OtherSideOfDoor 197370 19737051011187443145931118910314672D0from_room4rv8 19737501118777314602 19739101118804314613 19739401118822314623 19740401118858314633 19741501118878314643 19741801118898314662DirectionDoorLeadsIn 197421 19742151011189153146931119091314772D0from_room4rv8dir12 19742601118957314702 19744201118984314713 19744501119002314723 19745501119038314733 19746601119059314743 19746901119079314762TestVisibility 197472 19747291011192403148431119367314882A0B4 19747701119261314852 19754701119308314862 19755101119342314872TestTouchability 197563 197563181011195183149531119866315032A0B4rv8 19756801119544314962 197600011195823149640 19761701119619314972 197649011196573149740 19766601119694314982 197679011197233149831 19768601119740314997 19769901119779315002 197731011198173150040 19773801119841315012 19774101119858315022TestConcealment 197744 19774457011200163151031120194315162A0B4 19774901120038315112 19778101120088315123 19778601120117315133 19779901120185315152Cond_Token_12 197801 19780117011203363152531120437315282 19780401120356315265 197813011203913152640 19781501120419315275Cond_Token_13 197818 19781817011204413152931120542315322 19782101120461315305 197830011204963153040 19783201120524315315Cond_Token_14 197835 19783517011205463153331120647315362 19783801120566315345 197847011206013153440 19784901120629315355Cond_Token_15 197852 19785217011206513153731120752315402 19785501120671315385 197864011207063153840 19786601120734315395DECIMAL_TOKEN 197869 197869453011208933154931122404315992wnc0wna4r8n12wa16wl20sign24base28digit32digit_count36original_wn40group_wn44 19787401120976315502 197879011209863155012 197884011210043155030 19788901121021315522 19789401121032315532 19790501121085315542 197919011211363155453 19792201121147315552 19792701121158315562 19793801121181315572 19794901121203315582 197953011212133155812 197957011212243155823 19796001121242315592 19804401121341315613 19804701121359315622 198061011213793156222 198065011213903156233 198071011213963156239 19807701121405315632 198081011214183156315 19808401121436315642 19808701121444315652 19809301121463315663 198107011214813156621 19812801121514315678 19814201121537315683 19814801121554315693 19815801121577315708 198164011216003157031 19817701121941315825 198183011219643158228 19818601121985315835 19819201122015315846 198201011220343158425 19820401122056315856 19821301122084315867 198225011221123158635 19822801122135315877 198240011221643158736 19825201122214315918 198258011222363159130 19826101122259315933 198272011222913159335 19828501122318315948 19828801122337315953 19829401122343315959 19830401122353315972 198311011223773159726 19831901122384315982TRUTH_STATE_TOKEN 198322 19832264011225423160631122801316152original_wn0wd4 19832701122577316072 19833201122597316092 19833701122616316102 19834501122641316112 198354011226613161122 198359011226803161141 19836201122702316122 198371011227233161223 198375011227423161242 19837801122764316132 19838301122783316142NUMBER_TY_Abs 198386 198386180112294131622311229893162251x0 198391011229583162220 198396011229673162229 198401011229783162240REAL_NUMBER_TY_Say 198404 19840417011231553163131123198316332fp0 19840901123179316322 19841801123197316331REAL_NUMBER_TY_Compare 198421 19842127011232033163531123324316412r10r24 19842601123234316362 19843301123254316372 19844001123276316382 19844301123294316399 19844501123312316409NUMBER_TY_to_REAL_NUMBER_TY 198448 198448130112332931643311233993164373int0real4 198453011233673164341 198458011233853164359REAL_NUMBER_TY_to_NUMBER_TY 198461 198461130112340331644311234733164473real0int4 198466011234413164441 198471011234603164460REAL_NUMBER_TY_Sin 198474 198474130112347831646311235313164656in0out4 198479011235053164630 198484011235183164643REAL_NUMBER_TY_Cos 198487 198487130112353531647311235883164756in0out4 198492011235623164730 198497011235753164743REAL_NUMBER_TY_Tan 198500 198500130112359231648311236453164856in0out4 198505011236193164830 198510011236323164843REAL_NUMBER_TY_Arcsin 198513 198513130112364931649311237063164960in0out4 198518011236793164933 198523011236933164947REAL_NUMBER_TY_Arccos 198526 198526130112371031650311237673165060in0out4 198531011237403165033 198536011237543165047REAL_NUMBER_TY_Arctan 198539 198539130112377131651311238283165160in0out4 198544011238013165133 198549011238153165147REAL_NUMBER_TY_Sinh 198552 19855245011238333165331123968316602in0tmp4out8 19855701123866316542 19856201123880316552 19857201123898316562 19857701123912316572 19858401123932316582 19859401123955316592REAL_NUMBER_TY_Cosh 198597 19859745011239733166231124108316692in0tmp4out8 19860201124006316632 19860701124020316642 19861701124038316652 19862201124052316662 19862901124072316672 19863901124095316682REAL_NUMBER_TY_Tanh 198642 19864235011241133167131124241316762in0tmp4out8 19864701124146316722 19865701124178316732 19866701124209316742 19867401124228316752REAL_NUMBER_TY_Reciprocal 198677 198677180112424631678311243113167868in0out4 198682011242803167837 198692011242983167855REAL_NUMBER_TY_Negate 198695 198695180112431531679311243763167964in0out4 198700011243453167933 198710011243633167951REAL_NUMBER_TY_Plus 198713 198713150112438031680311244373168060x0y4out8 198718011244093168032 198725011244243168047REAL_NUMBER_TY_Minus 198728 198728150112444131681311244993168161x0y4out8 198733011244713168133 198740011244863168148REAL_NUMBER_TY_Times 198743 198743150112450331682311245613168261x0y4out8 198748011245333168233 198755011245483168248REAL_NUMBER_TY_Divide 198758 198758150112456531683311246243168362x0y4out8 198763011245963168334 198770011246113168349REAL_NUMBER_TY_Remainder 198773 198773160112462831684311246883168463x0y4r8q12 198778011246623168437 198786011246773168452REAL_NUMBER_TY_Approximate 198789 19878937011246923168531124855316912x0y4quotient8out12 19879401124738316862 19880101124759316872 19881101124792316882 19881601124819316892 19882301124842316902REAL_NUMBER_TY_Root 198826 198826130112485931692311249123169256x0out4 198831011248863169230 198836011248993169243REAL_NUMBER_TY_Cube_Root 198839 198839180112491631693311249813169368x0out4 198844011249483169335 198854011249683169355REAL_NUMBER_TY_Pow 198857 198857150112498531694311250403169458x0y4out8 198862011250133169431 198869011250273169445REAL_NUMBER_TY_Exp 198872 198872130112504431695311250953169554x0out4 198877011250703169529 198882011250823169541REAL_NUMBER_TY_Log 198885 198885130112509931696311251503169654x0out4 198890011251253169629 198895011251373169641REAL_NUMBER_TY_BLog 198898 19889846011251543169731125295317062x0n4d8out12 19890301125186316982 19890801125199316992 198914011252123169915 19892401125235317013 19892901125250317023 19893401125264317042 19894101125282317052REAL_NUMBER_TY_Floor 198944 198944130112529931707311253543170758x0out4 198949011253273170731 198954011253413170745REAL_NUMBER_TY_Ceiling 198957 198957130112535831708311254143170859x0out4 198962011253883170833 198967011254013170846REAL_NUMBER_TY_Abs 198970 198970150112541831709311254633170948x0 198975011254403170925REAL_NUMBER_TY_Nan 198985 198985150112546731710311255273171063x0 198990011254893171025 198995011255053171041 198997011255193171055M_0 001125539317121011255503171221M_1 106535321601125561317131011255793171328M_HALF 105696460801125590317141011256083171428M_THIRD 105137220301125625317151011256443171529M_LOG10 107501095801125661317161011256803171629M_N1-108213043201125701317171011257193171728M_PI 107853001101125735317181011257533171828M_NPI-106895363701125764317191011257823171928M_2PI 108691861901125793317201011258113172028M_PI2 107014140301125829317211011258473172128M_NPI2-107734224501125865317221011258833172228M_E 107675451601125895317231011259133172328M_E2 108923779801125924317241011259423172428M_N0-214748364801125959317251011259773172528M_INF 213909504001126004317261011260223172628M_NINF -838860801126044317271011260623172728M_NAN 213909504101126093317281011261113172828M_NNAN -838860701126147317291011261653172928FloatParse 199000 199000805011274983176031130066318952buf0len4useall8res12ix16val20ch24ten28negative32intpart36fracpart40fracdiv44expon48expnegative52count56 19900501127694317682 19900901127710317693 19901501127732317712 19901801127741317722 19902101127760317732 19902401127774317742 19902701127789317752 19903201127836317782 19904301127851317792 19904901127870317803 19905301127889317813 19906201127904317837 19906801127923317843 19907401127965317887 199080011279843178826 199092011279753178817 19909801128003317893 19910901128019317903 19912101128048317914 19912401128057317923 19913001128077317933 19913501128096317943 19914201128125317953 19915201128201317992 19917401128235318003 19918001128243318013 199188011282813180220 199200011282723180211 19920601128301318034 19921701128318318044 19922901128348318055 19923201128358318064 19923801128379318074 19924301128399318084 19925001128431318094 19925701128463318104 19926701128496318123 19927401128603318162 19927801128621318173 19928401128686318202 19929101128739318232 19935501128815318243 19938001128876318264 19938601128885318274 19939201128904318285 19940201129003318324 19942301129042318335 19943201129051318344 19943801129070318355 19944401129091318364 19948201129136318375 19948801129157318384 19949401129166318394 19951501129205318405 19952401129214318414 19953001129233318425 19953601129254318434 19955101129278318445 19955701129299318454 19956301129308318464 19957801129332318475 19958401129353318484 19959001129362318494 19960501129386318505 19961101129407318514 19961701129450318553 19962001129473318563 19963101129489318573 19963701129509318584 19964101129532318594 19965001129549318618 19965601129569318624 19966201129582318653 19966501129628318678 199671011296473186727 199683011296383186718 19968901129667318684 19970001129684318694 19971201129714318705 19971501129724318714 19973201129762318743 19973601129781318754 19974201129802318773 19974601129822318784 19975001129841318803 19975401129857318814 19975901129881318824 19976601129904318834 19977301129932318872 19977701129979318893 19978601130007318922 19979601130034318933 19980201130053318942FLOAT_TOKEN 199805 199805382011310083191431132408319702buf0bufend4ix8ch12firstwd16newstart20newlen24lastchar28lastwasdot32 19981001131083319152 19981801131105319163 19982101131189319192 19982601131204319202 19983701131228319212 19984101131243319222 19984401131259319242 19985301131287319253 19986401131317319263 19987001131456319294 19993201131637319335 19993601131655319363 19994701131687319378 199950011316943193715 19995701131717319384 19996801131739319394 20004101131859319415 200044011317063193727 20005401131872319433 20006001131973319464 20006301132008319493 20006901132038319503 20007701132046319513 20009101132074319523 20011801132126319552 20012901132193319573 20013701132201319583 20014301132216319612 20015001132262319633 20015301132284319662 20017101132336319672 20018101132370319683 20018401132388319692Float 200187 20018762011330153198331133271319942val0prec4pval8 20019201133039319842 20020101133065319862 20020501133089319872 20021501133137319882 20022501133198319912 20023701133242319932PowersOfTen 523883404false0113327431996111333603199687FloatExp 200249 200249310011337113200431136112321112val0prec4log10val8expo12fexpo16idig20ix24pow1028 20025401133767320052 20025801133784320063 20026201133795320072 20026801133811320083 20027201133822320092 20031801133887320122 20032901133912320133 20033201133931320143 20034101133960320172 20034701133981320182 20035301134003320202 20035701134022320213 20036001134034320223 20036301134046320233 20036601134158320292 20037001134172320302 20037901134225320312 20038401134249320322 20038901134342320352 20039501134368320362 20039901134386320372 20040301134403320382 20041101134427320392 20041401134687320442 20041801134874320512 20042801135038320553 20043401135048320563 20044001135233320622 20044601135254320633 20045101135273320643 20045401135298320653 20046001135321320663 20046601135342320673 20047501135377320717 200478011353843207114 20048401135405320723 20048901135427320733 20049301135444320743 20049501135461320753 20049901135477320764 20050201135496320773 200508011353953207125 20051701135687320833 20052401135716320843 20053001135735320853 20053301135754320863 20053601136037321022 20053901136055321052 20054601136068321062 20054901136086321092 20055601136104321102FloatDec 200559 200559355011364563211931139141322242val0prec4log10val8int12fint16extra020frac24idig28ix32pow1036 20056401136522321202 20056801136539321213 20057201136550321222 20057801136566321233 20058201136577321242 20062801136643321272 20063901136668321283 20064201136687321293 20065101136716321322 20065701136737321332 20066301136850321382 20066601136863321392 20067701136915321402 20068201137029321442 20069101137311321503 20069501137327321513 20070401137381321523 20070901137409321533 20071501137491321553 20071901137512321563 20072401137536321573 20073201137561321583 20073501137764321623 20073901137813321662 20074201137835321677 200745011378423216714 20075101137862321683 200754011378543216726 20076301137881321702 20076601137954321742 20077001137969321752 20077901138022321762 20078301138040321772 20078801138063321782 20079601138087321792 20079901138255321832 20080301138412321892 20080901138609321933 20081501138792321992 20082101138813322003 20082601138832322013 20082901138857322023 20083501138880322033 20084101138901322043 20085001138931322082 20085601138958322097 200859011389653220914 20086501138985322103 20087001139007322113 20087401139024322123 20087601139041322133 200882011389753220924 20089101139066322152 20089401139084322182 20090101139097322192 20090401139115322222 20091101139133322232PrintInfinity 200914 20091410011391463222631139206322292 20091701139162322272 20092101139205322291PrintNan 200924 20092410011392113223131139266322342 20092701139222322322 20093101139265322341PrintMultiplicationSign 200934 20093422011392713223631139363322412 20093701139297322372 20094301139309322382 20094701139330322392 20095301139362322411RoundOffTime 200956 200956102011396943225631139784322592t10t24 20096101139715322572 200966011397283225715 20101001139755322582NUMBER_TY_to_TIME_TY 201058 20105828011399283226631140006322702n0 20106301139953322672 20107001139966322682 201075011399773226813 20108301139995322692SquareRoot 201086 201086151011401413227731140947323082num0op4res8one12n16x20 20109101140180322795 201096011401953227920 201105011402293227954 20110801140314322835 20111401140335322845 20111801140352322859 20112301140375322869 20112801140394322879 20113301140418322889 20113601140448322912 20114001140459322922 201145011404743229217 201154011405083229251 20115701140588322947 201167011406243229443 201173011406143229433 20118201140641322962 20118601140785322983 20119601140811322994 20120601140835323004 20121901140868323024 20122501140887323043 20123401140934323072CubeRoot 201237 201237200011410803231531141620323362num0neg4x8y12n16 20124201141176323185 20124801141197323195 20125201141214323209 201257011412413232113 201261011412653232213 20126501141295323249 20127001141318323259 20128001141364323269 20128501141388323279 201289011414093232813 201294011414473233013 20129701141478323332 201302011414913233315 201319011415193233343 20132901141546323347 201335011415763233437 201411011415513233412 20143401141609323352PrintTimeOfDay 201437 201437114011417603234331142023323492t0h4aop8 20144201141785323442 201447011417963234413 201453011418153234432 20145601141826323452 201463011418513234527 201470011418633234539 201480011418923234568 20148701141905323462 201493011419213234618 201497011419313234628 20150101141938323472 20151001141953323482 201520011419743234823 201526011419853234834 20154801142022323491PrintTimeOfDayEnglish 201551 201551200011421643235631142640323692t0h4m8dir12aop16 20155601142202323572 201566011422253235725 201572011422413235741 201576011422513235751 20158001142258323582 201584011422703235814 201599011423003235844 20160201142311323592 20160901142326323602 201615011423473236023 201621011423633236039 201631011423773236053 201635011423873236063 201639011423933236069 20164601142408323612 201656011424363236217 201671011424643236245 201680011424893236312 20168901142513323647 20169701142533323655 201703011425453236517 201712011425673236539 20171801142597323682 20174801142639323691TIME_TOKEN 201751 201751832011427773237631144977324452first_word0second_word4at8length12flag16illegal_char20offhour24hr28mn32i36original_wn40 20175601142870323782 20176101142890323802 20176601142909323812 20177401142942323822 201787011429783238315 201791011429973238334 201812011430363238421 20181801143068323853 20182101143120323882 201836011431443238826 20185101143177323897 201854011431823238912 20186101143201323903 20188001143226323919 201899011432663239149 20190601143287323929 201976011433753239413 201980011431923238922 20199001143404323972 202006011434503239748 20200901143465323982 20201401143484323998 202020011435013239925 202032011434893239913 202047011435163239940 20206901143541324003 20207501143560324018 202084011435753240123 202096011435653240113 202102011435903240138 20212401143615324023 20213001143629324033 20213801143664324043 20215201143724324053 202159011437493240528 20216201143768324063 202180011438013240636 20218801143809324073 20219101143859324102 20219501143874324112 202204011439003241128 20220801143922324122 202217011439513241231 20222101143976324132 202226011439933241319 20224101144021324142 202252011440613241442 20225501144079324152 20226301144113324162 20230001144193324194 202304011442073241918 202310011442203241931 20233601144301324224 202340011443153242218 20235101144338324234 20235601144357324245 202384011444093242524 202400011444353242618 202406011444573242715 20240901144488324304 202415011445023243018 20241801144522324314 20242701144553324325 202433011445713243223 202439011445773243229 202444011445873243239 20244801144602324344 202456011446083243410 20246701144672324374 202471011446863243718 20249201144711324384 202503011447413243834 20250601144761324394 202514011447673243910 20252201144804324412 20253601144863324422 202542011448863244225 20254501144904324432 202572011449503244348 20258001144957324442HoursMinsWordToTime 202583 20258399011449823244731145279324542hour0minute4word8x12 20258801145023324482 202594011450393244818 20259701145051324492 202603011450753244926 20260601145087324502 202616011451153245030 202622011451313245046 20262501145142324512 202632011451643245124 202641011451823245142 20264801145205324522 202672011452453245242 20267901145268324532RELATIVE_TIME_TOKEN 202682 202682335011454223246131146518325032first_word0second_word4offhour8mult12mn16original_wn20 20268701145495324622 20269201145514324632 20269701145535324652 202705011455673246534 20271301145574324662 202731011456073246635 202738011456183246646 20274901145642324685 20275601145663324693 20276401145697324703 202773011457233247029 20277701145746324713 202786011457753247132 20279001145801324723 20279501145823324734 20280301145859324744 202812011458843247429 20282001145920324754 202829011459453247529 20283701145981324764 20284601146014324775 20285101146043324785 20285401146073324813 20285701146097324832 20286501146106324852 20287301146139324862 202895011461843248724 202920011462133248820 202927011462353248912 20293001146256324912 20293701146282324922 20294301146302324933 20295401146322324943 20296101146344324954 20296901146353324964 20297701146388324974 20299501146433324985 20300601146477324999 20301401146498325022DuringSceneMatching 203017 20301790011466633251031146801325142prop0sc4 20302201146698325117 203025011467043251113 20303101146738325123 203096011467303251139 20310501146792325132SceneUtility 203107 203107470011469403252131147417325342sc0task4 20311201146963325222 203117011469763252215 20311901146987325232 20313101147011325243 203193011470443252436 20320801147106325263 203272011471393252636 20328401147191325282 20329401147212325296 20337001147281325306 20343701147317325316 20351301147384325326 20357401147416325341CV_POS -101147567325431011475783254321CV_NEG -201147589325441011476003254421CV_MODAL -301147611325451011476243254523CV_MEANING -401147635325461011476503254625ConjugateVerb_0 203577 203577626011476543254731149538326042fn0vp4t8modal_to12 20358201147814325535 203592011478393255412 203608011478623255512 203624011478873255612 203640011479203255719 203648011479543255821 203661011480033256013 203672011480353256120 203682011480723256224 203697011481073256324 203712011481433256424 203727011481783256524 203742011482143256624 203757011482503256724 203774011483003256920 203784011483373257024 203799011483733257124 203814011484103257224 203829011484463257324 203844011484833257424 203859011485203257524 203874011485713257720 203880011485863257735 203889011486133257762 203904011486533257820 203919011486903257920 203936011487493258213 203947011487813258320 203957011488183258424 203972011488573258524 203987011488973258624 204002011489363258724 204017011489763258824 204032011490163258924 204049011490703259120 204059011491073259224 204074011491473259324 204089011491883259424 204104011492283259524 204119011492693259624 204134011493103259724 204149011493653259920 204155011493803259935 204164011494113259966 204179011494553260020 204194011494963260120 20420001149537326041ConjugateVerb_1 204203 204203187011495423260531150212326282fn0vp4t8modal_to12 20420801149702326115 204218011497273261212 204234011497623261312 204250011497863261412 204266011498203261519 204274011498543261621 204286011499033261813 204296011499353261920 204302011499503261935 204311011499723261957 204326011500073262020 204341011500623262313 204351011500943262420 204357011501093262435 204366011501353262461 204381011501743262520 20438701150211326281ConjugateVerb_2 204390 204390310011502163262931151215326582fn0vp4t8modal_to12 20439501150376326355 204405011504013263612 204421011504263263712 204437011504503263812 204453011504843263919 204461011505183264021 204474011505683264213 204484011506003264320 204490011506153264335 204499011506373264357 204514011506723264420 204529011507043264520 204535011507193264535 204544011507453264561 204559011507843264620 204574011508203264720 204591011508813265013 204601011509133265120 204607011509283265135 204616011509603265167 204631011510023265220 204646011510433265320 204652011510583265335 204661011510883265365 204676011511313265420 204691011511713265520 20469701151214326581ConjugateVerb_3 204700 204700310011512193265931152201326882fn0vp4t8modal_to12 20470501151379326655 204715011514043266612 204731011514273266712 204747011514523266812 204763011514853266919 204771011515193267021 204784011515683267213 204794011516003267320 204800011516153267335 204809011516383267358 204824011516713267420 204839011517033267520 204845011517183267535 204854011517453267562 204869011517853267620 204884011518223267720 204901011518813268013 204911011519133268120 204917011519283268135 204926011519553268162 204941011519923268220 204956011520283268320 204962011520433268335 204971011520743268366 204986011521183268420 205001011521593268520 20500701152200326881ConjugateVerb_4 205010 205010310011522053268931153255327182fn0vp4t8modal_to12 20501501152365326955 205025011523903269612 205041011524173269712 205057011524453269812 205073011524813269919 205081011525153270021 205094011525643270213 205104011525963270320 205110011526113270335 205119011526373270361 205134011526743270420 205149011527103270520 205155011527253270535 205164011527553270565 205179011527983270620 205194011528383270720 205211011529013271013 205221011529333271120 205227011529483271135 205236011529823271169 205251011530263271220 205266011530693271320 205272011530843271335 205281011531183271369 205296011531653271420 205311011532093271520 20531701153254327181ConjugateVerb_5 205320 205320310011532593271931154276327482fn0vp4t8modal_to12 20532501153419327255 205335011534443272612 205351011534693272712 205367011534953272812 205383011535303272919 205391011535643273021 205404011536133273213 205414011536453273320 205420011536603273335 205429011536843273359 205444011537193273420 205459011537533273520 205465011537683273535 205474011537963273563 205489011538373273620 205504011538753273720 205521011539363274013 205531011539683274120 205537011539833274135 205546011540153274167 205561011540573274220 205576011540983274320 205582011541133274335 205591011541453274367 205606011541903274420 205621011542323274520 20562701154275327481ConjugateVerb_6 205630 205630310011542803274931155347327782fn0vp4t8modal_to12 20563501154440327555 205645011544653275612 205661011544933275712 205677011545223275812 205693011545593275919 205701011545933276021 205714011546423276213 205724011546743276320 205730011546893276335 205739011547163276362 205754011547543276420 205769011547913276520 205775011548063276535 205784011548373276566 205799011548813276620 205814011549223276720 205831011549863277013 205841011550183277120 205847011550333277135 205856011550683277170 205871011551133277220 205886011551573277320 205892011551723277335 205901011552073277370 205916011552553277420 205931011553003277520 20593701155346327781ConjugateVerb_7 205940 205940310011553513277931156428328082fn0vp4t8modal_to12 20594501155511327855 205955011555363278612 205971011555643278712 205987011555943278812 206003011556323278919 206011011556663279021 206024011557163279213 206034011557483279320 206040011557633279335 206049011557903279362 206064011558283279420 206079011558663279520 206085011558813279535 206094011559133279567 206109011559583279620 206124011560003279720 206141011560643280013 206151011560963280120 206157011561113280135 206166011561463280170 206181011561913280220 206196011562353280320 206202011562503280335 206211011562863280371 206226011563353280420 206241011563813280520 20624701156427328081ConjugateVerb_8 206250 206250310011564323280931157509328382fn0vp4t8modal_to12 20625501156592328155 206265011566173281612 206281011566453281712 206297011566753281812 206313011567133281919 206321011567473282021 206334011567973282213 206344011568293282320 206350011568443282335 206359011568713282362 206374011569093282420 206389011569473282520 206395011569623282535 206404011569943282567 206419011570393282620 206434011570813282720 206451011571453283013 206461011571773283120 206467011571923283135 206476011572273283170 206491011572723283220 206506011573163283320 206512011573313283335 206521011573673283371 206536011574163283420 206551011574623283520 20655701157508328381ConjugateVerb_9 206560 206560310011575133283931158649328682fn0vp4t8modal_to12 20656501157673328455 206575011576983284612 206591011577303284712 206607011577633284812 206623011578043284919 206631011578383285021 206644011578883285213 206654011579203285320 206660011579353285335 206669011579663285366 206684011580083285420 206699011580493285520 206705011580643285535 206714011580993285570 206729011581473285620 206744011581923285720 206761011582603286013 206771011582923286120 206777011583073286135 206786011583463286174 206801011583953286220 206816011584433286320 206822011584583286335 206831011584973286374 206846011585493286420 206861011585983286520 20686701158648328681ConjugateVerb_10 206870 206870310011586533286931159722328982fn0vp4t8modal_to12 20687501158814328755 206885011588393287612 206901011588673287712 206917011588963287812 206933011589333287919 206941011589673288021 206954011590173288213 206964011590493288320 206970011590643288335 206979011590913288362 206994011591293288420 207009011591663288520 207015011591813288535 207024011592123288566 207039011592563288620 207054011592973288720 207071011593613289013 207081011593933289120 207087011594083289135 207096011594433289170 207111011594883289220 207126011595323289320 207132011595473289335 207141011595823289370 207156011596303289420 207171011596753289520 20717701159721328981ConjugateVerb_11 207180 207180310011597263289931160771329282fn0vp4t8modal_to12 20718501159887329055 207195011599123290612 207211011599383290712 207227011599663290812 207243011600023290919 207251011600363291021 207264011600863291213 207274011601183291320 207280011601333291335 207289011601593291361 207304011601953291420 207319011602313291520 207325011602463291535 207334011602763291565 207349011603193291620 207364011603593291720 207381011604213292013 207391011604533292120 207397011604683292135 207406011605013292168 207421011605443292220 207436011605863292320 207442011606013292335 207451011606353292369 207466011606823292420 207481011607263292520 20748701160770329281ConjugateVerb_12 207490 207490310011607753292931161786329582fn0vp4t8modal_to12 20749501160936329355 207505011609613293612 207521011609863293712 207537011610113293812 207553011610463293919 207561011610803294021 207574011611303294213 207584011611623294320 207590011611773294335 207599011612013294359 207614011612363294420 207629011612693294520 207635011612843294535 207644011613113294562 207659011613513294620 207674011613883294720 207691011614493295013 207701011614813295120 207707011614963295135 207716011615283295167 207731011615703295220 207746011616113295320 207752011616263295335 207761011616573295366 207776011617013295420 207791011617423295520 20779701161785329581ConjugateVerb_13 207800 207800310011617903295931162801329882fn0vp4t8modal_to12 20780501161951329655 207815011619763296612 207831011620013296712 207847011620263296812 207863011620613296919 207871011620953297021 207884011621453297213 207894011621773297320 207900011621923297335 207909011622163297359 207924011622513297420 207939011622843297520 207945011622993297535 207954011623263297562 207969011623663297620 207984011624033297720 208001011624643298013 208011011624963298120 208017011625113298135 208026011625433298167 208041011625853298220 208056011626263298320 208062011626413298335 208071011626723298366 208086011627163298420 208101011627573298520 20810701162800329881ConjugateVerb_14 208110 208110342011628053298931163986330222fn0vp4t8modal_to12 20811501162966329955 208125011629913299612 208141011630263299712 208157011630633299812 208173011631083299919 208181011631423300021 208194011631923300213 208204011632243300320 208220011632603300420 208235011632983300520 208241011633133300535 208250011633523300574 208265011634043300620 208280011634533300720 208295011635013300820 208310011635333300920 208327011635883301213 208337011636203301320 208353011636593301420 208368011637013301520 208374011637163301535 208383011637593301578 208398011638153301620 208413011638683301720 208428011639203301820 208443011639523301920 20844901163985330221ConjugateVerb_15 208452 2084522099011639903302331170246331222fn0vp4t8modal_to12 20845701164151330295 208467011641763303012 208483011642073303112 208499011642403303212 208515011642813303319 208524011643143303421 208537011643633303613 208548011643953303720 208558011644323303824 208564011644453303837 208568011644613303853 208574011644723303864 208590011645103303924 208596011645233303937 208600011645393303953 208606011645503303964 208622011645883304024 208628011646013304037 208632011646173304053 208638011646283304064 208653011646663304124 208659011646793304137 208663011646953304153 208669011647063304164 208684011647443304224 208690011647573304237 208694011647733304253 208700011647843304264 208715011648223304324 208721011648353304337 208725011648513304353 208731011648623304364 208748011649143304520 208758011649513304624 208764011649663304639 208768011649823304655 208774011649933304666 208790011650313304724 208796011650463304739 208800011650623304755 208806011650733304766 208822011651113304824 208828011651263304839 208832011651423304855 208838011651533304866 208853011651913304924 208859011652063304939 208863011652223304955 208869011652333304966 208884011652713305024 208890011652863305039 208894011653023305055 208900011653133305066 208915011653513305124 208921011653663305139 208925011653823305155 208931011653933305166 208948011654453305320 208958011654823305424 208964011655093305451 208968011655253305467 208974011655363305478 208990011655743305524 208996011656013305551 209000011656173305567 209006011656283305578 209022011656663305624 209028011656923305650 209032011657083305666 209038011657193305677 209053011657573305724 209059011657843305751 209063011658003305767 209069011658113305778 209084011658493305824 209090011658763305851 209094011658923305867 209100011659033305878 209115011659413305924 209121011659683305951 209125011659843305967 209131011659953305978 209148011660473306120 209158011660843306224 209164011661103306250 209168011661263306266 209174011661373306277 209190011661753306324 209196011662013306350 209200011662173306366 209206011662283306377 209222011662663306424 209228011662923306450 209232011663083306466 209238011663193306477 209253011663573306524 209259011663833306550 209263011663993306566 209269011664103306577 209284011664483306624 209290011664743306650 209294011664903306666 209300011665013306677 209315011665393306724 209321011665653306750 209325011665813306766 209331011665923306777 209348011666443306920 209358011666813307024 209364011667063307049 209368011667223307065 209374011667333307076 209390011667713307124 209396011667963307149 209400011668123307165 209406011668233307176 209422011668613307224 209428011668863307249 209432011669023307265 209438011669133307276 209453011669513307324 209459011669763307349 209463011669923307365 209469011670033307376 209484011670413307424 209490011670663307449 209494011670823307465 209500011670933307476 209515011671313307524 209521011671563307549 209525011671723307565 209531011671833307576 209548011672583307913 209559011672903308020 209569011673273308124 209575011673433308140 209579011673593308156 209585011673703308167 209601011674083308224 209607011674243308240 209611011674403308256 209617011674513308267 209633011674893308324 209639011675053308340 209643011675213308356 209649011675323308367 209664011675703308424 209670011675863308440 209674011676023308456 209680011676133308467 209695011676513308524 209701011676673308540 209705011676833308556 209711011676943308567 209726011677323308624 209732011677483308640 209736011677643308656 209742011677753308667 209759011678273308820 209769011678643308924 209775011678833308943 209779011678993308959 209785011679103308970 209801011679483309024 209807011679673309043 209811011679833309059 209817011679943309070 209833011680323309124 209839011680513309143 209843011680673309159 209849011680783309170 209864011681163309224 209870011681353309243 209874011681513309259 209880011681623309270 209895011682003309324 209901011682193309343 209905011682353309359 209911011682463309370 209926011682843309424 209932011683033309443 209936011683193309459 209942011683303309470 209959011683823309620 209969011684193309724 209975011684503309755 209979011684663309771 209985011684773309782 210001011685153309824 210007011685463309855 210011011685623309871 210017011685733309882 210033011686113309924 210039011686413309954 210043011686573309970 210049011686683309981 210064011687063310024 210070011687373310055 210074011687533310071 210080011687643310082 210095011688023310124 210101011688333310155 210105011688493310171 210111011688603310182 210126011688983310224 210132011689293310255 210136011689453310271 210142011689563310282 210159011690083310420 210169011690453310524 210175011690753310554 210179011690913310570 210185011691023310581 210201011691403310624 210207011691703310654 210211011691863310670 210217011691973310681 210233011692353310724 210239011692653310754 210243011692813310770 210249011692923310781 210264011693303310824 210270011693603310854 210274011693763310870 210280011693873310881 210295011694253310924 210301011694553310954 210305011694713310970 210311011694823310981 210326011695203311024 210332011695503311054 210336011695663311070 210342011695773311081 210359011696293311220 210369011696663311324 210375011696953311353 210379011697113311369 210385011697223311380 210401011697603311424 210407011697893311453 210411011698053311469 210417011698163311480 210433011698543311524 210439011698833311553 210443011698993311569 210449011699103311580 210464011699483311624 210470011699773311653 210474011699933311669 210480011700043311680 210495011700423311724 210501011700713311753 210505011700873311769 210511011700983311780 210526011701363311824 210532011701653311853 210536011701813311869 210542011701923311880 21054801170245331221ConjugateVerb_16 210551 210551310011702503312331171250331522fn0vp4t8modal_to12 21055601170411331295 210566011704363313012 210582011704603313112 210598011704853313212 210614011705193313319 210622011705533313421 210635011706023313613 210645011706343313720 210651011706493313735 210660011706723313758 210675011707063313820 210690011707383313920 210696011707533313935 210705011707803313962 210720011708203314020 210735011708573314120 210752011709173314413 210762011709493314520 210768011709643314535 210777011709953314566 210792011710363314620 210807011710763314720 210813011710913314735 210822011711223314766 210837011711663314820 210852011712073314920 21085801171249331521ConjugateVerb_17 210861 210861342011712543315331172473331862fn0vp4t8modal_to12 21086601171415331595 210876011714403316012 210892011714773316112 210908011715163316212 210924011715633316319 210932011715973316421 210945011716473316613 210955011716793316720 210971011717173316820 210986011717573316920 210992011717723316935 211001011718133316976 211016011718673317020 211031011719183317120 211046011719683317220 211061011720023317320 211078011720593317613 211088011720913317720 211104011721323317820 211119011721763317920 211125011721913317935 211134011722363317980 211149011722943318020 211164011723493318120 211179011724033318220 211194011724373318320 21120001172472331861ConjugateVerb_18 211203 211203310011724773318731173521332162fn0vp4t8modal_to12 21120801172638331935 211218011726633319412 211234011726893319512 211250011727173319612 211266011727533319719 211274011727873319821 211287011728363320013 211297011728683320120 211303011728833320135 211312011729093320161 211327011729453320220 211342011729813320320 211348011729963320335 211357011730263320365 211372011730693320420 211387011731093320520 211404011731713320813 211414011732033320920 211420011732183320935 211429011732513320968 211444011732943321020 211459011733363321120 211465011733513321135 211474011733853321169 211489011734323321220 211504011734763321320 21151001173520332161ConjugateVerb_19 211513 211513310011735253321731174603332462fn0vp4t8modal_to12 21151801173686332235 211528011737113322412 211544011737393322512 211560011737693322612 211576011738073322719 211584011738413322821 211597011738913323013 211607011739233323120 211613011739383323135 211622011739653323162 211637011740033323220 211652011740413323320 211658011740563323335 211667011740883323367 211682011741333323420 211697011741753323520 211714011742393323813 211724011742713323920 211730011742863323935 211739011743213323970 211754011743663324020 211769011744103324120 211775011744253324135 211784011744613324171 211799011745103324220 211814011745563324320 21182001174602332461ConjugateVerb_20 211823 211823310011746073324731175668332762fn0vp4t8modal_to12 21182801174768332535 211838011747933325412 211854011748203325512 211870011748493325612 211886011748863325719 211894011749203325821 211907011749703326013 211917011750023326120 211923011750173326135 211932011750433326161 211947011750803326220 211962011751173326320 211968011751323326335 211977011751633326366 211992011752073326420 212007011752483326520 212024011753113326813 212034011753433326920 212040011753583326935 212049011753923326969 212064011754363327020 212079011754793327120 212085011754943327135 212094011755293327170 212109011755773327220 212124011756223327320 21213001175667332761ConjugateVerb_21 212133 212133310011756723327731176740333062fn0vp4t8modal_to12 21213801175833332835 212148011758583328412 212164011758863328512 212180011759153328612 212196011759523328719 212204011759863328821 212217011760353329013 212227011760673329120 212233011760823329135 212242011761093329162 212257011761473329220 212272011761843329320 212278011761993329335 212287011762303329366 212302011762743329420 212317011763153329520 212334011763793329813 212344011764113329920 212350011764263329935 212359011764613329970 212374011765063330020 212389011765503330120 212395011765653330135 212404011766003330170 212419011766483330220 212434011766933330320 21244001176739333061ConjugateVerb_22 212443 212443310011767443330731177863333362fn0vp4t8modal_to12 21244801176905333135 212458011769303331412 212474011769613331512 212490011769933331612 212506011770333331719 212514011770673331821 212527011771163332013 212537011771483332120 212543011771633332135 212552011771933332165 212567011772343332220 212582011772743332320 212588011772893332335 212597011773233332369 212612011773703332420 212627011774143332520 212644011774813332813 212654011775133332920 212660011775283332935 212669011775663332973 212684011776143333020 212699011776613333120 212705011776763333135 212714011777143333173 212729011777653333220 212744011778133333320 21275001177862333361ConjugateVerb_23 212753 212753310011778673333731178918333662fn0vp4t8modal_to12 21275801178028333435 212768011780533334412 212784011780803334512 212800011781083334612 212816011781443334719 212824011781783334821 212837011782273335013 212847011782593335120 212853011782743335135 212862011783003335161 212877011783373335220 212892011783733335320 212898011783883335335 212907011784183335365 212922011784613335420 212937011785013335520 212954011785643335813 212964011785963335920 212970011786113335935 212979011786453335969 212994011786893336020 213009011787323336120 213015011787473336135 213024011787813336169 213039011788283336220 213054011788723336320 21306001178917333661ConjugateVerb_24 213063 213063310011789223336731179939333962fn0vp4t8modal_to12 21306801179083333735 213078011791083337412 213094011791333337512 213110011791593337612 213126011791933337719 213134011792273337821 213147011792763338013 213157011793083338120 213163011793233338135 213172011793473338159 213187011793823338220 213202011794163338320 213208011794313338335 213217011794593338363 213232011795003338420 213247011795383338520 213264011795993338813 213274011796313338920 213280011796463338935 213289011796783338967 213304011797203339020 213319011797613339120 213325011797763339135 213334011798083339167 213349011798533339220 213364011798953339320 21337001179938333961ConjugateVerb_25 213373 213373310011799433339731180977334262fn0vp4t8modal_to12 21337801180104334035 213388011801293340412 213404011801553340512 213420011801823340612 213436011802173340719 213444011802513340821 213457011803003341013 213467011803323341120 213473011803473341135 213482011803723341160 213497011804083341220 213512011804433341320 213518011804583341335 213527011804873341364 213542011805293341420 213557011805683341520 213574011806303341813 213584011806623341920 213590011806773341935 213599011807103341968 213614011807533342020 213629011807953342120 213635011808103342135 213644011808433342168 213659011808893342220 213674011809323342320 21368001180976334261ConjugateVerb_26 213683 213683310011809813342731181981334562fn0vp4t8modal_to12 21368801181142334335 213698011811673343412 213714011811913343512 213730011812163343612 213746011812493343719 213754011812833343821 213767011813323344013 213777011813643344120 213783011813793344135 213792011814023344158 213807011814363344220 213822011814693344320 213828011814843344335 213837011815113344362 213852011815513344420 213867011815883344520 213884011816483344813 213894011816803344920 213900011816953344935 213909011817263344966 213924011817673345020 213939011818073345120 213945011818223345135 213954011818533345166 213969011818973345220 213984011819383345320 21399001181980334561ConjugateVerb_27 213993 213993310011819853345731183079334862fn0vp4t8modal_to12 21399801182146334635 214008011821713346412 214024011822003346512 214040011822313346612 214056011822703346719 214064011823043346821 214077011823533347013 214087011823853347120 214093011824003347135 214102011824283347163 214117011824673347220 214132011825063347320 214138011825213347335 214147011825543347368 214162011826003347420 214177011826433347520 214194011827083347813 214204011827403347920 214210011827553347935 214219011827913347971 214234011828373348020 214249011828823348120 214255011828973348135 214264011829343348172 214279011829843348220 214294011830313348320 21430001183078334861ConjugateVerb_28 214303 214303310011830833348731184118335162fn0vp4t8modal_to12 21430801183244334935 214318011832693349412 214334011832943349512 214350011833223349612 214366011833583349719 214374011833923349821 214387011834413350013 214397011834733350120 214403011834883350135 214412011835123350159 214427011835473350220 214442011835833350320 214448011835983350335 214457011836283350365 214472011836713350420 214487011837113350520 214504011837723350813 214514011838043350920 214520011838193350935 214529011838513350967 214544011838933351020 214559011839343351120 214565011839493351135 214574011839833351169 214589011840303351220 214604011840743351320 21461001184117335161ConjugateVerb_29 214613 214613310011841223351731185129335462fn0vp4t8modal_to12 21461801184283335235 214628011843083352412 214644011843323352512 214660011843583352612 214676011843923352719 214684011844263352821 214697011844753353013 214707011845073353120 214713011845223353135 214722011845453353158 214737011845793353220 214752011846113353320 214758011846263353335 214767011846543353363 214782011846953353420 214797011847333353520 214814011847933353813 214824011848253353920 214830011848403353935 214839011848713353966 214854011849123354020 214869011849523354120 214875011849673354135 214884011849993354167 214899011850443354220 214914011850863354320 21492001185128335461ConjugateVerb_30 214923 214923310011851333354731186143335762fn0vp4t8modal_to12 21492801185294335535 214938011853193355412 214954011853443355512 214970011853693355612 214986011854043355719 214994011854383355821 215007011854873356013 215017011855193356120 215023011855343356135 215032011855583356159 215047011855933356220 215062011856263356320 215068011856413356335 215077011856683356362 215092011857083356420 215107011857453356520 215124011858063356813 215134011858383356920 215140011858533356935 215149011858853356967 215164011859273357020 215179011859683357120 215185011859833357135 215194011860143357166 215209011860583357220 215224011860993357320 21523001186142335761ConjugateVerb_31 215233 215233310011861473357731187165336062fn0vp4t8modal_to12 21523801186308335835 215248011863333358412 215264011863583358512 215280011863843358612 215296011864193358719 215304011864533358821 215317011865023359013 215327011865343359120 215333011865493359135 215342011865733359159 215357011866083359220 215372011866423359320 215378011866573359335 215387011866853359363 215402011867263359420 215417011867643359520 215434011868253359813 215444011868573359920 215450011868723359935 215459011869043359967 215474011869463360020 215489011869873360120 215495011870023360135 215504011870343360167 215519011870793360220 215534011871213360320 21554001187164336061ConjugateVerb_32 215543 215543310011871693360731188163336362fn0vp4t8modal_to12 21554801187330336135 215558011873553361412 215574011873793361512 215590011874033361612 215606011874383361719 215614011874723361821 215627011875213362013 215637011875533362120 215643011875683362135 215652011875913362158 215667011876253362220 215682011876573362320 215688011876723362335 215697011876983362361 215712011877373362420 215727011877733362520 215744011878333362813 215754011878653362920 215760011878803362935 215769011879113362966 215784011879523363020 215799011879923363120 215805011880073363135 215814011880373363165 215829011880803363220 215844011881203363320 21585001188162336361ConjugateVerb_33 215853 215853310011881673363731189183336662fn0vp4t8modal_to12 21585801188328336435 215868011883533364412 215884011883783364512 215900011884043364612 215916011884383364719 215924011884723364821 215937011885213365013 215947011885533365120 215953011885683365135 215962011885923365159 215977011886273365220 215992011886603365320 215998011886753365335 216007011887033365363 216022011887443365420 216037011887823365520 216054011888433365813 216064011888753365920 216070011888903365935 216079011889223365967 216094011889643366020 216109011890053366120 216115011890203366135 216124011890523366167 216139011890973366220 216154011891393366320 21616001189182336661ConjugateVerb_34 216163 216163310011891873366731190180336962fn0vp4t8modal_to12 21616801189348336735 216178011893733367412 216194011893963367512 216210011894213367612 216226011894543367719 216234011894883367821 216247011895373368013 216257011895693368120 216263011895843368135 216272011896073368158 216287011896403368220 216302011896733368320 216308011896883368335 216317011897153368362 216332011897553368420 216347011897923368520 216364011898513368813 216374011898833368920 216380011898983368935 216389011899283368965 216404011899683369020 216419011900073369120 216425011900223369135 216434011900533369166 216449011900973369220 216464011901383369320 21647001190179336961ConjugateVerb_35 216473 216473310011901843369731191244337262fn0vp4t8modal_to12 21647801190345337035 216488011903703370412 216504011903973370512 216520011904263370612 216536011904633370719 216544011904973370821 216557011905463371013 216567011905783371120 216573011905933371135 216582011906193371161 216597011906563371220 216612011906933371320 216618011907083371335 216627011907393371366 216642011907833371420 216657011908243371520 216674011908873371813 216684011909193371920 216690011909343371935 216699011909683371969 216714011910123372020 216729011910553372120 216735011910703372135 216744011911053372170 216759011911533372220 216774011911983372320 21678001191243337261ConjugateVerb_36 216783 216783310011912483372731192266337562fn0vp4t8modal_to12 21678801191409337335 216798011914343373412 216814011914593373512 216830011914853373612 216846011915203373719 216854011915543373821 216867011916033374013 216877011916353374120 216883011916503374135 216892011916743374159 216907011917093374220 216922011917433374320 216928011917583374335 216937011917863374363 216952011918273374420 216967011918653374520 216984011919263374813 216994011919583374920 217000011919733374935 217009011920053374967 217024011920473375020 217039011920883375120 217045011921033375135 217054011921353375167 217069011921803375220 217084011922223375320 21709001192265337561ConjugateVerb_37 217093 217093310011922703375731193296337862fn0vp4t8modal_to12 21709801192431337635 217108011924563376412 217124011924813376512 217140011925083376612 217156011925433376719 217164011925773376821 217177011926263377013 217187011926583377120 217193011926733377135 217202011926973377159 217217011927323377220 217232011927673377320 217238011927823377335 217247011928113377364 217262011928533377420 217277011928923377520 217294011929533377813 217304011929853377920 217310011930003377935 217319011930323377967 217334011930743378020 217349011931153378120 217355011931303378135 217364011931633378168 217379011932093378220 217394011932523378320 21740001193295337861ConjugateVerb_38 217403 217403310011933003378731194326338162fn0vp4t8modal_to12 21740801193461337935 217418011934863379412 217434011935113379512 217450011935383379612 217466011935733379719 217474011936073379821 217487011936563380013 217497011936883380120 217503011937033380135 217512011937273380159 217527011937623380220 217542011937973380320 217548011938123380335 217557011938413380364 217572011938833380420 217587011939223380520 217604011939833380813 217614011940153380920 217620011940303380935 217629011940623380967 217644011941043381020 217659011941453381120 217665011941603381135 217674011941933381168 217689011942393381220 217704011942823381320 21771001194325338161ConjugateVerb_39 217713 217713310011943303381731195332338462fn0vp4t8modal_to12 21771801194491338235 217728011945163382412 217744011945413382512 217760011945653382612 217776011946003382719 217784011946343382821 217797011946833383013 217807011947153383120 217813011947303383135 217822011947543383159 217837011947893383220 217852011948213383320 217858011948363383335 217867011948623383361 217882011949013383420 217897011949373383520 217914011949983383813 217924011950303383920 217930011950453383935 217939011950773383967 217954011951193384020 217969011951603384120 217975011951753384135 217984011952053384165 217999011952483384220 218014011952883384320 21802001195331338461ConjugateVerb_40 218023 218023310011953363384731196353338762fn0vp4t8modal_to12 21802801195497338535 218038011955223385412 218054011955473385512 218070011955733385612 218086011956073385719 218094011956413385821 218107011956903386013 218117011957223386120 218123011957373386135 218132011957613386159 218147011957963386220 218162011958303386320 218168011958453386335 218177011958733386363 218192011959143386420 218207011959523386520 218224011960133386813 218234011960453386920 218240011960603386935 218249011960923386967 218264011961343387020 218279011961753387120 218285011961903387135 218294011962223387167 218309011962673387220 218324011963093387320 21833001196352338761ConjugateVerb_41 218333 218333310011963573387731197417339062fn0vp4t8modal_to12 21833801196518338835 218348011965433388412 218364011965703388512 218380011965993388612 218396011966363388719 218404011966703388821 218417011967193389013 218427011967513389120 218433011967663389135 218442011967923389161 218457011968293389220 218472011968663389320 218478011968813389335 218487011969123389366 218502011969563389420 218517011969973389520 218534011970603389813 218544011970923389920 218550011971073389935 218559011971413389969 218574011971853390020 218589011972283390120 218595011972433390135 218604011972783390170 218619011973263390220 218634011973713390320 21864001197416339061ConjugateVerb_42 218643 218643310011974213390731198447339362fn0vp4t8modal_to12 21864801197582339135 218658011976073391412 218674011976323391512 218690011976593391612 218706011976943391719 218714011977283391821 218727011977773392013 218737011978093392120 218743011978243392135 218752011978483392159 218767011978833392220 218782011979183392320 218788011979333392335 218797011979623392364 218812011980043392420 218827011980433392520 218844011981043392813 218854011981363392920 218860011981513392935 218869011981833392967 218884011982253393020 218899011982663393120 218905011982813393135 218914011983143393168 218929011983603393220 218944011984033393320 21895001198446339361ConjugateVerb_43 218953 218953310011984513393731199477339662fn0vp4t8modal_to12 21895801198612339435 218968011986373394412 218984011986623394512 219000011986893394612 219016011987243394719 219024011987583394821 219037011988073395013 219047011988393395120 219053011988543395135 219062011988783395159 219077011989133395220 219092011989483395320 219098011989633395335 219107011989923395364 219122011990343395420 219137011990733395520 219154011991343395813 219164011991663395920 219170011991813395935 219179011992133395967 219194011992553396020 219209011992963396120 219215011993113396135 219224011993443396168 219239011993903396220 219254011994333396320 21926001199476339661ConjugateVerb_44 219263 219263310011994813396731200507339962fn0vp4t8modal_to12 21926801199642339735 219278011996673397412 219294011996923397512 219310011997193397612 219326011997543397719 219334011997883397821 219347011998373398013 219357011998693398120 219363011998843398135 219372011999083398159 219387011999433398220 219402011999783398320 219408011999933398335 219417012000223398364 219432012000643398420 219447012001033398520 219464012001643398813 219474012001963398920 219480012002113398935 219489012002433398967 219504012002853399020 219519012003263399120 219525012003413399135 219534012003743399168 219549012004203399220 219564012004633399320 21957001200506339961ConjugateVerb_45 219573 219573310012005113399731201537340262fn0vp4t8modal_to12 21957801200672340035 219588012006973400412 219604012007223400512 219620012007493400612 219636012007843400719 219644012008183400821 219657012008673401013 219667012008993401120 219673012009143401135 219682012009383401159 219697012009733401220 219712012010083401320 219718012010233401335 219727012010523401364 219742012010943401420 219757012011333401520 219774012011943401813 219784012012263401920 219790012012413401935 219799012012733401967 219814012013153402020 219829012013563402120 219835012013713402135 219844012014043402168 219859012014503402220 219874012014933402320 21988001201536340261ConjugateVerb_46 219883 219883310012015413402731202568340562fn0vp4t8modal_to12 21988801201702340335 219898012017273403412 219914012017523403512 219930012017793403612 219946012018143403719 219954012018483403821 219967012018973404013 219977012019293404120 219983012019443404135 219992012019693404160 220007012020043404220 220022012020393404320 220028012020543404335 220037012020833404364 220052012021253404420 220067012021643404520 220084012022253404813 220094012022573404920 220100012022723404935 220109012023043404967 220124012023463405020 220139012023873405120 220145012024023405135 220154012024353405168 220169012024813405220 220184012025243405320 22019001202567340561ConjugateVerb_47 220193 220193310012025723405731203598340862fn0vp4t8modal_to12 22019801202733340635 220208012027583406412 220224012027833406512 220240012028103406612 220256012028453406719 220264012028793406821 220277012029283407013 220287012029603407120 220293012029753407135 220302012029993407159 220317012030343407220 220332012030693407320 220338012030843407335 220347012031133407364 220362012031553407420 220377012031943407520 220394012032553407813 220404012032873407920 220410012033023407935 220419012033343407967 220434012033763408020 220449012034173408120 220455012034323408135 220464012034653408168 220479012035113408220 220494012035543408320 22050001203597340861ConjugateVerb_48 220503 220503310012036023408731204670341162fn0vp4t8modal_to12 22050801203763340935 220518012037883409412 220534012038163409512 220550012038453409612 220566012038823409719 220574012039163409821 220587012039653410013 220597012039973410120 220603012040123410135 220612012040393410162 220627012040773410220 220642012041143410320 220648012041293410335 220657012041603410366 220672012042043410420 220687012042453410520 220704012043093410813 220714012043413410920 220720012043563410935 220729012043913410970 220744012044363411020 220759012044803411120 220765012044953411135 220774012045303411170 220789012045783411220 220804012046233411320 22081001204669341161ConjugateVerb_49 220813 220813310012046743411731205700341462fn0vp4t8modal_to12 22081801204835341235 220828012048603412412 220844012048853412512 220860012049123412612 220876012049473412719 220884012049813412821 220897012050303413013 220907012050623413120 220913012050773413135 220922012051013413159 220937012051363413220 220952012051713413320 220958012051863413335 220967012052153413364 220982012052573413420 220997012052963413520 221014012053573413813 221024012053893413920 221030012054043413935 221039012054363413967 221054012054783414020 221069012055193414120 221075012055343414135 221084012055673414168 221099012056133414220 221114012056563414320 22112001205699341461ConjugateVerb_50 221123 221123310012057043414731206731341762fn0vp4t8modal_to12 22112801205865341535 221138012058903415412 221154012059153415512 221170012059423415612 221186012059773415719 221194012060113415821 221207012060603416013 221217012060923416120 221223012061073416135 221232012061323416160 221247012061673416220 221262012062023416320 221268012062173416335 221277012062463416364 221292012062883416420 221307012063273416520 221324012063883416813 221334012064203416920 221340012064353416935 221349012064673416967 221364012065093417020 221379012065503417120 221385012065653417135 221394012065983417168 221409012066443417220 221424012066873417320 22143001206730341761ConjugateVerb_51 221433 221433310012067353417731207729342062fn0vp4t8modal_to12 22143801206896341835 221448012069213418412 221464012069453418512 221480012069693418612 221496012070043418719 221504012070383418821 221517012070873419013 221527012071193419120 221533012071343419135 221542012071573419158 221557012071913419220 221572012072233419320 221578012072383419335 221587012072643419361 221602012073033419420 221617012073393419520 221634012073993419813 221644012074313419920 221650012074463419935 221659012074773419966 221674012075183420020 221689012075583420120 221695012075733420135 221704012076033420165 221719012076463420220 221734012076863420320 22174001207728342061ConjugateVerb_52 221743 221743310012077333420731208751342362fn0vp4t8modal_to12 22174801207894342135 221758012079193421412 221774012079433421512 221790012079703421612 221806012080053421719 221814012080393421821 221827012080883422013 221837012081203422120 221843012081353422135 221852012081583422158 221867012081923422220 221882012082273422320 221888012082423422335 221897012082713422364 221912012083133422420 221927012083523422520 221944012084123422813 221954012084443422920 221960012084593422935 221969012084903422966 221984012085313423020 221999012085713423120 222005012085863423135 222014012086193423168 222029012086653423220 222044012087083423320 22205001208750342361ConjugateVerb_53 222053 222053310012087553423731209756342662fn0vp4t8modal_to12 22205801208916342435 222068012089413424412 222084012089653424512 222100012089903424612 222116012090243424719 222124012090583424821 222137012091073425013 222147012091393425120 222153012091543425135 222162012091773425158 222177012092113425220 222192012092443425320 222198012092593425335 222207012092863425362 222222012093263425420 222237012093633425520 222254012094233425813 222264012094553425920 222270012094703425935 222279012095013425966 222294012095423426020 222309012095823426120 222315012095973426135 222324012096283426166 222339012096723426220 222354012097133426320 22236001209755342661ConjugateVerb_54 222363 222363310012097603426731210821342962fn0vp4t8modal_to12 22236801209921342735 222378012099463427412 222394012099733427512 222410012100023427612 222426012100393427719 222434012100733427821 222447012101223428013 222457012101543428120 222463012101693428135 222472012101963428162 222487012102333428220 222502012102703428320 222508012102853428335 222517012103163428366 222532012103603428420 222547012104013428520 222564012104643428813 222574012104963428920 222580012105113428935 222589012105453428969 222604012105893429020 222619012106323429120 222625012106473429135 222634012106823429170 222649012107303429220 222664012107753429320 22267001210820342961ConjugateVerb_55 222673 222673310012108253429731211851343262fn0vp4t8modal_to12 22267801210986343035 222688012110113430412 222704012110363430512 222720012110633430612 222736012110983430719 222744012111323430821 222757012111813431013 222767012112133431120 222773012112283431135 222782012112523431159 222797012112873431220 222812012113223431320 222818012113373431335 222827012113663431364 222842012114083431420 222857012114473431520 222874012115083431813 222884012115403431920 222890012115553431935 222899012115873431967 222914012116293432020 222929012116703432120 222935012116853432135 222944012117183432168 222959012117643432220 222974012118073432320 22298001211850343261ConjugateVerb_56 222983 222983310012118553432731212849343562fn0vp4t8modal_to12 22298801212016343335 222998012120413433412 223014012120653433512 223030012120893433612 223046012121243433719 223054012121583433821 223067012122073434013 223077012122393434120 223083012122543434135 223092012122773434158 223107012123113434220 223122012123433434320 223128012123583434335 223137012123843434361 223152012124233434420 223167012124593434520 223184012125193434813 223194012125513434920 223200012125663434935 223209012125973434966 223224012126383435020 223239012126783435120 223245012126933435135 223254012127233435165 223269012127663435220 223284012128063435320 22329001212848343561ConjugateVerb_57 223293 223293310012128533435731213896343862fn0vp4t8modal_to12 22329801213014343635 223308012130393436412 223324012130653436512 223340012130933436612 223356012131293436719 223364012131633436821 223377012132123437013 223387012132443437120 223393012132593437135 223402012132843437160 223417012133203437220 223432012133563437320 223438012133713437335 223447012134013437365 223462012134443437420 223477012134843437520 223494012135463437813 223504012135783437920 223510012135933437935 223519012136263437968 223534012136693438020 223549012137113438120 223555012137263438135 223564012137603438169 223579012138073438220 223594012138513438320 22360001213895343861ConjugateVerb_58 223603 223603310012139003438731214943344162fn0vp4t8modal_to12 22360801214061343935 223618012140863439412 223634012141123439512 223650012141403439612 223666012141763439719 223674012142103439821 223687012142593440013 223697012142913440120 223703012143063440135 223712012143313440160 223727012143673440220 223742012144033440320 223748012144183440335 223757012144483440365 223772012144913440420 223787012145313440520 223804012145933440813 223814012146253440920 223820012146403440935 223829012146733440968 223844012147163441020 223859012147583441120 223865012147733441135 223874012148073441169 223889012148543441220 223904012148983441320 22391001214942344161ConjugateVerb_59 223913 223913310012149473441731216015344462fn0vp4t8modal_to12 22391801215108344235 223928012151333442412 223944012151613442512 223960012151903442612 223976012152273442719 223984012152613442821 223997012153103443013 224007012153423443120 224013012153573443135 224022012153843443162 224037012154223443220 224052012154593443320 224058012154743443335 224067012155053443366 224082012155493443420 224097012155903443520 224114012156543443813 224124012156863443920 224130012157013443935 224139012157363443970 224154012157813444020 224169012158253444120 224175012158403444135 224184012158753444170 224199012159233444220 224214012159683444320 22422001216014344461ConjugateVerb_60 224223 224223310012160193444731217080344762fn0vp4t8modal_to12 22422801216180344535 224238012162053445412 224254012162323445512 224270012162613445612 224286012162983445719 224294012163323445821 224307012163813446013 224317012164133446120 224323012164283446135 224332012164553446162 224347012164923446220 224362012165293446320 224368012165443446335 224377012165753446366 224392012166193446420 224407012166603446520 224424012167233446813 224434012167553446920 224440012167703446935 224449012168043446969 224464012168483447020 224479012168913447120 224485012169063447135 224494012169413447170 224509012169893447220 224524012170343447320 22453001217079344761ConjugateVerb_61 224533 224533310012170843447731218100345062fn0vp4t8modal_to12 22453801217245344835 224548012172703448412 224564012172953448512 224580012173213448612 224596012173553448719 224604012173893448821 224617012174383449013 224627012174703449120 224633012174853449135 224642012175093449159 224657012175443449220 224672012175773449320 224678012175923449335 224687012176203449363 224702012176613449420 224717012176993449520 224734012177603449813 224744012177923449920 224750012178073449935 224759012178393449967 224774012178813450020 224789012179223450120 224795012179373450135 224804012179693450167 224819012180143450220 224834012180563450320 22484001218099345061ConjugateVerb_62 224843 224843310012181043450731219130345362fn0vp4t8modal_to12 22484801218265345135 224858012182903451412 224874012183153451512 224890012183423451612 224906012183773451719 224914012184113451821 224927012184603452013 224937012184923452120 224943012185073452135 224952012185313452159 224967012185663452220 224982012186013452320 224988012186163452335 224997012186453452364 225012012186873452420 225027012187263452520 225044012187873452813 225054012188193452920 225060012188343452935 225069012188663452967 225084012189083453020 225099012189493453120 225105012189643453135 225114012189973453168 225129012190433453220 225144012190863453320 22515001219129345361ConjugateVerb_63 225153 225153310012191343453731220168345662fn0vp4t8modal_to12 22515801219295345435 225168012193203454412 225184012193463454512 225200012193733454612 225216012194083454719 225224012194423454821 225237012194913455013 225247012195233455120 225253012195383455135 225262012195633455160 225277012195993455220 225292012196343455320 225298012196493455335 225307012196783455364 225322012197203455420 225337012197593455520 225354012198213455813 225364012198533455920 225370012198683455935 225379012199013455968 225394012199443456020 225409012199863456120 225415012200013456135 225424012200343456168 225439012200803456220 225454012201233456320 22546001220167345661ConjugateVerb_64 225463 225463310012201723456731221198345962fn0vp4t8modal_to12 22546801220333345735 225478012203583457412 225494012203833457512 225510012204103457612 225526012204453457719 225534012204793457821 225547012205283458013 225557012205603458120 225563012205753458135 225572012205993458159 225587012206343458220 225602012206693458320 225608012206843458335 225617012207133458364 225632012207553458420 225647012207943458520 225664012208553458813 225674012208873458920 225680012209023458935 225689012209343458967 225704012209763459020 225719012210173459120 225725012210323459135 225734012210653459168 225749012211113459220 225764012211543459320 22577001221197345961ConjugateVerb_65 225773 225773310012212023459731222228346262fn0vp4t8modal_to12 22577801221363346035 225788012213883460412 225804012214133460512 225820012214403460612 225836012214753460719 225844012215093460821 225857012215583461013 225867012215903461120 225873012216053461135 225882012216293461159 225897012216643461220 225912012216993461320 225918012217143461335 225927012217433461364 225942012217853461420 225957012218243461520 225974012218853461813 225984012219173461920 225990012219323461935 225999012219643461967 226014012220063462020 226029012220473462120 226035012220623462135 226044012220953462168 226059012221413462220 226074012221843462320 22608001222227346261ConjugateVerb_66 226083 226083310012222323462731223249346562fn0vp4t8modal_to12 22608801222393346335 226098012224183463412 226114012224433463512 226130012224693463612 226146012225033463719 226154012225373463821 226167012225863464013 226177012226183464120 226183012226333464135 226192012226573464159 226207012226923464220 226222012227263464320 226228012227413464335 226237012227693464363 226252012228103464420 226267012228483464520 226284012229093464813 226294012229413464920 226300012229563464935 226309012229883464967 226324012230303465020 226339012230713465120 226345012230863465135 226354012231183465167 226369012231633465220 226384012232053465320 22639001223248346561ConjugateVerb_67 226393 226393310012232533465731224247346862fn0vp4t8modal_to12 22639801223414346635 226408012234393466412 226424012234633466512 226440012234873466612 226456012235223466719 226464012235563466821 226477012236053467013 226487012236373467120 226493012236523467135 226502012236753467158 226517012237093467220 226532012237413467320 226538012237563467335 226547012237823467361 226562012238213467420 226577012238573467520 226594012239173467813 226604012239493467920 226610012239643467935 226619012239953467966 226634012240363468020 226649012240763468120 226655012240913468135 226664012241213468165 226679012241643468220 226694012242043468320 22670001224246346861ConjugateVerb_68 226703 2267032099012242513468731230308347862fn0vp4t8modal_to12 22670801224412346935 226718012244373469412 226734012244633469512 226750012244913469612 226766012245273469719 226775012245603469821 226788012246093470013 226799012246413470120 226809012246783470224 226815012246933470239 226819012247093470255 226825012247203470266 226841012247583470324 226847012247733470339 226851012247893470355 226857012248003470366 226873012248383470424 226879012248533470439 226883012248693470455 226889012248803470466 226904012249183470524 226910012249333470539 226914012249493470555 226920012249603470566 226935012249983470624 226941012250133470639 226945012250293470655 226951012250403470666 226966012250783470724 226972012250933470739 226976012251093470755 226982012251203470766 226999012251723470920 227009012252093471024 227015012252293471044 227019012252453471060 227025012252563471071 227041012252943471124 227047012253143471144 227051012253303471160 227057012253413471171 227073012253793471224 227079012253993471244 227083012254153471260 227089012254263471271 227104012254643471324 227110012254843471344 227114012255003471360 227120012255113471371 227135012255493471424 227141012255693471444 227145012255853471460 227151012255963471471 227166012256343471524 227172012256543471544 227176012256703471560 227182012256813471571 227199012257333471720 227209012257703471824 227215012257903471844 227219012258063471860 227225012258173471871 227241012258553471924 227247012258753471944 227251012258913471960 227257012259023471971 227273012259403472024 227279012259603472044 227283012259763472060 227289012259873472071 227304012260253472124 227310012260453472144 227314012260613472160 227320012260723472171 227335012261103472224 227341012261303472244 227345012261463472260 227351012261573472271 227366012261953472324 227372012262153472344 227376012262313472360 227382012262423472371 227399012262943472520 227409012263313472624 227415012263513472644 227419012263673472660 227425012263783472671 227441012264163472724 227447012264363472744 227451012264523472760 227457012264633472771 227473012265013472824 227479012265213472844 227483012265373472860 227489012265483472871 227504012265863472924 227510012266063472944 227514012266223472960 227520012266333472971 227535012266713473024 227541012266913473044 227545012267073473060 227551012267183473071 227566012267563473124 227572012267763473144 227576012267923473160 227582012268033473171 227599012268553473320 227609012268923473424 227615012269073473439 227619012269233473455 227625012269343473466 227641012269723473524 227647012269873473539 227651012270033473555 227657012270143473566 227673012270523473624 227679012270673473639 227683012270833473655 227689012270943473666 227704012271323473724 227710012271473473739 227714012271633473755 227720012271743473766 227735012272123473824 227741012272273473839 227745012272433473855 227751012272543473866 227766012272923473924 227772012273073473939 227776012273233473955 227782012273343473966 227799012274093474313 227810012274413474420 227820012274783474524 227826012274973474543 227830012275133474559 227836012275243474570 227852012275623474624 227858012275813474643 227862012275973474659 227868012276083474670 227884012276463474724 227890012276653474743 227894012276813474759 227900012276923474770 227915012277303474824 227921012277493474843 227925012277653474859 227931012277763474870 227946012278143474924 227952012278333474943 227956012278493474959 227962012278603474970 227977012278983475024 227983012279173475043 227987012279333475059 227993012279443475070 228010012279963475220 228020012280333475324 228026012280573475348 228030012280733475364 228036012280843475375 228052012281223475424 228058012281463475448 228062012281623475464 228068012281733475475 228084012282113475524 228090012282353475548 228094012282513475564 228100012282623475575 228115012283003475624 228121012283243475648 228125012283403475664 228131012283513475675 228146012283893475724 228152012284133475748 228156012284293475764 228162012284403475775 228177012284783475824 228183012285023475848 228187012285183475864 228193012285293475875 228210012285813476020 228220012286183476124 228226012286423476148 228230012286583476164 228236012286693476175 228252012287073476224 228258012287313476248 228262012287473476264 228268012287583476275 228284012287963476324 228290012288203476348 228294012288363476364 228300012288473476375 228315012288853476424 228321012289093476448 228325012289253476464 228331012289363476475 228346012289743476524 228352012289983476548 228356012290143476564 228362012290253476575 228377012290633476624 228383012290873476648 228387012291033476664 228393012291143476675 228410012291663476820 228420012292033476924 228426012292273476948 228430012292433476964 228436012292543476975 228452012292923477024 228458012293163477048 228462012293323477064 228468012293433477075 228484012293813477124 228490012294053477148 228494012294213477164 228500012294323477175 228515012294703477224 228521012294943477248 228525012295103477264 228531012295213477275 228546012295593477324 228552012295833477348 228556012295993477364 228562012296103477375 228577012296483477424 228583012296723477448 228587012296883477464 228593012296993477475 228610012297513477620 228620012297883477724 228626012298073477743 228630012298233477759 228636012298343477770 228652012298723477824 228658012298913477843 228662012299073477859 228668012299183477870 228684012299563477924 228690012299753477943 228694012299913477959 228700012300023477970 228715012300403478024 228721012300593478043 228725012300753478059 228731012300863478070 228746012301243478124 228752012301433478143 228756012301593478159 228762012301703478170 228777012302083478224 228783012302273478243 228787012302433478259 228793012302543478270 22879901230307347861ConjugateVerb_69 228802 2288022099012303123478731236243348862fn0vp4t8modal_to12 22880701230473347935 228817012304983479412 228833012305223479512 228849012305483479612 228865012305823479719 228874012306153479821 228887012306643480013 228898012306963480120 228908012307333480224 228914012307463480237 228918012307623480253 228924012307733480264 228940012308113480324 228946012308243480337 228950012308403480353 228956012308513480364 228972012308893480424 228978012309023480437 228982012309183480453 228988012309293480464 229003012309673480524 229009012309803480537 229013012309963480553 229019012310073480564 229034012310453480624 229040012310583480637 229044012310743480653 229050012310853480664 229065012311233480724 229071012311363480737 229075012311523480753 229081012311633480764 229098012312153480920 229108012312523481024 229114012312703481042 229118012312863481058 229124012312973481069 229140012313353481124 229146012313533481142 229150012313693481158 229156012313803481169 229172012314183481224 229178012314363481242 229182012314523481258 229188012314633481269 229203012315013481324 229209012315193481342 229213012315353481358 229219012315463481369 229234012315843481424 229240012316023481442 229244012316183481458 229250012316293481469 229265012316673481524 229271012316853481542 229275012317013481558 229281012317123481569 229298012317643481720 229308012318013481824 229314012318193481842 229318012318353481858 229324012318463481869 229340012318843481924 229346012319023481942 229350012319183481958 229356012319293481969 229372012319673482024 229378012319853482042 229382012320013482058 229388012320123482069 229403012320503482124 229409012320683482142 229413012320843482158 229419012320953482169 229434012321333482224 229440012321513482242 229444012321673482258 229450012321783482269 229465012322163482324 229471012322343482342 229475012322503482358 229481012322613482369 229498012323133482520 229508012323503482624 229514012323683482642 229518012323843482658 229524012323953482669 229540012324333482724 229546012324513482742 229550012324673482758 229556012324783482769 229572012325163482824 229578012325343482842 229582012325503482858 229588012325613482869 229603012325993482924 229609012326173482942 229613012326333482958 229619012326443482969 229634012326823483024 229640012327003483042 229644012327163483058 229650012327273483069 229665012327653483124 229671012327833483142 229675012327993483158 229681012328103483169 229698012328623483320 229708012328993483424 229714012329123483437 229718012329283483453 229724012329393483464 229740012329773483524 229746012329903483537 229750012330063483553 229756012330173483564 229772012330553483624 229778012330683483637 229782012330843483653 229788012330953483664 229803012331333483724 229809012331463483737 229813012331623483753 229819012331733483764 229834012332113483824 229840012332243483837 229844012332403483853 229850012332513483864 229865012332893483924 229871012333023483937 229875012333183483953 229881012333293483964 229898012334043484313 229909012334363484420 229919012334733484524 229925012334903484541 229929012335063484557 229935012335173484568 229951012335553484624 229957012335723484641 229961012335883484657 229967012335993484668 229983012336373484724 229989012336543484741 229993012336703484757 229999012336813484768 230014012337193484824 230020012337363484841 230024012337523484857 230030012337633484868 230045012338013484924 230051012338183484941 230055012338343484957 230061012338453484968 230076012338833485024 230082012339003485041 230086012339163485057 230092012339273485068 230109012339793485220 230119012340163485324 230125012340383485346 230129012340543485362 230135012340653485373 230151012341033485424 230157012341253485446 230161012341413485462 230167012341523485473 230183012341903485524 230189012342123485546 230193012342283485562 230199012342393485573 230214012342773485624 230220012342993485646 230224012343153485662 230230012343263485673 230245012343643485724 230251012343863485746 230255012344023485762 230261012344133485773 230276012344513485824 230282012344733485846 230286012344893485862 230292012345003485873 230309012345523486020 230319012345893486124 230325012346113486146 230329012346273486162 230335012346383486173 230351012346763486224 230357012346983486246 230361012347143486262 230367012347253486273 230383012347633486324 230389012347853486346 230393012348013486362 230399012348123486373 230414012348503486424 230420012348723486446 230424012348883486462 230430012348993486473 230445012349373486524 230451012349593486546 230455012349753486562 230461012349863486573 230476012350243486624 230482012350463486646 230486012350623486662 230492012350733486673 230509012351253486820 230519012351623486924 230525012351843486946 230529012352003486962 230535012352113486973 230551012352493487024 230557012352713487046 230561012352873487062 230567012352983487073 230583012353363487124 230589012353583487146 230593012353743487162 230599012353853487173 230614012354233487224 230620012354453487246 230624012354613487262 230630012354723487273 230645012355103487324 230651012355323487346 230655012355483487362 230661012355593487373 230676012355973487424 230682012356193487446 230686012356353487462 230692012356463487473 230709012356983487620 230719012357353487724 230725012357523487741 230729012357683487757 230735012357793487768 230751012358173487824 230757012358343487841 230761012358503487857 230767012358613487868 230783012358993487924 230789012359163487941 230793012359323487957 230799012359433487968 230814012359813488024 230820012359983488041 230824012360143488057 230830012360253488068 230845012360633488124 230851012360803488141 230855012360963488157 230861012361073488168 230876012361453488224 230882012361623488241 230886012361783488257 230892012361893488268 23089801236242348861ConjugateVerb_70 230901 2309012099012362473488731242304349862fn0vp4t8modal_to12 23090601236408348935 230916012364333489412 230932012364593489512 230948012364873489612 230964012365233489719 230973012365563489821 230986012366053490013 230997012366373490120 231007012366743490224 231013012366893490239 231017012367053490255 231023012367163490266 231039012367543490324 231045012367693490339 231049012367853490355 231055012367963490366 231071012368343490424 231077012368493490439 231081012368653490455 231087012368763490466 231102012369143490524 231108012369293490539 231112012369453490555 231118012369563490566 231133012369943490624 231139012370093490639 231143012370253490655 231149012370363490666 231164012370743490724 231170012370893490739 231174012371053490755 231180012371163490766 231197012371683490920 231207012372053491024 231213012372253491044 231217012372413491060 231223012372523491071 231239012372903491124 231245012373103491144 231249012373263491160 231255012373373491171 231271012373753491224 231277012373953491244 231281012374113491260 231287012374223491271 231302012374603491324 231308012374803491344 231312012374963491360 231318012375073491371 231333012375453491424 231339012375653491444 231343012375813491460 231349012375923491471 231364012376303491524 231370012376503491544 231374012376663491560 231380012376773491571 231397012377293491720 231407012377663491824 231413012377863491844 231417012378023491860 231423012378133491871 231439012378513491924 231445012378713491944 231449012378873491960 231455012378983491971 231471012379363492024 231477012379563492044 231481012379723492060 231487012379833492071 231502012380213492124 231508012380413492144 231512012380573492160 231518012380683492171 231533012381063492224 231539012381263492244 231543012381423492260 231549012381533492271 231564012381913492324 231570012382113492344 231574012382273492360 231580012382383492371 231597012382903492520 231607012383273492624 231613012383473492644 231617012383633492660 231623012383743492671 231639012384123492724 231645012384323492744 231649012384483492760 231655012384593492771 231671012384973492824 231677012385173492844 231681012385333492860 231687012385443492871 231702012385823492924 231708012386023492944 231712012386183492960 231718012386293492971 231733012386673493024 231739012386873493044 231743012387033493060 231749012387143493071 231764012387523493124 231770012387723493144 231774012387883493160 231780012387993493171 231797012388513493320 231807012388883493424 231813012389033493439 231817012389193493455 231823012389303493466 231839012389683493524 231845012389833493539 231849012389993493555 231855012390103493566 231871012390483493624 231877012390633493639 231881012390793493655 231887012390903493666 231902012391283493724 231908012391433493739 231912012391593493755 231918012391703493766 231933012392083493824 231939012392233493839 231943012392393493855 231949012392503493866 231964012392883493924 231970012393033493939 231974012393193493955 231980012393303493966 231997012394053494313 232008012394373494420 232018012394743494524 232024012394933494543 232028012395093494559 232034012395203494570 232050012395583494624 232056012395773494643 232060012395933494659 232066012396043494670 232082012396423494724 232088012396613494743 232092012396773494759 232098012396883494770 232113012397263494824 232119012397453494843 232123012397613494859 232129012397723494870 232144012398103494924 232150012398293494943 232154012398453494959 232160012398563494970 232175012398943495024 232181012399133495043 232185012399293495059 232191012399403495070 232208012399923495220 232218012400293495324 232224012400533495348 232228012400693495364 232234012400803495375 232250012401183495424 232256012401423495448 232260012401583495464 232266012401693495475 232282012402073495524 232288012402313495548 232292012402473495564 232298012402583495575 232313012402963495624 232319012403203495648 232323012403363495664 232329012403473495675 232344012403853495724 232350012404093495748 232354012404253495764 232360012404363495775 232375012404743495824 232381012404983495848 232385012405143495864 232391012405253495875 232408012405773496020 232418012406143496124 232424012406383496148 232428012406543496164 232434012406653496175 232450012407033496224 232456012407273496248 232460012407433496264 232466012407543496275 232482012407923496324 232488012408163496348 232492012408323496364 232498012408433496375 232513012408813496424 232519012409053496448 232523012409213496464 232529012409323496475 232544012409703496524 232550012409943496548 232554012410103496564 232560012410213496575 232575012410593496624 232581012410833496648 232585012410993496664 232591012411103496675 232608012411623496820 232618012411993496924 232624012412233496948 232628012412393496964 232634012412503496975 232650012412883497024 232656012413123497048 232660012413283497064 232666012413393497075 232682012413773497124 232688012414013497148 232692012414173497164 232698012414283497175 232713012414663497224 232719012414903497248 232723012415063497264 232729012415173497275 232744012415553497324 232750012415793497348 232754012415953497364 232760012416063497375 232775012416443497424 232781012416683497448 232785012416843497464 232791012416953497475 232808012417473497620 232818012417843497724 232824012418033497743 232828012418193497759 232834012418303497770 232850012418683497824 232856012418873497843 232860012419033497859 232866012419143497870 232882012419523497924 232888012419713497943 232892012419873497959 232898012419983497970 232913012420363498024 232919012420553498043 232923012420713498059 232929012420823498070 232944012421203498124 232950012421393498143 232954012421553498159 232960012421663498170 232975012422043498224 232981012422233498243 232985012422393498259 232991012422503498270 23299701242303349861ConjugateVerb_71 233000 2330002099012423083498731248302350862fn0vp4t8modal_to12 23300501242469349935 233015012424943499412 233031012425193499512 233047012425463499612 233063012425813499719 233072012426143499821 233085012426633500013 233096012426953500120 233106012427323500224 233112012427463500238 233116012427623500254 233122012427733500265 233138012428113500324 233144012428253500338 233148012428413500354 233154012428523500365 233170012428903500424 233176012429043500438 233180012429203500454 233186012429313500465 233201012429693500524 233207012429833500538 233211012429993500554 233217012430103500565 233232012430483500624 233238012430623500638 233242012430783500654 233248012430893500665 233263012431273500724 233269012431413500738 233273012431573500754 233279012431683500765 233296012432203500920 233306012432573501024 233312012432763501043 233316012432923501059 233322012433033501070 233338012433413501124 233344012433603501143 233348012433763501159 233354012433873501170 233370012434253501224 233376012434443501243 233380012434603501259 233386012434713501270 233401012435093501324 233407012435283501343 233411012435443501359 233417012435553501370 233432012435933501424 233438012436123501443 233442012436283501459 233448012436393501470 233463012436773501524 233469012436963501543 233473012437123501559 233479012437233501570 233496012437753501720 233506012438123501824 233512012438313501843 233516012438473501859 233522012438583501870 233538012438963501924 233544012439153501943 233548012439313501959 233554012439423501970 233570012439803502024 233576012439993502043 233580012440153502059 233586012440263502070 233601012440643502124 233607012440833502143 233611012440993502159 233617012441103502170 233632012441483502224 233638012441673502243 233642012441833502259 233648012441943502270 233663012442323502324 233669012442513502343 233673012442673502359 233679012442783502370 233696012443303502520 233706012443673502624 233712012443863502643 233716012444023502659 233722012444133502670 233738012444513502724 233744012444703502743 233748012444863502759 233754012444973502770 233770012445353502824 233776012445543502843 233780012445703502859 233786012445813502870 233801012446193502924 233807012446383502943 233811012446543502959 233817012446653502970 233832012447033503024 233838012447223503043 233842012447383503059 233848012447493503070 233863012447873503124 233869012448063503143 233873012448223503159 233879012448333503170 233896012448853503320 233906012449223503424 233912012449363503438 233916012449523503454 233922012449633503465 233938012450013503524 233944012450153503538 233948012450313503554 233954012450423503565 233970012450803503624 233976012450943503638 233980012451103503654 233986012451213503665 234001012451593503724 234007012451733503738 234011012451893503754 234017012452003503765 234032012452383503824 234038012452523503838 234042012452683503854 234048012452793503865 234063012453173503924 234069012453313503938 234073012453473503954 234079012453583503965 234096012454333504313 234107012454653504420 234117012455023504524 234123012455203504542 234127012455363504558 234133012455473504569 234149012455853504624 234155012456033504642 234159012456193504658 234165012456303504669 234181012456683504724 234187012456863504742 234191012457023504758 234197012457133504769 234212012457513504824 234218012457693504842 234222012457853504858 234228012457963504869 234243012458343504924 234249012458523504942 234253012458683504958 234259012458793504969 234274012459173505024 234280012459353505042 234284012459513505058 234290012459623505069 234307012460143505220 234317012460513505324 234323012460743505347 234327012460903505363 234333012461013505374 234349012461393505424 234355012461623505447 234359012461783505463 234365012461893505474 234381012462273505524 234387012462503505547 234391012462663505563 234397012462773505574 234412012463153505624 234418012463383505647 234422012463543505663 234428012463653505674 234443012464033505724 234449012464263505747 234453012464423505763 234459012464533505774 234474012464913505824 234480012465143505847 234484012465303505863 234490012465413505874 234507012465933506020 234517012466303506124 234523012466533506147 234527012466693506163 234533012466803506174 234549012467183506224 234555012467413506247 234559012467573506263 234565012467683506274 234581012468063506324 234587012468293506347 234591012468453506363 234597012468563506374 234612012468943506424 234618012469173506447 234622012469333506463 234628012469443506474 234643012469823506524 234649012470053506547 234653012470213506563 234659012470323506574 234674012470703506624 234680012470933506647 234684012471093506663 234690012471203506674 234707012471723506820 234717012472093506924 234723012472323506947 234727012472483506963 234733012472593506974 234749012472973507024 234755012473203507047 234759012473363507063 234765012473473507074 234781012473853507124 234787012474083507147 234791012474243507163 234797012474353507174 234812012474733507224 234818012474963507247 234822012475123507263 234828012475233507274 234843012475613507324 234849012475843507347 234853012476003507363 234859012476113507374 234874012476493507424 234880012476723507447 234884012476883507463 234890012476993507474 234907012477513507620 234917012477883507724 234923012478063507742 234927012478223507758 234933012478333507769 234949012478713507824 234955012478893507842 234959012479053507858 234965012479163507869 234981012479543507924 234987012479723507942 234991012479883507958 234997012479993507969 235012012480373508024 235018012480553508042 235022012480713508058 235028012480823508069 235043012481203508124 235049012481383508142 235053012481543508158 235059012481653508169 235074012482033508224 235080012482213508242 235084012482373508258 235090012482483508269 23509601248301350861ConjugateVerb_72 235099 2350992099012483063508731254426351862fn0vp4t8modal_to12 23510401248467350935 235114012484923509412 235130012485193509512 235146012485483509612 235162012485853509719 235171012486183509821 235184012486673510013 235195012486993510120 235205012487363510224 235211012487523510240 235215012487683510256 235221012487793510267 235237012488173510324 235243012488333510340 235247012488493510356 235253012488603510367 235269012488983510424 235275012489143510440 235279012489303510456 235285012489413510467 235300012489793510524 235306012489953510540 235310012490113510556 235316012490223510567 235331012490603510624 235337012490763510640 235341012490923510656 235347012491033510667 235362012491413510724 235368012491573510740 235372012491733510756 235378012491843510767 235395012492363510920 235405012492733511024 235411012492943511045 235415012493103511061 235421012493213511072 235437012493593511124 235443012493803511145 235447012493963511161 235453012494073511172 235469012494453511224 235475012494663511245 235479012494823511261 235485012494933511272 235500012495313511324 235506012495523511345 235510012495683511361 235516012495793511372 235531012496173511424 235537012496383511445 235541012496543511461 235547012496653511472 235562012497033511524 235568012497243511545 235572012497403511561 235578012497513511572 235595012498033511720 235605012498403511824 235611012498613511845 235615012498773511861 235621012498883511872 235637012499263511924 235643012499473511945 235647012499633511961 235653012499743511972 235669012500123512024 235675012500333512045 235679012500493512061 235685012500603512072 235700012500983512124 235706012501193512145 235710012501353512161 235716012501463512172 235731012501843512224 235737012502053512245 235741012502213512261 235747012502323512272 235762012502703512324 235768012502913512345 235772012503073512361 235778012503183512372 235795012503703512520 235805012504073512624 235811012504283512645 235815012504443512661 235821012504553512672 235837012504933512724 235843012505143512745 235847012505303512761 235853012505413512772 235869012505793512824 235875012506003512845 235879012506163512861 235885012506273512872 235900012506653512924 235906012506863512945 235910012507023512961 235916012507133512972 235931012507513513024 235937012507723513045 235941012507883513061 235947012507993513072 235962012508373513124 235968012508583513145 235972012508743513161 235978012508853513172 235995012509373513320 236005012509743513424 236011012509903513440 236015012510063513456 236021012510173513467 236037012510553513524 236043012510713513540 236047012510873513556 236053012510983513567 236069012511363513624 236075012511523513640 236079012511683513656 236085012511793513667 236100012512173513724 236106012512333513740 236110012512493513756 236116012512603513767 236131012512983513824 236137012513143513840 236141012513303513856 236147012513413513867 236162012513793513924 236168012513953513940 236172012514113513956 236178012514223513967 236195012514973514313 236206012515293514420 236216012515663514524 236222012515863514544 236226012516023514560 236232012516133514571 236248012516513514624 236254012516713514644 236258012516873514660 236264012516983514671 236280012517363514724 236286012517563514744 236290012517723514760 236296012517833514771 236311012518213514824 236317012518413514844 236321012518573514860 236327012518683514871 236342012519063514924 236348012519263514944 236352012519423514960 236358012519533514971 236373012519913515024 236379012520113515044 236383012520273515060 236389012520383515071 236406012520903515220 236416012521273515324 236422012521523515349 236426012521683515365 236432012521793515376 236448012522173515424 236454012522423515449 236458012522583515465 236464012522693515476 236480012523073515524 236486012523323515549 236490012523483515565 236496012523593515576 236511012523973515624 236517012524223515649 236521012524383515665 236527012524493515676 236542012524873515724 236548012525123515749 236552012525283515765 236558012525393515776 236573012525773515824 236579012526023515849 236583012526183515865 236589012526293515876 236606012526813516020 236616012527183516124 236622012527433516149 236626012527593516165 236632012527703516176 236648012528083516224 236654012528333516249 236658012528493516265 236664012528603516276 236680012528983516324 236686012529233516349 236690012529393516365 236696012529503516376 236711012529883516424 236717012530133516449 236721012530293516465 236727012530403516476 236742012530783516524 236748012531033516549 236752012531193516565 236758012531303516576 236773012531683516624 236779012531933516649 236783012532093516665 236789012532203516676 236806012532723516820 236816012533093516924 236822012533343516949 236826012533503516965 236832012533613516976 236848012533993517024 236854012534243517049 236858012534403517065 236864012534513517076 236880012534893517124 236886012535143517149 236890012535303517165 236896012535413517176 236911012535793517224 236917012536043517249 236921012536203517265 236927012536313517276 236942012536693517324 236948012536943517349 236952012537103517365 236958012537213517376 236973012537593517424 236979012537843517449 236983012538003517465 236989012538113517476 237006012538633517620 237016012539003517724 237022012539203517744 237026012539363517760 237032012539473517771 237048012539853517824 237054012540053517844 237058012540213517860 237064012540323517871 237080012540703517924 237086012540903517944 237090012541063517960 237096012541173517971 237111012541553518024 237117012541753518044 237121012541913518060 237127012542023518071 237142012542403518124 237148012542603518144 237152012542763518160 237158012542873518171 237173012543253518224 237179012543453518244 237183012543613518260 237189012543723518271 23719501254425351861ConjugateVerb_73 237198 2371982099012544303518731260487352862fn0vp4t8modal_to12 23720301254591351935 237213012546163519412 237229012546423519512 237245012546703519612 237261012547063519719 237270012547393519821 237283012547883520013 237294012548203520120 237304012548573520224 237310012548723520239 237314012548883520255 237320012548993520266 237336012549373520324 237342012549523520339 237346012549683520355 237352012549793520366 237368012550173520424 237374012550323520439 237378012550483520455 237384012550593520466 237399012550973520524 237405012551123520539 237409012551283520555 237415012551393520566 237430012551773520624 237436012551923520639 237440012552083520655 237446012552193520666 237461012552573520724 237467012552723520739 237471012552883520755 237477012552993520766 237494012553513520920 237504012553883521024 237510012554083521044 237514012554243521060 237520012554353521071 237536012554733521124 237542012554933521144 237546012555093521160 237552012555203521171 237568012555583521224 237574012555783521244 237578012555943521260 237584012556053521271 237599012556433521324 237605012556633521344 237609012556793521360 237615012556903521371 237630012557283521424 237636012557483521444 237640012557643521460 237646012557753521471 237661012558133521524 237667012558333521544 237671012558493521560 237677012558603521571 237694012559123521720 237704012559493521824 237710012559693521844 237714012559853521860 237720012559963521871 237736012560343521924 237742012560543521944 237746012560703521960 237752012560813521971 237768012561193522024 237774012561393522044 237778012561553522060 237784012561663522071 237799012562043522124 237805012562243522144 237809012562403522160 237815012562513522171 237830012562893522224 237836012563093522244 237840012563253522260 237846012563363522271 237861012563743522324 237867012563943522344 237871012564103522360 237877012564213522371 237894012564733522520 237904012565103522624 237910012565303522644 237914012565463522660 237920012565573522671 237936012565953522724 237942012566153522744 237946012566313522760 237952012566423522771 237968012566803522824 237974012567003522844 237978012567163522860 237984012567273522871 237999012567653522924 238005012567853522944 238009012568013522960 238015012568123522971 238030012568503523024 238036012568703523044 238040012568863523060 238046012568973523071 238061012569353523124 238067012569553523144 238071012569713523160 238077012569823523171 238094012570343523320 238104012570713523424 238110012570863523439 238114012571023523455 238120012571133523466 238136012571513523524 238142012571663523539 238146012571823523555 238152012571933523566 238168012572313523624 238174012572463523639 238178012572623523655 238184012572733523666 238199012573113523724 238205012573263523739 238209012573423523755 238215012573533523766 238230012573913523824 238236012574063523839 238240012574223523855 238246012574333523866 238261012574713523924 238267012574863523939 238271012575023523955 238277012575133523966 238294012575883524313 238305012576203524420 238315012576573524524 238321012576763524543 238325012576923524559 238331012577033524570 238347012577413524624 238353012577603524643 238357012577763524659 238363012577873524670 238379012578253524724 238385012578443524743 238389012578603524759 238395012578713524770 238410012579093524824 238416012579283524843 238420012579443524859 238426012579553524870 238441012579933524924 238447012580123524943 238451012580283524959 238457012580393524970 238472012580773525024 238478012580963525043 238482012581123525059 238488012581233525070 238505012581753525220 238515012582123525324 238521012582363525348 238525012582523525364 238531012582633525375 238547012583013525424 238553012583253525448 238557012583413525464 238563012583523525475 238579012583903525524 238585012584143525548 238589012584303525564 238595012584413525575 238610012584793525624 238616012585033525648 238620012585193525664 238626012585303525675 238641012585683525724 238647012585923525748 238651012586083525764 238657012586193525775 238672012586573525824 238678012586813525848 238682012586973525864 238688012587083525875 238705012587603526020 238715012587973526124 238721012588213526148 238725012588373526164 238731012588483526175 238747012588863526224 238753012589103526248 238757012589263526264 238763012589373526275 238779012589753526324 238785012589993526348 238789012590153526364 238795012590263526375 238810012590643526424 238816012590883526448 238820012591043526464 238826012591153526475 238841012591533526524 238847012591773526548 238851012591933526564 238857012592043526575 238872012592423526624 238878012592663526648 238882012592823526664 238888012592933526675 238905012593453526820 238915012593823526924 238921012594063526948 238925012594223526964 238931012594333526975 238947012594713527024 238953012594953527048 238957012595113527064 238963012595223527075 238979012595603527124 238985012595843527148 238989012596003527164 238995012596113527175 239010012596493527224 239016012596733527248 239020012596893527264 239026012597003527275 239041012597383527324 239047012597623527348 239051012597783527364 239057012597893527375 239072012598273527424 239078012598513527448 239082012598673527464 239088012598783527475 239105012599303527620 239115012599673527724 239121012599863527743 239125012600023527759 239131012600133527770 239147012600513527824 239153012600703527843 239157012600863527859 239163012600973527870 239179012601353527924 239185012601543527943 239189012601703527959 239195012601813527970 239210012602193528024 239216012602383528043 239220012602543528059 239226012602653528070 239241012603033528124 239247012603223528143 239251012603383528159 239257012603493528170 239272012603873528224 239278012604063528243 239282012604223528259 239288012604333528270 23929401260486352861ConjugateVerb_74 239297 239297626012604913528731262377353442fn0vp4t8modal_to12 23930201260652352935 239312012606773529412 239328012607013529512 239344012607273529612 239360012607613529719 239368012607953529821 239381012608443530013 239392012608763530120 239402012609133530224 239417012609483530324 239432012609843530424 239447012610193530524 239462012610553530624 239477012610913530724 239494012611413530920 239504012611783531024 239519012612153531124 239534012612533531224 239549012612903531324 239564012613283531424 239579012613663531524 239594012614183531720 239600012614333531735 239609012614593531761 239624012614983531820 239639012615343531920 239656012615923532213 239667012616243532320 239677012616613532424 239692012617003532524 239707012617403532624 239722012617793532724 239737012618193532824 239752012618593532924 239769012619133533120 239779012619503533224 239794012619903533324 239809012620313533424 239824012620713533524 239839012621123533624 239854012621533533724 239869012622083533920 239875012622233533935 239884012622533533965 239899012622963534020 239914012623363534120 23992001262376353441ConjugateVerb_75 239923 239923310012623813534531263356353742fn0vp4t8modal_to12 23992801262542353515 239938012625673535212 239954012625913535312 239970012626163535412 239986012626513535519 239994012626853535621 240007012627343535813 240017012627663535920 240023012627813535935 240032012628023535956 240047012628363536020 240062012628693536120 240068012628843536135 240077012629093536160 240092012629473536220 240107012629823536320 240124012630423536613 240134012630743536720 240140012630893536735 240149012631143536760 240164012631523536820 240179012631883536920 240185012632033536935 240194012632323536964 240209012632743537020 240224012633133537120 24023001263355353741ConjugateVerb_76 240233 240233364012633603537531264549354132fn0vp4t8modal_to12 24023801263521353815 240248012635463538212 240264012635733538312 240280012636023538412 240296012636393538519 240304012636733538621 240317012637223538813 240328012637543538920 240338012637913539024 240353012638303539124 240368012638693539224 240383012639073539324 240398012639463539424 240413012639853539524 240430012640383539720 240440012640753539824 240455012641143539924 240470012641543540024 240485012641933540124 240500012642333540224 240515012642733540324 240530012643273540520 240536012643423540535 240545012643723540565 240560012644153540620 240575012644553540720 240590012645153541013 24059401264548354131ConjugateVerb_77 240597 2405971101012645533541431267912354732fn0vp4t8modal_to12 24060201264714354205 240612012647393542112 240628012647653542212 240644012647933542312 240660012648293542419 240669012648623542521 240682012649113542713 240693012649433542820 240703012649803542924 240709012649953542939 240713012650113542955 240719012650223542966 240735012650603543024 240741012650753543039 240745012650913543055 240751012651023543066 240767012651403543124 240773012651553543139 240777012651713543155 240783012651823543166 240798012652203543224 240804012652353543239 240808012652513543255 240814012652623543266 240829012653003543324 240835012653153543339 240839012653313543355 240845012653423543366 240860012653803543424 240866012653953543439 240870012654113543455 240876012654223543466 240893012654743543620 240903012655113543724 240909012655293543742 240913012655453543758 240919012655563543769 240935012655943543824 240941012656123543842 240945012656283543858 240951012656393543869 240967012656773543924 240973012656953543942 240977012657113543958 240983012657223543969 240998012657603544024 241004012657783544042 241008012657943544058 241014012658053544069 241029012658433544124 241035012658613544142 241039012658773544158 241045012658883544169 241060012659263544224 241066012659443544242 241070012659603544258 241076012659713544269 241093012660233544420 241103012660603544524 241109012660903544554 241113012661063544570 241119012661173544581 241135012661553544624 241141012661853544654 241145012662013544670 241151012662123544681 241167012662503544724 241173012662793544753 241177012662953544769 241183012663063544780 241198012663443544824 241204012663743544854 241208012663903544870 241214012664013544881 241229012664393544924 241235012664693544954 241239012664853544970 241245012664963544981 241260012665343545024 241266012665643545054 241270012665803545070 241276012665913545081 241293012666433545220 241303012666803545324 241309012667093545353 241313012667253545369 241319012667363545380 241335012667743545424 241341012668033545453 241345012668193545469 241351012668303545480 241367012668683545524 241373012668973545553 241377012669133545569 241383012669243545580 241398012669623545624 241404012669913545653 241408012670073545669 241414012670183545680 241429012670563545724 241435012670853545753 241439012671013545769 241445012671123545780 241460012671503545824 241466012671793545853 241470012671953545869 241476012672063545880 241493012672583546020 241503012672953546124 241509012673213546150 241513012673373546166 241519012673483546177 241535012673863546224 241541012674123546250 241545012674283546266 241551012674393546277 241567012674773546324 241573012675033546350 241577012675193546366 241583012675303546377 241598012675683546424 241604012675943546450 241608012676103546466 241614012676213546477 241629012676593546524 241635012676853546550 241639012677013546566 241645012677123546577 241660012677503546624 241666012677763546650 241670012677923546666 241676012678033546677 241691012678783547013 24169501267911354731ConjugateVerb_78 241698 2416981101012679163547431271083355332fn0vp4t8modal_to12 24170301268077354805 241713012681023548112 241729012681303548212 241745012681603548312 241761012681983548419 241770012682313548521 241783012682803548713 241794012683123548820 241804012683493548924 241810012683663548941 241814012683823548957 241820012683933548968 241836012684313549024 241842012684483549041 241846012684643549057 241852012684753549068 241868012685133549124 241874012685293549140 241878012685453549156 241884012685563549167 241899012685943549224 241905012686113549241 241909012686273549257 241915012686383549268 241930012686763549324 241936012686933549341 241940012687093549357 241946012687203549368 241961012687583549424 241967012687753549441 241971012687913549457 241977012688023549468 241994012688543549620 242004012688913549724 242010012689073549740 242014012689233549756 242020012689343549767 242036012689723549824 242042012689883549840 242046012690043549856 242052012690153549867 242068012690533549924 242074012690693549940 242078012690853549956 242084012690963549967 242099012691343550024 242105012691503550040 242109012691663550056 242115012691773550067 242130012692153550124 242136012692313550140 242140012692473550156 242146012692583550167 242161012692963550224 242167012693123550240 242171012693283550256 242177012693393550267 242194012693913550420 242204012694283550524 242210012694443550540 242214012694603550556 242220012694713550567 242236012695093550624 242242012695253550640 242246012695413550656 242252012695523550667 242268012695903550724 242274012696063550740 242278012696223550756 242284012696333550767 242299012696713550824 242305012696873550840 242309012697033550856 242315012697143550867 242330012697523550924 242336012697683550940 242340012697843550956 242346012697953550967 242361012698333551024 242367012698493551040 242371012698653551056 242377012698763551067 242394012699283551220 242404012699653551324 242410012699813551340 242414012699973551356 242420012700083551367 242436012700463551424 242442012700623551440 242446012700783551456 242452012700893551467 242468012701273551524 242474012701433551540 242478012701593551556 242484012701703551567 242499012702083551624 242505012702243551640 242509012702403551656 242515012702513551667 242530012702893551724 242536012703053551740 242540012703213551756 242546012703323551767 242561012703703551824 242567012703863551840 242571012704023551856 242577012704133551867 242594012704653552020 242604012705023552124 242610012705223552144 242614012705383552160 242620012705493552171 242636012705873552224 242642012706073552244 242646012706233552260 242652012706343552271 242668012706723552324 242674012706923552344 242678012707083552360 242684012707193552371 242699012707573552424 242705012707773552444 242709012707933552460 242715012708043552471 242730012708423552524 242736012708623552544 242740012708783552560 242746012708893552571 242761012709273552624 242767012709473552644 242771012709633552660 242777012709743552671 242792012710493553013 24279601271082355331ConjugateVerb_79 242799 2427991101012710873553431274209355932fn0vp4t8modal_to12 24280401271248355405 242814012712733554112 242830012712993554212 242846012713273554312 242862012713633554419 242871012713963554521 242884012714453554713 242895012714773554820 242905012715143554924 242911012715293554939 242915012715453554955 242921012715563554966 242937012715943555024 242943012716093555039 242947012716253555055 242953012716363555066 242969012716743555124 242975012716913555141 242979012717073555157 242985012717183555168 243000012717563555224 243006012717713555239 243010012717873555255 243016012717983555266 243031012718363555324 243037012718513555339 243041012718673555355 243047012718783555366 243062012719163555424 243068012719313555439 243072012719473555455 243078012719583555466 243095012720103555620 243105012720473555724 243111012720633555740 243115012720793555756 243121012720903555767 243137012721283555824 243143012721443555840 243147012721603555856 243153012721713555867 243169012722093555924 243175012722253555940 243179012722413555956 243185012722523555967 243200012722903556024 243206012723063556040 243210012723223556056 243216012723333556067 243231012723713556124 243237012723873556140 243241012724033556156 243247012724143556167 243262012724523556224 243268012724683556240 243272012724843556256 243278012724953556267 243295012725473556420 243305012725843556524 243311012726003556540 243315012726163556556 243321012726273556567 243337012726653556624 243343012726813556640 243347012726973556656 243353012727083556667 243369012727463556724 243375012727623556740 243379012727783556756 243385012727893556767 243400012728273556824 243406012728433556840 243410012728593556856 243416012728703556867 243431012729083556924 243437012729243556940 243441012729403556956 243447012729513556967 243462012729893557024 243468012730053557040 243472012730213557056 243478012730323557067 243495012730843557220 243505012731213557324 243511012731373557340 243515012731533557356 243521012731643557367 243537012732023557424 243543012732183557440 243547012732343557456 243553012732453557467 243569012732833557524 243575012732993557540 243579012733153557556 243585012733263557567 243600012733643557624 243606012733803557640 243610012733963557656 243616012734073557667 243631012734453557724 243637012734613557740 243641012734773557756 243647012734883557767 243662012735263557824 243668012735423557840 243672012735583557856 243678012735693557867 243695012736213558020 243705012736583558124 243711012736733558139 243715012736893558155 243721012737003558166 243737012737383558224 243743012737533558239 243747012737693558255 243753012737803558266 243769012738183558324 243775012738333558339 243779012738493558355 243785012738603558366 243800012738983558424 243806012739133558439 243810012739293558455 243816012739403558466 243831012739783558524 243837012739933558539 243841012740093558555 243847012740203558566 243862012740583558624 243868012740733558639 243872012740893558655 243878012741003558666 243893012741753559013 24389701274208355931ConjugateVerb_80 243900 2439001101012742133559431277471356532fn0vp4t8modal_to12 24390501274374356005 243915012743993560112 243931012744273560212 243947012744573560312 243963012744953560419 243972012745283560521 243985012745773560713 243996012746093560820 244006012746463560924 244012012746633560941 244016012746793560957 244022012746903560968 244038012747283561024 244044012747453561041 244048012747613561057 244054012747723561068 244070012748103561124 244076012748273561141 244080012748433561157 244086012748543561168 244101012748923561224 244107012749093561241 244111012749253561257 244117012749363561268 244132012749743561324 244138012749913561341 244142012750073561357 244148012750183561368 244163012750563561424 244169012750733561441 244173012750893561457 244179012751003561468 244196012751523561620 244206012751893561724 244212012752113561746 244216012752273561762 244222012752383561773 244238012752763561824 244244012752983561846 244248012753143561862 244254012753253561873 244270012753633561924 244276012753853561946 244280012754013561962 244286012754123561973 244301012754503562024 244307012754723562046 244311012754883562062 244317012754993562073 244332012755373562124 244338012755593562146 244342012755753562162 244348012755863562173 244363012756243562224 244369012756463562246 244373012756623562262 244379012756733562273 244396012757253562420 244406012757623562524 244412012757843562546 244416012758003562562 244422012758113562573 244438012758493562624 244444012758713562646 244448012758873562662 244454012758983562673 244470012759363562724 244476012759583562746 244480012759743562762 244486012759853562773 244501012760233562824 244507012760453562846 244511012760613562862 244517012760723562873 244532012761103562924 244538012761323562946 244542012761483562962 244548012761593562973 244563012761973563024 244569012762193563046 244573012762353563062 244579012762463563073 244596012762983563220 244606012763353563324 244612012763573563346 244616012763733563362 244622012763843563373 244638012764223563424 244644012764443563446 244648012764603563462 244654012764713563473 244670012765093563524 244676012765313563546 244680012765473563562 244686012765583563573 244701012765963563624 244707012766183563646 244711012766343563662 244717012766453563673 244732012766833563724 244738012767053563746 244742012767213563762 244748012767323563773 244763012767703563824 244769012767923563846 244773012768083563862 244779012768193563873 244796012768713564020 244806012769083564124 244812012769253564141 244816012769413564157 244822012769523564168 244838012769903564224 244844012770073564241 244848012770233564257 244854012770343564268 244870012770723564324 244876012770893564341 244880012771053564357 244886012771163564368 244901012771543564424 244907012771713564441 244911012771873564457 244917012771983564468 244932012772363564524 244938012772533564541 244942012772693564557 244948012772803564568 244963012773183564624 244969012773353564641 244973012773513564657 244979012773623564668 244994012774373565013 24499801277470356531ConjugateVerb_81 245001 2450011101012774753565431280766357132fn0vp4t8modal_to12 24500601277636356605 245016012776613566112 245032012776903566212 245048012777213566312 245064012777603566419 245073012777933566521 245086012778423566713 245097012778743566820 245107012779113566924 245113012779293566942 245117012779453566958 245123012779563566969 245139012779943567024 245145012780123567042 245149012780283567058 245155012780393567069 245171012780773567124 245177012780953567142 245181012781113567158 245187012781223567169 245202012781603567224 245208012781783567242 245212012781943567258 245218012782053567269 245233012782433567324 245239012782613567342 245243012782773567358 245249012782883567369 245264012783263567424 245270012783443567442 245274012783603567458 245280012783713567469 245297012784233567620 245307012784603567724 245313012784833567747 245317012784993567763 245323012785103567774 245339012785483567824 245345012785713567847 245349012785873567863 245355012785983567874 245371012786363567924 245377012786593567947 245381012786753567963 245387012786863567974 245402012787243568024 245408012787473568047 245412012787633568063 245418012787743568074 245433012788123568124 245439012788353568147 245443012788513568163 245449012788623568174 245464012789003568224 245470012789233568247 245474012789393568263 245480012789503568274 245497012790023568420 245507012790393568524 245513012790623568547 245517012790783568563 245523012790893568574 245539012791273568624 245545012791503568647 245549012791663568663 245555012791773568674 245571012792153568724 245577012792383568747 245581012792543568763 245587012792653568774 245602012793033568824 245608012793263568847 245612012793423568863 245618012793533568874 245633012793913568924 245639012794143568947 245643012794303568963 245649012794413568974 245664012794793569024 245670012795023569047 245674012795183569063 245680012795293569074 245697012795813569220 245707012796183569324 245713012796413569347 245717012796573569363 245723012796683569374 245739012797063569424 245745012797293569447 245749012797453569463 245755012797563569474 245771012797943569524 245777012798173569547 245781012798333569563 245787012798443569574 245802012798823569624 245808012799053569647 245812012799213569663 245818012799323569674 245833012799703569724 245839012799933569747 245843012800093569763 245849012800203569774 245864012800583569824 245870012800813569847 245874012800973569863 245880012801083569874 245897012801603570020 245907012801973570124 245913012802153570142 245917012802313570158 245923012802423570169 245939012802803570224 245945012802983570242 245949012803143570258 245955012803253570269 245971012803633570324 245977012803813570342 245981012803973570358 245987012804083570369 246002012804463570424 246008012804643570442 246012012804803570458 246018012804913570469 246033012805293570524 246039012805473570542 246043012805633570558 246049012805743570569 246064012806123570624 246070012806303570642 246074012806463570658 246080012806573570669 246095012807323571013 24609901280765357131ConjugateVerb_82 246102 2461021101012807703571431283995357732fn0vp4t8modal_to12 24610701280931357205 246117012809563572112 246133012809833572212 246149012810123572312 246165012810493572419 246174012810823572521 246187012811313572713 246198012811633572820 246208012812003572924 246214012812163572940 246218012812323572956 246224012812433572967 246240012812813573024 246246012812973573040 246250012813133573056 246256012813243573067 246272012813623573124 246278012813783573140 246282012813943573156 246288012814053573167 246303012814433573224 246309012814593573240 246313012814753573256 246319012814863573267 246334012815243573324 246340012815403573340 246344012815563573356 246350012815673573367 246365012816053573424 246371012816213573440 246375012816373573456 246381012816483573467 246398012817003573620 246408012817373573724 246414012817583573745 246418012817743573761 246424012817853573772 246440012818233573824 246446012818443573845 246450012818603573861 246456012818713573872 246472012819093573924 246478012819303573945 246482012819463573961 246488012819573573972 246503012819953574024 246509012820163574045 246513012820323574061 246519012820433574072 246534012820813574124 246540012821023574145 246544012821183574161 246550012821293574172 246565012821673574224 246571012821883574245 246575012822043574261 246581012822153574272 246598012822673574420 246608012823043574524 246614012823253574545 246618012823413574561 246624012823523574572 246640012823903574624 246646012824113574645 246650012824273574661 246656012824383574672 246672012824763574724 246678012824973574745 246682012825133574761 246688012825243574772 246703012825623574824 246709012825833574845 246713012825993574861 246719012826103574872 246734012826483574924 246740012826693574945 246744012826853574961 246750012826963574972 246765012827343575024 246771012827553575045 246775012827713575061 246781012827823575072 246798012828343575220 246808012828713575324 246814012828923575345 246818012829083575361 246824012829193575372 246840012829573575424 246846012829783575445 246850012829943575461 246856012830053575472 246872012830433575524 246878012830643575545 246882012830803575561 246888012830913575572 246903012831293575624 246909012831503575645 246913012831663575661 246919012831773575672 246934012832153575724 246940012832363575745 246944012832523575761 246950012832633575772 246965012833013575824 246971012833223575845 246975012833383575861 246981012833493575872 246998012834013576020 247008012834383576124 247014012834543576140 247018012834703576156 247024012834813576167 247040012835193576224 247046012835353576240 247050012835513576256 247056012835623576267 247072012836003576324 247078012836163576340 247082012836323576356 247088012836433576367 247103012836813576424 247109012836973576440 247113012837133576456 247119012837243576467 247134012837623576524 247140012837783576540 247144012837943576556 247150012838053576567 247165012838433576624 247171012838593576640 247175012838753576656 247181012838863576667 247196012839613577013 24720001283994357731ConjugateVerb_83 247203 2472031101012839993577431287290358332fn0vp4t8modal_to12 24720801284160357805 247218012841853578112 247234012842143578212 247250012842453578312 247266012842843578419 247275012843173578521 247288012843663578713 247299012843983578820 247309012844353578924 247315012844533578942 247319012844693578958 247325012844803578969 247341012845183579024 247347012845363579042 247351012845523579058 247357012845633579069 247373012846013579124 247379012846193579142 247383012846353579158 247389012846463579169 247404012846843579224 247410012847023579242 247414012847183579258 247420012847293579269 247435012847673579324 247441012847853579342 247445012848013579358 247451012848123579369 247466012848503579424 247472012848683579442 247476012848843579458 247482012848953579469 247499012849473579620 247509012849843579724 247515012850073579747 247519012850233579763 247525012850343579774 247541012850723579824 247547012850953579847 247551012851113579863 247557012851223579874 247573012851603579924 247579012851833579947 247583012851993579963 247589012852103579974 247604012852483580024 247610012852713580047 247614012852873580063 247620012852983580074 247635012853363580124 247641012853593580147 247645012853753580163 247651012853863580174 247666012854243580224 247672012854473580247 247676012854633580263 247682012854743580274 247699012855263580420 247709012855633580524 247715012855863580547 247719012856023580563 247725012856133580574 247741012856513580624 247747012856743580647 247751012856903580663 247757012857013580674 247773012857393580724 247779012857623580747 247783012857783580763 247789012857893580774 247804012858273580824 247810012858503580847 247814012858663580863 247820012858773580874 247835012859153580924 247841012859383580947 247845012859543580963 247851012859653580974 247866012860033581024 247872012860263581047 247876012860423581063 247882012860533581074 247899012861053581220 247909012861423581324 247915012861653581347 247919012861813581363 247925012861923581374 247941012862303581424 247947012862533581447 247951012862693581463 247957012862803581474 247973012863183581524 247979012863413581547 247983012863573581563 247989012863683581574 248004012864063581624 248010012864293581647 248014012864453581663 248020012864563581674 248035012864943581724 248041012865173581747 248045012865333581763 248051012865443581774 248066012865823581824 248072012866053581847 248076012866213581863 248082012866323581874 248099012866843582020 248109012867213582124 248115012867393582142 248119012867553582158 248125012867663582169 248141012868043582224 248147012868223582242 248151012868383582258 248157012868493582269 248173012868873582324 248179012869053582342 248183012869213582358 248189012869323582369 248204012869703582424 248210012869883582442 248214012870043582458 248220012870153582469 248235012870533582524 248241012870713582542 248245012870873582558 248251012870983582569 248266012871363582624 248272012871543582642 248276012871703582658 248282012871813582669 248297012872563583013 24830101287289358331ConjugateVerb_84 248304 2483041101012872943583431290585358932fn0vp4t8modal_to12 24830901287455358405 248319012874803584112 248335012875093584212 248351012875403584312 248367012875793584419 248376012876123584521 248389012876613584713 248400012876933584820 248410012877303584924 248416012877483584942 248420012877643584958 248426012877753584969 248442012878133585024 248448012878313585042 248452012878473585058 248458012878583585069 248474012878963585124 248480012879143585142 248484012879303585158 248490012879413585169 248505012879793585224 248511012879973585242 248515012880133585258 248521012880243585269 248536012880623585324 248542012880803585342 248546012880963585358 248552012881073585369 248567012881453585424 248573012881633585442 248577012881793585458 248583012881903585469 248600012882423585620 248610012882793585724 248616012883023585747 248620012883183585763 248626012883293585774 248642012883673585824 248648012883903585847 248652012884063585863 248658012884173585874 248674012884553585924 248680012884783585947 248684012884943585963 248690012885053585974 248705012885433586024 248711012885663586047 248715012885823586063 248721012885933586074 248736012886313586124 248742012886543586147 248746012886703586163 248752012886813586174 248767012887193586224 248773012887423586247 248777012887583586263 248783012887693586274 248800012888213586420 248810012888583586524 248816012888813586547 248820012888973586563 248826012889083586574 248842012889463586624 248848012889693586647 248852012889853586663 248858012889963586674 248874012890343586724 248880012890573586747 248884012890733586763 248890012890843586774 248905012891223586824 248911012891453586847 248915012891613586863 248921012891723586874 248936012892103586924 248942012892333586947 248946012892493586963 248952012892603586974 248967012892983587024 248973012893213587047 248977012893373587063 248983012893483587074 249000012894003587220 249010012894373587324 249016012894603587347 249020012894763587363 249026012894873587374 249042012895253587424 249048012895483587447 249052012895643587463 249058012895753587474 249074012896133587524 249080012896363587547 249084012896523587563 249090012896633587574 249105012897013587624 249111012897243587647 249115012897403587663 249121012897513587674 249136012897893587724 249142012898123587747 249146012898283587763 249152012898393587774 249167012898773587824 249173012899003587847 249177012899163587863 249183012899273587874 249200012899793588020 249210012900163588124 249216012900343588142 249220012900503588158 249226012900613588169 249242012900993588224 249248012901173588242 249252012901333588258 249258012901443588269 249274012901823588324 249280012902003588342 249284012902163588358 249290012902273588369 249305012902653588424 249311012902833588442 249315012902993588458 249321012903103588469 249336012903483588524 249342012903663588542 249346012903823588558 249352012903933588569 249367012904313588624 249373012904493588642 249377012904653588658 249383012904763588669 249398012905513589013 24940201290584358931ConjugateVerb_85 249405 2494051101012905893589431293913359532fn0vp4t8modal_to12 24941001290750359005 249420012907753590112 249436012908053590212 249452012908373590312 249468012908773590419 249477012909103590521 249490012909593590713 249501012909913590820 249511012910283590924 249517012910473590943 249521012910633590959 249527012910743590970 249543012911123591024 249549012911313591043 249553012911473591059 249559012911583591070 249575012911963591124 249581012912153591143 249585012912313591159 249591012912423591170 249606012912803591224 249612012912993591243 249616012913153591259 249622012913263591270 249637012913643591324 249643012913833591343 249647012913993591359 249653012914103591370 249668012914483591424 249674012914673591443 249678012914833591459 249684012914943591470 249701012915463591620 249711012915833591724 249717012916073591748 249721012916233591764 249727012916343591775 249743012916723591824 249749012916963591848 249753012917123591864 249759012917233591875 249775012917613591924 249781012917853591948 249785012918013591964 249791012918123591975 249806012918503592024 249812012918743592048 249816012918903592064 249822012919013592075 249837012919393592124 249843012919633592148 249847012919793592164 249853012919903592175 249868012920283592224 249874012920523592248 249878012920683592264 249884012920793592275 249901012921313592420 249911012921683592524 249917012921923592548 249921012922083592564 249927012922193592575 249943012922573592624 249949012922813592648 249953012922973592664 249959012923083592675 249975012923463592724 249981012923703592748 249985012923863592764 249991012923973592775 250006012924353592824 250012012924593592848 250016012924753592864 250022012924863592875 250037012925243592924 250043012925483592948 250047012925643592964 250053012925753592975 250068012926133593024 250074012926373593048 250078012926533593064 250084012926643593075 250101012927163593220 250111012927533593324 250117012927773593348 250121012927933593364 250127012928043593375 250143012928423593424 250149012928663593448 250153012928823593464 250159012928933593475 250175012929313593524 250181012929553593548 250185012929713593564 250191012929823593575 250206012930203593624 250212012930443593648 250216012930603593664 250222012930713593675 250237012931093593724 250243012931333593748 250247012931493593764 250253012931603593775 250268012931983593824 250274012932223593848 250278012932383593864 250284012932493593875 250301012933013594020 250311012933383594124 250317012933573594143 250321012933733594159 250327012933843594170 250343012934223594224 250349012934413594243 250353012934573594259 250359012934683594270 250375012935063594324 250381012935253594343 250385012935413594359 250391012935523594370 250406012935903594424 250412012936093594443 250416012936253594459 250422012936363594470 250437012936743594524 250443012936933594543 250447012937093594559 250453012937203594570 250468012937583594624 250474012937773594643 250478012937933594659 250484012938043594670 250499012938793595013 25050301293912359531ConjugateVerb_86 250506 2505061101012939173595431297073360132fn0vp4t8modal_to12 25051101294078359605 250521012941033596112 250537012941293596212 250553012941573596312 250569012941933596419 250578012942263596521 250591012942753596713 250602012943073596820 250612012943443596924 250618012943593596939 250622012943753596955 250628012943863596966 250644012944243597024 250650012944393597039 250654012944553597055 250660012944663597066 250676012945043597124 250682012945193597139 250686012945353597155 250692012945463597166 250707012945843597224 250713012945993597239 250717012946153597255 250723012946263597266 250738012946643597324 250744012946793597339 250748012946953597355 250754012947063597366 250769012947443597424 250775012947593597439 250779012947753597455 250785012947863597466 250802012948383597620 250812012948753597724 250818012948933597742 250822012949093597758 250828012949203597769 250844012949583597824 250850012949763597842 250854012949923597858 250860012950033597869 250876012950413597924 250882012950593597942 250886012950753597958 250892012950863597969 250907012951243598024 250913012951423598042 250917012951583598058 250923012951693598069 250938012952073598124 250944012952253598142 250948012952413598158 250954012952523598169 250969012952903598224 250975012953083598242 250979012953243598258 250985012953353598269 251002012953873598420 251012012954243598524 251018012954423598542 251022012954583598558 251028012954693598569 251044012955073598624 251050012955253598642 251054012955413598658 251060012955523598669 251076012955903598724 251082012956083598742 251086012956243598758 251092012956353598769 251107012956733598824 251113012956913598842 251117012957073598858 251123012957183598869 251138012957563598924 251144012957743598942 251148012957903598958 251154012958013598969 251169012958393599024 251175012958573599042 251179012958733599058 251185012958843599069 251202012959363599220 251212012959733599324 251218012959913599342 251222012960073599358 251228012960183599369 251244012960563599424 251250012960743599442 251254012960903599458 251260012961013599469 251276012961393599524 251282012961573599542 251286012961733599558 251292012961843599569 251307012962223599624 251313012962403599642 251317012962563599658 251323012962673599669 251338012963053599724 251344012963233599742 251348012963393599758 251354012963503599769 251369012963883599824 251375012964063599842 251379012964223599858 251385012964333599869 251402012964853600020 251412012965223600124 251418012965373600139 251422012965533600155 251428012965643600166 251444012966023600224 251450012966173600239 251454012966333600255 251460012966443600266 251476012966823600324 251482012966973600339 251486012967133600355 251492012967243600366 251507012967623600424 251513012967773600439 251517012967933600455 251523012968043600466 251538012968423600524 251544012968573600539 251548012968733600555 251554012968843600566 251569012969223600624 251575012969373600639 251579012969533600655 251585012969643600666 251600012970393601013 25160401297072360131TableOfVerbs 5239232964false012970753601411298331360141257XAbstractSub 251607 25160745012986263603031298728360342 25161001298644360315 251625012986733603134 25162801298685360325 25164001298710360335XTestMove 251652 251652157012987333603631299123360452obj0dest4 25165701298757360375 251666012987833603731 25169301298843360385 251706012988693603831 25175701298962360405 25176101298985360419 251767012990023604126 25179401299069360429 25180701299114360445ActionsOnSub 251809 251809240129926336052312993323605272 251812012992773605217 251817012992963605236 251821012993083605248ActionsOffSub 251833 251833230129933636053312994073605374 251836012993513605318 251840012993703605337 251844012993823605349GonearSub 251856 25185624012995463606031299587360622 25185901299558360612 25187701299586360621XPurloinSub 251880 25188077012997273606931299871360742 25188301299744360705 251897012997733607034 25190001299785360715 251911012998063607126 25194101299838360725 25194501299854360735PredictableSub 251957 25195728013000103608131300116360852 25196001300030360825 25196901300053360835 25197301300069360845ShowRelationsSub 251985 25198518013002583609231300315360942 25198801300279360934 25200001300314360941ShowOneRelation 252003 25200343013003203609631300444361002rel0 25200801300342360972 25202601300396360983 25204301300443361001suppress_text_substitution 4977840130058436107113006253610742ShowResponsesSub 252046 252046449013006293610831301702361422a0i4j8reg12wd16set_mode20 25205101300670361092 252058013006933610925 25207001300730361102 25207501300739361112 252090013007713611134 252097013007903611153 25210501300797361122 252120013008293611234 252127013008483611253 25213501300855361132 252143013008793611326 25215101300886361142 252160013009033611419 25216601300922361163 25217001300934361173 252176013009483611717 25218701300971361183 25219201300989361194 25219601301007361207 25220201301072361214 25220801301113361247 252221013011513612445 252233013011283612422 25225001301167361253 252271013012153612551 25227701301222361263 25228801301257361274 25230901301311361285 25231301301332361296 25234901301399361316 25237601301457361344 25242001301547361363 25242501301565361374 25244601301619361385 25249201301701361421ShowResponsesRange 252495 252495182013017073614431302170361672from0to4set_mode8i12 25250001301747361452 25250401301765361467 252508013017733614615 25251501301789361473 25252501301815361487 25254801301843361507 25255401301863361523 25256301301890361533 25257301301916361547 25258801301936361557 25260201301956361567 25260801301974361583 25261301302011361593 25262301302057361603 25262701302095361613 25263701302121361627 25265201302138361637 25265801302155361653 252664013017803614622 25267401302169361671RulesOnSub 252677 25267724013023083617431302486361782 25268001302321361752 252685013023383617519 25268901302351361762RulesAllSub 252701 25270124013024903617931302616361822 25270401302504361802 252709013025213618019 25271301302534361812RulesOffSub 252725 25272523013026203618331302736361862 25272801302634361842 252732013026513618419 25273601302664361852ScenesOnSub 252748 25274831013028753619331303022361972 25275101302889361942 25275601302908361952 252763013029273619521 25276701302940361962ScenesOffSub 252779 25277923013030263619831303150362012 25278201303041361992 252786013030593619920 25279001303072362002x_scope_count 4977880130328636208113033063620821ScopeSub 252802 25280241013033103620931303432362132 25280501303324362105 25280901303347362115 25282301303383362125 252828013034073621229 25284001303431362131Print_ScL 252843 252843550130343636214313035103621477obj0 252848013034513621418ShowHeapSub 252898 25289813013036513622131303679362232 25290101303665362222 25290801303678362231ShowMeSub 252911 2529114997013038183623031312851363432t_00na4 25291601303837362312 25292101303851362323 252926013038723623224 25293101303896362333 25296001303958362344 25296701303988362354 25297301304043362373 25298901304074362384 252995013040933623823 253006013041203623850 25301201304137362403 253017013041473624013 253022013041613624027 253025013041693624035 25303101304187362415 253077013042473624165 253090013042613624179 253096013042733624191 25310201304301362425 253148013043633624267 253161013043773624281 253167013043893624293 25317301304419362435 253219013044713624357 253232013044853624371 253238013044973624383 25324401304525362445 253290013045793624459 253303013045933624473 253309013046053624485 25331501304635362455 253361013047053624575 253374013047193624589 2533800130473136245101 25338601304763362471 253403013047893624727 253408013048033624741 253411013048113624749 25341701304829362485 253463013048793624855 253476013048933624869 253482013049053624881 25348801304928362495 253534013049803624957 253547013049943624971 253553013050063624983 25355901305026362505 253605013050803625059 253618013050943625073 253624013051063625085 25363001305129362515 253676013051853625161 253689013051993625175 253695013052113625187 25370101305234362531 253718013052613625328 253723013052753625342 253726013052833625350 25373201305301362545 253778013053513625455 253791013053653625469 253797013053773625481 25380301305396362555 253849013054483625557 253862013054623625571 253868013054743625583 25387401305495362565 253920013055473625657 253933013055613625671 253939013055733625683 25394501305595362575 253991013056493625759 254004013056633625773 254010013056753625785 25401601305699362585 254062013057513625857 254075013057653625871 254081013057773625883 25408701305807362595 254133013058613625959 254146013058753625973 254152013058873625985 25415801305911362605 254204013059653626059 254217013059793626073 254223013059913626085 25422901306014362615 254275013060703626161 254288013060843626175 254294013060963626187 25430001306120362625 254346013061763626261 254359013061903626275 254365013062023626287 25437101306240362635 254417013062903626355 254430013063043626369 254436013063163626381 25444201306339362645 254488013063993626465 254501013064133626479 254507013064253626491 25451301306450362655 254559013065083626563 254572013065223626577 254578013065343626589 25458401306561362665 254630013066173626661 254643013066313626675 254649013066433626687 25465501306677362675 254701013067353626763 254714013067493626777 254720013067613626789 25472601306797362685 254772013068553626863 254785013068693626877 254791013068813626889 25479701306906362695 254843013069663626965 254856013069803626979 254862013069923626991 25486801307017362711 254885013070483627132 254890013070623627146 254893013070703627154 25489901307088362725 254945013071443627261 254958013071583627275 254964013071703627287 25497001307204362735 255016013072623627363 255029013072763627377 255035013072883627389 25504101307322362751 255058013073483627527 255063013073623627541 255066013073703627549 25507201307388362765 255118013074363627653 255131013074503627667 255137013074623627679 25514301307482362775 255189013075323627755 255202013075463627769 255208013075583627781 25521401307580362785 255260013076363627861 255273013076503627875 255279013076623627887 25528501307686362795 255331013077443627963 255344013077583627977 255350013077703627989 25535601307796362805 255402013078523628061 255415013078663628075 255421013078783628087 25542701307902362815 255473013079543628157 255486013079683628171 255492013079803628183 25549801308002362825 255544013080563628259 255557013080703628273 255563013080823628285 25556901308104362841 255586013081353628432 255591013081493628446 255594013081573628454 25560001308175362855 255646013082333628563 255659013082473628577 255665013082593628589 25567101308284362865 255717013083483628669 255730013083623628683 255736013083743628695 25574201308396362875 255788013084583628767 255801013084723628781 255807013084843628793 25581301308511362885 255859013085593628853 255872013085733628867 255878013085853628879 25588401308605362895 255930013086553628955 255943013086693628969 255949013086813628981 25595501308703362905 256001013087593629061 256014013087733629075 256020013087853629087 25602601308809362915 256072013088673629163 256085013088813629177 256091013088933629189 25609701308919362925 256143013089753629261 256156013089893629275 256162013090013629287 25616801309025362935 256214013090773629357 256227013090913629371 256233013091033629383 25623901309125362945 256285013091793629459 256298013091933629473 256304013092053629485 25631001309227362961 256326013092583629632 256331013092723629646 256334013092803629654 25634001309298362975 256386013093563629763 256399013093703629777 256405013093823629789 25641101309405362991 256428013094333629929 256433013094473629943 256436013094553629951 25644201309473363005 256488013095253630057 256501013095393630071 256507013095513630083 25651301309573363015 256559013096273630159 256572013096413630173 256578013096533630185 25658401309673363025 256630013097253630257 256643013097393630271 256649013097513630283 25665501309771363041 256672013098003630430 256677013098143630444 256680013098223630452 25668601309840363055 256732013098843630549 256745013098983630563 256751013099103630575 25675701309937363065 256803013099833630651 256816013099973630665 256822013100093630677 25682801310035363081 256833013100453630811 256838013100593630825 256841013100673630833 25684701310084363095 256853013101133630934 2568800131019936309120 2568890131021936309140 25692701310300363105 256933013103243631029 2569600131040736310112 2569690131042736310132 25700701310505363115 257013013105363631136 2570400131061536311115 2570490131063536311135 25708701310709363125 257093013107393631235 2571200131081936312115 2571290131083936312135 25716701310912363141 257184013109383631427 257189013109523631441 257192013109603631449 25719801310977363155 257204013110003631528 2572310131108436315112 2572400131110436315132 25727801311183363165 257293013112283631650 257299013112503631672 25732501311325363191 257342013113523631928 257347013113663631942 257350013113743631950 25735601311391363205 257362013114143632028 2573890131149836320112 2573980131151836320132 25743601311597363215 257442013116273632135 2574690131170736321115 2574780131172736321135 25751601311802363225 257531013118453632248 257537013118693632272 25756301311942363251 257579013119733632532 257584013119873632546 257587013119953632554 25759301312012363265 257609013120593632652 257615013120793632672 25764201312156363291 257658013121823632927 257663013121963632941 257666013122043632949 25767201312221363305 257687013122633633047 257693013122853633069 25771901312357363331 257735013123883633332 257740013124023633346 257743013124103633354 25774901312427363345 257755013124563633434 25778101312522363361 257797013125533633632 257802013125673633646 257805013125753633654 25781101312592363375 257817013126213633734 25784301312687363391 257859013127153633929 257864013127293633943 257867013127373633951 25787301312754363405 257879013127833634034 25790501312850363431ShowRLocation 257908 257908712013128563634531313456363662obj0top4 25791301312880363462 257929013129053634627 25793201312914363472 25793801312926363482 25799701312947363493 258031013129653634921 25804101312995363514 258134013130243635133 25814001313048363524 258233013130793635235 25823901313095363534 258309013131283635337 25831501313144363544 258408013131753635435 25841401313194363563 25847701313221363573 25854301313261363593 25855601313292363604 258560013133103636022 25856601313334363614 25859001313383363624 25861101313431363648 25861701313455363661ShowMeRecursively 258620 258620786013134613636831314493363962obj0depth4f8c12i16k20 25862501313499363692 25865201313517363702 258674013135783637063 258680013135893637074 25868401313602363712 25869301313621363722 25869801313640363733 258711013136663637329 25874101313722363743 258775013137403637421 25878101313761363762 25879501313792363773 25886201313834363783 25887601313874363794 25888201313890363804 25890101313930363815 258935013139553638130 25894101313981363825 258975013140013638225 258984013140273638310 259018013140453638328 259027013140693638410 25903301314094363864 25904201314126363892 25904801314138363902 259061013141633639027 25909101314224363912 25910901314268363923 25913501314329363932 259193013143453639318 25926801314397363942 259332013144303639435 25940301314482363952AllowInShowme 259406 25940623013144983639831314580364012pr0 25941101314517363992 25942601314572364002ShowVerbSub 259429 259429194013147213640831315348364272address0lines4meta8i12x16 25943401314758364092 259439013147663640910 25944701314793364105 25946801314843364119 25948001314901364125 25949901314937364135 25950901314973364145 25951901315014364155 25952901315038364165 25953501315053364175 25954101315072364185 259545013150823641815 25955101315101364195 25956001315130364205 25956301315144364215 259567013151603642121 259573013152033642212 25957801315232364239 25958801315278364249 259594013152923642423 259601013153123642443 259604013152133642222 25961301315332364265 25962001315347364271DebugGrammarLine 259623 259623233013153533642931315659364372pcount0 25962801315382364305 259634013154063643112 25968701315463364329 259749013154993643245 25975501315519364339 259816013154433643149 25982601315574364355 25984201315619364365 259847013156403643626 25985301315658364371DebugToken 259856 259856349013156643643931316741364692token0 25986101315686364405 25987001315711364415 25988001315760364439 25990601315833364459 259916013158883644633 259932013159343644733 259948013159803644833 259964013160273644933 259980013160783645033 259995013161313645133 260010013161843645233 260025013162343645333 260040013162833645433 260055013163313645533 260070013163783645633 26008601316431364599 26011701316503364619 26014201316574364639 26016101316634364659 26018601316698364679 26020201316740364691TestScriptSub 260205 26020515013187633655831318825365602 26020801318779365592TraceOnSub 260220 260220240131897236569313190283656959 260223013189843656915 260228013190003656931 260232013190123656943TraceLevelSub 260244 26024432013190333657131319159365742 26024701319052365725 260253013190823657235 26025701319098365735 26027301319158365741TraceOffSub 260276 260276230131916436576313192203657659 260279013191773657616 260283013191933657632 260287013192053657644XTreeSub 260299 260299128013193573658331319504365892i0 26030401319373365845 26031001319398365859 260317013194253658613 260391013194653658653 260413013194893658810 26042401319503365891XObj 260427 260427512013195093659131319963366022obj0f4 26043201319525365925 260490013195473659227 260502013195703659250 26051101319589365935 26052601319616365945 26059201319656365959 26073001319717365965 26073301319731365975 26079101319763365985 26080001319789365999 26087001319885366019 26093601319962366021testcommandnoun 260939 26093999013200953660931320392366172obj0o24 26094401320120366102 26095501320148366116 26096401320185366126 260971013202113661310 261000013202773661414 261029013203133661512 26103501320391366171grammar line 599997 6000160132042136621513204843662168grammar line 600016 600020013205113662451320572366255grammar line 600020 600029013205723662551320633366265grammar line 600029 6000380132063336626513206903662662grammar line 600038 6000470132071636629513207693662958grammar line 600047 6000560132079636632513208513663260grammar line 600056 6000600132087736635513209353663563grammar line 600060 6000640132096136638213210213663862grammar line 600064 600068013210473664121321109366422grammar line 600068 600077013211093664221321171366432grammar line 600077 600091013211713664321321233366442grammar line 600091 6001050132123336644213212933664462grammar line 600105 600109013213153664721321371366482grammar line 600109 600118013213713664821321428366492grammar line 600118 600127013214283664921321484366502grammar line 600127 6001360132148436650213215393665057grammar line 600136 600140013215623665321321619366542grammar line 600140 600149013216193665421321676366552grammar line 600149 6001580132167636655213217323665558grammar line 600158 600162013217573665851321814366595grammar line 600162 6001710132181436659513218663665957grammar line 600171 6001750132189136662213219463666257grammar line 600175 600179013219693666521322024366662grammar line 600179 6001880132202436666213220773666655grammar line 600188 6001970132210536669513221603666960grammar line 600197 600201013221813667221322240366732grammar line 600201 6002100132224036673213222973667359grammar line 600210 600214013223223667651322381366775grammar line 600214 600223013223813667751322443366785grammar line 600223 600232013224433667851322502366795grammar line 600232 6002410132250236679513225573667960grammar line 600241 600245013225813668251322638366835grammar line 600245 6002540132263836683513226903668357InternalTestCases 261038 2610386013226953668531322720366866 26104101322719366865CheckDPMR 261044 261044131013229523669841323366367113result0sinp14sinp28rv12 26104901322987366993 261054013230013669917 261059013230153669931 261065013230283669944 26107101323045367003 26108101323074367013 261086013230883670117 26109101323104367023 26110501323142367034 26111301323170367044 261122013231933670427 26112501323206367054 261134013232293670527 26113701323242367064 261146013232653670627 26114901323278367074 261158013233013670727 26116101323314367084 261170013233383670828 26117201323354367103LITTLE_USED_DO_NOTHING_R 261175 26117550132337136713313234063671338 261178013233973671329PHR_82_r0 261180 261180196013238393673131325394367692t_00t_14ct_08ct_112 26118501324032367385 26120201324092367409 261207013241573674213 26121601324284367459 261242013244493674713 261249013244783674742 261262013245563674913 261267013246343675117 261280013247753675417 261306013249123675813 261311013250193676017 261318013250483676046 261328013251503676217 261351013252763676417 261374013253853676817PHR_81_r1 261376 26137617013255033677331325701367792t_00 26138101325635367775 26139101325692367785PHR_350_r2 261393 2613935013258423678331325897367872 26139601325888367865PHR_390_r3 261398 26139817013260333679131326228367972t_00 26140301326162367955 26141301326219367965PHR_424_r4 261415 26141529013264263680131326779368132t_00tmp_04 26142001326648368085 26143901326750368115 26144201326768368125PHR_442_r5 261444 26144471013270263681731327532368292t_00tmp_04 26144901327273368245 26151001327503368275 26151301327521368285PHR_443_r6 261515 26151571013277833683331328290368452t_00tmp_04 26152001328030368405 26158101328261368435 26158401328279368445PHR_444_r7 261586 26158683013285433684931329086368612t_00tmp_04 26159101328789368565 26166401329057368595 26166701329075368605PHR_527_r8 261669 26166948013291973686531329578368742 26167201329286368675 26167601329340368696 261683013293893686955 26168601329421368705 261693013294363687020 26169901329472368726 26170201329517368735 261709013295323687320 261715013295693687357PHR_528_r9 261717 26171748013296873687831330062368872 26172001329774368805 26172401329828368826 261731013298773688255 26173401329908368835 261741013299233688320 26174701329958368856 26175001330002368865 261757013300173688620 261763013300533688656PHR_763_r10 261765 261765186013301623689131331889369312 26176801330233368935 26177301330323368955 26178001330406368979 26178401330434368989 261791013304493689824 26179701330548369005 26180401330634369029 26180801330664369039 261815013306793690324 26182101330779369055 26182801330877369079 261840013309483690913 261844013309823691013 261851013309973691028 261860013310823691213 261864013311173691313 261871013311323691328 26187701331245369165 26188401331328369189 26188801331358369199 261895013313733691924 26190101331472369215 26190801331557369239 26191201331588369249 261919013316033692424 26192501331702369265 26193201331787369289 26193601331819369299 261943013318343692924 26194901331880369309PHR_764_r11 261951 261951186013319893693531333722369752 26195401332060369375 26195901332150369395 26196601332234369419 26197001332263369429 261977013322783694224 26198301332378369445 26199001332464369469 26199401332494369479 262001013325093694724 26200701332609369495 26201401332707369519 262026013327793695313 262030013328143695413 262037013328293695428 262046013329153695613 262050013329503695713 262057013329653695728 26206301333078369605 26207001333161369629 26207401333191369639 262081013332063696324 26208701333305369655 26209401333390369679 26209801333421369689 262105013334363696824 26211101333535369705 26211801333620369729 26212201333652369739 262129013336673697324 26213501333713369749PHR_765_r12 262137 262137186013338243697931335590370192 26214001333895369815 26214501333985369835 26215201334071369859 26215601334102369869 262163013341173698624 26216901334219369885 26217601334307369909 26218001334339369919 262187013343543699124 26219301334456369935 26220001334554369959 262212013346263699713 262216013346613699813 262223013346763699828 262232013347633700013 262236013347993700113 262243013348143700128 26224901334928370045 26225601335013370069 26226001335045370079 262267013350603700724 26227301335161370095 26228001335248370119 26228401335281370129 262291013352963701224 26229701335397370145 26230401335484370169 26230801335518370179 262315013355333701724 26232101335581370189PHR_766_r13 262323 262323186013356973702331337541370632 26232601335768370255 26233101335858370275 26233801335946370299 26234201335979370309 262349013359943703024 26235501336098370325 26236201336189370349 26236601336224370359 262373013362393703524 26237901336344370375 26238601336442370399 262398013365183704113 262402013365573704213 262409013365723704228 262418013366663704413 262422013367053704513 262429013367203704528 26243501336837370485 26244201336927370509 26244601336964370519 262453013369793705124 26245901337085370535 26246601337177370559 26247001337215370569 262477013372303705624 26248301337336370585 26249001337427370609 26249401337465370619 262501013374803706124 26250701337532370629PHR_767_r14 262509 262509186013376423706731339387371072 26251201337713370695 26251701337803370715 26252401337887370739 26252801337916370749 262535013379313707424 26254101338031370765 26254801338118370789 26255201338149370799 262559013381643707924 26256501338265370815 26257201338363370839 262584013384353708513 262588013384703708613 262595013384853708628 262604013385713708813 262608013386063708913 262615013386213708928 26262101338734370925 26262801338818370949 26263201338849370959 262639013388643709524 26264501338964370975 26265201339050370999 26265601339082371009 262663013390973710024 26266901339197371025 26267601339283371049 26268001339316371059 262687013393313710524 26269301339378371069PHR_768_r15 262695 262695186013394873711131341214371512 26269801339558371135 26270301339648371155 26271001339731371179 26271401339759371189 262721013397743711824 26272701339873371205 26273401339959371229 26273801339989371239 262745013400043712324 26275101340104371255 26275801340202371279 262770013402733712913 262774013403073713013 262781013403223713028 262790013404073713213 262794013404423713313 262801013404573713328 26280701340570371365 26281401340653371389 26281801340683371399 262825013406983713924 26283101340797371415 26283801340882371439 26284201340913371449 262849013409283714424 26285501341027371465 26286201341112371489 26286601341144371499 262873013411593714924 26287901341205371509PHR_769_r16 262881 262881186013413143715531343047371952 26288401341385371575 26288901341475371595 26289601341559371619 26290001341588371629 262907013416033716224 26291301341703371645 26292001341789371669 26292401341819371679 262931013418343716724 26293701341934371695 26294401342032371719 262956013421043717313 262960013421393717413 262967013421543717428 262976013422403717613 262980013422753717713 262987013422903717728 26299301342403371805 26300001342486371829 26300401342516371839 263011013425313718324 26301701342630371855 26302401342715371879 26302801342746371889 263035013427613718824 26304101342860371905 26304801342945371929 26305201342977371939 263059013429923719324 26306501343038371949PHR_770_r17 263067 263067186013431493719931344915372392 26307001343220372015 26307501343310372035 26308201343396372059 26308601343427372069 263093013434423720624 26309901343544372085 26310601343632372109 26311001343664372119 263117013436793721124 26312301343781372135 26313001343879372159 263142013439513721713 263146013439863721813 263153013440013721828 263162013440883722013 263166013441243722113 263173013441393722128 26317901344253372245 26318601344338372269 26319001344370372279 263197013443853722724 26320301344486372295 26321001344573372319 26321401344606372329 263221013446213723224 26322701344722372345 26323401344809372369 26323801344843372379 263245013448583723724 26325101344906372389PHR_771_r18 263253 263253186013450223724331346866372832 26325601345093372455 26326101345183372475 26326801345271372499 26327201345304372509 263279013453193725024 26328501345423372525 26329201345514372549 26329601345549372559 263303013455643725524 26330901345669372575 26331601345767372599 263328013458433726113 263332013458823726213 263339013458973726228 263348013459913726413 263352013460303726513 263359013460453726528 26336501346162372685 26337201346252372709 26337601346289372719 263383013463043727124 26338901346410372735 26339601346502372759 26340001346540372769 263407013465553727624 26341301346661372785 26342001346752372809 26342401346790372819 263431013468053728124 26343701346857372829PHR_772_r19 263439 263439186013469673728731348712373272 26344201347038372895 26344701347128372915 26345401347212372939 26345801347241372949 263465013472563729424 26347101347356372965 26347801347443372989 26348201347474372999 263489013474893729924 26349501347590373015 26350201347688373039 263514013477603730513 263518013477953730613 263525013478103730628 263534013478963730813 263538013479313730913 263545013479463730928 26355101348059373125 26355801348143373149 26356201348174373159 263569013481893731524 26357501348289373175 26358201348375373199 26358601348407373209 263593013484223732024 26359901348522373225 26360601348608373249 26361001348641373259 263617013486563732524 26362301348703373269PHR_773_r20 263625 26362525013488153733131348996373352 26362801348873373335 26363201348917373345 263639013489323733420 263648013489873733475PHR_774_r21 263650 26365025013490993733931349280373432 26365301349157373415 26365701349201373425 263664013492163734220 263673013492713734275PHR_775_r22 263675 263675500013494233734731352867374142t_00tmp_04 26368001349592373525 263687013496863735511 26369201349773373579 263742013499033735913 263746013499393736013 263753013499543736028 263763013500573736213 263769013501293736417 263773013501643736517 263780013501793736532 263791013503203736717 263831013504753736921 263835013505173737021 263842013505323737036 263851013506773737221 263891013508413737425 263895013508883737525 263902013509033737540 263911013510143737725 263915013510623737825 263922013510773737840 263932013512923738511 26393701351380373879 263987013515113738913 263991013515483739013 263998013515633739028 264008013516673739213 264014013517403739417 264018013517763739517 264025013517913739532 264036013519323739717 264076013520883739921 264080013521313740021 264087013521463740036 264096013522923740221 264136013524563740425 264140013525033740525 264147013525183740540 264156013526293740725 264160013526773740825 264167013526923740840 264173013528583741325PHR_776_r23 264175 264175500013530103741831356454374852t_00tmp_04 26418001353179374235 264187013532733742611 26419201353360374289 264242013534903743013 264246013535263743113 264253013535413743128 264263013536443743313 264269013537163743517 264273013537513743617 264280013537663743632 264291013539073743817 264331013540623744021 264335013541043744121 264342013541193744136 264351013542643744321 264391013544283744525 264395013544753744625 264402013544903744640 264411013546013744825 264415013546493744925 264422013546643744940 264432013548793745611 26443701354967374589 264487013550983746013 264491013551353746113 264498013551503746128 264508013552543746313 264514013553273746517 264518013553633746617 264525013553783746632 264536013555193746817 264576013556753747021 264580013557183747121 264587013557333747136 264596013558793747321 264636013560433747525 264640013560903747625 264647013561053747640 264656013562163747825 264660013562643747925 264667013562793747940 264673013564453748425PHR_777_r24 264675 264675248013565563748931358104375222tmp_00 26468001356682374947 26468501356761374965 26473501356882374989 26473901356913374999 264746013569283749924 26475601357022375019 264762013570863750313 264766013571173750413 264773013571323750428 264784013572643750613 264824013574113750817 264828013574493750917 264835013574643750932 264844013576013751117 264884013577573751321 264888013578003751421 264895013578153751436 264904013579163751621 264908013579583751721 264915013579733751736 264921013580953752121PHR_778_r25 264923 264923248013582063752631359754375592tmp_00 26492801358332375317 26493301358411375335 26498301358532375359 26498701358563375369 264994013585783753624 26500401358672375389 265010013587363754013 265014013587673754113 265021013587823754128 265032013589143754313 265072013590613754517 265076013590993754617 265083013591143754632 265092013592513754817 265132013594073755021 265136013594503755121 265143013594653755136 265152013595663755321 265156013596083755421 265163013596233755436 265169013597453755821PHR_779_r26 265171 265171248013598573756331361416375962tmp_00 26517601359983375687 26518101360062375705 26523101360184375729 26523501360216375739 265242013602313757324 26525201360326375759 265258013603913757713 265262013604233757813 265269013604383757828 265280013605703758013 265320013607183758217 265324013607573758317 265331013607723758332 265340013609103758517 265380013610663758721 265384013611093758821 265391013611243758836 265400013612263759021 265404013612693759121 265411013612843759136 265417013614073759521PHR_780_r27 265419 265419248013615193760031363078376332tmp_00 26542401361645376057 26542901361724376075 26547901361846376099 26548301361878376109 265490013618933761024 26550001361988376129 265506013620533761413 265510013620853761513 265517013621003761528 265528013622323761713 265568013623803761917 265572013624193762017 265579013624343762032 265588013625723762217 265628013627283762421 265632013627713762521 265639013627863762536 265648013628883762721 265652013629313762821 265659013629463762836 265665013630693763221PHR_781_r28 265667 265667248013631803763731364731376702tmp_00 26567201363306376427 26567701363385376445 26572701363506376469 26573101363537376479 265738013635523764724 26574801363646376499 265754013637103765113 265758013637413765213 265765013637563765228 265776013638883765413 265816013640363765617 265820013640753765717 265827013640903765732 265836013642283765917 265876013643843766121 265880013644273766221 265887013644423766236 265896013645433766421 265900013645853766521 265907013646003766536 265913013647223766921PHR_782_r29 265915 265915248013648333767431366384377072tmp_00 26592001364959376797 26592501365038376815 26597501365159376839 26597901365190376849 265986013652053768424 26599601365299376869 266002013653633768813 266006013653943768913 266013013654093768928 266024013655413769113 266064013656893769317 266068013657283769417 266075013657433769432 266084013658813769617 266124013660373769821 266128013660803769921 266135013660953769936 266144013661963770121 266148013662383770221 266155013662533770236 266161013663753770621PHR_783_r30 266163 266163248013664883771131368055377442tmp_00 26616801366614377167 26617301366693377185 26622301366816377209 26622701366849377219 266234013668643772124 26624401366960377239 266250013670263772513 266254013670593772613 266261013670743772628 266272013672063772813 266312013673543773017 266316013673933773117 266323013674083773132 266332013675463773317 266372013677033773521 266376013677473773621 266383013677623773636 266392013678653773821 266396013679083773921 266403013679233773936 266409013680463774321PHR_784_r31 266411 266411248013681593774831369726377812tmp_00 26641601368285377537 26642101368364377555 26647101368487377579 26647501368520377589 266482013685353775824 26649201368631377609 266498013686973776213 266502013687303776313 266509013687453776328 266520013688773776513 266560013690253776717 266564013690643776817 266571013690793776832 266580013692173777017 266620013693743777221 266624013694183777321 266631013694333777336 266640013695363777521 266644013695793777621 266651013695943777636 266657013697173778021PHR_785_r32 266659 266659248013698343778531371453378182tmp_00 26666401369960377907 26666901370039377925 26671901370166377949 26672301370203377959 266730013702183779524 26674001370318377979 266746013703893779913 266750013704273780013 266757013704423780028 266768013705743780213 266808013707263780417 266812013707693780517 266819013707843780532 266828013709263780717 266868013710863780921 266872013711333781021 266879013711483781036 266888013712573781221 266892013713033781321 266899013713183781336 266905013714443781721PHR_786_r33 266907 266907248013715613782231373180378552tmp_00 26691201371687378277 26691701371766378295 26696701371893378319 26697101371930378329 266978013719453783224 26698801372045378349 266994013721163783613 266998013721543783713 267005013721693783728 267016013723013783913 267056013724533784117 267060013724963784217 267067013725113784232 267076013726533784417 267116013728133784621 267120013728603784721 267127013728753784736 267136013729843784921 267140013730303785021 267147013730453785036 267153013731713785421PHR_787_r34 267155 267155275013732853785931374954378942tmp_00 26716001373411378647 26716501373490378665 26721501373611378689 26721901373642378699 267226013736573786924 26723601373751378719 267242013738153787313 267246013738463787413 267253013738613787428 267264013739933787613 267304013741403787817 267308013741783787917 267315013741933787932 267324013743303788117 267364013744863788321 267368013745293788421 267375013745443788436 267384013746473788621 267388013746913788721 267395013747063788736 26740101374838378925 26740501374863378935 267424013749123789354 267428013749453789387PHR_788_r35 267430 267430275013750593789831376728379332tmp_00 26743501375185379037 26744001375264379055 26749001375385379079 26749401375416379089 267501013754313790824 26751101375525379109 267517013755893791213 267521013756203791313 267528013756353791328 267539013757673791513 267579013759143791717 267583013759523791817 267590013759673791832 267599013761043792017 267639013762603792221 267643013763033792321 267650013763183792336 267659013764213792521 267663013764653792621 267670013764803792636 26767601376612379315 26768001376637379325 267699013766863793254 267703013767193793287PHR_789_r36 267705 26770537013768283793731377044379422 26770801376886379395 26771201376924379405 267719013769393794020 26772701376986379415 267734013770013794120 267740013770353794154PHR_790_r37 267742 26774237013771473794631377372379512 26774501377208379485 26774901377246379495 267756013772613794920 26776401377311379505 267771013773263795020 267777013773633795057PHR_791_r38 267779 26777937013774723795531377688379602 26778201377530379575 26778601377568379585 267793013775833795820 26780101377630379595 267808013776453795920 267814013776793795954PHR_792_r39 267816 26781637013777913796431378016379692 26781901377852379665 26782301377890379675 267830013779053796720 26783801377955379685 267845013779703796820 267851013780073796857PHR_793_r40 267853 26785360013781183797331378413379792 26785601378181379755 26786001378219379765 267867013782343797620 26787501378281379775 267882013782963797720 26788801378322379785 267907013783713797854 267911013784043797887PHR_794_r41 267913 26791360013785183798331378822379892 26791601378584379855 26792001378622379865 267927013786373798620 26793501378687379875 267942013787023798720 26794801378731379885 267967013787803798854 267971013788133798887PHR_795_r42 267973 26797360013789243799331379219379992 26797601378987379955 26798001379025379965 267987013790403799620 26799501379087379975 268002013791023799720 26800801379128379985 268027013791773799854 268031013792103799887PHR_796_r43 268033 26803360013793243800331379628380092 26803601379390380055 26804001379428380065 268047013794433800620 26805501379493380075 268062013795083800720 26806801379537380085 268087013795863800854 268091013796193800887PHR_797_r44 268093 268093172013797363801331380741380372tmp_00 26809801379862380187 26810301379929380205 26810901379986380229 26811301380014380239 268120013800293802324 26813101380139380259 268181013802863802713 268185013803233802813 268192013803383802828 268201013803863802913 268208013804013802928 268217013805053803113 268221013805433803213 268228013805583803228 268237013806073803313 268244013806223803328 268250013806563803413 268257013806713803428 268263013807323803613PHR_798_r45 268265 268265172013808493804131381854380652tmp_00 26827001380975380467 26827501381042380485 26828101381099380509 26828501381127380519 268292013811423805124 26830301381252380539 268353013813993805513 268357013814363805613 268364013814513805628 268373013814993805713 268380013815143805728 268389013816183805913 268393013816563806013 268400013816713806028 268409013817203806113 268416013817353806128 268422013817693806213 268429013817843806228 268435013818453806413TX_R_0 52421984false0138185638066113819103806655TX_R_0_R 268437 26843718013819143806731381965380692 26844001381929380685 26845201381964380691ADJUST_LIGHT_RM 268455 268455113013819693807031382575380892code0val4val28s12s216s320str24f28 26846001382231380805 268472013822693808043 268476013822793808053 26848601382310380815 268491013823203808115 268496013823333808128 26850101382357380825 268506013823693808217 268511013823843808232 26851601382409380835 268526013824383808414 26853301382462380865 268541013824913808634 26855001382515380875 268555013825253808715 268560013825383808728 26856501382562380885TX_R_1 52422784false0138257738090113826313809055TX_R_1_R 268568 26856818013826353809131382686380932 26857101382650380925 26858301382685380931GENERATE_ACTION_RM 268586 268586129013826903809431383326381142code0val4val28s12s216s320str24f28 26859101382955381045 268603013829933810443 268607013830033810453 26861701383034381055 268622013830443810515 268627013830573810528 26863201383081381065 268637013830933810617 268642013831083810632 26864701383133381075 268657013831623810814 268673013831893810914 26868001383213381115 268688013832423811134 26869701383266381125 268702013832763811215 268707013832893811228 26871201383313381135TX_R_2 52423584false0138332838115113833823811555TX_R_2_R 268715 26871518013833863811631383437381182 26871801383401381175 26873001383436381181TX_R_3 52424384false0138343938119113834933811955TX_R_3_R 268733 26873318013834973812031383548381222 26873601383512381215 26874801383547381221BASIC_ACCESSIBILITY_RM 268751 268751113013835523812331384165381422code0val4val28s12s216s320str24f28 26875601383821381335 268768013838593813343 268772013838693813353 26878201383900381345 268787013839103813415 268792013839233813428 26879701383947381355 268802013839593813517 268807013839743813532 26881201383999381365 268822013840283813714 26882901384052381395 268837013840813813934 26884601384105381405 268851013841153814015 268856013841283814028 26886101384152381415TX_R_4 52425184false0138416738143113842213814355TX_R_4_R 268864 26886418013842253814431384276381462 26886701384240381455 26887901384275381461BASIC_VISIBILITY_RM 268882 268882113013842803814731384890381662code0val4val28s12s216s320str24f28 26888701384546381575 268899013845843815743 268903013845943815753 26891301384625381585 268918013846353815815 268923013846483815828 26892801384672381595 268933013846843815917 268938013846993815932 26894301384724381605 268953013847533816114 26896001384777381635 268968013848063816334 26897701384830381645 268982013848403816415 268987013848533816428 26899201384877381655TX_R_5 52425984false0138489238167113849463816755TX_R_5_R 268995 26899518013849503816831385001381702 26899801384965381695 26901001385000381701REQUESTED_ACTIONS_REQUIRE_RM 269013 269013113013850053817131385624381902code0val4val28s12s216s320str24f28 26901801385280381815 269030013853183818143 269034013853283818153 26904401385359381825 269049013853693818215 269054013853823818228 26905901385406381835 269064013854183818317 269069013854333818332 26907401385458381845 269084013854873818514 26909101385511381875 269099013855403818734 26910801385564381885 269113013855743818815 269118013855873818828 26912301385611381895TX_R_6 52426784false0138562638191113856803819155TX_R_6_R 269126 26912618013856843819231385735381942 26912901385699381935 26914101385734381941CARRY_OUT_REQUESTED_ACTIONS_RM 269144 269144113013857393819531386360382142code0val4val28s12s216s320str24f28 26914901386016382055 269161013860543820543 269165013860643820553 26917501386095382065 269180013861053820615 269185013861183820628 26919001386142382075 269195013861543820717 269200013861693820732 26920501386194382085 269215013862233820914 26922201386247382115 269230013862763821134 26923901386300382125 269244013863103821215 269249013863233821228 26925401386347382135TX_R_7 52427584false0138636238215113864163821555TX_R_7_R 269257 26925718013864203821631386471382182 26926001386435382175 26927201386470382181ACCESS_THROUGH_BARRIERS_RM 269275 269275113013864753821931387092382382code0val4val28s12s216s320str24f28 26928001386748382295 269292013867863822943 269296013867963822953 26930601386827382305 269311013868373823015 269316013868503823028 26932101386874382315 269326013868863823117 269331013869013823132 26933601386926382325 269346013869553823314 26935301386979382355 269361013870083823534 26937001387032382365 269375013870423823615 269380013870553823628 26938501387079382375TX_R_8 52428384false0138709438239113871483823955TX_R_8_R 269388 26938818013871523824031387203382422 26939101387167382415 26940301387202382421CANT_REACH_INSIDE_CLOSED_RM 269406 269406113013872073824331387825382622code0val4val28s12s216s320str24f28 26941101387481382535 269423013875193825343 269427013875293825353 26943701387560382545 269442013875703825415 269447013875833825428 26945201387607382555 269457013876193825517 269462013876343825532 26946701387659382565 269477013876883825714 26948401387712382595 269492013877413825934 26950101387765382605 269506013877753826015 269511013877883826028 26951601387812382615TX_R_9 52429184false0138782738263113878813826355TX_R_9_R 269519 26951918013878853826431387936382662 26952201387900382655 26953401387935382661CANT_REACH_INSIDE_ROOMS_RM 269537 269537113013879403826731388557382862code0val4val28s12s216s320str24f28 26954201388213382775 269554013882513827743 269558013882613827753 26956801388292382785 269573013883023827815 269578013883153827828 26958301388339382795 269588013883513827917 269593013883663827932 26959801388391382805 269608013884203828114 26961501388444382835 269623013884733828334 26963201388497382845 269637013885073828415 269642013885203828428 26964701388544382855TX_R_10 52429984false0138855938287113886153828757TX_R_10_R 269650 26965018013886193828831388671382902 26965301388635382895 26966501388670382901CANT_REACH_OUTSIDE_CLOSED_RM 269668 269668113013886753829131389295383102code0val4val28s12s216s320str24f28 26967301388950383015 269685013889883830143 269689013889983830153 26969901389029383025 269704013890393830215 269709013890523830228 26971401389076383035 269719013890883830317 269724013891033830332 26972901389128383045 269739013891573830514 26974601389182383075 269754013892113830734 26976301389235383085 269768013892453830815 269773013892583830828 26977801389282383095TX_R_11 52430784false0138929738311113893533831157TX_R_11_R 269781 26978118013893573831231389409383142 26978401389373383135 26979601389408383141LIST_WRITER_INTERNAL_RM 269799 269799516013894133831531390700383582code0val4val28s12s216s320str24f28 26980401389683383255 269816013897213832543 269820013897313832553 26983001389762383265 269835013897723832615 269840013897853832628 26984501389809383275 269850013898213832717 269855013898363832732 26986001389861383285 269870013898903832914 269887013899183833014 269904013899463833114 269921013899743833214 269938013900023833314 269955013900303833414 269972013900583833514 269989013900863833614 270006013901143833714 270023013901423833814 270040013901703833914 270057013901983834014 270074013902263834114 270091013902543834214 270108013902823834314 270125013903103834414 270142013903383834514 270159013903663834614 270176013903943834714 270193013904223834814 270209013904503834914 270225013904783835014 270241013905063835114 270257013905343835214 270273013905623835314 27028001390587383555 270288013906163835534 27029701390640383565 270302013906503835615 270307013906633835628 27031201390687383575TX_R_12 52431584false0139070238359113907583835957TX_R_12_R 270315 27031518013907623836031390814383622 27031801390778383615 27033001390813383621TX_R_13 52432384false0139081638363113908723836357TX_R_13_R 270333 27033318013908763836431390928383662 27033601390892383655 27034801390927383661TX_R_14 52433184false0139093038367113909863836757TX_R_14_R 270351 27035118013909903836831391042383702 27035401391006383695 27036601391041383701TX_R_15 52433984false0139104438371113911003837157TX_R_15_R 270369 27036918013911043837231391156383742 27037201391120383735 27038401391155383741TX_R_16 52434784false0139115838375113912143837557TX_R_16_R 270387 27038718013912183837631391270383782 27039001391234383775 27040201391269383781TX_R_17 52435584false0139127238379113913283837957TX_R_17_R 270405 27040518013913323838031391384383822 27040801391348383815 27042001391383383821TX_R_18 52436384false0139138638383113914423838357TX_R_18_R 270423 27042318013914463838431391498383862 27042601391462383855 27043801391497383861TX_R_19 52437184false0139150038387113915563838757TX_R_19_R 270441 27044118013915603838831391612383902 27044401391576383895 27045601391611383901TX_R_20 52437984false0139161438391113916703839157TX_R_20_R 270459 27045918013916743839231391726383942 27046201391690383935 27047401391725383941TX_R_21 52438784false0139172838395113917843839557TX_R_21_R 270477 27047718013917883839631391840383982 27048001391804383975 27049201391839383981TX_R_22 52439584false0139184238399113918983839957TX_R_22_R 270495 27049518013919023840031391954384022 27049801391918384015 27051001391953384021TX_R_23 52440384false0139195638403113920123840357TX_R_23_R 270513 27051318013920163840431392068384062 27051601392032384055 27052801392067384061TX_R_24 52441184false0139207038407113921263840757TX_R_24_R 270531 27053118013921303840831392182384102 27053401392146384095 27054601392181384101TX_R_25 52441984false0139218438411113922403841157TX_R_25_R 270549 27054918013922443841231392296384142 27055201392260384135 27056401392295384141TX_R_26 52442784false0139229838415113923543841557TX_R_26_R 270567 27056718013923583841631392410384182 27057001392374384175 27058201392409384181TX_R_27 52443584false0139241238419113924683841957TX_R_27_R 270585 27058518013924723842031392524384222 27058801392488384215 27060001392523384221TX_R_28 52444384false0139252638423113925823842357TX_R_28_R 270603 27060318013925863842431392638384262 27060601392602384255 27061801392637384261TX_R_29 52445184false0139264038427113926963842757TX_R_29_R 270621 27062118013927003842831392752384302 27062401392716384295 27063601392751384301TX_R_30 52445984false0139275438431113928103843157TX_R_30_R 270639 27063918013928143843231392866384342 27064201392830384335 27065401392865384341TX_R_31 52446784false0139286838435113929243843557TX_R_31_R 270657 27065718013929283843631392980384382 27066001392944384375 27067201392979384381TX_R_32 52447584false0139298238439113930383843957TX_R_32_R 270675 27067518013930423844031393094384422 27067801393058384415 27069001393093384421TX_R_33 52448384false0139309638443113931523844357TX_R_33_R 270693 27069318013931563844431393208384462 27069601393172384455 27070801393207384461TX_R_34 52449184false0139321038447113932663844757TX_R_34_R 270711 27071118013932703844831393322384502 27071401393286384495 27072601393321384501TX_R_35 52449984false0139332438451113933803845157TX_R_35_R 270729 27072918013933843845231393436384542 27073201393400384535 27074401393435384541TX_R_36 52450784false0139343838455113934943845557TX_R_36_R 270747 27074718013934983845631393550384582 27075001393514384575 27076201393549384581ACTION_PROCESSING_INTERNAL_RM 270765 270765278013935543845931394455384882code0val4val28s12s216s320str24f28 27077001393830384695 270782013938683846943 270786013938783846953 27079601393909384705 270801013939193847015 270806013939323847028 27081101393956384715 270816013939683847117 270821013939833847132 27082601394008384725 270836013940373847314 270853013940653847414 270870013940933847514 270887013941213847614 270904013941493847714 270921013941773847814 270937013942053847914 270953013942333848014 270969013942613848114 270985013942893848214 271001013943173848314 27100801394342384855 271016013943713848534 27102501394395384865 271030013944053848615 271035013944183848628 27104001394442384875TX_R_37 52451584false0139445738489113945133848957TX_R_37_R 271043 27104318013945173849031394569384922 27104601394533384915 27105801394568384921TX_R_38 52452384false0139457138493113946273849357TX_R_38_R 271061 27106118013946313849431394683384962 27106401394647384955 27107601394682384961TX_R_39 52453184false0139468538497113947413849757TX_R_39_R 271079 27107918013947453849831394797385002 27108201394761384995 27109401394796385001TX_R_40 52453984false0139479938501113948553850157TX_R_40_R 271097 27109718013948593850231394911385042 27110001394875385035 27111201394910385041TX_R_41 52454784false0139491338505113949693850557TX_R_41_R 271115 27111518013949733850631395025385082 27111801394989385075 27113001395024385081TX_R_42 52455584false0139502738509113950833850957TX_R_42_R 271133 27113318013950873851031395139385122 27113601395103385115 27114801395138385121TX_R_43 52456384false0139514138513113951973851357TX_R_43_R 271151 27115118013952013851431395253385162 27115401395217385155 27116601395252385161TX_R_44 52457184false0139525538517113953113851757TX_R_44_R 271169 27116918013953153851831395367385202 27117201395331385195 27118401395366385201TX_R_45 52457984false0139536938521113954253852157TX_R_45_R 271187 27118718013954293852231395481385242 27119001395445385235 27120201395480385241TX_R_46 52458784false0139548338525113955393852557TX_R_46_R 271205 27120518013955433852631395595385282 27120801395559385275 27122001395594385281TX_R_47 52459584false0139559738529113956533852957TX_R_47_R 271223 27122318013956573853031395709385322 27122601395673385315 27123801395708385321PARSER_ERROR_INTERNAL_RM 271241 271241499013957133853331396973385752code0val4val28s12s216s320str24f28 27124601395984385435 271258013960223854343 271262013960323854353 27127201396063385445 271277013960733854415 271282013960863854428 27128701396110385455 271292013961223854517 271297013961373854532 27130201396162385465 271312013961913854714 271329013962193854814 271346013962473854914 271363013962753855014 271380013963033855114 271397013963313855214 271414013963593855314 271431013963873855414 271448013964153855514 271465013964433855614 271482013964713855714 271499013964993855814 271516013965273855914 271533013965553856014 271550013965833856114 271567013966113856214 271584013966393856314 271601013966673856414 271618013966953856514 271634013967233856614 271650013967513856714 271666013967793856814 271682013968073856914 271698013968353857014 27170501396860385725 271713013968893857234 27172201396913385735 271727013969233857315 271732013969363857328 27173701396960385745TX_R_48 52460384false0139697538576113970313857657TX_R_48_R 271740 27174018013970353857731397087385792 27174301397051385785 27175501397086385791TX_R_49 52461184false0139708938580113971453858057TX_R_49_R 271758 27175818013971493858131397201385832 27176101397165385825 27177301397200385831TX_R_50 52461984false0139720338584113972593858457TX_R_50_R 271776 27177618013972633858531397315385872 27177901397279385865 27179101397314385871TX_R_51 52462784false0139731738588113973733858857TX_R_51_R 271794 27179418013973773858931397429385912 27179701397393385905 27180901397428385911TX_R_52 52463584false0139743138592113974873859257TX_R_52_R 271812 27181218013974913859331397543385952 27181501397507385945 27182701397542385951TX_R_53 52464384false0139754538596113976013859657TX_R_53_R 271830 27183018013976053859731397657385992 27183301397621385985 27184501397656385991TX_R_54 52465184false0139765938600113977153860057TX_R_54_R 271848 27184818013977193860131397771386032 27185101397735386025 27186301397770386031TX_R_55 52465984false0139777338604113978293860457TX_R_55_R 271866 27186618013978333860531397885386072 27186901397849386065 27188101397884386071TX_R_56 52466784false0139788738608113979433860857TX_R_56_R 271884 27188418013979473860931397999386112 27188701397963386105 27189901397998386111TX_R_57 52467584false0139800138612113980573861257TX_R_57_R 271902 27190218013980613861331398113386152 27190501398077386145 27191701398112386151TX_R_58 52468384false0139811538616113981713861657TX_R_58_R 271920 27192018013981753861731398227386192 27192301398191386185 27193501398226386191TX_R_59 52469184false0139822938620113982853862057TX_R_59_R 271938 27193818013982893862131398341386232 27194101398305386225 27195301398340386231TX_R_60 52469984false0139834338624113983993862457TX_R_60_R 271956 27195618013984033862531398455386272 27195901398419386265 27197101398454386271TX_R_61 52470784false0139845738628113985133862857TX_R_61_R 271974 27197418013985173862931398569386312 27197701398533386305 27198901398568386311TX_R_62 52471584false0139857138632113986273863257TX_R_62_R 271992 27199218013986313863331398683386352 27199501398647386345 27200701398682386351TX_R_63 52472384false0139868538636113987413863657TX_R_63_R 272010 27201018013987453863731398797386392 27201301398761386385 27202501398796386391TX_R_64 52473184false0139879938640113988553864057TX_R_64_R 272028 27202818013988593864131398911386432 27203101398875386425 27204301398910386431TX_R_65 52473984false0139891338644113989693864457TX_R_65_R 272046 27204618013989733864531399025386472 27204901398989386465 27206101399024386471TX_R_66 52474784false0139902738648113990833864857TX_R_66_R 272064 27206418013990873864931399139386512 27206701399103386505 27207901399138386511TX_R_67 52475584false0139914138652113991973865257TX_R_67_R 272082 27208218013992013865331399253386552 27208501399217386545 27209701399252386551TX_R_68 52476384false0139925538656113993113865657TX_R_68_R 272100 27210018013993153865731399367386592 27210301399331386585 27211501399366386591TX_R_69 52477184false0139936938660113994253866057TX_R_69_R 272118 27211818013994293866131399481386632 27212101399445386625 27213301399480386631TX_R_70 52477984false0139948338664113995393866457TX_R_70_R 272136 27213618013995433866531399595386672 27213901399559386665 27215101399594386671TX_R_71 52478784false0139959738668113996533866857TX_R_71_R 272154 27215418013996573866931399709386712 27215701399673386705 27216901399708386711PARSER_N_ERROR_INTERNAL_RM 272172 272172193013997133867231400471386962code0val4val28s12s216s320str24f28 27217701399986386825 272189014000243868243 272193014000343868253 27220301400065386835 272208014000753868315 272213014000883868328 27221801400112386845 272223014001243868417 272228014001393868432 27223301400164386855 272243014001933868614 272259014002213868714 272275014002493868814 272291014002773868914 272307014003053869014 272323014003333869114 27233001400358386935 272338014003873869334 27234701400411386945 272352014004213869415 272357014004343869428 27236201400458386955TX_R_72 52479584false0140047338697114005293869757TX_R_72_R 272365 27236518014005333869831400585387002 27236801400549386995 27238001400584387001TX_R_73 52480384false0140058738701114006433870157TX_R_73_R 272383 27238318014006473870231400699387042 27238601400663387035 27239801400698387041TX_R_74 52481184false0140070138705114007573870557TX_R_74_R 272401 27240118014007613870631400813387082 27240401400777387075 27241601400812387081TX_R_75 52481984false0140081538709114008713870957TX_R_75_R 272419 27241918014008753871031400927387122 27242201400891387115 27243401400926387121TX_R_76 52482784false0140092938713114009853871357TX_R_76_R 272437 27243718014009893871431401041387162 27244001401005387155 27245201401040387161TX_R_77 52483584false0140104338717114010993871757TX_R_77_R 272455 27245518014011033871831401155387202 27245801401119387195 27247001401154387201DARKNESS_NAME_INTERNAL_RM 272473 272473113014011593872131401776387402code0val4val28s12s216s320str24f28 27247801401431387315 272490014014693873143 272494014014793873153 27250401401510387325 272509014015203873215 272514014015333873228 27251901401557387335 272524014015693873317 272529014015843873332 27253401401609387345 272544014016383873514 27255101401663387375 272559014016923873734 27256801401716387385 272573014017263873815 272578014017393873828 27258301401763387395TX_R_78 52484384false0140177838741114018343874157TX_R_78_R 272586 27258618014018383874231401890387442 27258901401854387435 27260101401889387441PARSER_COMMAND_INTERNAL_RM 272604 272604161014018943874531402596387672code0val4val28s12s216s320str24f28 27260901402167387555 272621014022053875543 272625014022153875553 27263501402246387565 272640014022563875615 272645014022693875628 27265001402293387575 272655014023053875717 272660014023203875732 27266501402345387585 272675014023743875914 272691014024023876014 272707014024303876114 272723014024583876214 27273001402483387645 272738014025123876434 27274701402536387655 272752014025463876515 272757014025593876528 27276201402583387665TX_R_79 52485184false0140259838768114026543876857TX_R_79_R 272765 27276518014026583876931402710387712 27276801402674387705 27278001402709387711TX_R_80 52485984false0140271238772114027683877257TX_R_80_R 272783 27278318014027723877331402824387752 27278601402788387745 27279801402823387751TX_R_81 52486784false0140282638776114028823877657TX_R_81_R 272801 27280118014028863877731402938387792 27280401402902387785 27281601402937387791TX_R_82 52487584false0140294038780114029963878057TX_R_82_R 272819 27281918014030003878131403052387832 27282201403016387825 27283401403051387831PARSER_CLARIF_INTERNAL_RM 272837 272837227014030563878431403869388102code0val4val28s12s216s320str24f28 27284201403328387945 272854014033663879443 272858014033763879453 27286801403407387955 272873014034173879515 272878014034303879528 27288301403454387965 272888014034663879617 272893014034813879632 27289801403506387975 272908014035353879814 272925014035633879914 272942014035913880014 272958014036193880114 272974014036473880214 272990014036753880314 273006014037033880414 273022014037313880514 27302901403756388075 273037014037853880734 27304601403809388085 273051014038193880815 273056014038323880828 27306101403856388095TX_R_83 52488384false0140387138811114039273881157TX_R_83_R 273064 27306418014039313881231403983388142 27306701403947388135 27307901403982388141TX_R_84 52489184false0140398538815114040413881557TX_R_84_R 273082 27308218014040453881631404097388182 27308501404061388175 27309701404096388181TX_R_85 52489984false0140409938819114041553881957TX_R_85_R 273100 27310018014041593882031404211388222 27310301404175388215 27311501404210388221TX_R_86 52490784false0140421338823114042693882357TX_R_86_R 273118 27311818014042733882431404325388262 27312101404289388255 27313301404324388261TX_R_87 52491584false0140432738827114043833882757TX_R_87_R 273136 27313618014043873882831404439388302 27313901404403388295 27315101404438388301TX_R_88 52492384false0140444138831114044973883157TX_R_88_R 273154 27315418014045013883231404553388342 27315701404517388335 27316901404552388341TX_R_89 52493184false0140455538835114046113883557TX_R_89_R 273172 27317218014046153883631404667388382 27317501404631388375 27318701404666388381TX_R_90 52493984false0140466938839114047253883957TX_R_90_R 273190 27319018014047293884031404781388422 27319301404745388415 27320501404780388421YES_OR_NO_QUESTION_INTERNAL_RM 273208 273208113014047853884331405407388622code0val4val28s12s216s320str24f28 27321301405062388535 273225014051003885343 273229014051103885353 27323901405141388545 273244014051513885415 273249014051643885428 27325401405188388555 273259014052003885517 273264014052153885532 27326901405240388565 273279014052693885714 27328601405294388595 273294014053233885934 27330301405347388605 273308014053573886015 273313014053703886028 27331801405394388615TX_R_91 52494784false0140540938863114054653886357TX_R_91_R 273321 27332118014054693886431405521388662 27332401405485388655 27333601405520388661PRINT_PROTAGONIST_INTERNAL_RM 273339 273339145014055253886731406202388882code0val4val28s12s216s320str24f28 27334401405801388775 273356014058393887743 273360014058493887753 27337001405880388785 273375014058903887815 273380014059033887828 27338501405927388795 273390014059393887917 273395014059543887932 27340001405979388805 273410014060083888114 273426014060363888214 273442014060643888314 27344901406089388855 273457014061183888534 27346601406142388865 273471014061523888615 273476014061653888628 27348101406189388875TX_R_92 52495584false0140620438889114062603888957TX_R_92_R 273484 27348418014062643889031406316388922 27348701406280388915 27349901406315388921TX_R_93 52496384false0140631838893114063743889357TX_R_93_R 273502 27350218014063783889431406430388962 27350501406394388955 27351701406429388961TX_R_94 52497184false0140643238897114064883889757TX_R_94_R 273520 27352018014064923889831406544389002 27352301406508388995 27353501406543389001STANDARD_IMPLICIT_TAKING_RM 273538 273538129014065483890131407195389212code0val4val28s12s216s320str24f28 27354301406822389115 273555014068603891143 273559014068703891153 27356901406901389125 273574014069113891215 273579014069243891228 27358401406948389135 273589014069603891317 273594014069753891332 27359901407000389145 273609014070293891514 273625014070573891614 27363201407082389185 273640014071113891834 27364901407135389195 273654014071453891915 273659014071583891928 27366401407182389205TX_R_95 52497984false0140719738922114072533892257TX_R_95_R 273667 27366718014072573892331407309389252 27367001407273389245 27368201407308389251TX_R_96 52498784false0140731138926114073673892657TX_R_96_R 273685 27368518014073713892731407423389292 27368801407387389285 27370001407422389291PRINT_OBITUARY_HEADLINE_RM 273703 273703145014074273893031408101389512code0val4val28s12s216s320str24f28 27370801407700389405 273720014077383894043 273724014077483894053 27373401407779389415 273739014077893894115 273744014078023894128 27374901407826389425 273754014078383894217 273759014078533894232 27376401407878389435 273774014079073894414 273790014079353894514 273806014079633894614 27381301407988389485 273821014080173894834 27383001408041389495 273835014080513894915 273840014080643894928 27384501408088389505TX_R_97 52499584false0140810338952114081593895257TX_R_97_R 273848 27384818014081633895331408215389552 27385101408179389545 27386301408214389551TX_R_98 52500384false0140821738956114082733895657TX_R_98_R 273866 27386618014082773895731408329389592 27386901408293389585 27388101408328389591TX_R_99 52501184false0140833138960114083873896057TX_R_99_R 273884 27388418014083913896131408443389632 27388701408407389625 27389901408442389631IMMEDIATELY_UNDO_RM 273902 273902193014084473896431409203389882code0val4val28s12s216s320str24f28 27390701408713389745 273919014087513897443 273923014087613897453 27393301408792389755 273938014088023897515 273943014088153897528 27394801408839389765 273953014088513897617 273958014088663897632 27396301408891389775 273973014089203897814 273989014089483897914 274005014089773898014 274021014090063898114 274037014090353898214 274053014090643898314 27406001409090389855 274068014091193898534 27407701409143389865 274082014091533898615 274087014091663898628 27409201409190389875TX_R_100 52501984false0140920538989114092633898959TX_R_100_R 274095 27409518014092673899031409320389922 27409801409284389915 27411001409319389921TX_R_101 52502784false0140932238993114093803899359TX_R_101_R 274113 27411318014093843899431409437389962 27411601409401389955 27412801409436389961TX_R_102 52503584false0140943938997114094973899759TX_R_102_R 274131 27413118014095013899831409554390002 27413401409518389995 27414601409553390001TX_R_103 52504384false0140955639001114096143900159TX_R_103_R 274149 27414918014096183900231409671390042 27415201409635390035 27416401409670390041TX_R_104 52505184false0140967339005114097313900559TX_R_104_R 274167 27416718014097353900631409788390082 27417001409752390075 27418201409787390081TX_R_105 52505984false0140979039009114098483900959TX_R_105_R 274185 27418518014098523901031409905390122 27418801409869390115 27420001409904390121QUIT_THE_GAME_RM 274203 274203113014099093901331410518390322code0val4val28s12s216s320str24f28 27420801410172390235 274220014102103902343 274224014102203902353 27423401410251390245 274239014102613902415 274244014102743902428 27424901410298390255 274254014103103902517 274259014103253902532 27426401410350390265 274274014103793902714 27428101410405390295 274289014104343902934 27429801410458390305 274303014104683903015 274308014104813903028 27431301410505390315TX_R_106 52506784false0141052039033114105783903359TX_R_106_R 274316 27431618014105823903431410635390362 27431901410599390355 27433101410634390361SAVE_THE_GAME_RM 274334 274334129014106393903731411277390572code0val4val28s12s216s320str24f28 27433901410902390475 274351014109403904743 274355014109503904753 27436501410981390485 274370014109913904815 274375014110043904828 27438001411028390495 274385014110403904917 274390014110553904932 27439501411080390505 274405014111093905114 274421014111383905214 27442801411164390545 274436014111933905434 27444501411217390555 274450014112273905515 274455014112403905528 27446001411264390565TX_R_107 52507584false0141127939058114113373905859TX_R_107_R 274463 27446318014113413905931411394390612 27446601411358390605 27447801411393390611TX_R_108 52508384false0141139639062114114543906259TX_R_108_R 274481 27448118014114583906331411511390652 27448401411475390645 27449601411510390651RESTORE_THE_GAME_RM 274499 274499129014115153906631412156390862code0val4val28s12s216s320str24f28 27450401411781390765 274516014118193907643 274520014118293907653 27453001411860390775 274535014118703907715 274540014118833907728 27454501411907390785 274550014119193907817 274555014119343907832 27456001411959390795 274570014119883908014 274586014120173908114 27459301412043390835 274601014120723908334 27461001412096390845 274615014121063908415 274620014121193908428 27462501412143390855TX_R_109 52509184false0141215839087114122163908759TX_R_109_R 274628 27462818014122203908831412273390902 27463101412237390895 27464301412272390901TX_R_110 52509984false0141227539091114123333909159TX_R_110_R 274646 27464618014123373909231412390390942 27464901412354390935 27466101412389390941RESTART_THE_GAME_RM 274664 274664129014123943909531413035391152code0val4val28s12s216s320str24f28 27466901412660391055 274681014126983910543 274685014127083910553 27469501412739391065 274700014127493910615 274705014127623910628 27471001412786391075 274715014127983910717 274720014128133910732 27472501412838391085 274735014128673910914 274751014128963911014 27475801412922391125 274766014129513911234 27477501412975391135 274780014129853911315 274785014129983911328 27479001413022391145TX_R_111 52510784false0141303739116114130953911659TX_R_111_R 274793 27479318014130993911731413152391192 27479601413116391185 27480801413151391191TX_R_112 52511584false0141315439120114132123912059TX_R_112_R 274811 27481118014132163912131413269391232 27481401413233391225 27482601413268391231VERIFY_THE_STORY_FILE_RM 274829 274829129014132733912431413919391442code0val4val28s12s216s320str24f28 27483401413544391345 274846014135823913443 274850014135923913453 27486001413623391355 274865014136333913515 274870014136463913528 27487501413670391365 274880014136823913617 274885014136973913632 27489001413722391375 274900014137513913814 274916014137803913914 27492301413806391415 274931014138353914134 27494001413859391425 274945014138693914215 274950014138823914228 27495501413906391435TX_R_113 52512384false0141392139145114139793914559TX_R_113_R 274958 27495818014139833914631414036391482 27496101414000391475 27497301414035391481TX_R_114 52513184false0141403839149114140963914959TX_R_114_R 274976 27497618014141003915031414153391522 27497901414117391515 27499101414152391521SWITCH_TRANSCRIPT_ON_RM 274994 274994145014141573915331414831391742code0val4val28s12s216s320str24f28 27499901414427391635 275011014144653916343 275015014144753916353 27502501414506391645 275030014145163916415 275035014145293916428 27504001414553391655 275045014145653916517 275050014145803916532 27505501414605391665 275065014146343916714 275081014146633916814 275097014146923916914 27510401414718391715 275112014147473917134 27512101414771391725 275126014147813917215 275131014147943917228 27513601414818391735TX_R_115 52513984false0141483339175114148913917559TX_R_115_R 275139 27513918014148953917631414948391782 27514201414912391775 27515401414947391781TX_R_116 52514784false0141495039179114150083917959TX_R_116_R 275157 27515718014150123918031415065391822 27516001415029391815 27517201415064391821TX_R_117 52515584false0141506739183114151253918359TX_R_117_R 275175 27517518014151293918431415182391862 27517801415146391855 27519001415181391861SWITCH_TRANSCRIPT_OFF_RM 275193 275193145014151863918731415861392082code0val4val28s12s216s320str24f28 27519801415457391975 275210014154953919743 275214014155053919753 27522401415536391985 275229014155463919815 275234014155593919828 27523901415583391995 275244014155953919917 275249014156103919932 27525401415635392005 275264014156643920114 275280014156933920214 275296014157223920314 27530301415748392055 275311014157773920534 27532001415801392065 275325014158113920615 275330014158243920628 27533501415848392075TX_R_118 52516384false0141586339209114159213920959TX_R_118_R 275338 27533818014159253921031415978392122 27534101415942392115 27535301415977392121TX_R_119 52517184false0141598039213114160383921359TX_R_119_R 275356 27535618014160423921431416095392162 27535901416059392155 27537101416094392161TX_R_120 52517984false0141609739217114161553921759TX_R_120_R 275374 27537418014161593921831416212392202 27537701416176392195 27538901416211392201ANNOUNCE_SCORE_RM 275392 275392177014162163922131416942392442code0val4val28s12s216s320str24f28 27539701416480392315 275409014165183923143 275413014165283923153 27542301416559392325 275428014165693923215 275433014165823923228 27543801416606392335 275443014166183923317 275448014166333923332 27545301416658392345 275463014166873923514 275479014167163923614 275495014167453923714 275511014167743923814 275527014168033923914 27553401416829392415 275542014168583924134 27555101416882392425 275556014168923924215 275561014169053924228 27556601416929392435TX_R_121 52518784false0141694439245114170023924559TX_R_121_R 275569 27556918014170063924631417059392482 27557201417023392475 27558401417058392481TX_R_122 52519584false0141706139249114171193924959TX_R_122_R 275587 27558718014171233925031417176392522 27559001417140392515 27560201417175392521TX_R_123 52520384false0141717839253114172363925359TX_R_123_R 275605 27560518014172403925431417293392562 27560801417257392555 27562001417292392561TX_R_124 52521184false0141729539257114173533925759TX_R_124_R 275623 27562318014173573925831417410392602 27562601417374392595 27563801417409392601TX_R_125 52521984false0141741239261114174703926159TX_R_125_R 275641 27564118014174743926231417527392642 27564401417491392635 27565601417526392641REP_PREFER_ABBREVIATED_RM 275659 275659113014175313926531418149392842code0val4val28s12s216s320str24f28 27566401417803392755 275676014178413927543 275680014178513927553 27569001417882392765 275695014178923927615 275700014179053927628 27570501417929392775 275710014179413927717 275715014179563927732 27572001417981392785 275730014180103927914 27573701418036392815 275745014180653928134 27575401418089392825 275759014180993928215 275764014181123928228 27576901418136392835TX_R_126 52522784false0141815139285114182093928559TX_R_126_R 275772 27577218014182133928631418266392882 27577501418230392875 27578701418265392881REP_PREFER_UNABBREVIATED_RM 275790 275790113014182703928931418890393082code0val4val28s12s216s320str24f28 27579501418544392995 275807014185823929943 275811014185923929953 27582101418623393005 275826014186333930015 275831014186463930028 27583601418670393015 275841014186823930117 275846014186973930132 27585101418722393025 275861014187513930314 27586801418777393055 275876014188063930534 27588501418830393065 275890014188403930615 275895014188533930628 27590001418877393075TX_R_127 52523584false0141889239309114189503930959TX_R_127_R 275903 27590318014189543931031419007393122 27590601418971393115 27591801419006393121REP_PREFER_SOMETIMES_ABBR_RM 275921 275921113014190113931331419632393322code0val4val28s12s216s320str24f28 27592601419286393235 275938014193243932343 275942014193343932353 27595201419365393245 275957014193753932415 275962014193883932428 27596701419412393255 275972014194243932517 275977014194393932532 27598201419464393265 275992014194933932714 27599901419519393295 276007014195483932934 27601601419572393305 276021014195823933015 276026014195953933028 27603101419619393315TX_R_128 52524384false0141963439333114196923933359TX_R_128_R 276034 27603418014196963933431419749393362 27603701419713393355 27604901419748393361REP_SWITCH_NOTIFY_ON_RM 276052 276052113014197533933731420369393562code0val4val28s12s216s320str24f28 27605701420023393475 276069014200613934743 276073014200713934753 27608301420102393485 276088014201123934815 276093014201253934828 27609801420149393495 276103014201613934917 276108014201763934932 27611301420201393505 276123014202303935114 27613001420256393535 276138014202853935334 27614701420309393545 276152014203193935415 276157014203323935428 27616201420356393555TX_R_129 52525184false0142037139357114204293935759TX_R_129_R 276165 27616518014204333935831420486393602 27616801420450393595 27618001420485393601REP_SWITCH_NOTIFY_OFF_RM 276183 276183113014204903936131421107393802code0val4val28s12s216s320str24f28 27618801420761393715 276200014207993937143 276204014208093937153 27621401420840393725 276219014208503937215 276224014208633937228 27622901420887393735 276234014208993937317 276239014209143937332 27624401420939393745 276254014209683937514 27626101420994393775 276269014210233937734 27627801421047393785 276283014210573937815 276288014210703937828 27629301421094393795TX_R_130 52525984false0142110939381114211673938159TX_R_130_R 276296 27629618014211713938231421224393842 27629901421188393835 27631101421223393841ANNOUNCE_PRONOUN_MEANINGS_RM 276314 276314161014212283938531421936394072code0val4val28s12s216s320str24f28 27631901421503393955 276331014215413939543 276335014215513939553 27634501421582393965 276350014215923939615 276355014216053939628 27636001421629393975 276365014216413939717 276370014216563939732 27637501421681393985 276385014217103939914 276401014217393940014 276417014217683940114 276433014217973940214 27644001421823394045 276448014218523940434 27645701421876394055 276462014218863940515 276467014218993940528 27647201421923394065TX_R_131 52526784false0142193839408114219963940859TX_R_131_R 276475 27647518014220003940931422053394112 27647801422017394105 27649001422052394111TX_R_132 52527584false0142205539412114221133941259TX_R_132_R 276493 27649318014221173941331422170394152 27649601422134394145 27650801422169394151TX_R_133 52528384false0142217239416114222303941659TX_R_133_R 276511 27651118014222343941731422287394192 27651401422251394185 27652601422286394191TX_R_134 52529184false0142228939420114223473942059TX_R_134_R 276529 27652918014223513942131422403394232 27653201422368394225 27654401422402394231TX_R_135 52529984false0142240539424114224633942459TX_R_135_R 276547 27654718014224673942531422519394272 27655001422484394265 27656201422518394271TX_R_136 52530784false0142252139428114225793942859TX_R_136_R 276565 27656518014225833942931422635394312 27656801422600394305 27658001422634394311TX_R_137 52531584false0142263739432114226953943259TX_R_137_R 276583 27658318014226993943331422751394352 27658601422716394345 27659801422750394351TX_R_138 52532384false0142275339436114228113943659TX_R_138_R 276601 27660118014228153943731422867394392 27660401422832394385 27661601422866394391TX_R_139 52533184false0142286939440114229273944059TX_R_139_R 276619 27661918014229313944131422983394432 27662201422948394425 27663401422982394431TX_R_140 52533984false0142298539444114230433944459TX_R_140_R 276637 27663718014230473944531423099394472 27664001423064394465 27665201423098394471TX_R_141 52534784false0142310139448114231593944859TX_R_141_R 276655 27665518014231633944931423215394512 27665801423180394505 27667001423214394511TX_R_142 52535584false0142321739452114232753945259TX_R_142_R 276673 27667318014232793945331423331394552 27667601423296394545 27668801423330394551TX_R_143 52536384false0142333339456114233913945659TX_R_143_R 276691 27669118014233953945731423447394592 27669401423412394585 27670601423446394591TX_R_144 52537184false0142344939460114235073946059TX_R_144_R 276709 27670918014235113946131423563394632 27671201423528394625 27672401423562394631TX_R_145 52537984false0142356539464114236233946459TX_R_145_R 276727 27672718014236273946531423679394672 27673001423644394665 27674201423678394671TX_R_146 52538784false0142368139468114237393946859TX_R_146_R 276745 27674518014237433946931423795394712 27674801423760394705 27676001423794394711TX_R_147 52539584false0142379739472114238553947259TX_R_147_R 276763 27676318014238593947331423911394752 27676601423876394745 27677801423910394751TX_R_148 52540384false0142391339476114239713947659TX_R_148_R 276781 27678118014239753947731424027394792 27678401423992394785 27679601424026394791TX_R_149 52541184false0142402939480114240873948059TX_R_149_R 276799 27679918014240913948131424143394832 27680201424108394825 27681401424142394831TX_R_150 52541984false0142414539484114242033948459TX_R_150_R 276817 27681718014242073948531424259394872 27682001424224394865 27683201424258394871TX_R_151 52542784false0142426139488114243193948859TX_R_151_R 276835 27683518014243233948931424375394912 27683801424340394905 27685001424374394911TX_R_152 52543584false0142437739492114244353949259TX_R_152_R 276853 27685318014244393949331424491394952 27685601424456394945 27686801424490394951TX_R_153 52544384false0142449339496114245513949659TX_R_153_R 276871 27687118014245553949731424607394992 27687401424572394985 27688601424606394991TX_R_154 52545184false0142460939500114246673950059TX_R_154_R 276889 27688918014246713950131424723395032 27689201424688395025 27690401424722395031TX_R_155 52545984false0142472539504114247833950459TX_R_155_R 276907 27690718014247873950531424839395072 27691001424804395065 27692201424838395071TX_R_156 52546784false0142484139508114248993950859TX_R_156_R 276925 27692518014249033950931424955395112 27692801424920395105 27694001424954395111TX_R_157 52547584false0142495739512114250153951259TX_R_157_R 276943 27694318014250193951331425071395152 27694601425036395145 27695801425070395151TX_R_158 52548384false0142507339516114251313951659TX_R_158_R 276961 27696118014251353951731425187395192 27696401425152395185 27697601425186395191TX_R_159 52549184false0142518939520114252473952059TX_R_159_R 276979 27697918014252513952131425303395232 27698201425268395225 27699401425302395231TX_R_160 52549984false0142530539524114253633952459TX_R_160_R 276997 27699718014253673952531425419395272 27700001425384395265 27701201425418395271TX_R_161 52550784false0142542139528114254793952859TX_R_161_R 277015 27701518014254833952931425535395312 27701801425500395305 27703001425534395311TX_R_162 52551584false0142553739532114255953953259TX_R_162_R 277033 27703318014255993953331425651395352 27703601425616395345 27704801425650395351TX_R_163 52552384false0142565339536114257113953659TX_R_163_R 277051 27705118014257153953731425767395392 27705401425732395385 27706601425766395391TX_R_164 52553184false0142576939540114258273954059TX_R_164_R 277069 27706918014258313954131425883395432 27707201425848395425 27708401425882395431TX_R_165 52553984false0142588539544114259433954459TX_R_165_R 277087 27708718014259473954531425999395472 27709001425964395465 27710201425998395471TX_R_166 52554784false0142600139548114260593954859TX_R_166_R 277105 27710518014260633954931426115395512 27710801426080395505 27712001426114395511TX_R_167 52555584false0142611739552114261753955259TX_R_167_R 277123 27712318014261793955331426231395552 27712601426196395545 27713801426230395551TX_R_168 52556384false0142623339556114262913955659TX_R_168_R 277141 27714118014262953955731426347395592 27714401426312395585 27715601426346395591TX_R_169 52557184false0142634939560114264073956059TX_R_169_R 277159 27715918014264113956131426463395632 27716201426428395625 27717401426462395631TX_R_170 52557984false0142646539564114265233956459TX_R_170_R 277177 27717718014265273956531426579395672 27718001426544395665 27719201426578395671TX_R_171 52558784false0142658139568114266393956859TX_R_171_R 277195 27719518014266433956931426695395712 27719801426660395705 27721001426694395711TX_R_172 52559584false0142669739572114267553957259TX_R_172_R 277213 27721318014267593957331426811395752 27721601426776395745 27722801426810395751TX_R_173 52560384false0142681339576114268713957659TX_R_173_R 277231 27723118014268753957731426927395792 27723401426892395785 27724601426926395791TX_R_174 52561184false0142692939580114269873958059TX_R_174_R 277249 27724918014269913958131427043395832 27725201427008395825 27726401427042395831TX_R_175 52561984false0142704539584114271033958459TX_R_175_R 277267 27726718014271073958531427159395872 27727001427124395865 27728201427158395871TX_R_176 52562784false0142716139588114272193958859TX_R_176_R 277285 27728518014272233958931427275395912 27728801427240395905 27730001427274395911TX_R_177 52563584false0142727739592114273353959259TX_R_177_R 277303 27730318014273393959331427391395952 27730601427356395945 27731801427390395951TX_R_178 52564384false0142739339596114274513959659TX_R_178_R 277321 27732118014274553959731427507395992 27732401427472395985 27733601427506395991TX_R_179 52565184false0142750939600114275673960059TX_R_179_R 277339 27733918014275713960131427623396032 27734201427588396025 27735401427622396031TX_R_180 52565984false0142762539604114276833960459TX_R_180_R 277357 27735718014276873960531427739396072 27736001427704396065 27737201427738396071TX_R_181 52566784false0142774139608114277993960859TX_R_181_R 277375 27737518014278033960931427855396112 27737801427820396105 27739001427854396111TX_R_182 52567584false0142785739612114279153961259TX_R_182_R 277393 27739318014279193961331427971396152 27739601427936396145 27740801427970396151TX_R_183 52568384false0142797339616114280313961659TX_R_183_R 277411 27741118014280353961731428087396192 27741401428052396185 27742601428086396191TX_R_184 52569184false0142808939620114281473962059TX_R_184_R 277429 27742918014281513962131428203396232 27743201428168396225 27744401428202396231TX_R_185 52569984false0142820539624114282633962459TX_R_185_R 277447 27744718014282673962531428319396272 27745001428284396265 27746201428318396271TX_R_186 52570784false0142832139628114283793962859TX_R_186_R 277465 27746518014283833962931428435396312 27746801428400396305 27748001428434396311TX_R_187 52571584false0142843739632114284953963259TX_R_187_R 277483 27748318014284993963331428552396352 27748601428516396345 27749801428551396351TX_R_188 52572384false0142855439636114286123963659TX_R_188_R 277501 27750118014286163963731428669396392 27750401428633396385 27751601428668396391TX_R_189 52573184false0142867139640114287293964059TX_R_189_R 277519 27751918014287333964131428786396432 27752201428750396425 27753401428785396431TX_R_190 52573984false0142878839644114288463964459TX_R_190_R 277537 27753718014288503964531428903396472 27754001428867396465 27755201428902396471TX_R_191 52574784false0142890539648114289633964859TX_R_191_R 277555 27755518014289673964931429020396512 27755801428984396505 27757001429019396511TX_R_192 52575584false0142902239652114290803965259TX_R_192_R 277573 27757318014290843965331429137396552 27757601429101396545 27758801429136396551TX_R_193 52576384false0142913939656114291973965659TX_R_193_R 277591 27759118014292013965731429254396592 27759401429218396585 27760601429253396591TX_R_194 52577184false0142925639660114293143966059TX_R_194_R 277609 27760918014293183966131429371396632 27761201429335396625 27762401429370396631TX_R_195 52577984false0142937339664114294313966459TX_R_195_R 277627 27762718014294353966531429488396672 27763001429452396665 27764201429487396671TX_R_196 52578784false0142949039668114295483966859TX_R_196_R 277645 27764518014295523966931429605396712 27764801429569396705 27766001429604396711TX_R_197 52579584false0142960739672114296653967259TX_R_197_R 277663 27766318014296693967331429722396752 27766601429686396745 27767801429721396751TX_R_198 52580384false0142972439676114297823967659TX_R_198_R 277681 27768118014297863967731429839396792 27768401429803396785 27769601429838396791TX_R_199 52581184false0142984139680114298993968059TX_R_199_R 277699 27769918014299033968131429956396832 27770201429920396825 27771401429955396831TX_R_200 52581984false0142995839684114300163968459TX_R_200_R 277717 27771718014300203968531430073396872 27772001430037396865 27773201430072396871TX_R_201 52582784false0143007539688114301333968859TX_R_201_R 277735 27773518014301373968931430190396912 27773801430154396905 27775001430189396911TX_R_202 52583584false0143019239692114302503969259TX_R_202_R 277753 27775318014302543969331430307396952 27775601430271396945 27776801430306396951TX_R_203 52584384false0143030939696114303673969659TX_R_203_R 277771 27777118014303713969731430424396992 27777401430388396985 27778601430423396991TX_R_204 52585184false0143042639700114304843970059TX_R_204_R 277789 27778918014304883970131430541397032 27779201430505397025 27780401430540397031TX_R_205 52585984false0143054339704114306013970459TX_R_205_R 277807 27780718014306053970531430658397072 27781001430622397065 27782201430657397071TX_R_206 52586784false0143066039708114307183970859TX_R_206_R 277825 27782518014307223970931430775397112 27782801430739397105 27784001430774397111TX_R_207 52587584false0143077739712114308353971259TX_R_207_R 277843 27784318014308393971331430892397152 27784601430856397145 27785801430891397151TX_R_208 52588384false0143089439716114309523971659TX_R_208_R 277861 27786118014309563971731431009397192 27786401430973397185 27787601431008397191TX_R_209 52589184false0143101139720114310693972059TX_R_209_R 277879 27787918014310733972131431126397232 27788201431090397225 27789401431125397231TX_R_210 52589984false0143112839724114311863972459TX_R_210_R 277897 27789718014311903972531431243397272 27790001431207397265 27791201431242397271TX_R_211 52590784false0143124539728114313033972859TX_R_211_R 277915 27791518014313073972931431360397312 27791801431324397305 27793001431359397311TX_R_212 52591584false0143136239732114314203973259TX_R_212_R 277933 27793318014314243973331431477397352 27793601431441397345 27794801431476397351TX_R_213 52592384false0143147939736114315373973659TX_R_213_R 277951 27795118014315413973731431594397392 27795401431558397385 27796601431593397391TX_R_214 52593184false0143159639740114316543974059TX_R_214_R 277969 27796918014316583974131431711397432 27797201431675397425 27798401431710397431TX_R_215 52593984false0143171339744114317713974459TX_R_215_R 277987 27798718014317753974531431828397472 27799001431792397465 27800201431827397471TX_R_216 52594784false0143183039748114318883974859TX_R_216_R 278005 27800518014318923974931431945397512 27800801431909397505 27802001431944397511TX_R_217 52595584false0143194739752114320053975259TX_R_217_R 278023 27802318014320093975331432062397552 27802601432026397545 27803801432061397551TX_R_218 52596384false0143206439756114321223975659TX_R_218_R 278041 27804118014321263975731432179397592 27804401432143397585 27805601432178397591TX_R_219 52597184false0143218139760114322393976059TX_R_219_R 278059 27805918014322433976131432296397632 27806201432260397625 27807401432295397631TX_R_220 52597984false0143229839764114323563976459TX_R_220_R 278077 27807718014323603976531432413397672 27808001432377397665 27809201432412397671TX_R_221 52598784false0143241539768114324733976859TX_R_221_R 278095 27809518014324773976931432530397712 27809801432494397705 27811001432529397711TX_R_222 52599584false0143253239772114325903977259TX_R_222_R 278113 27811318014325943977331432647397752 27811601432611397745 27812801432646397751TX_R_223 52600384false0143264939776114327073977659TX_R_223_R 278131 27813118014327113977731432764397792 27813401432728397785 27814601432763397791TX_R_224 52601184false0143276639780114328243978059TX_R_224_R 278149 27814918014328283978131432881397832 27815201432845397825 27816401432880397831TX_R_225 52601984false0143288339784114329413978459TX_R_225_R 278167 27816718014329453978531432998397872 27817001432962397865 27818201432997397871TX_R_226 52602784false0143300039788114330583978859TX_R_226_R 278185 27818518014330623978931433115397912 27818801433079397905 27820001433114397911TX_R_227 52603584false0143311739792114331753979259TX_R_227_R 278203 27820318014331793979331433232397952 27820601433196397945 27821801433231397951TX_R_228 52604384false0143323439796114332923979659TX_R_228_R 278221 27822118014332963979731433349397992 27822401433313397985 27823601433348397991TX_R_229 52605184false0143335139800114334093980059TX_R_229_R 278239 27823918014334133980131433466398032 27824201433430398025 27825401433465398031TX_R_230 52605984false0143346839804114335263980459TX_R_230_R 278257 27825718014335303980531433583398072 27826001433547398065 27827201433582398071TX_R_231 52606784false0143358539808114336433980859TX_R_231_R 278275 27827518014336473980931433700398112 27827801433664398105 27829001433699398111TX_R_232 52607584false0143370239812114337603981259TX_R_232_R 278293 27829318014337643981331433817398152 27829601433781398145 27830801433816398151TX_R_233 52608384false0143381939816114338773981659TX_R_233_R 278311 27831118014338813981731433934398192 27831401433898398185 27832601433933398191TX_R_234 52609184false0143393639820114339943982059TX_R_234_R 278329 27832918014339983982131434051398232 27833201434015398225 27834401434050398231TX_R_235 52609984false0143405339824114341113982459TX_R_235_R 278347 27834718014341153982531434168398272 27835001434132398265 27836201434167398271TX_R_236 52610784false0143417039828114342283982859TX_R_236_R 278365 27836518014342323982931434285398312 27836801434249398305 27838001434284398311TX_R_237 52611584false0143428739832114343453983259TX_R_237_R 278383 27838318014343493983331434402398352 27838601434366398345 27839801434401398351TX_R_238 52612384false0143440439836114344623983659TX_R_238_R 278401 27840118014344663983731434519398392 27840401434483398385 27841601434518398391TX_R_239 52613184false0143452139840114345793984059TX_R_239_R 278419 27841918014345833984131434636398432 27842201434600398425 27843401434635398431TX_R_240 52613984false0143463839844114346963984459TX_R_240_R 278437 27843718014347003984531434753398472 27844001434717398465 27845201434752398471TX_R_241 52614784false0143475539848114348133984859TX_R_241_R 278455 27845518014348173984931434870398512 27845801434834398505 27847001434869398511TX_R_242 52615584false0143487239852114349303985259TX_R_242_R 278473 27847318014349343985331434987398552 27847601434951398545 27848801434986398551TX_R_243 52616384false0143498939856114350473985659TX_R_243_R 278491 27849118014350513985731435104398592 27849401435068398585 27850601435103398591TX_R_244 52617184false0143510639860114351643986059TX_R_244_R 278509 27850918014351683986131435221398632 27851201435185398625 27852401435220398631TX_R_245 52617984false0143522339864114352813986459TX_R_245_R 278527 27852718014352853986531435338398672 27853001435302398665 27854201435337398671TX_R_246 52618784false0143534039868114353983986859TX_R_246_R 278545 27854518014354023986931435455398712 27854801435419398705 27856001435454398711TX_R_247 52619584false0143545739872114355153987259TX_R_247_R 278563 27856318014355193987331435572398752 27856601435536398745 27857801435571398751TX_R_248 52620384false0143557439876114356323987659TX_R_248_R 278581 27858118014356363987731435689398792 27858401435653398785 27859601435688398791TX_R_249 52621184false0143569139880114357493988059TX_R_249_R 278599 27859918014357533988131435806398832 27860201435770398825 27861401435805398831TX_R_250 52621984false0143580839884114358663988459TX_R_250_R 278617 27861718014358703988531435923398872 27862001435887398865 27863201435922398871TX_R_251 52622784false0143592539888114359833988859TX_R_251_R 278635 27863518014359873988931436040398912 27863801436004398905 27865001436039398911TX_R_252 52623584false0143604239892114361003989259TX_R_252_R 278653 27865318014361043989331436157398952 27865601436121398945 27866801436156398951TX_R_253 52624384false0143615939896114362173989659TX_R_253_R 278671 27867118014362213989731436274398992 27867401436238398985 27868601436273398991TX_R_254 52625184false0143627639900114363343990059TX_R_254_R 278689 27868918014363383990131436391399032 27869201436355399025 27870401436390399031TX_R_255 52625984false0143639339904114364513990459TX_R_255_R 278707 27870718014364553990531436508399072 27871001436472399065 27872201436507399071TX_R_256 52626784false0143651039908114365683990859TX_R_256_R 278725 27872518014365723990931436625399112 27872801436589399105 27874001436624399111TX_R_257 52627584false0143662739912114366853991259TX_R_257_R 278743 27874318014366893991331436742399152 27874601436706399145 27875801436741399151TX_R_258 52628384false0143674439916114368023991659TX_R_258_R 278761 27876118014368063991731436859399192 27876401436823399185 27877601436858399191TX_R_259 52629184false0143686139920114369193992059TX_R_259_R 278779 27877918014369233992131436976399232 27878201436940399225 27879401436975399231TX_R_260 52629984false0143697839924114370363992459TX_R_260_R 278797 27879718014370403992531437093399272 27880001437057399265 27881201437092399271TX_R_261 52630784false0143709539928114371533992859TX_R_261_R 278815 27881518014371573992931437210399312 27881801437174399305 27883001437209399311TX_R_262 52631584false0143721239932114372703993259TX_R_262_R 278833 27883318014372743993331437327399352 27883601437291399345 27884801437326399351TX_R_263 52632384false0143732939936114373873993659TX_R_263_R 278851 27885118014373913993731437444399392 27885401437408399385 27886601437443399391TX_R_264 52633184false0143744639940114375043994059TX_R_264_R 278869 27886918014375083994131437561399432 27887201437525399425 27888401437560399431TX_R_265 52633984false0143756339944114376213994459TX_R_265_R 278887 27888718014376253994531437678399472 27889001437642399465 27890201437677399471TX_R_266 52634784false0143768039948114377383994859TX_R_266_R 278905 27890518014377423994931437795399512 27890801437759399505 27892001437794399511TX_R_267 52635584false0143779739952114378553995259TX_R_267_R 278923 27892318014378593995331437912399552 27892601437876399545 27893801437911399551TX_R_268 52636384false0143791439956114379723995659TX_R_268_R 278941 27894118014379763995731438029399592 27894401437993399585 27895601438028399591TX_R_269 52637184false0143803139960114380893996059TX_R_269_R 278959 27895918014380933996131438146399632 27896201438110399625 27897401438145399631TX_R_270 52637984false0143814839964114382063996459TX_R_270_R 278977 27897718014382103996531438263399672 27898001438227399665 27899201438262399671TX_R_271 52638784false0143826539968114383233996859TX_R_271_R 278995 27899518014383273996931438380399712 27899801438344399705 27901001438379399711TX_R_272 52639584false0143838239972114384403997259TX_R_272_R 279013 27901318014384443997331438497399752 27901601438461399745 27902801438496399751TX_R_273 52640384false0143849939976114385573997659TX_R_273_R 279031 27903118014385613997731438614399792 27903401438578399785 27904601438613399791TX_R_274 52641184false0143861639980114386743998059TX_R_274_R 279049 27904918014386783998131438731399832 27905201438695399825 27906401438730399831TX_R_275 52641984false0143873339984114387913998459TX_R_275_R 279067 27906718014387953998531438848399872 27907001438812399865 27908201438847399871TX_R_276 52642784false0143885039988114389083998859TX_R_276_R 279085 27908518014389123998931438965399912 27908801438929399905 27910001438964399911TX_R_277 52643584false0143896739992114390253999259TX_R_277_R 279103 27910318014390293999331439082399952 27910601439046399945 27911801439081399951TX_R_278 52644384false0143908439996114391423999659TX_R_278_R 279121 27912118014391463999731439199399992 27912401439163399985 27913601439198399991TX_R_279 52645184false0143920140000114392594000059TX_R_279_R 279139 27913918014392634000131439316400032 27914201439280400025 27915401439315400031TX_R_280 52645984false0143931840004114393764000459TX_R_280_R 279157 27915718014393804000531439433400072 27916001439397400065 27917201439432400071TX_R_281 52646784false0143943540008114394934000859TX_R_281_R 279175 27917518014394974000931439550400112 27917801439514400105 27919001439549400111TX_R_282 52647584false0143955240012114396104001259TX_R_282_R 279193 27919318014396144001331439667400152 27919601439631400145 27920801439666400151TX_R_283 52648384false0143966940016114397274001659TX_R_283_R 279211 27921118014397314001731439784400192 27921401439748400185 27922601439783400191TX_R_284 52649184false0143978640020114398444002059TX_R_284_R 279229 27922918014398484002131439901400232 27923201439865400225 27924401439900400231TX_R_285 52649984false0143990340024114399614002459TX_R_285_R 279247 27924718014399654002531440018400272 27925001439982400265 27926201440017400271TX_R_286 52650784false0144002040028114400784002859TX_R_286_R 279265 27926518014400824002931440135400312 27926801440099400305 27928001440134400311TX_R_287 52651584false0144013740032114401954003259TX_R_287_R 279283 27928318014401994003331440252400352 27928601440216400345 27929801440251400351TX_R_288 52652384false0144025440036114403124003659TX_R_288_R 279301 27930118014403164003731440369400392 27930401440333400385 27931601440368400391TX_R_289 52653184false0144037140040114404294004059TX_R_289_R 279319 27931918014404334004131440486400432 27932201440450400425 27933401440485400431TX_R_290 52653984false0144048840044114405464004459TX_R_290_R 279337 27933718014405504004531440603400472 27934001440567400465 27935201440602400471TX_R_291 52654784false0144060540048114406634004859TX_R_291_R 279355 27935518014406674004931440720400512 27935801440684400505 27937001440719400511TX_R_292 52655584false0144072240052114407804005259TX_R_292_R 279373 27937318014407844005331440837400552 27937601440801400545 27938801440836400551TX_R_293 52656384false0144083940056114408974005659TX_R_293_R 279391 27939118014409014005731440954400592 27939401440918400585 27940601440953400591TX_R_294 52657184false0144095640060114410144006059TX_R_294_R 279409 27940918014410184006131441071400632 27941201441035400625 27942401441070400631TX_R_295 52657984false0144107340064114411314006459TX_R_295_R 279427 27942718014411354006531441188400672 27943001441152400665 27944201441187400671TX_R_296 52658784false0144119040068114412484006859TX_R_296_R 279445 27944518014412524006931441305400712 27944801441269400705 27946001441304400711TX_R_297 52659584false0144130740072114413654007259TX_R_297_R 279463 27946318014413694007331441422400752 27946601441386400745 27947801441421400751TX_R_298 52660384false0144142440076114414824007659TX_R_298_R 279481 27948118014414864007731441539400792 27948401441503400785 27949601441538400791TX_R_299 52661184false0144154140080114415994008059TX_R_299_R 279499 27949918014416034008131441656400832 27950201441620400825 27951401441655400831TX_R_300 52661984false0144165840084114417164008459TX_R_300_R 279517 27951718014417204008531441773400872 27952001441737400865 27953201441772400871TX_R_301 52662784false0144177540088114418334008859TX_R_301_R 279535 27953518014418374008931441890400912 27953801441854400905 27955001441889400911TX_R_302 52663584false0144189240092114419504009259TX_R_302_R 279553 27955318014419544009331442007400952 27955601441971400945 27956801442006400951TX_R_303 52664384false0144200940096114420674009659TX_R_303_R 279571 27957118014420714009731442124400992 27957401442088400985 27958601442123400991TX_R_304 52665184false0144212640100114421844010059TX_R_304_R 279589 27958918014421884010131442241401032 27959201442205401025 27960401442240401031TX_R_305 52665984false0144224340104114423014010459TX_R_305_R 279607 27960718014423054010531442358401072 27961001442322401065 27962201442357401071TX_R_306 52666784false0144236040108114424184010859TX_R_306_R 279625 27962518014424224010931442475401112 27962801442439401105 27964001442474401111TX_R_307 52667584false0144247740112114425354011259TX_R_307_R 279643 27964318014425394011331442592401152 27964601442556401145 27965801442591401151TX_R_308 52668384false0144259440116114426524011659TX_R_308_R 279661 27966118014426564011731442709401192 27966401442673401185 27967601442708401191TX_R_309 52669184false0144271140120114427694012059TX_R_309_R 279679 27967918014427734012131442826401232 27968201442790401225 27969401442825401231TX_R_310 52669984false0144282840124114428864012459TX_R_310_R 279697 27969718014428904012531442943401272 27970001442907401265 27971201442942401271TX_R_311 52670784false0144294540128114430034012859TX_R_311_R 279715 27971518014430074012931443060401312 27971801443024401305 27973001443059401311TX_R_312 52671584false0144306240132114431204013259TX_R_312_R 279733 27973318014431244013331443177401352 27973601443141401345 27974801443176401351TX_R_313 52672384false0144317940136114432374013659TX_R_313_R 279751 27975118014432414013731443294401392 27975401443258401385 27976601443293401391TX_R_314 52673184false0144329640140114433544014059TX_R_314_R 279769 27976918014433584014131443411401432 27977201443375401425 27978401443410401431TX_R_315 52673984false0144341340144114434714014459TX_R_315_R 279787 27978718014434754014531443528401472 27979001443492401465 27980201443527401471TX_R_316 52674784false0144353040148114435884014859TX_R_316_R 279805 27980518014435924014931443645401512 27980801443609401505 27982001443644401511TX_R_317 52675584false0144364740152114437054015259TX_R_317_R 279823 27982318014437094015331443762401552 27982601443726401545 27983801443761401551TX_R_318 52676384false0144376440156114438224015659TX_R_318_R 279841 27984118014438264015731443879401592 27984401443843401585 27985601443878401591TX_R_319 52677184false0144388140160114439394016059TX_R_319_R 279859 27985918014439434016131443996401632 27986201443960401625 27987401443995401631TX_R_320 52677984false0144399840164114440564016459TX_R_320_R 279877 27987718014440604016531444113401672 27988001444077401665 27989201444112401671TX_R_321 52678784false0144411540168114441734016859TX_R_321_R 279895 27989518014441774016931444230401712 27989801444194401705 27991001444229401711TX_R_322 52679584false0144423240172114442904017259TX_R_322_R 279913 27991318014442944017331444347401752 27991601444311401745 27992801444346401751TX_R_323 52680384false0144434940176114444074017659TX_R_323_R 279931 27993118014444114017731444464401792 27993401444428401785 27994601444463401791TX_R_324 52681184false0144446640180114445244018059TX_R_324_R 279949 27994918014445284018131444581401832 27995201444545401825 27996401444580401831TX_R_325 52681984false0144458340184114446414018459TX_R_325_R 279967 27996718014446454018531444698401872 27997001444662401865 27998201444697401871TX_R_326 52682784false0144470040188114447584018859TX_R_326_R 279985 27998518014447624018931444815401912 27998801444779401905 28000001444814401911TX_R_327 52683584false0144481740192114448754019259TX_R_327_R 280003 28000318014448794019331444932401952 28000601444896401945 28001801444931401951TX_R_328 52684384false0144493440196114449924019659TX_R_328_R 280021 28002118014449964019731445049401992 28002401445013401985 28003601445048401991TX_R_329 52685184false0144505140200114451094020059TX_R_329_R 280039 28003918014451134020131445166402032 28004201445130402025 28005401445165402031TX_R_330 52685984false0144516840204114452264020459TX_R_330_R 280057 28005718014452304020531445283402072 28006001445247402065 28007201445282402071TX_R_331 52686784false0144528540208114453434020859TX_R_331_R 280075 28007518014453474020931445400402112 28007801445364402105 28009001445399402111TX_R_332 52687584false0144540240212114454604021259TX_R_332_R 280093 28009318014454644021331445517402152 28009601445481402145 28010801445516402151TX_R_333 52688384false0144551940216114455774021659TX_R_333_R 280111 28011118014455814021731445634402192 28011401445598402185 28012601445633402191TX_R_334 52689184false0144563640220114456944022059TX_R_334_R 280129 28012918014456984022131445751402232 28013201445715402225 28014401445750402231TX_R_335 52689984false0144575340224114458114022459TX_R_335_R 280147 28014718014458154022531445868402272 28015001445832402265 28016201445867402271TX_R_336 52690784false0144587040228114459284022859TX_R_336_R 280165 28016518014459324022931445985402312 28016801445949402305 28018001445984402311TX_R_337 52691584false0144598740232114460454023259TX_R_337_R 280183 28018318014460494023331446102402352 28018601446066402345 28019801446101402351TX_R_338 52692384false0144610440236114461624023659TX_R_338_R 280201 28020118014461664023731446219402392 28020401446183402385 28021601446218402391TX_R_339 52693184false0144622140240114462794024059TX_R_339_R 280219 28021918014462834024131446336402432 28022201446300402425 28023401446335402431TX_R_340 52693984false0144633840244114463964024459TX_R_340_R 280237 28023718014464004024531446453402472 28024001446417402465 28025201446452402471TX_R_341 52694784false0144645540248114465134024859TX_R_341_R 280255 28025518014465174024931446570402512 28025801446534402505 28027001446569402511TX_R_342 52695584false0144657240252114466304025259TX_R_342_R 280273 28027318014466344025331446687402552 28027601446651402545 28028801446686402551TX_R_343 52696384false0144668940256114467474025659TX_R_343_R 280291 28029118014467514025731446804402592 28029401446768402585 28030601446803402591TX_R_344 52697184false0144680640260114468644026059TX_R_344_R 280309 28030918014468684026131446921402632 28031201446885402625 28032401446920402631TX_R_345 52697984false0144692340264114469814026459TX_R_345_R 280327 28032718014469854026531447038402672 28033001447002402665 28034201447037402671TX_R_346 52698784false0144704040268114470984026859TX_R_346_R 280345 28034518014471024026931447155402712 28034801447119402705 28036001447154402711TX_R_347 52699584false0144715740272114472154027259TX_R_347_R 280363 28036318014472194027331447272402752 28036601447236402745 28037801447271402751TX_R_348 52700384false0144727440276114473324027659TX_R_348_R 280381 28038118014473364027731447389402792 28038401447353402785 28039601447388402791TX_R_349 52701184false0144739140280114474494028059TX_R_349_R 280399 28039918014474534028131447506402832 28040201447470402825 28041401447505402831TX_R_350 52701984false0144750840284114475664028459TX_R_350_R 280417 28041718014475704028531447623402872 28042001447587402865 28043201447622402871TX_R_351 52702784false0144762540288114476834028859TX_R_351_R 280435 28043518014476874028931447740402912 28043801447704402905 28045001447739402911TX_R_352 52703584false0144774240292114478004029259TX_R_352_R 280453 28045318014478044029331447857402952 28045601447821402945 28046801447856402951TX_R_353 52704384false0144785940296114479174029659TX_R_353_R 280471 28047118014479214029731447974402992 28047401447938402985 28048601447973402991TX_R_354 52705184false0144797640300114480344030059TX_R_354_R 280489 28048918014480384030131448091403032 28049201448055403025 28050401448090403031TX_R_355 52705984false0144809340304114481514030459TX_R_355_R 280507 28050718014481554030531448208403072 28051001448172403065 28052201448207403071TX_R_356 52706784false0144821040308114482684030859TX_R_356_R 280525 28052518014482724030931448325403112 28052801448289403105 28054001448324403111TX_R_357 52707584false0144832740312114483854031259TX_R_357_R 280543 28054318014483894031331448442403152 28054601448406403145 28055801448441403151TX_R_358 52708384false0144844440316114485024031659TX_R_358_R 280561 28056118014485064031731448559403192 28056401448523403185 28057601448558403191TX_R_359 52709184false0144856140320114486194032059TX_R_359_R 280579 28057918014486234032131448676403232 28058201448640403225 28059401448675403231TX_R_360 52709984false0144867840324114487364032459TX_R_360_R 280597 28059718014487404032531448793403272 28060001448757403265 28061201448792403271TX_R_361 52710784false0144879540328114488534032859TX_R_361_R 280615 28061518014488574032931448910403312 28061801448874403305 28063001448909403311TX_R_362 52711584false0144891240332114489704033259TX_R_362_R 280633 28063318014489744033331449027403352 28063601448991403345 28064801449026403351TX_R_363 52712384false0144902940336114490874033659TX_R_363_R 280651 28065118014490914033731449144403392 28065401449108403385 28066601449143403391TX_R_364 52713184false0144914640340114492044034059TX_R_364_R 280669 28066918014492084034131449261403432 28067201449225403425 28068401449260403431TX_R_365 52713984false0144926340344114493214034459TX_R_365_R 280687 28068718014493254034531449378403472 28069001449342403465 28070201449377403471TX_R_366 52714784false0144938040348114494384034859TX_R_366_R 280705 28070518014494424034931449495403512 28070801449459403505 28072001449494403511TX_R_367 52715584false0144949740352114495554035259TX_R_367_R 280723 28072318014495594035331449612403552 28072601449576403545 28073801449611403551TX_R_368 52716384false0144961440356114496724035659TX_R_368_R 280741 28074118014496764035731449729403592 28074401449693403585 28075601449728403591TX_R_369 52717184false0144973140360114497894036059TX_R_369_R 280759 28075918014497934036131449846403632 28076201449810403625 28077401449845403631TX_R_370 52717984false0144984840364114499064036459TX_R_370_R 280777 28077718014499104036531449963403672 28078001449927403665 28079201449962403671TX_R_371 52718784false0144996540368114500234036859TX_R_371_R 280795 28079518014500274036931450080403712 28079801450044403705 28081001450079403711TX_R_372 52719584false0145008240372114501404037259TX_R_372_R 280813 28081318014501444037331450197403752 28081601450161403745 28082801450196403751TX_R_373 52720384false0145019940376114502574037659TX_R_373_R 280831 28083118014502614037731450314403792 28083401450278403785 28084601450313403791TX_R_374 52721184false0145031640380114503744038059TX_R_374_R 280849 28084918014503784038131450431403832 28085201450395403825 28086401450430403831TX_R_375 52721984false0145043340384114504914038459TX_R_375_R 280867 28086718014504954038531450548403872 28087001450512403865 28088201450547403871TX_R_376 52722784false0145055040388114506084038859TX_R_376_R 280885 28088518014506124038931450665403912 28088801450629403905 28090001450664403911TX_R_377 52723584false0145066740392114507254039259TX_R_377_R 280903 28090318014507294039331450782403952 28090601450746403945 28091801450781403951TX_R_378 52724384false0145078440396114508424039659TX_R_378_R 280921 28092118014508464039731450899403992 28092401450863403985 28093601450898403991TX_R_379 52725184false0145090140400114509594040059TX_R_379_R 280939 28093918014509634040131451016404032 28094201450980404025 28095401451015404031TX_R_380 52725984false0145101840404114510764040459TX_R_380_R 280957 28095718014510804040531451133404072 28096001451097404065 28097201451132404071TX_R_381 52726784false0145113540408114511934040859TX_R_381_R 280975 28097518014511974040931451250404112 28097801451214404105 28099001451249404111TX_R_382 52727584false0145125240412114513104041259TX_R_382_R 280993 28099318014513144041331451367404152 28099601451331404145 28100801451366404151TX_R_383 52728384false0145136940416114514274041659TX_R_383_R 281011 28101118014514314041731451484404192 28101401451448404185 28102601451483404191TX_R_384 52729184false0145148640420114515444042059TX_R_384_R 281029 28102918014515484042131451601404232 28103201451565404225 28104401451600404231TX_R_385 52729984false0145160340424114516614042459TX_R_385_R 281047 28104718014516654042531451718404272 28105001451682404265 28106201451717404271TX_R_386 52730784false0145172040428114517784042859TX_R_386_R 281065 28106518014517824042931451835404312 28106801451799404305 28108001451834404311TX_R_387 52731584false0145183740432114518954043259TX_R_387_R 281083 28108318014518994043331451952404352 28108601451916404345 28109801451951404351TX_R_388 52732384false0145195440436114520124043659TX_R_388_R 281101 28110118014520164043731452069404392 28110401452033404385 28111601452068404391TX_R_389 52733184false0145207140440114521294044059TX_R_389_R 281119 28111918014521334044131452186404432 28112201452150404425 28113401452185404431TX_R_390 52733984false0145218840444114522464044459TX_R_390_R 281137 28113718014522504044531452303404472 28114001452267404465 28115201452302404471TX_R_391 52734784false0145230540448114523634044859TX_R_391_R 281155 28115518014523674044931452420404512 28115801452384404505 28117001452419404511Prop_0 281173 28117359014524654045431452756404692x0x_ix4 28117801452544404595 28118301452568404609 28118901452584404619 28119201452616404635 281196014526234046312 281199014526544046410 281209014526704046426 281220014526674046423 28122401452693404659 28123001452739404685Prop_1 281232 28123277014528824047231453200404842x0x_ix4 281237014529664047710 281250014530084047752 281261014530054047749 28126501453058404789 281293014531214047913 281301014531644048013 28130701453191404835Prop_2 281309 28130959014532454048731453536405022x0x_ix4 28131401453324404925 28131901453348404939 28132501453364404949 28132801453396404965 281332014534034049612 281335014534344049710 281345014534504049726 281356014534474049723 28136001453473404989 28136601453519405015Prop_3 281368 28136859014535814050531453872405202x0x_ix4 28137301453660405105 28137801453684405119 28138401453700405129 28138701453732405145 281391014537394051412 281394014537704051510 281404014537864051526 281415014537834051523 28141901453809405169 28142501453855405195Prop_4 281427 28142757014539444052331454246405372x0x_ix4counter8 281432014540604052910 281442014540764052926 281453014540734052923 28145701454099405309 281469014541384053113 281475014541614053213 28148101454229405365Prop_5 281484 28148471014543174054031454657405572x0x_ix4 28148901454396405455 28149401454420405469 28150001454436405479 28150301454468405495 281507014544754054912 281510014545064055010 281520014545224055026 281531014545194055023 28153501454545405519 281547014545844055213 28155301454640405565Prop_6 281555 281555597014547444056031457840406452reason0x4x_ix8total12counter16selection20best24best_with28 28156001455018405715 281565014550374057124 281569014550494057136 28157301455068405725 281584014551444057413 281589014551704057439 281599014552134057518 281606014552564057618 281616014552724057634 281627014552694057631 281631014553034057717 281659014553744057821 281664014554264057925 281679014554954058029 281690014555574058129 281697014556514058425 281712014557204058529 281723014557824058629 281731014559234059213 281740014560234059418 281750014560394059434 281761014560364059431 281765014560704059517 281793014561414059621 281808014562044059721 281814014563044060113 281824014563724060313 281828014564314060517 281831014564654060622 281841014564814060638 281852014564784060635 281856014565164060721 281884014565914060825 281890014566264060925 281896014566524060951 281899014566864061025 281905014568024061417 281914014568424061457 281916014568744061517 281938014569734061818 281948014569894061834 281959014569864061831 281963014570204061917 281991014570914062021 281997014571224062121 282003014572224062513 282012014572884062713 282017014573204062817 282023014573444062917 282026014573924063113 282030014573994063120 282033014574384063218 282043014574544063234 282054014574514063231 282058014574854063317 282086014575564063421 282092014576444063813 282100014577014064013 282144014577924064117 282147014578254064313 28214901457839406451Prop_7 282152 282152295014580104064831458591406682const_00const_14const_28x12x_ix16 28215701458200406565 28216201458224406579 28216801458240406589 28217201458272406605 282176014582794066012 28218001458305406615 282243014583314066131 28231101458371406629 282369014585184066313 28244501458574406675Prop_8 282447 282447242014586944067131458975406832const_00x4x_ix8 28245201458810406775 282515014588364067731 28258301458876406789 282611014589394067913 28268701458966406825Prop_9 282689 282689253014590504068631459449407042const_00x4x_ix8 28269401459166406925 28269901459190406939 28270501459206406949 28270901459238406965 282713014592454069612 28271701459271406975 282780014592974069731 28284801459337406989 282864014593764069913 28294001459432407035Prop_10 282942 282942242014595524070731459834407192const_00x4x_ix8 28294701459669407135 283010014596954071331 28307801459735407149 283106014597984071513 28318201459825407185Prop_11 283184 283184253014599094072231460309407402const_00x4x_ix8 28318901460026407285 28319401460050407299 28320001460066407309 28320401460098407325 283208014601054073212 28321201460131407335 283275014601574073331 28334301460197407349 283359014602364073513 28343501460292407395Prop_12 283437 283437242014604124074331460694407552const_00x4x_ix8 28344201460529407495 283505014605554074931 28357301460595407509 283601014606584075113 28367701460685407545Prop_13 283679 283679253014607694075831461169407762const_00x4x_ix8 28368401460886407645 28368901460910407659 28369501460926407669 28369901460958407685 283703014609654076812 28370701460991407695 283770014610174076931 28383801461057407709 283854014610964077113 28393001461152407755Prop_14 283932 283932237014612474077931461568407932x0x_ix4counter8 28393701461359407855 284000014613834078529 28406801461421407869 284084014614604078713 284090014614834078813 28416601461551407925Prop_15 284169 28416941014617064079631461940408082x0x_ix4 284174014617914080110 284177014618024080121 28418001461820408029 284194014618614080313 284202014619044080413 28420801461931408075Prop_16 284210 284210253014620174081131462376408282x0x_ix4 28421501462097408165 28422001462121408179 28422601462137408189 28423001462169408205 284234014621764082012 28423801462202408215 284301014622264082129 28436901462264408229 284385014623034082313 28446101462359408275Prop_17 284463 284463237014624544083131462775408452x0x_ix4counter8 28446801462566408375 284531014625904083729 28459901462628408389 284615014626674083913 284621014626904084013 28469701462758408445Prop_18 284700 284700237014628514084831463213408632const_00x4x_ix8counter12 28470501463000408555 284768014630264085531 28483601463066408569 284852014631054085713 284858014631284085813 28493401463196408625Prop_19 284937 28493764014632894086631463670408812const_00x4x_ix8counter12 284942014634434087310 284955014634794087346 284966014634764087343 28497001463523408749 284986014635624087513 284992014635854087613 28499801463653408805Prop_20 285001 285001243014637564088431464080408982x0x_ix4counter8 28500601463868408905 285074014638934089030 28514201463933408919 285158014639724089213 285164014639954089313 28524101464063408975Prop_21 285244 28524466014641664090131464508409152x0x_ix4counter8 285249014642834090710 285263014643184090745 285275014643154090742 28527901464361409089 285295014644004090913 285301014644234091013 28530701464491409145Prop_22 285310 28531066014646374091831464944409322x0x_ix4 285315014647224092310 285325014647384092326 285336014647354092323 28534001464761409249 285346014647964092513 285360014648474092617 285368014648944092717 28537401464935409315Prop_23 285376 285376243014650234093531465345409492x0x_ix4counter8 28538101465135409415 285449014651584094128 28551701465198409429 285533014652374094313 285539014652604094413 28561601465328409485Prop_24 285619 28561966014654244095231465762409662x0x_ix4counter8 285624014655414095810 285638014655744095843 285650014655714095840 28565401465615409599 285670014656544096013 285676014656774096113 28568201465745409655Prop_25 285685 28568559014658074096931466099409842x0x_ix4 28569001465887409745 28569501465911409759 28570101465927409769 28570401465959409785 285708014659664097812 285711014659974097910 285721014660134097926 285732014660104097923 28573601466036409809 28574201466082409835Prop_26 285744 28574483014662214098731466540410002x0x_ix4 285749014663064099210 285763014663394099243 285775014663364099240 28577901466380409939 285807014664434099413 285819014664904099517 28582501466531409995Prop_27 285827 28582765014666524100331466940410162x0x_ix4 285832014667374100810 285846014667704100843 285858014667674100840 28586201466811410099 285878014668504101013 285884014668904101117 28589001466931410155Prop_28 285892 285892260014670624101931467365410322x0x_ix4 28589701467142410245 285965014671654102428 28603301467205410259 286061014672684102613 286073014673154102717 28615001467356410315Prop_29 286152 286152242014674774103531467749410482x0x_ix4 28615701467557410405 286225014675804104028 28629301467620410419 286309014676594104213 286315014676994104317 28639201467740410475Prop_30 286394 28639483014678674105131468186410642x0x_ix4 286399014679524105610 286413014679854105643 286425014679824105640 28642901468026410579 286457014680894105813 286469014681364105917 28647501468177410635Prop_31 286477 286477260014683044106731468607410802x0x_ix4 28648201468384410725 286550014684074107228 28661801468447410739 286646014685104107413 286658014685574107517 28673501468598410795Prop_32 286737 286737237014686854108331469006410972x0x_ix4counter8 28674201468797410895 286805014688214108929 28687301468859410909 286889014688984109113 286895014689214109213 28697101468989410965Prop_33 286974 286974243014690904110031469412411142x0x_ix4counter8 28697901469202411065 287047014692274110630 28711501469265411079 287131014693044110813 287137014693274110913 28721401469395411135R_11_RESP_A 101469424411161014694394111625R_39_RESP_A 201469450411171014694654111725R_40_RESP_A 301469476411181014694914111825R_41_RESP_A 401469502411191014695174111925R_41_RESP_B 501469528411201014695434112025R_42_RESP_A 601469554411211014695694112125R_46_RESP_A 701469580411221014695954112225R_46_RESP_B 801469606411231014696214112325R_46_RESP_C 901469632411241014696474112425R_46_RESP_D 1001469658411251014696744112526R_46_RESP_E 1101469685411261014697014112626R_46_RESP_F 1201469712411271014697284112726R_53_RESP_A 1301469739411281014697554112826R_55_RESP_A 1401469766411291014697824112926R_56_RESP_A 1501469793411301014698094113026R_57_RESP_A 1601469820411311014698364113126R_58_RESP_A 1701469847411321014698634113226R_59_RESP_A 1801469874411331014698904113326R_60_RESP_A 1901469901411341014699174113426R_61_RESP_A 2001469928411351014699444113526R_62_RESP_A 2101469955411361014699714113626R_63_RESP_A 2201469982411371014699984113726R_64_RESP_A 2301470009411381014700254113826R_65_RESP_A 2401470036411391014700524113926R_66_RESP_A 2501470063411401014700794114026R_67_RESP_A 2601470090411411014701064114126R_68_RESP_A 2701470117411421014701334114226R_69_RESP_A 2801470144411431014701604114326R_70_RESP_A 2901470171411441014701874114426R_71_RESP_A 3001470198411451014702144114526R_73_RESP_A 3101470225411461014702414114626R_73_RESP_B 3201470252411471014702684114726R_74_RESP_A 3301470279411481014702954114826R_75_RESP_A 3401470306411491014703224114926R_77_RESP_A 3501470333411501014703494115026R_78_RESP_A 3601470360411511014703764115126R_79_RESP_A 3701470387411521014704034115226R_80_RESP_A 3801470414411531014704304115326R_81_RESP_A 3901470441411541014704574115426R_82_RESP_A 4001470468411551014704844115526R_82_RESP_B 4101470495411561014705114115626R_84_RESP_A 4201470522411571014705384115726R_84_RESP_B 4301470549411581014705654115826R_87_RESP_A 4401470576411591014705924115926R_88_RESP_A 4501470603411601014706194116026R_89_RESP_A 4601470630411611014706464116126R_90_RESP_A 4701470657411621014706734116226R_92_RESP_A 4801470684411631014707004116326R_93_RESP_A 4901470711411641014707274116426R_96_RESP_A 5001470738411651014707544116526R_97_RESP_A 5101470765411661014707814116626R_98_RESP_A 5201470792411671014708084116726R_99_RESP_A 5301470819411681014708354116826R_100_RESP_A 5401470846411691014708634116927R_102_RESP_A 5501470874411701014708914117027R_103_RESP_A 5601470902411711014709194117127R_104_RESP_A 5701470930411721014709474117227R_105_RESP_A 5801470958411731014709754117327R_106_RESP_A 5901470986411741014710034117427R_109_RESP_A 6001471014411751014710314117527R_109_RESP_B 6101471042411761014710594117627R_111_RESP_A 6201471070411771014710874117727R_112_RESP_A 6301471098411781014711154117827R_112_RESP_B 6401471126411791014711434117927R_113_RESP_A 6501471154411801014711714118027R_114_RESP_A 6601471182411811014711994118127R_116_RESP_A 6701471210411821014712274118227R_116_RESP_B 6801471238411831014712554118327R_120_RESP_A 6901471266411841014712834118427R_120_RESP_B 7001471294411851014713114118527R_120_RESP_C 7101471322411861014713394118627R_120_RESP_D 7201471350411871014713674118727R_120_RESP_E 7301471378411881014713954118827R_120_RESP_F 7401471406411891014714234118927R_120_RESP_G 7501471434411901014714514119027R_120_RESP_H 7601471462411911014714794119127R_120_RESP_I 7701471490411921014715074119227R_120_RESP_J 7801471518411931014715354119327R_120_RESP_K 7901471546411941014715634119427R_120_RESP_L 8001471574411951014715914119527R_120_RESP_M 8101471602411961014716194119627R_120_RESP_N 8201471630411971014716474119727R_120_RESP_O 8301471658411981014716754119827R_120_RESP_P 8401471686411991014717034119927R_120_RESP_Q 8501471714412001014717314120027R_120_RESP_R 8601471742412011014717594120127R_120_RESP_S 8701471770412021014717874120227R_124_RESP_A 8801471798412031014718154120327R_124_RESP_B 8901471826412041014718434120427R_125_RESP_A 9001471854412051014718714120527R_125_RESP_B 9101471882412061014718994120627R_125_RESP_C 9201471910412071014719274120727R_125_RESP_D 9301471938412081014719554120827R_126_RESP_A 9401471966412091014719834120927R_127_RESP_A 9501471994412101014720114121027R_127_RESP_B 9601472022412111014720394121127R_128_RESP_A 9701472050412121014720674121227R_129_RESP_A 9801472078412131014720954121327R_129_RESP_B 9901472106412141014721234121427R_129_RESP_C 10001472134412151014721524121528R_129_RESP_D 10101472163412161014721814121628R_129_RESP_E 10201472192412171014722104121728R_131_RESP_A 10301472221412181014722394121828R_131_RESP_B 10401472250412191014722684121928R_131_RESP_C 10501472279412201014722974122028R_131_RESP_D 10601472308412211014723264122128R_134_RESP_A 10701472337412221014723554122228R_135_RESP_A 10801472366412231014723844122328R_138_RESP_A 10901472395412241014724134122428R_138_RESP_B 11001472424412251014724424122528R_138_RESP_C 11101472453412261014724714122628R_140_RESP_A 11201472482412271014725004122728R_142_RESP_A 11301472511412281014725294122828R_146_RESP_A 11401472540412291014725584122928R_146_RESP_B 11501472569412301014725874123028R_146_RESP_C 11601472598412311014726164123128R_147_RESP_A 11701472627412321014726454123228R_150_RESP_A 11801472656412331014726744123328R_152_RESP_A 11901472685412341014727034123428R_153_RESP_A 12001472714412351014727324123528R_153_RESP_B 12101472743412361014727614123628R_154_RESP_A 12201472772412371014727904123728R_155_RESP_A 12301472801412381014728194123828R_156_RESP_A 12401472830412391014728484123928R_157_RESP_A 12501472859412401014728774124028R_158_RESP_A 12601472888412411014729064124128R_159_RESP_A 12701472917412421014729354124228R_160_RESP_A 12801472946412431014729644124328R_161_RESP_A 12901472975412441014729934124428R_162_RESP_A 13001473004412451014730224124528R_162_RESP_B 13101473033412461014730514124628R_163_RESP_A 13201473062412471014730804124728R_163_RESP_B 13301473091412481014731094124828R_164_RESP_A 13401473120412491014731384124928R_165_RESP_A 13501473149412501014731674125028R_165_RESP_B 13601473178412511014731964125128R_166_RESP_A 13701473207412521014732254125228R_167_RESP_A 13801473236412531014732544125328R_168_RESP_A 13901473265412541014732834125428R_169_RESP_A 14001473294412551014733124125528R_171_RESP_A 14101473323412561014733414125628R_171_RESP_B 14201473352412571014733704125728R_172_RESP_A 14301473381412581014733994125828R_173_RESP_A 14401473410412591014734284125928R_174_RESP_A 14501473439412601014734574126028R_176_RESP_A 14601473468412611014734864126128R_176_RESP_B 14701473497412621014735154126228R_177_RESP_A 14801473526412631014735444126328R_178_RESP_A 14901473555412641014735734126428R_180_RESP_A 15001473584412651014736024126528R_181_RESP_A 15101473613412661014736314126628R_182_RESP_A 15201473642412671014736604126728R_184_RESP_A 15301473671412681014736894126828R_185_RESP_A 15401473700412691014737184126928R_186_RESP_A 15501473729412701014737474127028R_187_RESP_A 15601473758412711014737764127128R_189_RESP_A 15701473787412721014738054127228R_190_RESP_A 15801473816412731014738344127328R_190_RESP_B 15901473845412741014738634127428R_190_RESP_C 16001473874412751014738924127528R_191_RESP_A 16101473903412761014739214127628R_192_RESP_A 16201473932412771014739504127728R_194_RESP_A 16301473961412781014739794127828R_194_RESP_B 16401473990412791014740084127928R_194_RESP_C 16501474019412801014740374128028R_195_RESP_A 16601474048412811014740664128128R_196_RESP_A 16701474077412821014740954128228R_197_RESP_A 16801474106412831014741244128328R_199_RESP_A 16901474135412841014741534128428R_199_RESP_B 17001474164412851014741824128528R_200_RESP_A 17101474193412861014742114128628R_201_RESP_A 17201474222412871014742404128728R_203_RESP_A 17301474251412881014742694128828R_203_RESP_B 17401474280412891014742984128928R_204_RESP_A 17501474309412901014743274129028R_205_RESP_A 17601474338412911014743564129128R_206_RESP_A 17701474367412921014743854129228R_207_RESP_A 17801474396412931014744144129328R_208_RESP_A 17901474425412941014744434129428R_209_RESP_A 18001474454412951014744724129528R_211_RESP_A 18101474483412961014745014129628R_211_RESP_B 18201474512412971014745304129728R_211_RESP_C 18301474541412981014745594129828R_212_RESP_A 18401474570412991014745884129928R_214_RESP_A 18501474599413001014746174130028R_215_RESP_A 18601474628413011014746464130128R_216_RESP_A 18701474657413021014746754130228R_217_RESP_A 18801474686413031014747044130328R_218_RESP_A 18901474715413041014747334130428R_219_RESP_A 19001474744413051014747624130528R_220_RESP_A 19101474773413061014747914130628R_221_RESP_A 19201474802413071014748204130728R_222_RESP_A 19301474831413081014748494130828R_223_RESP_A 19401474860413091014748784130928R_224_RESP_A 19501474889413101014749074131028R_225_RESP_A 19601474918413111014749364131128R_228_RESP_A 19701474947413121014749654131228R_228_RESP_B 19801474976413131014749944131328R_229_RESP_A 19901475005413141014750234131428R_229_RESP_B 20001475034413151014750524131528R_230_RESP_A 20101475063413161014750814131628R_230_RESP_B 20201475092413171014751104131728R_230_RESP_C 20301475121413181014751394131828R_231_RESP_A 20401475150413191014751684131928R_231_RESP_B 20501475179413201014751974132028R_232_RESP_A 20601475208413211014752264132128R_233_RESP_A 20701475237413221014752554132228R_233_RESP_B 20801475266413231014752844132328R_234_RESP_A 20901475295413241014753134132428R_235_RESP_A 21001475324413251014753424132528R_236_RESP_A 21101475353413261014753714132628R_237_RESP_A 21201475382413271014754004132728R_237_RESP_B 21301475411413281014754294132828R_238_RESP_A 21401475440413291014754584132928R_239_RESP_A 21501475469413301014754874133028R_240_RESP_A 21601475498413311014755164133128R_241_RESP_A 21701475527413321014755454133228R_241_RESP_B 21801475556413331014755744133328R_242_RESP_A 21901475585413341014756034133428R_243_RESP_A 22001475614413351014756324133528R_244_RESP_A 22101475643413361014756614133628R_245_RESP_A 22201475672413371014756904133728R_245_RESP_B 22301475701413381014757194133828R_246_RESP_A 22401475730413391014757484133928R_247_RESP_A 22501475759413401014757774134028R_248_RESP_A 22601475788413411014758064134128R_249_RESP_A 22701475817413421014758354134228R_251_RESP_A 22801475846413431014758644134328R_252_RESP_A 22901475875413441014758934134428R_253_RESP_A 23001475904413451014759224134528R_253_RESP_B 23101475933413461014759514134628R_254_RESP_A 23201475962413471014759804134728R_255_RESP_A 23301475991413481014760094134828R_256_RESP_A 23401476020413491014760384134928R_257_RESP_A 23501476049413501014760674135028R_258_RESP_A 23601476078413511014760964135128R_259_RESP_A 23701476107413521014761254135228R_259_RESP_B 23801476136413531014761544135328R_260_RESP_A 23901476165413541014761834135428R_260_RESP_B 24001476194413551014762124135528R_261_RESP_A 24101476223413561014762414135628R_261_RESP_B 24201476252413571014762704135728R_262_RESP_A 24301476281413581014762994135828R_263_RESP_A 24401476310413591014763284135928R_263_RESP_B 24501476339413601014763574136028R_264_RESP_A 24601476368413611014763864136128R_265_RESP_A 24701476397413621014764154136228R_266_RESP_A 24801476426413631014764444136328R_267_RESP_A 24901476455413641014764734136428R_268_RESP_A 25001476484413651014765024136528R_269_RESP_A 25101476513413661014765314136628R_269_RESP_B 25201476542413671014765604136728R_270_RESP_A 25301476571413681014765894136828R_271_RESP_A 25401476600413691014766184136928R_271_RESP_B 25501476629413701014766474137028R_272_RESP_A 25601476658413711014766764137128R_273_RESP_A 25701476687413721014767054137228R_274_RESP_A 25801476716413731014767344137328R_281_RESP_A 25901476745413741014767634137428R_283_RESP_A 26001476774413751014767924137528R_283_RESP_B 26101476803413761014768214137628R_290_RESP_A 26201476832413771014768504137728R_291_RESP_A 26301476861413781014768794137828R_293_RESP_A 26401476890413791014769084137928R_294_RESP_A 26501476919413801014769374138028R_297_RESP_A 26601476948413811014769664138128R_298_RESP_A 26701476977413821014769954138228R_299_RESP_A 26801477006413831014770244138328R_300_RESP_A 26901477035413841014770534138428R_301_RESP_A 27001477064413851014770824138528R_301_RESP_B 27101477093413861014771114138628R_301_RESP_C 27201477122413871014771404138728R_301_RESP_D 27301477151413881014771694138828R_301_RESP_E 27401477180413891014771984138928R_301_RESP_F 27501477209413901014772274139028R_301_RESP_G 27601477238413911014772564139128R_301_RESP_H 27701477267413921014772854139228R_301_RESP_I 27801477296413931014773144139328R_301_RESP_J 27901477325413941014773434139428R_301_RESP_K 28001477354413951014773724139528R_301_RESP_L 28101477383413961014774014139628R_301_RESP_M 28201477412413971014774304139728R_301_RESP_N 28301477441413981014774594139828R_301_RESP_O 28401477470413991014774884139928R_301_RESP_P 28501477499414001014775174140028R_301_RESP_Q 28601477528414011014775464140128R_301_RESP_R 28701477557414021014775754140228R_301_RESP_S 28801477586414031014776044140328R_301_RESP_T 28901477615414041014776334140428R_301_RESP_U 29001477644414051014776624140528R_301_RESP_V 29101477673414061014776914140628R_301_RESP_W 29201477702414071014777204140728R_301_RESP_X 29301477731414081014777494140828R_301_RESP_Y 29401477760414091014777784140928R_302_RESP_A 29501477789414101014778074141028R_302_RESP_B 29601477818414111014778364141128R_302_RESP_C 29701477847414121014778654141228R_302_RESP_D 29801477876414131014778944141328R_302_RESP_E 29901477905414141014779234141428R_302_RESP_F 30001477934414151014779524141528R_302_RESP_G 30101477963414161014779814141628R_302_RESP_H 30201477992414171014780104141728R_302_RESP_I 30301478021414181014780394141828R_302_RESP_J 30401478050414191014780684141928R_302_RESP_K 30501478079414201014780974142028R_303_RESP_A 30601478108414211014781264142128R_303_RESP_B 30701478137414221014781554142228R_303_RESP_C 30801478166414231014781844142328R_303_RESP_D 30901478195414241014782134142428R_303_RESP_E 31001478224414251014782424142528R_303_RESP_F 31101478253414261014782714142628R_303_RESP_G 31201478282414271014783004142728R_303_RESP_H 31301478311414281014783294142828R_303_RESP_I 31401478340414291014783584142928R_303_RESP_J 31501478369414301014783874143028R_303_RESP_K 31601478398414311014784164143128R_303_RESP_L 31701478427414321014784454143228R_303_RESP_M 31801478456414331014784744143328R_303_RESP_N 31901478485414341014785034143428R_303_RESP_O 32001478514414351014785324143528R_303_RESP_P 32101478543414361014785614143628R_303_RESP_Q 32201478572414371014785904143728R_303_RESP_R 32301478601414381014786194143828R_303_RESP_S 32401478630414391014786484143928R_303_RESP_T 32501478659414401014786774144028R_303_RESP_U 32601478688414411014787064144128R_303_RESP_V 32701478717414421014787354144228R_303_RESP_W 32801478746414431014787644144328R_303_RESP_X 32901478775414441014787934144428R_304_RESP_A 33001478804414451014788224144528R_304_RESP_B 33101478833414461014788514144628R_304_RESP_C 33201478862414471014788804144728R_304_RESP_D 33301478891414481014789094144828R_304_RESP_E 33401478920414491014789384144928R_304_RESP_F 33501478949414501014789674145028R_305_RESP_A 33601478978414511014789964145128R_306_RESP_A 33701479007414521014790254145228R_306_RESP_B 33801479036414531014790544145328R_306_RESP_C 33901479065414541014790834145428R_306_RESP_D 34001479094414551014791124145528R_307_RESP_A 34101479123414561014791414145628R_307_RESP_B 34201479152414571014791704145728R_307_RESP_C 34301479181414581014791994145828R_307_RESP_D 34401479210414591014792284145928R_307_RESP_E 34501479239414601014792574146028R_307_RESP_F 34601479268414611014792864146128R_307_RESP_G 34701479297414621014793154146228R_307_RESP_H 34801479326414631014793444146328R_308_RESP_A 34901479355414641014793734146428R_309_RESP_A 35001479384414651014794024146528R_309_RESP_B 35101479413414661014794314146628R_309_RESP_C 35201479442414671014794604146728R_312_RESP_A 35301479471414681014794894146828R_312_RESP_B 35401479500414691014795184146928R_314_RESP_A 35501479529414701014795474147028R_314_RESP_B 35601479558414711014795764147128R_314_RESP_C 35701479587414721014796054147228R_320_RESP_A 35801479616414731014796344147328R_320_RESP_B 35901479645414741014796634147428R_320_RESP_C 36001479674414751014796924147528R_320_RESP_D 36101479703414761014797214147628R_320_RESP_E 36201479732414771014797504147728R_320_RESP_F 36301479761414781014797794147828R_323_RESP_A 36401479790414791014798084147928R_324_RESP_A 36501479819414801014798374148028R_324_RESP_B 36601479848414811014798664148128R_325_RESP_A 36701479877414821014798954148228R_325_RESP_B 36801479906414831014799244148328R_326_RESP_A 36901479935414841014799534148428R_326_RESP_B 37001479964414851014799824148528R_327_RESP_A 37101479993414861014800114148628R_327_RESP_B 37201480022414871014800404148728R_328_RESP_A 37301480051414881014800694148828R_328_RESP_B 37401480080414891014800984148928R_328_RESP_C 37501480109414901014801274149028R_329_RESP_A 37601480138414911014801564149128R_329_RESP_B 37701480167414921014801854149228R_329_RESP_C 37801480196414931014802144149328R_331_RESP_A 37901480225414941014802434149428R_331_RESP_B 38001480254414951014802724149528R_331_RESP_C 38101480283414961014803014149628R_331_RESP_D 38201480312414971014803304149728R_331_RESP_E 38301480341414981014803594149828R_333_RESP_A 38401480370414991014803884149928R_335_RESP_A 38501480399415001014804174150028R_337_RESP_A 38601480428415011014804464150128R_339_RESP_A 38701480457415021014804754150228R_341_RESP_A 38801480486415031014805044150328R_342_RESP_A 38901480515415041014805334150428R_342_RESP_B 39001480544415051014805624150528R_342_RESP_C 39101480573415061014805914150628R_342_RESP_D 39201480602415071014806204150728NO_RESPONSES 39201480631415081014806494150828ResponseTexts 52735515764false014806514150911484100415103426PrintResponse 287217 2872179681014841044151131516287419062R0 28722201484160415145 287229014841834151428 28724701484245415155 287254014842684151528 28727201484333415165 287279014843564151628 28729701484421415175 287304014844444151728 28732201484513415185 287329014845364151828 28734701484602415195 287354014846254151928 28737201484700415205 287379014847234152028 28739701484800415215 287404014848234152128 28742201484896415225 287429014849194152228 28744701484993415235 287454014850164152328 28747201485089415245 287479014851124152428 28749701485187415255 287504014852104152528 28752201485280415265 287529014853034152628 28754701485373415275 287554014853964152728 28757201485466415285 287579014854894152828 28759701485559415295 287604014855824152928 28762201485652415305 287629014856754153028 28764701485745415315 287654014857684153128 28767201485838415325 287679014858614153228 28769701485931415335 287704014859544153328 28772201486024415345 287729014860474153428 28774701486117415355 287754014861404153528 28777201486210415365 287779014862334153628 28779701486303415375 287804014863264153728 28782201486396415385 287829014864194153828 28784701486489415395 287854014865124153928 28787201486582415405 287879014866054154028 28789701486675415415 287904014866984154128 28792201486768415425 287929014867914154228 28794701486861415435 287954014868844154328 28797201486954415445 287979014869774154428 28799701487047415455 288004014870704154528 28802201487140415465 288029014871634154628 28804701487233415475 288054014872564154728 28807201487326415485 288079014873494154828 28809701487419415495 288104014874424154928 28812201487512415505 288129014875354155028 28814701487611415515 288154014876344155128 28817201487710415525 288179014877334155228 28819701487809415535 288204014878324155328 28822201487908415545 288229014879314155428 28824701488007415555 288254014880304155528 28827201488106415565 288279014881294155628 28829701488205415575 288304014882284155728 28832201488304415585 288329014883274155828 28834701488403415595 288354014884264155928 28837201488502415605 288379014885254156028 28839701488601415615 288404014886244156128 28842201488695415625 288429014887184156228 28844701488789415635 288454014888124156328 28847201488883415645 288479014889064156428 28849701488977415655 288504014890004156528 28852201489071415665 288529014890944156628 28854701489165415675 288554014891884156728 28857201489259415685 288579014892824156828 28859701489353415695 288604014893764156928 28862201489447415705 288629014894704157028 28864701489541415715 288654014895644157128 28867201489635415725 288679014896584157228 28869701489729415735 288704014897524157328 28872201489823415745 288729014898464157428 28874701489917415755 288754014899404157528 28877201490011415765 288779014900344157628 28879701490105415775 288804014901284157728 28882201490199415785 288829014902224157828 28884701490293415795 288854014903164157928 28887201490387415805 288879014904104158028 28889701490481415815 288904014905044158128 28892201490575415825 288929014905984158228 28894701490669415835 288954014906924158328 28897201490763415845 288979014907864158428 28899701490857415855 289004014908804158528 28902201490953415865 289029014909764158628 28904701491049415875 289054014910724158728 28907201491145415885 289079014911684158828 28909701491241415895 289104014912644158928 28912201491337415905 289129014913604159028 28914701491433415915 289154014914564159128 28917201491528415925 289179014915514159228 28919701491624415935 289204014916474159328 28922201491720415945 289229014917434159428 28924701491816415955 289254014918394159528 28927201491912415965 289279014919354159628 28929701492007415975 289304014920304159728 28932201492102415985 289329014921254159828 28934701492197415995 289354014922204159928 28937201492292416005 289379014923154160028 28939701492387416015 289404014924104160128 28942201492482416025 289429014925054160228 28944701492577416035 289454014926004160328 28947201492672416045 289479014926954160428 28949701492772416055 289504014927954160528 28952201492871416065 289529014928944160628 28954701492970416075 289554014929934160728 28957201493069416085 289579014930924160828 28959701493166416095 289604014931894160928 28962201493263416105 289629014932864161028 28964701493359416115 289654014933824161128 28967201493455416125 289679014934784161228 28969701493551416135 289704014935744161328 28972201493640416145 289729014936634161428 28974701493729416155 289754014937524161528 28977201493818416165 289779014938414161628 28979701493907416175 289804014939304161728 28982201493996416185 289829014940194161828 28984701494085416195 289854014941084161928 28987201494171416205 289879014941944162028 28989701494257416215 289904014942804162128 28992201494343416225 289929014943664162228 28994701494432416235 289954014944554162328 28997201494521416245 289979014945444162428 28999701494610416255 290004014946334162528 29002201494699416265 290029014947224162628 29004701494793416275 290054014948164162728 29007201494887416285 290079014949104162828 29009701494980416295 290104014950034162928 29012201495073416305 290129014950964163028 29014701495166416315 290154014951894163128 29017201495260416325 290179014952834163228 29019701495354416335 290204014953774163328 29022201495448416345 290229014954714163428 29024701495535416355 290254014955584163528 29027201495622416365 290279014956454163628 29029701495709416375 290304014957324163728 29032201495796416385 290329014958194163828 29034701495883416395 290354014959064163928 29037201495978416405 290379014960014164028 29039701496075416415 290404014960984164128 29042201496173416425 290429014961964164228 29044701496266416435 290454014962894164328 29047201496360416445 290479014963834164428 29049701496458416455 290504014964814164528 29052201496556416465 290529014965794164628 29054701496654416475 290554014966774164728 29057201496752416485 290578014967744164827 29059601496826416495 290602014968484164927 29062001496900416505 290626014969224165027 29064401496974416515 290650014969964165127 29066801497048416525 290674014970704165227 29069201497122416535 290698014971444165327 29071601497196416545 290722014972184165427 29074001497270416555 290746014972924165527 29076401497344416565 290770014973664165627 29078801497418416575 290794014974404165727 29081201497492416585 290818014975144165827 29083601497566416595 290842014975884165927 29086001497640416605 290866014976624166027 29088401497714416615 290890014977364166127 29090801497788416625 290914014978104166227 29093201497862416635 290938014978844166327 29095601497936416645 290962014979584166427 29098001498010416655 290986014980324166527 29100401498085416665 291010014981074166627 29102801498160416675 291034014981824166727 29105201498235416685 291058014982574166827 29107601498310416695 291082014983324166927 29110001498385416705 291106014984074167027 29112401498460416715 291130014984824167127 29114801498535416725 291154014985574167227 29117201498610416735 291178014986324167327 29119601498685416745 291202014987074167427 29122001498760416755 291226014987824167527 29124401498835416765 291250014988574167627 29126801498910416775 291274014989324167727 29129201498985416785 291298014990074167827 29131601499060416795 291322014990824167927 29134001499135416805 291346014991574168027 29136401499210416815 291370014992324168127 29138801499285416825 291394014993074168227 29141201499360416835 291418014993824168327 29143601499435416845 291442014994574168427 29146001499510416855 291466014995324168527 29148401499585416865 291490014996074168627 29150801499660416875 291514014996824168727 29153201499735416885 291538014997574168827 29155601499810416895 291562014998324168927 29158001499885416905 291586014999074169027 29160401499960416915 291610014999824169127 29162801500035416925 291634015000574169227 29165201500110416935 291658015001324169327 29167601500185416945 291682015002074169427 29170001500260416955 291706015002824169527 29172401500335416965 291730015003574169627 29174801500410416975 291754015004324169727 29177201500485416985 291778015005074169827 29179601500560416995 291802015005824169927 29182001500635417005 291826015006574170027 29184401500710417015 291850015007334170128 29186801500786417025 291874015008094170228 29189201500862417035 291898015008854170328 29191601500938417045 291922015009614170428 29194001501014417055 291946015010374170528 29196401501090417065 291970015011134170628 29198801501166417075 291994015011894170728 29201201501242417085 292018015012654170828 29203601501318417095 292042015013414170928 29206001501394417105 292066015014174171028 29208401501470417115 292090015014934171128 29210801501546417125 292114015015694171228 29213201501622417135 292138015016454171328 29215601501698417145 292162015017214171428 29218001501774417155 292186015017974171528 29220401501850417165 292210015018734171628 29222801501926417175 292234015019494171728 29225201502002417185 292258015020254171828 29227601502078417195 292282015021014171928 29230001502154417205 292306015021774172028 29232401502230417215 292330015022534172128 29234801502306417225 292354015023294172228 29237201502382417235 292378015024054172328 29239601502458417245 292402015024814172428 29242001502534417255 292426015025574172528 29244401502610417265 292450015026334172628 29246801502686417275 292474015027094172728 29249201502762417285 292498015027854172828 29251601502838417295 292522015028614172928 29254001502914417305 292546015029374173028 29256401502990417315 292570015030134173128 29258801503066417325 292594015030894173228 29261201503142417335 292618015031654173328 29263601503218417345 292642015032414173428 29266001503294417355 292666015033174173528 29268401503370417365 292690015033934173628 29270801503446417375 292714015034694173728 29273201503522417385 292738015035454173828 29275601503598417395 292762015036214173928 29278001503674417405 292786015036974174028 29280401503750417415 292810015037734174128 29282801503826417425 292834015038494174228 29285201503902417435 292858015039254174328 29287601503978417445 292882015040014174428 29290001504054417455 292906015040774174528 29292401504130417465 292930015041534174628 29294801504206417475 292954015042294174728 29297201504282417485 292978015043054174828 29299601504358417495 293002015043814174928 29302001504434417505 293026015044574175028 29304401504510417515 293050015045334175128 29306801504586417525 293074015046094175228 29309201504662417535 293098015046854175328 29311601504738417545 293122015047614175428 29314001504814417555 293146015048374175528 29316401504890417565 293170015049134175628 29318801504966417575 293194015049894175728 29321201505042417585 293218015050654175828 29323601505118417595 293242015051414175928 29326001505194417605 293266015052174176028 29328401505270417615 293290015052934176128 29330801505346417625 293314015053694176228 29333201505422417635 293338015054454176328 29335601505498417645 293362015055214176428 29338001505574417655 293386015055974176528 29340401505650417665 293410015056734176628 29342801505726417675 293434015057494176728 29345201505802417685 293458015058254176828 29347601505878417695 293482015059014176928 29350001505954417705 293506015059774177028 29352401506030417715 293530015060534177128 29354801506106417725 293554015061294177228 29357201506182417735 293578015062054177328 29359601506258417745 293602015062814177428 29362001506334417755 293627015063574177528 29364501506410417765 293652015064334177628 29367001506486417775 293677015065094177728 29369501506562417785 293702015065854177828 29372001506638417795 293727015066614177928 29374501506714417805 293752015067374178028 29377001506790417815 293777015068134178128 29379501506866417825 293802015068894178228 29382001506942417835 293827015069654178328 29384501507018417845 293852015070414178428 29387001507094417855 293877015071174178528 29389501507170417865 293902015071934178628 29392001507246417875 293927015072694178728 29394501507322417885 293952015073454178828 29397001507398417895 293977015074214178928 29399501507474417905 294002015074974179028 29402001507550417915 294027015075734179128 29404501507626417925 294052015076494179228 29407001507702417935 294077015077254179328 29409501507778417945 294102015078014179428 29412001507854417955 294127015078774179528 29414501507930417965 294152015079534179628 29417001508006417975 294177015080294179728 29419501508082417985 294202015081054179828 29422001508158417995 294227015081814179928 29424501508234418005 294252015082574180028 29427001508310418015 294277015083334180128 29429501508386418025 294302015084094180228 29432001508462418035 294327015084854180328 29434501508538418045 294352015085614180428 29437001508614418055 294377015086374180528 29439501508690418065 294402015087134180628 29442001508766418075 294427015087894180728 29444501508842418085 294452015088654180828 29447001508918418095 294477015089414180928 29449501508994418105 294502015090174181028 29452001509070418115 294527015090934181128 29454501509146418125 294552015091694181228 29457001509222418135 294577015092454181328 29459501509298418145 294602015093214181428 29462001509374418155 294627015093974181528 29464501509450418165 294652015094734181628 29467001509526418175 294677015095494181728 29469501509602418185 294702015096254181828 29472001509678418195 294727015097014181928 29474501509754418205 294752015097774182028 29477001509830418215 294777015098534182128 29479501509906418225 294802015099294182228 29482001509982418235 294827015100054182328 29484501510058418245 294852015100814182428 29487001510134418255 294877015101574182528 29489501510210418265 294902015102334182628 29492001510286418275 294927015103094182728 29494501510362418285 294952015103854182828 29497001510438418295 294977015104614182928 29499501510514418305 295002015105374183028 29502001510590418315 295027015106134183128 29504501510666418325 295052015106894183228 29507001510742418335 295077015107654183328 29509501510818418345 295102015108414183428 29512001510894418355 295127015109174183528 29514501510970418365 295152015109934183628 29517001511046418375 295177015110694183728 29519501511122418385 295202015111454183828 29522001511198418395 295227015112214183928 29524501511274418405 295252015112974184028 29527001511350418415 295277015113734184128 29529501511426418425 295302015114494184228 29532001511502418435 295327015115254184328 29534501511578418445 295352015116014184428 29537001511654418455 295377015116774184528 29539501511730418465 295402015117534184628 29542001511806418475 295427015118294184728 29544501511882418485 295452015119054184828 29547001511958418495 295477015119814184928 29549501512034418505 295502015120574185028 29552001512110418515 295527015121334185128 29554501512186418525 295552015122094185228 29557001512262418535 295577015122854185328 29559501512338418545 295602015123614185428 29562001512414418555 295627015124374185528 29564501512490418565 295652015125134185628 29567001512566418575 295677015125894185728 29569501512642418585 295702015126654185828 29572001512718418595 295727015127414185928 29574501512794418605 295752015128174186028 29577001512870418615 295777015128934186128 29579501512946418625 295802015129694186228 29582001513022418635 295827015130454186328 29584501513098418645 295852015131214186428 29587001513174418655 295877015131974186528 29589501513250418665 295902015132734186628 29592001513326418675 295927015133494186728 29594501513402418685 295952015134254186828 29597001513478418695 295977015135014186928 29599501513554418705 296002015135774187028 29602001513630418715 296027015136534187128 29604501513706418725 296052015137294187228 29607001513782418735 296077015138054187328 29609501513858418745 296102015138814187428 29612001513934418755 296127015139574187528 29614501514010418765 296152015140334187628 29617001514086418775 296177015141094187728 29619501514162418785 296202015141854187828 29622001514238418795 296227015142614187928 29624501514314418805 296252015143374188028 29627001514390418815 296277015144134188128 29629501514466418825 296302015144894188228 29632001514542418835 296327015145654188328 29634501514618418845 296352015146414188428 29637001514694418855 296377015147174188528 29639501514770418865 296402015147934188628 29642001514846418875 296427015148694188728 29644501514922418885 296452015149454188828 29647001514998418895 296477015150214188928 29649501515074418905 296502015150974189028 29652001515150418915 296527015151734189128 29654501515226418925 296552015152494189228 29657001515302418935 296577015153254189328 29659501515378418945 296602015154014189428 29662001515454418955 296627015154774189528 29664501515530418965 296652015155534189628 29667001515606418975 296677015156294189728 29669501515682418985 296702015157054189828 29672001515758418995 296727015157814189928 29674501515834419005 296752015158574190028 29677001515910419015 296777015159334190128 29679501515986419025 296802015160094190228 29682001516062419035 296827015160854190328 29684501516138419045 296852015161614190428 29687001516214419055 296877015162374190528 29689501516286419061STANDARD_RESPONSE_ISSUING_R 296898 29689883015162914190731516401419092 29690101516325419085 296908015163504190830 29697801516400419091ResponseDivisions 528931244false0151640341910115164674191210R_TX_S_0 296981 296981175015164714191331517686419382 296984015165004191419 296989015165344191453 296995015166774191566 29699801516851419185 29700201516874419195 297009015168894191920 29701601516921419205 297023015169364192020 29702901516961419215 297048015170094192153 29705201517034419225 297059015170494192220 29706501517104419246 297072015171534192455 29707501517185419255 297082015172004192520 29708801517283419285 297095015172984192820 29710101517367419306 297108015174164193055 29711101517449419315 297118015174644193120 29712401517496419336 29712701517542419345 297134015175574193420 29714001517630419375 297147015176454193720 297153015176784193753TX_S_0 52895584false0151768841939115177424193955R_TX_S_1 297156 29715651015177464194031518262419472 297159015177754194119 297164015178094194153 2971700151789441941138 29717301518014419445 29717701518081419455 297184015180964194520 29719001518188419465 297197015182034194620 297204015182544194671TX_S_1 52896384false0151826441948115183184194855R_TX_S_2 297207 29720737015183224194931518578419552 297210015183514195019 297215015183854195053 297221015184114195079 29722401518472419535 29722801518509419545 297235015185244195420 297241015185704195466TX_S_2 52897184false0151858041956115186344195655R_TX_S_3 297244 29724437015186384195731519002419632 297247015186674195819 297252015187014195853 2972580151875441958106 29726101518842419615 29726501518906419625 297272015189214196220 297278015189944196293TX_S_3 52897984false0151900441964115190584196455R_TX_S_4 297281 297281159015190624196531519799419782 297284015190914196619 297289015191254196653 2972950151918941966117 29729801519288419695 29730201519311419705 297309015193264197020 29731601519358419715 297323015193734197120 29732901519398419725 297348015194464197253 29735201519487419735 297359015195024197320 29736501519542419745 297372015195574197420 29737901519589419755 297386015196044197520 29739201519635419765 297420015197024197672 29742401519735419775 297431015197504197720 297437015197914197761TX_S_4 52898784false0151980141979115198554197955R_TX_S_5 297440 29744090015198594198031520343419892 297443015198884198119 297448015199224198153 2974540151997241981103 29745701520057419845 29746101520086419855 297468015201014198520 29747801520133419865 297485015201484198620 29749101520174419875 297510015202224198753 29751401520267419885 297521015202824198820 297527015203354198873TX_S_5 52899584false0152034541990115203994199055R_TX_S_6 297530 29753090015204034199131520876420002 297533015204324199219 297538015204664199253 2975440152051341992100 29754701520595419955 29755101520624419965 297558015206394199620 29756801520671419975 297575015206864199720 29758101520711419985 297600015207594199853 29760401520802419995 297611015208174199920 297617015208684199971TX_S_6 52900384false0152087842001115209324200155R_TX_S_7 297620 297620104015209364200231521491420122 297623015209654200319 297628015209994200353 2976340152105842003112 29763701521152420065 29764101521191420075 297648015212064200720 29765801521251420085 297665015212664200820 29767201521298420095 297679015213134200920 29768501521341420105 297704015213904201054 29770801521425420115 297715015214404201120 297721015214834201163TX_S_7 52901184false0152149342013115215474201355R_TX_S_8 297724 29772490015215514201431521982420232 297727015215804201519 297732015216144201553 297738015216514201590 29774101521723420185 29774501521752420195 297752015217674201920 29776201521799420205 297769015218144202020 29777501521842420215 297794015218914202154 29779801521921420225 297805015219364202220 297811015219744202258TX_S_8 52901984false0152198442024115220384202455R_TX_S_9 297814 297814117015220424202531522590420362 297817015220714202619 297822015221054202653 2978280152215242026100 29783101522234420295 29783501522257420305 297842015222724203020 29784901522304420315 297856015223194203120 29786201522346420325 297881015223954203254 29788501522431420335 297892015224464203320 29789801522487420345 297905015225024203420 29791501522534420355 297922015225494203520 297928015225824203553TX_S_9 52902784false0152259242037115226464203755R_TX_S_10 297931 29793190015226504203831523082420472 297934015226804203919 297939015227144203953 297945015227514203990 29794801522823420425 29795201522852420435 297959015228674204320 29796901522899420445 297976015229144204420 29798201522942420455 298001015229914204554 29800501523021420465 298012015230364204620 298018015230744204658TX_S_10 52903584false0152308442048115231404204857R_TX_S_11 298021 29802137015231444204931523353420552 298024015231744205019 298029015232084205053 298035015232224205067 29803801523271420535 29804201523296420545 298049015233114205420 298055015233454205454TX_S_11 52904384false0152335542056115234114205657R_TX_S_12 298058 29805837015234154205731523620420632 298061015234454205819 298066015234794205853 298072015234924205866 29807501523540420615 29807901523564420625 298086015235794206220 298092015236124206253TX_S_12 52905184false0152362242064115236784206457R_TX_S_13 298095 29809537015236824206531523903420712 298098015237124206619 298103015237464206653 298109015237634206670 29811201523815420695 29811601523843420705 298123015238584207020 298129015238954207057TX_S_13 52905984false0152390542072115239614207257R_TX_S_14 298132 29813237015239654207331524226420792 298135015239954207419 298140015240294207453 298146015240564207480 29814901524118420775 29815301524156420785 298160015241714207820 298166015242184207867TX_S_14 52906784false0152422842080115242844208057R_TX_S_15 298169 29816937015242884208131524513420872 298172015243184208219 298177015243524208253 298183015243704208271 29818601524423420855 29819001524452420865 298197015244674208620 298203015245054208658TX_S_15 52907584false0152451542088115245714208857R_TX_S_16 298206 29820637015245754208931524796420952 298209015246054209019 298214015246394209053 298220015246564209070 29822301524708420935 29822701524736420945 298234015247514209420 298240015247884209457TX_S_16 52908384false0152479842096115248544209657R_TX_S_17 298243 29824337015248584209731525123421032 298246015248884209819 298251015249224209853 298257015249504209881 29826001525013421015 29826401525052421025 298271015250674210220 298277015251154210268TX_S_17 52909184false0152512542104115251814210457R_TX_S_18 298280 29828037015251854210531525490421112 298283015252154210619 298288015252494210653 298294015252874210691 29829701525360421095 29830101525409421105 298308015254244211020 298314015254824211078TX_S_18 52909984false0152549242112115255484211257R_TX_S_19 298317 29831737015255524211331525853421192 298320015255824211419 298325015256164211453 298331015256534211490 29833401525725421175 29833801525773421185 298345015257884211820 298351015258454211877TX_S_19 52910784false0152585542120115259114212057R_TX_S_20 298354 29835478015259154212131526548421332 298357015259454212219 298362015259794212253 2983680152606742122141 29837101526190421255 29837501526226421265 298382015262414212620 29838801526309421286 298400015263434212840 29840301526372421295 298410015263874212920 29841601526473421325 298423015264884213220 298429015265404213272TX_S_20 52911584false0152655042134115266064213457R_TX_S_21 298432 29843237015266104213531526931421412 298435015266404213619 298440015266744213653 298446015267164213695 29844901526793421395 29845301526846421405 298460015268614214020 298466015269234214082TX_S_21 52912384false0152693342142115269894214257R_TX_S_22 298469 29846937015269934214331527234421492 298472015270234214419 298477015270574214453 298483015270794214475 29848601527136421475 29849001527169421485 298497015271844214820 298503015272264214862TX_S_22 52913184false0152723642150115272924215057R_TX_S_23 298506 29850637015272964215131527513421572 298509015273264215219 298514015273604215253 298520015273764215269 29852301527427421555 29852701527454421565 298534015274694215620 298540015275054215656TX_S_23 52913984false0152751542158115275714215857R_TX_S_24 298543 29854337015275754215931527832421652 298546015276054216019 298551015276394216053 298557015276654216079 29856001527726421635 29856401527763421645 298571015277784216420 298577015278244216466TX_S_24 52914784false0152783442166115278904216657R_TX_S_25 298580 29858037015278944216731528119421732 298583015279244216819 298588015279584216853 298594015279764216871 29859701528029421715 29860101528058421725 298608015280734217220 298614015281114217258TX_S_25 52915584false0152812142174115281774217457R_TX_S_26 298617 29861737015281814217531528450421812 298620015282114217619 298625015282454217653 298631015282744217682 29863401528338421795 29863801528378421805 298645015283934218020 298651015284424218069TX_S_26 52916384false0152845242182115285084218257R_TX_S_27 298654 29865437015285124218331528753421892 298657015285424218419 298662015285764218453 298668015285984218475 29867101528655421875 29867501528688421885 298682015287034218820 298688015287454218862TX_S_27 52917184false0152875542190115288114219057R_TX_S_28 298691 29869199015288154219131529450422062 298694015288454219219 298699015288794219253 2987050152894842192122 29870801529052421955 29871201529078421965 298719015290934219620 29872501529142421986 298742015291804219844 29874501529212421995 298752015292274219920 29875801529263422016 29876101529308422025 298768015293234220220 29877401529394422055 298781015294094220520 298787015294424220553TX_S_28 52917984false0152945242207115295084220757R_TX_S_29 298790 29879099015295124220831530183422232 298793015295424220919 298798015295764220953 2988040152965442209131 29880701529767422125 29881101529802422135 298818015298174221320 29882401529875422156 298841015299134221544 29884401529945422165 298851015299604221620 29885701529996422186 29886001530041422195 298867015300564221920 29887301530127422225 298880015301424222220 298886015301754222253TX_S_29 52918784false0153018542224115302414222457R_TX_S_30 298889 29888999015302454222531530880422402 298892015302754222619 298897015303094222653 2989030153037842226122 29890601530482422295 29891001530508422305 298917015305234223020 29892301530572422326 298940015306104223244 29894301530642422335 298950015306574223320 29895601530693422356 29895901530738422365 298966015307534223620 29897201530824422395 298979015308394223920 298985015308724223953TX_S_30 52919584false0153088242241115309384224157R_TX_S_31 298988 29898899015309424224231531601422572 298991015309724224319 298996015310064224353 2990020153108142243128 29900501531191422465 29900901531223422475 299016015312384224720 29902201531293422496 299039015313314224944 29904201531363422505 299049015313784225020 29905501531414422526 29905801531459422535 299065015314744225320 29907101531545422565 299078015315604225620 299084015315934225653TX_S_31 52920384false0153160342258115316594225857R_TX_S_32 299087 29908761015316634225931532048422662 299090015316934226019 299095015317274226053 2991010153177742260103 29910401531862422635 29910801531914422645 299115015319294226420 29912201531959422655 299141015320074226553 299145015320404226586TX_S_32 52921184false0153205042267115321064226757R_TX_S_33 299148 29914874015321104226831532565422762 299151015321404226919 299156015321744226953 2991620153223242269111 29916501532325422725 29916901532377422735 299176015323924227320 29918301532422422745 299202015324704227453 29920601532502422755 299213015325174227520 299219015325574227560TX_S_33 52921984false0153256742277115326234227757R_TX_S_34 299222 29922237015326274227831532856422842 299225015326574227919 299230015326914227953 299236015327104227972 29923901532764422825 29924301532794422835 299250015328094228320 299256015328484228359TX_S_34 52922784false0153285842285115329144228557R_TX_S_35 299259 29925937015329184228631533147422922 299262015329484228719 299267015329824228753 299273015330014228772 29927601533055422905 29928001533085422915 299287015331004229120 299293015331394229159TX_S_35 52923584false0153314942293115332054229357R_TX_S_36 299296 29929693015332094229431534154423062 299299015332394229519 299304015332734229553 299310015334484229717 29931301533650423005 29931701533678423015 299324015336934230120 29933001533810423025 299337015338254230220 29934301533947423035 299350015339624230320 29936001534021423045 299367015340364230420 29937301534098423055 299380015341134230520 299386015341464230553TX_S_36 52924384false0153415642307115342124230757R_TX_S_37 299389 29938937015342164230831534513423142 299392015342464230919 299397015342804230953 299403015343164230989 29940601534387423125 29941001534434423135 299417015344494231320 299423015345054231376TX_S_37 52925184false0153451542315115345714231557R_TX_S_38 299426 29942637015345754231631534884423222 299429015346054231719 299434015346394231753 299440015346784231792 29944301534752423205 29944701534802423215 299454015348174232120 299460015348764232179TX_S_38 52925984false0153488642323115349424232357R_TX_S_39 299463 29946337015349464232431535239423302 299466015349764232519 299471015350104232553 299477015350454232588 29948001535115423285 29948401535161423295 299491015351764232920 299497015352314232975TX_S_39 52926784false0153524142331115352974233157R_TX_S_40 299500 29950037015353014233231535606423382 299503015353314233319 299508015353654233353 299514015354034233391 29951701535476423365 29952101535525423375 299528015355404233720 299534015355984233778TX_S_40 52927584false0153560842339115356644233957R_TX_S_41 299537 29953737015356684234031535989423462 299540015356984234119 299545015357324234153 299551015357744234195 29955401535851423445 29955801535904423455 299565015359194234520 299571015359814234582TX_S_41 52928384false0153599142347115360474234757R_TX_S_42 299574 29957437015360514234831536384423542 299577015360814234919 299582015361154234953 299588015361604234998 29959101536240423525 29959501536296423535 299602015363114235320 299608015363764235385TX_S_42 52929184false0153638642355115364424235557R_TX_S_43 299611 29961137015364464235631536767423622 299614015364764235719 299619015365104235753 299625015365524235795 29962801536629423605 29963201536682423615 299639015366974236120 299645015367594236182TX_S_43 52929984false0153676942363115368254236357R_TX_S_44 299648 29964837015368294236431537162423702 299651015368594236519 299656015368934236553 299662015369384236598 29966501537018423685 29966901537074423695 299676015370894236920 299682015371544236985TX_S_44 52930784false0153716442371115372204237157R_TX_S_45 299685 29968537015372244237231537757423792 299688015372544237319 299693015372884237353 299699015373864237420 29970201537515423775 29970601537620423785 299713015376354237820 2997190153774942378134TX_S_45 52931584false0153775942380115378154238057R_TX_S_46 299722 29972237015378194238131538168423872 299725015378494238219 299730015378834238253 2997360153793242382102 29973901538016423855 29974301538076423865 299750015380914238620 299756015381604238689TX_S_46 52932384false0153817042388115382264238857R_TX_S_47 299759 29975937015382304238931538567423952 299762015382604239019 299767015382944239053 299773015383404239099 29977601538421423935 29978001538478423945 299787015384934239420 299793015385594239486TX_S_47 52933184false0153856942396115386254239657R_TX_S_48 299796 29979637015386294239731539002424032 299799015386594239819 299804015386934239853 2998100153874842398108 29981301538838424015 29981701538904424025 299824015389194240220 299830015389944240295TX_S_48 52933984false0153900442404115390604240457R_TX_S_49 299833 29983337015390644240531539457424112 299836015390944240619 299841015391284240653 2998470153918842406113 29985001539283424095 29985401539354424105 299861015393694241020 2998670153944942410100TX_S_49 52934784false0153945942412115395154241257R_TX_S_50 299870 29987037015395194241331539848424192 299873015395494241419 299878015395834241453 299884015396274241497 29988701539706424175 29989101539761424185 299898015397764241820 299904015398404241884TX_S_50 52935584false0153985042420115399064242057R_TX_S_51 299907 29990787015399104242131540377424302 299910015399404242219 299915015399744242253 299921015400184242297 29992401540097424255 29992801540120424265 299935015401354242620 29994201540167424275 299949015401824242720 29995501540209424285 299974015402584242854 29997801540302424295 299985015403174242920 299991015403694242972TX_S_51 52936384false0154037942431115404354243157R_TX_S_52 299994 29999437015404394243231540772424382 299997015404694243319 300002015405034243353 300008015405484243398 30001101540628424365 30001501540684424375 300022015406994243720 300028015407644243785TX_S_52 52937184false0154077442439115408304243957R_TX_S_53 300031 30003187015408344244031541280424492 300034015408644244119 300039015408984244153 300045015409374244192 30004801541011424445 30005201541034424455 300059015410494244520 30006601541081424465 300073015410964244620 30007901541124424475 300098015411734244754 30010201541211424485 300109015412264244820 300115015412724244866TX_S_53 52937984false0154128242450115413384245057R_TX_S_54 300118 30011837015413424245131541727424572 300121015413724245219 300126015414064245253 3001320154146442452111 30013501541557424555 30013901541626424565 300146015416414245620 300152015417194245698TX_S_54 52938784false0154172942458115417854245857R_TX_S_55 300155 30015537015417894245931542186424652 300158015418194246019 300163015418534246053 3001690154191442460114 30017201542010424635 30017601542082424645 300183015420974246420 3001890154217842464101TX_S_55 52939584false0154218842466115422444246657R_TX_S_56 300192 30019293015422484246731542829424772 300195015422784246819 300200015423124246853 3002060154238742468128 30020901542497424715 30021301542538424725 300220015425534247220 30022601542593424735 300233015426084247320 30023901542656424745 300246015426714247420 30025601542713424755 300263015427284247520 30026901542763424765 300276015427784247620 300282015428214247663TX_S_56 52940384false0154283142478115428874247857R_TX_S_57 300285 300285173015428914247931543746424942 300288015429214248019 300293015429554248053 3002990154304642480144 30030201543172424835 30030601543195424845 300313015432104248420 30032001543242424855 300327015432574248520 30033301543284424865 300352015433334248654 30035601543362424875 300363015433774248720 30036901543404424885 300376015434194248820 30038201543467424895 300389015434824248920 30039901543524424905 300406015435394249020 30041201543565424915 300419015435804249120 30042501543612424925 300432015436274249220 30044201543675424935 300449015436904249320 300455015437384249368TX_S_57 52941184false0154374842495115438044249557R_TX_S_58 300458 30045837015438084249631544181425022 300461015438384249719 300466015438724249753 3004720154392742497108 30047501544017425005 30047901544083425015 300486015440984250120 300492015441734250195TX_S_58 52941984false0154418342503115442394250357R_TX_S_59 300495 30049537015442434250431544612425102 300498015442734250519 300503015443074250553 3005090154436142505107 30051201544450425085 30051601544515425095 300523015445304250920 300529015446044250994TX_S_59 52942784false0154461442511115446704251157R_TX_S_60 300532 30053294015446744251231545452425282 300535015447044251319 300540015447384251353 300546015448504251454 30054901544993425175 30055301545036425185 300560015450514251820 30056601545130425206 300578015451644252040 30058101545201425215 300588015452164252120 30059401545257425236 30059701545306425245 300604015453214252420 30061001545396425275 300617015454114252720 300623015454444252753TX_S_60 52943584false0154545442529115455104252957R_TX_S_61 300626 30062637015455144253031545991425362 300629015455444253119 300634015455784253153 3006400154565942531134 30064301545775425345 30064701545867425355 300654015458824253520 3006600154598342535121TX_S_61 52944384false0154599342537115460494253757R_TX_S_62 300663 30066337015460534253831546422425442 300666015460834253919 300671015461174253953 3006770154617142539107 30068001546260425425 30068401546325425435 300691015463404254320 300697015464144254394TX_S_62 52945184false0154642442545115464804254557R_TX_S_63 300700 300700150015464844254631547580425652 300703015465144254719 300708015465484254753 300714015467064254867 30071701546895425515 30072101546943425536 300726015469774255340 30072901547009425545 300736015470244255420 30074201547060425566 30074501547105425575 300752015471204255720 30075801547172425585 300765015471874255820 30078101547291425615 300788015473064256120 30079401547368425625 300801015473834256220 30081101547430425635 300830015474784256353 30083401547514425645 300841015475294256420 300847015475724256463TX_S_63 52945984false0154758242566115476384256657R_TX_S_64 300850 30085037015476424256731548023425732 300853015476724256819 300858015477064256853 3008640154776342568110 30086701547855425715 30087101547923425725 300878015479384257220 300884015480154257297TX_S_64 52946784false0154802542574115480814257457R_TX_S_65 300887 30088737015480854257531548586425812 300890015481154257619 300895015481494257653 3009010154823642576140 30090401548358425795 30090801548456425805 300915015484714258020 3009210154857842580127TX_S_65 52947584false0154858842582115486444258257R_TX_S_66 300924 30092437015486484258331548965425892 300927015486784258419 300932015487124258453 300938015487534258494 30094101548829425875 30094501548881425885 300952015488964258820 300958015489574258881TX_S_66 52948384false0154896742590115490234259057R_TX_S_67 300961 30096137015490274259131549460425972 300964015490574259219 300969015490914259253 3009750154916142592123 30097801549266425955 30098201549347425965 300989015493624259620 3009950154945242596110TX_S_67 52949184false0154946242598115495184259857R_TX_S_68 300998 30099867015495224259931549909426072 301001015495524260019 301006015495864260053 301012015496274260094 30101501549703426035 30101901549744426045 301026015497594260420 30103201549806426055 301039015498214260520 30104901549853426065 301056015498684260620 301062015499014260653TX_S_68 52949984false0154991142608115499674260857R_TX_S_69 301065 30106537015499714260931550388426152 301068015500014261019 301073015500354261053 3010790155010142610119 30108201550202426135 30108601550279426145 301093015502944261420 3010990155038042614106TX_S_69 52950784false0155039042616115504464261657R_TX_S_70 301102 30110237015504504261731550723426232 301105015504804261819 301110015505144261853 301116015505444261883 30111901550609426215 30112301550650426225 301130015506654262220 301136015507154262270TX_S_70 52951584false0155072542624115507814262457R_TX_S_71 301139 30113937015507854262531551042426312 301142015508154262619 301147015508494262653 301153015508754262679 30115601550936426295 30116001550973426305 301167015509884263020 301173015510344263066TX_S_71 52952384false0155104442632115511004263257R_TX_S_72 301176 30117684015511044263331551737426422 301179015511344263419 301184015511684263453 3011900155126042634145 30119301551387426375 30119701551413426385 301204015514284263820 30121101551460426395 301218015514754263920 30122401551544426405 301231015515594264020 30124401551659426415 301251015516744264120 301257015517294264175TX_S_72 52953184false0155173942643115517954264357R_TX_S_73 301260 301260134015517994264431552475426562 301263015518294264519 301268015518634264553 3012740155193442645124 30127701552040426485 30128101552079426495 301288015520944264920 30129801552139426505 301305015521544265020 30131201552186426515 301319015522014265120 30132501552227426525 301344015522764265254 30134801552314426535 301355015523294265320 30136101552372426545 301368015523874265420 30137801552419426555 301385015524344265520 301391015524674265553TX_S_73 52953984false0155247742657115525334265757R_TX_S_74 301394 301394104015525374265831553110426682 301397015525674265919 301402015526014265953 3014080155266442659116 30141101552762426625 30141501552801426635 301422015528164266320 30143201552861426645 301439015528764266420 30144601552908426655 301453015529234266520 30145901552950426665 301478015529994266654 30148201553039426675 301489015530544266720 301495015531024266768TX_S_74 52954784false0155311242669115531684266957R_TX_S_75 301498 30149890015531724267031553604426792 301501015532024267119 301506015532364267153 301512015532734267190 30151501553345426745 30151901553374426755 301526015533894267520 30153601553421426765 301543015534364267620 30154901553464426775 301568015535134267754 30157201553543426785 301579015535584267820 301585015535964267858TX_S_75 52955584false0155360642680115536624268057R_TX_S_76 301588 30158890015536664268131554092426902 301591015536964268219 301596015537304268253 301602015537654268288 30160501553835426855 30160901553864426865 301616015538794268620 30162601553911426875 301633015539264268720 30163901553951426885 301658015539994268853 30166201554030426895 301669015540454268920 301675015540844268959TX_S_76 52956384false0155409442691115541504269157R_TX_S_77 301678 30167837015541544269231554387426982 301681015541844269319 301686015542184269353 301692015542384269373 30169501554293426965 30169901554324426975 301706015543394269720 301712015543794269760TX_S_77 52957184false0155438942699115544454269957R_TX_S_78 301715 30171537015544494270031554774427062 301718015544794270119 301723015545134270153 301729015545564270196 30173201554634427045 30173601554688427055 301743015547034270520 301749015547664270583TX_S_78 52957984false0155477642707115548324270757R_TX_S_79 301752 30175237015548364270831555117427142 301755015548664270919 301760015549004270953 301766015549324270985 30176901554999427125 30177301555042427135 301780015550574271320 301786015551094271372TX_S_79 52958784false0155511942715115551754271557R_TX_S_80 301789 30178937015551794271631555532427222 301792015552094271719 301797015552434271753 3018030155529342717103 30180601555378427205 30181001555439427215 301817015554544272120 301823015555244272190TX_S_80 52959584false0155553442723115555904272357R_TX_S_81 301826 30182637015555944272431555903427302 301829015556244272519 301834015556584272553 301840015556974272592 30184301555771427285 30184701555821427295 301854015558364272920 301860015558954272979TX_S_81 52960384false0155590542731115559614273157R_TX_S_82 301863 30186337015559654273231556234427382 301866015559954273319 301871015560294273353 301877015560584273382 30188001556122427365 30188401556162427375 301891015561774273720 301897015562264273769TX_S_82 52961184false0155623642739115562924273957R_TX_S_83 301900 30190037015562964274031556573427462 301903015563264274119 301908015563604274153 301914015563914274184 30191701556457427445 30192101556499427455 301928015565144274520 301934015565654274571TX_S_83 52961984false0155657542747115566314274757R_TX_S_84 301937 30193737015566354274831557052427542 301940015566654274919 301945015566994274953 3019510155676542749119 30195401556866427525 30195801556943427535 301965015569584275320 3019710155704442753106TX_S_84 52962784false0155705442755115571104275557R_TX_S_85 301974 301974117015571144275631557915427722 301977015571444275719 301982015571784275753 301988015572884275833 30199101557429427615 30199501557469427625 302002015574844276220 30200801557553427646 302015015575894276442 30201801557623427655 302025015576384276520 30203501557670427665 302042015576854276620 30204801557754427695 302055015577694276920 30206101557814427705 302068015578294277020 30207501557859427715 302082015578744277120 302088015579074277153TX_S_85 52963584false0155791742773115579734277357R_TX_S_86 302091 302091117015579774277431558778427902 302094015580074277519 302099015580414277553 302105015581514277633 30210801558292427795 30211201558332427805 302119015583474278020 30212501558416427826 302132015584524278242 30213501558486427835 302142015585014278320 30215201558533427845 302159015585484278420 30216501558617427875 302172015586324278720 30217801558677427885 302185015586924278820 30219201558722427895 302199015587374278920 302205015587704278953TX_S_86 52964384false0155878042791115588364279157R_TX_S_87 302208 30220837015588404279231559089427982 302211015588704279319 302216015589044279353 302222015589284279377 30222501558987427965 30222901559022427975 302236015590374279720 302242015590814279764TX_S_87 52965184false0155909142799115591474279957R_TX_S_88 302245 30224537015591514280031559368428062 302248015591814280119 302253015592154280153 302259015592314280169 30226201559282428045 30226601559309428055 302273015593244280520 302279015593604280556TX_S_88 52965984false0155937042807115594264280757R_TX_S_89 302282 30228237015594304280831559647428142 302285015594604280919 302290015594944280953 302296015595104280969 30229901559561428125 30230301559588428135 302310015596034281320 302316015596394281356TX_S_89 52966784false0155964942815115597054281557R_TX_S_90 302319 30231937015597094281631560006428222 302322015597394281719 302327015597734281753 302333015598094281789 30233601559880428205 30234001559927428215 302347015599424282120 302353015599984282176TX_S_90 52967584false0156000842823115600644282357R_TX_S_91 302356 30235638015600684282431560285428302 302359015600984282519 302364015601324282553 302370015601484282569 30237301560199428285 30237701560222428295 302384015602374282920 302391015602774282960TX_S_91 52968384false0156028742831115603434283157R_TX_S_92 302394 30239438015603474283231560585428382 302397015603774283319 302402015604114283353 302408015604344283376 30241101560492428365 30241501560522428375 302422015605374283720 302429015605774283760TX_S_92 52969184false0156058742839115606434283957R_TX_S_93 302432 30243251015606474284031560953428472 302435015606774284119 302440015607114284153 302446015607404284182 30244901560804428445 30245301560828428455 302460015608434284520 30246701560886428465 302474015609014284620 302480015609454284664TX_S_93 52969984false0156095542848115610114284857R_TX_S_94 302483 30248381015610154284931561526428582 302486015610454285019 302491015610794285053 3024970156114542850119 30250001561246428535 30250401561283428545 302511015612984285420 30251701561341428555 302524015613564285520 30253401561388428565 302541015614034285620 30254701561452428575 302554015614674285720 302561015615184285771TX_S_94 52970784false0156152842859115615844285957R_TX_S_95 302564 302564111015615884286031562236428712 302567015616184286119 302572015616524286153 3025780156173642861137 30258101561855428645 30258501561879428655 302592015618944286520 30259801561931428665 302605015619464286620 30261501561993428675 302622015620084286720 30262801562051428685 302635015620664286820 30264501562098428695 302652015621134286920 30265801562162428705 302665015621774287020 302672015622284287071TX_S_95 52971584false0156223842872115622944287257R_TX_S_96 302675 30267537015622984287331562559428792 302678015623284287419 302683015623624287453 302689015623894287480 30269201562451428775 30269601562489428785 302703015625044287820 302709015625514287867TX_S_96 52972384false0156256142880115626174288057R_TX_S_97 302712 30271237015626214288131562878428872 302715015626514288219 302720015626854288253 302726015627114288279 30272901562772428855 30273301562809428865 302740015628244288620 302746015628704288666TX_S_97 52973184false0156288042888115629364288857R_TX_S_98 302749 30274937015629404288931563177428952 302752015629704289019 302757015630044289053 302763015630254289074 30276601563081428935 30277001563113428945 302777015631284289420 302783015631694289461TX_S_98 52973984false0156317942896115632354289657R_TX_S_99 302786 30278637015632394289731563620429032 302789015632694289819 302794015633034289853 3028000156336042898110 30280301563452429015 30280701563520429025 302814015635354290220 302820015636124290297TX_S_99 52974784false0156362242904115636784290457R_TX_S_100 302823 30282337015636824290531564040429112 302826015637134290619 302831015637474290653 3028370156379842906104 30284001563884429095 30284401563946429105 302851015639614291020 302857015640324291091TX_S_100 52975584false0156404242912115641004291259R_TX_S_101 302860 30286037015641044291331564498429192 302863015641354291419 302868015641694291453 3028740156422942914113 30287701564324429175 30288101564395429185 302888015644104291820 3028940156449042918100TX_S_101 52976384false0156450042920115645584292059R_TX_S_102 302897 30289737015645624292131564848429272 302900015645934292219 302905015646274292253 302911015646604292286 30291401564728429255 30291801564772429265 302925015647874292620 302931015648404292673TX_S_102 52977184false0156485042928115649084292859R_TX_S_103 302934 30293463015649124292931565340429372 302937015649434293019 302942015649774293053 3029480156503442930110 30295101565126429335 30295501565154429345 302962015651694293420 30296801565214429355 302975015652294293520 30298101565284429365 302988015652994293620 302994015653324293653TX_S_103 52977984false0156534242938115654004293859R_TX_S_104 302997 30299737015654044293931565738429452 303000015654354294019 303005015654694294053 303011015655144294098 30301401565594429435 30301801565650429445 303025015656654294420 303031015657304294485TX_S_104 52978784false0156574042946115657984294659R_TX_S_105 303034 30303437015658024294731566128429532 303037015658334294819 303042015658674294853 303048015659104294896 30305101565988429515 30305501566042429525 303062015660574295220 303068015661204295283TX_S_105 52979584false0156613042954115661884295459R_TX_S_106 303071 30307137015661924295531566442429612 303074015662234295619 303079015662574295653 303085015662814295677 30308801566340429595 30309201566375429605 303099015663904296020 303105015664344296064TX_S_106 52980384false0156644442962115665024296259R_TX_S_107 303108 30310837015665064296331566720429692 303111015665374296419 303116015665714296453 303122015665864296468 30312501566636429675 30312901566662429685 303136015666774296820 303142015667124296855TX_S_107 52981184false0156672242970115667804297059R_TX_S_108 303145 30314537015667844297131567046429772 303148015668154297219 303153015668494297253 303159015668764297280 30316201566938429755 30316601566976429765 303173015669914297620 303179015670384297667TX_S_108 52981984false0156704842978115671064297859R_TX_S_109 303182 30318237015671104297931567324429852 303185015671414298019 303190015671754298053 303196015671904298068 30319901567240429835 30320301567266429845 303210015672814298420 303216015673164298455TX_S_109 52982784false0156732642986115673844298659R_TX_S_110 303219 30321937015673884298731567726429932 303222015674194298819 303227015674534298853 303233015674994298899 30323601567580429915 30324001567637429925 303247015676524299220 303253015677184299286TX_S_110 52983584false0156772842994115677864299459R_TX_S_111 303256 30325637015677904299531568020430012 303259015678214299619 303264015678554299653 303270015678744299672 30327301567928429995 30327701567958430005 303284015679734300020 303290015680124300059TX_S_111 52984384false0156802243002115680804300259R_TX_S_112 303293 30329337015680844300331568434430092 303296015681154300419 303301015681494300453 3033070156819843004102 30331001568282430075 30331401568342430085 303321015683574300820 303327015684264300889TX_S_112 52985184false0156843643010115684944301059R_TX_S_113 303330 30333037015684984301131568936430172 303333015685294301219 303338015685634301253 3033440156863443012124 30334701568740430155 30335101568822430165 303358015688374301620 3033640156892843016111TX_S_113 52985984false0156893843018115689964301859R_TX_S_114 303367 30336737015690004301931569314430252 303370015690314302019 303375015690654302053 303381015691054302093 30338401569180430235 30338801569231430245 303395015692464302420 303401015693064302480TX_S_114 52986784false0156931643026115693744302659R_TX_S_115 303404 30340437015693784302731569676430332 303407015694094302819 303412015694434302853 303418015694794302889 30342101569550430315 30342501569597430325 303432015696124303220 303438015696684303276TX_S_115 52987584false0156967843034115697364303459R_TX_S_116 303441 30344137015697404303531570082430412 303444015697714303619 303449015698054303653 3034550156985243036100 30345801569934430395 30346201569992430405 303469015700074304020 303475015700744304087TX_S_116 52988384false0157008443042115701424304259R_TX_S_117 303478 30347837015701464304331570464430492 303481015701774304419 303486015702114304453 303492015702524304494 30349501570328430475 30349901570380430485 303506015703954304820 303512015704564304881TX_S_117 52989184false0157046643050115705244305059R_TX_S_118 303515 30351547015705284305131570872430582 303518015705594305219 303523015705934305253 303529015706354305295 30353201570712430555 30353601570743430565 303543015707584305620 30354601570799430575 303553015708144305720 303559015708644305770TX_S_118 52989984false0157087443059115709324305959R_TX_S_119 303562 30356237015709364306031571270430662 303565015709674306119 303570015710014306153 303576015710464306198 30357901571126430645 30358301571182430655 303590015711974306520 303596015712624306585TX_S_119 52990784false0157127243067115713304306759R_TX_S_120 303599 303599174015713344306831572587430902 303602015713654306919 303607015713994306953 303613015715704307075 30361601571772430735 30362001571817430756 303624015718444307533 30362701571895430765 303634015719104307620 30364001571965430786 30364301572027430795 303650015720424307920 30365601572130430825 303663015721454308220 30366901572172430835 303676015721874308320 30368501572241430845 303692015722564308420 30369801572310430855 303705015723254308520 30371401572370430865 303721015723854308620 30372701572422430875 303734015724374308720 30374301572478430885 303750015724934308820 30375601572521430895 303763015725364308920 303770015725794308963TX_S_120 52991584false0157258943091115726474309159R_TX_S_121 303773 30377337015726514309231572957430982 303776015726824309319 303781015727164309353 303787015727544309391 30379001572827430965 30379401572876430975 303801015728914309720 303807015729494309778TX_S_121 52992384false0157295943099115730174309959R_TX_S_122 303810 30381087015730214310031573507431092 303813015730524310119 303818015730864310153 3038240157313543101102 30382701573219431045 30383101573245431055 303838015732604310520 30384501573292431065 303852015733074310620 30385801573332431075 303877015733804310753 30388101573428431085 303888015734434310820 303894015734994310876TX_S_122 52993184false0157350943110115735674311059R_TX_S_123 303897 303897126015735714311131574348431242 303900015736024311219 303905015736364311253 303911015737454311333 30391401573885431165 30391801573913431175 303925015739284311720 30393101573983431185 303938015739984311820 30394401574076431195 303951015740914311920 30396701574149431205 303974015741644312020 30398001574192431215 303987015742074312120 30399401574242431225 304001015742574312220 30400701574292431235 304014015743074312320 304020015743404312353TX_S_123 52993984false0157435043125115744084312559R_TX_S_124 304023 304023126015744124312631575197431392 304026015744434312719 304031015744774312753 304037015745884312833 30404001574730431315 30404401574758431325 304051015747734313220 30405701574830431335 304064015748454313320 30407001574925431345 304077015749404313420 30409301574998431355 304100015750134313520 30410601575041431365 304113015750564313620 30412001575091431375 304127015751064313720 30413301575141431385 304140015751564313820 304146015751894313853TX_S_124 52994784false0157519943140115752574314059R_TX_S_125 304149 30414937015752614314131575967431482 304152015752924314219 304157015753264314253 304163015754674314362 30416601575639431465 30417001575787431475 304177015758024314720 3041830157595943147177TX_S_125 52995584false0157596943149115760274314959R_TX_S_126 304186 30418637015760314315031576701431572 304189015760624315119 304194015760964315153 304200015762284315254 30420301576391431555 30420701576530431565 304214015765454315620 3042200157669343156168TX_S_126 52996384false0157670343158115767614315859R_TX_S_127 304223 30422337015767654315931577499431662 304226015767964316019 304231015768304316053 304237015769784316173 30424001577157431645 30424401577312431655 304251015773274316520 3042570157749143165184TX_S_127 52997184false0157750143167115775594316759R_TX_S_128 304260 30426037015775634316831577853431742 304263015775944316919 304268015776284316953 304274015776624316987 30427701577731431725 30428101577776431735 304288015777914317320 304294015778454317374TX_S_128 52997984false0157785543175115779134317559R_TX_S_129 304297 30429737015779174317631578211431822 304300015779484317719 304305015779824317753 304311015780174317788 30431401578087431805 30431801578133431815 304325015781484318120 304331015782034318175TX_S_129 52998784false0157821343183115782714318359R_TX_S_130 304334 30433437015782754318431578537431902 304337015783064318519 304342015783404318553 304348015783674318580 30435101578429431885 30435501578467431895 304362015784824318920 304368015785294318967TX_S_130 52999584false0157853943191115785974319159R_TX_S_131 304371 30437137015786014319231578827431982 304374015786324319319 304379015786664319353 304385015786844319371 30438801578737431965 30439201578766431975 304399015787814319720 304405015788194319758TX_S_131 53000384false0157882943199115788874319959R_TX_S_132 304408 30440837015788914320031579125432062 304411015789224320119 304416015789564320153 304422015789764320173 30442501579031432045 30442901579062432055 304436015790774320520 304442015791174320560TX_S_132 53001184false0157912743207115791854320759R_TX_S_133 304445 30444537015791894320831579527432142 304448015792204320919 304453015792544320953 304459015793004320999 30446201579381432125 30446601579438432135 304473015794534321320 304479015795194321386TX_S_133 53001984false0157952943215115795874321559R_TX_S_134 304482 30448268015795914321631580091432242 304485015796224321719 304490015796564321753 3044960157973243217129 30449901579843432205 30450301579906432215 304510015799214322120 30452001579974432225 304527015799894322220 30453301580028432235 304540015800434322320 304547015800834322360TX_S_134 53002784false0158009343225115801514322559R_TX_S_135 304550 30455037015801554322631580565432322 304553015801864322719 304558015802204322753 3045640158028443227117 30456701580383432305 30457101580458432315 304578015804734323120 3045840158055743231104TX_S_135 53003584false0158056743233115806254323359R_TX_S_136 304587 30458739015806294323431581100432462tmp_00tmp_14tmp_28ct_012ct_116 304592015808574324119 304597015808914324153 304603015809214324183 30460601580986432445 30461001581027432455 304617015810424324520 304623015810924324570TX_S_136 53004384false0158110243247115811604324759R_TX_S_137 304626 30462639015811644324831581579432602tmp_00tmp_14tmp_28ct_012ct_116 304631015813924325519 304636015814264325553 304642015814424325569 30464501581493432585 30464901581520432595 304656015815354325920 304662015815714325956TX_S_137 53005184false0158158143261115816394326159R_TX_S_138 304665 30466551015816434326231581949432692 304668015816744326319 304673015817084326353 304679015817404326385 30468201581807432665 30468601581832432675 304693015818474326720 30469901581886432685 304706015819014326820 304713015819414326860TX_S_138 53005984false0158195143270115820094327059R_TX_S_139 304716 30471639015820134327131582496432822tmp_00tmp_14ct_08ct_112 304721015821774327719 304726015822114327753 3047320158226043277102 30473501582344432805 30473901582404432815 304746015824194328120 304752015824884328189TX_S_139 53006784false0158249843283115825564328359R_TX_S_140 304755 30475553015825604328431583064432982tmp_00tmp_14tmp_28tmp_312ct_016ct_120 304760015828354329219 304765015828694329253 304771015828864329270 30477401582938432955 30477801582961432965 304785015829764329620 30479201583008432975 304799015830234329720 304805015830564329753TX_S_140 53007584false0158306643299115831244329959R_TX_S_141 304808 304808148015831284330031583945433232tmp_00tmp_14tmp_28tmp_312ct_016ct_120 30481301583389433085 30482101583413433091 30483001583437433101 30483901583461433111 30484801583485433121 30485701583508433131 304866015835454331415 304871015835794331449 304877015836124331482 30488001583680433175 30488401583706433185 304891015837214331820 30489701583755433195 304904015837704331920 30491301583803433205 304920015838184332020 30492601583842433215 304933015838574332120 30494001583889433225 304947015839044332220 304953015839374332253TX_S_141 53008384false0158394743324115840094332463R_TX_S_142 304956 304956148015840134332531584830433482tmp_00tmp_14tmp_28tmp_312ct_016ct_120 30496101584274433335 30496901584298433341 30497801584322433351 30498701584346433361 30499601584370433371 30500501584393433381 305014015844304333915 305019015844644333949 305025015844974333982 30502801584565433425 30503201584591433435 305039015846064334320 30504501584640433445 305052015846554334420 30506101584688433455 305068015847034334520 30507401584727433465 305081015847424334620 30508801584774433475 305095015847894334720 305101015848224334753TX_S_142 53009184false0158483243349115848944334963R_TX_S_143 305104 30510478015848984335031585589433652tmp_00tmp_14tmp_28tmp_312ct_016ct_120 305109015851734335819 305114015852074335853 3051200158525643358102 30512301585340433615 30512701585381433625 305134015853964336220 30514301585441433635 305162015854904336354 30516601585524433645 305173015855394336420 305179015855814336462TX_S_143 53009984false0158559143366115856494336659R_TX_S_144 305182 30518278015856534336731586324433822tmp_00tmp_14tmp_28tmp_312ct_016ct_120 305187015859284337519 305192015859624337553 305198015860064337597 30520101586085433785 30520501586126433795 305212015861414337920 30522101586186433805 305240015862354338054 30524401586264433815 305251015862794338120 305257015863164338157TX_S_144 53010784false0158632643383115863844338359R_TX_S_145 305260 30526039015863884338431586984433992tmp_00tmp_14tmp_28tmp_312tmp_416tmp_520ct_024ct_128 305265015867934339419 305270015868274339453 305276015868444339470 30527901586896433975 30528301586924433985 305290015869394339820 305296015869764339857TX_S_145 53011584false0158698643400115870444340059R_TX_S_146 305299 30529994015870484340131587570434162tmp_00tmp_14tmp_28 30530401587186434065 30531201587210434071 30532101587234434081 305330015872724340915 305335015873064340949 305341015873324340975 30534401587393434125 30534801587419434135 305355015874344341320 30536101587466434145 305368015874814341420 30537701587514434155 305384015875294341520 305390015875624341553TX_S_146 53012384false0158757243417115876344341763R_TX_S_147 305393 30539394015876384341831588160434332tmp_00tmp_14tmp_28 30539801587776434235 30540601587800434241 30541501587824434251 305424015878624342615 305429015878964342649 305435015879224342675 30543801587983434295 30544201588009434305 305449015880244343020 30545501588056434315 305462015880714343120 30547101588104434325 305478015881194343220 305484015881524343253TX_S_147 53013184false0158816243434115882244343463R_TX_S_148 305487 30548794015882284343531588750434502tmp_00tmp_14tmp_28 30549201588366434405 30550001588390434411 30550901588414434421 305518015884524344315 305523015884864344349 305529015885124344375 30553201588573434465 30553601588599434475 305543015886144344720 30554901588646434485 305556015886614344820 30556501588694434495 305572015887094344920 305578015887424344953TX_S_148 53013984false0158875243451115888144345163R_TX_S_149 305581 30558187015888184345231589271434612 305584015888494345319 305589015888834345353 305595015889234345393 30559801588998434565 30560201589021434575 305609015890364345720 30561601589068434585 305623015890834345820 30562901589108434595 305648015891564345953 30565201589198434605 305659015892134346020 305665015892634346070TX_S_149 53014784false0158927343462115893314346259R_TX_S_150 305668 30566897015893354346331589826434732 305671015893664346419 305676015894004346453 305682015894444346497 30568501589523434675 30568901589546434685 305696015895614346820 30570301589593434695 305710015896084346920 30571601589633434705 305735015896814347053 30573901589715434715 305746015897304347120 30575201589771434725 305759015897864347220 305762015898184347252TX_S_150 53015584false0158982843474115898864347459R_TX_S_151 305765 305765116015898904347531590486434862 305768015899214347619 305773015899554347653 3057790159001443476112 30578201590108434795 30578601590138434805 305793015901534348020 30580201590186434815 305809015902014348120 30581501590227434825 305834015902764348254 30583801590309434835 305845015903244348320 30585101590359434845 305858015903744348420 30586501590418434855 305872015904334348520 305878015904784348565TX_S_151 53016384false0159048843487115905464348759R_TX_S_152 305881 30588187015905504348831591023434972 305884015905814348919 305889015906154348953 305895015906604348998 30589801590740434925 30590201590763434935 305909015907784349320 30591601590810434945 305923015908254349420 30592901590850434955 305948015908984349553 30595201590945434965 305959015909604349620 305965015910154349675TX_S_152 53017184false0159102543498115910834349859R_TX_S_153 305968 305968112015910874349931591668435092 305971015911184350019 305976015911524350053 3059820159121343500114 30598501591309435035 30598901591348435045 305996015913634350420 30600201591408435055 306009015914234350520 30601901591455435065 306026015914704350620 30603201591502435075 306060015915694350772 30606401591603435085 306071015916184350820 306077015916604350862TX_S_153 53017984false0159167043510115917284351059R_TX_S_154 306080 306080143015917324351131592503435262tmp_00 30608501591803435145 306093015918414351515 306098015918754351549 3061040159195043515124 30610701592060435185 30611101592099435195 306118015921144351920 30612801592159435205 306135015921744352020 30614201592206435215 306149015922214352120 30615501592247435225 306174015922964352254 30617801592337435235 306185015923524352320 30619101592399435245 306198015924144352420 30620701592447435255 306214015924624352520 306220015924954352553TX_S_154 53018784false0159250543527115925674352763R_TX_S_155 306223 306223152015925714352831593413435452tmp_00tmp_14 30622801592701435325 30623601592725435331 306245015927634353415 306250015927974353449 3062560159286943534121 30625901592976435375 30626301593015435385 306270015930304353820 30628001593075435395 306287015930904353920 30629401593122435405 306301015931374354020 30630701593163435415 306326015932124354154 30633001593250435425 306337015932654354220 30634301593309435435 306350015933244354320 30635901593357435445 306366015933724354420 306372015934054354453TX_S_155 53019584false0159341543546115934774354663R_TX_S_156 306375 306375106015934814354731594089435592tmp_00 306380015935634355019 306385015935974355053 3063910159365643550112 30639401593750435535 30639801593789435545 306405015938044355420 30641501593849435555 306422015938644355520 30642901593896435565 306436015939114355620 30644201593939435575 306461015939884355754 30646501594023435585 306472015940384355820 306478015940814355863TX_S_156 53020384false0159409143560115941494356059R_TX_S_157 306481 306481190015941534356131595236435842tmp_00 306486015942474356419 306491015942814356453 306497015943924356579 30650001594534435685 30650401594557435695 306511015945724356920 30651801594604435705 306525015946194357020 30653101594651435715 306559015947174357171 30656301594749435725 306570015947644357220 30657601594817435746 306593015948584357447 30659601594889435755 306603015949044357520 30660901594939435776 30661201594985435785 306619015950004357820 30662501595074435815 306632015950894358120 30663801595120435825 306645015951354358220 30665501595174435835 306662015951894358320 306668015952284358359TX_S_157 53021184false0159523843585115952964358559R_TX_S_158 306671 306671131015953004358631595938435982 306674015953314358719 306679015953654358753 3066850159542543587113 30668801595520435905 30669201595543435915 306699015955584359120 30670601595598435925 306713015956134359220 30671901595647435935 306738015956954359353 30674201595720435945 306749015957354359420 30675501595775435955 306762015957904359520 30677201595835435965 306779015958504359620 30678601595882435975 306793015958974359720 306799015959304359753TX_S_158 53021984false0159594043599115959984359959R_TX_S_159 306802 30680268015960024360031596454436082 306805015960334360119 306810015960674360153 3068160159612543601111 30681901596218436045 30682301596257436055 306830015962724360520 30684001596319436065 306847015963344360620 30685401596382436075 306861015963974360720 306867015964464360769TX_S_159 53022784false0159645643609115965144360959R_TX_S_160 306870 306870117015965184361031597051436212 306873015965494361119 306878015965834361153 306884015966264361196 30688701596704436145 30689101596727436155 306898015967424361520 30690501596774436165 306912015967894361620 30691801596817436175 306937015968664361754 30694101596897436185 306948015969124361820 30695401596948436195 306961015969634361920 30697101596995436205 306978015970104362020 306984015970434362053TX_S_160 53023584false0159705343622115971114362259R_TX_S_161 306987 30698768015971154362331597563436312 306990015971464362419 306995015971804362453 3070010159723743624110 30700401597329436275 30700801597368436285 307015015973834362820 30702501597430436295 307032015974454362920 30703901597492436305 307046015975074363020 307052015975554363068TX_S_161 53024384false0159756543632115976234363259R_TX_S_162 307055 307055146015976274363331598700436542tmp_00tmp_14tmp_28tmp_312 30706001597853436395 30706801597877436401 30707701597901436411 30708601597925436421 307095015979634364315 307100015979974364349 307106015981194364451 30710901598272436475 30711301598304436485 307120015983194364820 30712601598369436495 307133015983844364920 30714201598422436505 307149015984374365020 30715501598488436515 307162015985034365120 30717101598549436525 307178015985644365220 30718401598626436535 307191015986414365320 307198015986924365371TX_S_162 53025184false0159870243655115987644365563R_TX_S_163 307201 30720174015987684365631599244436642 307204015987994365719 307209015988334365753 3072150159888843657108 30721801598978436605 30722201599001436615 307229015990164366120 30723601599048436625 307255015990974366254 30725901599155436635 307266015991704366320 307272015992364366386TX_S_163 53025984false0159924643665115993044366559R_TX_S_164 307275 30727537015993084366631599534436722 307278015993394366719 307283015993734366753 307289015993914366771 30729201599444436705 30729601599473436715 307303015994884367120 307309015995264367158TX_S_164 53026784false0159953643673115995944367359R_TX_S_165 307312 307312119015995984367431600135436852 307315015996294367519 307320015996634367553 307326015997084367598 30732901599788436785 30733301599818436795 307340015998334367920 30734901599866436805 307356015998814368020 30736201599907436815 307381015999564368154 30738501599984436825 307392015999994368220 30739801600032436835 307405016000474368320 30741501600079436845 307422016000944368420 307428016001274368453TX_S_165 53027584false0160013743686116001954368659R_TX_S_166 307431 307431117016001994368731600807436982 307434016002304368819 307439016002644368853 3074450160032643688115 30744801600423436915 30745201600450436925 307459016004654369220 30746501600508436935 307472016005234369320 30748201600567436945 307489016005824369420 30749601600614436955 307503016006294369520 30750901600657436965 307528016007064369654 30753201600741436975 307539016007564369720 307545016007994369763TX_S_166 53028384false0160080943699116008674369959R_TX_S_167 307548 307548143016008714370031601631437152tmp_00 30755301600943437035 307561016009814370415 307566016010154370449 3075720160108743704121 30757501601194437075 30757901601233437085 307586016012484370820 30759601601293437095 307603016013084370920 30761001601340437105 307617016013554371020 30762301601381437115 307642016014304371154 30764601601468437125 307653016014834371220 30765901601527437135 307666016015424371320 30767501601575437145 307682016015904371420 307688016016234371453TX_S_167 53029184false0160163343716116016954371663R_TX_S_168 307691 307691123016016994371731602273437282 307694016017304371819 307699016017644371853 3077050160181443718103 30770801601899437215 30771201601922437225 307719016019374372220 30772601601969437235 307733016019844372320 30773901602016437245 307767016020834372472 30777101602116437255 307778016021314372520 30778401602170437265 307791016021854372620 30779801602217437275 307805016022324372720 307811016022654372753TX_S_168 53029984false0160227543729116023334372959R_TX_S_169 307814 30781487016023374373031602782437392 307817016023684373119 307822016024024373153 307828016024404373191 30783101602513437345 30783501602536437355 307842016025514373520 30784901602583437365 307856016025984373620 30786201602624437375 307881016026734373754 30788501602712437385 307892016027274373820 307898016027744373867TX_S_169 53030784false0160278443740116028424374059R_TX_S_170 307901 30790190016028464374131603301437502 307904016028774374219 307909016029114374253 307915016029534374295 30791801603030437455 30792201603059437465 307929016030744374620 30793901603106437475 307946016031214374720 30795201603146437485 307971016031944374853 30797501603232437495 307982016032474374920 307988016032934374966TX_S_170 53031584false0160330343751116033614375159R_TX_S_171 307991 307991131016033654375231603997437642 307994016033964375319 307999016034304375353 3080050160348943753112 30800801603583437565 30801201603606437575 308019016036214375720 30802601603653437585 308033016036684375820 30803901603697437595 308058016037464375954 30806201603775437605 308069016037904376020 30807501603834437615 308082016038494376120 30809201603894437625 308099016039094376220 30810601603941437635 308113016039564376320 308119016039894376353TX_S_171 53032384false0160399943765116040574376559R_TX_S_172 308122 30812281016040614376631604589437752 308125016040924376719 308130016041264376753 3081360160419643767123 30813901604301437705 30814301604338437715 308150016043534377120 30815601604396437725 308163016044114377220 30817301604447437735 308180016044624377320 30818601604515437745 308193016045304377420 308200016045814377471TX_S_172 53033184false0160459143776116046494377659R_TX_S_173 308203 308203126016046534377731605328437912tmp_00 30820801604730437805 308216016047684378115 308221016048024378149 3082270160486143781108 30823001604955437845 30823401604981437855 308241016049964378520 30824801605028437865 308255016050434378620 30826101605068437875 308280016051164378753 30828401605157437885 308291016051724378820 30829701605224437895 308304016052394378920 30831301605272437905 308320016052874379020 308326016053204379053TX_S_173 53033984false0160533043792116053924379263R_TX_S_174 308329 308329126016053964379331606071438072tmp_00 30833401605473437965 308342016055114379715 308347016055454379749 3083530160560443797108 30835601605698438005 30836001605724438015 308367016057394380120 30837401605771438025 308381016057864380220 30838701605811438035 308406016058594380353 30841001605900438045 308417016059154380420 30842301605967438055 308430016059824380520 30843901606015438065 308446016060304380620 308452016060634380653TX_S_174 53034784false0160607343808116061354380863R_TX_S_175 308455 30845537016061394380931606373438152 308458016061704381019 308463016062044381053 308469016062244381073 30847201606279438135 30847601606310438145 308483016063254381420 308489016063654381460TX_S_175 53035584false0160637543816116064334381659R_TX_S_176 308492 308492119016064374381731606979438282 308495016064684381819 308500016065024381853 308506016065484381899 30850901606629438215 30851301606659438225 308520016066744382220 30852901606707438235 308536016067224382320 30854201606747438245 308561016067964382454 30856501606826438255 308572016068414382520 30857801606876438265 308585016068914382620 30859501606923438275 308602016069384382720 308608016069714382753TX_S_176 53036384false0160698143829116070394382959R_TX_S_177 308611 30861198016070434383031607747438432tmp_00tmp_14tmp_28 308616016072484383519 308621016072824383553 3086270160733843835109 30863001607429438385 30863401607452438395 308641016074674383920 30864801607499438405 308655016075144384020 30866101607545438415 308689016076124384172 30869301607664438425 308700016076794384220 308706016077394384280TX_S_177 53037184false0160774943844116078074384459R_TX_S_178 308709 308709112016078114384531608428438552 308712016078424384619 308717016078764384653 3087230160794843846125 30872601608055438495 30873001608096438505 308737016081114385020 30874301608165438515 308750016081804385120 30876001608214438525 308767016082294385220 30877301608264438535 308801016083314385372 30880501608364438545 308812016083794385420 308818016084204385461TX_S_178 53037984false0160843043856116084884385659R_TX_S_179 308821 30882195016084924385731609121438672 308824016085234385819 308829016085574385853 3088350160864343858139 30883801608764438615 30884201608801438625 308849016088164386220 30885501608869438635 308862016088844386320 30887201608928438645 308879016089434386420 30888601608979438655 308893016089944386520 30889901609047438665 308906016090624386620 308913016091134386671TX_S_179 53038784false0160912343868116091814386859R_TX_S_180 308916 308916117016091854386931609780438802 308919016092164387019 308924016092504387053 3089300160931043870113 30893301609405438735 30893701609431438745 308944016094464387420 30895101609478438755 308958016094934387520 30896401609518438765 308983016095664387653 30898701609607438775 308994016096224387720 30900001609675438785 309007016096904387820 30901701609724438795 309024016097394387920 309030016097724387953TX_S_180 53039584false0160978243881116098404388159R_TX_S_181 309033 30903337016098444388231610066438882 309036016098754388319 309041016099094388353 309047016099264388370 30905001609978438865 30905401610006438875 309061016100214388720 309067016100584388757TX_S_181 53040384false0161006843889116101264388959R_TX_S_182 309070 309070149016101304389031610801439032 309073016101614389119 309078016101954389153 3090840161025743891115 30908701610354438945 30909101610384438955 309098016103994389520 30910701610432438965 309114016104474389620 30912001610472438975 309139016105214389754 30914301610546438985 309150016105614389820 30915601610591438995 309163016106064389920 30917301610641439005 309180016106564390020 30918601610696439015 309193016107114390120 30920301610745439025 309210016107604390220 309216016107934390253TX_S_182 53041184false0161080343904116108614390459R_TX_S_183 309219 30921998016108654390531611557439182tmp_00tmp_14tmp_28 309224016110704391019 309229016111044391053 3092350161115743910106 30923801611245439135 30924201611268439145 309249016112834391420 30925601611315439155 309263016113304391520 30926901611361439165 309297016114284391672 30930101611477439175 309308016114924391720 309314016115494391777TX_S_183 53041984false0161155943919116116174391959R_TX_S_184 309317 30931790016116214392031612075439292 309320016116524392119 309325016116864392153 309331016117294392196 30933401611807439245 30933801611843439255 309345016118584392520 30935501611892439265 309362016119074392620 30936801611932439275 309387016119804392753 30939101612012439285 309398016120274392820 309404016120674392860TX_S_184 53042784false0161207743930116121354393059R_TX_S_185 309407 309407113016121394393131612745439412 309410016121704393219 309415016122044393253 3094210161227443932123 30942401612379439355 30942801612425439365 309435016124404393620 30944501612487439375 309452016125024393720 30945901612534439385 309466016125494393820 30947201612584439395 309500016126504393971 30950401612682439405 309511016126974394020 309517016127374394060TX_S_185 53043584false0161274743942116128054394259R_TX_S_186 309520 30952095016128094394331613438439532 309523016128404394419 309528016128744394453 3095340161296043944139 30953701613081439475 30954101613118439485 309548016131334394820 30955401613186439495 309561016132014394920 30957101613245439505 309578016132604395020 30958501613296439515 309592016133114395120 30959801613364439525 309605016133794395220 309612016134304395271TX_S_186 53044384false0161344043954116134984395459R_TX_S_187 309615 309615117016135024395531614097439662 309618016135334395619 309623016135674395653 3096290161362743956113 30963201613722439595 30963601613748439605 309643016137634396020 30965001613795439615 309657016138104396120 30966301613835439625 309682016138834396253 30968601613924439635 309693016139394396320 30969901613992439645 309706016140074396420 30971601614041439655 309723016140564396520 309729016140894396553TX_S_187 53045184false0161409943967116141574396759R_TX_S_188 309732 30973237016141614396831614383439742 309735016141924396919 309740016142264396953 309746016142434396970 30974901614295439725 30975301614323439735 309760016143384397320 309766016143754397357TX_S_188 53045984false0161438543975116144434397559R_TX_S_189 309769 309769149016144474397631615126439892 309772016144784397719 309777016145124397753 3097830161457643977117 30978601614675439805 30979001614705439815 309797016147204398120 30980601614753439825 309813016147684398220 30981901614793439835 309838016148424398354 30984201614867439845 309849016148824398420 30985501614912439855 309862016149274398520 30987201614964439865 309879016149794398620 30988501615021439875 309892016150364398720 30990201615070439885 309909016150854398820 309915016151184398853TX_S_189 53046784false0161512843990116151864399059R_TX_S_190 309918 30991868016151904399131615646439992 309921016152214399219 309926016152554399253 3099320161531443992112 30993501615408439955 30993901615447439965 309946016154624399620 30995601615509439975 309963016155244399720 30997001615573439985 309977016155884399820 309983016156384399870TX_S_190 53047584false0161564844000116157064400059R_TX_S_191 309986 30998681016157104400131616238440102 309989016157414400219 309994016157754400253 3100000161584544002123 31000301615950440055 31000701615987440065 310014016160024400620 31002001616045440075 310027016160604400720 31003701616096440085 310044016161114400820 31005001616164440095 310057016161794400920 310064016162304400971TX_S_191 53048384false0161624044011116162984401159R_TX_S_192 310067 310067108016163024401231616878440242tmp_00 31007201616374440155 310080016164124401615 310085016164464401649 3100910161649844016101 31009401616585440195 31009801616615440205 310105016166304402020 31011401616663440215 310121016166784402120 31012701616720440225 310155016167874402272 31015901616817440235 310166016168324402320 310172016168704402358TX_S_192 53049184false0161688044025116169424402563R_TX_S_193 310175 310175117016169464402631617482440372 310178016169774402719 310183016170114402753 310189016170544402796 31019201617132440305 31019601617155440315 310203016171704403120 31021001617202440325 310217016172174403220 31022301617242440335 310242016172914403354 31024601617316440345 310253016173314403420 31025901617361440355 310266016173764403520 31027601617417440365 310283016174324403620 310289016174744403662TX_S_193 53049984false0161748444038116175424403859R_TX_S_194 310292 310292119016175464403931618068440502 310295016175774404019 310300016176114404053 310306016176524404094 31030901617728440435 31031301617758440445 310320016177734404420 31032901617806440455 310336016178214404520 31034201617846440465 310361016178954404654 31036501617920440475 310372016179354404720 31037801617965440485 310385016179804404820 31039501618012440495 310402016180274404920 310408016180604404953TX_S_194 53050784false0161807044051116181284405159R_TX_S_195 310411 31041190016181324405231618754440642tmp_00 31041601618208440555 310424016182464405615 310429016182804405649 3104350161835344056122 31043801618461440595 31044201618503440605 310449016185184406020 31045501618568440615 310462016185834406120 31047101618616440625 310478016186314406220 31048401618680440635 310491016186954406320 310498016187464406371TX_S_195 53051584false0161875644065116188184406563R_TX_S_196 310501 310501135016188224406631619531440802tmp_00 31050601618899440695 310514016189374407015 310519016189714407049 3105250161903544070113 31052801619134440735 31053201619157440745 310539016191724407420 31054601619204440755 310553016192194407520 31055901619251440765 310587016193174407671 31059101619353440775 310598016193684407720 31060401619415440785 310611016194304407820 31062001619469440795 310627016194844407920 310633016195234407959TX_S_196 53052384false0161953344081116195954408163R_TX_S_197 310636 310636135016195994408231620320440962tmp_00 31064101619676440855 310649016197144408615 310654016197484408649 3106600161981544086116 31066301619917440895 31066701619940440905 310674016199554409020 31068101619987440915 310688016200024409120 31069401620034440925 310722016201004409271 31072601620139440935 310733016201544409320 31073901620204440945 310746016202194409420 31075501620258440955 310762016202734409520 310768016203124409559TX_S_197 53053184false0162032244097116203844409763R_TX_S_198 310771 31077196016203884409831620843441072 310774016204194409919 310779016204534409953 310785016204904409990 31078801620562441025 31079201620585441035 310799016206004410320 31080601620632441045 310813016206474410420 31081901620677441055 310847016207444410572 31085101620778441065 310858016207934410620 310864016208354410662TX_S_198 53053984false0162084544108116209034410859R_TX_S_199 310867 310867146016209074410931621483441182 310870016209384411019 310875016209724411053 3108810162105244110133 31088401621167441135 31088801621205441145 310895016212204411420 31090101621277441155 310908016212924411520 31098301621345441165 310990016213604411620 31099601621409441175 311003016214244411720 311010016214754411771TX_S_199 53054784false0162148544119116215434411959R_TX_S_200 311013 31101396016215474412031622002441292 311016016215784412119 311021016216124412153 311027016216494412190 31103001621721441245 31103401621744441255 311041016217594412520 31104801621791441265 311055016218064412620 31106101621836441275 311089016219034412772 31109301621937441285 311100016219524412820 311106016219944412862TX_S_200 53055584false0162200444130116220624413059R_TX_S_201 311109 311109218016220664413131622821441442 311112016220974413219 311117016221314413253 3111230162220244132124 31112601622308441355 31113001622331441365 311137016223464413620 31114401622378441375 311151016223934413720 31115701622420441385 311176016224694413854 31118001622501441395 311187016225164413920 31119301622566441405 311200016225814414020 31127501622634441415 311282016226494414120 31128801622675441425 311307016227244414254 31131101622757441435 311318016227724414320 311324016228134414361TX_S_201 53056384false0162282344145116228814414559R_TX_S_202 311327 31132789016228854414631623298441552 311330016229164414719 311335016229504414753 311341016229814414784 31134401623047441505 31134801623077441515 311355016230924415120 31136401623125441525 311371016231404415220 31137701623164441535 311396016232134415354 31140001623240441545 311407016232554415420 311413016232904415455TX_S_202 53057184false0162330044156116233584415659R_TX_S_203 311416 31141689016233624415731623783441662 311419016233934415819 311424016234274415853 311430016234604415886 31143301623528441615 31143701623558441625 311444016235734416220 31145301623606441635 311460016236214416320 31146601623645441645 311485016236944416454 31148901623723441655 311496016237384416520 311502016237754416557TX_S_203 53057984false0162378544167116238434416759R_TX_S_204 311505 311505106016238474416831624316441782 311508016238784416919 311513016239124416953 311519016239474416988 31152201624017441725 31152601624047441735 311533016240624417320 31154201624095441745 311549016241104417420 31155501624134441755 311574016241834417554 31157801624208441765 311585016242234417620 31159101624249441775 311598016242644417720 311608016243084417764TX_S_204 53058784false0162431844179116243764417959R_TX_S_205 311611 31161191016243804418031625029441932tmp_00tmp_14tmp_28 311616016246034418519 311621016246374418553 311627016246804418596 31163001624758441885 31163401624788441895 311641016248034418920 31165001624836441905 311657016248514419020 31166301624879441915 311682016249284419154 31168601624963441925 311693016249784419220 311699016250214419263TX_S_205 53059584false0162503144194116250894419459R_TX_S_206 311702 31170291016250934419531625742442082tmp_00tmp_14tmp_28 311707016253164420019 311712016253504420053 311718016253934420096 31172101625471442035 31172501625501442045 311732016255164420420 31174101625549442055 311748016255644420520 31175401625592442065 311773016256414420654 31177701625676442075 311784016256914420720 311790016257344420763TX_S_206 53060384false0162574444209116258024420959R_TX_S_207 311793 311793133016258064421031626592442272tmp_00tmp_14tmp_28 31179801626015442155 31180601626039442161 31181501626063442171 311824016261014421815 311829016261354421849 3118350162618744218101 31183801626274442215 31184201626304442225 311849016263194422220 31185801626352442235 311865016263674422320 31187101626395442245 311890016264444422454 31189401626474442255 311901016264894422520 31190701626528442265 311914016265434422620 311923016265844422661TX_S_207 53061184false0162659444228116266564422863R_TX_S_208 311926 31192678016266604422931627227442412tmp_00tmp_14tmp_28 311931016268834423419 311936016269174423453 311942016269494423485 31194501627016442375 31194901627046442385 311956016270614423820 31196501627094442395 311972016271094423920 31197801627137442405 311997016271864424054 312001016272194424087TX_S_208 53061984false0162722944242116272874424259R_TX_S_209 312004 312004186016272914424331628046442582tmp_00tmp_14tmp_28 312009016274494424819 312014016274834424853 3120200162754844248118 31202301627648442515 31202701627678442525 312034016276934425220 31204301627726442535 312050016277414425320 31205601627769442545 312075016278184425454 31207901627846442555 312086016278614425520 31209201627902442565 312099016279174425620 31217401627980442575 312181016279954425720 312187016280384425763TX_S_209 53062784false0162804844259116281064425959R_TX_S_210 312190 312190186016281104426031628865442752tmp_00tmp_14tmp_28 312195016282684426519 312200016283024426553 3122060162836744265118 31220901628467442685 31221301628497442695 312220016285124426920 31222901628545442705 312236016285604427020 31224201628588442715 312261016286374427154 31226501628665442725 312272016286804427220 31227801628721442735 312285016287364427320 31236001628799442745 312367016288144427420 312373016288574427463TX_S_210 53063584false0162886744276116289254427659R_TX_S_211 312376 312376228016289294427731629821442962tmp_00tmp_14tmp_28 31238101629073442825 31238901629097442831 31239801629121442841 312407016291594428515 312412016291934428549 3124180162926744285123 31242101629376442885 31242501629406442895 312432016294214428920 31244101629454442905 312448016294694429020 31245401629497442915 312473016295464429154 31247701629574442925 312484016295894429220 31249001629630442935 312497016296454429320 31257201629703442945 312579016297184429420 31258501629757442955 312592016297724429520 312601016298134429561TX_S_211 53064384false0162982344297116298854429763R_TX_S_212 312604 312604108016298894429831630507443122tmp_00tmp_14tmp_28 312609016300294430319 312614016300634430353 3126200163011044303100 31262301630192443065 31262701630222443075 312634016302374430720 31264301630270443085 312650016302854430820 31265601630309443095 312675016303584430954 31267901630391443105 312686016304064431020 31269201630444443115 312699016304594431120 312709016304994431160TX_S_212 53065184false0163050944313116305674431359R_TX_S_213 312712 312712108016305714431431631189443282tmp_00tmp_14tmp_28 312717016307114431919 312722016307454431953 3127280163079344319101 31273101630876443225 31273501630906443235 312742016309214432320 31275101630954443245 312758016309694432420 31276401630997443255 312783016310464432554 31278701631076443265 312794016310914432620 31280001631126443275 312807016311414432720 312817016311814432760TX_S_213 53065984false0163119144329116312494432959R_TX_S_214 312820 312820121016312534433031631702443412tmp_00tmp_14tmp_28 312825016313934433519 312830016314274433553 312836016314634433589 31283901631534443385 31284301631560443395 312850016315754433920 31285601631618443405 312863016316334434020 312938016316944434081TX_S_214 53066784false0163170444342116317624434259R_TX_S_215 312941 312941121016317664434331632215443542tmp_00tmp_14tmp_28 312946016319064434819 312951016319404434853 312957016319764434889 31296001632047443515 31296401632073443525 312971016320884435220 31297701632131443535 312984016321464435320 313059016322074435381TX_S_215 53067584false0163221744355116322754435559R_TX_S_216 313062 313062161016322794435631632986443702tmp_00tmp_14tmp_28 313067016324194436119 313072016324534436153 3130780163252544361125 31308101632632443645 31308501632665443655 313092016326804436520 31309801632730443665 313105016327454436620 31318001632812443675 313187016328274436720 31319301632865443685 313200016328804436820 31320701632921443695 313214016329364436920 313220016329784436962TX_S_216 53068384false0163298844371116330464437159R_TX_S_217 313223 313223134016330504437231633601443842tmp_00tmp_14tmp_28 313228016331904437719 313233016332244437753 3132390163327644377105 31324201633363443805 31324601633396443815 313253016334114438120 31325901633461443825 313266016334764438220 31334101633537443835 313348016335524438320 313354016335934438361TX_S_217 53069184false0163360344385116336614438559R_TX_S_218 313357 313357134016336654438631634200443982tmp_00tmp_14tmp_28 313362016338054439119 313367016338394439153 3133730163388744391101 31337601633970443945 31338001634003443955 313387016340184439520 31339301634068443965 313400016340834439620 31347501634140443975 313482016341554439720 313488016341924439757TX_S_218 53069984false0163420244399116342604439959R_TX_S_219 313491 313491134016342644440031634791444122tmp_00tmp_14tmp_28 313496016344044440519 313501016344384440553 313507016344844440599 31351001634565444085 31351401634598444095 313521016346134440920 31352701634663444105 313534016346784441020 31360901634733444115 313616016347484441120 313622016347834441155TX_S_219 53070784false0163479344413116348514441359R_TX_S_220 313625 31362566016348554441431635318444262tmp_00tmp_14tmp_28 313630016349954441919 313635016350294441953 313641016350604441984 31364401635126444225 31364801635158444235 313655016351734442320 31366101635205444245 313668016352204442420 31367501635257444255 313682016352724442520 313688016353104442558TX_S_220 53071584false0163532044427116353784442759R_TX_S_221 313691 313691119016353824442831636001444412tmp_00 313696016354764443119 313701016355104443153 3137070163555844431101 31371001635641444345 31371401635668444355 313721016356834443520 31372701635710444365 313734016357254443620 31374101635757444375 313760016358064443754 31376401635842444385 313771016358574443820 31377701635898444395 313784016359134443920 31379401635945444405 313801016359604444020 313807016359934444053TX_S_221 53072384false0163600344442116360614444259R_TX_S_222 313810 313810119016360654444331636684444562tmp_00 313815016361594444619 313820016361934444653 3138260163624144446101 31382901636324444495 31383301636351444505 313840016363664445020 31384601636393444515 313853016364084445120 31386001636440444525 313879016364894445254 31388301636525444535 313890016365404445320 31389601636581444545 313903016365964445420 31391301636628444555 313920016366434445520 313926016366764445553TX_S_222 53073184false0163668644457116367444445759R_TX_S_223 313929 313929131016367484445831637450444702 313932016367794445919 313937016368134445953 3139430163688944459129 31394601637000444625 31395001637039444635 313957016370544446320 31396701637101444645 313974016371164446420 31398101637162444655 313988016371774446520 31399401637215444665 314001016372304446620 31400801637262444675 314015016372774446720 31402101637302444685 314040016373514446854 31404401637385444695 314051016374004446920 314057016374424446962TX_S_223 53073984false0163745244471116375104447159R_TX_S_224 314060 314060131016375144447231638228444842 314063016375454447319 314068016375794447353 3140740163765844473132 31407701637772444765 31408101637811444775 314088016378264447720 31409801637873444785 314105016378884447820 31411201637934444795 314119016379494447920 31412501637987444805 314132016380024448020 31413901638034444815 314146016380494448120 31415201638074444825 314171016381234448254 31417501638160444835 314182016381754448320 314188016382204448365TX_S_224 53074784false0163823044485116382884448559R_TX_S_225 314191 314191131016382924448631639006444982 314194016383234448719 314199016383574448753 3142050163843644487132 31420801638550444905 31421201638589444915 314219016386044449120 31422901638651444925 314236016386664449220 31424301638712444935 314250016387274449320 31425601638765444945 314263016387804449420 31427001638812444955 314277016388274449520 31428301638852444965 314302016389014449654 31430601638938444975 314313016389534449720 314319016389984449765TX_S_225 53075584false0163900844499116390664449959R_TX_S_226 314322 314322131016390704450031639760445122 314325016391014450119 314330016391354450153 3143360163920844501126 31433901639316445045 31434301639355445055 314350016393704450520 31436001639417445065 314367016394324450620 31437401639478445075 314381016394934450720 31438701639531445085 314394016395464450820 31440101639578445095 314408016395934450920 31441401639618445105 314433016396674451054 31443701639698445115 314444016397134451120 314450016397524451159TX_S_226 53076384false0163976244513116398204451359R_TX_S_227 314453 314453126016398244451431640416445252 314456016398554451519 314461016398894451553 3144670163994144515105 31447001640028445185 31447401640051445195 314481016400664451920 31448801640098445205 314495016401134452020 31450101640144445215 314529016402114452172 31453301640252445225 314540016402674452220 31454601640309445235 314553016403244452320 31456301640360445245 314570016403754452420 314576016404084452453TX_S_227 53077184false0164041844526116404764452659R_TX_S_228 314579 314579117016404804452731641052445382 314582016405114452819 314587016405454452853 3145930164059844528106 31459601640686445315 31460001640712445325 314607016407274453220 31461401640759445335 314621016407744453320 31462701640799445345 314646016408474453453 31465001640888445355 314657016409034453520 31466301640949445365 314670016409644453620 31468001640996445375 314687016410114453720 314693016410444453753TX_S_228 53077984false0164105444539116411124453959R_TX_S_229 314696 314696117016411164454031641688445512 314699016411474454119 314704016411814454153 3147100164123444541106 31471301641322445445 31471701641348445455 314724016413634454520 31473101641395445465 314738016414104454620 31474401641435445475 314763016414834454753 31476701641524445485 314774016415394454820 31478001641585445495 314787016416004454920 31479701641632445505 314804016416474455020 314810016416804455053TX_S_229 53078784false0164169044552116417484455259R_TX_S_230 314813 31481389016417524455331642353445642tmp_00 314818016418464455619 314823016418804455653 3148290164194144556114 31483201642037445595 31483601642060445605 314843016420754456020 31485001642107445615 314857016421224456120 31486301642147445625 314882016421964456254 31488601642259445635 314893016422744456320 314899016423454456391TX_S_230 53079584false0164235544565116424134456559R_TX_S_231 314902 31490299016424174456631643118445802tmp_00tmp_14 31490701642554445705 31491501642578445711 314924016426164457215 314929016426504457249 3149350164272344572122 31493801642831445755 31494201642867445765 314949016428824457620 31495501642932445775 314962016429474457720 31497101642980445785 314978016429954457820 31498401643044445795 314991016430594457920 314998016431104457971TX_S_231 53080384false0164312044581116431824458163R_TX_S_232 315001 31500199016431864458231643899445962tmp_00tmp_14 31500601643323445865 31501401643347445871 315023016433854458815 315028016434194458849 3150340164349544588125 31503701643606445915 31504101643645445925 315048016436604459220 31505401643713445935 315061016437284459320 31507001643761445945 315077016437764459420 31508301643825445955 315090016438404459520 315097016438914459571TX_S_232 53081184false0164390144597116439634459763R_TX_S_233 315100 31510099016439674459831644648446122tmp_00tmp_14 31510501644098446025 31511301644122446031 315122016441604460415 315127016441944460449 3151330164426244604117 31513601644365446075 31514001644402446085 315147016444174460820 31515301644462446095 315160016444774460920 31516901644510446105 315176016445254461020 31518201644574446115 315189016445894461120 315196016446404461171TX_S_233 53081984false0164465044613116447124461363R_TX_S_234 315199 31519999016447164461431645397446282tmp_00tmp_14 31520401644847446185 31521201644871446191 315221016449094462015 315226016449434462049 3152320164501144620117 31523501645114446235 31523901645151446245 315246016451664462420 31525201645211446255 315259016452264462520 31526801645259446265 315275016452744462620 31528101645323446275 315288016453384462720 315295016453894462771TX_S_234 53082784false0164539944629116454614462963R_TX_S_235 315298 31529899016454654463031646130446442tmp_00tmp_14 31530301645596446345 31531101645620446351 315320016456584463615 315325016456924463649 3153310164575644636113 31533401645855446395 31533801645888446405 315345016459034464020 31535101645944446415 315358016459594464120 31536701645992446425 315374016460074464220 31538001646056446435 315387016460714464320 315394016461224464371TX_S_235 53083584false0164613244645116461944464563R_TX_S_236 315397 315397117016461984464631646718446572 315400016462294464719 315405016462634464753 315411016463024464792 31541401646376446505 31541801646399446515 315425016464144465120 31543201646446446525 315439016464614465220 31544501646486446535 315464016465354465354 31546801646565446545 315475016465804465420 31548101646615446555 315488016466304465520 31549801646662446565 315505016466774465620 315511016467104465653TX_S_236 53084384false0164672044658116467784465859R_TX_S_237 315514 315514117016467824465931647302446702 315517016468134466019 315522016468474466053 315528016468864466092 31553101646960446635 31553501646983446645 315542016469984466420 31554901647030446655 315556016470454466520 31556201647070446665 315581016471194466654 31558501647149446675 315592016471644466720 31559801647199446685 315605016472144466820 31561501647246446695 315622016472614466920 315628016472944466953TX_S_237 53085184false0164730444671116473624467159R_TX_S_238 315631 315631119016473664467231647908446832 315634016473974467319 315639016474314467353 315645016474774467399 31564801647558446765 31565201647588446775 315659016476034467720 31566801647636446785 315675016476514467820 31568101647676446795 315700016477254467954 31570401647755446805 315711016477704468020 31571701647805446815 315724016478204468120 31573401647852446825 315741016478674468220 315747016479004468253TX_S_238 53085984false0164791044684116479684468459R_TX_S_239 315750 315750119016479724468531648514446962 315753016480034468619 315758016480374468653 315764016480834468699 31576701648164446895 31577101648194446905 315778016482094469020 31578701648242446915 315794016482574469120 31580001648282446925 315819016483314469254 31582301648361446935 315830016483764469320 31583601648411446945 315843016484264469420 31585301648458446955 315860016484734469520 315866016485064469553TX_S_239 53086784false0164851644697116485744469759R_TX_S_240 315869 315869154016485784469831649629447202tmp_00 315874016486674470119 315879016487014470153 315885016488174470245 31588801648964447055 31589201648991447065 315899016490064470620 31590501649033447075 315912016490484470720 31591901649080447085 315926016490954470820 31593201649123447095 315951016491724470954 31595501649216447105 315962016492314471020 31596801649305447126 315975016493544471255 31597801649388447135 315985016494034471320 31599101649441447156 31599401649486447165 316001016495014471620 31600701649573447195 316014016495884471920 316020016496214471953TX_S_240 53087584false0164963144721116496894472159R_TX_S_241 316023 31602376016496934472231650211447332tmp_00 31602801649767447255 316036016498054472615 316041016498394472649 3160470164989044726100 31605001649976447295 31605401650031447305 316061016500464473020 31606701650103447315 316074016501184473120 31608301650155447325 316090016501704473220 316096016502034473253TX_S_241 53088384false0165021344734116502754473463R_TX_S_242 316099 316099181016502794473531650867447462 316102016503104473619 316107016503444473653 3161130165039944736108 31611601650489447395 31612001650512447405 316127016505274474020 31613401650559447415 316141016505744474120 31614701650599447425 316166016506484474254 31617001650677447435 316177016506924474320 31618301650743447445 316190016507584474420 31626401650811447455 316271016508264474520 316277016508594474553TX_S_242 53089184false0165086944747116509274474759R_TX_S_243 316280 316280181016509314474831651531447592 316283016509624474919 316288016509964474953 3162940165105444749111 31629701651147447525 31630101651170447535 316308016511854475320 31631501651217447545 316322016512324475420 31632801651257447555 316347016513064475554 31635101651338447565 316358016513534475620 31636401651407447575 316371016514224475720 31644501651475447585 316452016514904475820 316458016515234475853TX_S_243 53089984false0165153344760116515914476059R_TX_S_244 316461 316461183016515954476131652217447722 316464016516264476219 316469016516604476253 3164750165172544762118 31647801651825447655 31648201651855447665 316489016518704476620 31649801651903447675 316505016519184476720 31651101651943447685 316530016519924476854 31653401652024447695 316541016520394476920 31654701652093447705 316554016521084477020 31662801652161447715 316635016521764477120 316641016522094477153TX_S_244 53090784false0165221944773116522774477359R_TX_S_245 316644 316644182016522814477431653354447962 316647016523124477519 316652016523464477553 316658016524644477645 31666101652613447795 31666501652640447805 316672016526554478020 31667801652682447815 316685016526974478120 31669201652729447825 316699016527444478220 31670501652772447835 316724016528214478354 31672801652849447845 316735016528644478420 31674101652897447855 316748016529124478520 31675801652951447865 316765016529664478620 31677101653028447886 316778016530774478855 31678101653112447895 316788016531274478920 31679401653166447916 31679701653211447925 316804016532264479220 31681001653298447955 316817016533134479520 316823016533464479553TX_S_245 53091584false0165335644797116534144479759R_TX_S_246 316826 316826119016534184479831653956448092 316829016534494479919 316834016534834479953 316840016535284479998 31684301653608448025 31684701653638448035 316854016536534480320 31686301653686448045 316870016537014480420 31687601653726448055 316895016537754480554 31689901653804448065 316906016538194480620 31691201653853448075 316919016538684480720 31692901653900448085 316936016539154480820 316942016539484480853TX_S_246 53092384false0165395844810116540164481059R_TX_S_247 316945 31694537016540204481131654254448172 316948016540514481219 316953016540854481253 316959016541054481273 31696201654160448155 31696601654191448165 316973016542064481620 316979016542464481660TX_S_247 53093184false0165425644818116543144481859R_TX_S_248 316982 31698285016543184481931654882448322tmp_00tmp_14 31698701654472448235 31699501654496448241 317004016545344482515 317009016545684482549 317015016546104482591 31701801654687448285 31702201654715448295 317029016547304482920 31703501654778448305 317042016547934483020 31705101654826448315 317058016548414483120 317064016548744483153TX_S_248 53093984false0165488444833116549464483363R_TX_S_249 317067 31706785016549504483431655514448472tmp_00tmp_14 31707201655104448385 31708001655128448391 317089016551664484015 317094016552004484049 317100016552424484091 31710301655319448435 31710701655347448445 317114016553624484420 31712001655410448455 317127016554254484520 31713601655458448465 317143016554734484620 317149016555064484653TX_S_249 53094784false0165551644848116555784484863R_TX_S_250 317152 317152159016555824484931656321448622 317155016556134485019 317160016556474485053 3171660165571144850117 31716901655810448535 31717301655833448545 317180016558484485420 31718701655880448555 317194016558954485520 31720001655920448565 317219016559684485653 31722301656009448575 317230016560244485720 31723601656064448585 317243016560794485820 31725001656111448595 317257016561264485920 31726301656157448605 317291016562244486072 31729501656257448615 317302016562724486120 317308016563134486161TX_S_250 53095584false0165632344863116563814486359R_TX_S_251 317311 31731189016563854486431656824448732 317314016564164486519 317319016564504486553 317325016564884486591 31732801656561448685 31733201656591448695 317339016566064486920 31734801656639448705 317355016566544487020 31736101656680448715 317380016567294487154 31738401656761448725 317391016567764487220 317397016568164487260TX_S_251 53096384false0165682644874116568844487459R_TX_S_252 317400 31740087016568884487531657422448842 317403016569194487619 317408016569534487653 3174140165701344876113 31741701657108448795 31742101657131448805 317428016571464488020 31743501657178448815 317442016571934488120 31744801657218448825 317467016572674488254 31747101657329448835 317478016573444488320 317484016574144488390TX_S_252 53097184false0165742444885116574824488559R_TX_S_253 317487 31748767016574864488631657814448942 317490016575174488719 317495016575514488753 317501016575774488779 31750401657638448905 31750801657664448915 317515016576794489120 31752101657711448925 317528016577264489220 31753801657758448935 317545016577734489320 317551016578064489353TX_S_253 53097984false0165781644895116578744489559R_TX_S_254 317554 31755490016578784489631658305449052 317557016579094489719 317562016579434489753 317568016579784489788 31757101658048449005 31757501658077449015 317582016580924490120 31759201658124449025 317599016581394490220 31760501658164449035 317624016582124490353 31762801658243449045 317635016582584490420 317641016582974490459TX_S_254 53098784false0165830744906116583654490659R_TX_S_255 317644 31764467016583694490731658697449152 317647016584004490819 317652016584344490853 317658016584604490879 31766101658521449115 31766501658547449125 317672016585624491220 31767801658594449135 317685016586094491320 31769501658641449145 317702016586564491420 317708016586894491453TX_S_255 53099584false0165869944916116587574491659R_TX_S_256 317711 317711184016587614491731659972449422 317714016587924491819 317719016588264491853 317725016589724491962 31772801659149449225 31773201659178449235 317739016591934492320 31774901659225449245 317756016592404492420 31776201659265449255 317781016593134492553 31778501659338449265 317792016593534492620 31779801659408449286 317805016594574492855 31780801659495449295 317815016595104492920 31782101659594449325 317828016596094493220 31783401659668449346 317847016597054493443 31785001659736449355 317857016597514493520 31786301659786449376 31786601659830449385 317873016598454493820 31787901659916449415 317886016599314494120 317892016599644494153TX_S_256 53100384false0165997444943116600324494359R_TX_S_257 317895 317895117016600364494431660624449552 317898016600674494519 317903016601014494553 3179090166015744945109 31791201660248449485 31791601660271449495 317923016602864494920 31793001660318449505 317937016603334495020 31794301660358449515 317962016604074495154 31796601660454449525 317973016604694495220 31797901660521449535 317986016605364495320 31799601660568449545 318003016605834495420 318009016606164495453TX_S_257 53101184false0166062644956116606844495659R_TX_S_258 318012 318012119016606884495731661257449682 318015016607194495819 318020016607534495853 3180260166080644958106 31802901660894449615 31803301660924449625 318040016609394496220 31804901660972449635 318056016609874496320 31806201661013449645 318081016610624496454 31808501661098449655 318092016611134496520 31809801661154449665 318105016611694496620 31811501661201449675 318122016612164496720 318128016612494496753TX_S_258 53101984false0166125944969116613174496959R_TX_S_259 318131 31813187016613214497031661790449792 318134016613524497119 318139016613864497153 318145016614304497197 31814801661509449745 31815201661532449755 318159016615474497520 31816601661579449765 318173016615944497620 31817901661620449775 318198016616694497754 31820201661714449785 318209016617294497820 318215016617824497873TX_S_259 53102784false0166179244980116618504498059R_TX_S_260 318218 318218119016618544498131662403449922 318221016618854498219 318226016619194498253 3182320166196744982101 31823501662050449855 31823901662080449865 318246016620954498620 31825501662128449875 318262016621434498720 31826801662169449885 318287016622184498854 31829101662249449895 318298016622644498920 31830401662300449905 318311016623154499020 31832101662347449915 318328016623624499120 318334016623954499153TX_S_260 53103584false0166240544993116624634499359R_TX_S_261 318337 31833787016624674499431662936450032 318340016624984499519 318345016625324499553 318351016625764499597 31835401662655449985 31835801662678449995 318365016626934499920 31837201662725450005 318379016627404500020 31838501662766450015 318404016628154500154 31840801662860450025 318415016628754500220 318421016629284500273TX_S_261 53104384false0166293845004116629964500459R_TX_S_262 318424 318424162016630004500531663745450182 318427016630314500619 318432016630654500653 3184380166313245006120 31844101663234450095 31844501663257450105 318452016632724501020 31845901663304450115 318466016633194501120 31847201663350450125 318500016634174501272 31850401663456450135 318511016634714501320 31851701663515450145 318524016635304501420 31853401663562450155 318541016635774501520 31854701663602450165 318566016636504501653 31857001663682450175 318577016636974501720 318583016637374501760TX_S_262 53105184false0166374745019116638054501959R_TX_S_263 318586 31858667016638094502031664137450282 318589016638404502119 318594016638744502153 318600016639004502179 31860301663961450245 31860701663987450255 318614016640024502520 31862001664034450265 318627016640494502620 31863701664081450275 318644016640964502720 318650016641294502753TX_S_263 53105984false0166413945029116641974502959R_TX_S_264 318653 31865390016642014503031664628450392 318656016642324503119 318661016642664503153 318667016643014503188 31867001664371450345 31867401664400450355 318681016644154503520 31869101664447450365 318698016644624503620 31870401664487450375 318723016645354503753 31872701664566450385 318734016645814503820 318740016646204503859TX_S_264 53106784false0166463045040116646884504059R_TX_S_265 318743 31874367016646924504131665020450492 318746016647234504219 318751016647574504253 318757016647834504279 31876001664844450455 31876401664870450465 318771016648854504620 31877701664917450475 318784016649324504720 31879401664964450485 318801016649794504820 318807016650124504853TX_S_265 53107584false0166502245050116650804505059R_TX_S_266 318810 318810117016650844505131665636450622 318813016651154505219 318818016651494505253 3188240166519745052101 31882701665280450555 31883101665306450565 318838016653214505620 31884501665353450575 318852016653684505720 31885801665393450585 318877016654414505853 31888101665477450595 318888016654924505920 31889401665533450605 318901016655484506020 31891101665580450615 318918016655954506120 318924016656284506153TX_S_266 53108384false0166563845063116656964506359R_TX_S_267 318927 318927119016657004506431666231450752 318930016657314506519 318935016657654506553 318941016658094506597 31894401665888450685 31894801665918450695 318955016659334506920 31896401665966450705 318971016659814507020 31897701666009450715 318996016660584507154 31900001666083450725 319007016660984507220 31901301666128450735 319020016661434507320 31903001666175450745 319037016661904507420 319043016662234507453TX_S_267 53109184false0166623345076116662914507659R_TX_S_268 319046 319046117016662954507731666902450882 319049016663264507819 319054016663604507853 3190600166642245078115 31906301666519450815 31906701666542450825 319074016665574508220 31908101666589450835 319088016666044508320 31909401666634450845 319113016666834508454 31911701666731450855 319124016667464508520 31913001666799450865 319137016668144508620 31914701666846450875 319154016668614508720 319160016668944508753TX_S_268 53109984false0166690445089116669624508959R_TX_S_269 319163 319163119016669664509031667503451012 319166016669974509119 319171016670314509153 319177016670764509198 31918001667156450945 31918401667186450955 319191016672014509520 31920001667234450965 319207016672494509620 31921301667275450975 319232016673244509754 31923601667352450985 319243016673674509820 31924901667400450995 319256016674154509920 31926601667447451005 319273016674624510020 319279016674954510053TX_S_269 53110784false0166750545102116675634510259R_TX_S_270 319282 319282167016675674510331668408451172 319285016675984510419 319290016676324510453 3192960166771745104138 31929901667837451075 31930301667876451085 319310016678914510820 31932001667936451095 319327016679514510920 31933401667983451105 319341016679984511020 31934701668025451115 319366016680744511154 31937001668120451125 319377016681354511220 31938301668180451135 319390016681954511320 31939701668227451145 319404016682424511420 31941001668267451155 319429016683164511554 31943301668347451165 319440016683624511620 319446016684004511658TX_S_270 53111584false0166841045118116684684511859R_TX_S_271 319449 319449120016684724511931669382451372 319452016685034512019 319457016685374512053 319463016686604512145 31946601668814451245 31947001668853451255 319477016688684512520 31948701668915451265 319494016689304512620 31950101668976451275 319508016689914512720 31951401669060451296 319521016691094512955 31952401669143451305 319531016691584513020 31953701669196451326 31954001669240451335 319547016692554513320 31955301669326451365 319560016693414513620 319566016693744513653TX_S_271 53112384false0166938445138116694424513859R_TX_S_272 319569 319569139016694464513931670082451512 319572016694774514019 319577016695114514053 3195830166956745140109 31958601669658451435 31959001669687451445 319597016697024514420 31960301669731451455 319610016697464514520 31961701669778451465 319624016697934514620 31963001669825451475 319658016698914514771 31966201669925451485 319669016699404514820 31967501669979451495 319682016699944514920 31969201670026451505 319699016700414515020 319705016700744515053TX_S_272 53113184false0167008445152116701424515259R_TX_S_273 319708 319708104016701464515331670767451632 319711016701774515419 319716016702114515453 3197220167028745154129 31972501670398451575 31972901670444451585 319736016704594515820 31974601670506451595 319753016705214515920 31976001670553451605 319767016705684516020 31977301670595451615 319792016706444516154 31979601670690451625 319803016707054516220 319809016707594516274TX_S_273 53113984false0167076945164116708274516459R_TX_S_274 319812 319812117016708314516531671334451762 319815016708624516619 319820016708964516653 319826016709314516688 31982901671001451695 31983301671024451705 319840016710394517020 31984701671071451715 319854016710864517120 31986001671112451725 319879016711614517254 31988301671186451735 319890016712014517320 31989601671231451745 319903016712464517420 31991301671278451755 319920016712934517520 319926016713264517553TX_S_274 53114784false0167133645177116713944517759R_TX_S_275 319929 319929119016713984517831671923451892 319932016714294517919 319937016714634517953 319943016715054517995 31994601671582451825 31995001671612451835 319957016716274518320 31996601671660451845 319973016716754518420 31997901671701451855 319998016717504518554 32000201671775451865 320009016717904518620 32001501671820451875 320022016718354518720 32003201671867451885 320039016718824518820 320045016719154518853TX_S_275 53115584false0167192545190116719834519059R_TX_S_276 320048 320048167016719874519131672836452052 320051016720184519219 320056016720524519253 3200620167213945192140 32006501672261451955 32006901672300451965 320076016723154519620 32008601672360451975 320093016723754519720 32010001672407451985 320107016724224519820 32011301672449451995 320132016724984519954 32013601672544452005 320143016725594520020 32014901672604452015 320156016726194520120 32016301672651452025 320170016726664520220 32017601672691452035 320195016727404520354 32019901672773452045 320206016727884520420 320212016728284520460TX_S_276 53116384false0167283845206116728964520659R_TX_S_277 320215 320215120016729004520731673818452252 320218016729314520819 320223016729654520853 320229016730904520945 32023201673246452125 32023601673285452135 320243016733004521320 32025301673347452145 320260016733624521420 32026701673410452155 320274016734254521520 32028001673496452176 320287016735454521755 32029001673579452185 320297016735944521820 32030301673632452206 32030601673676452215 320313016736914522120 32031901673762452245 320326016737774522420 320332016738104522453TX_S_277 53117184false0167382045226116738784522659R_TX_S_278 320335 320335104016738824522731674503452372 320338016739134522819 320343016739474522853 3203490167402345228129 32035201674134452315 32035601674180452325 320363016741954523220 32037301674242452335 320380016742574523320 32038701674289452345 320394016743044523420 32040001674331452355 320419016743804523554 32042301674426452365 320430016744414523620 320436016744954523674TX_S_278 53117984false0167450545238116745634523859R_TX_S_279 320439 320439117016745674523931675076452502 320442016745984524019 320447016746324524053 320453016746694524090 32045601674741452435 32046001674764452445 320467016747794524420 32047401674811452455 320481016748264524520 32048701674854452465 320506016749034524654 32051001674928452475 320517016749434524720 32052301674973452485 320530016749884524820 32054001675020452495 320547016750354524920 320553016750684524953TX_S_279 53118784false0167507845251116751364525159R_TX_S_280 320556 320556119016751404525231675671452632 320559016751714525319 320564016752054525353 320570016752494525397 32057301675328452565 32057701675358452575 320584016753734525720 32059301675406452585 320600016754214525820 32060601675449452595 320625016754984525954 32062901675523452605 320636016755384526020 32064201675568452615 320649016755834526120 32065901675615452625 320666016756304526220 320672016756634526253TX_S_280 53119584false0167567345264116757314526459R_TX_S_281 320675 320675167016757354526531676540452792 320678016757664526619 320683016758004526653 3206890167587645266129 32069201675987452695 32069601676026452705 320703016760414527020 32071301676085452715 320720016761004527120 32072701676132452725 320734016761474527220 32074001676175452735 320759016762244527354 32076301676259452745 320770016762744527420 32077601676308452755 320783016763234527520 32079001676355452765 320797016763704527620 32080301676395452775 320822016764444527754 32082601676477452785 320833016764924527820 320839016765324527860TX_S_281 53120384false0167654245280116766004528059R_TX_S_282 320842 32084268016766044528131677036452892 320845016766354528219 320850016766694528253 3208560167672245282106 32085901676810452855 32086301676849452865 320870016768644528620 32088001676911452875 320887016769264528720 32089401676969452885 320901016769844528820 320907016770284528864TX_S_282 53121184false0167703845290116770964529059R_TX_S_283 320910 320910119016771004529131677643453022 320913016771314529219 320918016771654529253 3209240167721245292100 32092701677294452955 32093101677324452965 320938016773394529620 32094701677372452975 320954016773874529720 32096001677415452985 320979016774644529854 32098301677489452995 320990016775044529920 32099601677534453005 321003016775494530020 32101301677584453015 321020016775994530120 321026016776354530156TX_S_283 53121984false0167764545303116777034530359R_TX_S_284 321029 321029167016777074530431678512453182 321032016777384530519 321037016777724530553 3210430167784845305129 32104601677959453085 32105001677998453095 321057016780134530920 32106701678057453105 321074016780724531020 32108101678104453115 321088016781194531120 32109401678147453125 321113016781964531254 32111701678231453135 321124016782464531320 32113001678280453145 321137016782954531420 32114401678327453155 321151016783424531520 32115701678367453165 321176016784164531654 32118001678449453175 321187016784644531720 321193016785044531760TX_S_284 53122784false0167851445319116785724531959R_TX_S_285 321196 32119668016785764532031679012453282 321199016786074532119 321204016786414532153 3212100167869545321107 32121301678784453245 32121701678823453255 321224016788384532520 32123401678885453265 321241016789004532620 32124801678944453275 321255016789594532720 321261016790044532765TX_S_285 53123584false0167901445329116790724532959R_TX_S_286 321264 321264119016790764533031679623453412 321267016791074533119 321272016791414533153 3212780167918945331101 32128101679272453345 32128501679302453355 321292016793174533520 32130101679350453365 321308016793654533620 32131401679393453375 321333016794424533754 32133701679467453385 321344016794824533820 32135001679512453395 321357016795274533920 32136701679563453405 321374016795784534020 321380016796154534057TX_S_286 53124384false0167962545342116796834534259R_TX_S_287 321383 321383167016796874534331680484453572 321386016797184534419 321391016797524534453 3213970167982645344127 32140001679935453475 32140401679974453485 321411016799894534820 32142101680033453495 321428016800484534920 32143501680080453505 321442016800954535020 32144801680123453515 321467016801724535154 32147101680207453525 321478016802224535220 32148401680256453535 321491016802714535320 32149801680303453545 321505016803184535420 32151101680343453555 321530016803924535554 32153401680423453565 321541016804384535620 321547016804764535658TX_S_287 53125184false0168048645358116805444535859R_TX_S_288 321550 321550104016805484535931681108453692 321553016805794536019 321558016806134536053 3215640168067245360112 32156701680766453635 32157101680805453645 321578016808204536420 32158801680864453655 321595016808794536520 32160201680911453665 321609016809264536620 32161501680952453675 321634016810014536754 32163801681039453685 321645016810544536820 321651016811004536866TX_S_288 53125984false0168111045370116811684537059R_TX_S_289 321654 32165468016811724537131681612453792 321657016812034537219 321662016812374537253 3216680168129245372108 32167101681382453755 32167501681421453765 321682016814364537620 32169201681483453775 321699016814984537720 32170601681543453785 321713016815584537820 321719016816044537866TX_S_289 53126784false0168161445380116816724538059R_TX_S_290 321722 321722117016816764538131682223453922 321725016817074538219 321730016817414538253 321736016817874538299 32173901681868453855 32174301681891453865 321750016819064538620 32175701681938453875 321764016819534538720 32177001681979453885 321789016820284538854 32179301682053453895 321800016820684538920 32180601682098453905 321813016821134539020 32182301682156453915 321830016821714539120 321836016822154539164TX_S_290 53127584false0168222545393116822834539359R_TX_S_291 321839 321839117016822874539431682790454052 321842016823184539519 321847016823524539553 321853016823874539588 32185601682457453985 32186001682480453995 321867016824954539920 32187401682527454005 321881016825424540020 32188701682568454015 321906016826174540154 32191001682642454025 321917016826574540220 32192301682687454035 321930016827024540320 32194001682734454045 321947016827494540420 321953016827824540453TX_S_291 53128384false0168279245406116828504540659R_TX_S_292 321956 321956119016828544540731683379454182 321959016828854540819 321964016829194540853 321970016829614540895 32197301683038454115 32197701683068454125 321984016830834541220 32199301683116454135 322000016831314541320 32200601683157454145 322025016832064541454 32202901683231454155 322036016832464541520 32204201683276454165 322049016832914541620 32205901683323454175 322066016833384541720 322072016833714541753TX_S_292 53129184false0168338145419116834394541959R_TX_S_293 322075 32207590016834434542031683850454292 322078016834744542119 322083016835084542153 322089016835384542183 32209201683603454245 32209601683632454255 322103016836474542520 32211301683679454265 322120016836944542620 32212601683720454275 322145016837694542754 32214901683794454285 322156016838094542820 322162016838424542853TX_S_293 53129984false0168385245430116839104543059R_TX_S_294 322165 322165167016839144543131684715454452 322168016839454543219 322173016839794543253 3221790168405445432128 32218201684164454355 32218601684203454365 322193016842184543620 32220301684262454375 322210016842774543720 32221701684309454385 322224016843244543820 32223001684352454395 322249016844014543954 32225301684436454405 322260016844514544020 32226601684485454415 322273016845004544120 32228001684532454425 322287016845474544220 32229301684572454435 322312016846214544354 32231601684653454445 322323016846684544420 322329016847074544459TX_S_294 53130784false0168471745446116847754544659R_TX_S_295 322332 32233268016847794544731685227454552 322335016848104544819 322340016848444544853 3223460168490145448110 32234901684993454515 32235301685032454525 322360016850474545220 32237001685094454535 322377016851094545320 32238401685156454545 322391016851714545420 322397016852194545468TX_S_295 53131584false0168522945456116852874545659R_TX_S_296 322400 322400117016852914545731685797454682 322403016853224545819 322408016853564545853 322414016853924545889 32241701685463454615 32242101685486454625 322428016855014546220 32243501685533454635 322442016855484546320 32244801685575454645 322467016856244546454 32247101685649454655 322478016856644546520 32248401685694454665 322491016857094546620 32250101685741454675 322508016857564546720 322514016857894546753TX_S_296 53132384false0168579945469116858574546959R_TX_S_297 322517 322517119016858614547031686389454812 322520016858924547119 322525016859264547153 322531016859694547196 32253401686047454745 32253801686077454755 322545016860924547520 32255401686125454765 322561016861404547620 32256701686167454775 322586016862164547754 32259001686241454785 322597016862564547820 32260301686286454795 322610016863014547920 32262001686333454805 322627016863484548020 322633016863814548053TX_S_297 53133184false0168639145482116864494548259R_TX_S_298 322636 32263690016864534548331686863454922 322639016864844548419 322644016865184548453 322650016865494548484 32265301686615454875 32265701686644454885 322664016866594548820 32267401686691454895 322681016867064548920 32268701686733454905 322706016867824549054 32271001686807454915 322717016868224549120 322723016868554549153TX_S_298 53133984false0168686545493116869234549359R_TX_S_299 322726 322726140016869274549431687570455062 322729016869584549519 322734016869924549553 3227400168705045495111 32274301687143454985 32274701687166454995 322754016871814549920 32276101687213455005 322768016872284550020 32277401687260455015 322802016873274550172 32280601687352455025 322813016873674550220 32281901687407455035 322826016874224550320 32283601687467455045 322843016874824550420 32285001687514455055 322857016875294550520 322863016875624550553TX_S_299 53134784false0168757245507116876304550759R_TX_S_300 322866 322866131016876344550831688279455202 322869016876654550919 322874016876994550953 3228800168776145509115 32288301687858455125 32288701687881455135 322894016878964551320 32290101687928455145 322908016879434551420 32291401687971455155 322933016880204551554 32293701688053455165 322944016880684551620 32295001688116455175 322957016881314551720 32296701688176455185 322974016881914551820 32298101688223455195 322988016882384551920 322994016882714551953TX_S_300 53135584false0168828145521116883394552159R_TX_S_301 322997 322997118016883434552231688969455332 323000016883744552319 323005016884084552353 3230110168847445523119 32301401688575455265 32301801688598455275 323025016886134552720 32303201688645455285 323051016886944552854 32305501688735455295 323062016887504552920 32306801688806455305 323075016888214553020 32308501688866455315 323092016888814553120 32309901688913455325 323106016889284553220 323112016889614553253TX_S_301 53136384false0168897145534116890294553459R_TX_S_302 323115 323115117016890334553531689545455462 323118016890644553619 323123016890984553653 323129016891354553690 32313201689207455395 32313601689230455405 323143016892454554020 32315001689277455415 323157016892924554120 32316301689317455425 323182016893664554254 32318601689394455435 323193016894094554320 32319901689442455445 323206016894574554420 32321601689489455455 323223016895044554520 323229016895374554553TX_S_302 53137184false0168954745547116896054554759R_TX_S_303 323232 323232119016896094554831690143455592 323235016896404554919 323240016896744554953 323246016897184554997 32324901689797455525 32325301689827455535 323260016898424555320 32326901689875455545 323276016898904555420 32328201689915455555 323301016899644555554 32330501689992455565 323312016900074555620 32331801690040455575 323325016900554555720 32333501690087455585 323342016901024555820 323348016901354555853TX_S_303 53137984false0169014545560116902034556059R_TX_S_304 323351 323351117016902074556131690748455722 323354016902384556219 323359016902724556253 323365016903174556298 32336801690397455655 32337201690420455665 323379016904354556620 32338601690467455675 323393016904824556720 32339901690510455685 323418016905594556854 32342201690592455695 323429016906074556920 32343501690645455705 323442016906604557020 32345201690692455715 323459016907074557120 323465016907404557153TX_S_304 53138784false0169075045573116908084557359R_TX_S_305 323468 32346874016908124557431691288455822 323471016908434557519 323476016908774557553 3234820169093245575108 32348501691022455785 32348901691045455795 323496016910604557920 32350301691092455805 323522016911414558054 32352601691199455815 323533016912144558120 323539016912804558186TX_S_305 53139584false0169129045583116913484558359R_TX_S_306 323542 323542117016913524558431691871455952 323545016913834558519 323550016914174558553 323556016914564558592 32355901691530455885 32356301691553455895 323570016915684558920 32357701691600455905 323584016916154559020 32359001691641455915 323609016916904559154 32361301691719455925 323620016917344559220 32362601691768455935 323633016917834559320 32364301691815455945 323650016918304559420 323656016918634559453TX_S_306 53140384false0169187345596116919314559659R_TX_S_307 323659 323659119016919354559731692476456082 323662016919664559819 323667016920004559853 323673016920464559899 32367601692127456015 32368001692157456025 323687016921724560220 32369601692205456035 323703016922204560320 32370901692246456045 323728016922954560454 32373201692324456055 323739016923394560520 32374501692373456065 323752016923884560620 32376201692420456075 323769016924354560720 323775016924684560753TX_S_307 53141184false0169247845609116925364560959R_TX_S_308 323778 323778117016925404561031693081456212 323781016925714561119 323786016926054561153 323792016926504561198 32379501692730456145 32379901692753456155 323806016927684561520 32381301692800456165 323820016928154561620 32382601692843456175 323845016928924561754 32384901692925456185 323856016929404561820 32386201692978456195 323869016929934561920 32387901693025456205 323886016930404562020 323892016930734562053TX_S_308 53141984false0169308345622116931414562259R_TX_S_309 323895 323895153016931454562331693813456362 323898016931764562419 323903016932104562453 3239090169326645624109 32391201693357456275 32391601693380456285 323923016933954562820 32393001693427456295 323937016934424562920 32394301693474456305 323971016935414563072 32397501693566456315 323982016935814563120 32398801693611456325 323995016936264563220 32400501693661456335 324012016936764563320 32401801693710456345 324025016937254563420 32403201693757456355 324039016937724563520 324045016938054563553TX_S_309 53142784false0169381545637116938734563759R_TX_S_310 324048 32404890016938774563831694405456472 324051016939084563919 324056016939424563953 3240620169400445639115 32406501694101456425 32406901694137456435 324076016941524564320 32408601694186456445 324093016942014564420 32409901694229456455 324118016942784564554 32412201694326456465 324129016943414564620 324135016943974564676TX_S_310 53143584false0169440745648116944654564859R_TX_S_311 324138 32413881016944694564931694997456582 324141016945004565019 324146016945344565053 3241520169460445650123 32415501694709456535 32415901694746456545 324166016947614565420 32417201694804456555 324179016948194565520 32418901694855456565 324196016948704565620 32420201694923456575 324209016949384565720 324216016949894565771TX_S_311 53144384false0169499945659116950574565959R_TX_S_312 324219 32421990016950614566031695558456692 324222016950924566119 324227016951264566153 3242330169518045661107 32423601695269456645 32424001695305456655 324247016953204566520 32425701695354456665 324264016953694566620 32427001695396456675 324289016954454566754 32429301695486456685 324300016955014566820 324306016955504566869TX_S_312 53145184false0169556045670116956184567059R_TX_S_313 324309 32430990016956224567131696180456802 324312016956534567219 324317016956874567253 3243230169575645672122 32432601695860456755 32433001695896456765 324337016959114567620 32434701695945456775 324354016959604567720 32436001695985456785 324379016960334567853 32438301696091456795 324390016961064567920 324396016961724567986TX_S_313 53145984false0169618245681116962404568159R_TX_S_314 324399 324399147016962444568231696896456952 324402016962754568319 324407016963094568353 3244130169636545683109 32441601696456456865 32442001696479456875 324427016964944568720 32443401696526456885 324441016965414568820 32444701696567456895 324466016966164568954 32447001696641456905 324477016966564569020 32448301696686456915 324490016967014569120 32450001696736456925 324507016967514569220 32451301696791456935 324520016968064569320 32453001696840456945 324537016968554569420 324543016968884569453TX_S_314 53146784false0169689845696116969564569659R_TX_S_315 324546 324546146016969604569731697593457102 324549016969914569819 324554016970254569853 3245600169707545698103 32456301697160457015 32456701697190457025 324574016972054570220 32458301697238457035 324590016972534570320 32459601697279457045 324615016973284570454 32461901697353457055 324626016973684570520 32463201697398457065 324639016974134570620 32464901697448457075 324656016974634570720 32466201697490457085 324669016975054570820 32467601697537457095 324683016975524570920 324689016975854570953TX_S_315 53147584false0169759545711116976534571159R_TX_S_316 324692 324692149016976574571231698331457252 324695016976884571319 324700016977224571353 3247060169778545713116 32470901697883457165 32471301697913457175 324720016979284571720 32472901697961457185 324736016979764571820 32474201698002457195 324761016980514571954 32476501698076457205 324772016980914572020 32477801698121457215 324785016981364572120 32479501698171457225 324802016981864572220 32480801698226457235 324815016982414572320 32482501698275457245 324832016982904572420 324838016983234572453TX_S_316 53148384false0169833345726116983914572659R_TX_S_317 324841 324841117016983954572731698936457382 324844016984264572819 324849016984604572853 324855016985054572898 32485801698585457315 32486201698608457325 324869016986234573220 32487601698655457335 324883016986704573320 32488901698698457345 324908016987474573454 32491201698780457355 324919016987954573520 32492501698833457365 324932016988484573620 32494201698880457375 324949016988954573720 324955016989284573753TX_S_317 53149184false0169893845739116989964573959R_TX_S_318 324958 32495890016990004574031699474457492 324961016990314574119 324966016990654574153 3249720169911345741101 32497501699196457445 32497901699232457455 324986016992474574520 32499601699281457465 325003016992964574620 32500901699321457475 325028016993694574753 32503201699406457485 325039016994214574820 325045016994664574865TX_S_318 53149984false0169947645750116995344575059R_TX_S_319 325048 32504873016995384575131699937457592 325051016995694575219 325056016996034575253 325062016996394575289 32506501699710457555 32506901699738457565 325076016997534575620 32508201699783457575 325101016998324575754 32510501699869457585 325112016998844575820 325118016999294575865TX_S_319 53150784false0169993945760116999974576059R_TX_S_320 325121 32512181017000014576131700529457702 325124017000324576219 325129017000664576253 3251350170013645762123 32513801700241457655 32514201700278457665 325149017002934576620 32515501700336457675 325162017003514576720 32517201700387457685 325179017004024576820 32518501700455457695 325192017004704576920 325199017005214576971TX_S_320 53151584false0170053145771117005894577159R_TX_S_321 325202 32520237017005934577231700823457782 325205017006244577319 325210017006584577353 325216017006774577372 32521901700731457765 32522301700761457775 325230017007764577720 325236017008154577759TX_S_321 53152384false0170082545779117008834577959R_TX_S_322 325239 325239139017008874578031701899457992 325242017009184578119 325247017009524578153 325253017010834578266 32525601701245457855 32526001701268457865 325267017012834578620 32527401701315457875 325281017013304578720 32528701701356457885 325306017014054578854 32531001701448457895 325317017014634578920 32532301701537457916 325330017015834579152 32533301701615457925 325340017016304579220 32534601701666457946 32534901701711457955 325356017017264579520 32536201701821457985 325369017018364579820 325375017018914579875TX_S_322 53153184false0170190145800117019594580059R_TX_S_323 325378 32537873017019634580131702428458092 325381017019944580219 325386017020284580253 3253920170208145802106 32539501702169458055 32539901702201458065 325406017022164580620 32541201702252458075 325431017023014580754 32543501702349458085 325442017023644580820 325448017024204580876TX_S_323 53153984false0170243045810117024884581059R_TX_S_324 325451 32545187017024924581131702960458202 325454017025234581219 325459017025574581253 325465017026014581297 32546801702680458155 32547201702703458165 325479017027184581620 32548601702750458175 325493017027654581720 32549901702792458185 325518017028414581854 32552201702885458195 325529017029004581920 325535017029524581972TX_S_324 53154784false0170296245821117030204582159R_TX_S_325 325538 32553890017030244582231703486458312 325541017030554582319 325546017030894582353 325552017031344582398 32555501703214458265 32555901703243458275 325566017032584582720 32557601703290458285 325583017033054582820 32558901703336458295 325608017033854582954 32561201703420458305 325619017034354583020 325625017034784583063TX_S_325 53155584false0170348845832117035464583259R_TX_S_326 325628 32562887017035504583331703980458422 325631017035814583419 325636017036154583453 325642017036504583488 32564501703720458375 32564901703746458385 325656017037614583820 32566301703793458395 325670017038084583920 32567601703833458405 325695017038814584053 32569901703915458415 325706017039304584120 325712017039724584162TX_S_326 53156384false0170398245843117040404584359R_TX_S_327 325715 325715114017040444584431704594458552 325718017040754584519 325723017041094584553 3257290170415645845100 32573201704238458485 32573601704261458495 325743017042764584920 32575001704308458505 325757017043234585020 32576301704349458515 325782017043984585154 32578601704426458525 325793017044414585220 32579901704475458535 325806017044904585320 32581301704530458545 325820017045454585420 325826017045864585461TX_S_327 53157184false0170459645856117046544585659R_TX_S_328 325829 32582973017046584585731705066458652 325832017046894585819 325837017047234585853 325843017047624585892 32584601704836458615 32585001704864458625 325857017048794586220 32586301704912458635 325882017049614586354 32588601704998458645 325893017050134586420 325899017050584586465TX_S_328 53157984false0170506845866117051264586659R_TX_S_329 325902 32590287017051304586731705560458762 325905017051614586819 325910017051954586853 325916017052304586888 32591901705300458715 32592301705326458725 325930017053414587220 32593701705373458735 325944017053884587320 32595001705413458745 325969017054614587453 32597301705495458755 325980017055104587520 325986017055524587562TX_S_329 53158784false0170556245877117056204587759R_TX_S_330 325989 32598973017056244587831705975458862 325992017056554587919 325997017056894587953 326003017057134587977 32600601705772458825 32601001705800458835 326017017058154588320 32602301705845458845 326042017058944588454 32604601705919458855 326053017059344588520 326059017059674588553TX_S_330 53159584false0170597745887117060354588759R_TX_S_331 326062 32606289017060394588831706450458972 326065017060704588919 326070017061044588953 326076017061354588984 32607901706201458925 32608301706231458935 326090017062464589320 32609901706279458945 326106017062944589420 32611201706320458955 326131017063694589554 32613501706394458965 326142017064094589620 326148017064424589653TX_S_331 53160384false0170645245898117065104589859R_TX_S_332 326151 32615187017065144589931706976459082 326154017065454590019 326159017065794590053 326165017066224590096 32616801706700459035 32617201706723459045 326179017067384590420 32618601706770459055 326193017067854590520 32619901706814459065 326218017068634590654 32622201706904459075 326229017069194590720 326235017069684590769TX_S_332 53161184false0170697845909117070364590959R_TX_S_333 326238 326238116017070404591031707574459212 326241017070714591119 326246017071054591153 326252017071504591198 32625501707230459145 32625901707260459155 326266017072754591520 32627501707308459165 326282017073234591620 32628801707350459175 326307017073994591754 32631101707424459185 326318017074394591820 32632401707471459195 326331017074864591920 32633801707518459205 326345017075334592020 326351017075664592053TX_S_333 53161984false0170757645922117076344592259R_TX_S_334 326354 32635499017076384592331708113459322 326357017076694592419 326362017077034592453 326368017077484592498 32637101707828459275 32637501707857459285 326382017078724592820 32639201707904459295 326399017079194592920 32640501707955459305 326433017080224593072 32643701708052459315 326444017080674593120 326450017081054593158TX_S_334 53162784false0170811545933117081734593359R_TX_S_335 326453 326453116017081774593431708687459452 326456017082084593519 326461017082424593553 326467017082794593590 32647001708351459385 32647401708381459395 326481017083964593920 32649001708429459405 326497017084444594020 32650301708471459415 326522017085204594154 32652601708545459425 326533017085604594220 32653901708584459435 326546017085994594320 32655301708631459445 326560017086464594420 326566017086794594453TX_S_335 53163584false0170868945946117087474594659R_TX_S_336 326569 326569119017087514594731709279459582 326572017087824594819 326577017088164594853 326583017088594594896 32658601708937459515 32659001708967459525 326597017089824595220 32660601709015459535 326613017090304595320 32661901709057459545 326638017091064595454 32664201709131459555 326649017091464595520 32665501709176459565 326662017091914595620 32667201709223459575 326679017092384595720 326685017092714595753TX_S_336 53164384false0170928145959117093394595959R_TX_S_337 326688 32668887017093434596031709808459692 326691017093744596119 326696017094084596153 326702017094514596196 32670501709529459645 32670901709552459655 326716017095674596520 32672301709599459665 326730017096144596620 32673601709640459675 326755017096894596754 32675901709733459685 326766017097484596820 326772017098004596872TX_S_337 53165184false0170981045970117098684597059R_TX_S_338 326775 326775119017098724597131710400459822 326778017099034597219 326783017099374597253 326789017099804597296 32679201710058459755 32679601710088459765 326803017101034597620 32681201710136459775 326819017101514597720 32682501710178459785 326844017102274597854 32684801710252459795 326855017102674597920 32686101710297459805 326868017103124598020 32687801710344459815 326885017103594598120 326891017103924598153TX_S_338 53165984false0171040245983117104604598359R_TX_S_339 326894 326894144017104644598431711163459972 326897017104954598519 326902017105294598553 3269080171059545985119 32691101710696459885 32691501710723459895 326922017107384598920 32692801710765459905 326935017107804599020 32694201710812459915 326949017108274599120 32695501710855459925 326974017109044599254 32697801710937459935 326985017109524599320 32699101711000459945 326998017110154599420 32700801711060459955 327015017110754599520 32702201711107459965 327029017111224599620 327035017111554599653TX_S_339 53166784false0171116545998117112234599859R_TX_S_340 327038 327038117017112274599931711730460102 327041017112584600019 327046017112924600053 327052017113274600088 32705501711397460035 32705901711420460045 327066017114354600420 32707301711467460055 327080017114824600520 32708601711508460065 327105017115574600654 32710901711582460075 327116017115974600720 32712201711627460085 327129017116424600820 32713901711674460095 327146017116894600920 327152017117224600953TX_S_340 53167584false0171173246011117117904601159R_TX_S_341 327155 327155119017117944601231712319460232 327158017118254601319 327163017118594601353 327169017119014601395 32717201711978460165 32717601712008460175 327183017120234601720 32719201712056460185 327199017120714601820 32720501712097460195 327224017121464601954 32722801712171460205 327235017121864602020 32724101712216460215 327248017122314602120 32725801712263460225 327265017122784602220 327271017123114602253TX_S_341 53168384false0171232146024117123794602459R_TX_S_342 327274 327274104017123834602531712947460352 327277017124144602619 327282017124484602653 3272880171250846026113 32729101712603460295 32729501712642460305 327302017126574603020 32731201712701460315 327319017127164603120 32732601712748460325 327333017127634603220 32733901712788460335 327358017128364603353 32736201712876460345 327369017128914603420 327375017129394603468TX_S_342 53169184false0171294946036117130074603659R_TX_S_343 327378 32737887017130114603731713436460462 327381017130424603819 327386017130764603853 327392017131094603886 32739501713177460415 32739901713200460425 327406017132154604220 32741301713247460435 327420017132624604320 32742601713287460445 327445017133354604453 32744901713370460455 327456017133854604520 327462017134284604563TX_S_343 53169984false0171343846047117134964604759R_TX_S_344 327465 32746599017135004604831713975460572 327468017135314604919 327473017135654604953 327479017136104604998 32748201713690460525 32748601713719460535 327493017137344605320 32750301713766460545 327510017137814605420 32751601713817460555 327544017138844605572 32754801713914460565 327555017139294605620 327561017139674605658TX_S_344 53170784false0171397746058117140354605859R_TX_S_345 327564 32756473017140394605931714440460672 327567017140704606019 327572017141044606053 327578017141414606090 32758101714213460635 32758501714252460645 327592017142674606420 32759801714310460655 327617017143594606554 32762101714384460665 327628017143994606620 327634017144324606653TX_S_345 53171584false0171444246068117145004606859R_TX_S_346 327637 327637119017145044606931715029460802 327640017145354607019 327645017145694607053 327651017146114607095 32765401714688460735 32765801714718460745 327665017147334607420 32767401714766460755 327681017147814607520 32768701714807460765 327706017148564607654 32771001714881460775 327717017148964607720 32772301714926460785 327730017149414607820 32774001714973460795 327747017149884607920 327753017150214607953TX_S_346 53172384false0171503146081117150894608159R_TX_S_347 327756 327756104017150934608231715657460922 327759017151244608319 327764017151584608353 3277700171521846083113 32777301715313460865 32777701715352460875 327784017153674608720 32779401715411460885 327801017154264608820 32780801715458460895 327815017154734608920 32782101715498460905 327840017155464609053 32784401715586460915 327851017156014609120 327857017156494609168TX_S_347 53173184false0171565946093117157174609359R_TX_S_348 327860 32786087017157214609431716146461032 327863017157524609519 327868017157864609553 327874017158194609586 32787701715887460985 32788101715910460995 327888017159254609920 32789501715957461005 327902017159724610020 32790801715997461015 327927017160454610153 32793101716080461025 327938017160954610220 327944017161384610263TX_S_348 53173984false0171614846104117162064610459R_TX_S_349 327947 32794799017162104610531716685461142 327950017162414610619 327955017162754610653 327961017163204610698 32796401716400461095 32796801716429461105 327975017164444611020 32798501716476461115 327992017164914611120 32799801716527461125 328026017165944611272 32803001716624461135 328037017166394611320 328043017166774611358TX_S_349 53174784false0171668746115117167454611559R_TX_S_350 328046 32804673017167494611631717150461242 328049017167804611719 328054017168144611753 328060017168514611790 32806301716923461205 32806701716962461215 328074017169774612120 32808001717020461225 328099017170694612254 32810301717094461235 328110017171094612320 328116017171424612353TX_S_350 53175584false0171715246125117172104612559R_TX_S_351 328119 328119119017172144612631717739461372 328122017172454612719 328127017172794612753 328133017173214612795 32813601717398461305 32814001717428461315 328147017174434613120 32815601717476461325 328163017174914613220 32816901717517461335 328188017175664613354 32819201717591461345 328199017176064613420 32820501717636461355 328212017176514613520 32822201717683461365 328229017176984613620 328235017177314613653TX_S_351 53176384false0171774146138117177994613859R_TX_S_352 328238 328238104017178034613931718367461492 328241017178344614019 328246017178684614053 3282520171792846140113 32825501718023461435 32825901718062461445 328266017180774614420 32827601718121461455 328283017181364614520 32829001718168461465 328297017181834614620 32830301718208461475 328322017182564614753 32832601718296461485 328333017183114614820 328339017183594614868TX_S_352 53177184false0171836946150117184274615059R_TX_S_353 328342 32834287017184314615131718856461602 328345017184624615219 328350017184964615253 328356017185294615286 32835901718597461555 32836301718620461565 328370017186354615620 32837701718667461575 328384017186824615720 32839001718707461585 328409017187554615853 32841301718790461595 328420017188054615920 328426017188484615963TX_S_353 53177984false0171885846161117189164616159R_TX_S_354 328429 32842999017189204616231719395461712 328432017189514616319 328437017189854616353 328443017190304616398 32844601719110461665 32845001719139461675 328457017191544616720 32846701719186461685 328474017192014616820 32848001719237461695 328508017193044616972 32851201719334461705 328519017193494617020 328525017193874617058TX_S_354 53178784false0171939746172117194554617259R_TX_S_355 328528 32852873017194594617331719860461812 328531017194904617419 328536017195244617453 328542017195614617490 32854501719633461775 32854901719672461785 328556017196874617820 32856201719730461795 328581017197794617954 32858501719804461805 328592017198194618020 328598017198524618053TX_S_355 53179584false0171986246182117199204618259R_TX_S_356 328601 328601119017199244618331720449461942 328604017199554618419 328609017199894618453 328615017200314618495 32861801720108461875 32862201720138461885 328629017201534618820 32863801720186461895 328645017202014618920 32865101720227461905 328670017202764619054 32867401720301461915 328681017203164619120 32868701720346461925 328694017203614619220 32870401720393461935 328711017204084619320 328717017204414619353TX_S_356 53180384false0172045146195117205094619559R_TX_S_357 328720 32872090017205134619631721046462052 328723017205444619719 328728017205784619753 3287340172064046197115 32873701720737462005 32874101720766462015 328748017207814620120 32875801720813462025 328765017208284620220 32877101720856462035 328790017209054620354 32879401720960462045 328801017209754620420 328807017210384620483TX_S_357 53181184false0172104846206117211064620659R_TX_S_358 328810 328810104017211104620731721672462172 328813017211414620819 328818017211754620853 3288240172123546208113 32882701721330462115 32883101721369462125 328838017213844621220 32884801721428462135 328855017214434621320 32886201721475462145 328869017214904621420 32887501721518462155 328894017215674621554 32889801721604462165 328905017216194621620 328911017216644621665TX_S_358 53181984false0172167446218117217324621859R_TX_S_359 328914 32891490017217364621931722233462282 328917017217674622019 328922017218014622053 3289280172185446220106 32893101721942462235 32893501721971462245 328942017219864622420 32895201722018462255 328959017220334622520 32896501722061462265 328984017221104622654 32898801722156462275 328995017221714622720 329001017222254622774TX_S_359 53182784false0172223546229117222934622959R_TX_S_360 329004 32900490017222974623031722790462392 329007017223284623119 329012017223624623153 3290180172241446231105 32902101722501462345 32902501722530462355 329032017225454623520 32904201722577462365 329049017225924623620 32905501722620462375 329074017226694623754 32907801722714462385 329085017227294623820 329091017227824623873TX_S_360 53183584false0172279246240117228504624059R_TX_S_361 329094 32909490017228544624131723387462502 329097017228854624219 329102017229194624253 3291080172298146242115 32911101723078462455 32911501723107462465 329122017231224624620 32913201723154462475 329139017231694624720 32914501723197462485 329164017232464624854 32916801723301462495 329175017233164624920 329181017233794624983TX_S_361 53184384false0172338946251117234474625159R_TX_S_362 329184 32918499017234514625231723926462612 329187017234824625319 329192017235164625353 329198017235614625398 32920101723641462565 32920501723670462575 329212017236854625720 32922201723717462585 329229017237324625820 32923501723768462595 329263017238354625972 32926701723865462605 329274017238804626020 329280017239184626058TX_S_362 53185184false0172392846262117239864626259R_TX_S_363 329283 32928387017239904626331724452462722 329286017240214626419 329291017240554626453 329297017240984626496 32930001724176462675 32930401724199462685 329311017242144626820 32931801724246462695 329325017242614626920 32933101724290462705 329350017243394627054 32935401724380462715 329361017243954627120 329367017244444627169TX_S_363 53185984false0172445446273117245124627359R_TX_S_364 329370 329370119017245164627431725050462852 329373017245474627519 329378017245814627553 329384017246264627598 32938701724706462785 32939101724736462795 329398017247514627920 32940701724784462805 329414017247994628020 32942001724828462815 329439017248774628154 32944301724902462825 329450017249174628220 32945601724947462835 329463017249624628320 32947301724994462845 329480017250094628420 329486017250424628453TX_S_364 53186784false0172505246286117251104628659R_TX_S_365 329489 32948937017251144628731725440462932 329492017251454628819 329497017251794628853 329503017252224628896 32950601725300462915 32951001725354462925 329517017253694629220 329523017254324629283TX_S_365 53187584false0172544246294117255004629459R_TX_S_366 329526 32952637017255044629531725830463012 329529017255354629619 329534017255694629653 329540017256124629696 32954301725690462995 32954701725744463005 329554017257594630020 329560017258224630083TX_S_366 53188384false0172583246302117258904630259R_TX_S_367 329563 32956382017258944630331726374463112 329566017259254630419 329571017259594630453 3295770172601346304107 32958001726102463075 32958401726144463085 329591017261594630820 32959701726212463095 329625017262794630972 32962901726311463105 329636017263264631020 329642017263664631060TX_S_367 53189184false0172637646312117264344631259R_TX_S_368 329645 329645109017264384631331727034463232 329648017264694631419 329653017265034631453 3296590172656446314114 32966201726660463175 32966601726702463185 329673017267174631820 32967901726760463195 329698017268084631953 32970201726839463205 329709017268544632020 32971501726889463215 329734017269374632153 32973801726970463225 329745017269854632220 329751017270264632261TX_S_368 53189984false0172703646324117270944632459R_TX_S_369 329754 32975437017270984632531727368463312 329757017271294632619 329762017271634632653 329768017271924632682 32977101727256463295 32977501727296463305 329782017273114633020 329788017273604633069TX_S_369 53190784false0172737046332117274284633259R_TX_S_370 329791 32979187017274324633331727900463422 329794017274634633419 329799017274974633453 329805017275414633497 32980801727620463375 32981201727643463385 329819017276584633820 32982601727690463395 329833017277054633920 32983901727732463405 329858017277814634054 32986201727825463415 329869017278404634120 329875017278924634172TX_S_370 53191584false0172790246343117279604634359R_TX_S_371 329878 32987889017279644634431728378463532 329881017279954634519 329886017280294634553 329892017280614634585 32989501728128463485 32989901728158463495 329906017281734634920 32991501728206463505 329922017282214635020 32992801728248463515 329947017282974635154 32995101728322463525 329958017283374635220 329964017283704635253TX_S_371 53192384false0172838046354117284384635459R_TX_S_372 329967 32996787017284424635531728907463642 329970017284734635619 329975017285074635653 329981017285504635696 32998401728628463595 32998801728651463605 329995017286664636020 33000201728698463615 330009017287134636120 33001501728739463625 330034017287884636254 33003801728832463635 330045017288474636320 330051017288994636372TX_S_372 53193184false0172890946365117289674636559R_TX_S_373 330054 33005489017289714636631729388463752 330057017290024636719 330062017290364636753 330068017290694636786 33007101729137463705 33007501729167463715 330082017291824637120 33009101729215463725 330098017292304637220 33010401729258463735 330123017293074637354 33012701729332463745 330134017293474637420 330140017293804637453TX_S_373 53193984false0172939046376117294484637659R_TX_S_374 330143 33014387017294524637731729920463862 330146017294834637819 330151017295174637853 330157017295614637897 33016001729640463815 33016401729663463825 330171017296784638220 33017801729710463835 330185017297254638320 33019101729752463845 330210017298014638454 33021401729845463855 330221017298604638520 330227017299124638572TX_S_374 53194784false0172992246387117299804638759R_TX_S_375 330230 330230119017299844638831730512463992 330233017300154638919 330238017300494638953 330244017300924638996 33024701730170463925 33025101730200463935 330258017302154639320 33026701730248463945 330274017302634639420 33028001730290463955 330299017303394639554 33030301730364463965 330310017303794639620 33031601730409463975 330323017304244639720 33033301730456463985 330340017304714639820 330346017305044639853TX_S_375 53195584false0173051446400117305724640059R_TX_S_376 330349 330349126017305764640131731239464122 330352017306074640219 330357017306414640253 3303630173071446402126 33036601730822464055 33037001730853464065 330377017308684640620 33038301730915464075 330390017309304640720 33040001730974464085 330407017309894640820 33041401731024464095 330421017310394640920 33042701731077464105 330455017311444641072 33045901731176464115 330466017311914641120 330472017312314641160TX_S_376 53196384false0173124146413117312994641359R_TX_S_377 330475 33047587017313034641431731740464232 330478017313344641519 330483017313684641553 330489017314044641589 33049201731475464185 33049601731498464195 330503017315134641920 33051001731545464205 330517017315604642020 33052301731586464215 330542017316354642154 33054601731672464225 330553017316874642220 330559017317324642265TX_S_377 53197184false0173174246424117318004642459R_TX_S_378 330562 33056289017318044642531732263464342 330565017318354642619 330570017318694642653 330576017319124642696 33057901731990464295 33058301732020464305 330590017320354643020 33059901732068464315 330606017320834643120 33061201732109464325 330631017321584643254 33063501732195464335 330642017322104643320 330648017322554643365TX_S_378 53197984false0173226546435117323234643559R_TX_S_379 330651 33065196017323274643631732825464452 330654017323584643719 330659017323924643753 3306650173244146437102 33066801732525464405 33067201732548464415 330679017325634644120 33068601732595464425 330693017326104644220 33069901732645464435 330727017327124644372 33073101732753464445 330738017327684644420 330744017328174644469TX_S_379 53198784false0173282746446117328854644659R_TX_S_380 330747 33074751017328894644731733288464542 330750017329204644819 330755017329544644853 3307610173300746448106 33076401733095464515 33076801733123464525 330775017331384645220 33078201733201464535 330789017332164645320 330795017332804645384TX_S_380 53199584false0173329046455117333484645559R_TX_S_381 330798 33079894017333524645631734091464722 330801017333834645719 330806017334174645753 330812017335194645854 33081501733652464615 33081901733685464625 330826017337004646220 33083201733769464646 330844017338034646440 33084701733840464655 330854017338554646520 33086001733896464676 33086301733945464685 330870017339604646820 33087601734035464715 330883017340504647120 330889017340834647153TX_S_381 53200384false0173409346473117341514647359R_TX_S_382 330892 33089251017341554647431734554464812 330895017341864647519 330900017342204647553 3309060173427346475106 33090901734361464785 33091301734389464795 330920017344044647920 33092701734467464805 330934017344824648020 330940017345464648084TX_S_382 53201184false0173455646482117346144648259R_TX_S_383 330943 33094399017346184648331735093464922 330946017346494648419 330951017346834648453 330957017347284648498 33096001734808464875 33096401734837464885 330971017348524648820 33098101734884464895 330988017348994648920 33099401734935464905 331022017350024649072 33102601735032464915 331033017350474649120 331039017350854649158TX_S_383 53201984false0173509546493117351534649359R_TX_S_384 331042 331042117017351574649431735657465052 331045017351884649519 331050017352224649553 331056017352564649587 33105901735325464985 33106301735348464995 331070017353634649920 33107701735395465005 331084017354104650020 33109001735435465015 331109017354844650154 33111301735509465025 331120017355244650220 33112601735554465035 331133017355694650320 33114301735601465045 331150017356164650420 331156017356494650453TX_S_384 53202784false0173565946506117357174650659R_TX_S_385 331159 331159119017357214650731736243465182 331162017357524650819 331167017357864650853 331173017358274650894 33117601735903465115 33118001735933465125 331187017359484651220 33119601735981465135 331203017359964651320 33120901736021465145 331228017360704651454 33123201736095465155 331239017361104651520 33124501736140465165 331252017361554651620 33126201736187465175 331269017362024651720 331275017362354651753TX_S_385 53203584false0173624546519117363034651959R_TX_S_386 331278 331278153017363074652031737049465332 331281017363384652119 331286017363724652153 3312920173644546521126 33129501736553465245 33129901736580465255 331306017365954652520 33131201736622465265 331319017366374652620 33132601736669465275 331333017366844652720 33133901736715465285 331367017367824652872 33137101736807465295 331378017368224652920 33138401736862465305 331391017368774653020 33140101736922465315 331408017369374653120 33141501736981465325 331422017369964653220 331428017370414653265TX_S_386 53204384false0173705146534117371094653459R_TX_S_387 331431 33143187017371134653531737502465442 331434017371444653619 331439017371784653653 331445017372024653677 33144801737261465395 33145201737284465405 331459017372994654020 33146601737331465415 331473017373464654120 33147901737372465425 331498017374214654254 33150201737446465435 331509017374614654320 331515017374944654353TX_S_387 53205184false0173750446545117375624654559R_TX_S_388 331518 33151889017375664654631737977465552 331521017375974654719 331526017376314654753 331532017376624654784 33153501737728465505 33153901737758465515 331546017377734655120 33155501737806465525 331562017378214655220 33156801737847465535 331587017378964655354 33159101737921465545 331598017379364655420 331604017379694655453TX_S_388 53205984false0173797946556117380374655659R_TX_S_389 331607 33160773017380414655731738432465652 331610017380724655819 331615017381064655853 331621017381404655887 33162401738209465615 33162801738240465625 331635017382554656220 33164101738287465635 331660017383354656353 33166401738368465645 331671017383834656420 331677017384244656461TX_S_389 53206784false0173843446566117384924656659R_TX_S_390 331680 33168073017384964656731738943465752 331683017385274656819 331688017385614656853 3316940173860946568101 33169701738692465715 33170101738722465725 331708017387374657220 33171401738768465735 331733017388164657353 33173701738864465745 331744017388794657420 331750017389354657476TX_S_390 53207584false0173894546576117390034657659R_TX_S_391 331753 33175387017390074657731739506465862 331756017390384657819 331761017390724657853 3317670173912446578105 33177001739211465815 33177401739234465825 331781017392494658220 33178801739281465835 331795017392964658320 33180101739324465845 331820017393734658454 33182401739424465855 331831017394394658520 331837017394984658579TX_S_391 53208384false0173950846587117395664658759Rel_Record_0 532091484false0173957146591117397414659549Rel_Handler_0 331840 33184048017397454659631740139466112rr0task4X8Y12Z116Z220Z324Z428 33184501739986466065 331856017400214660720 331862017400404660739 331864017400654660818 33188601740130466105Rel_Record_1 532139484false0174014146612117403194661656Rel_Handler_1 331888 33188842017403234661731740716466322rr0task4X8Y12Z116Z220Z324Z428 33189301740564466275 331904017406174662838 331906017406424662918 33192801740707466315Rel_Record_3 532187484false0174071846633117408954663755Rel_Handler_3 331930 33193064017408994663831741330466532rr0task4X8Y12Z116Z220Z324Z428 33193501741140466485 331946017411754664920 331968017412314664976 331970017412564665018 33199201741321466525Rel_Record_5 532235484false0174133246654117415054665853Rel_Handler_5 331994 33199460017415094665931741935466742rr0task4X8Y12Z116Z220Z324Z428 33199901741750466695 332010017417854667020 332028017418364667071 332030017418614667118 33205201741926466735Rel_Record_15 532283484false0174193746675117422324667957Rel_Handler_15 332054 332054738017422364668031744713467492rr0task4X8Y12Z116Z220Z324Z428 33205901742478466905 332070017425134669120 332084017425454669152 332093017425784669226 332111017426334669313 332118017426334669313 332134017426824669417 332158017427464669521 332176017428184669621 332189017428734669913 332205017429384670013 332216017430044670213 332223017430044670213 332239017430534670317 332263017431174670421 332281017431894670521 332294017432444670813 332310017433094670913 332338017434024671147 33234701743438467129 332353017434834671313 332360017434834671313 332376017435324671417 332400017435964671521 332423017436874671913 332430017436874671913 332446017437364672017 332470017438004672121 33249001743880467259 332500017439094672620 33250901743945467279 332519017439814672813 332526017439814672813 332542017440304672917 332549017440304672917 332565017440834673021 332589017441524673125 332634017442674673516 332644017443034673613 332651017443034673613 332667017443524673717 332674017443524673717 332690017444054673821 332714017444744673925 33275501744592467449 332765017446284674527 332775017446454674544 332785017446794674628 332787017446874674636 33279001744704467485Rel_Record_17 532331484false0174471546750117450134675464Rel_Handler_17 332792 332792697017450174675531747544468242rr0task4X8Y12Z116Z220Z324Z428 33279701745259467655 332808017452944676620 332822017453264676652 332831017453594676726 332849017454194676818 332859017454374676836 332870017454334676832 332874017454714676917 332898017455354677021 332916017456074677121 332922017456624677413 332938017457274677513 332949017457914677718 332959017458094677736 332970017458054677732 332974017458434677817 332998017459074677921 333016017459794678021 333022017460344678313 333038017460994678413 333066017461854678647 33307501746221467879 333081017462714678818 333091017462894678836 333102017462854678832 333106017463234678917 333130017463874679021 333146017464834679418 333156017465014679436 333167017464974679432 333171017465354679517 333195017465994679621 33320801746679468009 333218017467084680120 33322701746744468029 333237017467854680318 333247017468034680336 333258017467994680332 333262017468424680422 333272017468604680440 333283017468564680436 333287017468984680521 333311017469674680625 333342017470824681016 333351017471234681118 333361017471414681136 333372017471374681132 333376017471804681222 333386017471984681240 333397017471944681236 333401017472364681321 333425017473054681425 33345201747423468199 333462017474594682027 333472017474764682044 333482017475104682128 333484017475184682136 33348701747535468235Rel_Record_19 532379484false0174754646825117478464682960Rel_Handler_19 333489 333489698017478504683031750381468992rr0task4X8Y12Z116Z220Z324Z428 33349401748092468405 333505017481274684120 333520017481654684158 333529017481984684226 333547017482584684318 333557017482764684336 333568017482724684332 333572017483104684417 333596017483744684521 333614017484464684621 333620017485014684913 333636017485664685013 333647017486304685218 333657017486484685236 333668017486444685232 333672017486824685317 333696017487464685421 333714017488184685521 333720017488734685813 333736017489384685913 333764017490244686147 33377301749060468629 333779017491104686318 333789017491284686336 333800017491244686332 333804017491624686417 333828017492264686521 333844017493224686918 333854017493404686936 333865017493364686932 333869017493744687017 333893017494384687121 33390601749518468759 333916017495474687620 33392501749583468779 333935017496244687818 333945017496424687836 333956017496384687832 333960017496814687922 333970017496994687940 333981017496954687936 333985017497374688021 334009017498064688125 334040017499214688516 334049017499624688618 334059017499804688636 334070017499764688632 334074017500194688722 334084017500374688740 334095017500334688736 334099017500754688821 334123017501444688925 33415001750262468949 334160017502984689527 334170017503134689542 334180017503474689628 334182017503554689636 33418501750372468985Rel_Record_21 532427484false0175038346900117506814690463Rel_Handler_21 334187 334187697017506854690531753210469742rr0task4X8Y12Z116Z220Z324Z428 33419201750927469155 334203017509624691620 334217017509924691650 334226017510254691726 334244017510854691818 334254017511034691836 334265017510994691832 334269017511374691917 334293017512014692021 334311017512734692121 334317017513284692413 334333017513934692513 334344017514574692718 334354017514754692736 334365017514714692732 334369017515094692817 334393017515734692921 334411017516454693021 334417017517004693313 334433017517654693413 334461017518514693647 33447001751887469379 334476017519374693818 334486017519554693836 334497017519514693832 334501017519894693917 334525017520534694021 334541017521494694418 334551017521674694436 334562017521634694432 334566017522014694517 334590017522654694621 33460301752345469509 334613017523744695120 33462201752410469529 334632017524514695318 334642017524694695336 334653017524654695332 334657017525084695422 334667017525264695440 334678017525224695436 334682017525644695521 334706017526334695625 334737017527484696016 334746017527894696118 334756017528074696136 334767017528034696132 334771017528464696222 334781017528644696240 334792017528604696236 334796017529024696321 334820017529714696425 33484701753089469699 334857017531254697027 334867017531424697044 334877017531764697128 334879017531844697136 33488201753201469735Rel_Record_23 532475484false0175321246975117535074697961Rel_Handler_23 334884 334884697017535114698031756035470492rr0task4X8Y12Z116Z220Z324Z428 33488901753753469905 334900017537884699120 334914017538174699149 334923017538504699226 334941017539104699318 334951017539284699336 334962017539244699332 334966017539624699417 334990017540264699521 335008017540984699621 335014017541534699913 335030017542184700013 335041017542824700218 335051017543004700236 335062017542964700232 335066017543344700317 335090017543984700421 335108017544704700521 335114017545254700813 335130017545904700913 335158017546764701147 33516701754712470129 335173017547624701318 335183017547804701336 335194017547764701332 335198017548144701417 335222017548784701521 335238017549744701918 335248017549924701936 335259017549884701932 335263017550264702017 335287017550904702121 33530001755170470259 335310017551994702620 33531901755235470279 335329017552764702818 335339017552944702836 335350017552904702832 335354017553334702922 335364017553514702940 335375017553474702936 335379017553894703021 335403017554584703125 335434017555734703516 335443017556144703618 335453017556324703636 335464017556284703632 335468017556714703722 335478017556894703740 335489017556854703736 335493017557274703821 335517017557964703925 33554401755914470449 335554017559504704527 335564017559674704544 335574017560014704628 335576017560094704636 33557901756026470485Rel_Record_25 532523484false0175603747050117563324705461Rel_Handler_25 335581 335581697017563364705531758860471242rr0task4X8Y12Z116Z220Z324Z428 33558601756578470655 335597017566134706620 335611017566424706649 335620017566754706726 335638017567354706818 335648017567534706836 335659017567494706832 335663017567874706917 335687017568514707021 335705017569234707121 335711017569784707413 335727017570434707513 335738017571074707718 335748017571254707736 335759017571214707732 335763017571594707817 335787017572234707921 335805017572954708021 335811017573504708313 335827017574154708413 335855017575014708647 33586401757537470879 335870017575874708818 335880017576054708836 335891017576014708832 335895017576394708917 335919017577034709021 335935017577994709418 335945017578174709436 335956017578134709432 335960017578514709517 335984017579154709621 33599701757995471009 336007017580244710120 33601601758060471029 336026017581014710318 336036017581194710336 336047017581154710332 336051017581584710422 336061017581764710440 336072017581724710436 336076017582144710521 336100017582834710625 336131017583984711016 336140017584394711118 336150017584574711136 336161017584534711132 336165017584964711222 336175017585144711240 336186017585104711236 336190017585524711321 336214017586214711425 33624101758739471199 336251017587754712027 336261017587924712044 336271017588264712128 336273017588344712136 33627601758851471235Rel_Record_27 532571484false0175886247125117591514712952Rel_Handler_27 336278 336278202017591554713031760150471632rr0task4X8Y12Z116Z220Z324Z428 33628301759397471405 336294017594324714120 336308017594604714148 336316017594934714226 336334017595484714313 336350017596134714413 336352017596504714613 336368017597154714713 336386017597794714947 33639501759815471509 33640401759883471539 336413017599124715420 33642201759948471559 336434017599874715616 33644301760029471589 336453017600654715927 336463017600824715944 336473017601164716028 336475017601244716036 33647801760141471625Rel_Record_31 532619484false0176015247164117603934716855Rel_Handler_31 336480 336480664017603974716931762832472362rr0task4X8Y12Z116Z220Z324Z428 33648501760639471795 336496017606744718020 336509017607064718052 336518017607394718126 336536017607994718218 336546017608174718236 336557017608134718232 336561017608514718317 336585017609154718421 336603017609874718521 336609017610424718813 336625017611074718913 336636017611714719118 336646017611894719136 336657017611854719132 336661017612234719217 336685017612874719321 336703017613594719421 336709017614144719713 336725017614794719813 336753017615654720047 33676201761601472019 336768017616514720218 336778017616694720236 336789017616654720232 336793017617034720317 336817017617674720421 336833017618634720818 336843017618814720836 336854017618774720832 336858017619154720917 336882017619794721021 33689501762059472149 336905017620884721520 33691401762124472169 336924017621654721718 336934017621834721736 336945017621794721732 336949017622224721822 336959017622404721840 336970017622364721836 336974017622784721921 336998017623474722025 337029017624624722416 337038017625034722518 337048017625214722536 337059017625174722532 337063017625604722622 337073017625784722640 337084017625744722636 337088017626164722721 337112017626854722825 33713901762803472339 33714201762823472355Rel_Record_33 532667484false0176283447237117630794724157Rel_Handler_33 337144 337144664017630834724231765520473092rr0task4X8Y12Z116Z220Z324Z428 33714901763325472525 337160017633604725320 337173017633944725354 337182017634274725426 337200017634874725518 337210017635054725536 337221017635014725532 337225017635394725617 337249017636034725721 337267017636754725821 337273017637304726113 337289017637954726213 337300017638594726418 337310017638774726436 337321017638734726432 337325017639114726517 337349017639754726621 337367017640474726721 337373017641024727013 337389017641674727113 337417017642534727347 33742601764289472749 337432017643394727518 337442017643574727536 337453017643534727532 337457017643914727617 337481017644554727721 337497017645514728118 337507017645694728136 337518017645654728132 337522017646034728217 337546017646674728321 33755901764747472879 337569017647764728820 33757801764812472899 337588017648534729018 337598017648714729036 337609017648674729032 337613017649104729122 337623017649284729140 337634017649244729136 337638017649664729221 337662017650354729325 337693017651504729716 337702017651914729818 337712017652094729836 337723017652054729832 337727017652484729922 337737017652664729940 337748017652624729936 337752017653044730021 337776017653734730125 33780301765491473069 33780601765511473085Rel_Record_35 532715484false0176552247310117657654731456Rel_Handler_35 337808 337808664017657694731531768205473822rr0task4X8Y12Z116Z220Z324Z428 33781301766011473255 337824017660464732620 337837017660794732653 337846017661124732726 337864017661724732818 337874017661904732836 337885017661864732832 337889017662244732917 337913017662884733021 337931017663604733121 337937017664154733413 337953017664804733513 337964017665444733718 337974017665624733736 337985017665584733732 337989017665964733817 338013017666604733921 338031017667324734021 338037017667874734313 338053017668524734413 338081017669384734647 33809001766974473479 338096017670244734818 338106017670424734836 338117017670384734832 338121017670764734917 338145017671404735021 338161017672364735418 338171017672544735436 338182017672504735432 338186017672884735517 338210017673524735621 33822301767432473609 338233017674614736120 33824201767497473629 338252017675384736318 338262017675564736336 338273017675524736332 338277017675954736422 338287017676134736440 338298017676094736436 338302017676514736521 338326017677204736625 338357017678354737016 338366017678764737118 338376017678944737136 338387017678904737132 338391017679334737222 338401017679514737240 338412017679474737236 338416017679894737321 338440017680584737425 33846701768176473799 33847001768196473815Rel_Record_37 532763484false0176820747383117684494738757Rel_Handler_37 338472 338472705017684534738831770842474552rr0task4X8Y12Z116Z220Z324Z428 33847701768695473985 338488017687304739920 338501017687664739956 338510017687994740026 338528017688544740113 338535017688544740113 338551017689034740217 338575017689674740321 338593017690394740421 338606017690944740713 338622017691594740813 338633017692254741013 338640017692254741013 338656017692744741117 338680017693384741221 338698017694104741321 338711017694654741613 338727017695304741713 338755017696234741947 33876401769659474209 338770017697044742113 338777017697044742113 338793017697534742217 338817017698174742321 338840017699084742713 338847017699084742713 338863017699574742817 338887017700214742921 33890701770101474339 338917017701304743420 33892601770166474359 338936017702024743613 338943017702024743613 338959017702514743717 338966017702514743717 338982017703044743821 339006017703734743925 339051017704884744316 339061017705244744413 339068017705244744413 339084017705734744517 339091017705734744517 339107017706264744621 339131017706954744725 33917201770813474529 33917501770833474545Rel_Record_67 532811484false01770844474561177124747460137Rel_Handler_67 339177 339177751017712514746131774055475342rr0task4X8Y12Z116Z220Z324Z428 33918201771493474715 339193017715284747220 339207017715624747254 339216017715954747326 339234017716554747418 339244017716734747436 339255017716694747432 339259017717074747517 339283017717714747621 339301017718434747721 339307017718984748013 339323017719634748113 339334017720274748318 339337017720394748330 339340017720664748417 339364017721304748521 339382017722024748621 339388017722574748913 339404017723224749013 339432017724084749247 33944101772444474939 339447017724944749418 339457017725124749436 339468017725084749432 339472017725464749517 339496017726104749621 339512017727064750018 339515017727184750030 339518017727454750117 339542017728094750221 33955501772889475069 339565017729184750720 33957401772954475089 339583017729954750918 339593017730134750936 339604017730094750932 339608017730524751022 339611017730644751034 339614017730954751121 339638017731644751225 339668017732794751616 339677017733204751718 339687017733384751736 339698017733344751732 339702017733774751822 339705017733894751834 339708017734204751921 339732017734894752025 33975901773607475259 339769017736434752627 339779017736634752647 339789017736974752728 339799017737174752748 339809017737434752820 339818017737744752851 339830017738014752921 339863017738744753026 339892017739594753132 33992601774046475335Rel_Record_69 532859484false01774057475351177445147539131Rel_Handler_69 339928 339928829017744554754031777311476132rr0task4X8Y12Z116Z220Z324Z428 33993301774697475505 339944017747324755120 339958017747664755154 339967017747994755226 339985017748594755318 339995017748774755336 340006017748734755332 340010017749114755417 340034017749754755521 340052017750474755621 340058017751024755913 340074017751674756013 340085017752314756218 340095017752494756236 340106017752454756232 340110017752834756317 340134017753474756421 340152017754194756521 340158017754744756813 340174017755394756913 340202017756254757147 34021101775661475729 340217017757114757318 340227017757294757336 340238017757254757332 340242017757634757417 340266017758274757521 340282017759234757918 340292017759414757936 340303017759374757932 340307017759754758017 340331017760394758121 34034401776119475859 340354017761484758620 34036301776184475879 340373017762254758818 340383017762434758836 340394017762394758832 340398017762824758922 340408017763004758940 340419017762964758936 340423017763384759021 340447017764074759125 340478017765224759516 340487017765634759618 340497017765814759636 340508017765774759632 340512017766204759722 340522017766384759740 340533017766344759736 340537017766764759821 340561017767454759925 34058801776863476049 340598017768994760527 340608017769194760547 340618017769534760628 340628017769734760648 340638017769994760720 340647017770304760751 340659017770574760821 340692017771304760926 340721017772154761032 34075501777302476125CreateDynamicRelations 340757 3407578017773154761431777394476186i0rel4 34076201777393476185RProperty 340765 340765320177739847619317774714761976obj0cl4pr8 340770017774194761924 340783017774394761944 340795017774544761959RGuard_f0_0 340797 34079735017775174762131777651476262X0 34080201777587476245 340818017776104762428 34083001777634476255RGuard_f1_0 340832 3408327017776554762731777742476312X0 34083701777725476305RGuard_T_0 340839 3408397017777464763231777834476372L0R4 34084401777825476365RGuard_MT_0 340846 34084683017778384763831778068476462L0R4 34085101777918476425 34088301777976476439 340900017779914764324 34090301778008476455 34092601778067476461RGuard_MF_0 340929 34092978017780724764731778319476552L0R4 34093401778152476515 34096601778210476529 340978017782424765241 34098101778259476545 34100401778318476551RGuard_f0_1 341007 34100735017783624765731778498476622X0 34101201778432476605 341028017784564766029 34104001778481476615RGuard_f1_1 341042 3410427017785024766331778589476672X0 34104701778572476665RGuard_T_1 341049 3410497017785934766831778681476732L0R4 34105401778672476725RGuard_MT_1 341056 34105683017786854767431778918476822L0R4 34106101778765476785 34109301778825476799 341110017788414767925 34111301778858476815 34113601778917476821RGuard_MF_1 341139 34113978017789224768331779172476912L0R4 34114401779002476875 34117601779062476889 341188017790954768842 34119101779112476905 34121401779171476911Noun_Filter_0 341217 34121737017791824769831779286477032x0 34122201779235477015 34122701779247477025Noun_Filter_1 341254 34125437017792904770431779394477092x0 34125901779343477075 34126401779355477085Noun_Filter_2 341291 34129137017793984771031779502477152x0 34129601779451477135 34130101779463477145Noun_Filter_3 341328 34132850017795064771631779633477212x0 34133301779559477195 34133801779571477205ChronologyPoint 341378 34137856017801864774531780317477482pt0 34138301780212477467 341386017802174774612 34139501780248477473 341422017802404774635 34143101780316477481UPDATE_CHRONOLOGICAL_RECORDS_R 341434 34143454017804804775531780629477592pt0 34143901780521477567 341442017805274775613 341451017805574775643 341470017805514775637 34147901780600477572 34148601780620477582PastActionsI6Routines 53290784false0178077947766117808144776636NO_PAST_TENSE_CONDS 001780826477681017808474776831NO_PAST_TENSE_ACTIONS 001780858477691017808814776933TestSinglePastState 341488 341488322017808864777131782339478092past_flag0pt4turn_end8wanted12old16new20trips24consecutives28 34149301781185477815 34149701781210477829 34151501781262477839 34153801781329477849 34156601781425477869 34158401781480477879 34160701781550477889 34163101781636477899 341635017816704779022 341641017817174779069 34164401781748477929 341648017817714779313 341652017817914779333 341658017818004779342 341664017818174779359 341668017818444779413 341672017818604779429 341678017818764779445 341684017819004779469 341691017819514779613 34169401781987477989 34172601782067478005 341735017820954780112 341739017821044780121 341751017821274780212 341755017821364780221 341767017821614780312 341771017821704780321 341787017822494780412 341796017822724780512 341805017822974780612 34180801782328478085TrackActions 341810 341810346017827624782731783484478482readjust0oow4i8 34181501782797478287 341818017828024782812 34187001782838478293 34193201782938478314 341936017829524783118 34194001782965478324 34198001783000478334 34200201783053478345 34202101783099478355 34203601783140478365 34204101783171478376 34208401783287478414 34208801783311478425 342093017833394784233 34210701783382478435 34212901783434478446 342143017828294782839 34215301783483478481TimesActionHasHappened 53291544false0178361947855117836754785557TurnsActionHasBeenHappening 53291944false0178367747856117837384785662LastTurnActionHappenedOn 53292344false0178374047857117837984785759ActionCurrentlyHappeningFlag 53292711false0178380047858117838614785862past_chronological_record 53292844false0178386447860117839214786058present_chronological_record 53293244false0178392347861117839834786161Parse_Name_GV1 342156 342156355017841194787131786236479242original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34216101784808478875 342168017848314788728 34217401784875478895 342182017849074788937 34218401784921478905 342189017849484789110 342193017849584789120 34220001784987478929 34220501785013478939 342210017850314789327 342213017850424789338 342216017852214789713 342230017852884789817 342251017853424789871 342258017853684789917 342266017853744789923 342271017854184790113 342283017854664790313 342297017855334790417 342318017855874790471 342325017856134790517 342333017856194790523 342338017856634790713 34234501785710479099 342366017857644790963 34237501785777479109 342384017857954791027 34239401785838479119 342400017858534791124 34240401785874479129 342410017858894791224 342414017849694789131 34242401785949479155 34243101785980479169 34246401786066479185 342470017860834791822 34247401786100479195 342480017861174791922 34248401786134479205 34249101786160479215 342495017861724792117 34249801786187479225 34250801786225479235Parse_Name_GV2 342511 342511355017862404792531788357479782original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34251601786929479415 342523017869524794128 34252901786996479435 342537017870284794337 34253901787042479445 342544017870694794510 342548017870794794520 34255501787108479469 34256001787134479479 342565017871524794727 342568017871634794738 342571017873424795113 342585017874094795217 342606017874634795271 342613017874894795317 342621017874954795323 342626017875394795513 342638017875874795713 342652017876544795817 342673017877084795871 342680017877344795917 342688017877404795923 342693017877844796113 34270001787831479639 342721017878854796363 34273001787898479649 342739017879164796427 34274901787959479659 342755017879744796524 34275901787995479669 342765017880104796624 342769017870904794531 34277901788070479695 34278601788101479709 34281901788187479725 342825017882044797222 34282901788221479735 342835017882384797322 34283901788255479745 34284601788281479755 342850017882934797517 34285301788308479765 34286301788346479775Parse_Name_GV3 342866 342866355017883614797931790478480322original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34287101789050479955 342878017890734799528 34288401789117479975 342892017891494799737 34289401789163479985 342899017891904799910 342903017892004799920 34291001789229480009 34291501789255480019 342920017892734800127 342923017892844800138 342926017894634800513 342940017895304800617 342961017895844800671 342968017896104800717 342976017896164800723 342981017896604800913 342993017897084801113 343007017897754801217 343028017898294801271 343035017898554801317 343043017898614801323 343048017899054801513 34305501789952480179 343076017900064801763 34308501790019480189 343094017900374801827 34310401790080480199 343110017900954801924 34311401790116480209 343120017901314802024 343124017892114799931 34313401790191480235 34314101790222480249 34317401790308480265 343180017903254802622 34318401790342480275 343190017903594802722 34319401790376480285 34320101790402480295 343205017904144802917 34320801790429480305 34321801790467480315Parse_Name_GV4 343221 343221355017904824803331792599480862original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34322601791171480495 343233017911944804928 34323901791238480515 343247017912704805137 34324901791284480525 343254017913114805310 343258017913214805320 34326501791350480549 34327001791376480559 343275017913944805527 343278017914054805538 343281017915844805913 343295017916514806017 343316017917054806071 343323017917314806117 343331017917374806123 343336017917814806313 343348017918294806513 343362017918964806617 343383017919504806671 343390017919764806717 343398017919824806723 343403017920264806913 34341001792073480719 343431017921274807163 34344001792140480729 343449017921584807227 34345901792201480739 343465017922164807324 34346901792237480749 343475017922524807424 343479017913324805331 34348901792312480775 34349601792343480789 34352901792429480805 343535017924464808022 34353901792463480815 343545017924804808122 34354901792497480825 34355601792523480835 343560017925354808317 34356301792550480845 34357301792588480855Parse_Name_GV5 343576 343576355017926034808731794720481402original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34358101793292481035 343588017933154810328 34359401793359481055 343602017933914810537 34360401793405481065 343609017934324810710 343613017934424810720 34362001793471481089 34362501793497481099 343630017935154810927 343633017935264810938 343636017937054811313 343650017937724811417 343671017938264811471 343678017938524811517 343686017938584811523 343691017939024811713 343703017939504811913 343717017940174812017 343738017940714812071 343745017940974812117 343753017941034812123 343758017941474812313 34376501794194481259 343786017942484812563 34379501794261481269 343804017942794812627 34381401794322481279 343820017943374812724 34382401794358481289 343830017943734812824 343834017934534810731 34384401794433481315 34385101794464481329 34388401794550481345 343890017945674813422 34389401794584481355 343900017946014813522 34390401794618481365 34391101794644481375 343915017946564813717 34391801794671481385 34392801794709481395Parse_Name_GV6 343931 343931355017947244814131796841481942original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34393601795413481575 343943017954364815728 34394901795480481595 343957017955124815937 34395901795526481605 343964017955534816110 343968017955634816120 34397501795592481629 34398001795618481639 343985017956364816327 343988017956474816338 343991017958264816713 344005017958934816817 344026017959474816871 344033017959734816917 344041017959794816923 344046017960234817113 344058017960714817313 344072017961384817417 344093017961924817471 344100017962184817517 344108017962244817523 344113017962684817713 34412001796315481799 344141017963694817963 34415001796382481809 344159017964004818027 34416901796443481819 344175017964584818124 34417901796479481829 344185017964944818224 344189017955744816131 34419901796554481855 34420601796585481869 34423901796671481885 344245017966884818822 34424901796705481895 344255017967224818922 34425901796739481905 34426601796765481915 344270017967774819117 34427301796792481925 34428301796830481935Parse_Name_GV7 344286 344286355017968454819531798962482482original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34429101797534482115 344298017975574821128 34430401797601482135 344312017976334821337 34431401797647482145 344319017976744821510 344323017976844821520 34433001797713482169 34433501797739482179 344340017977574821727 344343017977684821738 344346017979474822113 344360017980144822217 344381017980684822271 344388017980944822317 344396017981004822323 344401017981444822513 344413017981924822713 344427017982594822817 344448017983134822871 344455017983394822917 344463017983454822923 344468017983894823113 34447501798436482339 344496017984904823363 34450501798503482349 344514017985214823427 34452401798564482359 344530017985794823524 34453401798600482369 344540017986154823624 344544017976954821531 34455401798675482395 34456101798706482409 34459401798792482425 344600017988094824222 34460401798826482435 344610017988434824322 34461401798860482445 34462101798886482455 344625017988984824517 34462801798913482465 34463801798951482475Parse_Name_GV8 344641 344641355017989664824931801083483022original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34464601799655482655 344653017996784826528 34465901799722482675 344667017997544826737 34466901799768482685 344674017997954826910 344678017998054826920 34468501799834482709 34469001799860482719 344695017998784827127 344698017998894827138 344701018000684827513 344715018001354827617 344736018001894827671 344743018002154827717 344751018002214827723 344756018002654827913 344768018003134828113 344782018003804828217 344803018004344828271 344810018004604828317 344818018004664828323 344823018005104828513 34483001800557482879 344851018006114828763 34486001800624482889 344869018006424828827 34487901800685482899 344885018007004828924 34488901800721482909 344895018007364829024 344899017998164826931 34490901800796482935 34491601800827482949 34494901800913482965 344955018009304829622 34495901800947482975 344965018009644829722 34496901800981482985 34497601801007482995 344980018010194829917 34498301801034483005 34499301801072483015Parse_Name_GV9 344996 344996355018010874830331803204483562original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34500101801776483195 345008018017994831928 34501401801843483215 345022018018754832137 34502401801889483225 345029018019164832310 345033018019264832320 34504001801955483249 34504501801981483259 345050018019994832527 345053018020104832538 345056018021894832913 345070018022564833017 345091018023104833071 345098018023364833117 345106018023424833123 345111018023864833313 345123018024344833513 345137018025014833617 345158018025554833671 345165018025814833717 345173018025874833723 345178018026314833913 34518501802678483419 345206018027324834163 34521501802745483429 345224018027634834227 34523401802806483439 345240018028214834324 34524401802842483449 345250018028574834424 345254018019374832331 34526401802917483475 34527101802948483489 34530401803034483505 345310018030514835022 34531401803068483515 345320018030854835122 34532401803102483525 34533101803128483535 345335018031404835317 34533801803155483545 34534801803193483555Parse_Name_GV10 345351 345351355018032084835731805326484102original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34535601803898483735 345363018039214837328 34536901803965483755 345377018039974837537 34537901804011483765 345384018040384837710 345388018040484837720 34539501804077483789 34540001804103483799 345405018041214837927 345408018041324837938 345411018043114838313 345425018043784838417 345446018044324838471 345453018044584838517 345461018044644838523 345466018045084838713 345478018045564838913 345492018046234839017 345513018046774839071 345520018047034839117 345528018047094839123 345533018047534839313 34554001804800483959 345561018048544839563 34557001804867483969 345579018048854839627 34558901804928483979 345595018049434839724 34559901804964483989 345605018049794839824 345609018040594837731 34561901805039484015 34562601805070484029 34565901805156484045 345665018051734840422 34566901805190484055 345675018052074840522 34567901805224484065 34568601805250484075 345690018052624840717 34569301805277484085 34570301805315484095Parse_Name_GV11 345706 345706355018053304841131807448484642original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34571101806020484275 345718018060434842728 34572401806087484295 345732018061194842937 34573401806133484305 345739018061604843110 345743018061704843120 34575001806199484329 34575501806225484339 345760018062434843327 345763018062544843338 345766018064334843713 345780018065004843817 345801018065544843871 345808018065804843917 345816018065864843923 345821018066304844113 345833018066784844313 345847018067454844417 345868018067994844471 345875018068254844517 345883018068314844523 345888018068754844713 34589501806922484499 345916018069764844963 34592501806989484509 345934018070074845027 34594401807050484519 345950018070654845124 34595401807086484529 345960018071014845224 345964018061814843131 34597401807161484555 34598101807192484569 34601401807278484585 346020018072954845822 34602401807312484595 346030018073294845922 34603401807346484605 34604101807372484615 346045018073844846117 34604801807399484625 34605801807437484635Parse_Name_GV12 346061 346061355018074524846531809570485182original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34606601808142484815 346073018081654848128 34607901808209484835 346087018082414848337 34608901808255484845 346094018082824848510 346098018082924848520 34610501808321484869 34611001808347484879 346115018083654848727 346118018083764848738 346121018085554849113 346135018086224849217 346156018086764849271 346163018087024849317 346171018087084849323 346176018087524849513 346188018088004849713 346202018088674849817 346223018089214849871 346230018089474849917 346238018089534849923 346243018089974850113 34625001809044485039 346271018090984850363 34628001809111485049 346289018091294850427 34629901809172485059 346305018091874850524 34630901809208485069 346315018092234850624 346319018083034848531 34632901809283485095 34633601809314485109 34636901809400485125 346375018094174851222 34637901809434485135 346385018094514851322 34638901809468485145 34639601809494485155 346400018095064851517 34640301809521485165 34641301809559485175Parse_Name_GV13 346416 346416649018095744851931812892485932original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34642101810264485355 346428018102874853528 34643401810331485375 346442018103634853737 34644401810377485385 346449018104044853910 346453018104144853920 34646001810443485409 34646501810469485419 346470018104874854127 346473018104984854138 346476018106774854513 346490018107444854617 346511018107984854671 346518018108244854717 346526018108304854723 346531018108744854913 346543018109224855113 346557018109894855217 346578018110434855271 346585018110694855317 346593018110754855323 346598018111234855517 346610018111564855550 346613018111854855617 346628018112184855650 346631018112474855717 346646018112824855752 346649018113114855817 346664018113444855850 346667018113734855917 346672018113914855935 346676018114014855945 346680018114364856026 346685018114704856117 346697018115034856150 346700018115324856217 346715018115634856248 346718018115924856317 346733018116274856352 346736018116564856417 346751018116894856450 346754018117184856517 346759018117364856535 346763018117464856545 346767018117814856626 346772018118154856717 346784018118484856750 346787018118774856817 346802018119124856852 346805018119414856917 346820018119744856950 346823018120034857017 346828018120214857035 346832018120314857045 346836018120664857126 346841018121004857217 346853018121334857250 346856018121624857317 346871018121974857352 346874018122264857417 346879018122444857435 346883018122544857445 346887018122894857526 346892018123194857613 34689901812366485789 346920018124204857863 34692901812433485799 346938018124514857927 34694801812494485809 346954018125094858024 34695801812530485819 346964018125454858124 346968018104254853931 34697801812605485845 34698501812636485859 34701801812722485875 347024018127394858722 34702801812756485885 347034018127734858822 34703801812790485895 34704501812816485905 347049018128284859017 34705201812843485915 34706201812881485925Parse_Name_GV93 347065 347065355018128964859431815014486472original_wn0group_wn4try_from_wn8n12f16w20rv24g28ss32spn36pass40pass1_n44pass2_n48 34707001813586486105 347077018136094861028 34708301813653486125 347091018136854861237 34709301813699486135 347098018137264861410 347102018137364861420 34710901813765486159 34711401813791486169 347119018138094861627 347122018138204861638 347125018139994862013 347139018140664862117 347160018141204862171 347167018141464862217 347175018141524862223 347180018141964862413 347192018142444862613 347206018143114862717 347227018143654862771 347234018143914862817 347242018143974862823 347247018144414863013 34725401814488486329 347275018145424863263 34728401814555486339 347293018145734863327 34730301814616486349 347309018146314863424 34731301814652486359 347319018146674863524 347323018137474861431 34733301814727486385 34734001814758486399 34737301814844486415 347379018148614864122 34738301814878486425 347389018148954864222 34739301814912486435 34740001814938486445 347404018149504864417 34740701814965486455 34741701815003486465Consult_Grammar_94 347420 34742065018150184864831815628486672range_from0range_words4original_wn8group_wn12w16rv20 34742501815362486625 347430018153794866222 347435018153974866240 34743801815427486639 347453018154634866345 34745601815484486649 347471018155384866463 347474018155664866518 347477018155884866540 34748201815610486665Consult_Grammar_95 347485 34748565018156324866831816242486872range_from0range_words4original_wn8group_wn12w16rv20 34749001815976486825 347495018159934868222 347500018160114868240 34750301816041486839 347518018160774868345 34752101816098486849 347536018161524868463 347539018161804868518 347542018162024868540 34754701816224486865Consult_Grammar_96 347550 34755065018162464868831816856487072range_from0range_words4original_wn8group_wn12w16rv20 34755501816590487025 347560018166074870222 347565018166254870240 34756801816655487039 347583018166914870345 34758601816712487049 347601018167664870463 347604018167944870518 347607018168164870540 34761201816838487065Consult_Grammar_97 347615 34761565018168604870831817467487272range_from0range_words4original_wn8group_wn12w16rv20 34762001817204487225 347625018172214872222 347630018172394872240 34763301817269487239 347648018173024872342 34765101817323487249 347666018173774872463 347669018174054872518 347672018174274872540 34767701817449487265Consult_Grammar_98 347680 34768065018174714872831818078487472range_from0range_words4original_wn8group_wn12w16rv20 34768501817815487425 347690018178324874222 347695018178504874240 34769801817880487439 347713018179134874342 34771601817934487449 347731018179884874463 347734018180164874518 347737018180384874540 34774201818060487465Consult_Grammar_99 347745 34774565018180824874831818690487672range_from0range_words4original_wn8group_wn12w16rv20 34775001818426487625 347755018184434876222 347760018184614876240 34776301818491487639 347778018185254876343 34778101818546487649 347796018186004876463 347799018186284876518 347802018186504876540 34780701818672487665Consult_Grammar_100 347810 34781065018186944876831819303487872range_from0range_words4original_wn8group_wn12w16rv20 34781501819039487825 347820018190564878222 347825018190744878240 34782801819104487839 347843018191384878343 34784601819159487849 347861018192134878463 347864018192414878518 347867018192634878540 34787201819285487865Consult_Grammar_101 347875 34787565018193074878831819914488072range_from0range_words4original_wn8group_wn12w16rv20 34788001819652488025 347885018196694880222 347890018196874880240 34789301819717488039 347908018197494880341 34791101819770488049 347926018198244880463 347929018198524880518 347932018198744880540 34793701819896488065Consult_Grammar_102 347940 34794065018199184880831820525488272range_from0range_words4original_wn8group_wn12w16rv20 34794501820263488225 347950018202804882222 347955018202984882240 34795801820328488239 347973018203604882341 34797601820381488249 347991018204354882463 347994018204634882518 347997018204854882540 34800201820507488265grammar line 600254 600263018205584882951820584488305grammar line 600263 600272018205844883051820605488315grammar line 600272 600286018206054883151820634488325grammar line 600286 600300018206344883251820663488335grammar line 600300 600319018206634883351820704488345grammar line 600319 600338018207044883451820740488351grammar line 600338 600362018207574883751820802488385grammar line 600362 600376018208024883851820830488395grammar line 600376 600385018208304883951820851488405grammar line 600385 600414018208514884051820902488415grammar line 600414 600433018209024884151820939488425grammar line 600433 600452018209394884251820976488431grammar line 600452 600466018209944884551821020488465grammar line 600466 600480018210204884651821042488471grammar line 600480 600484018210614884951821076488505grammar line 600484 600493018210764885051821096488515grammar line 600493 600507018210964885151821118488521grammar line 600507 600516018211384885451821161488555grammar line 600516 600535018211614885551821198488561grammar line 600535 600544018212334885851821252488591grammar line 600544 600553018212764886151821292488621grammar line 600553 600567018213094886451821334488655grammar line 600567 600581018213344886551821359488665grammar line 600581 600595018213594886651821391488675grammar line 600595 600609018213914886751821423488685grammar line 600609 600638018214234886851821482488695grammar line 600638 600662018214824886951821525488701grammar line 600662 600686018215454887251821589488731grammar line 600686 600695018216254887551821650488765grammar line 600695 600719018216504887651821695488775grammar line 600719 600748018216954887751821752488785grammar line 600748 600772018217524887851821795488791grammar line 600772 6007860182183448881518218594888130grammar line 600786 6008050182185948881301821901488831grammar line 600805 6008190182193948885518219644888530grammar line 600819 6008380182196448885301822006488871grammar line 600838 600842018220354888951822048488905grammar line 600842 600851018220484889051822080488915grammar line 600851 600860018220804889151822101488925grammar line 600860 600889018221014889251822155488931grammar line 600889 600893018221904889551822200488961grammar line 600893 600897018222244889851822239488995grammar line 600897 600906018222394889951822262489005grammar line 600906 600920018222624890051822290489015grammar line 600920 600949018222904890151822349489025grammar line 600949 600963018223494890251822382489035grammar line 600963 6009870182238248903518224174890340grammar line 600987 601011018224464890651822486489071grammar line 601011 601020018225234890951822543489105grammar line 601020 601039018225434891051822573489111grammar line 601039 601048018226074891351822628489145grammar line 601048 601062018226284891451822654489155grammar line 601062 601076018226544891551822681489161grammar line 601076 601080018227084891851822724489195grammar line 601080 601089018227244891951822741489201grammar line 601089 601113018227584892251822802489235grammar line 601113 601137018228024892351822835489241grammar line 601137 601141018228674892651822878489271grammar line 601141 601150018229324892951822951489301grammar line 601150 601159018229694893251822992489335grammar line 601159 6011830182299248933518230304893343grammar line 601183 60120201823030489334318230724893435grammar line 601202 601206018231034893751823113489381grammar line 601206 601210018231294894051823138489411grammar line 601210 601214018231574894351823169489441grammar line 601214 601223018231894894651823207489471grammar line 601223 601227018232254894951823245489505grammar line 601227 601236018232454895051823261489511grammar line 601236 601255018232874895351823315489541grammar line 601255 601264018233404895651823356489571grammar line 601264 601273018234054895951823425489605grammar line 601273 601287018234254896051823467489615grammar line 601287 601306018234674896151823510489621grammar line 601306 601315018235634896451823583489655grammar line 601315 601329018235834896551823612489665grammar line 601329 601343018236124896651823641489675grammar line 601343 601357018236414896751823672489685grammar line 601357 601371018236724896851823699489691grammar line 601371 601380018237194897151823758489725grammar line 601380 601389018237584897251823782489735grammar line 601389 601403018237824897351823811489745grammar line 601403 601417018238114897451823840489755grammar line 601417 601431018238404897551823871489765grammar line 601431 601445018238714897651823898489771grammar line 601445 601464018239164897951823944489801grammar line 601464 601483018239644898251823994489831grammar line 601483 601492018241124898551824130489861grammar line 601492 601496018241544898851824165489891grammar line 601496 6015150182420748991518242404899138grammar line 601515 601534018242664899451824300489951grammar line 601534 601553018243174899751824354489985grammar line 601553 601572018243544899851824387489991grammar line 601572 601581018244044900151824419490021grammar line 601581 601585018244444900451824456490051grammar line 601585 601594018244834900751824504490085grammar line 601594 601613018245044900851824535490091grammar line 601613 601622018245634901151824578490121grammar line 601622 601631018246084901451824627490151grammar line 601631 601640018246464901751824667490185grammar line 601640 601654018246674901851824689490191grammar line 601654 601658018247244902151824739490225grammar line 601658 601667018247394902251824759490235grammar line 601667 601676018247594902351824788490245grammar line 601676 601690018247884902451824822490255grammar line 601690 601704018248224902551824852490261grammar line 601704 601713018248864902851824906490291grammar line 601713 601717018249254903151824937490321grammar line 601717 601721018249644903451824980490355grammar line 601721 601730018249804903551824997490361grammar line 601730 601734018250174903851825034490395grammar line 601734 601748018250344903951825057490401grammar line 601748 601757018250754904251825093490431grammar line 601757 601766018251124904551825129490461grammar line 601766 601775018251554904851825172490491grammar line 601775 601784018252444905151825259490521grammar line 601784 601803018252944905451825319490551grammar line 601803 601812018253454905751825361490581grammar line 601812 601821018253964906051825413490611grammar line 601821 601830018254534906351825468490641grammar line 601830 601834018254994906651825510490671grammar line 601834 601838018255294906951825541490701grammar line 601838 601842018255594907251825570490731grammar line 601842 601846018255874907551825598490761grammar line 601846 601850018256164907851825627490791grammar line 601850 601854018256484908151825662490821grammar line 601854 601858018256834908451825697490851grammar line 601858 601862018257174908751825730490881grammar line 601862 601866018257514909051825765490911grammar line 601866 601870018257854909351825804490945grammar line 601870 601879018258044909451825828490955grammar line 601879 601888018258284909551825850490961grammar line 601888 601892018258744909851825893490995grammar line 601892 601901018258934909951825917491005grammar line 601901 601910018259174910051825939491011grammar line 601910 601914018259634910351825976491041grammar line 601914 601918018259954910651826008491071grammar line 601918 601922018260294910951826042491101grammar line 601922 601926018260604911251826073491131grammar line 601926 601930018260924911551826105491161grammar line 601930 601934018261254911851826138491191grammar line 601934 601938018261574912151826172491221grammar line 601938 601942018261944912451826209491251grammar line 601942 601946018262294912751826248491285grammar line 601946 601955018262484912851826272491295grammar line 601955 601964018262724912951826294491301UnknownVerb 348005 34800550182646749143318264894914325 348008018264804914316PrintVerb 348010 348010701826493491432918265154914351v0 348015018265064914342TX_PS_51 47907601826829491631018268434916324TX_PS_58 47907901826854491641018268694916425TX_L_58 53293684false0182687149165118269264916556TX_PS_3 47908301826937491661018269714916644TX_PS_43 47909901826982491671018270194916747TX_PS_52 47911601827030491681018270504916830TX_PS_31 47912301827061491691018270854916934TX_PS_2 47913301827096491701018271234917037TX_PS_4 47914501827134491711018271514917127TX_PS_49 47915101827162491721018271784917226TX_PS_48 47915701827189491731018272174917338TX_PS_50 47916901827228491741018272444917426TX_PS_44 47917401827255491751018272734917528TX_PS_56 47917901827284491761018273014917627TX_PS_53 47918601827312491771018273324917730TX_PS_54 47919501827343491781018273764917843TX_PS_47 47921201827387491791018274024917925TX_PS_57 47921601827413491801018274474918044TX_PS_32 479233018274584918110182798749181539TX_PS_45 47953801827998491821018280464918258TX_PS_42 47956001828057491831018280784918331TX_PS_9 47956701828089491841018281084918429TX_PS_14 47957301828119491851018281414918532TX_PS_39 47958101828152491861018281714918629TX_PS_11 47958601828182491871018282054918733TX_PS_15 47959301828216491881018282364918830TX_PS_17 47959901828247491891018282704918933TX_PS_10 47960701828281491901018282994919028TX_PS_28 47961201828310491911018283274919127TX_PS_25 47961601828338491921018283554919227TX_PS_46 47962001828366491931018283974919341TX_PS_29 47963201828408491941018284274919429TX_PS_34 47963701828438491951018284604919532TX_PS_33 47964401828471491961018285024919641TX_PS_7 47965701828513491971018285284919725TX_PS_38 47966101828539491981018285664919837TX_PS_18 47967101828577491991018285954919928TX_PS_20 47967601828606492001018286284920032TX_PS_21 47968301828639492011018286614920132TX_PS_30 47969001828672492021018286924920230TX_PS_6 47969601828703492031018287214920328TX_PS_13 47970201828732492041018287624920440TX_PS_37 47971501828773492051018287974920534TX_PS_16 47972401828808492061018288284920630TX_PS_55 47973001828839492071018288974920768TX_PS_40 47976201828908492081018289254920827TX_PS_22 47976701828936492091018289544920928TX_PS_23 47977201828965492101018289874921032TX_PS_24 47977901828998492111018290204921132TX_PS_5 47978601829031492121018290534921232TX_PS_35 47979401829064492131018290984921344TX_PS_19 47980801829109492141018291254921426TX_PS_36 47981201829136492151018291784921552TX_PS_27 47983001829189492161018292044921625TX_PS_12 47983301829215492171018292364921731TX_PS_26 47984001829247492181018292644921827TX_PS_8 47984401829275492191018292924921927TX_PS_41 47984901829303492201018293244922031TX_L_41 53294484false0182932649221118293814922156p0_specification 001829419492233618294394922356p1_indefinite_appearance_tex 001829496492244818295284922480p2_variable_initial_value 001829582492254518296114922574IK4_Link 001832587492832818325994928340IK7_Count 001832837492882918328504928842IK7_Link 001832887492892818328994928940IK9_Count 001833037492922918330504929242IK9_Link 001833087492932818330994929340IK10_Count 001833138492943018331524929444IK10_Link 001833190492952918332034929542IK12_Count 001833346492983018333604929844IK12_Link 001833398492992918334114929942IK13_Count 001833450493003018334644930044IK13_Link 001833502493012918335154930142IK14_Count 001833554493023018335684930244IK14_Link 001833606493032918336194930342IK15_Count 001833658493043018336724930444IK15_Link 001833710493052918337234930542Runtime_Quotations_Displayed 53295244false0183400749315118340474931541MEMORY_HEAP_SIZE 3276801834255493251018342794932534Closure_0 532956124false018342904932811834448493321Closure_1 532968124false018344504933311834610493371Closure_2 532980124false018346124933811834764493421Closure_3 532992124false018347664934311834932493471Closure_4 533004124false018349344934811835096493521Closure_5 533016124false018350984935311835260493571Closure_6 533028124false018352624935811835420493621Closure_7 533040124false018354224936311835580493671Closure_8 533052124false018355824936811835740493721Closure_9 533064124false018357424937311835900493771Closure_10 533076124false018359024937811836061493821Closure_11 533088124false018360634938311836228493871Closure_12 533100124false018362304938811836395493921Closure_13 533112124false018363974939311836562493971Closure_14 533124124false018365644939811836725494021Closure_15 533136124false018367274940311836888494071Closure_16 533148124false018368904940811837051494121Closure_17 533160124false018370534941311837209494171Closure_18 533172124false018372114941811837367494221Closure_19 533184124false018373694942311837525494271KD0_rule 533196164false0183752849429118375894943036KD1_activity 533212124false0183759149431118376494943225KD2_relation_of_values 533224164false0183765149433118377404943436KD3_relation_of_objects 533240164false0183774249435118378354943638KD4_relation_of_supporters_to_ 533256164false0183783749437118379364943824KD5_relation_of_things 533272164false0183793849439118380154944024KD6_relation_of_people_to_thin 533288164false0183801749441118381124944224KD7_relation_of_rooms_to_doors 533304164false0183811449443118382074944424KD8_phrase_real_number_to_real 533320124false0183820949445118383194944634KD9_phrase_real_number_to_numb 533332124false0183832149447118384214944829DefaultValueFinder 348017 3480177018384254944931838497494532K0 34802201838486494525BLK_HEADER_N 001838635494611018386514946126BLK_HEADER_FLAGS 101838662494621018386824946230BLK_FLAG_MULTIPLE 101838693494631018387234946340BLK_FLAG_16_BIT 201838734494641018387644946440BLK_FLAG_WORD 401838775494651018388054946540BLK_FLAG_RESIDENT 801838816494661018388464946640BLK_FLAG_TRUNCMULT 1601838857494671018388884946741BLK_HEADER_KOV 101838899494681018389174946828BLK_HEADER_RCOUNT 201838928494691018389494946931BLK_DATA_OFFSET 1201838961494711018389894947138BLK_DATA_MULTI_OFFSET 2001839135494781018391874947862BLK_NEXT 301839198494791018392084947920BLK_PREV 401839219494801018392294948020Flex_Heap 533344327841false0183943149489118394714948941HeapInitialise 348024 348024175018396534949631840179495112n0bsize4blk28 34802901839683494972 34803801839707494982 34804601839737494992 34805401839770495002 34806601839824495012 34807501839874495022 34808401839904495032 34809301839939495047 348100018399744950442 348106018399484950416 348115018399894950457 34812401839995495052 34813501840020495062 34814601840048495072 34815701840079495082 34816901840124495092 34818101840149495102 34819601840178495111HeapNetFreeSpace 348199 34819973018403174951831840566495252multiple0txb4asize8 34820401840360495197 348216018403974951944 348227018403864951933 34823301840421495203 34824701840454495213 348251018404684952117 34826001840514495228 34826901840551495242SMALLEST_BLK_WORTH_ALLOCATING 1201840707495321018407414953244HeapMakeSpace 348272 348272279018407714953431841832495672size0multiple4newblocksize8newblock12B16n20 34827701840841495363 34828101840860495374 34829801840921495394 34831101840971495413 34831501840996495428 348318018410014954213 34833001841067495434 348336018410594954271 34834501841100495443 348355018411314954434 34836401841164495453 34837401841210495463 34837701841239495473 34838801841269495483 34839901841302495493 34841001841338495503 34842201841388495513 34843401841418495523 34844601841453495538 348458018414884955343 348469018414784955333 34847501841509495544 34849001841541495555 34850201841570495565 34851401841599495575 34852001841619495593 34852901841654495603 34854801841824495662HeapLargestFreeBlock 348551 34855182018418374956931842131495782multiple0txb4asize8best12 34855601841884495702 34855901841900495717 348571018419374957144 348582018419264957133 34858801841961495723 34859801841986495733 348602018420004957317 34861101842046495748 34861701842081495753 348623018420994957521 34863001842117495772HeapDebug 348633 348633113018421364958031842515495892full0 34863801842153495812 34864201842167495823 34866001842241495833 34867601842301495843 348682018423374958439 34869401842374495853 348700018424004958529 34871501842434495873 34874301842514495891FlexAllocate 348746 348746791018426554959631846494496962size0kov4flags8dsize12n16m20free_block24min_m28max_m32smallest_oversized_block36secondhalf40i44hsize48head52tail56 34875101842775495992 348768018428364959963 34878001842913496022 348788018429444960233 34879501842981496037 34879901843034496052 348802018430444960512 348809018430994960567 348815018430534960521 348831018431144960582 34884001843256496092 348845018432714960917 34884801843288496107 34886001843347496123 34887101843325496113 34887701843387496133 34888701843452496153 348893018434644961515 34889701843564496173 34890301843580496184 34890901843601496195 34891301843616496205 34891701843741496243 34892301843757496254 34892901843778496265 34893601843803496312 34894401843888496333 348952018439244963339 34896401844026496358 348971018440464963528 348977018440354963517 348982018440614963543 34899101844218496383 34900801844266496393 349012018442814963918 34902401844326496403 34904501844381496413 349049018443964964118 34906101844441496423 34907301844467496433 34908501844493496443 34908801844655496497 349099018446784964930 349105018446684964920 349111018446934964945 34912001844699496502 34912401844739496512 34913101844894496543 34913701844955496563 34914301844990496573 34916401845039496583 34917901845077496594 34920001845128496603 34921201845166496613 34922401845204496623 34924701845265496633 34926601845320496643 34928701845381496653 34929801845419496663 34931901845482496673 34932901845825496772 34934401845916496793 34936801846026496823 34939801846088496833 34942801846152496852 34944801846200496862 34946001846237496872 34947201846276496882 34948001846311496893 34949201846343496903 34950401846435496947 349508018464434969415 349514018464564969428 349525018464514969423 34953401846474496952FlexError 349537 34953737018466244970331846731497072reason0 34954201846643497042 34956301846691497052 34957201846723497062FlexMergeInternal 349574 349574160018468624971431847442497312block0first4last8pv12nx16 34957901846905497152 349583018469204971517 34958701846935497162 34961401846984497173 34962801847009497182 34968201847113497203 34969601847140497212 34970701847164497222 34971801847294497262 34973101847441497311FlexRecutInternal 349734 349734253018475754973831848453497652first0last4tsize8backsize12mfrom16mto20bnext24backend28n32dsize36fine_so_far40 34973901847665497392 34974401847693497402 349748018477084974017 34976201847738497412 34977301847764497422 349780018478024974319 34978601847791497438 34979301847833497448 349800018478504974425 349814018478804974455 349820018478754974450 34982901847903497453 34984701847959497464 349851018479734974618 34986201848000497474 34987401848028497484 34988601848056497494 34988901848072497513 34989201848136497523 34989801848164497533 34990901848193497543 34992001848225497553 34993101848260497563 34994301848309497573 34995501848339497583 34996101848363497594 34997301848394497604 34998101848419497632 34998401848445497642FlexFree 349987 349987186018485894977231849131497852block0fromtxb4ptxb8 34999201848619497732 349996018486354977318 34999901848644497742 350016018486954977453 35001901848704497752 350036018487374977535 35003901848776497762 35005601848831497773 350071018488614977733 35009201848901497783 350099018489514977934 35011001848926497799 35012801848981497803 35013401849011497814 350145018490364978129 350154018490724978165 35016101849094497842 35017001849130497851FlexFreeSingleBlockInternal 350173 350173214018491364978731849717498092block0free4nx8 35017801849180497882 35018901849209497892 35020001849241497902 35021201849292497917 350222018493224979137 350233018493094979124 35024001849350497923 35025101849374497933 35025701849395497944 35026901849423497954 35028101849451497964 35029301849479497974 35030201849508497984 35030501849522498003 35032001849564498014 35033201849592498024 35034401849620498034 35035601849646498044 35036801849672498054 35037701849701498064 35038401849716498091FlexResize 350387 350387248018498494981631850645498422block0req4newsize8dsize12newblk16kov20n24i28otxb32flags36 35039201849912498172 350396018499284981718 35040801849970498182 35041901850001498192 35043001850035498202 350438018500714982038 35045001850121498212 35045401850136498222 350461018501604982310 35047201850190498243 35048201850222498258 350486018502314982517 350491018502414982527 350497018502364982522 35050601850260498263 35051201850297498273 35051801850322498283 35052301850344498294 350538018503744982934 35054101850387498304 35055401850434498314 35055701850462498324 35056901850492498334 35058101850522498344 35058401850536498363 35059901850571498374 35061701850602498384 35062901850633498403 35063201850644498421FlexSize 350635 35063550018507794984931850946498532txb0bsize4n8 35064001850850498502 350644018508644985016 35064601850880498517 350653018509104985137 350659018508894985116 350673018509254985152 35068201850931498522FlexTotalSize 350685 35068587018509514985531851292498632txb0size_in_bytes4 35069001851032498562 350694018510464985616 35069601851057498572 35071301851113498583 350731018511704985918 35074201851160498598 35074801851194498603 35076901851269498622FlexDebug 350772 350772237018514344987031851961498862txb0n4k8i12bsize16tot20dtot24kov28 35077701851475498712 350781018514894987116 35079301851514498722 35080401851543498732 350831018516034987418 35084201851593498748 35084901851629498753 350863018516454987519 35087501851666498763 35089001851702498774 35091401851753498783 35092401851783498798 350928018517914987916 350933018518004987925 350939018517954987920 35094801851817498803 35095401851848498813 35096001851865498823 35096601851884498833 35098801851919498852 35100601851960498861FlexDebugDecomposition 351009 35100980018519664988831852163498962from0to4txb8pf12 35101401852006498892 351018018520174988913 35102201852034498907 351029018520684989041 351040018520434989016 35105201852092498913 351056018521004989111 35106201852113498923 35107301852136498933 35108001852151498952 35108601852162498961RC_INFINITY 214748364701852309499031018523424990343BLK_BVBITMAP 25501852498499101018525264991038BLK_BVBITMAP_LONGBLOCK 1601852538499121018525664991238BLK_BVBITMAP_TEXT 3201852609499131018526374991338BLK_BVBITMAP_CONSTANT 6401852675499141018527034991438BLK_BVBITMAP_LONGBLOCKMASK -24001852765499171018528034991748BLK_BVBITMAP_TEXTMASK -22401852814499181018528524991848BLK_BVBITMAP_CONSTANTMASK -19201852863499191018529014991948BlkValueGetLongBlock 351089 35108969018532004993131853414499422bv0o4 35109401853228499322 35109801853240499333 35110801853254499343 351112018532664993415 35111901853290499353 35113001853322499364 351138018533544993636 35115001853372499374 35115201853388499393 35115501853402499412BlkValueWeakKind 351158 35115883018535544994931853793499602bv0o4 35116301853578499502 35116701853590499513 35117701853604499523 351181018536164995215 35119301853650499533 35120401853682499544 351212018537094995431 35121501853728499554 35122601853746499573 35123801853777499592BlkValueGetRefCountPrimitive 351241 35124137018539424996731854104499712bv0long_block4 35124601853987499682 35125601854027499692 351260018540434996918 35127201854083499702BlkValueIncRefCountPrimitive 351278 35127858018542604997831854482499842bv0long_block4refc8 35128301854310499792 35129301854350499802 35129701854370499813 35130801854411499823 351317018544354998227 35133301854481499841BlkValueDecRefCountPrimitive 351336 35133683018544874998631854821499982bv0long_block4refc8 35134101854537499872 35135101854577499882 35135501854597499893 35136601854638499903 35137501854667499914 35138101854678499924 351386018546924999218 35139801854738499934 35141001854783499953 35141301854800499972BlkValueLBCapacity 351419 351419105018549715000531855414500172bv0long_block4array_size_in_bytes8entry_size_in_bytes12flags16 35142401855053500062 35143401855093500072 351438018551145000723 35144001855126500092 35145001855177500112 35146101855216500122 35146501855242500132 351473018552715001331 35148001855302500147 351488018553295001434 35149201855363500162BlkValueSetLBCapacity 351524 35152489018554195001931855864500322bv0new_capacity4long_block8flags12entry_size_in_bytes16 35152901855497500202 35153201855519500212 35154101855540500222 35155101855580500232 35155401855611500252 35156501855650500262 35156901855676500272 351577018557055002731 35158401855736500287 351592018557635002834 35159601855797500302 35161001855856500312BlkValueRead 351613 351613265018560185003931857292500712from0pos4do_not_indirect8long_block12chunk_size_in_bytes16header_size_in_bytes20flags24entry_size_in_bytes28seek_byte_position32 35161801856156500412 35162101856180500422 35162501856203500433 35163201856230500453 35164201856273500472 35165301856312500482 35165701856338500492 351665018563675004931 35167201856398500507 351680018564255005034 35168401856459500522 351692018564905005233 35169901856542500537 35170301856584500552 351712018566565005627 35172301856638500569 35173001856694500573 35174401856763500583 35175501856843500594 35176501856915500604 35177501856952500618 351792018570425006314 35182701857108500658 35183801857142500683 35184801857209500702BlkValueWrite 351878 351878292018572975007331858608501082to0pos4val8do_not_indirect12long_block16chunk_size_in_bytes20header_size_in_bytes24flags28entry_size_in_bytes32seek_byte_position36 35188301857438500752 35188601857460500762 35189001857483500773 35189701857510500793 35190601857532500803 35191601857576500832 35192701857615500842 35193101857641500852 351939018576705008531 35194601857701500867 351954018577285008634 35195801857762500882 351966018577935008833 35197301857845500897 35197701857887500912 351986018579575009225 35199701857940500928 35200401857995500933 35201801858064500943 35202901858144500954 35203901858216500964 35204901858253500978 352069018583415009914 352090018583725009945 35211601858417501018 35212701858447501034 35213001858461501053 35214001858528501072BlkValueSeekZeroEntry 352170 352170328018587555011531860237501572from0long_block4chunk_size_in_bytes8header_size_in_bytes12flags16entry_size_in_bytes20byte_position24addr28from_addr32to_addr36 35217501858901501182 352179018589165011817 35218201858928501192 35219201858971501212 35220301859010501222 35220701859036501232 352215018590655012331 35222201859096501247 352230018591235012434 35223401859157501262 352242018591885012633 35224901859240501277 35225301859282501292 352259018593275013027 35227001859309501309 35227701859365501313 35229101859434501323 35229701859483501333 35230301859528501343 352313018595735013610 352317018595915013628 35232301859620501376 35233501859644501387 352346018596075013644 352365018598725014510 352372018599065014544 352378018598905014528 35238401859924501466 35240901859968501477 352436018600405015010 352443018600745015044 352449018600585015028 35245501860092501516 35246701860117501527 35248501860168501543 35249501860225501562BlkValueMassCopyEntries 352498 352498397018603855016431862695502202to_bv0from_bv4no_entries_to_copy8from_long_block12from_addr16from_bytes_left20from_header_size_in_bytes24to_long_block28to_addr32to_bytes_left36to_header_size_in_bytes40bytes_to_copy44flags48entry_size_in_bytes52min56 35250301860620501692 35251201860645501712 35252201860695501722 35253201860742501742 35254301860786501752 35254701860812501762 352555018608415017631 35256201860872501777 352570018608995017734 35257401860933501792 35259501861056501813 35260701861097501832 352615018611285018333 35262201861185501847 35262601861231501852 35263701861273501862 352645018613045018633 35265201861359501877 35265601861404501892 35266201861462501902 35267601861536501912 35268201861588501922 35269601861657501942 35270201861731501963 35270601861762501974 35271701861811501984 352721018618375019830 35273301861885501994 35273901861945502004 352757018620275020110 35276101862056502024 35277201862101502034 352776018621255020328 35278801862168502044 35279401862222502054 35281101862303502074 352815018623265020727 352821018623515020752 35282501862375502084 35283101862407502095 35284301862454502105 35284601862470502124 35285801862506502134 35286401862546502144 35287001862578502154 35287601862622502164 35288201862650502174 35289201862694502201BlkValueMassCopyFromArray 352895 352895324018628465022731864245502622to_bv0from_array4from_entry_size8no_entries_to_copy12to_long_block16to_addr20to_entries_left24to_header_size28to_entry_size32flags36 35290001863002502312 35290901863027502332 35291901863074502352 35293001863116502362 35293401863136502372 352942018631655023731 35294901863190502387 352957018632175023834 35296101863245502402 35298201863368502423 35299401863409502442 353002018634405024433 35300901863486502457 35301301863522502472 35301901863565502482 35306201863643502502 35306901863692502513 35309201863772502523 35309801863833502533 35310801863894502543 35311901863938502553 353123018639625025527 35313501864004502563 35314101864048502573 35318801864128502592 35319301864160502603 35321601864244502621CREATE_KOVS 101864396502691018644165026930CAST_KOVS 201864427502701018644475027030DESTROY_KOVS 301864458502711018644785027130MAKEMUTABLE_KOVS 401864489502721018645095027230COPYKIND_KOVS 501864520502731018645405027330EXTENT_KOVS 601864551502741018645715027430COPYQUICK_KOVS 701864582502751018646025027530COPYSB_KOVS 801864613502761018646335027630KINDDATA_KOVS 901864644502771018646645027730COPY_KOVS 1001864675502781018646965027831COMPARE_KOVS 1101864707502791018647285027931READ_FILE_KOVS 1201864739502801018647605028031WRITE_FILE_KOVS 1301864771502811018647925028131HASH_KOVS 1401864803502821018648245028231DEBUG_KOVS 1501864835502831018648565028331BlkValueCreate 353219 35321932018650685029231865423503012strong_kind0short_block4kovs8 35322401865116502942 35323801865182502952 35324801865402503002BlkValueError 353251 35325137018655605030831865687503122reason0 35325601865583503092 35327701865647503102 35328601865679503112BlkValueCreateSB1 353288 35328839018658405031931866020503242short_block0val4 35329301865876503202 35329701865900503213 35331301865975503222 35332401865999503232BlkValueCreateSB2 353327 35332751018660255032631866238503312short_block0val14val28 35333201866067503272 35333601866091503283 35335201866168503292 353363018661925032926 35337501866217503302StackFramingInitialise 353378 35337816018663905033831866470503402 35338101866415503392 35339101866469503401StackFrameCreate 353394 35339442018664755034231866620503462size0new4 35339901866503503432 35340901866536503442 353418018665625034428 353427018665935034459 35342901866603503452 35343301866619503461BlkValueCreateOnStack 353436 35343626018666255034831866726503502offset0strong_kind4 35344101866668503492 35345901866725503501BlkValueFreeOnStack 353462 35346225018667315035231866806503542offset0 35346701866763503535 35348401866805503541BlkValueFree 353487 35348783018669445036131867301503722bv0kovs4d8 35349201866969503622 353496018669825036215 35349901867033503652 35352101867110503662 35353101867200503692 35354001867221503702 35355401867268503713 35356701867300503721BlkValueQuickCopyPrimitive 353570 35357036018674425037931867606503832to_bv0from_bv4kovs8 35357501867490503802 35358501867530503812 35359401867566503822 35360301867605503831BlkValueCopySB1 353606 35360654018677535039031867864503932to_bv0from_bv4 35361101867785503912 35363001867811503922 353642018678315039222 35365701867863503931BlkValueCopySB2 353660 35366077018678695039531868008503992to_bv0from_bv4 35366501867901503962 35368401867927503972 35370501867953503982 353718018679735039822 35373401868007503991BlkValueSlowCopyPrimitive 353737 35373799018681485040631868760504222to_bv0from_bv4kovs8recycling12k16from_long_block20no_entries_to_copy24 35374201868243504082 35375201868286504102 35376201868336504112 35376601868361504123 353770018683765041218 35378001868417504133 35378801868468504143 353794018684985041433 35380401868550504153 35381601868668504202 35383301868759504221BlkValueCopy 353836 353836148018688955042931869588504502to_bv0from_bv4to_kind8from_kind12kovs16 35384101868948504302 353845018689645043018 35385701869002504312 353861018690205043120 35387301869060504322 353879018690825043224 35388201869210504382 35389201869246504392 35390201869286504402 353908018693125044028 35392001869356504422 35393401869414504442 35394601869458504453 35396101869516504473 35398101869573504492BlkValueCopyAZ 353984 35398424018695935045231869690504552to_bv0from_bv4 35398901869624504532 353993018696375045315 35400501869675504542BlkValueDestroyPrimitive 354008 35400850018698325046231870112504692bv0kovs4long_block8 35401301869956504642 35402501870003504653 35403201870029504663 35404201870070504673 354046018700865046719 35405501870111504691BlkValueRecyclePrimitive 354058 35405857018702525047631870529504842bv0kovs4 35406301870364504782 35407501870411504793 35408201870437504803 35409401870483504823 35411201870528504841BlkMakeMutable 354115 354115145018706705049131871351505132bv0block4bv_kind8kovs12sb_size16 35412001870717504922 354124018707305049215 35413601870783504942 35415001870912504973 35415901870949504993 35416901870983505003 35418301871047505023 35419101871087505033 35419601871109505044 35419901871128505054 35420801871158505064 35421701871196505074 35422601871234505084 35424501871291505094 35425401871327505104 35425701871350505131BlkValueCast 354260 35426047018714895052031871688505242to_bv0original_kind4original_value8kovs12 35426501871545505212 35428701871617505222 35430401871673505232BlkValueCompare 354307 35430787018718295053131872257505422bv_left0bv_right4kind_left8kind_right12kovs16 35431201871891505322 354320018719305053241 35432201871941505332 354326018719595053320 35432901871970505342 354333018719895053421 35433601872002505362 35434601872042505372 35435601872084505382 354362018721135053831 35436901872146505402 35438301872210505412GetHashValue 354394 35439431018723955054931872492505522kind0value4 35439901872421505502 354411018724485055029 35442201872477505512BlkValueHash 354425 35442544018724975055431872674505592bv0bv_kind4kovs8 35443001872529505552 354434018725425055515 35443601872553505562 35444601872586505572 35446001872645505582BlkValueReadFromFile 354469 35446940018728185056631872966505702bv0auxf4ch8bv_kind12kovs16 35447401872866505672 35448401872903505682 354488018729135056812 35450701872957505692BlkValueWriteToFile 354509 35450930018729715057231873101505762bv0bv_kind4kovs8 35451401873010505732 35452401873047505742 354528018730575057412 35453701873092505752BlkValueDebug 354539 354539194018732415058331873802506002bv0flag4refc8long_block12kovs16 35454401873286505842 35455001873300505852 35455501873312505863 35456501873341505873 35457501873382505883 35458001873403505894 354592018734205058921 354601018734385058939 35460701873454505904 354613018734655059015 35462301873503505914 35464001873546505924 35465001873590505934 354659018736155059329 354668018736445059411 354683018736695059436 354689018736845059451 35469501873703505963 35471301873754505973 354717018737645059713 35472401873790505992 35473001873801506001BlkDebugAddress 354733 354733136018739585060731874387506252addr0flag4d8 35473801873988506082 354742018740005060814 354748018740135060827 35475101874025506102 35476001874051506112 35477201874106506123 35478701874145506133 35479301874168506143 354799018741805061415 354804018741925061427 354810018742035061438 35481301874214506153 35481601874228506182 35482501874251506192 35483901874300506203 35485401874339506213 35485701874352506242 35486601874386506251BlkPrintHexadecimal 354869 354869144018745385063231874892506472v0 35487401874586506342 35488501874609506353 35489601874633506364 35491201874669506374 35492801874707506393 35494401874740506403 35496001874783506432 35497401874813506442 35498801874842506452 35500101874870506462 35501001874891506471BlkPrintHexDigit 355013 35501343018748975064931874985506522v0 35501801874918506502 35502401874931506512 355030018749435065114 355036018749575065128 35505301874984506521CONSTANT_PACKED_TEXT_STORAGE 9701875128506591018752085065990CONSTANT_PERISHABLE_TEXT_STORAGE 9801875219506601018752995066090PACKED_TEXT_STORAGE 3501875310506611018753665066166UNPACKED_TEXT_STORAGE 5201875377506621018754585066291TEXT_TY_Extent 355056 35505630018756025066931875727506732arg10x4 35506101875626506702 35507101875660506712 355076018756715067113 35507901875714506722TEXT_TY_Storage_Flags 301875975506841018760345068469Large_Unicode_Tables 001876045506851018760655068530UNIC_NCT 1000001876217506931018762335069326CharCasingChart0 56612821524false018779015074111882410507871CharCasingChart1 56828013364false018824135078911885222508181CharIsOfCase 355086 355086172018853935082731885882508512c0case4i8tab12min16max20len24par28 35509101885438508292 35509601885458508302 35510001885477508313 35511201885516508323 35512201885552508343 35513401885591508353 35514101885619508372 35514701885639508382 35516001885659508393 355171018856745083918 35517701885681508403 355188018856965084018 35519401885703508413 35520001885710508423 35520301885721508433 355208018857345084316 355212018857435084325 35521601885759508443 35522101885782508453 35523101885804508464 355235018858155084615 355250018858565084711 35525601885873508502CharToCase 355258 355258243018860185085831886636508872c0case4i8tab12min16max20len24par28del32f36 35526301886067508602 355269018860785086013 35527201886089508612 35527801886108508623 355290018861385086233 35529701886153508633 35530701886189508653 355319018862195086533 35532601886234508663 35533301886262508682 355340018862735086813 35534301886284508692 35535701886304508703 355368018863195087018 35537401886326508713 355385018863415087118 35539101886348508723 355402018863635087218 35540801886370508733 35541101886381508743 355416018863945087416 355420018864035087425 35542401886419508753 355430018864325087516 35543301886444508763 35544301886466508774 35544601886480508784 355450018864915087815 355462018865135087837 355469018865355087911 35547301886550508804 35547701886563508815 355484018865845088126 35548701886598508825 35549801886625508862TEXT_TY_RevCase 355501 355501121018882955092731888584509352ch0 35550601888316509282 355512018883285092814 35551501888340509292 355527018883725092934 35553801888392509302 355550018884245093034 35556101888444509312 355568018884565093114 35557101888468509322 355583018884935093227 35559501888520509332 355608018885455093327 35561901888572509342CharTestCases 355622 355622177018887235094331889081509532case0i4j8 35562701888753509447 355631018887595094413 35563901888775509453 355652018888005094528 35565601888812509463 35568001888846509473 355692018888705094727 35569801888889509483 355711018889135094827 35571701888932509493 355727018889545094925 355733018889665094937 35574801888999509503 355759018890215095025 355765018890335095037 35578001889066509513 355786018887665094420 35579601889080509531TEXT_TY_Support 355799 355799214018892175096131889955509792task0arg14arg28arg312 35580401889255509622 355814018892905096321 355831018893395096421 355853018893915096521 355870018894415096621 355879018894655096718 355899018895135096821 355907018895435096921 355924018895925097021 355942018896485097121 355948018896885097218 355968018897515097321 355985018898035097421 356002018898505097521 35601101889946509782TEXT_TY_Debug 356013 356013174018900885098631890498509942txt0 35601801890108509872 356036018901635098837 356076018902435098937 356115018903235099037 356154018904025099137 356178018904765099237 35618401890497509941TEXT_TY_Create 356187 35618722018906305100131890741510032short_block0x4 35619201890661510022TEXT_TY_CopySB 356209 35620946018908815101031891023510132to_bv0from_bv4 35621401890912510112 35622401890946510122 356241018909895101245 35625201891022510131TEXT_TY_Transmute 356255 35625517018911605102031891221510222txt0 35626001891184510212 35626901891220510221TEXT_TY_Temporarily_Transmute 356272 35627296018912265102431891574510352txt0x4 35627701891265510252 35629801891327510263 35630901891381510283 35632001891416510293 35634301891478510303 356352018915065103031 35636301891549510323 35636601891563510342TEXT_TY_Untransmute 356368 35636869018915795103731891843510452txt0pk4cp8x12 35637301891613510382 35639101891665510393 35640201891719510403 35641101891734510413 35642201891750510423 35643401891830510442TEXT_TY_Mutable 356437 35643736018919775105231892148510582txt0 35644201891999510532 35645901892050510543 35646801892076510553 35647001892090510572TEXT_TY_Cast 356473 35647369018922795106531892556510722to_txt0from_kind4from_value8 35647801892322510662 35648401892352510673 35649701892394510689 35650301892427510693 35651201892456510703 35652701892513510719 35653901892555510721SNIPPET_TY_to_TEXT_TY 356542 35654219018925615107431892651510762to_txt0snippet4 35654701892600510752TEXT_TY_NoBuffers 201892868510861018928895108631TEXT_TY_Buffers 56961682324false0189301351091118930795109167RawBufferAddress 4977920189311951094118931605109442RawBufferSize 4977960189316251095118932035109542TEXT_TY_CastPrimitiveNesting 4978000189320651097118932455109740TEXT_TY_CastPrimitive 356561 356561402018943815113831896366511982to_txt0from_snippet4from_value8len12i16stream20saved_stream24news28buffer32buffer_size36memory_to_free40results44 35656601894511511412 356570018945285114119 35658201894572511432 35658701894624511452 35659301894661511462 35660501894732511472 35661301894765511482 35662001894823511493 356630018948645114944 35663401894891511503 35663801894911511514 35665001894982511542 35665501895010511553 35666201895052511573 35667001895095511583 35669101895176511593 35670001895211511613 356703018952255116117 35670601895242511623 35671501895266511633 356719018952845116321 35673101895324511648 35674001895358511653 356743018953735116518 35674601895390511673 35675601895437511683 35676601895474511693 356770018954925116921 35677901895532511703 35678601895548511723 35679701895569511733 35680801895729511764 35681301895754511774 356819018957735117723 35682801895789511784 35684201895830511794 35684601895848511805 356850018958685118025 35685901895903511815 35686301895927511825 35686701895943511835 35687201895969511845 35688301896017511855 35688701896123511884 35689401896152511903 35690501896175511923 35691301896209511933 35693801896274511953 35694701896314511972 356951018963345119722 35696001896365511981TEXT_TY_Compare 356963 35696329018965095120631896666512122left_txt0right_txt4rv8 35696801896549512072 35697101896567512082 35697501896586512092 35698601896636512102 35698901896654512112TEXT_TY_Compare_Inner 356992 356992444018966715121431897981512472left_txt0right_txt4pos8ch112ch216capacity_left20capacity_right24fl28fr32cl36cr40cpl44cpr48 35699701896776512162 357014018968285121654 35701801896840512172 357035018968935121755 35703901896906512192 35704901896924512203 35709901896996512214 35712401897035512223 35717401897109512234 35719901897148512243 357209018971685122423 35721901897216512253 357229018972375122524 35724201897294512269 35724601897306512273 357256018973265122723 35726901897380512289 35727301897392512293 357283018974135122924 35729301897464512312 35730101897486512323 35731201897532512333 35732401897574512343 35733601897617512353 35733901897633512372 35734901897680512382 35735901897734512397 357362018977405123913 35737401897795512403 35738501897832512413 35739601897870512423 357402018978865124219 35740901897904512433 357413018979185124317 357415018977845123957 35742401897932512452 357430018979585124528 35743301897970512462TEXT_TY_Distinguish 357436 35743620018979865124931898091512522left_txt0right_txt4 35744101898027512502 35745301898083512512TEXT_TY_Hash 357456 35745690018982225125931898460512672txt0rv4len8i12p16cp20 35746101898256512602 357471018982705126016 35748101898311512612 35748401898320512622 35749401898357512637 357497018983625126312 35750301898376512643 357522018983695126319 35753101898414512652 35754301898448512662TEXT_TY_Say 357546 357546100018985925127431898962512892txt0ch4i8dsize12 35755101898622512752 35755401898643512762 357571018986905127649 35759101898720512772 35760101898759512787 357604018987645127812 35761001898782512793 35762101898811512803 357625018988245128016 35762801898900512843 357631018987735127821 35764001898933512872 35764301898954512882TEXT_TY_Say_Capitalised 357646 35764695018991065129631899396513072txt0mod4rc8 35765101899143512972 35766101899175512982 35767101899211512992 35768401899253513003 35771201899315513013 35772101899335513023 35772501899348513033 35772901899364513052 35773801899384513062TEXT_TY_WriteFile 357741 357741119018995335131431899873513272txt0len4pos8ch12p16cp20 35774601899573513152 357756018995875131516 35776601899628513162 35777601899660513172 35778201899677513187 357785018996845131814 35779101899705513193 357797018997215131919 357803018997345131932 35781401899765513203 35781801899783513214 357824018997955132116 35782701899816513234 357836018996945131824 35784501899839513262 35785701899872513271TEXT_TY_ReadFile 357860 357860196019000125133431900511513542txt0auxf4ch8i12v16dg20pos24tsize28p32 35786501900062513352 35787401900087513362 35788401900121513372 35792501900170513383 35793501900196513393 35794701900223513404 35795701900249513415 357974019002975134153 35797701900308513425 35798701900349513444 35800701900382513454 35801001900392513464 358016019004075134619 35802201900428513484 35802801900446513494 35804201900469513522 35805301900498513532TEXT_TY_SubstitutedForm 358056 35805631019006475136131900757513672to0txt4 35806101900680513622 35806501900693513633 35807501900718513643 35808401900745513662TEXT_TY_IsSubstituted 358087 35808753019007625136931900898513742txt0 35809201900790513702 35813701900890513732TEXT_TY_ExpandIfPerishable 358140 35814038019010355138131901193513852to0from4 35814501901072513822 35816301901136513833 35817501901179513842TEXT_TY_ROGPR 358178 35817857019013375139231901522513982txt0p4cp8r12 35818301901364513932 358187019013785139316 35819001901396513942 358200019014105139416 35821001901451513952 35822001901477513962 35823201901511513972TEXT_TY_ROGPRI 358235 358235231019015265139931902201514242txt0pos4len8wa12wl16wpos20bdm24ch28own32 35824001901578514012 358244019015905140114 35824901901601514022 35825901901638514037 358262019016455140314 35826901901666514043 358275019016825140419 358281019016955140432 35829201901726514053 35831501901761514064 358319019017705140613 35832301901783514074 35832701901798514084 358333019018145140820 35833601901834514094 358340019018475140917 35834701901868514114 35835101901883514125 35835401901900514135 358366019019295141334 35836901901950514145 35838401901978514155 35839901902005514165 35840201902023514184 358435019020665141847 35843801902086514194 358444019016555140324 35845401902102514222 358461019021175142217 35846401902176514232CHR_BLOB 101902337514311019023495143122WORD_BLOB 201902397514321019024105143223PWORD_BLOB 301902432514331019024465143324UWORD_BLOB 401902479514341019024935143424PARA_BLOB 501902528514351019025415143523LINE_BLOB 601902568514361019025815143623REGEXP_BLOB 701902604514381019026195143825WS_BRM 101902819514451019028295144520SKIPPED_BRM 201902840514461019028555144625ACCEPTED_BRM 301902866514471019028825144726ACCEPTEDP_BRM 401902893514481019029105144827ACCEPTEDN_BRM 501902921514491019029385144927ACCEPTEDPN_BRM 601902949514501019029675145028TEXT_TY_BlobAccess 358466 358466128019029725145231903414514632txt0blobtype4ctxt8wanted12rtxt16p120p224cp128cp232r36 35847101903040514542 358475019030525145414 35847701903063514552 358483019030895145528 35849401903127514562 358504019031425145617 35851401903184514572 358524019032005145718 35853401903243514582 35854301903269514592 35856701903330514602 35857901903366514612 35859101903403514622TEXT_TY_BlobAccessI 358594 3585941017019034185146431906683515832txt0blobtype4ctxt8wanted12rtxt16brm20oldbrm24ch28i32dsize36csize40blobcount44gp48cl52j56 35859901903517514662 35860901903551514672 358613019035615146712 35862601903601514687 358630019036115146817 35864201903641514692 35864601903661514707 358649019036655147011 35865601903682514713 35866701903711514723 358671019037245147216 35867501903733514733 35867901903749514743 35870401903785514754 35871101903813514765 358714019038305147710 358718019038345147714 35872401903854514786 35873501903886514796 358739019039015147921 358743019039155147935 35874601903929514806 358758019039515148028 358764019039575148034 35876701903974514816 358779019039935148125 358782019038425147722 35879101904010514835 35880201904041514845 358808019040575148421 35881201904075514855 358822019041115148617 358828019041245148630 358841019041545148717 358847019041675148730 358854019041955148815 35886201904234514924 35886501904249514934 35897501904439514975 35897901904453514984 35898901904488515006 35899301904513515016 35899901904548515027 359003019045565150215 35900701904587515046 35901301904623515057 359017019046315150515 35903101904681515086 35903701904716515097 359041019047335150924 35905501904783515126 35906101904818515137 359065019048265151315 35906901904857515156 35907501904893515167 359079019049015151615 35909301904953515196 35909901904989515207 359103019050065152024 35911001905046515228 359141019051125152329 35914701905132515248 35916301905184515286 35916901905219515297 359173019052275152915 35917701905258515316 35918301905294515327 359187019053025153215 35920001905355515356 35920601905391515367 359210019054085153624 35921701905448515388 359248019055145153929 35925401905534515408 35926001905573515453 35927301905620515464 359279019056395154623 35928501905655515474 35929701905698515485 35930101905715515496 35931201905748515506 35932401905796515516 35933401905835515526 35934401905876515536 359350019059015155331 35935401905927515546 359360019059535155432 35936701905993515566 35937701906020515577 359394019060685155755 35939801906081515587 35940801906127515606 35943101906180515635 35943501906197515646 35944501906224515657 359462019062725156555 35946601906285515667 35947601906331515686 35949901906387515724 35951501906449515735 35952501906475515746 359542019065235157454 35954501906535515756 35955501906579515775 359575019036735147019 35958501906623515812 359589019066335158112 35960801906664515822TEXT_TY_GetBlob 359611 35961155019068155159031907018515952ctxt0txt4wanted8blobtype12 35961601906858515912 359620019068705159114 35962301906879515922 359629019069055159228 35964301906954515932 35966301907004515942TEXT_TY_ReplaceBlob 359666 359666387019071545160231908224516352blobtype0txt4wanted8rtxt12ctxt16ilen20rlen24i28p32cp36 35967101907223516032 35968001907248516042 359690019072635160417 35970001907305516052 35970701907335516063 35971701907374516073 35972701907414516083 35973301907426516093 35974601907467516104 35975201907488516115 35977601907555516135 35978601907591516145 35979501907620516155 359817019076785161611 359820019076825161615 35982601907702516177 359847019076915161624 359856019077585161811 359859019077625161815 35986501907780516197 359890019077695161822 359899019078445162011 359905019078555162022 35991101907873516217 359940019078625162029 35994901907931516226 35996401907971516236 35997401908006516255 35998601908047516293 35999601908081516303 36001901908138516313 36002901908165516323 36003801908189516342 36005001908223516351TEXT_TY_ReplaceText 360053 360053102019083605164231908704516512blobtype0txt4ftxt8rtxt12r16p120p224cp128cp232 36005801908422516442 36006701908447516452 360077019084635164518 36008701908506516462 360097019085225164618 36010701908565516472 36012801908619516482 36014001908656516492 36015201908693516502TEXT_TY_ReplaceTextI 360155 360155635019087095165331910447517142blobtype0txt4ftxt8rtxt12ctxt16csize20ilen24flen28i32cl36mpos40ch44chm48whitespace52punctuation56 36016001908817516552 36017201908861516563 36019401908918516582 36020401908956516592 36021401908995516602 36022401909028516612 36023301909054516622 36024301909089516632 36024601909101516652 360250019091205166521 36025301909147516667 360256019091515166611 36026301909168516673 36027401909214516693 36029301909250516703 36029901909270516714 36030901909310516736 360317019093635167359 36032101909384516763 36032401909406516773 360348019094375167734 36035201909458516783 36035501909481516793 36044601909605516824 360452019096325168231 36045601909645516834 36046001909671516853 36046701909691516864 36047401909715516875 360480019097305168720 360486019097485168810 36050101909782516895 36063301909990516946 36063601910005516956 36064601910030516966 36065701910063516976 36066901910111516986 36067901910150516996 36068901910191517006 36069501910226517044 36069801910242517063 36070801910266517074 360725019103145170752 36072801910324517084 36073801910364517103 360758019091595166619 36076801910399517122 36077801910426517132 36078701910446517141TEXT_TY_CharacterLength 360790 360790100019105875172131910893517312txt0ch4i8dsize12p16cp20r24 36079501910635517222 360799019106475172214 36080101910658517232 360811019106725172316 36082101910713517242 360831019107465172435 36083501910763517257 360838019107675172511 36084401910784517263 36085501910813517273 360859019108285172718 360863019108355172725 360866019107755172519 36087501910848517292 36088701910882517302TEXT_TY_Empty 360890 36089060019108985173331911100517412txt0 36089501910918517342 36089901910938517352 36091601910989517363 36093401911032517373 36093601911044517392 36094801911091517402TEXT_TY_GetCharacter 360950 360950117019112375174831911580517582ctxt0txt4i8ch12p16cp20 36095501911279517492 360959019112915174914 36096101911302517502 360971019113165175016 36098101911357517512 36099001911383517522 361009019114315175250 36101501911445517537 36103001911475517542 36104101911504517552 36105201911532517562 36106401911566517572TEXT_TY_CharactersOfCase 361067 361067112019117105176531912059517762txt0case4i8ch12len16p20cp24r28 36107201911762517662 361076019117745176614 36107801911785517672 361088019117995176716 36109801911840517682 36110801911877517692 36111201911893517707 361115019118975177011 36112101911912517713 36113201911941517723 361149019119905177252 361152019120015177263 361155019119035177017 36116401912014517742 36117601912048517752TEXT_TY_CharactersToCase 361179 361179389019121945178331913112518172ctxt0txt4case8i12ch16len20bnd24pk28cp32 36118401912254517842 361188019122665178414 36119001912277517852 361200019122915178516 36121001912333517862 36121901912359517872 36122901912396517882 36124701912440517893 36125101912456517908 361254019124605179012 36126101912476517914 36127201912506517924 36127801912526517935 36130301912588517955 36132401912637517965 36133101912659517976 36133401912673517986 361459019128325180150 36146301912851518035 36146901912873518046 36149801912917518057 361504019129315180521 36151001912960518078 361528019129895180737 361532019124665179018 36154201913030518133 36155301913063518152 36156501913098518162TEXT_TY_Concatenate 361568 36156880019132495182431913576518332to_txt0from_txt4blobtype8ref_txt12p16cp20r24 36157301913312518262 36157601913336518272 361580019133535182719 36158301913369518282 36159201913397518292 361602019134165182921 36161201913462518302 36163301913526518312 36164501913565518322TEXT_TY_ConcatenateI 361648 361648163019135815183531914187518532to_txt0from_txt4blobtype8ref_txt12pos16len20ch24i28tosize32x36y40case44 36165301913667518372 36166801913704518394 36167801913746518404 36168801913790518414 361709019138455184159 36171201913868518429 361715019138725184213 36172101913889518435 36173201913925518445 361748019138785184219 36175701913967518464 36177201914005518474 36178101914038518494 36180301914110518512 36180901914178518522SetPlayersCommand 361811 361811277019143395186031914880518742from_txt0i4len8at12p16cp20 36181601914382518612 361826019144015186121 36183601914447518622 36184601914489518632 361852019145045186317 36185601914573518672 361864019145915186720 36186801914614518697 361871019146185186911 361877019146295186922 361956019146245186917 36196501914695518708 361975019147095187022 362035019147045187017 36204401914732518712 36206001914761518722 36207301914841518732 36208501914879518741TEXT_TY_RE_Trace 4978040191501351881119150445188132TEXT_TY_RE_SetTrace 362088 362088130191510251882319151485188249F0 362093019151255188226 362098019151475188248NEWLINE_RE_CC -101915443518961019154615189628TAB_RE_CC -201915472518971019154865189724DIGIT_RE_CC -301915497518981019155135189826NONDIGIT_RE_CC -401915524518991019155435189929WHITESPACE_RE_CC -501915554519001019155755190031NONWHITESPACE_RE_CC -601915586519011019156105190134PUNCTUATION_RE_CC -701915621519021019156435190232NONPUNCTUATION_RE_CC -801915654519031019156795190335WORD_RE_CC -901915690519041019157055190425NONWORD_RE_CC -1001915716519051019157355190529ANYTHING_RE_CC -1101915746519061019157665190630NOTHING_RE_CC -1201915777519071019157965190729RANGE_RE_CC -1301915807519081019158245190827LCASE_RE_CC -1401915835519091019158525190927NONLCASE_RE_CC -1501915863519101019158835191030UCASE_RE_CC -1601915894519111019159115191127NONUCASE_RE_CC -1701915922519121019159425191230SUBEXP_RE_CC -2001915976519161019159945191628DISJUNCTION_RE_CC -2101916005519171019160285191733CHOICE_RE_CC -2201916039519181019160575191828QUANTIFIER_RE_CC -2301916068519191019160905191932IF_RE_CC -2401916101519201019161155192024CONDITION_RE_CC -2501916126519211019161475192131THEN_RE_CC -2601916158519221019161745192226ELSE_RE_CC -2701916185519231019162015192326VARIABLE_RE_CC -3001916235519271019162555192730LITERAL_RE_CC -3101916266519281019162855192829START_RE_CC -4001916320519321019163375193227END_RE_CC -4101916348519331019163635193325BOUNDARY_RE_CC -4201916374519341019163945193430NONBOUNDARY_RE_CC -4301916405519351019164285193533ALWAYS_RE_CC -4401916439519361019164575193628NEVER_RE_CC -4501916468519371019164855193727SENSITIVITY_RE_CC -5001916514519411019165375194133RE_MAX_PACKETS 3201916677519481019166965194829RE_PACKET_SIZE 1401916708519501019167275195029RE_PACKET_SIZE_IN_BYTES 5601916772519511019168215195159RE_PACKET_space 57784817924false0191684851953119169035195356RE_CCLASS 001916915519551019169285195523RE_PAR1 101916983519561019169945195621RE_PAR2 201917067519571019170785195721RE_PAR3 301917089519581019171005195821RE_NEXT 401917111519591019171225195921RE_PREVIOUS 501917179519601019171945196025RE_DOWN 601917224519611019172355196121RE_UP 701917261519621019172705196219RE_DATA1 801917299519631019173115196322RE_DATA2 901917348519641019173605196422RE_CONSTRAINT 1001917371519651019173895196528RE_CACHE1 1101917400519661019174145196624RE_CACHE2 1201917425519671019174395196724RE_MODES 1301917450519681019174635196823TEXT_TY_RE_Node 362101 362101161019175945197531918086519902n0cc4par18par212par316offset20 36210601917640519762 36211501917685519772 36212801917740519782 36213901917766519792 36215101917792519802 36216301917818519812 36217501917844519822 36218701917870519832 36219901917900519842 36221101917926519852 36222301917950519862 36223501917989519872 36224701918026519882 36225901918070519892TEXT_TY_RE_NodeAddress 362262 36226233019180915199231918219519952n0 36226701918118519932 362278019181545199338 36228101918166519942RE_Subexpressions 579640444false0191835852002119183885200231Allocated_Match_Vars 579684404false0191843152003119184645200334TEXT_TY_RE_DebugMatchVars 362295 362295224019185165200531918909520162txt0offset4n8i12 36230001918560520072 36231601918620520087 362319019186245200811 36234001918671520093 36238701918705520103 36244701918809520128 362458019188295201228 36247301918857520134 362491019188495201248 36250001918894520143 362506019186625200849 36251601918908520161TEXT_TY_RE_CreateMatchVars 362519 362519486019189145201831919600520382txt0offset4n8i12ch16ctxt20cl24csize28 36252401918981520207 362527019189855202011 36254801919032520213 36259501919066520223 362646019190965202233 36270201919138520233 36275901919192520243 36281501919239520253 36286201919274520263 36287201919310520273 36287501919325520288 362886019193455202828 36290101919375520294 36291201919405520304 36292201919430520315 362939019194785203153 36294201919489520325 36295201919531520344 362972019193655202848 36298101919568520363 362992019190235202049 36300201919599520381TEXT_TY_RE_EmptyMatchVars 363005 363005150019196055204031919780520452txt0n4 36301001919645520427 363013019196495204211 36303401919694520433 36308501919732520444 363142019196875204249 36315201919779520451TEXT_TY_RE_GetMatchVar 363155 363155234019197855204731920181520582vn0offset4 36316001919821520492 363184019198795204960 36319001919905520502 36323701919939520512 363241019199565205119 36324701919982520522 363261019200095205229 36326701920035520532 36331801920075520543 36333301920117520553 36333901920146520572TEXT_TY_MV_End 363389 36338980019203145206531920444520702n0end4offset8 36339401920345520672 36344101920378520682 363445019203905206814 36345701920417520692TEXT_TY_RE_Clear_Markers 363469 363469100019204495207231920689520792token0 363477019205045207324 36348801920489520739 36349401920533520743 363509019205625207432 36352701920607520753 36353901920632520763 36355101920657520773 36356601920688520791TEXT_TY_RE_DebugTree 363569 36356952019208245208631920964520892ftxt0detail4 36357401920859520872 36359501920904520882 36361801920963520891TEXT_TY_RE_DebugSubtree 363621 363621247019209695209131921663521122ftxt0depth4offset8detail12cup16 36362601921025520932 36363201921049520943 36364301921073520953 363658019211075209537 36366401921153520972 36367101921180520983 363686019212075209830 36369201921246520993 36371901921265521003 36373101921311521013 36374601921346521024 36377001921392521035 36377601921428521044 36380501921500521063 36382001921535521074 36384401921587521085 36385001921632521103 36386501921662521121TEXT_TY_RE_DebugNode 363868 3638681033019216685211431924280521842offset0ftxt4detail8i12par116par220par324 36387301921728521162 363879019217485211622 36389101921759521172 36391701921886521192 36392801921912521202 36393901921938521212 36395001921964521222 363968019220095212316 363984019220425212419 364000019220755212516 364016019221085212619 364032019221415212716 364048019221745212819 364064019222125212921 364080019222555213024 364096019222995213122 364112019223445213225 364128019223825213315 364144019224135213418 364160019224465213517 364176019224775213616 364192019225075213716 364208019225355213814 364224019225665213919 364240019226055214022 364256019226445214119 364272019226795214218 364288019227115214316 364294019227265214331 364300019227445214349 36430601922767521444 36431201922786521459 364316019227935214516 364322019228055214528 364340019228005214523 364359019228595214619 36437901922903521484 364383019229185214819 36439201922939521499 36439801922959521504 364403019229745215019 36441201922996521514 36441801923017521525 364422019230325215220 364431019230695215310 36444001923123521554 36444601923144521565 364450019231595215620 364459019232045215710 36446801923266521594 364474019232815215919 36448001923307521604 36449101923333521615 364497019233485216120 36450301923387521625 364509019234025216220 36451501923447521644 364521019234625216419 364537019235085216518 364553019235385216614 364569019235715216721 36458701923620521684 364591019236305216814 364600019236525216836 364616019236885216918 36462201923708521704 36462801923727521719 364632019237345217116 364638019237465217128 364656019237415217123 364675019238035217222 364700019238625217317 364719019239095217422 36472501923933521754 364729019239435217514 364738019239625217533 364753019239875217613 364759019239995217625 364765019240145217640 364783019240535217720 364789019240725217739 364795019240875217754 364813019241215217815 364828019241495217915 36483401924167521812 36483801924181521823 36489201924268521832 36489801924279521841TEXT_TY_CHR_CompileTree 364901 364901377019244415219131925549522212ftxt0exactly4root8literal12fto16no_packets20token24attach_to28 36490601924526521942 36491601924565521962 36493601924616521972 36495801924675521992 36497001924702522002 36498201924728522022 36498701924745522033 36499101924763522043 365001019247985220438 36500701924829522053 36501601924868522063 36504301924931522073 365052019249665220738 36506701925001522083 36509601925070522093 365108019250995220932 36512001925134522103 36513501925173522113 36517201925248522123 36519301925299522133 36521701925350522143 36522901925383522153 36523501925412522164 365247019254415221633 36526101925480522202 36527501925548522211Subexp_Posns 579724804false0192570552228119257305222826TEXT_TY_RE_CompileTree 365278 3652783410019257345222931935816525242ftxt0exactly4no_packets8ffrom12fto16cc20par124par228par332quantifiable36token40attach_to44no_subs48blevel52bits56 36528301925863522332 36529301925901522342 36529701925919522353 36532301926003522363 36532601926018522392 36535301926085522402 365361019261205224037 365370019261485224065 36537401926163522422 365377019261855224224 36538001926205522447 365383019262165224418 36539001926235522453 365409019262695224537 365412019262795224547 365415019262895224557 36541801926301522463 36542501926321522474 365431019263395224722 36543701926382522484 36545601926419522494 365466019264425225010 365480019264725225110 365494019265055225210 365508019265325225310 365522019265625225410 365536019265895225510 365550019266195225610 365564019266485225710 365578019266815225810 365592019267175225910 365606019267495226010 365620019267845226110 365634019268095226210 365648019268365226310 365662019268665226410 365675019268925226510 36568201926930522676 36569401926970522687 36570001926991522697 36570701927032522717 365731019271055227238 36573701927136522737 36574101927162522747 365747019271785227423 36575101927207522774 36575901927242522794 365770019272655228010 36577301927354522826 36578901927400522837 36579501927415522847 36579901927434522857 365814019274745228547 365820019274835228556 365826019275105228612 365841019275505228652 365847019275595228661 36585001927581522877 365879019276375228813 36591401927695522899 365931019277425229010 36593701927779522919 365948019278015229213 36595901927841522939 366032019279825229610 366038019280105229710 366047019280425229816 36605301928059522999 36605701928108523009 36606001928138523019 366066019281565230127 36607201928198523029 36614501928270523039 366155019283005230413 36615901928345523059 366162019283555230519 366166019283745230538 366180019283975230613 36618401928450523079 366187019284605230719 366191019284795230738 366205019285025230813 366218019285615230913 36622501928616523119 366240019286655231210 366246019286925231311 366250019287165231335 366254019287295231348 366260019287485231411 36626401928795523179 366279019288445231810 366285019288715231911 366289019288845231924 366293019288945231934 366299019289095231949 366305019289285232011 36630801928973523239 36631401929040523276 366318019290555232721 366331019290785232744 36633501929094523286 36633901929119523296 36634201929146523306 366348019291645233024 36635401929203523316 366438019292765233210 366442019292935233227 36644801929339523336 36645401929354523346 36650101929394523356 36651601929435523367 366522019294695233641 36652801929504523377 36656501929593523397 36658601929648523416 36659001929674523426 366600019296935234310 366604019297145234331 366618019297445234410 366622019297635234429 366635019297945234510 366639019298125234528 366652019298435234610 366656019298595234626 366670019298905234710 366674019299175234737 36668001929953523486 366683019299635234816 366687019299745234827 36669101929989523496 36672301930050523507 36672901930074523518 36673501930089523528 366741019301045235223 36674701930147523538 36675001930171523557 36676201930212523568 36676801930237523579 366773019302515235723 36677601930269523589 36679301930320523609 366798019303345236023 36680101930352523619 366818019304015236314 36682801930443523656 366834019304585236521 36684001930501523666 36684401930529523676 36685001930553523687 366856019305685236822 366864019305935236912 36686801930618523716 366874019306355237123 36688001930678523726 366895019307185237246 366901019307275237255 36690501930747523736 366925019307835237415 366928019307975237429 366934019308125237444 366941019308295237461 36694501930846523756 366960019308865237546 366966019308955237555 36697001930915523766 36697401930934523776 366989019309755237747 36699501930991523786 36700601931023523797 36702501931063523807 36703101931087523818 36705001931128523828 367054019311415238221 36707601931195523856 367080019312085238519 36708601931250523866 36709201931271523876 36715501931433523917 36716101931490523926 36717401931551523936 367178019315615239316 36718101931579523946 367187019315965239423 367194019316245239511 36719801931649523966 367212019316795239710 367216019317065239737 36722201931742523986 36722601931770523996 367229019317805239916 36723401931799524006 367249019318395240046 367255019318485240055 36725901931868524016 367272019318995240210 367276019319265240237 36728201931962524036 36728601931990524046 367290019320005240416 36729501932019524056 367310019320595240546 367316019320685240555 36732001932088524066 367332019321195240710 367336019321465240737 36734201932182524086 36734601932210524096 367349019322205240916 36735301932235524106 367368019322755241046 367374019322845241055 36737801932304524116 36738101932359524173 36738701932377524184 36739101932401524194 36744301932516524215 36748001932545524225 36748701932579524236 36751701932645524255 36752101932663524274 367525019326835242724 367531019326995242740 36753501932722524303 367541019327565243037 36754701932788524323 36755401932820524334 36757301932872524344 36758301932914524354 36759201932949524383 36762201933013524403 36765001933085524414 36771401933135524424 36775401933172524453 36779901933286524474 367811019333155244733 36782701933356524494 36786401933460524515 367870019334745245119 36788501933517524535 36789901933563524546 36791401933609524557 36792801933656524575 36795301933722524586 36797401933774524596 36799501933814524606 36802501933890524617 36804601933934524626 36805801933968524636 36806201933991524646 36806801934020524657 36808001934048524667 36809401934083524686 36810601934120524696 36812101934159524707 36814501934218524726 368157019342475247235 36816901934285524736 36819001934340524783 36820401934384524794 368210019344185247938 36821601934450524804 36825301934525524814 36827401934569524824 36830401934615524834 36831501934647524863 36831901934669524883 36832601934701524894 36833201934722524904 36834501934761524952 368349019347785249519 36835501934821524972 36836001934838524983 368370019348735249838 36837601934904524993 36838501934943525003 36841201935006525013 368421019350415250138 36843601935076525023 36846501935145525033 368477019351745250332 36848901935209525043 36850401935248525053 36854101935323525063 36856201935374525073 36858601935425525083 36859801935458525093 36860401935487525104 368616019355165251033 36863001935555525142 36864401935625525162 36864901935651525173 36865501935681525183 36866401935715525212 368678019357705252157 368682019357805252167 36868501935796525232TEXT_TY_RE_RangeSyntaxCorrect 368688 368688252019358215252631936386525452ftxt0rf4rt8i12chm16 36869301935876525287 368697019358825252813 36870401935897525293 36871501935928525303 36873301935963525314 36875201935997525324 36877801936077525345 36886201936194525366 36886801936242525393 36889701936297525404 368916019363325254039 36892201936362525414 368928019358885252819 36893801936377525442TEXT_TY_RE_ExpandChoices 368940 3689401365019363915254731940126526452token0no_packets4rv8prev12nex16holder20new24ct28n32cond_node36then_node40else_node44 36894501936494525492 36895201936520525503 36896701936560525514 368991019366225255210 369008019366595255247 369019019366485255236 369025019366785255266 36903401936687525535 369040019366975255315 36904601936744525545 369052019367785255439 36905801936811525555 36908501936884525565 36910001936917525576 36912101936966525595 36913201936999525605 36914301937039525615 36915401937076525625 36916501937116525635 36918101937152525646 36920201937200525656 36923201937260525666 36924701937299525677 36926801937348525686 36928901937393525696 36931001937446525715 369322019374755257134 36933401937506525725 369346019375395257238 36936201937592525745 369368019376265257439 36937401937659525755 36940101937732525765 369407019377665257639 36941301937799525775 36944001937867525785 36945501937900525796 36947601937944525806 36950001938001525826 36952101938045525836 36955101938101525846 36957201938146525856 36959301938199525875 36960501938232525885 369617019382595258832 36962901938296525895 369641019383335258942 36965301938364525905 36966501938396525915 36968001938434525926 369701019384875259310 369715019385275259350 369726019385145259337 36973201938555525946 36974701938598525984 36976201938637525995 36977301938668526005 36982701938828526046 36983301938886526083 36986401938957526094 36987501938988526104 36988601939014526114 36990601939077526125 36992001939101526134 369931019391255261328 369937019391455261348 36994301939163526144 369949019391975261438 36995501939229526154 36998201939297526164 369994019393215261628 37000601939346526174 37001201939370526185 370024019393925261827 37003601939426526204 37004201939449526215 370054019394745262130 37006601939503526234 37007801939529526244 37009001939560526254 37009401939571526264 37010001939599526275 37012001939627526285 37013201939652526295 37017001939744526316 37018201939772526325 37019601939805526344 37021201939830526354 370218019398495263523 37023001939876526364 370234019398895263617 37023801939905526383 37025301939939526394 37027301940010526404 370284019400645264058 37028701940077526423 37030201940106526442TEXT_TY_RE_CheckTree 370305 370305210019401315264731940728526662token0no_subs4rv8 37031001940172526492 37031701940198526503 37033101940244526514 370346019402765265136 37035201940323526533 37040601940433526564 37043501940489526574 370450019405165265731 37045601940575526593 37047101940609526604 37049101940665526614 370495019406735266112 37049801940690526633 37051301940719526652TEXT_TY_RE_Width 370515 370515612019407335266831942293527182token0downwards4w8rv12aw16choice20 37052001940784526702 37052701940810526713 37064401941119526765 37069401941228526805 37073201941294526825 37074101941322526845 37076901941378526855 370775019413925268519 37077801941407526865 37081901941481526876 37082201941496526885 37083801941529526905 370863019415605269036 37086901941584526926 37088801941629526936 370894019416435269320 37089701941664526955 37091301941701526975 370937019417415269745 37094001941756526985 37095901941800526995 370965019418145269919 37096801941829527005 37099701941889527025 371001019419075270310 371015019419495270352 371026019419335270336 37103201941983527046 37105101942067527066 371057019420815270620 37106001942097527076 371071019421265270735 37107401942142527086 37108101942161527105 37109601942207527143 371100019422225271418 37110301942234527153 371109019422535271522 37112401942282527172TEXT_TY_RE_RewindCount 4978080194242352725119424525272530TEXT_TY_RE_PrintNoRewinds 371127 371127100194245652726319425145272661 371130019424835272630 371134019425135272660CIS_MFLAG 101942526527281019425395272823ACCUM_MFLAG 201942550527291019425655272925TEXT_TY_RE_Parse 371137 371137246019425705273131943388527612ftxt0txt4ipos8insens12ilen16rv20root24i28initial_mode32 37114201942640527342 37115201942678527352 371163019427075273531 37116601942721527372 37117301942748527392 371176019427665273920 371180019427785273932 37118401942807527412 37119601942859527438 37120301942882527443 371242019430035274616 371246019430125274625 37124901943023527473 371254019430375274717 37126701943099527483 37127101943129527493 37130101943218527503 371306019432315275016 371309019428705274319 37131901943243527532 37132501943261527543 37133701943285527553 37135201943319527573 37136401943345527583 37138001943376527602TEXT_TY_RE_ParseAtPosition 371383 3713834900019435315276831956089531342ftxt0txt4ifrom8ito12token16mode_flags20outcome24ipos28npos32rv36i40ch44edge48rewind_this52 37138801943641527712 371394019436585277119 37139701943671527732 37140101943697527762 37140801943723527773 37141101943742527783 37141601943769527794 37143101943806527804 37144301943854527833 371449019438685278317 371463019439035278352 37146601943914527853 37147801943976527873 371496019440555279118 37150801944133527965 371521019441545279626 371530019442005279710 37153601944244527985 37155001944324528035 37157401944376528065 371578019443915280620 37159201944425528085 371605019444595280839 37162001944498528105 37162301944510528115 371761019446875281449 37176701944697528155 371771019447125281520 371777019447295281610 37179201944765528175 371917019449215282049 37192301944931528215 371929019449445282118 37194401944986528235 37194701944998528245 372085019451755282749 37209101945185528285 372095019452005282820 372101019452175282910 37211601945253528305 372241019454095283349 37224701945419528345 372253019454325283418 37226801945493528395 372279019455145283926 37228201945530528405 37228701945559528416 37230201945610528426 37231401945661528445 37232001945681528457 372394019457655284651 37240101945801528486 37244401945908528506 372449019459215285019 37245301945942528525 37245801945971528536 37247301946022528555 37247701946037528566 37253201946215528606 37256501946276528617 372571019463265286211 37263201946508528665 37263701946528528676 37264101946549528686 37265801946599528715 37266301946628528726 37267801946679528736 372690019467355287510 372704019467695287544 372715019467575287532 37272201946795528766 372746019468385287649 37274901946853528776 37275401946883528787 37276901946928528797 37278101946978528816 37281501947070528836 37282001947091528847 37283201947145528857 37285301947199528867 37285901947223528877 37286301947245528887 37286801947276528898 37288301947328528908 37289501947380528927 37289801947407528947 37290601947453528958 37292801947521528985 37293201947550528996 37293701947580529007 37295201947632529017 37296401947685529036 37297601947739529046 37299901947811529075 37302401947849529086 37303901947885529096 373044019478975290918 373051019479515291011 37308901948059529136 373107019480955291410 373150019481955291610 373195019483105291810 37323101948430529225 37323501948447529235 373240019484605292318 37324601948482529245 37326501948517529259 373270019485305292522 37328201948546529269 373287019485595292622 373294019485735292636 37329701948591529285 37330201948611529296 37331401948641529306 37332001948664529316 37333201948694529326 37333901948728529346 37334701948775529357 37335901948804529367 37337101948844529395 373386019488705293931 37340701948939529415 37341901948968529425 37344201949026529436 37346301949067529446 37348401949114529465 37348901949143529476 37350401949193529486 37351601949244529505 37353001949381529526 37354101949410529536 373555019494425295338 37356601949477529546 373570019494965295511 373577019495125295527 37358401949533529567 37358901949564529578 37361701949623529588 37362901949678529607 37366501949789529627 373670019498015296219 37367401949814529637 37369701949874529648 37373601949943529658 37377501950020529677 373801019500775296764 373807019500825296769 37381001950097529687 373816019495205295535 37382601950127529706 37385601950187529717 37386401950239529736 37387501950268529746 373890019503025297440 373901019503425297511 373908019503585297527 37393101950408529767 373937019504235297622 37394101950436529777 37394601950467529788 37397401950526529798 37398601950581529817 37402201950692529837 374027019507045298319 37403101950717529847 37405401950777529858 37409301950846529868 37413201950923529887 374158019509805298864 374164019509855298869 37416701951000529897 374173019503955297564 37418301951030529916 37420401951079529927 37420801951105529945 37421301951125529956 37422601951183529967 37424101951248529978 37426001951320529998 37427501951389530027 37429001951452530038 37430901951524530058 37432101951567530086 37432501951585530096 37433701951644530107 37435501951697530116 37437801951756530127 37441701951824530137 37445601951899530156 37446101951929530167 37447601951976530177 37449101952071530216 37449901952116530227 37451701952169530236 37452201952199530247 37453701952242530257 374569019523685303220 374573019523765303228 374577019523925303244 37459301952425530345 374617019524585303438 374621019524745303454 37463701952512530365 374665019525555303648 374669019525715303664 37468601952607530385 374777019527325304051 374781019527485304067 37479801952787530425 374895019529225304452 374899019529385304468 37491601952967530465 375041019531305304952 375045019531465304968 37506201953178530515 375181019533315305451 375185019533475305467 37520101953377530565 375261019534625305744 375265019534785305760 37528101953511530595 375345019536065306045 375349019536225306061 37536501953652530625 375377019536795306232 375381019536955306248 37539701953728530645 375413019537745306451 375417019537905306467 37543301953820530665 375446019538475306632 375450019538635306648 37546601953896530685 375483019539425306851 375487019539585306867 375503019539865306919 375509019540025306935 375513019540185306951 375529019540425307015 375535019540575307030 375539019540735307046 37555501954103530725 37560701954222530748 375611019542385307424 37562701954301530795 37567001954417530815 375675019544325308120 375681019544505308138 37569601954491530835 37570701954516530845 37576901954568530856 37590601954729530886 375911019547445308821 375917019547625308839 37592101954825530933 37592601954852530944 37594401954897530955 37595201954941530966 375963019549535309618 375969019549725309637 37597901954995530985 37598201955014531004 37598701955042531015 37600201955108531026 37601401955157531044 37605901955282531065 37606201955303531074 376070019553425310743 37607901955383531084 37609001955415531094 37609701955443531105 37612201955530531126 37613301955560531136 37614401955596531146 37615201955641531157 37616201955690531166 37616801955712531177 37617801955751531186 37618301955781531197 37621601955849531207 37622801955902531226 37623201955925531245 37624701955962531264 37625201955988531275 37625801956020531284 37626101956038531313 37627601956067531332TEXT_TY_RE_SeekBacktrack 376283 376283496019562275314131957851531952token0ftxt4downwards8ito12report_only16untried20 376291019563225314324 37630201956307531439 37630901956351531443 37631801956406531454 37632401956436531464 37633601956483531483 37638101956568531504 37638401956594531514 37638701956610531533 37640201956644531544 376411019566945315454 37641701956715531554 37644901956806531573 37645201956825531583 37647101956880531605 37653501957043531636 37653901957072531646 37655401957111531657 37656901957154531677 37660601957186531686 37661901957233531715 37663401957273531726 37664301957331531737 37664901957371531747 37666101957424531766 37667501957459531777 37667901957489531787 37670001957537531797 37670401957572531833 37670801957590531844 37671301957618531855 37671901957655531865 37673101957704531884 37674901957753531894 37676701957802531904 37677001957815531923 37677701957842531942TEXT_TY_RE_FailSubexpressions 376779 376779109019579965320231958299532112token0downwards4 376787019580665320324 37679801958051532039 37680401958095532043 376819019581245320432 37683701958174532053 37685101958218532064 37686301958244532074 37687501958273532093 376879019582885320918 37688501958298532111TEXT_TY_RE_EraseConstraints 376888 376888110019584445321831958738532272token0 37689301958480532192 37689901958506532203 376917019585575322123 376938019586065322222 37695001958640532243 376963019586615322424 37698101958709532253 37699501958737532271TEXT_TY_RE_MatchSubstring 376998 376998154019588855323431959255532482txt0ipos4mtxt8mfrom12mto16insens20i24ch28 37700301958950532362 377008019589655323617 37701001958976532372 37701401958995532388 377018019590035323816 37702401959019532394 37703501959050532404 37707601959114532415 377079019590095323822 37709101959142532448 377095019591505324416 37710101959164532454 37713301959224532465 377136019591565324422 37714501959236532472TEXT_TY_RE_Range 377152 3771521031019594055325531961358533182ch0ftxt4rf8rt12negate16insens20i24chm28upper32crev36 37715701959470532572 37716001959492532582 37716601959516532593 37719301959581532603 37719601959597532627 377200019596035326213 37720701959618532633 37721801959649532643 37723601959684532654 37725501959718532664 37726501959747532686 37729901959799532706 37733701959861532726 37743801960007532766 37754401960163532806 37767701960348532856 37780101960523532906 37787101960628532936 377945019607385329510 377966019607795329610 377987019608295329710 378009019608705329810 378031019609205329910 378046019609505330010 37805601960989533034 37808501961045533045 37810001961082533055 37811201961127533065 37811601961146533076 37812601961179533086 37813801961234533105 37814701961257533125 37815301961283533135 378171019596095326219 37818101961349533172TEXT_TY_Replace_RE 378183 378183165019615025332531962163533392ftxtype0txt4ftxt8rtxt12insens16exactly20r24p28p132p236cp40cp144cp248 37818801961728533302 378199019617505333024 378209019617645333038 37822201961812533317 37823101961837533322 378241019618535333218 37825101961896533332 378261019619125333318 37827101961955533342 37829801962024533352 37831001962061533362 37832201962098533372 378333019621185333722 37834501962152533382TEXT_TY_Replace_REI 378348 378348784019621685334131964787534412ftxtype0txt4ftxt8rtxt12insens16exactly20ctxt24csize28ilen32i36cl40mpos44cpos48ch52chm56 37835301962267533442 37836301962306533462 37836601962327533472 378376019623615334816 378396019624165334913 378410019624715335012 37842201962500533532 37843301962537533543 37843701962559533553 37845801962635533563 37846701962676533573 37846901962691533602 37847401962717533613 37848301962747533623 37849801962793533652 378504019628215336530 37851101962851533662 378514019628615336612 378517019628705336621 37852001962881533672 37854501962940533683 37855101962952533703 37855701962979533714 37860401963092533734 37862401963160533745 37863001963190533769 378639019632195337638 37865201963259533775 378670019632485337667 37867901963302533794 37868501963326533823 378689019633415338218 37869301963394533843 37870601963419533854 37871201963439533865 37872201963475533875 37873101963504533885 37874101963552533919 378745019635595339116 37875801963599533925 37876901963630533935 37877901963656533946 378796019637045339454 37879901963716533956 37880901963760533975 378829019635885339145 37883801963799533994 37884901963832534014 37886901963882534024 37887901963919534034 37888901963965534063 378898019640005340638 37890201964015534073 37892201964080534084 37892801964091534103 37893301964118534114 37893901964189534125 378945019642295341245 37895201964249534162 37895801964266534173 37896901964296534189 378973019643035341816 37897901964321534195 37899001964352534205 37900001964378534216 379017019644265342154 37902001964438534226 37903001964482534245 379050019643105341823 37905901964527534283 37906501964560534294 37907401964596534304 37907901964622534315 37908801964661534343 37909901964686534354 37911001964717534364 37912001964746534374 37912901964774534402TEXT_TY_RE_Concatenate 379132 379132565019649265344831966408534962txt_to0txt_from4blobtype8txt_ref12pos16len20ch24i28tosize32x36y40case44 37913701965014534502 37915301965081534512 379171019651435345164 37917401965159534522 37918401965199534532 37919401965237534542 37920401965284534557 379207019652885345511 37921401965303534563 37922501965337534573 37924301965374534584 37926201965411534594 379268019654265345919 37927201965438534604 379278019654535346019 37928201965464534614 37928601965478534624 379292019654935346219 37929501965506534634 379301019655215346319 37930501965534534644 379310019655495346419 37932901965586534654 37934301965624534665 37934901965643534675 37936301965683534686 37942101965729534696 37947901965775534706 379485019658015347113 37949201965819534728 37950301965857534738 37951301965888534749 379530019659425347463 37953301965957534759 37954301966010534778 37954801966033534789 37958001966105534809 379600019658055347117 37961001966164534845 37961301966189534883 37962301966215534894 379640019662695348958 37964301966279534904 37965301966322534923 379673019652945345517 37968301966360534942 37969401966392534952STORA_ACTION_F 001966559535031019665775350328STORA_NOUN_F 101966588535041019666045350426STORA_SECOND_F 201966615535051019666335350528STORA_ACTOR_F 301966644535061019666615350627STORA_REQUEST_F 401966672535071019666915350729STORA_COMMAND_TEXT_F 501966702535081019667265350834STORED_ACTION_TY_Support 379697 379697176019668695351531967545535312task0arg14arg28arg312 37970201966916535162 379712019669515351721 379729019670095351821 379748019670615351921 379757019670915352021 379766019671155352118 379785019671645352221 379793019671945352321 379802019672245352421 379821019672795352521 379839019673445352621 379856019674005352721 37987101967536535302STORED_ACTION_TY_Create 379873 379873148019676855353831968226535472sb0stora4 37987801967720535392 37989101967788535402 37991301967850535412 37993201967903535422 37995101967960535432 37997101968020535442 37999001968093535452 38000901968188535462STORED_ACTION_TY_New 380021 38002192019683685355431968744535632a0n4s8ac12req16stora20 38002601968411535552 380030019684275355518 38004001968470535562 38005101968512535572 38006301968552535582 38007501968594535592 38008701968636535602 38009901968681535612 38011001968729535622STORED_ACTION_TY_Destroy 380113 38011332019688875357031969003535732stora0toc4 38011801968924535712 38012901968974535722 380133019689835357211 38014201969002535731STORED_ACTION_TY_Copy 380145 38014558019691425358031969402535862storato0storafrom4tocfrom8tocto12 38015001969198535812 38016101969256535822 380165019692745358220 38016801969283535832 38017801969317535842 38018801969348535852 38020001969401535861STORED_ACTION_TY_Compare 380203 380203209019695445359331970441536092storaleft0storaright4delta8itleft12itright16 38020801969613535942 38023001969706535952 380234019697175359513 38023701969732535962 38026101969821535972 380265019698325359713 38026801969847535982 38029201969940535992 380296019699515359913 38029901969966536002 38032301970057536012 380327019700685360113 38033001970083536022 38035401970178536032 380358019701895360313 38036101970204536042 38037201970261536052 38038301970320536062 38039101970359536073 38040501970415536082STORED_ACTION_TY_Distinguish 380412 38041220019704465361131970559536142stora10stora24 38041701970491536122 38042901970551536132STORED_ACTION_TY_Hash 380432 380432128019706985362131971112536312stora0rv4it8 38043701970735536222 38044701970778536232 38046601970829536242 38048501970882536252 38050401970934536262 38052301970988536272 38053401971037536282 38053801971052536293 38055701971100536302STORED_ACTION_TY_Say 380560 380560553019712525363831973316536882stora0text_of_command4saved_command8saved_pn12saved_action16K120K224at28cf32cw36 38056501971348536392 380583019714135363967 38058601971422536402 38059701971484536412 38060101971509536423 38061101971552536433 38062401971612536443 38063301971652536462 380638019716785364628 38064301971702536472 38065401971749536482 380659019717685364821 38066401971789536492 38067401971811536502 38073401971848536512 38079401971887536522 38080001971912536533 38081201971965536543 38082201972026536554 380826019720505365528 38083601972094536564 38084901972155536574 38085901972201536584 38087001972250536594 38087901972289536604 38088501972325536614 380893019723595366138 38090101972402536642 38090701972427536653 38091901972482536663 38092901972543536674 380933019725675366728 38094301972611536684 38095601972672536694 38096601972718536704 38097701972767536714 38098601972806536724 38099201972842536734 381000019728765367338 38100801972920536762 38106801973132536822 381073019731585368228 38107801973182536832 381083019732015368321 38108801973222536842 38109201973247536853 38110101973283536863 38111001973315536881STORED_ACTION_TY_Involves 381113 381113207019734595369531973857537052stora0item4at8 38111801973501536962 38113601973556536972 38114101973568536983 38122201973677537003 38130301973792537032 38131801973848537042STORED_ACTION_TY_Part 381320 381320149019739945371231974349537202stora0ind4at8ado12 38132501974035537132 38133801974082537143 381344019741075371428 381351019741315371452 38135501974154537153 38137301974210537163 381443019742605371653 38145501974295537173 38145701974315537192SAT_Tmp 579804284false0197449553727119745125372718STORED_ACTION_TY_Adopt 381469 381469315019745165372831975270537512stora0at4 38147401974550537292 38148401974573537302 38149401974594537312 38150401974617537322 38151301974639537332 38152201974669537342 38153201974699537352 38154301974746537362 38155301974768537372 38161901974818537383 38163401974870537403 38164601974923537413 38165001974943537432 38171601974995537443 38173101975051537463 38174301975106537473 38174701975128537492 38175801975173537502 381771019752155375044 381778019752445375073 38178101975269537511STORED_ACTION_TY_Unadopt 381784 38178470019752755375331975474537612 38178701975302537542 38179701975325537552 38180701975346537562 38181701975370537572 38182601975393537582 38183501975423537592 38184501975453537602STORED_ACTION_TY_Current 381854 381854483019756205376831976763537962stora0at4text_of_command8 38185901975672537692 381877019757375376967 38187901975748537702 38189101975795537712 38190101975818537732 38196701975868537743 38198301975918537763 38199601975970537772 38206201976022537783 38207801976076537803 38209101976130537812 38210301976175537822 382107019761945378221 38212201976245537837 38213301976293537852 38227001976424537873 38228101976487537883 38228501976518537894 38229501976564537904 38230701976631537923 38232301976699537939 38233401976748537952STORED_ACTION_TY_Try 382337 382337176019769015380331977647538232stora0ks4text_of_command8saved_command12 38234201976964538042 382360019770295380467 38236301977038538052 382367019770485380512 382371019770675380531 38237601977085538062 38238701977147538072 38239101977172538083 38240101977215538093 38241401977275538103 38242301977315538122 38248001977521538182 38248401977546538193 38249301977582538203 38250201977615538222 382506019776255382212 38251001977646538231LIST_ITEM_KOV_F 001977791538301019778105383029LIST_LENGTH_F 101977845538311019778625383127LIST_ITEM_BASE 201977897538321019779155383228LIST_OF_TY_Support 382513 382513247019780855383931978971538572task0arg14arg28arg312 38251801978126538402 382528019781615384121 382546019782195384221 382565019782655384321 382574019782955384421 382592019783555384521 382610019784135384618 382630019784625384721 382648019785225384821 382670019786015384921 382691019786565385021 382709019787155385121 382726019787655385221 38275801978962538562LIST_OF_TY_Create 382760 38276080019791045386431979394538712skov0sb4list8 38276501979137538652 38277501979168538662 38278801979250538672 38280701979301538682 38282601979347538692 38283701979382538702LIST_OF_TY_Destroy 382840 38284081019795305387831979770538842list0no_items4i8k12 38284501979569538792 38285501979611538802 38286701979639538813 38287801979692538828 382881019796975388213 382887019797145388230 382909019797095388225 38291801979769538841LIST_OF_TY_CopyKind 382921 38292127019799025389131980006538932to0from4 38292601979932538922 38294501980005538931LIST_OF_TY_QuickCopy 382948 38294829019800115389531980139538992to0from4 38295301980042538962 38297401980131538982LIST_OF_TY_KindData 382977 38297716019801445390131980216539032list0 38298201980171539022LIST_OF_TY_Copy 382993 382993176019802215390531980850539222lto0lfrom4precopied_list_kov8no_items12i16nv20bk24val28splk32 38299801980295539062 38300901980343539072 38301901980387539082 38303301980432539093 38304701980495539107 38305801980537539112 38307001980571539128 383073019805765391213 38307901980598539134 38309401980646539144 38310801980693539155 38312101980746539175 38313101980774539184 38314101980800539194 383157019805885391225 38316601980849539221LIST_OF_TY_Compare 383169 383169227019809855392931981791539512listleft0listright4delta8no_items12i16cf20 38317401981045539302 38319801981134539312 383202019811455393113 38320501981160539322 38321601981211539332 383220019812305393321 38322201981241539342 38324401981334539352 383248019813455393513 38325101981360539362 38326101981401539372 38327501981442539388 383278019814475393813 38328401981469539394 38331601981570539414 383320019815815394115 383323019814595393825 38333501981616539448 383338019816215394413 38334401981643539454 38337801981747539474 383382019817585394715 383385019816335394425 38339401981780539502LIST_OF_TY_ComparisonFn 383396 38339644019817965395331981963539562list0 38340101981827539542 383419019818845395459 38342101981895539552LIST_OF_TY_Distinguish 383440 38344020019819685395831982061539612txb10txb24 38344501982003539592 38345701982053539602LIST_OF_TY_Hash 383460 38346082019821935396831982434539752list0len4kov8rv12i16 38346501982230539692 38346801982239539702 38347901982281539712 38348901982330539727 383492019823355397212 38349801982349539733 383530019823425397219 38353901982422539742LIST_OF_TY_Say 383542 383542283019825675398231983515540102list0format4no_items8v12i16bk20 38354701982612539832 383565019826695398359 38356801982678539842 38357901982725539852 38359701982853539872 383603019828705398719 38360901982887539887 383612019828915398811 38361901982911539893 38363401982955539903 38364401982979539917 38366201983000539927 38367401983029539945 383680019830515399427 383693019830825399510 38370501983127539966 383711019831385399617 383721019831655399644 383730019831915399810 38374001983224540003 383750019832425400021 38375601983256540013 38376601983280540024 383772019832975400221 38378101983383540045 383790019829025398822 38380001983426540082 383806019834435400819 38381201983455540092 383817019834845400931 38382201983514540101LIST_OF_TY_Desc 383825 383825162019836615401731984268540352list0desc4kov8obj12no_items16ex20len24i28 38383001983715540182 383848019837725401859 38385001983787540192 38386001983819540202 38386701983836540212 38387701983869540223 38389401983934540234 38389601983948540252 383900019839575402511 38391401984006540267 38392501984056540272 38393701984098540282 38394001984113540297 383943019841185402912 38394901984134540303 38395901984206540323 383975019841255402919 38398401984254540342LIST_OF_TY_FindItem 383987 383987139019844025404231984831540542list0v4i8no_items12cf16 38399201984445540432 38400801984511540442 38401801984548540452 38402901984595540462 38404301984636540478 384046019846415404713 38405201984661540484 384071019846535404725 38408301984732540508 384086019847375405013 38409201984757540514 384115019847495405025 38412401984822540532LIST_OF_TY_InsertItem 384126 384126344019849675406131986203540952list0v4posnflag8posn12nodups16i20no_items24ex28nv32contents_kind36 38413101985050540622 384149019851075406259 38415101985122540632 384168019851685406348 38417101985182540642 38418201985229540652 38419401985308540662 38420401985362540672 38422401985419540683 38423901985480540693 38424901985510540703 38426401985579540713 38427301985617540723 38427501985629540742 38428501985661540752 38429901985701540763 384316019857505407652 38431801985764540782 38433001985804540793 38434001985842540803 38435001985865540813 38435401985877540832 38435801985895540843 38436401985910540858 384368019859215408519 38437401985938540864 384407019859285408526 38441601986030540893 38443501986087540913 38445101986140540932 38446701986189540942LIST_OF_TY_AppendList 384470 384470532019863395410231988127541522list0more4posnflag8posn12nodups16v20i24j28no_items32msize36ex40nv44 38447501986421541032 384493019864785410359 38449501986493541042 384513019865505410459 38451601986564541052 38452701986611541062 38453901986690541072 38455901986747541083 38457401986808541093 38458401986838541103 38459901986907541113 38460801986945541123 38461001986957541142 38462101987001541152 38463101987033541162 38464501987077541173 38467001987155541184 38467201987169541202 38467701987187541213 38468301987202541228 384689019872195412225 38469901987243541234 384732019872335412239 38474101987378541278 384744019873835412713 38475001987402541284 38476501987447541294 38478501987511541305 38480301987573541315 38481301987598541325 38481701987614541344 384837019873925412722 38485001987682541378 384856019876925413718 38486301987711541384 38487801987756541394 38489801987820541405 38491601987882541415 38492601987907541425 38493001987923541444 38494701987991541455 38496701988046541465 384973019877015413727 38498301988064541502 38499901988113541512LIST_OF_TY_RemoveValue 385002 385002325019882645415931989339541882list0v4forgive8i12j16no_items20odsize24f28cf32delendum36 38500701988338541602 38502301988404541612 38503301988441541622 385044019884875416248 38504801988507541632 38506001988591541647 385063019885965416412 38507001988617541653 38508501988668541663 38509901988703541674 38511901988734541694 38514001988764541703 38514401988776541714 38516401988838541725 38517301988870541739 385179019888775417316 38518501988898541745 385218019888895417328 38522701988985541764 385233019889975417616 38523901989005541774 385251019886085416424 38526101989059541802 38526601989092541812 38526901989114541822 38527501989156541832 38529301989217541842 38529901989257541852 38530901989286541862 38531501989302541872 38532401989338541881LIST_OF_TY_RemoveItemRange 385327 385327305019894815419531990424542212list0from4to8forgive12i16d20no_items24 38533201989544541962 38534801989610541972 38535901989657541982 38537601989712541993 38538001989730542004 385385019897455420019 38538901989758542014 385395019897785420124 38539901989796542024 385405019898115420219 38541101989838542044 38543501989916542054 38544501989947542064 38546001990017542074 38546901990056542084 38547101990072542112 38547701990078542118 38548301990087542122 38549301990103542132 38551301990168542148 385516019901735421413 38552201990186542154 385548019901785421418 38555701990249542167 385561019902575421615 38557101990278542173 385604019902715421629 38561301990361542192 38562901990410542202LIST_OF_TY_Remove_List 385632 385632298019905605422831991404542542list0rlist4i8j12k16v20w24no_items28odsize32rsize36cf40f44 38563701990633542292 38565301990699542302 385664019907455423048 38566801990765542312 38567901990810542322 38568901990852542337 385692019908575423312 38569901990878542343 38571401990927542358 385717019909325423513 38572401990951542364 38573901990997542374 38575301991033542385 38577301991059542405 38579401991083542414 38579801991096542425 38581801991159542436 385827019911855424410 385833019911925424417 38583901991214542456 385872019912045424429 38588101991304542475 385887019913165424717 38589301991325542485 38590501991375542495 385908019909415423522 385918019908695423324 38592801991395542532LIST_OF_TY_GetLength 385930 38593037019915395426131991678542642list0 38593501991567542622 385953019916245426259 38595501991635542632LIST_OF_TY_Empty 385967 38596736019916835426631991834542702list0 38597201991707542672 38598801991773542682 38600101991825542692LIST_OF_TY_SetLength 386003 386003403019919695427731993298543112list0newsize4this_way_only8truncation_end12no_items16ex20i24dv28 38600801992051542782 386026019921085427859 38602801992119542792 386033019921365427919 38604501992191542802 38605401992214542812 38606501992261542822 38607201992289542833 386078019923145428328 38608101992329542843 38609101992362542853 38610101992400542864 38611801992470542875 38612001992486542893 38613801992554542908 386142019925665429020 38614801992585542914 386164019925775429031 38617301992630542923 38618501992679542942 38619201992707542953 386198019927315429527 38620101992746542963 38620801992777542974 386228019928445429810 386231019928495429815 38624101992879542996 386263019928695429835 38627201992939543009 386275019929445430014 38628101992964543015 386318019929555430025 38633001993077543044 386350019931445430510 386354019931555430521 38636001993177543066 386382019931675430533 38639101993235543083 38640301993284543102LIST_OF_TY_GetItem 386406 386406160019934315431831994038543342list0i4forgive8no_items12 38641101993476543192 386429019935335431959 38643101993548543202 38644201993595543212 38645301993627543223 386457019936405432216 38645901993656543233 38647401993720543243 38648301993746543257 38649801993776543267 386507019938345432713 38652201993901543293 38653101993939543303 386537019939585433022 38654401993972543318 38654601993990543332WriteLIST_OF_TY_GetItem 386566 386566144019941735434131994713543542list0i4val8no_items12 38657101994219543422 386589019942765434259 38659101994291543432 38660201994338543442 38661301994370543453 38662801994438543463 38663701994464543477 38665201994494543487 386661019945525434913 38667601994619543513 38668701994666543532 38670701994712543541LIST_OF_TY_PutItem 386710 386710124019948465436131995253543712list0i4v8no_items12nv16 38671501994889543622 386733019949465436259 38673501994961543632 38674601995008543642 38676601995070543653 38678401995130543663 38679401995153543673 38679801995165543692 386809019951935436930 38681101995208543702 38683101995252543711LIST_OF_TY_Mol 386834 386834123019953985437831995646543852list0len4i8 38683901995426543792 386857019954835437959 38685901995494543802 38686701995522543812 38687701995561543827 386881019955665438212 38688701995581543833 386945019955745438220 38695401995632543842LIST_OF_TY_Set_Mol 386957 386957141019956515438731995934543942list0len4i8 38696201995683543882 386980019957405438859 38698201995751543892 38699301995793543902 386999019958075439016 38700301995818543912 38701101995851543927 387015019958565439212 38702101995871543933 387086019958645439220 38709501995933543941LIST_OF_TY_Reverse 387098 387098146019960685440131996493544122list0no_items4i8v12 38710301996107544022 387121019961645440259 38712301996175544032 38713401996222544042 387140019962405440420 38714301996259544057 387146019962635440511 38715601996285544063 38717101996329544073 38720801996422544093 387232019962765440524 38724101996479544112LIST_OF_TY_Rotate 387244 387244225019966265441931997287544372list0backwards4no_items8i12v16 38724901996675544202 387267019967325442059 38726901996743544212 38728001996790544222 387286019968085442220 38728901996822544232 38729301996841544243 38730401996888544258 387307019968925442512 38731701996913544264 387350019969055442525 38735901996998544283 38738201997061544303 38740101997119544318 387407019971325443121 38741201997144544324 387445019971365443125 38745401997229544343 38746601997273544362LIST_OF_TY_Sort_cf 4978120199741754444119974425444426LIST_OF_TY_Sort 387469 387469201019974475444631998032544632list0dir4prop8cf12i16j20no_items24v28 38747401997498544472 38748301997521544482 38749401997568544492 38750001997586544503 387506019976045445021 38750901997619544518 387513019976235445112 38751901997644544524 38753601997668544534 38755101997713544544 38758001997793544554 387596019976345445123 38760501997841544573 38760801997853544592 38762401997906544602 387628019979145446010 38763901997958544617 38764301997983544622 38766701998031544631ListSwapEntries 387670 38767093019980375446531998257544702list0i4j8v12 38767501998066544662 387681019980765446612 38768401998085544672 38770301998130544682 38774001998212544692 38776001998256544701ListCompareEntries 387763 387763174019982625447231998706544892list0col4i8j12d16cf20 38776801998301544732 387774019983115447312 38777601998322544742 38779501998367544752 38781401998412544762 38781901998429544773 387833019984535447727 387848019984715447745 38785101998478544783 387865019985025447827 387880019985205447845 38788301998527544793 38789101998564544813 38790101998604544832 38790501998621544843 387911019986325448414 38791401998644544853 387920019986555448514 38792301998668544863 38792501998688544883 38793401998705544891COMBINATION_KIND_F 001998857544961019988795449632COMBINATION_ITEM_BASE 101998910544971019989355449735COMBINATION_TY_Support 387937 387937206019991115450431999863545212task0arg14arg28arg312 38794201999156545052 387952019991915450621 387970019992535450721 387989019993035450821 387998019993335450921 388016019993975451021 388025019994215451118 388044019994705451221 388061019995285451321 388070019995595451421 388091019996185451521 388109019996815451621 388126019997355451721 38814101999854545202COMBINATION_TY_Create 388143 388143153020000035452832000486545402kind0sb4long_block8N12i16bk20v24 38814802000055545292 38815802000081545302 38817902000179545322 38819802000244545337 388201020002495453312 38820702000263545343 38821802000293545353 388230020003185453528 38824302000349545368 38825302000378545373 388275020002545453317 38828402000443545392COMBINATION_TY_Destroy 388296 38829691020006295454732000911545552comb0kind4no_items8i12bk16 38830102000678545482 38831102000726545492 38832102000764545507 388324020007695455012 38833002000790545513 38834102000820545523 38835302000848545534 388375020007815455024 38838402000910545551COMBINATION_TY_CopyKind 388387 38838727020010505456232001164545642to0from4 38839202001084545632 38841102001163545641COMBINATION_TY_CopySB 388414 38841418020011695456632001229545682to0from4 38841902001201545672 38842902001228545681COMBINATION_TY_KindData 388432 38843216020012345457032001313545722comb0 38843702001265545712COMBINATION_TY_Copy 388448 388448119020013185457432001816545862to_comb0from_comb4precopied_comb_kov8no_items12i16nv20kind24bk28 38845302001453545762 38846302001500545772 38847402001570545787 388477020015755457812 38848302001596545793 38849402001626545803 38850602001656545814 38851602001684545824 38853902001755545834 388555020015875457824 38856402001815545861COMBINATION_TY_Compare 388567 388567165020019585459332002570546102left_comb0right_comb4delta8no_items12i16cf20kind24bk28 38857202002032545942 38858202002085545952 38859202002123545967 388595020021285459612 38860202002149545973 38861302002179545983 38862302002213545993 38863702002250546004 38866902002367546024 388673020023785460215 38867902002406546044 38871302002526546064 388717020025375460615 388720020021405459624 38873002002559546092COMBINATION_TY_Distinguish 388732 38873220020025755461232002698546152left_comb0right_comb4 38873702002625546132 38874902002690546142COMBINATION_TY_Hash 388752 38875292020028375462232003132546312comb0kind4rv8no_items12i16bk20 38875702002887546232 38876002002896546242 38877002002944546252 38878002002982546267 388783020029875462612 38878902003008546273 38880002003038546283 388832020029995462624 38884102003120546302COMBINATION_TY_Say 388844 388844145020032725463832003718546512comb0format4no_items8v12i16kind20bk24 38884902003326546392 388867020033875463963 38887002003396546402 38888002003444546412 38889002003477546422 38889602003494546437 388899020034995464312 38890502003520546443 388910020035295464412 38891602003543546453 38892702003573546463 38894202003624546473 388948020036465464725 38896102003675546488 388971020035115464324 38898002003706546502 38898602003717546511RRV_NAME 002003869546581020038935465834RRV_PERMISSIONS 102003956546591020039885465942RRV_STORAGE 202004043546601020040685466035RRV_KIND 302004120546611020041405466130RRV_HANDLER 402004191546621020042165466235RRV_DESCRIPTION 502004271546631020043035466342RRV_USED 602004347546641020043595466422RRV_FILLED 702004370546651020043845466524RRV_DATA_BASE 802004395546661020044115466626RELATION_TY_Support 388989 388989170020045545467332005187546892task0arg14arg28arg312 38899402004596546742 389004020046315467521 389023020046935467621 389042020047405467721 389051020047705467821 389060020047945467918 389079020048435468021 389087020048735468121 389096020049045468221 389115020049545468321 389133020050145468421 389142020050475468521 38915702005178546882RRVAL_V_TO_V 002005355546971020053705469725RRVAL_V_TO_O 409602005381546981020054085469837RRVAL_O_TO_V 819202005419546991020054465469937RRVAL_O_TO_O 1228802005457547001020054985470051RRVAL_EQUIV 4915202005509547011020055535470154RRVAL_SYM_V_TO_V 3276802005564547021020055955470241RRVAL_SYM_O_TO_O 4505602005606547031020056655470369RRF_USED 102005702547061020057175470625RRF_DELETED 202005753547071020057705470727RRF_SINGLE 402005813547081020058305470827RRF_HASX 1602005876547091020058915470925RRF_HASY 3202005946547101020059615471025RRF_ENTKEYX 6402006018547111020060355471127RRF_ENTKEYY 12802006082547121020060995471227RELS_COPY 3202006546547251020065615472525RELS_DESTROY 1602006572547261020065905472628RELS_EMPTY 302006732547321020067485473226RELS_SET_VALENCY 502006759547331020067815473332RLANY_GET_X 102006836547361020068495473623RLANY_GET_Y 202006860547371020068735473723RLANY_CAN_GET_X 302006884547381020069015473827RLANY_CAN_GET_Y 402006912547391020069295473927RLIST_ALL_X 102006977547421020069905474223RLIST_ALL_Y 202007001547431020070145474323RLIST_ALL_PAIRS 302007025547441020070425474427RRP_MIN_SIZE 802007199547511020072185475129RRP_PERTURB_SHIFT 502007275547521020072945475229RRP_RESIZE_SMALL 402007336547531020073555475329RRP_RESIZE_LARGE 202007401547541020074205475429RRP_LARGE_IS 25602007466547551020074875475531RRP_CROWDED_IS 202007539547561020075585475629RelationTest 389159 38915935020077615476332007887547662relation0task4X8Y12handler16rv20 38916402007806547642 38917502007848547652RlnGetF 389194 38919427020078925476832007965547712rel0fld4i8 38919902007912547692 38920902007946547702RlnSetF 389221 38922130020079705477332008040547762rel0fld4v8 38922602007990547742 38923602008024547752 38924802008039547761EmptyRelationHandler 389251 38925113020081875478332008269547862relation0task4X8Y12 38925602008228547842 38926202008260547852RELATION_TY_Create 389264 389264461020084095479332009867548242kov0from4sb8rel12i16skov20handler24 38926902008461547942 38928302008573547962 389291020086045479633 38930102008637547972 38930602008656547988 389309020086615479813 389315020086835479835 389342020086785479830 38935102008737547993 38937002008803548004 38939102008874548014 38941302008935548024 38943402009041548044 38945402009092548054 38947402009150548064 38949702009221548074 38951602009263548084 38953902009320548113 38954902009360548123 38957102009420548133 38959202009524548153 38961202009581548163 38963202009624548173 38965202009674548183 38967502009744548193 38969402009785548203 38971302009831548232RELATION_TY_Destroy 389725 38972526020100105483132010117548342rel0handler4 38973002010045548322 38974102010088548332 38974802010116548341RELATION_TY_Copy 389751 38975126020102565484132010363548442lto0lfrom4handler8 38975602010294548422 38976702010337548432 38977402010362548441RELATION_TY_Compare 389777 38977761020105055485132010754548572rleft0rright4ind18ind212 38978202010550548522 38979302010592548532 38980402010635548542 389810020106535485420 38981702010674548552 389829020107195485547 38983102010730548562RELATION_TY_Distinguish 389838 38983820020107595485932010860548622rleft0rright4 38984302010798548602 38985502010852548612RELATION_TY_Say 389858 38985839020110005486932011125548722rel0 38986302011022548702 389867020110365487016 38987602011086548717 38989402011124548721RELATION_TY_Name 389897 38989735020112635487932011386548842rel0txt4 38990202011290548802 38990602011303548813 38991702011340548823 38992902011385548841ChooseRelationHandler 389932 38993257020115415489132011790548982kov0sym4 38993702011573548922 38995702011620548933 389961020116295489312 38996702011666548943 38997302011702548962 389977020117115489611 38998302011752548972IsMutableRelationHandler 389989 38998943020117955490032011974549042h0 38999402011824549012 39003002011965549032RELATION_TY_SetValency 390032 390032369020121135491132013472549412rel0val4kov8filled12cur16handler20ext24 39003702012174549122 39004802012215549132 390052020122295491316 390061020122755491362 39006302012286549142 39007402012322549152 39010102012390549163 39012402012445549174 390133020124915491750 39013502012507549202 39014602012546549212 390155020125785492218 390176020126405492318 390194020126935492418 390211020127545492518 390230020128145492617 390249020128755492721 390272020129395492821 390282020129955492914 390291020130415492960 39029302013053549312 39029902013125549332 39030802013174549343 39032302013218549353 39034402013277549369 39035302013330549373 39036802013374549383 39038602013429549402 39039802013471549411RELATION_TY_GetValency 390401 39040124020134775494332013574549452rel0handler4 39040602013515549442DoubleHashSetRelationHandler 390425 3904252192020137385495232020287551532rel0task4X8Y12sym16kov20kx24ky28at32tmp36v40 39043002013806549532 39044102013842549542 390451020138695495429 39046202013897549552 39046802013931549563 39048002013978549579 39048702014018549593 390497020140445495929 39050702014072549603 390515020140905496021 39051802014105549618 390529020141425496145 39053402014162549624 39055302014212549634 39056102014238549645 390565020142465496413 39059502014309549655 390599020143175496513 39062902014384549674 390635020141515496154 39064402014396549693 39064702014412549709 39065402014439549713 390664020144645497128 39067402014491549723 390682020145075497219 39068502014517549733 39069602014556549743 39070202014577549754 39072102014627549764 39073002014653549775 39073402014667549786 39075702014723549796 39077602014773549806 39080002014834549825 39080402014848549836 39082702014904549846 39084602014954549856 39087002015019549884 39088002015031549903 39088302015047549919 39089102015074549923 39091502015133549933 39091902015147549944 39092902015183549954 390933020151945499515 39094002015228549978 390951020152655499745 39095702015285549984 39097602015335549994 39098502015361550005 39100802015414550015 39103102015467550025 391046020154955500233 39104902015509550035 39105502015525550045 39106502015556550055 391069020155655500514 391078020155855500534 39108402015604550065 39109402015635550075 391100020152745499754 39111002015657550103 39111302015673550119 39112002015701550123 39113302015748550133 39113902015765550144 39114902015822550159 391160020158595501546 39116502015880550165 39117502015912550175 39118602015944550185 39120102015980550195 391216020158685501555 39122502016020550214 39123602016056550224 39124702016094550234 39125002016107550253 39125202016123550269 39125902016161550278 391270020161985502745 39127602016218550284 39128602016249550294 39130402016294550305 39131602016342550316 39133102016379550326 39134302016412550337 391356020164445503339 39136302016474550357 391369020164865503519 39137202016508550376 39137802016546550386 39139402016599550406 39140902016636550416 39142102016669550427 391434020167015504239 39144002016731550447 391446020167435504419 39144902016765550466 39145502016803550476 391471020162075502754 39148102016855550513 39149302016895550524 39149902016946550533 39150102016962550549 39150802016997550553 39152102017046550563 39153002017081550578 391541020171185505745 39154702017138550584 39155702017169550594 39157402017214550605 39158902017250550615 39160102017282550626 391614020173145506238 39162002017342550646 391626020173545506418 39162902017374550665 391652020171275505754 39166202017439550693 39166502017457550709 39167202017492550713 39168502017541550723 39169402017576550738 391705020176135507345 39171102017633550744 39172102017664550754 39173802017709550765 39175302017745550775 39176502017777550786 391778020178095507838 39178402017837550806 391790020178495508018 39179302017869550825 391816020176225507354 39182602017934550853 39182902017952550869 39183602017979550873 39185202018038550883 39186102018068550893 391877020181195509110 391888020181565509147 39189302018178550926 39190302018211550936 39192002018258550947 39192602018271550957 391932020182935509529 39193802018306550967 39194902018340550977 391970020181655509156 39197902018402551005 39198902018558551055 391999020185925510610 392010020186295510647 39201502018651551076 39202502018684551086 39204202018731551097 39205702018769551107 39206902018819551117 39208402018857551127 39209602018911551137 392106020186385510656 39211502018957551165 39212602019005551175 39213702019057551185 39214602019078551195 39214902019094551213 39215102019106551232 39217502019152551242 39218602019183551264 39219102019206551274 39220102019237551294 39220602019260551304 39221002019273551314 39223502019339551324 39225602019393551335 39228102019463551344 39230102019529551354 392313020195565513531 39233202019602551364 392344020196295513631 39236302019675551374 39238702019727551384 39241102019779551394 39242002019813551404 39243102019844551424 39243602019866551434 39246102019932551444 39247302019961551455 39250302020023551464 39251502020052551475 39254502020114551484 39256502020172551494 39258802020224551504 39261102020276551514 39261402020286551531DoubleHashSetLookUp 392617 392617250020202925515532021255551862rel0kx4ky8X12Y16hashv20i24free28mask32perturb36flags40 39262202020400551572 39264602020487551592 39265702020527551602 39266302020546551612 39268202020595551622 392686020206115516218 39269102020623551632 392720020206765516355 39272302020725551652 39272702020737551662 392735020207625516627 39273902020773551672 39274302020791551682 39274702020816551703 39276102020849551713 39276702020869551723 39278602020919551733 39279002020940551744 392795020209555517419 39280002020972551754 39280502020989551773 39283402021045551784 39283702021057551793 392850020210985517944 39285402021197551833 39286402021254551861DoubleHashSetCheckResize 392867 392867478020212605518832022729552222rel0filled4ext8newext12temp16i20at24kov28kx32ky36F40X44Y48 39287202021336551892 39288302021377551902 39289802021420551912 39291302021507551933 39293002021597551948 392933020216025519413 39294302021619551954 392974020216115519422 39298302021717551973 392990020217425519728 39299902021782551988 39300502021817551993 39302302021873552003 39303902021920552013 39306002021988552028 393063020219935520213 39307302022013552034 393088020220055520225 39309702022098552053 39310802022135552063 393118020221625520630 39312902022196552078 393132020222015520713 39313902022218552084 39315602022256552094 393168020222895520937 39317202022302552104 39319302022344552114 39321402022386552124 39323802022434552134 393243020224495521319 393249020224985521368 39325102022511552144 39325502022524552154 39327502022572552164 39329902022624552174 393323020222085520720 39333302022709552203 39334202022728552221DoubleHashSetEntryMatches 393345 393345118020227345522432023110552382rel0at4kx8ky12X16Y20cx24cy28 39335002022786552252 39337302022837552262 39338502022866552273 39340002022919552293 39340502022944552312 39342802022995552322 39344002023024552333 39345502023077552353 39346002023102552372HashListRelationHandler 393463 39346368020232685524532023474552492rel0task4X8Y12sym16kov20kx24ky28 39346802023322552462 39347902023358552472 393489020233855524729 39350002023413552482HashTableRelationHandler 393531 39353167020236335525632023836552602rel0task4X8Y12kov16kx20ky24 39353602023684552572 39354702023720552582 393557020237475525829 39356802023775552592ReversedHashTableRelationHandler 393598 393598295020240045526732024875552962rel0task4X8Y12kov16kx20ky24swap28 39360302024068552682 39361402024104552692 393624020241315526929 39363502024159552702 39364502024198552724 39367802024290552744 39371402024372552764 393724020244025527718 393737020244365527818 393750020244745527922 393763020245165528022 39377602024566552834 39378902024616552854 39380302024658552874 393807020246665528712 393811020246715528717 39381502024682552884 393819020246915528813 393823020246985528820 39383602024724552904 393846020247545529118 393859020247885529218 39386302024814552952SymDoubleHashSetRelationHandler 393893 39389364020250345530332025240553072rel0task4X8Y12 39389802025081553042 39391202025134553053 39393202025182553062SymHashListRelationHandler 393957 39395761020252455530932025433553132rel0task4X8Y12 39396202025287553102 39397602025340553113 39399602025383553122Sym2in1HashTableRelationHandler 394018 39401864020254385531532025652553192rel0task4X8Y12 39402302025485553162 39403702025538553173 39405702025590553182HashCoreRelationHandler 394082 3940823122020258105532632036093556422rel0task4kx8ky12X16Y20mult24sym28rev32at36tmp40fl44 39408702025879553272 39409302025913553283 39410502025960553299 39411202026000553313 394122020260265533129 39413202026054553323 394140020260725533221 39414302026082553333 39415402026121553343 39416002026142553354 39417902026191553364 39418702026216553375 394191020262245533713 39422102026287553385 39423302026323553396 39426302026390553414 39427302026402553433 39427602026418553449 39428302026445553453 394293020264705534528 39430302026497553463 394311020265135534619 39431402026523553473 39432502026562553483 39433102026583553494 39435002026632553504 39435902026657553515 39436302026671553526 39438602026727553536 39440502026777553546 39442902026838553565 39444102026875553576 39446402026931553586 39449102027000553596 39451502027065553624 39452502027077553643 39452802027093553659 39453602027120553663 39456002027252553683 39458102027316553705 39458502027329553715 39459502027366553725 394599020273775537216 39461602027421553745 39462002027441553768 394631020274785537645 39463702027498553774 39465602027547553784 39466502027572553795 39468802027625553805 39471102027678553815 39472002027706553826 394735020277325538232 39473902027747553836 39474502027764553846 394749020277735538415 394762020278105538511 39477202027842553866 394776020278515538615 394785020278715538635 39479102027891553876 394795020279005538715 394808020279375538811 39481802027969553896 394828020280035539111 394832020280115539119 39484702028058553927 39485802028098553937 394873020281255539334 39487602028141553947 39488202028159553957 394886020281685539516 394899020282075539612 39490902028240553977 394913020282495539716 394922020282695539736 39492802028290553987 394932020282995539816 394945020283375539912 39495502028371554007 394961020280425539150 394971020274875537654 39498102028406554053 39498402028422554069 39499102028450554073 39500402028497554083 39501002028514554094 39502002028566554109 395031020286035541046 39503602028624554115 39504602028656554125 39505702028688554135 39507202028724554145 395087020286125541055 39509602028764554164 39510702028800554174 39511802028838554184 39512102028851554203 39512302028867554219 39513002028900554223 39514202028946554234 39515502028982554244 39516002029001554255 39516602029038554265 39517602029070554275 39518702029103554285 39520202029141554295 395210020291625542926 39521302029178554305 39522902029237554339 395240020292745543346 39524602029295554345 39525602029327554355 39526702029360554365 39527602029386554376 39529102029425554386 39529902029454554397 39531102029488554408 395324020295225544042 39533002029554554428 395336020295685544222 39534202029606554457 395355020296445544545 39535802029666554476 39536402029704554486 395380020292835543355 39539002029756554523 39540202029796554534 39540802029847554543 39541002029863554559 39541702029898554563 39543002029947554573 39543902029982554588 395450020300195545845 39545602030039554594 39546602030070554604 39547702030102554614 39548602030127554625 39550102030165554635 39550902030193554646 39552102030226554657 395534020302605546541 39554002030290554677 395546020303045546721 39555202030339554706 395565020303775547044 39556802030397554725 395591020300285545854 39560102030462554753 39560402030480554769 39561002030515554773 39562302030564554783 39563202030594554793 39564502030629554803 39565002030647554814 39566002030678554824 39567102030710554834 39568602030747554844 39569402030772554855 39570702030815554875 39571702030852554893 39572002030870554909 39572702030897554913 39574002030946554923 39574902030976554933 395759020310145549510 395770020310515549547 39577502031073554966 39578502031106554976 39579602031140554986 39580402031165554997 395827020310605549556 39583602031229555015 395846020312645550310 395857020313015550347 39586202031323555046 39587202031356555056 39588302031390555066 39589102031417555077 39590602031457555087 39591402031485555098 39593802031550555118 395959020313105550356 39596802031614555145 39597802031648555165 395993020316975551654 39599702031827555195 396008020318775552010 396019020319145552047 39602502031936555216 39603502031969555226 39604602032003555236 39605502032030555247 39608402032111555257 39609902032151555267 39610702032181555278 39612302032244555288 396136020323005553013 396146020323345553047 39615102032362555319 39617602032461555339 396186020323445553057 396195020319235552056 39620502032524555385 39621602032572555395 39622702032624555405 39623602032645555415 39623902032661555433 39624102032673555452 39625402032707555462 39626502032738555484 39626902032761555494 39628802032810555504 39631102032864555514 39631902032891555525 39633102032923555536 39634702032982555556 39635302033013555575 39635502033037555595 39637902033101555624 39638502033168555645 39638902033182555655 39641402033249555665 39643502033304555676 39646002033375555685 39648002033442555695 396492020334695556932 39651102033516555705 396523020335435557032 39654202033590555715 39656602033643555725 39659002033696555735 39659902033726555745 39660302033797555774 39662202033855555784 39664502033925555794 39665402034016555815 39666602034048555826 39668202034107555846 39668802034238555885 39669202034255555896 39670202034304555906 39671302034349555916 39672302034383555926 39673502034442555936 39674702034495555946 39677102034550555956 39679402034620555976 39680602034653555987 39681502034678555997 39683402034731556016 39686102034863556055 39688202034911556074 39689302034942556094 39689802035020556114 39691702035078556124 39694002035148556134 39694902035230556155 39696102035262556166 39697702035321556186 39698302035375556215 39699502035405556226 39702502035495556245 39705002035562556255 39706202035592556266 39709202035655556275 39711202035714556285 39713502035767556295 39716102035872556325 39717302035966556345 39718502036009556356 39719402036033556366 39719802036074556394 39720102036085556412HashCoreLookUp 397204 397204224020360985564432037223556872rel0kx4X8hashv12i16free20mask24perturb28flags32 39720902036249556472 39722002036314556492 39723102036354556502 39723702036410556522 39725602036459556532 39726002036504556553 39726502036519556572 39728802036585556593 39729102036637556622 39729502036649556632 397303020366745566327 39730702036685556642 39731102036703556652 39731502036728556673 39732902036761556683 39733502036797556703 39735402036847556713 39735802036893556734 397363020369085567319 39736802036925556744 39737302036942556763 39739602037009556784 39739902037025556803 397412020370665568044 39741602037165556843 39742502037222556871HashCoreCheckResize 397428 397428456020372285568932038650557232rel0filled4ext8newext12temp16i20at24kov28kx32F36X40Y44 39743302037296556902 39744402037337556912 39745902037380556922 39747402037467556943 39749102037557556958 397494020375625569513 39750402037579556964 397535020375715569522 39754402037677556983 397551020377025569828 39756002037742556998 39756602037777557003 39758402037833557013 39760002037880557023 39762102037948557038 397624020379535570313 39763402037973557044 397649020379655570325 39765802038058557063 39766902038095557073 39767902038129557088 397682020381345570813 39768902038151557094 39770602038189557104 397718020382225571037 39772202038235557114 39774302038277557124 39776402038319557134 39777702038355557144 397782020383705571419 397788020384195571468 39779002038432557154 39779402038445557164 39781402038493557174 39783802038545557184 397862020381415570820 39787202038630557213 39788102038649557231HashCoreEntryMatches 397884 39788463020386555572532038863557332rel0at4kx8X12cx16cy20 39788902038697557262 39791202038748557272 39792402038777557283 39793902038830557303 39794402038855557322EquivHashTableRelationHandler 397947 3979472332020390345574032046628559492rel0task4X8Y12kx16at20at224tmp28fl32i36ext40 39795202039103557412 39797102039155557422 39797702039189557433 39798902039236557449 39799502039276557463 39800702039306557474 39801802039346557484 39802302039368557495 39804202039418557505 39805002039444557516 39808002039513557535 39808902039530557563 39809202039546557579 39809902039573557583 39811102039603557594 39812202039643557604 39812702039665557615 39814602039715557625 39815402039741557636 39817702039797557646 39819602039847557656 39821802039903557675 39822702039920557703 39823002039936557719 39823802039963557723 39826202040022557733 39827302040118557758 398283020401505577540 398295020401415577531 39830102040166557764 39831802040207557775 39835202040315557798 398365020403535577946 398380020403445577937 39838702040377557804 39840502040420557815 39842002040455557825 398425020404675578217 39842802040500557835 39844602040653557865 39846102040689557875 398464020407055578810 398483020407485578853 398495020407385578843 39850202040769557896 39851902040814557907 398538020408505579043 39854102040866557917 39855902040904557927 39856302040960557948 39856902040981557958 39857902041017557968 39858302041038557987 39858902041056557997 39861602041123558025 398620020411305580212 39863002041154558053 39863302041170558069 39863902041242558083 39864102041258558099 39864702041372558113 39865902041426558123 39866202041444558139 39867502041500558143 39868802041549558153 39869702041579558163 39870802041620558173 39872102041655558183 39872602041672558194 39874002041715558214 39876302041772558229 398774020418095582246 39877902041830558235 39878902041862558245 39880002041895558255 39880802041921558266 398827020419585582643 39883002041973558276 398853020418185582255 39886202042044558313 39886502042062558329 39887102042089558333 39887702042159558343 39888002042173558362 39889302042207558372 39890602042242558382 39891702042273558404 39892202042345558425 39893402042377558436 39895002042434558456 39895602042463558475 39895802042479558494 39896202042503558504 39896802042528558514 39899102042582558524 39901802042649558534 39902802042732558564 39904002042763558575 39905602042818558595 39906202042845558614 39906802042863558625 39907402042957558646 39907702042997558656 399088020430455586611 399091020430505586616 39909702043071558677 39911602043122558687 39912402043150558698 39914702043206558708 399153020432205587022 399157020430585586624 39916602043250558736 39917202043283558746 39919702043370558766 39920102043385558776 399213020434125587733 39923202043460558786 39925102043511558796 39925502043530558807 39928002043602558816 39930002043670558826 39932402043724558836 39934802043853558856 39936302043895558866 399375020439225588633 39939402043970558876 39941302044022558886 39941702044041558897 39944202044113558906 39946202044182558916 39948602044237558926 39951002044294558936 39951402044368558965 39951802044382558975 399530020444095589732 39954902044456558985 39957402044523558995 39959302044573559005 39959702044591559016 39962202044662559025 39964202044729559035 39966602044782559045 39968902044838559055 39971302044893559065 39971702044919559084 39972302044984559105 39972702045000559115 399739020450275591132 39975802045074559125 39978302045141559135 39980202045192559145 39980602045210559156 39983102045281559165 39985102045349559175 39987502045403559185 39989802045458559195 39992202045514559205 39992602045603559234 39994902045672559244 39997202045740559254 399978020457565592520 399982020457655592529 399986020457755592539 39999002045788559264 40000102045834559279 400004020458405592715 40001002045861559285 40002402045895559295 40003902045933559306 400051020458495592724 40006002045985559334 40006902046014559344 40008002046116559374 40009002046149559384 40011302046203559394 40014002046298559414 40016502046364559424 40017702046393559435 40020702046455559444 40022702046513559454 40025002046565559464 40027302046617559474 40027602046627559491TwoInOneHashTableRelationHandler 400279 4002792673020467985595632055436562132rel0task4X8Y12sym16kov20kx24ky28at32at236tmp40fl44 40028402046875559572 40029502046911559582 400305020469385595829 40031602046966559592 40032202047000559603 40033402047047559619 40034102047087559633 400351020471135596329 40036102047141559643 400369020471595596421 40037202047169559653 40038302047208559663 40038802047229559674 40040702047278559684 40041502047301559695 40044002047370559706 40047002047438559724 40047902047450559743 40048202047466559759 40048902047493559763 400499020475185597628 40050902047545559773 400517020475615597719 40052002047571559783 40053102047610559793 40053702047631559804 40055602047680559814 40056502047705559825 40059202047798559846 40061502047854559856 40062302047882559867 40064502047943559887 40066402047993559896 40068802048102559916 40069602048129559927 40073602048238559957 40074102048259559968 40076502048323559986 40077302048350559997 40081402048459560027 40081902048480560038 40084302048553560074 40085302048565560093 40085602048581560109 40086402048608560113 40088802048667560123 40089202048681560134 40090202048717560144 400906020487285601415 40091302048762560168 400924020487995601645 40093002048819560174 40094902048868560184 40096002048957560205 40098302049010560215 40100602049063560225 401021020490895602231 40102402049103560235 40103002049119560245 40104002049150560255 401044020491595602514 401053020491795602534 40105902049198560265 40106902049229560275 401075020488085601654 40108502049251560303 40108802049267560319 40109502049295560323 40110802049342560333 40111502049359560344 40112502049420560359 401136020494575603546 40114102049478560365 40115102049510560375 40116202049542560385 40117702049578560395 40119202049614560405 401207020494665603555 40121602049654560424 40122702049690560434 40123802049728560444 40124102049741560463 40124302049757560479 40125002049790560483 40126602049840560505 40128802049890560515 40129302049910560526 40130302049943560536 40132002049990560547 40132602050029560557 40135702050114560595 40137802050164560605 40138302050184560616 40139302050217560626 40141002050264560637 40141602050303560647 40143202050357560683 40144402050397560694 40145002050448560703 40145202050464560719 40145802050499560723 40148002050547560733 40148502050565560744 40149502050596560754 40151202050639560765 40153502050699560783 40153802050717560799 40154402050752560803 40156502050800560813 40157002050818560824 40158002050849560834 40159702050892560845 40162002050952560863 40162302050970560879 40163002050997560883 40164002051030560905 40164402051070560915 40165302051110560935 401658020511755609510 401669020512125609547 40167402051234560966 40168402051267560976 40170302051314560987 401735020512215609556 40175502051414561015 40176502051458561025 40177802051626561055 401788020516605610610 401799020516975610647 40180402051719561076 40181402051752561086 40182502051786561096 40183502051879561117 40186002051954561127 40188502052033561137 401895020517065610656 40190402052079561165 40191502052127561175 40192602052179561185 40193502052200561195 40193802052216561213 40194102052230561232 40196202052277561242 40197302052308561264 40197702052331561274 40199602052380561284 40200302052414561294 40202602052468561304 40203802052499561315 40205402052556561335 40206002052585561354 40207002052616561374 40207602052667561395 40208002052681561405 40210502052748561415 40212402052798561425 40212802052816561436 40215302052887561445 40215702052927561455 40218702052996561466 40219402053023561475 40221402053073561485 402226020531005614832 40224502053147561495 40226902053200561505 40229602053265561525 40231502053315561535 40232302053402561556 40234602053458561566 40235802053491561577 40237402053552561597 40238002053636561626 40240202053690561636 402407020537045616320 40243402053769561656 40245802053869561685 40248102053974561714 40250302054024561724 40251502054055561735 40252002054074561746 40254602054138561766 40256502054187561784 40258902054239561794 40259402054323561815 40262402054389561835 40262802054435561864 40265302054501561874 40267202054551561884 40267602054568561895 40270102054638561904 40270802054684561914 40273802054752561925 40274402054778561934 40276402054828561944 40278802054881561954 40281202054934561964 40282102054963561974 40283102055095562014 40283602055117562024 40285502055166562034 40286302055202562044 40288602055256562054 40289802055287562065 40291402055344562085 40292002055373562104 40294602055425562114 40294902055435562131TwoInOneDelete 402952 402952529020554415621532057114562612rel0at4kx8ky12ekflag16both20fl24at228E32i36 40295702055618562172 40297602055665562182 40298302055696562193 40299202055720562204 40300602055753562214 403010020557635622114 40302102055792562224 40303202055863562244 40303602055879562255 40305802055930562265 403063020559445622619 40308702055995562275 403093020560105622720 40311202056064562294 40312202056101562323 40313102056125562334 40314502056158562344 403149020561685623414 40316002056197562354 40317102056268562374 40317502056284562385 40319602056335562395 40320102056356562406 40322402056408562416 403230020564235624121 40324902056483562444 40325502056512562472 40326402056593562493 40331102056714562514 40334102056779562533 40336102056836562543 40338402056887562553 40340702056938562563 40343002056989562573 40345802057064562593 40347802057113562611TwoInOneLookUp 403481 403481241020571195626332058310563062rel0ke4E8ekflag12hashv16i20free24mask28perturb32flags36 40348602057296562662 40349702057361562682 40350802057401562692 40351402057457562712 40353302057506562722 40353702057551562743 40354202057566562762 40357302057652562783 40357602057704562812 40358002057716562822 403588020577415628227 40359202057752562832 40359602057770562842 40360002057795562863 40361402057828562873 40362002057864562893 40363902057914562903 40364302057960562924 403648020579755629219 40365302057992562934 40365802058009562953 40368902058096562974 40369202058112562993 403705020581535629944 40370902058252563033 40371902058309563061TwoInOneCheckResize 403722 403722553020583155630832059951563452rel0filled4ext8newext12temp16i20at24kov28kx32ky36F40E44X48Y52 40372702058388563092 40373802058429563102 40375302058472563112 40376802058559563133 40378502058649563148 403788020586545631413 40379802058671563154 403829020586635631422 40383802058769563173 403845020587945631728 40385402058834563188 40386002058869563193 40387802058925563203 40389402058972563213 40391502059040563228 403918020590455632213 40392802059065563234 403943020590575632225 40395202059150563253 40396302059187563263 403973020592145632630 40398402059248563278 403987020592535632713 40399402059270563284 40401102059308563294 404023020593415632937 40402702059354563304 40404802059396563314 40406902059438563324 40409002059480563334 404098020595015633325 40412202059555563349 40414402059604563354 404149020596195633519 404155020596685633568 40415702059681563364 40416102059694563374 40418102059742563384 40420502059794563394 40422902059846563404 404253020592605632720 40426302059931563433 40427202059950563451TwoInOneEntryMatches 404275 40427563020599565634732060161563552rel0at4ke8E12ce16 40428002059995563482 40430302060046563492 40431502060075563503 40433002060128563523 40433502060153563542RELATION_TY_Empty 404338 40433827020602985636232060411563652rel0set4handler8 40434302060335563632 40435402060372563642ResourceIDsOfFigures 579832124false0206041556368120604525636838ResourceIDsOfSounds 57984484false0206045556370120604895637035BC_0 57985284false0206049456374120605365637443BC_1 57986084false0206053856375120605805637543BC_2 57986884false0206058256376120606245637643BC_3 57987684false0206062656377120606785637753BC_4 57988484false0206068056378120607325637853BC_5 57989284false0206073456379120607865637953BC_6 57990084false0206078856380120608405638053BC_7 57990884false0206084256381120608945638153BC_8 57991684false0206089656382120609485638253BC_9 57992484false0206095056383120610025638353BC_10 57993284false0206100456384120610575638454BC_11 57994084false0206105956385120611125638554BC_12 57994884false0206111456386120611675638654BC_13 57995684false0206116956387120612225638754BC_14 57996484false0206122456388120612775638854BC_15 57997284false0206127956389120613325638954BC_16 57998084false0206133456390120613875639054BC_17 57998884false0206138956391120614425639154BC_18 57999684false0206144456392120614975639254BC_19 58000484false0206149956393120615425639344BC_20 58001284false0206154456394120615975639454BC_21 58002084false0206159956395120616525639554BC_22 58002884false0206165456396120617075639654BC_23 58003684false0206170956397120617625639754BC_24 58004484false0206176456398120618175639854BC_25 58005284false0206181956399120618625639944BC_26 58006084false0206186456400120619175640054BC_27 58006884false0206191956401120619725640154BC_28 58007684false0206197456402120620275640254BC_29 58008484false0206202956403120620825640354BC_30 58009284false0206208456404120621375640454BC_31 58010084false0206213956405120621825640544BC_32 58010884false0206218456406120622375640654BC_33 58011684false0206223956407120622925640754BC_34 58012484false0206229456408120623475640854BC_35 58013284false0206234956409120624025640954BC_36 58014084false0206240456410120624575641054BC_37 58014884false0206245956411120625025641144BC_38 58015684false0206250456412120625575641254BC_39 58016484false0206255956413120626125641354BC_40 58017284false0206261456414120626675641454BC_41 58018084false0206266956415120627225641554BC_42 58018884false0206272456416120627775641654BC_43 58019684false0206277956417120628225641744BC_44 58020484false0206282456418120628775641854BC_45 58021284false0206287956419120629325641954BC_46 58022084false0206293456420120629875642054BC_47 58022884false0206298956421120630425642154BC_48 58023684false0206304456422120630975642254BC_49 58024484false0206309956423120631435642345BC_50 58025284false0206314556424120631985642454BC_51 58026084false0206320056425120632535642554BC_52 58026884false0206325556426120633085642654BC_53 58027684false0206331056427120633635642754BC_54 58028484false0206336556428120634185642854BC_55 58029284false0206342056429120634645642945BC_56 58030084false0206346656430120635195643054BC_57 58030884false0206352156431120635745643154BC_58 58031684false0206357656432120636295643254BC_59 58032484false0206363156433120636845643354BC_60 58033284false0206368656434120637395643454BC_61 58034084false0206374156435120637855643545BC_62 58034884false0206378756436120638405643654BC_63 58035684false0206384256437120638955643754BC_64 58036484false0206389756438120639505643854BC_65 58037284false0206395256439120640055643954BC_66 58038084false0206400756440120640605644054BC_67 58038884false0206406256441120641065644145BC_68 58039684false0206410856442120641615644254BC_69 58040484false0206416356443120642165644354BC_70 58041284false0206421856444120642715644454BC_71 58042084false0206427356445120643265644554BC_72 58042884false0206432856446120643815644654BC_73 58043684false0206438356447120644275644745BC_74 58044484false0206442956448120644825644854BC_75 58045284false0206448456449120645375644954BC_76 58046084false0206453956450120645925645054BC_77 58046884false0206459456451120646475645154BC_78 58047684false0206464956452120647025645254BC_79 58048484false0206470456453120647485645345BC_80 58049284false0206475056454120648035645454BC_81 58050084false0206480556455120648585645554BC_82 58050884false0206486056456120649135645654BC_83 58051684false0206491556457120649685645754BC_84 58052484false0206497056458120650235645854BC_85 58053284false0206502556459120650695645945BC_86 58054084false0206507156460120651245646054BC_87 58054884false0206512656461120651795646154BC_88 58055684false0206518156462120652345646254BC_89 58056484false0206523656463120652805646345BC_90 58057284false0206528256464120653355646454BC_91 58058084false0206533756465120653905646554BC_92 58058884false0206539256466120654455646654BC_93 58059684false0206544756467120654915646745BC_94 58060484false0206549356468120655375646845BC_95 58061284false0206553956469120655925646954BC_96 58062084false0206559456470120656385647045BC_97 58062884false0206564056471120656845647145BC_98 58063684false0206568656472120657305647245BC_99 58064484false0206573256473120657855647354BC_100 58065284false0206578756474120658325647446BC_101 58066084false0206583456475120658795647546BC_102 58066884false0206588156476120659265647646BC_103 58067684false0206592856477120659825647755BC_104 58068484false0206598456478120660295647846BC_105 58069284false0206603156479120660765647946BC_106 58070084false0206607856480120661235648046BC_107 58070884false0206612556481120661795648155BC_108 58071684false0206618156482120662265648246BC_109 58072484false0206622856483120662735648346BC_110 58073284false0206627556484120663205648446BC_111 58074084false0206632256485120663765648555BC_112 58074884false0206637856486120664235648646BC_113 58075684false0206642556487120664705648746BC_114 58076484false0206647256488120665175648846BC_115 58077284false0206651956489120665735648955BC_116 58078084false0206657556490120666205649046BC_117 58078884false0206662256491120666675649146BC_118 58079684false0206666956492120667145649246BC_119 58080484false0206671656493120667705649355BC_120 58081284false0206677256494120668175649446BC_121 58082084false0206681956495120668645649546BC_122 58082884false0206686656496120669115649646BC_123 58083684false0206691356497120669675649755BC_124 58084484false0206696956498120670145649846BC_125 58085284false0206701656499120670615649946BC_126 58086084false0206706356500120671085650046BC_127 58086884false0206711056501120671645650155BC_128 58087684false0206716656502120672115650246BC_129 58088484false0206721356503120672585650346BC_130 58089284false0206726056504120673055650446BC_131 58090084false0206730756505120673615650555BC_132 58090884false0206736356506120674085650646BC_133 58091684false0206741056507120674555650746BC_134 58092484false0206745756508120675025650846BC_135 58093284false0206750456509120675585650955BC_136 58094084false0206756056510120676055651046BC_137 58094884false0206760756511120676525651146BC_138 58095684false0206765456512120676995651246BC_139 58096484false0206770156513120677555651355BC_140 58097284false0206775756514120678025651446BC_141 58098084false0206780456515120678495651546BC_142 58098884false0206785156516120678965651646BC_143 58099684false0206789856517120679525651755BC_144 58100484false0206795456518120680085651855BC_145 58101284false0206801056519120680645651955BC_146 58102084false0206806656520120681115652046BC_147 58102884false0206811356521120681675652155BC_148 58103684false0206816956522120682235652255BC_149 58104484false0206822556523120682795652355BC_150 58105284false0206828156524120683355652455BC_151 58106084false0206833756525120683915652555BC_152 58106884false0206839356526120684385652646BC_153 58107684false0206844056527120684945652755BC_154 58108484false0206849656528120685505652855BC_155 58109284false0206855256529120686065652955BC_156 58110084false0206860856530120686625653055BC_157 58110884false0206866456531120687185653155BC_158 58111684false0206872056532120687655653246BC_159 58112484false0206876756533120688215653355BC_160 58113284false0206882356534120688775653455BC_161 58114084false0206887956535120689335653555BC_162 58114884false0206893556536120689895653655BC_163 58115684false0206899156537120690455653755BC_164 58116484false0206904756538120690925653846BC_165 58117284false0206909456539120691485653955BC_166 58118084false0206915056540120692045654055BC_167 58118884false0206920656541120692605654155BC_168 58119684false0206926256542120693165654255BC_169 58120484false0206931856543120693725654355BC_170 58121284false0206937456544120694195654446BC_171 58122084false0206942156545120694755654555BC_172 58122884false0206947756546120695315654655BC_173 58123684false0206953356547120695875654755BC_174 58124484false0206958956548120696435654855BC_175 58125284false0206964556549120696995654955BC_176 58126084false0206970156550120697465655046BC_177 58126884false0206974856551120698025655155BC_178 58127684false0206980456552120698585655255BC_179 58128484false0206986056553120699145655355BC_180 58129284false0206991656554120699705655455BC_181 58130084false0206997256555120700265655555BC_182 58130884false0207002856556120700735655646BC_183 58131684false0207007556557120701295655755BC_184 58132484false0207013156558120701855655855BC_185 58133284false0207018756559120702415655955BC_186 58134084false0207024356560120702875656045BC_187 58134884false0207028956561120703435656155BC_188 58135684false0207034556562120703905656246BC_189 58136484false0207039256563120704465656355BC_190 58137284false0207044856564120705025656455BC_191 58138084false0207050456565120705585656555BC_192 58138884false0207056056566120706045656645BC_193 58139684false0207060656567120706605656755BC_194 58140484false0207066256568120707075656846BC_195 58141284false0207070956569120707545656946BC_196 58142084false0207075656570120708015657046BC_197 58142884false0207080356571120708575657155BC_198 58143684false0207085956572120709135657255BC_199 58144484false0207091556573120709595657345BC_200 58145284false0207096156574120710155657455BC_201 58146084false0207101756575120710625657546BC_202 58146884false0207106456576120711095657646BC_203 58147684false0207111156577120711655657755BC_204 58148484false0207116756578120712215657855BC_205 58149284false0207122356579120712675657945BC_206 58150084false0207126956580120713235658055BC_207 58150884false0207132556581120713705658146BC_208 58151684false0207137256582120714265658255BC_209 58152484false0207142856583120714825658355BC_210 58153284false0207148456584120715385658455BC_211 58154084false0207154056585120715845658545BC_212 58154884false0207158656586120716405658655BC_213 58155684false0207164256587120716875658746BC_214 58156484false0207168956588120717435658855BC_215 58157284false0207174556589120717995658955BC_216 58158084false0207180156590120718555659055BC_217 58158884false0207185756591120719115659155BC_218 58159684false0207191356592120719675659255BC_219 58160484false0207196956593120720145659346BC_220 58161284false0207201656594120720705659455BC_221 58162084false0207207256595120721265659555BC_222 58162884false0207212856596120721825659655BC_223 58163684false0207218456597120722385659755BC_224 58164484false0207224056598120722945659855BC_225 58165284false0207229656599120723415659946BC_226 58166084false0207234356600120723975660055BC_227 58166884false0207239956601120724535660155BC_228 58167684false0207245556602120725095660255BC_229 58168484false0207251156603120725655660355BC_230 58169284false0207256756604120726215660455BC_231 58170084false0207262356605120726685660546BC_232 58170884false0207267056606120727245660655BC_233 58171684false0207272656607120727805660755BC_234 58172484false0207278256608120728365660855BC_235 58173284false0207283856609120728925660955BC_236 58174084false0207289456610120729485661055BC_237 58174884false0207295056611120729955661146BC_238 58175684false0207299756612120730415661245BC_239 58176484false0207304356613120730875661345BC_240 58177284false0207308956614120731345661446BC_241 58178084false0207313656615120731905661555BC_242 58178884false0207319256616120732375661646BC_243 58179684false0207323956617120732845661746BC_244 58180484false0207328656618120733315661846BC_245 58181284false0207333356619120733785661946BC_246 58182084false0207338056620120734255662046Print__PName 404365 404365167prop0ptab4cla8maxcom12minind16maxind20str24WV__Pr 404532 40453244obj0id4val8addr12RV__Pr 404576 40457665obj0id4addr8CA__Pr 404641 404641677_vararg_count0obj4id8zr12s16s220z24addr28len32m36val40RA__Pr 405318 405318132obj0id4cla8prop12ix16RL__Pr 405450 405450138obj0id4cla8prop12ix16OP__Pr 405588 40558899obj0id4zr8OC__Cl 405687 405687275obj0cla4zr8jx12inlist16inlistlen20Copy__Primitive 405962 405962168o10o24p18p212pcount16i20j24propid28proplen32val36pa140pa244RT__Err 406130 4061301365crime0obj4id8size12p16q20Z__Region 407495 40749571addr0tb4endmem8Meta__class 407566 407566110obj0CP__Tab 407676 40767669obj0id4otab8max12res16Cl__Ms 407745 407745485_vararg_count0obj4id8a12b16x20y24RT__ChT 408230 408230262obj10obj24ix8RT__ChR 408492 408492126obj10RT__ChG 408618 408618233obj10a4RT__ChGt 408851 408851232obj10a4RT__ChPS 409083 409083126obj0prop4val8res12RT__TrPS 409209 40920953obj0prop4val8RT__ChSTB 409262 40926274base0offset4val8a12b16RT__ChSTW 409336 40933678base0offset4val8a12b16RT__ChPrintC 409414 40941472c0RT__ChPrintA 409486 40948683addr0endmem4RT__ChPrintS 409569 40956936str0RT__ChPrintO 409605 40960540obj0OB__Move 409645 40964596obj0dest4par8chi12sib16OB__Remove 409741 40974183obj0par4chi8sib12Print__Addr 409824 40982476addr0ix4ch8Glk__Wrap 409900 40990027_vararg_count0callid4retval8Symb__Tab 409927 40992710dummy10dummy24##Glklist0##Go1##Take2##Answer3##Remove4##Ask5##AskFor6##Tell7##Wait8##MistakeAction9##Inv10##Drop11##PutOn12##Insert13##Eat14##Enter15##Exit16##GetOff17##Look18##Examine19##LookUnder20##Search21##Consult22##Lock23##Unlock24##SwitchOn25##SwitchOff26##Open27##Close28##Wear29##Disrobe30##Give31##Show32##WakeOther33##ThrowAt34##Attack35##Kiss36##Touch37##Wave38##Pull39##Push40##Turn41##PushDir42##Squeeze43##Yes44##No45##Burn46##Wake47##Think48##Smell49##Listen50##Taste51##Cut52##Jump53##Tie54##Drink55##Sorry56##Swing57##Rub58##SetTo59##WaveHands60##Buy61##Climb62##Sleep63##Quit64##Save65##Restore66##Restart67##Verify68##ScriptOn69##ScriptOff70##Version71##Score72##LMode373##LMode274##LMode175##NotifyOn76##NotifyOff77##Pronouns78##XAbstract79##ActionsOn80##ActionsOff81##Gonear82##XPurloin83##Predictable84##ShowRelations85##ShowResponses86##RulesOn87##RulesAll88##RulesOff89##ScenesOn90##ScenesOff91##Scope92##ShowHeap93##ShowMe94##Showverb95##TestScript96##TraceOn97##TraceLevel98##TraceOff99##XTree100header036memory layout id3660code area60409937string decoding table409937410929strings area410929496873zero padding496873496896global variables496896497816array space497816581828abbreviations table581828581832object tree581832583624common properties583624594041property defaults594041594201class numbers594201594289identifier names594289599993grammar table599993602448actions table602448602856dictionary602856608512R2x1bAADAQIAB5UAAAlJAAAJSQAAAQAAAAAAPAAGQVG8LYTFSW5mbwABAAA2LjMzMC4zOAABMTkxMDA1wQAAMA==#classes_table594201#identifiers_table594289#array_names_offset595205#cpv__start594041#cpv__end594201#dictionary_table602856#dynam_string_table581828#grammar_table599993#actions_table602448#globals_array496896#highest_class_number20#highest_object_number55
diff --git a/Lynne Simulator.inform/Build/output.ulx b/Lynne Simulator.inform/Build/output.ulx
deleted file mode 100644
index 1e06c4a..0000000
Binary files a/Lynne Simulator.inform/Build/output.ulx and /dev/null differ
diff --git a/Lynne Simulator.inform/Index/Actions.html b/Lynne Simulator.inform/Index/Actions.html
index b31b489..8d882fc 100644
--- a/Lynne Simulator.inform/Index/Actions.html
+++ b/Lynne Simulator.inform/Index/Actions.html
@@ -276,7 +276,7 @@
}
}
function showAllResp() {
- for (var i=0;i<352;i++) {
+ for (var i=0;i<388;i++) {
showResp('extra'+(1000000+i), 'plus'+(1000000+i));
}
}
@@ -701,7 +701,7 @@
With similar actions grouped together About actions ; New actions ; Out of world actions (in red)
- Standard actions concerning the actor's possessions Taking inventory , Taking , Removing it from , Dropping , Putting it on , Inserting it into , Eating
Standard actions which move the actor Going , Entering , Exiting , Getting off
Standard actions concerning the actor's vision Looking , Examining , Looking under , Searching , Consulting it about
Standard actions which change the state of things Locking it with , Unlocking it with , Switching on , Switching off , Opening , Closing , Wearing , Taking off
Standard actions concerning other people Giving it to , Showing it to , Waking , Throwing it at , Attacking , Kissing , Answering it that , Telling it about , Asking it about , Asking it for
Standard actions which are checked but then do nothing unless rules intervene Waiting , Touching , Waving , Pulling , Pushing , Turning , Pushing it to , Squeezing
Standard actions which always do nothing unless rules intervene Saying yes , Saying no , Burning , Waking up , Thinking , Smelling , Listening to , Tasting , Cutting , Jumping , Tying it to , Drinking , Saying sorry , Swinging , Rubbing , Setting it to , Waving hands , Buying , Climbing , Sleeping
Standard actions which happen out of world Quitting the game , Saving the game , Restoring the game , Restarting the game , Verifying the story file , Switching the story transcript on , Switching the story transcript off , Requesting the story file version , Requesting the score , Preferring abbreviated room descriptions , Preferring unabbreviated room descriptions , Preferring sometimes abbreviated room descriptions , Switching score notification on , Switching score notification off , Requesting the pronoun meanings
+ Standard actions concerning the actor's possessions Taking inventory , Taking , Removing it from , Dropping , Putting it on , Inserting it into , Eating
Standard actions which move the actor Going , Entering , Exiting , Getting off
Standard actions concerning the actor's vision Looking , Examining , Looking under , Searching , Consulting it about
Standard actions which change the state of things Locking it with , Unlocking it with , Switching on , Switching off , Opening , Closing , Wearing , Taking off
Standard actions concerning other people Giving it to , Showing it to , Waking , Throwing it at , Attacking , Kissing , Answering it that , Telling it about , Asking it about , Asking it for
Standard actions which are checked but then do nothing unless rules intervene Waiting , Touching , Waving , Pulling , Pushing , Turning , Pushing it to , Squeezing
Standard actions which always do nothing unless rules intervene Saying yes , Saying no , Burning , Waking up , Thinking , Smelling , Listening to , Tasting , Cutting , Jumping , Tying it to , Drinking , Saying sorry , Swinging , Rubbing , Setting it to , Waving hands , Buying , Climbing , Sleeping
Standard actions which happen out of world Quitting the game , Saving the game , Restoring the game , Restarting the game , Verifying the story file , Switching the story transcript on , Switching the story transcript off , Requesting the story file version , Requesting the score , Preferring abbreviated room descriptions , Preferring unabbreviated room descriptions , Preferring sometimes abbreviated room descriptions , Switching score notification on , Switching score notification off , Requesting the pronoun meanings
Actions defined by the extension Basic Help Menu by Emily Short Asking for help
Actions defined by the extension Exit Lister by Gavin Lambert Listing exits , Turning exits on , Turning exits off
New actions defined in the source Locomoting
@@ -715,7 +715,7 @@
Listed in alphabetical order About actions
- 
; New actions 
, Taking 
