Aisle Strings
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Resident data ends at 36c4, program starts at 36c4, file ends at 1dd10 | |
Starting analysis pass at address 36c2 | |
End of analysis pass, low address = 36c4, high address = dffc | |
[Start of code] | |
Main routine R0001, 0 locals | |
CALL_VS R0002 -> Gef | |
QUIT | |
Routine R0002, 0 locals | |
CALL_VN R0421 (#0016,#0049) | |
RTRUE | |
Routine R0003, 0 locals | |
RTRUE | |
Routine R0004, 1 local | |
LOADB L00,#00 -> -(SP) | |
PULL Gef | |
JE Gef,#61,#65,#69 [TRUE] L0001 | |
JE Gef,#6f,#75,#41 [TRUE] L0001 | |
JE Gef,#45,#49,#4f [TRUE] L0001 | |
JE Gef,#55 [FALSE] L0002 | |
L0001: RTRUE | |
L0002: RFALSE | |
Routine R0005, 1 local | |
STORE Gef,L00 | |
JE Gef,#07 [FALSE] L0001 | |
PRINT "north" | |
JUMP L0013 | |
L0001: JE Gef,#08 [FALSE] L0002 | |
PRINT "south" | |
JUMP L0013 | |
L0002: JE Gef,#09 [FALSE] L0003 | |
PRINT "east" | |
JUMP L0013 | |
L0003: JE Gef,#0a [FALSE] L0004 | |
PRINT "west" | |
JUMP L0013 | |
L0004: JE Gef,#0b [FALSE] L0005 | |
PRINT "northeast" | |
JUMP L0013 | |
L0005: JE Gef,#0d [FALSE] L0006 | |
PRINT "northwest" | |
JUMP L0013 | |
L0006: JE Gef,#0c [FALSE] L0007 | |
PRINT "southeast" | |
JUMP L0013 | |
L0007: JE Gef,#0e [FALSE] L0008 | |
PRINT "southwest" | |
JUMP L0013 | |
L0008: JE Gef,#0f [FALSE] L0009 | |
PRINT "up" | |
JUMP L0013 | |
L0009: JE Gef,#10 [FALSE] L0010 | |
PRINT "down" | |
JUMP L0013 | |
L0010: JE Gef,#11 [FALSE] L0011 | |
PRINT "in" | |
JUMP L0013 | |
L0011: JE Gef,#12 [FALSE] L0012 | |
PRINT "out" | |
JUMP L0013 | |
L0012: CALL_VS R0116 (#09,L00) -> -(SP) | |
RET_POPPED | |
L0013: RTRUE | |
Routine R0006, 2 locals | |
JZ L00 [FALSE] L0001 | |
PRINT "zero" | |
RFALSE | |
L0001: JL L00,#00 [FALSE] L0002 | |
PRINT "minus " | |
SUB #00,L00 -> L00 | |
L0002: JL L00,#03e8 [TRUE] L0003 | |
DIV L00,#03e8 -> -(SP) | |
CALL_2N R0006 ((SP)+) | |
PRINT " thousand" | |
MOD L00,#03e8 -> L00 | |
STORE L01,#01 | |
L0003: JL L00,#64 [TRUE] L0005 | |
JE L01,#01 [FALSE] L0004 | |
PRINT ", " | |
L0004: DIV L00,#64 -> -(SP) | |
CALL_2N R0006 ((SP)+) | |
PRINT " hundred" | |
MOD L00,#64 -> L00 | |
STORE L01,#01 | |
L0005: JZ L00 [TRUE] RFALSE | |
JE L01,#01 [FALSE] L0006 | |
PRINT " and " | |
L0006: STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0007 | |
PRINT "one" | |
JUMP L0034 | |
L0007: JE Gef,#02 [FALSE] L0008 | |
PRINT "two" | |
JUMP L0034 | |
L0008: JE Gef,#03 [FALSE] L0009 | |
PRINT "three" | |
JUMP L0034 | |
L0009: JE Gef,#04 [FALSE] L0010 | |
PRINT "four" | |
JUMP L0034 | |
L0010: JE Gef,#05 [FALSE] L0011 | |
PRINT "five" | |
JUMP L0034 | |
L0011: JE Gef,#06 [FALSE] L0012 | |
PRINT "six" | |
JUMP L0034 | |
L0012: JE Gef,#07 [FALSE] L0013 | |
PRINT "seven" | |
JUMP L0034 | |
L0013: JE Gef,#08 [FALSE] L0014 | |
PRINT "eight" | |
JUMP L0034 | |
L0014: JE Gef,#09 [FALSE] L0015 | |
PRINT "nine" | |
JUMP L0034 | |
L0015: JE Gef,#0a [FALSE] L0016 | |
PRINT "ten" | |
JUMP L0034 | |
L0016: JE Gef,#0b [FALSE] L0017 | |
PRINT "eleven" | |
JUMP L0034 | |
L0017: JE Gef,#0c [FALSE] L0018 | |
PRINT "twelve" | |
JUMP L0034 | |
L0018: JE Gef,#0d [FALSE] L0019 | |
PRINT "thirteen" | |
JUMP L0034 | |
L0019: JE Gef,#0e [FALSE] L0020 | |
PRINT "fourteen" | |
JUMP L0034 | |
L0020: JE Gef,#0f [FALSE] L0021 | |
PRINT "fifteen" | |
JUMP L0034 | |
L0021: JE Gef,#10 [FALSE] L0022 | |
PRINT "sixteen" | |
JUMP L0034 | |
L0022: JE Gef,#11 [FALSE] L0023 | |
PRINT "seventeen" | |
JUMP L0034 | |
L0023: JE Gef,#12 [FALSE] L0024 | |
PRINT "eighteen" | |
JUMP L0034 | |
L0024: JE Gef,#13 [FALSE] L0025 | |
PRINT "nineteen" | |
JUMP L0034 | |
L0025: JL Gef,#14 [TRUE] L0034 | |
JG Gef,#63 [TRUE] L0034 | |
DIV L00,#0a -> -(SP) | |
PULL Gef | |
JE Gef,#02 [FALSE] L0026 | |
PRINT "twenty" | |
JUMP L0033 | |
L0026: JE Gef,#03 [FALSE] L0027 | |
PRINT "thirty" | |
JUMP L0033 | |
L0027: JE Gef,#04 [FALSE] L0028 | |
PRINT "forty" | |
JUMP L0033 | |
L0028: JE Gef,#05 [FALSE] L0029 | |
PRINT "fifty" | |
JUMP L0033 | |
L0029: JE Gef,#06 [FALSE] L0030 | |
PRINT "sixty" | |
JUMP L0033 | |
L0030: JE Gef,#07 [FALSE] L0031 | |
PRINT "seventy" | |
JUMP L0033 | |
L0031: JE Gef,#08 [FALSE] L0032 | |
PRINT "eighty" | |
JUMP L0033 | |
L0032: JE Gef,#09 [FALSE] L0033 | |
PRINT "ninety" | |
L0033: MOD L00,#0a -> -(SP) | |
JZ (SP)+ [TRUE] L0034 | |
PRINT "-" | |
MOD L00,#0a -> -(SP) | |
CALL_2N R0006 ((SP)+) | |
L0034: RTRUE | |
Routine R0007, 3 locals | |
MOD L00,#0c -> L02 | |
JZ L02 [FALSE] L0001 | |
STORE L02,#0c | |
L0001: JL L02,#0a [FALSE] L0002 | |
PRINT " " | |
L0002: PRINT_NUM L02 | |
PRINT ":" | |
DIV L01,#0a -> -(SP) | |
PRINT_NUM (SP)+ | |
MOD L01,#0a -> -(SP) | |
PRINT_NUM (SP)+ | |
DIV L00,#0c -> -(SP) | |
JG (SP)+,#00 [FALSE] L0003 | |
PRINT " pm" | |
JUMP L0004 | |
L0003: PRINT " am" | |
L0004: RTRUE | |
Routine R0008, 1 local | |
JE L00,"l" [FALSE] L0001 | |
PRINT "look" | |
RTRUE | |
L0001: JE L00,"z" [FALSE] L0002 | |
PRINT "wait" | |
RTRUE | |
L0002: JE L00,"x" [FALSE] L0003 | |
PRINT "examine" | |
RTRUE | |
L0003: JE L00,"i","inv","inventory" [FALSE] L0004 | |
PRINT "inventory" | |
RTRUE | |
L0004: RFALSE | |
Routine R0009, 1 local | |
JE L00,G19 [FALSE] L0001 | |
PRINT "you" | |
RTRUE | |
L0001: TEST_ATTR L00,#1e [FALSE] L0002 | |
PRINT "those" | |
RTRUE | |
L0002: TEST_ATTR L00,#00 [FALSE] L0004 | |
TEST_ATTR L00,#1c [FALSE] L0003 | |
PRINT "her" | |
RTRUE | |
L0003: TEST_ATTR L00,#1d [TRUE] L0004 | |
PRINT "him" | |
RTRUE | |
L0004: PRINT "that" | |
RTRUE | |
Routine R0010, 1 local | |
JE L00,G19 [FALSE] L0001 | |
PRINT "yourself" | |
RTRUE | |
L0001: TEST_ATTR L00,#1e [FALSE] L0002 | |
PRINT "them" | |
RTRUE | |
L0002: TEST_ATTR L00,#00 [FALSE] L0004 | |
TEST_ATTR L00,#1c [FALSE] L0003 | |
PRINT "her" | |
RTRUE | |
L0003: TEST_ATTR L00,#1d [TRUE] L0004 | |
PRINT "him" | |
RTRUE | |
L0004: PRINT "it" | |
RTRUE | |
Routine R0011, 1 local | |
TEST_ATTR L00,#1e [TRUE] L0001 | |
JE L00,G19 [FALSE] L0002 | |
L0001: PRINT "are" | |
JUMP L0003 | |
L0002: PRINT "is" | |
L0003: RTRUE | |
Routine R0012, 1 local | |
JE L00,G19 [FALSE] L0001 | |
PRINT "You" | |
RTRUE | |
L0001: TEST_ATTR L00,#1e [FALSE] L0002 | |
PRINT "Those" | |
RTRUE | |
L0002: TEST_ATTR L00,#00 [FALSE] L0004 | |
TEST_ATTR L00,#1c [FALSE] L0003 | |
PRINT "She" | |
RTRUE | |
L0003: TEST_ATTR L00,#1d [TRUE] L0004 | |
PRINT "He" | |
RTRUE | |
L0004: PRINT "That" | |
RTRUE | |
Routine R0013, 1 local | |
JE L00,G19 [FALSE] L0001 | |
PRINT "You're" | |
RTRUE | |
L0001: TEST_ATTR L00,#1e [FALSE] L0002 | |
PRINT "They're" | |
RTRUE | |
L0002: TEST_ATTR L00,#00 [FALSE] L0004 | |
TEST_ATTR L00,#1c [FALSE] L0003 | |
PRINT "She's" | |
RTRUE | |
L0003: TEST_ATTR L00,#1d [TRUE] L0004 | |
PRINT "He's" | |
RTRUE | |
L0004: PRINT "That's" | |
RTRUE | |
Routine R0014, 2 locals | |
JE Ge9,#1008 [FALSE] L0001 | |
PRINT " | |
>" | |
RTRUE | |
L0001: JE Ge9,#1007 [FALSE] L0066 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0002 | |
PRINT_PADDR S043 | |
NEW_LINE | |
RTRUE | |
L0002: JE Gef,#02 [FALSE] L0003 | |
PRINT_RET "Nothing to do!" | |
L0003: JE Gef,#03 [FALSE] L0004 | |
PRINT " You have died " | |
JUMP L0065 | |
L0004: JE Gef,#04 [FALSE] L0005 | |
PRINT " You have won " | |
JUMP L0065 | |
L0005: JE Gef,#05 [FALSE] L0008 | |
PRINT_PADDR S044 | |
JZ #0001 [FALSE] L0006 | |
PRINT_PADDR S045 | |
L0006: JE G1a,#02 [FALSE] L0007 | |
JZ #0001 [FALSE] L0007 | |
PRINT_PADDR S046 | |
L0007: PRINT_RET " or QUIT?" | |
L0008: JE Gef,#06 [FALSE] L0009 | |
PRINT_PADDR S047 | |
NEW_LINE | |
RTRUE | |
L0009: JE Gef,#07 [FALSE] L0010 | |
PRINT_PADDR S048 | |
NEW_LINE | |
RTRUE | |
L0010: JE Gef,#08 [FALSE] L0011 | |
PRINT_PADDR S049 | |
NEW_LINE | |
RTRUE | |
L0011: JE Gef,#09 [FALSE] L0012 | |
PRINT_RET " | |
It is now pitch dark in here!" | |
L0012: JE Gef,#0a [FALSE] L0013 | |
PRINT_RET "I beg your pardon?" | |
L0013: JE Gef,#0b [FALSE] L0014 | |
PRINT_PADDR S050 | |
NEW_LINE | |
RTRUE | |
L0014: JE Gef,#0c [FALSE] L0015 | |
PRINT_PADDR S051 | |
NEW_LINE | |
RTRUE | |
L0015: JE Gef,#0d [FALSE] L0016 | |
PRINT_RET "[Previous turn undone.]" | |
L0016: JE Gef,#0e [FALSE] L0017 | |
PRINT_RET "Sorry, that can't be corrected." | |
L0017: JE Gef,#0f [FALSE] L0018 | |
PRINT_RET "Think nothing of it." | |
L0018: JE Gef,#10 [FALSE] L0019 | |
PRINT_PADDR S052 | |
NEW_LINE | |
RTRUE | |
L0019: JE Gef,#11 [FALSE] L0020 | |
PRINT_PADDR S053 | |
NEW_LINE | |
RTRUE | |
L0020: JE Gef,#12 [FALSE] L0021 | |
PRINT "yourself" | |
JUMP L0065 | |
L0021: JE Gef,#13 [FALSE] L0022 | |
PRINT_RET "As good-looking as ever." | |
L0022: JE Gef,#14 [FALSE] L0023 | |
PRINT_PADDR S054 | |
NEW_LINE | |
RTRUE | |
L0023: JE Gef,#15 [FALSE] L0024 | |
PRINT_RET "You can hardly repeat that." | |
L0024: JE Gef,#16 [FALSE] L0025 | |
PRINT_RET "You can't begin with a comma." | |
L0025: JE Gef,#17 [FALSE] L0026 | |
PRINT_PADDR S055 | |
NEW_LINE | |
RTRUE | |
L0026: JE Gef,#18 [FALSE] L0027 | |
PRINT "You can't talk to " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0027: JE Gef,#19 [FALSE] L0028 | |
PRINT_PADDR S056 | |
NEW_LINE | |
RTRUE | |
L0028: JE Gef,#1a [FALSE] L0029 | |
PRINT "(first taking " | |
CALL_2N R0105 (G48) | |
PRINT_RET ")" | |
L0029: JE Gef,#1b [FALSE] L0030 | |
PRINT_PADDR S057 | |
NEW_LINE | |
RTRUE | |
L0030: JE Gef,#1c [FALSE] L0031 | |
PRINT_PADDR S058 | |
JUMP L0065 | |
L0031: JE Gef,#1d [FALSE] L0032 | |
PRINT_RET "I didn't understand that number." | |
L0032: JE Gef,#1e [FALSE] L0033 | |
PRINT_RET "You can't see any such thing." | |
L0033: JE Gef,#1f [FALSE] L0034 | |
PRINT_PADDR S059 | |
NEW_LINE | |
RTRUE | |
L0034: JE Gef,#20 [FALSE] L0035 | |
PRINT_RET "You aren't holding that!" | |
L0035: JE Gef,#21 [FALSE] L0036 | |
PRINT_PADDR S060 | |
NEW_LINE | |
RTRUE | |
L0036: JE Gef,#22 [FALSE] L0037 | |
PRINT_PADDR S061 | |
NEW_LINE | |
RTRUE | |
L0037: JE Gef,#23 [FALSE] L0038 | |
PRINT "I'm not sure what "" | |
PRINT_ADDR G6d | |
PRINT_RET "" refers to." | |
L0038: JE Gef,#24 [FALSE] L0039 | |
PRINT_PADDR S062 | |
NEW_LINE | |
RTRUE | |
L0039: JE Gef,#25 [FALSE] L0040 | |
PRINT_PADDR S063 | |
NEW_LINE | |
RTRUE | |
L0040: JE Gef,#26 [FALSE] L0041 | |
PRINT_RET "That's not a verb I recognise." | |
L0041: JE Gef,#27 [FALSE] L0042 | |
PRINT_PADDR S064 | |
NEW_LINE | |
RTRUE | |
L0042: JE Gef,#28 [FALSE] L0043 | |
PRINT "You can't see "" | |
PRINT_ADDR G6d | |
PRINT "" (" | |
CALL_2N R0105 (G6e) | |
PRINT_RET ") at the moment." | |
L0043: JE Gef,#29 [FALSE] L0044 | |
PRINT_PADDR S065 | |
NEW_LINE | |
RTRUE | |
L0044: JE Gef,#2a [FALSE] L0049 | |
JZ L01 [FALSE] L0045 | |
PRINT "None" | |
JUMP L0046 | |
L0045: PRINT "Only " | |
CALL_2N R0108 (L01) | |
L0046: PRINT " of those " | |
JE L01,#01 [FALSE] L0047 | |
PRINT "is" | |
JUMP L0048 | |
L0047: PRINT "are" | |
L0048: PRINT_RET " available." | |
L0049: JE Gef,#2b [FALSE] L0050 | |
PRINT_RET "Nothing to do!" | |
L0050: JE Gef,#2c [FALSE] L0051 | |
PRINT_RET "There are none at all available!" | |
L0051: JE Gef,#2d [FALSE] L0052 | |
PRINT "Who do you mean, " | |
JUMP L0065 | |
L0052: JE Gef,#2e [FALSE] L0053 | |
PRINT "Which do you mean, " | |
JUMP L0065 | |
L0053: JE Gef,#2f [FALSE] L0054 | |
PRINT_PADDR S066 | |
NEW_LINE | |
RTRUE | |
L0054: JE Gef,#30 [FALSE] L0056 | |
PRINT "Whom do you want" | |
JE G3c,G19 [TRUE] L0055 | |
PRINT " " | |
CALL_2N R0105 (G3c) | |
L0055: PRINT " to " | |
CALL_1N R0037 | |
PRINT "? | |
" | |
JUMP L0065 | |
L0056: JE Gef,#31 [FALSE] L0058 | |
PRINT "What do you want" | |
JE G3c,G19 [TRUE] L0057 | |
PRINT " " | |
CALL_2N R0105 (G3c) | |
L0057: PRINT " to " | |
CALL_1N R0037 | |
PRINT "? | |
" | |
JUMP L0065 | |
L0058: JE Gef,#32 [FALSE] L0062 | |
PRINT "Your score has just gone " | |
JG L01,#00 [FALSE] L0059 | |
PRINT "up" | |
JUMP L0060 | |
L0059: SUB #00,L01 -> L01 | |
PRINT "down" | |
L0060: PRINT " by " | |
CALL_2N R0108 (L01) | |
PRINT " point" | |
JG L01,#01 [FALSE] L0061 | |
PRINT "s" | |
L0061: JUMP L0065 | |
L0062: JE Gef,#33 [FALSE] L0063 | |
PRINT_PADDR S067 | |
NEW_LINE | |
RTRUE | |
L0063: JE Gef,#34 [FALSE] L0064 | |
PRINT " | |
Type a number from 1 to " | |
PRINT_NUM L01 | |
PRINT_RET ", 0 to redisplay or press ENTER." | |
L0064: JE Gef,#35 [FALSE] L0065 | |
PRINT_RET " | |
[Please press SPACE.]" | |
L0065: RTRUE | |
L0066: JE Ge9,#1006 [FALSE] L0089 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0067 | |
PRINT " (providing light)" | |
JUMP L0088 | |
L0067: JE Gef,#02 [FALSE] L0068 | |
PRINT " (which " | |
CALL_2N R0011 (L01) | |
PRINT " closed)" | |
JUMP L0088 | |
L0068: JE Gef,#03 [FALSE] L0069 | |
PRINT " (closed and providing light)" | |
JUMP L0088 | |
L0069: JE Gef,#04 [FALSE] L0070 | |
PRINT " (which " | |
CALL_2N R0011 (L01) | |
PRINT " empty)" | |
JUMP L0088 | |
L0070: JE Gef,#05 [FALSE] L0071 | |
PRINT " (empty and providing light)" | |
JUMP L0088 | |
L0071: JE Gef,#06 [FALSE] L0072 | |
PRINT " (which " | |
CALL_2N R0011 (L01) | |
PRINT " closed and empty)" | |
JUMP L0088 | |
L0072: JE Gef,#07 [FALSE] L0073 | |
PRINT_PADDR S068 | |
JUMP L0088 | |
L0073: JE Gef,#08 [FALSE] L0074 | |
PRINT " (providing light and being worn" | |
JUMP L0088 | |
L0074: JE Gef,#09 [FALSE] L0075 | |
PRINT " (providing light" | |
JUMP L0088 | |
L0075: JE Gef,#0a [FALSE] L0076 | |
PRINT " (being worn" | |
JUMP L0088 | |
L0076: JE Gef,#0b [FALSE] L0077 | |
PRINT " (which " | |
CALL_2N R0011 (L01) | |
PRINT " " | |
JUMP L0088 | |
L0077: JE Gef,#0c [FALSE] L0078 | |
PRINT "open" | |
JUMP L0088 | |
L0078: JE Gef,#0d [FALSE] L0079 | |
PRINT "open but empty" | |
JUMP L0088 | |
L0079: JE Gef,#0e [FALSE] L0080 | |
PRINT "closed" | |
JUMP L0088 | |
L0080: JE Gef,#0f [FALSE] L0081 | |
PRINT "closed and locked" | |
JUMP L0088 | |
L0081: JE Gef,#10 [FALSE] L0082 | |
PRINT " and empty" | |
JUMP L0088 | |
L0082: JE Gef,#11 [FALSE] L0083 | |
PRINT " (which " | |
CALL_2N R0011 (L01) | |
PRINT " empty)" | |
JUMP L0088 | |
L0083: JE Gef,#12 [FALSE] L0084 | |
PRINT " containing " | |
JUMP L0088 | |
L0084: JE Gef,#13 [FALSE] L0085 | |
PRINT " (on " | |
JUMP L0088 | |
L0085: JE Gef,#14 [FALSE] L0086 | |
PRINT ", on top of " | |
JUMP L0088 | |
L0086: JE Gef,#15 [FALSE] L0087 | |
PRINT " (in " | |
JUMP L0088 | |
L0087: JE Gef,#16 [FALSE] L0088 | |
PRINT ", inside " | |
L0088: RTRUE | |
L0089: JE Ge9,#00 [FALSE] L0094 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0090 | |
PRINT "At the moment, " | |
JUMP L0093 | |
L0090: JE Gef,#02 [FALSE] L0091 | |
PRINT "means " | |
JUMP L0093 | |
L0091: JE Gef,#03 [FALSE] L0092 | |
PRINT "is unset" | |
JUMP L0093 | |
L0092: JE Gef,#04 [FALSE] L0093 | |
PRINT_PADDR S069 | |
NEW_LINE | |
RTRUE | |
L0093: RTRUE | |
L0094: JE Ge9,#1003 [FALSE] L0097 | |
CALL_2N R0106 (L01) | |
TEST_ATTR L01,#1e [FALSE] L0095 | |
PRINT " have" | |
JUMP L0096 | |
L0095: PRINT " has" | |
L0096: PRINT_RET " better things to do." | |
L0097: JE Ge9,#01 [FALSE] L0100 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0098 | |
PRINT "Please answer yes or no." | |
JUMP L0099 | |
L0098: JE Gef,#02 [FALSE] L0099 | |
PRINT "Are you sure you want to quit? " | |
L0099: RTRUE | |
L0100: JE Ge9,#02 [FALSE] L0103 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0101 | |
PRINT_PADDR S070 | |
JUMP L0102 | |
L0101: JE Gef,#02 [FALSE] L0102 | |
PRINT_RET "Failed." | |
L0102: RTRUE | |
L0103: JE Ge9,#03 [FALSE] L0106 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0104 | |
PRINT_RET "Restore failed." | |
L0104: JE Gef,#02 [FALSE] L0105 | |
PRINT_RET "Ok." | |
L0105: RTRUE | |
L0106: JE Ge9,#04 [FALSE] L0109 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0107 | |
PRINT_RET "Save failed." | |
L0107: JE Gef,#02 [FALSE] L0108 | |
PRINT_RET "Ok." | |
L0108: RTRUE | |
L0109: JE Ge9,#05 [FALSE] L0112 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0110 | |
PRINT_PADDR S071 | |
NEW_LINE | |
RTRUE | |
L0110: JE Gef,#02 [FALSE] L0111 | |
PRINT_PADDR S072 | |
NEW_LINE | |
RTRUE | |
L0111: RTRUE | |
L0112: JE Ge9,#06 [FALSE] L0116 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0113 | |
PRINT_RET "Transcripting is already on." | |
L0113: JE Gef,#02 [FALSE] L0114 | |
PRINT_RET "Start of a transcript of" | |
L0114: JE Gef,#03 [FALSE] L0115 | |
PRINT_PADDR S073 | |
NEW_LINE | |
RTRUE | |
L0115: RTRUE | |
L0116: JE Ge9,#07 [FALSE] L0120 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0117 | |
PRINT_RET "Transcripting is already off." | |
L0117: JE Gef,#02 [FALSE] L0118 | |
PRINT_RET " | |
End of transcript." | |
L0118: JE Gef,#03 [FALSE] L0119 | |
PRINT_PADDR S074 | |
NEW_LINE | |
RTRUE | |
L0119: RTRUE | |
L0120: JE Ge9,#08 [FALSE] L0121 | |
PRINT_RET "Score notification on." | |
L0121: JE Ge9,#09 [FALSE] L0122 | |
PRINT_RET "Score notification off." | |
L0122: JE Ge9,#0a [FALSE] L0123 | |
PRINT "You have visited: " | |
RTRUE | |
L0123: JE Ge9,#0b [FALSE] L0134 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0124 | |
PRINT_RET "Objects you have handled: | |
" | |
L0124: JE Gef,#02 [FALSE] L0125 | |
PRINT_RET "None." | |
L0125: JE Gef,#03 [FALSE] L0126 | |
PRINT " (worn)" | |
JUMP L0133 | |
L0126: JE Gef,#04 [FALSE] L0127 | |
PRINT " (held)" | |
JUMP L0133 | |
L0127: JE Gef,#05 [FALSE] L0128 | |
PRINT " (given away)" | |
JUMP L0133 | |
L0128: JE Gef,#06 [FALSE] L0129 | |
PRINT " (in " | |
CALL_2N R0107 (L01) | |
PRINT ")" | |
JUMP L0133 | |
L0129: JE Gef,#07 [FALSE] L0130 | |
PRINT " (in " | |
CALL_2N R0105 (L01) | |
PRINT ")" | |
JUMP L0133 | |
L0130: JE Gef,#08 [FALSE] L0131 | |
PRINT " (inside " | |
CALL_2N R0105 (L01) | |
PRINT ")" | |
JUMP L0133 | |
L0131: JE Gef,#09 [FALSE] L0132 | |
PRINT " (on " | |
CALL_2N R0105 (L01) | |
PRINT ")" | |
JUMP L0133 | |
L0132: JE Gef,#0a [FALSE] L0133 | |
PRINT " (lost)" | |
L0133: RTRUE | |
L0134: JE Ge9,#0c [FALSE] L0138 | |
JZ G1a [TRUE] L0135 | |
PRINT "In that game you scored " | |
JUMP L0136 | |
L0135: PRINT "You have so far scored " | |
L0136: PRINT_NUM G14 | |
PRINT " out of a possible " | |
PRINT_NUM #0000 | |
PRINT ", in " | |
PRINT_NUM G0f | |
PRINT " turn" | |
JE G0f,#01 [TRUE] L0137 | |
PRINT "s" | |
L0137: RTRUE | |
L0138: JE Ge9,#0d [FALSE] L0145 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0141 | |
JZ G1a [TRUE] L0139 | |
PRINT "The score was " | |
JUMP L0140 | |
L0139: PRINT "The score is " | |
L0140: PRINT_RET "made up as follows: | |
" | |
L0141: JE Gef,#02 [FALSE] L0142 | |
PRINT_RET "finding sundry items" | |
L0142: JE Gef,#03 [FALSE] L0143 | |
PRINT_RET "visiting various places" | |
L0143: JE Gef,#04 [FALSE] L0144 | |
PRINT "total (out of " | |
PRINT_NUM #0000 | |
PRINT_RET ")" | |
L0144: RTRUE | |
L0145: JE Ge9,#0e [FALSE] L0148 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0146 | |
PRINT_RET "You are carrying nothing." | |
L0146: JE Gef,#02 [FALSE] L0147 | |
PRINT "You are carrying" | |
L0147: RTRUE | |
L0148: JE Ge9,#0f [FALSE] L0172 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0149 | |
PRINT_RET "Taken." | |
L0149: JE Gef,#02 [FALSE] L0150 | |
PRINT_RET "You are always self-possessed." | |
L0150: JE Gef,#03 [FALSE] L0151 | |
PRINT "I don't suppose " | |
CALL_2N R0105 (L01) | |
PRINT_RET " would care for that." | |
L0151: JE Gef,#04 [FALSE] L0154 | |
PRINT "You'd have to get " | |
TEST_ATTR L01,#14 [FALSE] L0152 | |
PRINT "off " | |
JUMP L0153 | |
L0152: PRINT "out of " | |
L0153: CALL_2N R0105 (L01) | |
PRINT_RET " first." | |
L0154: JE Gef,#05 [FALSE] L0155 | |
PRINT "You already have " | |
CALL_2N R0009 (L01) | |
PRINT_RET "." | |
L0155: JE Gef,#06 [FALSE] L0158 | |
TEST_ATTR G32,#1e [FALSE] L0156 | |
PRINT "Those seem " | |
JUMP L0157 | |
L0156: PRINT "That seems " | |
L0157: PRINT "to belong to " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0158: JE Gef,#07 [FALSE] L0161 | |
TEST_ATTR G32,#1e [FALSE] L0159 | |
PRINT "Those seem " | |
JUMP L0160 | |
L0159: PRINT "That seems " | |
L0160: PRINT "to be a part of " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0161: JE Gef,#08 [FALSE] L0162 | |
CALL_2N R0012 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET "n't available." | |
L0162: JE Gef,#09 [FALSE] L0163 | |
CALL_2N R0106 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET "n't open." | |
L0163: JE Gef,#0a [FALSE] L0166 | |
TEST_ATTR L01,#1e [FALSE] L0164 | |
PRINT "They're " | |
JUMP L0165 | |
L0164: PRINT "That's " | |
L0165: PRINT_RET "hardly portable." | |
L0166: JE Gef,#0b [FALSE] L0169 | |
TEST_ATTR L01,#1e [FALSE] L0167 | |
PRINT "They're " | |
JUMP L0168 | |
L0167: PRINT "That's " | |
L0168: PRINT_RET "fixed in place." | |
L0169: JE Gef,#0c [FALSE] L0170 | |
PRINT_PADDR S075 | |
NEW_LINE | |
RTRUE | |
L0170: JE Gef,#0d [FALSE] L0171 | |
PRINT "(putting " | |
CALL_2N R0105 (L01) | |
PRINT " into " | |
CALL_2N R0105 (#0000) | |
PRINT_RET " to make room)" | |
L0171: RTRUE | |
L0172: JE Ge9,#10 [FALSE] L0179 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0175 | |
TEST_ATTR L01,#1e [FALSE] L0173 | |
CALL_2N R0106 (L01) | |
PRINT " are " | |
JUMP L0174 | |
L0173: CALL_2N R0106 (L01) | |
PRINT " is " | |
L0174: PRINT_RET "already here." | |
L0175: JE Gef,#02 [FALSE] L0176 | |
PRINT "You haven't got " | |
CALL_2N R0009 (L01) | |
PRINT_RET "." | |
L0176: JE Gef,#03 [FALSE] L0177 | |
PRINT "(first taking " | |
CALL_2N R0105 (L01) | |
PRINT_RET " off)" | |
L0177: JE Gef,#04 [FALSE] L0178 | |
PRINT_RET "Dropped." | |
L0178: RTRUE | |
L0179: JE Ge9,#11 [FALSE] L0187 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0182 | |
TEST_ATTR L01,#1e [FALSE] L0180 | |
PRINT "They are" | |
JUMP L0181 | |
L0180: PRINT "It is" | |
L0181: PRINT_RET " unfortunately closed." | |
L0182: JE Gef,#02 [FALSE] L0185 | |
TEST_ATTR L01,#1e [FALSE] L0183 | |
PRINT "But they aren't" | |
JUMP L0184 | |
L0183: PRINT "But it isn't" | |
L0184: PRINT_RET " there now." | |
L0185: JE Gef,#03 [FALSE] L0186 | |
PRINT_RET "Removed." | |
L0186: RTRUE | |
L0187: JE Ge9,#12 [FALSE] L0196 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0188 | |
PRINT "You need to be holding " | |
CALL_2N R0105 (L01) | |
PRINT " before you can put " | |
CALL_2N R0010 (L01) | |
PRINT_RET " on top of something else." | |
L0188: JE Gef,#02 [FALSE] L0189 | |
PRINT_PADDR S076 | |
NEW_LINE | |
RTRUE | |
L0189: JE Gef,#03 [FALSE] L0190 | |
PRINT "Putting things on " | |
CALL_2N R0105 (L01) | |
PRINT_RET " would achieve nothing." | |
L0190: JE Gef,#04 [FALSE] L0191 | |
PRINT_RET "You lack the dexterity." | |
L0191: JE Gef,#05 [FALSE] L0192 | |
PRINT "(first taking " | |
CALL_2N R0010 (L01) | |
PRINT_RET " off) | |
" | |
L0192: JE Gef,#06 [FALSE] L0193 | |
PRINT "There is no more room on " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0193: JE Gef,#07 [FALSE] L0194 | |
PRINT_RET "Done." | |
L0194: JE Gef,#08 [FALSE] L0195 | |
PRINT "You put " | |
CALL_2N R0105 (L01) | |
PRINT " on " | |
CALL_2N R0105 (G33) | |
PRINT_RET "." | |
L0195: RTRUE | |
L0196: JE Ge9,#13 [FALSE] L0206 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0197 | |
PRINT "You need to be holding " | |
CALL_2N R0105 (L01) | |
PRINT " before you can put " | |
CALL_2N R0010 (L01) | |
PRINT_RET " into something else." | |
L0197: JE Gef,#02 [FALSE] L0198 | |
CALL_2N R0012 (L01) | |
PRINT_RET " can't contain things." | |
L0198: JE Gef,#03 [FALSE] L0199 | |
CALL_2N R0106 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET " closed." | |
L0199: JE Gef,#04 [FALSE] L0200 | |
PRINT "You'll need to take " | |
CALL_2N R0010 (L01) | |
PRINT_RET " off first." | |
L0200: JE Gef,#05 [FALSE] L0201 | |
PRINT_PADDR S077 | |
NEW_LINE | |
RTRUE | |
L0201: JE Gef,#06 [FALSE] L0202 | |
PRINT "(first taking " | |
CALL_2N R0010 (L01) | |
PRINT_RET " off) | |
" | |
L0202: JE Gef,#07 [FALSE] L0203 | |
PRINT "There is no more room in " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0203: JE Gef,#08 [FALSE] L0204 | |
PRINT_RET "Done." | |
L0204: JE Gef,#09 [FALSE] L0205 | |
PRINT "You put " | |
CALL_2N R0105 (L01) | |
PRINT " into " | |
CALL_2N R0105 (G33) | |
PRINT_RET "." | |
L0205: RTRUE | |
L0206: JE Ge9,#14 [FALSE] L0211 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0207 | |
CALL_2N R0106 (L01) | |
PRINT_RET " can't contain things." | |
L0207: JE Gef,#02 [FALSE] L0208 | |
CALL_2N R0106 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET " closed." | |
L0208: JE Gef,#03 [FALSE] L0209 | |
CALL_2N R0106 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET " empty already." | |
L0209: JE Gef,#04 [FALSE] L0210 | |
PRINT_PADDR S078 | |
NEW_LINE | |
RTRUE | |
L0210: RTRUE | |
L0211: JE Ge9,#15 [FALSE] L0217 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0212 | |
PRINT "You aren't holding " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0212: JE Gef,#02 [FALSE] L0213 | |
PRINT "You juggle " | |
CALL_2N R0105 (L01) | |
PRINT_PADDR S079 | |
NEW_LINE | |
RTRUE | |
L0213: JE Gef,#03 [FALSE] L0216 | |
CALL_2N R0106 (L01) | |
TEST_ATTR L01,#1e [FALSE] L0214 | |
PRINT " don't" | |
JUMP L0215 | |
L0214: PRINT " doesn't" | |
L0215: PRINT_RET " seem interested." | |
L0216: RTRUE | |
L0217: JE Ge9,#16 [FALSE] L0220 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0218 | |
PRINT "You aren't holding " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0218: JE Gef,#02 [FALSE] L0219 | |
CALL_2N R0106 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET " unimpressed." | |
L0219: RTRUE | |
L0220: JE Ge9,#17 [FALSE] L0238 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0223 | |
PRINT "But you're already " | |
TEST_ATTR L01,#14 [FALSE] L0221 | |
PRINT "on " | |
JUMP L0222 | |
L0221: PRINT "in " | |
L0222: CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0223: JE Gef,#02 [FALSE] L0226 | |
TEST_ATTR L01,#1e [FALSE] L0224 | |
PRINT "They're" | |
JUMP L0225 | |
L0224: PRINT "That's" | |
L0225: PRINT_RET " not something you can enter." | |
L0226: JE Gef,#03 [FALSE] L0227 | |
PRINT "You can't get into the closed " | |
CALL_2N R0107 (L01) | |
PRINT_RET "." | |
L0227: JE Gef,#04 [FALSE] L0228 | |
PRINT_PADDR S080 | |
NEW_LINE | |
RTRUE | |
L0228: JE Gef,#05 [FALSE] L0231 | |
PRINT "You get " | |
TEST_ATTR L01,#14 [FALSE] L0229 | |
PRINT "onto " | |
JUMP L0230 | |
L0229: PRINT "into " | |
L0230: CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0231: JE Gef,#06 [FALSE] L0234 | |
PRINT "(getting " | |
TEST_ATTR L01,#14 [FALSE] L0232 | |
PRINT "off " | |
JUMP L0233 | |
L0232: PRINT "out of " | |
L0233: CALL_2N R0105 (L01) | |
PRINT_RET ")" | |
L0234: JE Gef,#07 [FALSE] L0237 | |
TEST_ATTR L01,#14 [FALSE] L0235 | |
PRINT "(getting onto " | |
CALL_2N R0105 (L01) | |
PRINT_RET ") | |
" | |
L0235: TEST_ATTR L01,#04 [FALSE] L0236 | |
PRINT "(getting into " | |
CALL_2N R0105 (L01) | |
PRINT_RET ") | |
" | |
L0236: PRINT "(entering " | |
CALL_2N R0105 (L01) | |
PRINT_RET ") | |
" | |
L0237: RTRUE | |
L0238: JE Ge9,#18 [FALSE] L0239 | |
PRINT "But you aren't on " | |
CALL_2N R0105 (L01) | |
PRINT_RET " at the moment." | |
L0239: JE Ge9,#19 [FALSE] L0245 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0240 | |
PRINT_PADDR S081 | |
NEW_LINE | |
RTRUE | |
L0240: JE Gef,#02 [FALSE] L0241 | |
PRINT "You can't get out of the closed " | |
CALL_2N R0107 (L01) | |
PRINT_RET "." | |
L0241: JE Gef,#03 [FALSE] L0244 | |
PRINT "You get " | |
TEST_ATTR L01,#14 [FALSE] L0242 | |
PRINT "off " | |
JUMP L0243 | |
L0242: PRINT "out of " | |
L0243: CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0244: RTRUE | |
L0245: JE Ge9,#1a [FALSE] L0246 | |
PRINT_PADDR S082 | |
NEW_LINE | |
RTRUE | |
L0246: JE Ge9,#1b [FALSE] L0256 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0249 | |
PRINT "You'll have to get " | |
TEST_ATTR L01,#14 [FALSE] L0247 | |
PRINT "off " | |
JUMP L0248 | |
L0247: PRINT "out of " | |
L0248: CALL_2N R0105 (L01) | |
PRINT_RET " first." | |
L0249: JE Gef,#02 [FALSE] L0250 | |
PRINT_RET "You can't go that way." | |
L0250: JE Gef,#03 [FALSE] L0251 | |
PRINT "You are unable to climb " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0251: JE Gef,#04 [FALSE] L0252 | |
PRINT "You are unable to descend by " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0252: JE Gef,#05 [FALSE] L0253 | |
PRINT "You can't, since " | |
CALL_2N R0105 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET " in the way." | |
L0253: JE Gef,#06 [FALSE] L0255 | |
PRINT "You can't, since " | |
CALL_2N R0105 (L01) | |
TEST_ATTR L01,#1e [FALSE] L0254 | |
PRINT_RET " lead nowhere." | |
L0254: PRINT_RET " leads nowhere." | |
L0255: RTRUE | |
L0256: JE Ge9,#1c [FALSE] L0257 | |
PRINT_PADDR S083 | |
NEW_LINE | |
RTRUE | |
L0257: JE Ge9,#1d [FALSE] L0258 | |
PRINT_PADDR S084 | |
NEW_LINE | |
RTRUE | |
L0258: JE Ge9,#1e [FALSE] L0259 | |
PRINT_PADDR S085 | |
NEW_LINE | |
RTRUE | |
L0259: JE Ge9,#1f [FALSE] L0273 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0260 | |
PRINT " (on " | |
CALL_2N R0105 (L01) | |
PRINT ")" | |
JUMP L0272 | |
L0260: JE Gef,#02 [FALSE] L0261 | |
PRINT " (in " | |
CALL_2N R0105 (L01) | |
PRINT ")" | |
JUMP L0272 | |
L0261: JE Gef,#03 [FALSE] L0262 | |
PRINT " (as " | |
PRINT_OBJ L01 | |
PRINT ")" | |
JUMP L0272 | |
L0262: JE Gef,#04 [FALSE] L0264 | |
PRINT " | |
On " | |
CALL_2N R0105 (L01) | |
ADD #0008,#0010 -> -(SP) | |
ADD (SP)+,#0080 -> -(SP) | |
ADD (SP)+,#0040 -> -(SP) | |
ADD (SP)+,#0400 -> -(SP) | |
ADD (SP)+,#0800 -> -(SP) | |
GET_CHILD L01 -> -(SP) [FALSE] L0263 | |
L0263: CALL_VN R0123 ((SP)+,(SP)+) | |
PRINT_RET "." | |
L0264: JE L01,G07 [TRUE] L0267 | |
TEST_ATTR L01,#14 [FALSE] L0265 | |
PRINT " | |
On " | |
JUMP L0266 | |
L0265: PRINT " | |
In " | |
L0266: CALL_2N R0105 (L01) | |
PRINT " you" | |
JUMP L0268 | |
L0267: PRINT " | |
You" | |
L0268: PRINT " can " | |
JE L00,#05 [FALSE] L0269 | |
PRINT "also " | |
L0269: PRINT "see " | |
ADD #0008,#0200 -> -(SP) | |
ADD (SP)+,#0010 -> -(SP) | |
ADD (SP)+,#0080 -> -(SP) | |
ADD (SP)+,#0040 -> -(SP) | |
ADD (SP)+,#0800 -> -(SP) | |
GET_CHILD L01 -> -(SP) [FALSE] L0270 | |
L0270: CALL_VN R0123 ((SP)+,(SP)+) | |
JE L01,G07 [TRUE] L0271 | |
PRINT_RET "." | |
L0271: PRINT_RET " here." | |
L0272: RTRUE | |
L0273: JE Ge9,#20 [FALSE] L0278 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0274 | |
PRINT_PADDR S086 | |
NEW_LINE | |
RTRUE | |
L0274: JE Gef,#02 [FALSE] L0275 | |
PRINT "You see nothing special about " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0275: JE Gef,#03 [FALSE] L0277 | |
CALL_2N R0106 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT " currently switched " | |
TEST_ATTR L01,#0d [FALSE] L0276 | |
PRINT_RET "on." | |
L0276: PRINT_RET "off." | |
L0277: RTRUE | |
L0278: JE Ge9,#21 [FALSE] L0281 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0279 | |
PRINT_RET "But it's dark." | |
L0279: JE Gef,#02 [FALSE] L0280 | |
PRINT_RET "You find nothing of interest." | |
L0280: RTRUE | |
L0281: JE Ge9,#22 [FALSE] L0291 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0282 | |
PRINT_RET "But it's dark." | |
L0282: JE Gef,#02 [FALSE] L0283 | |
PRINT "There is nothing on " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0283: JE Gef,#03 [FALSE] L0285 | |
PRINT "On " | |
CALL_2N R0105 (L01) | |
ADD #0040,#0008 -> -(SP) | |
ADD (SP)+,#0400 -> -(SP) | |
ADD (SP)+,#0800 -> -(SP) | |
GET_CHILD L01 -> -(SP) [FALSE] L0284 | |
L0284: CALL_VN R0123 ((SP)+,(SP)+) | |
PRINT_RET "." | |
L0285: JE Gef,#04 [FALSE] L0286 | |
PRINT_RET "You find nothing of interest." | |
L0286: JE Gef,#05 [FALSE] L0287 | |
PRINT "You can't see inside, since " | |
CALL_2N R0105 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET " closed." | |
L0287: JE Gef,#06 [FALSE] L0288 | |
CALL_2N R0106 (L01) | |
PRINT " " | |
CALL_2N R0011 (L01) | |
PRINT_RET " empty." | |
L0288: JE Gef,#07 [FALSE] L0290 | |
PRINT "In " | |
CALL_2N R0105 (L01) | |
ADD #0040,#0008 -> -(SP) | |
ADD (SP)+,#0400 -> -(SP) | |
ADD (SP)+,#0800 -> -(SP) | |
GET_CHILD L01 -> -(SP) [FALSE] L0289 | |
L0289: CALL_VN R0123 ((SP)+,(SP)+) | |
PRINT_RET "." | |
L0290: RTRUE | |
L0291: JE Ge9,#23 [FALSE] L0300 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0294 | |
TEST_ATTR L01,#1e [FALSE] L0292 | |
PRINT "They don't " | |
JUMP L0293 | |
L0292: PRINT "That doesn't " | |
L0293: PRINT_PADDR S087 | |
NEW_LINE | |
RTRUE | |
L0294: JE Gef,#02 [FALSE] L0295 | |
CALL_2N R0013 (L01) | |
PRINT_RET " unlocked at the moment." | |
L0295: JE Gef,#03 [FALSE] L0298 | |
TEST_ATTR L01,#1e [FALSE] L0296 | |
PRINT "Those don't " | |
JUMP L0297 | |
L0296: PRINT "That doesn't " | |
L0297: PRINT_RET "seem to fit the lock." | |
L0298: JE Gef,#04 [FALSE] L0299 | |
PRINT "You unlock " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0299: RTRUE | |
L0300: JE Ge9,#24 [FALSE] L0310 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0303 | |
TEST_ATTR L01,#1e [FALSE] L0301 | |
PRINT "They don't " | |
JUMP L0302 | |
L0301: PRINT "That doesn't " | |
L0302: PRINT_PADDR S088 | |
NEW_LINE | |
RTRUE | |
L0303: JE Gef,#02 [FALSE] L0304 | |
CALL_2N R0013 (L01) | |
PRINT_RET " locked at the moment." | |
L0304: JE Gef,#03 [FALSE] L0305 | |
PRINT "First you'll have to close " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0305: JE Gef,#04 [FALSE] L0308 | |
TEST_ATTR L01,#1e [FALSE] L0306 | |
PRINT "Those don't " | |
JUMP L0307 | |
L0306: PRINT "That doesn't " | |
L0307: PRINT_RET "seem to fit the lock." | |
L0308: JE Gef,#05 [FALSE] L0309 | |
PRINT "You lock " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0309: RTRUE | |
L0310: JE Ge9,#25 [FALSE] L0314 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0311 | |
CALL_2N R0013 (L01) | |
PRINT_RET " not something you can switch." | |
L0311: JE Gef,#02 [FALSE] L0312 | |
CALL_2N R0013 (L01) | |
PRINT_RET " already on." | |
L0312: JE Gef,#03 [FALSE] L0313 | |
PRINT "You switch " | |
CALL_2N R0105 (L01) | |
PRINT_RET " on." | |
L0313: RTRUE | |
L0314: JE Ge9,#26 [FALSE] L0318 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0315 | |
CALL_2N R0013 (L01) | |
PRINT_RET " not something you can switch." | |
L0315: JE Gef,#02 [FALSE] L0316 | |
CALL_2N R0013 (L01) | |
PRINT_RET " already off." | |
L0316: JE Gef,#03 [FALSE] L0317 | |
PRINT "You switch " | |
CALL_2N R0105 (L01) | |
PRINT_RET " off." | |
L0317: RTRUE | |
L0318: JE Ge9,#27 [FALSE] L0328 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0319 | |
CALL_2N R0013 (L01) | |
PRINT_RET " not something you can open." | |
L0319: JE Gef,#02 [FALSE] L0322 | |
TEST_ATTR L01,#1e [FALSE] L0320 | |
PRINT "They seem " | |
JUMP L0321 | |
L0320: PRINT "It seems " | |
L0321: PRINT_RET "to be locked." | |
L0322: JE Gef,#03 [FALSE] L0323 | |
CALL_2N R0013 (L01) | |
PRINT_RET " already open." | |
L0323: JE Gef,#04 [FALSE] L0326 | |
PRINT "You open " | |
CALL_2N R0105 (L01) | |
PRINT ", revealing " | |
ADD #0008,#0040 -> -(SP) | |
ADD (SP)+,#0800 -> -(SP) | |
GET_CHILD L01 -> -(SP) [FALSE] L0324 | |
L0324: CALL_VS R0123 ((SP)+,(SP)+) -> -(SP) | |
JZ (SP)+ [FALSE] L0325 | |
PRINT_RET "nothing." | |
L0325: PRINT_RET "." | |
L0326: JE Gef,#05 [FALSE] L0327 | |
PRINT "You open " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0327: RTRUE | |
L0328: JE Ge9,#28 [FALSE] L0332 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0329 | |
CALL_2N R0013 (L01) | |
PRINT_RET " not something you can close." | |
L0329: JE Gef,#02 [FALSE] L0330 | |
CALL_2N R0013 (L01) | |
PRINT_RET " already closed." | |
L0330: JE Gef,#03 [FALSE] L0331 | |
PRINT "You close " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0331: RTRUE | |
L0332: JE Ge9,#29 [FALSE] L0335 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0333 | |
PRINT "You're not wearing " | |
CALL_2N R0009 (L01) | |
PRINT_RET "." | |
L0333: JE Gef,#02 [FALSE] L0334 | |
PRINT "You take off " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0334: RTRUE | |
L0335: JE Ge9,#2a [FALSE] L0340 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0336 | |
PRINT "You can't wear " | |
CALL_2N R0009 (L01) | |
PRINT_RET "!" | |
L0336: JE Gef,#02 [FALSE] L0337 | |
PRINT "You're not holding " | |
CALL_2N R0009 (L01) | |
PRINT_RET "!" | |
L0337: JE Gef,#03 [FALSE] L0338 | |
PRINT "You're already wearing " | |
CALL_2N R0009 (L01) | |
PRINT_RET "!" | |
L0338: JE Gef,#04 [FALSE] L0339 | |
PRINT "You put on " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0339: RTRUE | |
L0340: JE Ge9,#2b [FALSE] L0343 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0341 | |
CALL_2N R0013 (L01) | |
PRINT_RET " plainly inedible." | |
L0341: JE Gef,#02 [FALSE] L0342 | |
PRINT "You eat " | |
CALL_2N R0105 (L01) | |
PRINT_RET ". Not bad." | |
L0342: RTRUE | |
L0343: JE Ge9,#2c,#2d [FALSE] L0344 | |
PRINT_RET "That was a rhetorical question." | |
L0344: JE Ge9,#2e [FALSE] L0345 | |
PRINT_PADDR S089 | |
NEW_LINE | |
RTRUE | |
L0345: JE Ge9,#2f [FALSE] L0346 | |
PRINT_PADDR S090 | |
NEW_LINE | |
RTRUE | |
L0346: JE Ge9,#30 [FALSE] L0347 | |
PRINT_PADDR S091 | |
NEW_LINE | |
RTRUE | |
L0347: JE Ge9,#31 [FALSE] L0348 | |
PRINT_RET "That seems unnecessary." | |
L0348: JE Ge9,#32 [FALSE] L0349 | |
PRINT_RET "Keep your mind on the game." | |
L0349: JE Ge9,#33 [FALSE] L0350 | |
PRINT_RET "What a good idea." | |
L0350: JE Ge9,#34 [FALSE] L0351 | |
PRINT_RET "You smell nothing unexpected." | |
L0351: JE Ge9,#35 [FALSE] L0352 | |
PRINT_RET "You hear nothing unexpected." | |
L0352: JE Ge9,#36 [FALSE] L0353 | |
PRINT_RET "You taste nothing unexpected." | |
L0353: JE Ge9,#37 [FALSE] L0357 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0354 | |
PRINT_RET "Keep your hands to yourself!" | |
L0354: JE Gef,#02 [FALSE] L0355 | |
PRINT_RET "You feel nothing unexpected." | |
L0355: JE Gef,#03 [FALSE] L0356 | |
PRINT_RET "If you think that'll help." | |
L0356: RTRUE | |
L0357: JE Ge9,#38 [FALSE] L0358 | |
PRINT_PADDR S092 | |
NEW_LINE | |
RTRUE | |
L0358: JE Ge9,#39 [FALSE] L0359 | |
PRINT "Cutting " | |
CALL_2N R0009 (L01) | |
PRINT_RET " up would achieve little." | |
L0359: JE Ge9,#3a [FALSE] L0360 | |
PRINT_PADDR S093 | |
NEW_LINE | |
RTRUE | |
L0360: JE Ge9,#3b,#3c [FALSE] L0361 | |
PRINT_PADDR S094 | |
NEW_LINE | |
RTRUE | |
L0361: JE Ge9,#3d [FALSE] L0362 | |
PRINT_PADDR S095 | |
NEW_LINE | |
RTRUE | |
L0362: JE Ge9,#3e [FALSE] L0363 | |
PRINT_PADDR S096 | |
NEW_LINE | |
RTRUE | |
L0363: JE Ge9,#3f [FALSE] L0364 | |
PRINT_RET "Oh, don't apologise." | |
L0364: JE Ge9,#40 [FALSE] L0365 | |
PRINT_PADDR S097 | |
NEW_LINE | |
RTRUE | |
L0365: JE Ge9,#41 [FALSE] L0366 | |
PRINT_RET "Quite." | |
L0366: JE Ge9,#42 [FALSE] L0367 | |
PRINT_PADDR S098 | |
NEW_LINE | |
RTRUE | |
L0367: JE Ge9,#43 [FALSE] L0368 | |
PRINT_PADDR S099 | |
NEW_LINE | |
RTRUE | |
L0368: JE Ge9,#44 [FALSE] L0369 | |
PRINT_PADDR S100 | |
NEW_LINE | |
RTRUE | |
L0369: JE Ge9,#45 [FALSE] L0370 | |
PRINT "You can't usefully blow " | |
CALL_2N R0009 (L01) | |
PRINT_RET "." | |
L0370: JE Ge9,#46 [FALSE] L0371 | |
PRINT_RET "You achieve nothing by this." | |
L0371: JE Ge9,#47 [FALSE] L0372 | |
PRINT "No, you can't set " | |
CALL_2N R0009 (L01) | |
PRINT_RET "." | |
L0372: JE Ge9,#48 [FALSE] L0373 | |
PRINT "No, you can't set " | |
CALL_2N R0009 (L01) | |
PRINT_RET " to anything." | |
L0373: JE Ge9,#49 [FALSE] L0374 | |
PRINT_RET "You wave, feeling foolish." | |
L0374: JE Ge9,#4a [FALSE] L0377 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0375 | |
PRINT "But you aren't holding " | |
CALL_2N R0009 (L01) | |
PRINT_RET "." | |
L0375: JE Gef,#02 [FALSE] L0376 | |
PRINT "You look ridiculous waving " | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0376: RTRUE | |
L0377: JE Ge9,#4b,#4c,#4d [FALSE] L0384 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0380 | |
TEST_ATTR L01,#1e [FALSE] L0378 | |
PRINT "Those are " | |
JUMP L0379 | |
L0378: PRINT "It is " | |
L0379: PRINT_RET "fixed in place." | |
L0380: JE Gef,#02 [FALSE] L0381 | |
PRINT_RET "You are unable to." | |
L0381: JE Gef,#03 [FALSE] L0382 | |
PRINT_RET "Nothing obvious happens." | |
L0382: JE Gef,#04 [FALSE] L0383 | |
PRINT_PADDR S101 | |
NEW_LINE | |
RTRUE | |
L0383: RTRUE | |
L0384: JE Ge9,#4e [FALSE] L0388 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0385 | |
PRINT_PADDR S102 | |
NEW_LINE | |
RTRUE | |
L0385: JE Gef,#02 [FALSE] L0386 | |
PRINT_RET "That's not a direction." | |
L0386: JE Gef,#03 [FALSE] L0387 | |
PRINT_RET "Not that way you can't." | |
L0387: RTRUE | |
L0388: JE Ge9,#4f [FALSE] L0391 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0389 | |
PRINT_RET "Keep your hands to yourself." | |
L0389: JE Gef,#02 [FALSE] L0390 | |
PRINT_RET "You achieve nothing by this." | |
L0390: RTRUE | |
L0391: JE Ge9,#50 [FALSE] L0394 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0392 | |
PRINT_RET "Futile." | |
L0392: JE Gef,#02 [FALSE] L0393 | |
PRINT_PADDR S103 | |
NEW_LINE | |
RTRUE | |
L0393: RTRUE | |
L0394: JE Ge9,#51 [FALSE] L0397 | |
STORE Gef,L00 | |
JE Gef,#01 [FALSE] L0395 | |
PRINT_RET "You talk to yourself a while." | |
L0395: JE Gef,#02 [FALSE] L0396 | |
PRINT_RET "This provokes no reaction." | |
L0396: RTRUE | |
L0397: JE Ge9,#52,#53 [FALSE] L0398 | |
PRINT_RET "There is no reply." | |
L0398: JE Ge9,#54 [FALSE] L0399 | |
PRINT_RET "Nothing is on sale." | |
L0399: JE Ge9,#55 [FALSE] L0400 | |
PRINT_RET "Your singing is abominable." | |
L0400: JE Ge9,#56 [FALSE] L0401 | |
PRINT_PADDR S104 | |
NEW_LINE | |
RTRUE | |
L0401: JE Ge9,#57 [FALSE] L0402 | |
PRINT_RET "Time passes." | |
L0402: JE Ge9,#58 [FALSE] L0403 | |
PRINT_PADDR S105 | |
NEW_LINE | |
RTRUE | |
L0403: JE Ge9,#59 [FALSE] L0404 | |
PRINT_PADDR S106 | |
CALL_2N R0105 (L01) | |
PRINT_RET "." | |
L0404: RTRUE | |
Routine R0015, 0 locals | |
CALL_VS R0224 (#1007,#11) -> -(SP) | |
RET_POPPED | |
Routine R0016, 0 locals | |
CALL_VS R0224 (#1007,#12) -> -(SP) | |
RET_POPPED | |
Routine R0017, 0 locals | |
CALL_VS R0224 (#1007,#13) -> -(SP) | |
RET_POPPED | |
Routine R0018, 1 local | |
JE L00,#0f [FALSE] L0001 | |
STORE G59,#01 | |
STORE G5a,#0f | |
RTRUE | |
L0001: LOADB L00,#00 -> -(SP) | |
AND (SP)+,#0f -> G59 | |
ADD L00,#01 -> -(SP) | |
LOADW (SP)+,#00 -> G5a | |
RTRUE | |
Routine R0019, 2 locals | |
STORE L01,#00 | |
L0001: JL L01,#20 [FALSE] L0002 | |
STOREW #10c6,L01,#0f | |
STOREW #1046,L01,#01 | |
STOREW #1086,L01,#0f | |
INC L01 | |
JUMP L0001 | |
L0002: LOADB L00,#01 -> -(SP) | |
LOADB L00,#00 -> -(SP) | |
MUL #0100,(SP)+ -> -(SP) | |
ADD (SP)+,(SP)+ -> G56 | |
AND G56,#0400 -> -(SP) | |
JZ (SP)+ [FALSE] L0003 | |
PUSH #00 | |
JUMP L0004 | |
L0003: PUSH #01 | |
L0004: PULL G57 | |
AND G56,#03ff -> G56 | |
DEC L00 | |
STORE G52,#00 | |
STORE L01,#00 | |
L0005: ADD L00,#03 -> L00 | |
LOADB L00,#00 -> -(SP) | |
JE (SP)+,#0f [FALSE] L0006 | |
JUMP L0008 | |
L0006: STOREW #10c6,L01,L00 | |
CALL_2N R0018 (L00) | |
JE G59,#02 [TRUE] L0007 | |
INC G52 | |
L0007: STOREW #1046,L01,G59 | |
STOREW #1086,L01,G5a | |
INC L01 | |
JUMP L0005 | |
L0008: ADD L00,#01 -> -(SP) | |
RET_POPPED | |
Routine R0020, 2 locals | |
LOADB L00,#01 -> -(SP) | |
ADD #02,(SP)+ -> -(SP) | |
STOREB L00,(SP)+,#00 | |
TOKENISE L00,L01 | |
RTRUE | |
Routine R0021, 1 local | |
CALL_2N R0023 (L00) | |
RFALSE | |
Routine R0022, 8 locals | |
CALL_1N R0094 | |
L0001: STORE L03,#00 | |
L0002: JL L03,#40 [FALSE] L0003 | |
LOADB L00,L03 -> -(SP) | |
STOREB #1473,L03,(SP)+ | |
INC L03 | |
JUMP L0002 | |
L0003: STOREB L00,#00,#78 | |
STOREB L01,#00,#0f | |
CALL_2N R0224 (#1008) | |
CALL_1N R0381 | |
STORE Gef,#00 | |
STORE Gec,L00 | |
STOREB Gec,#01,#00 | |
CALL_1N R0231 | |
READ Gec,L01 -> Gef | |
LOADB L01,#01 -> L02 | |
JZ L02 [FALSE] L0004 | |
CALL_VN R0224 (#1007,#0a) | |
JUMP L0001 | |
L0004: LOADW L01,#01 -> L04 | |
JE L04,"oops","o","oops" [FALSE] L0005 | |
JUMP L0010 | |
L0005: JE L04,"undo","undo","undo" [FALSE] L0006 | |
LOADB #12ff,#01 -> -(SP) | |
JE (SP)+,#01 [FALSE] L0006 | |
PRINT_PADDR S107 | |
NEW_LINE | |
RTRUE | |
L0006: SAVE_UNDO -> L03 | |
STORE G0d,#00 | |
STORE G0c,#02 | |
JE L03,#ffff [FALSE] L0007 | |
STORE G0c,#00 | |
L0007: JZ L03 [FALSE] L0008 | |
STORE G0c,#01 | |
L0008: JE L03,#02 [FALSE] L0009 | |
SET_TEXT_STYLE BOLDFACE | |
CALL_2N R0107 (G07) | |
PRINT " | |
" | |
SET_TEXT_STYLE ROMAN | |
CALL_VN R0224 (#1007,#0d) | |
STORE G0d,#01 | |
JUMP L0001 | |
L0009: RET L02 | |
L0010: JZ G81 [FALSE] L0011 | |
CALL_VN R0224 (#1007,#0e) | |
JUMP L0001 | |
L0011: JE L02,#01 [FALSE] L0012 | |
CALL_VN R0224 (#1007,#0f) | |
JUMP L0001 | |
L0012: JG L02,#02 [FALSE] L0013 | |
CALL_VN R0224 (#1007,#10) | |
JUMP L0001 | |
L0013: STORE L03,#00 | |
L0014: JG L03,#78 [TRUE] L0015 | |
LOADB L00,L03 -> -(SP) | |
STOREB #1340,L03,(SP)+ | |
INC L03 | |
JUMP L0014 | |
L0015: LOADB L01,#09 -> L06 | |
LOADB L01,#08 -> L07 | |
STORE L03,#00 | |
L0016: JL L03,#40 [FALSE] L0017 | |
LOADB #1473,L03 -> -(SP) | |
STOREB L00,L03,(SP)+ | |
INC L03 | |
JUMP L0016 | |
L0017: CALL_VN R0020 (L00,L01) | |
MUL #04,G81 -> -(SP) | |
ADD (SP)+,#01 -> -(SP) | |
LOADB L01,(SP)+ -> L04 | |
MUL #04,G81 -> -(SP) | |
LOADB L01,(SP)+ -> L05 | |
STORE L03,#00 | |
L0018: JL L03,L05 [FALSE] L0019 | |
ADD L03,L04 -> -(SP) | |
STOREB L00,(SP)+,#20 | |
INC L03 | |
JUMP L0018 | |
L0019: JL L05,L07 [FALSE] L0022 | |
STORE L03,#78 | |
L0020: ADD L04,L07 -> -(SP) | |
JL L03,(SP)+ [TRUE] L0021 | |
SUB L03,L07 -> -(SP) | |
ADD (SP)+,L05 -> -(SP) | |
LOADB L00,(SP)+ -> -(SP) | |
STOREB L00,L03,(SP)+ | |
DEC L03 | |
JUMP L0020 | |
L0021: SUB L07,L05 -> -(SP) | |
LOADB L00,#01 -> -(SP) | |
ADD (SP)+,(SP)+ -> -(SP) | |
STOREB L00,#01,(SP)+ | |
L0022: STORE L03,#00 | |
L0023: JL L03,L07 [FALSE] L0024 | |
ADD L03,L06 -> -(SP) | |
LOADB #1340,(SP)+ -> -(SP) | |
ADD L03,L04 -> -(SP) | |
STOREB L00,(SP)+,(SP)+ | |
INC L03 | |
JUMP L0023 | |
L0024: CALL_VN R0020 (L00,L01) | |
LOADB L01,#01 -> L02 | |
RET L02 | |
Routine R0023, 11 locals | |
JE G46,#01 [FALSE] L0003 | |
STORE L05,#00 | |
L0001: JL L05,#08 [FALSE] L0002 | |
LOADW #0fa6,L05 -> -(SP) | |
STOREW L00,L05,(SP)+ | |
INC L05 | |
JUMP L0001 | |
L0002: STORE G46,#00 | |
RTRUE | |
L0003: JE G83,#01 [FALSE] L0004 | |
STORE G83,#00 | |
CALL_VN R0020 (#1286,#12ff) | |
JUMP L0005 | |
L0004: CALL_VN R0022 (#1286,#12ff) | |
L0005: STORE G3b,#01 | |
LOADB #12ff,#01 -> G7d | |
STORE G7c,#01 | |
CALL_1N R0003 | |
CALL_VN R0020 (#1286,#12ff) | |
CALL_1N R0410 | |
LOADB #12ff,#01 -> G7d | |
STORE L07,#00 | |
STORE G7f,#01 | |
STORE G3c,G19 | |
CALL_2S R0024 (G19) -> G3d | |
STORE G80,#00 | |
L0006: STORE G72,#00 | |
STORE G56,#ffff | |
L0007: STORE G7c,G7f | |
CALL_1S R0058 -> G7e | |
JE G7e,#ffff [FALSE] L0008 | |
STORE G4a,#01 | |
JUMP L0078 | |
L0008: JE G7e,"g","again" [FALSE] L0009 | |
STORE G7e,"again" | |
L0009: JE G7e,"again" [FALSE] L0014 | |
JE G3c,G19 [TRUE] L0010 | |
CALL_VN R0224 (#1007,#14) | |
JUMP L0004 | |
L0010: LOADB #13fa,#01 -> -(SP) | |
JZ (SP)+ [FALSE] L0011 | |
CALL_VN R0224 (#1007,#15) | |
JUMP L0004 | |
L0011: STORE L05,#00 | |
L0012: JL L05,#78 [FALSE] L0013 | |
LOADB #13fa,L05 -> -(SP) | |
STOREB #1286,L05,(SP)+ | |
INC L05 | |
JUMP L0012 | |
L0013: JUMP L0005 | |
L0014: JE G7e,"again" [TRUE] L0016 | |
STORE L05,#00 | |
L0015: JL L05,#78 [FALSE] L0016 | |
LOADB #1286,L05 -> -(SP) | |
STOREB #13fa,L05,(SP)+ | |
INC L05 | |
JUMP L0015 | |
L0016: JZ G80 [FALSE] L0021 | |
CALL_VS R0088 (G3c,#1c) -> L05 | |
JL L05,#00 [FALSE] L0017 | |
STORE G80,G7f | |
SUB #00,L05 -> L05 | |
L0017: JE L05,#01 [FALSE] L0018 | |
STOREW L00,#00,G2f | |
STOREW L00,#01,G32 | |
STOREW L00,#02,G33 | |
RTRUE | |
L0018: JZ L05 [TRUE] L0019 | |
STORE G7e,L05 | |
DEC G7c | |
DEC G7f | |
JUMP L0020 | |
L0019: STORE G7c,G7f | |
CALL_1S R0057 -> G7e | |
L0020: JUMP L0022 | |
L0021: STORE G80,#00 | |
L0022: JZ G7e [TRUE] L0023 | |
LOADB G7e,#06 -> -(SP) | |
AND (SP)+,#01 -> -(SP) | |
JZ (SP)+ [FALSE] L0037 | |
L0023: STORE G7c,G7f | |
STORE G62,#00 | |
STORE G5b,#00 | |
CALL_VS R0030 (#06,#00,#00) -> L09 | |
JE L09,#2710 [FALSE] L0024 | |
JUMP L0005 | |
L0024: JZ L09 [TRUE] L0025 | |
STOREW L00,#00,#1b | |
STOREW L00,#01,#01 | |
STOREW L00,#02,L09 | |
JUMP L0105 | |
L0025: JE G3c,G19 [FALSE] L0029 | |
STORE L06,#02 | |
L0026: JG L06,G7d [TRUE] L0028 | |
CALL_1S R0057 -> L05 | |
JE L05,"comma," [FALSE] L0027 | |
JUMP L0030 | |
L0027: INC L06 | |
JUMP L0026 | |
L0028: CALL_2S R0413 (G7e) -> G7e | |
JZ G7e [TRUE] L0029 | |
JUMP L0037 | |
L0029: STORE G4a,#0c | |
JUMP L0078 | |
L0030: SUB G7c,#01 -> L06 | |
JE L06,#01 [FALSE] L0031 | |
CALL_VN R0224 (#1007,#16) | |
JUMP L0004 | |
L0031: STORE G7c,#01 | |
STORE G5d,#01 | |
STORE G71,#01 | |
CALL_VS R0030 (G19,G3d,#06) -> L09 | |
STORE G71,#00 | |
JE L09,#2710 [FALSE] L0032 | |
JUMP L0005 | |
L0032: JZ L09 [FALSE] L0033 | |
CALL_VN R0224 (#1007,#17) | |
JUMP L0004 | |
L0033: TEST_ATTR L09,#00 [TRUE] L0034 | |
TEST_ATTR L09,#16 [TRUE] L0034 | |
CALL_VN R0224 (#1007,#18,L09) | |
JUMP L0004 | |
L0034: JE G7c,L06 [TRUE] L0035 | |
CALL_VN R0224 (#1007,#19) | |
JUMP L0004 | |
L0035: CALL_2N R0073 (L09) | |
ADD L06,#01 -> G7f | |
JE L09,G19 [FALSE] L0036 | |
STORE G7c,G7f | |
CALL_1S R0058 -> -(SP) | |
JE (SP)+,"again","g","again" [FALSE] L0036 | |
CALL_VN R0224 (#1007,#14) | |
JUMP L0004 | |
L0036: STORE G3c,L09 | |
CALL_2S R0024 (L09) -> G3d | |
JUMP L0007 | |
L0037: LOADB G7e,#06 -> -(SP) | |
AND (SP)+,#02 -> -(SP) | |
DIV (SP)+,#02 -> G3e | |
JE G3e,#01 [FALSE] L0038 | |
JE G3c,G19 [TRUE] L0038 | |
STORE G4a,#0c | |
STORE G3e,#00 | |
JUMP L0078 | |
L0038: LOADB G7e,#07 -> -(SP) | |
SUB #ff,(SP)+ -> L05 | |
LOADW #00,#07 -> -(SP) | |
LOADW (SP)+,L05 -> L01 | |
LOADB L01,#00 -> -(SP) | |
SUB (SP)+,#01 -> L03 | |
STORE G6d,#ffff | |
STORE G6e,#ffff | |
STORE G4a,#01 | |
STORE G4b,#01 | |
ADD L01,#01 -> L04 | |
STORE L02,#00 | |
L0039: JG L02,L03 [TRUE] L0078 | |
STORE L05,#00 | |
L0040: JL L05,#20 [FALSE] L0041 | |
STOREW #10c6,L05,#0f | |
STOREW #1046,L05,#01 | |
STOREW #1086,L05,#0f | |
INC L05 | |
JUMP L0040 | |
L0041: CALL_2S R0019 (L04) -> L04 | |
STORE G48,#00 | |
STORE G53,#00 | |
STORE G4e,#00 | |
STORE G4f,#00 | |
STORE G41,#00 | |
STORE G42,#00 | |
STOREW #0f26,#00,#00 | |
STORE G61,#00 | |
STORE G49,#01 | |
ADD G7f,#01 -> G7c | |
STORE G58,#ffff | |
STORE G62,#00 | |
STORE L05,#00 | |
STORE L0a,#00 | |
STORE G4c,#00 | |
L0042: LOADW #10c6,G4c -> -(SP) | |
JE (SP)+,#0f [TRUE] L0052 | |
STORE G72,#00 | |
LOADW #1046,G4c -> -(SP) | |
JE (SP)+,#02 [TRUE] L0043 | |
INC L05 | |
L0043: LOADW #1046,G4c -> -(SP) | |
JE (SP)+,#01 [FALSE] L0051 | |
LOADW #1086,G4c -> -(SP) | |
JE (SP)+,#02 [FALSE] L0044 | |
STORE L0a,#01 | |
L0044: LOADW #1086,G4c -> -(SP) | |
JE (SP)+,#04,#05 [FALSE] L0051 | |
JE L05,#01 [FALSE] L0051 | |
INC G4c | |
LOADW #1046,G4c -> -(SP) | |
JE (SP)+,#02 [FALSE] L0050 | |
L0045: LOADW #1046,G4c -> -(SP) | |
JE (SP)+,#02 [FALSE] L0046 | |
INC G4c | |
JUMP L0045 | |
L0046: LOADW #1046,G4c -> -(SP) | |
JE (SP)+,#01 [FALSE] L0050 | |
LOADW #1086,G4c -> -(SP) | |
JZ (SP)+ [FALSE] L0050 | |
L0047: JG G7c,G7d [TRUE] L0050 | |
SUB G4c,#01 -> -(SP) | |
LOADW #1086,(SP)+ -> -(SP) | |
CALL_1S R0057 -> -(SP) | |
JE (SP)+,(SP)+ [FALSE] L0049 | |
CALL_VS R0030 (G3d,G3c,#00) -> L09 | |
JE L09,#2710 [FALSE] L0048 | |
JUMP L0005 | |
L0048: JL L09,#02 [TRUE] L0049 | |
STORE G58,L09 | |
L0049: JUMP L0047 | |
L0050: JUMP L0052 | |
L0051: INC G4c | |
JUMP L0042 | |
L0052: STORE G6b,#00 | |
JZ L0a [TRUE] L0053 | |
JE G52,#01 [FALSE] L0053 | |
JE G56,#0f [FALSE] L0053 | |
STORE G6b,#01 | |
L0053: STORE G48,#00 | |
STORE G53,#00 | |
STORE G4e,#00 | |
STORE G4f,#00 | |
STORE G41,#00 | |
STORE G42,#00 | |
STOREW #0f26,#00,#00 | |
STORE G49,#01 | |
ADD G7f,#01 -> G7c | |
STORE G4c,#01 | |
L0054: STOREW #0fc6,G4c,#ffff | |
STORE G72,#00 | |
SUB G4c,#01 -> -(SP) | |
LOADW #10c6,(SP)+ -> L08 | |
LOADW #10c6,G4c -> G5d | |
JE L08,#0f [TRUE] L0057 | |
STORE G71,#00 | |
SUB G4c,#01 -> -(SP) | |
CALL_VS R0029 (L00,(SP)+) -> L09 | |
STORE G71,#00 | |
JE L09,#2710 [FALSE] L0055 | |
JUMP L0005 | |
L0055: JZ L09 [FALSE] L0056 | |
JUMP L0074 | |
L0056: JUMP L0073 | |
L0057: JG G7c,G7d [TRUE] L0062 | |
CALL_1S R0057 -> L09 | |
JE L09,"then","then","then" [TRUE] L0058 | |
JE L09,"comma," [FALSE] L0059 | |
L0058: STORE G83,#01 | |
SUB G7c,#01 -> G84 | |
JUMP L0062 | |
L0059: STORE L0a,#00 | |
L0060: JL L0a,#20 [FALSE] L0061 | |
LOADW #0fc6,L0a -> -(SP) | |
STOREW #1006,L0a,(SP)+ | |
INC L0a | |
JUMP L0060 | |
L0061: STORE G4d,G4c | |
STORE G49,#02 | |
JUMP L0074 | |
L0062: JL G4e,#01 [TRUE] L0063 | |
LOADW L00,#02 -> -(SP) | |
JZ (SP)+ [FALSE] L0063 | |
LOADW L00,#03 -> -(SP) | |
CALL_2S R0032 ((SP)+) -> L09 | |
JZ L09 [TRUE] L0063 | |
STORE G49,L09 | |
JUMP L0074 | |
L0063: JL G4e,#02 [TRUE] L0064 | |
LOADW L00,#03 -> -(SP) | |
JZ (SP)+ [FALSE] L0064 | |
LOADW L00,#02 -> -(SP) | |
CALL_2S R0032 ((SP)+) -> L09 | |
JZ L09 [TRUE] L0064 | |
STORE G49,L09 | |
JUMP L0074 | |
L0064: JE G6b,#02 [FALSE] L0065 | |
LOADW L00,#02 -> -(SP) | |
JE (SP)+,G3c [FALSE] L0065 | |
STORE G4a,#11 | |
JUMP L0078 | |
L0065: STORE G81,#00 | |
JZ G53 [TRUE] L0066 | |
PRINT "(" | |
CALL_2N R0037 (G53) | |
PRINT ") | |
" | |
L0066: STOREW L00,#00,G56 | |
STOREW L00,#01,G4e | |
JZ G57 [TRUE] L0067 | |
JE G4e,#02 [FALSE] L0067 | |
LOADW L00,#02 -> L05 | |
LOADW L00,#03 -> -(SP) | |
STOREW L00,#02,(SP)+ | |
STOREW L00,#03,L05 | |
JE G4f,#02 [FALSE] L0067 | |
STORE L05,G50 | |
STORE G50,G51 | |
STORE G51,L05 | |
L0067: JG G4e,#00 [FALSE] L0068 | |
LOADW L00,#02 -> -(SP) | |
JL (SP)+,#02 [TRUE] L0068 | |
LOADW L00,#02 -> -(SP) | |
CALL_2N R0073 ((SP)+) | |
L0068: JZ G48 [TRUE] L0071 | |
JE G3c,G19 [FALSE] L0071 | |
STORE G46,#01 | |
STORE L05,#00 | |
L0069: JL L05,#08 [FALSE] L0070 | |
LOADW L00,L05 -> -(SP) | |
STOREW #0fa6,L05,(SP)+ | |
INC L05 | |
JUMP L0069 | |
L0070: STOREW L00,#00,#0f | |
STOREW L00,#01,#01 | |
STOREW L00,#02,G48 | |
CALL_VN R0224 (#1007,#1a,G48) | |
L0071: JE G83,#01 [FALSE] L0072 | |
STORE G7c,G84 | |
JUMP L0105 | |
L0072: RTRUE | |
L0073: INC G4c | |
JUMP L0054 | |
L0074: JG G49,G4a [FALSE] L0075 | |
STORE G4a,G49 | |
L0075: JE G49,#12 [TRUE] L0076 | |
JG G49,G4b [FALSE] L0076 | |
STORE G4b,G49 | |
L0076: JE G6b,#02 [FALSE] L0077 | |
JE G49,#11 [FALSE] L0077 | |
JUMP L0078 | |
L0077: INC L02 | |
JUMP L0039 | |
L0078: STORE G49,G4a | |
JE G3c,G19 [TRUE] L0081 | |
JG G80,#00 [FALSE] L0079 | |
STORE G7f,G80 | |
JUMP L0006 | |
L0079: STORE G7c,G7f | |
CALL_1S R0057 -> G41 | |
JE G41,"comma," [FALSE] L0080 | |
CALL_1S R0057 -> G41 | |
INC G7f | |
L0080: CALL_2S R0061 (G7f) -> G42 | |
STOREW L00,#00,#1009 | |
STOREW L00,#01,#02 | |
STOREW L00,#02,#01 | |
STORE G50,G41 | |
STOREW L00,#03,G3c | |
STORE G44,G7f | |
SUB G7d,G44 -> -(SP) | |
ADD (SP)+,#01 -> G45 | |
RTRUE | |
L0081: CALL_2S R0227 (G49) -> -(SP) | |
JZ (SP)+ [TRUE] L0082 | |
JUMP L0004 | |
L0082: STORE G6d,G6f | |
STORE G6e,G70 | |
JE G49,#01 [FALSE] L0083 | |
CALL_VN R0224 (#1007,#1b) | |
STORE G81,#01 | |
L0083: JE G49,#02 [FALSE] L0086 | |
CALL_VN R0224 (#1007,#1c) | |
STORE L0a,#00 | |
L0084: JL L0a,#20 [FALSE] L0085 | |
LOADW #1006,L0a -> -(SP) | |
STOREW #0fc6,L0a,(SP)+ | |
INC L0a | |
JUMP L0084 | |
L0085: STORE G4c,G4d | |
CALL_2N R0037 (#00) | |
PRINT ". | |
" | |
L0086: JE G49,#03 [FALSE] L0087 | |
CALL_VN R0224 (#1007,#1d) | |
L0087: JE G49,#04 [FALSE] L0088 | |
CALL_VN R0224 (#1007,#1e) | |
STORE G81,G82 | |
L0088: JE G49,#05 [FALSE] L0089 | |
CALL_VN R0224 (#1007,#1f) | |
L0089: JE G49,#06 [FALSE] L0090 | |
CALL_VN R0224 (#1007,#20) | |
STORE G81,G82 | |
L0090: JE G49,#07 [FALSE] L0091 | |
CALL_VN R0224 (#1007,#21) | |
L0091: JE G49,#08 [FALSE] L0092 | |
CALL_VN R0224 (#1007,#22) | |
L0092: JE G49,#09 [FALSE] L0093 | |
CALL_VN R0224 (#1007,#23) | |
L0093: JE G49,#0a [FALSE] L0094 | |
CALL_VN R0224 (#1007,#24) | |
L0094: JE G49,#0b [FALSE] L0095 | |
CALL_VN R0224 (#1007,#25) | |
L0095: JE G49,#0c [FALSE] L0096 | |
CALL_VN R0224 (#1007,#26) | |
L0096: JE G49,#0d [FALSE] L0097 | |
CALL_VN R0224 (#1007,#27) | |
L0097: JE G49,#0e [FALSE] L0099 | |
JE G6e,#ffff [FALSE] L0098 | |
CALL_VN R0224 (#1007,#23) | |
JUMP L0099 | |
L0098: CALL_VN R0224 (#1007,#28) | |
L0099: JE G49,#0f [FALSE] L0100 | |
CALL_VN R0224 (#1007,#29) | |
L0100: JE G49,#10 [FALSE] L0101 | |
CALL_VN R0224 (#1007,#2a,G60) | |
L0101: JE G49,#11 [FALSE] L0103 | |
JE G5f,#64 [FALSE] L0102 | |
CALL_VN R0224 (#1007,#2b) | |
JUMP L0103 | |
L0102: CALL_VN R0224 (#1007,#2c) | |
L0103: JE G49,#12 [FALSE] L0104 | |
STORE G74,#03 | |
CALL_1S G73 -> -(SP) | |
JE (SP)+,#ffff [FALSE] L0104 | |
STORE G4a,G4b | |
JUMP L0078 | |
L0104: JUMP L0004 | |
L0105: JG G7c,G7d [TRUE] RTRUE | |
CALL_1S R0057 -> L05 | |
JE L05,"then","then","then" [TRUE] L0106 | |
JE L05,"comma," [FALSE] L0113 | |
L0106: JG G7c,G7d [FALSE] L0107 | |
STORE G83,#00 | |
RTRUE | |
L0107: CALL_2S R0059 (G7f) -> L05 | |
CALL_2S R0059 (G7c) -> L06 | |
L0108: JL L05,L06 [FALSE] L0109 | |
STOREB L05,#00,#20 | |
INC L05 | |
JUMP L0108 | |
L0109: CALL_1S R0057 -> L05 | |
JE L05,"again","g","again" [FALSE] L0112 | |
SUB G7c,#02 -> -(SP) | |
CALL_2S R0059 ((SP)+) -> -(SP) | |
SUB (SP)+,#1286 -> L05 | |
JG G7c,G7d [FALSE] L0110 | |
STORE L06,#77 | |
JUMP L0111 | |
L0110: CALL_2S R0059 (G7c) -> -(SP) | |
SUB (SP)+,#1286 -> L06 | |
L0111: JL L05,L06 [FALSE] L0112 | |
STOREB #13fa,L05,#20 | |
INC L05 | |
JUMP L0111 | |
L0112: CALL_VN R0020 (#1286,#12ff) | |
STORE G83,#01 | |
RTRUE | |
L0113: STORE G4a,#02 | |
JUMP L0078 | |
Routine R0024, 2 locals | |
GET_PARENT L00 -> L01 | |
JZ L01 [FALSE] L0001 | |
RET L00 | |
L0001: JE L00,G19 [FALSE] L0002 | |
JE G07,#13 [FALSE] L0002 | |
RET #13 | |
L0002: GET_PARENT L01 -> -(SP) | |
JZ (SP)+ [TRUE] L0004 | |
TEST_ATTR L01,#17 [TRUE] L0003 | |
TEST_ATTR L01,#14 [TRUE] L0003 | |
TEST_ATTR L01,#04 [FALSE] L0004 | |
TEST_ATTR L01,#0e [FALSE] L0004 | |
L0003: GET_PARENT L01 -> L01 | |
JUMP L0002 | |
L0004: RET L01 | |
Routine R0025, 0 locals | |
STORE G62,#00 | |
STORE G63,#00 | |
STORE G64,#00 | |
STORE G65,#00 | |
STORE G68,#00 | |
STORE G66,#00 | |
STORE G67,#0fff | |
STORE G69,#00 | |
RTRUE | |
Routine R0026, 7 locals | |
CALL_1N R0025 | |
JG G7c,G7d [FALSE] L0001 | |
RFALSE | |
L0001: STORE L03,#01 | |
L0002: JZ L03 [TRUE] L0019 | |
CALL_1S R0058 -> L01 | |
STORE L03,#00 | |
STORE L02,#01 | |
JUMP L0004 | |
L0003: ADD L02,#04 -> L02 | |
L0004: LOADW #14e5,#00 -> -(SP) | |
JG L02,(SP)+ [TRUE] L0011 | |
LOADW #14e5,L02 -> -(SP) | |
JE L01,(SP)+ [FALSE] L0010 | |
STORE L03,#01 | |
ADD L02,#02 -> -(SP) | |
LOADW #14e5,(SP)+ -> L05 | |
JE L05,#0101 [TRUE] L0005 | |
STORE G62,#01 | |
L0005: STORE G68,#01 | |
ADD L02,#01 -> -(SP) | |
LOADW #14e5,(SP)+ -> -(SP) | |
AND G67,(SP)+ -> G67 | |
JE L05,#0100 [FALSE] L0008 | |
ADD L02,#03 -> -(SP) | |
LOADW #14e5,(SP)+ -> L04 | |
STORE Gef,L04 | |
JE Gef,#00 [FALSE] L0006 | |
OR G63,#02 -> G63 | |
JUMP L0008 | |
L0006: JE Gef,#01 [FALSE] L0007 | |
OR G63,#04 -> G63 | |
JUMP L0008 | |
L0007: CALL_2S R0070 (L04) -> G66 | |
JE G66,#ffff [FALSE] L0008 | |
STORE G66,#15 | |
L0008: JE L05,#09 [FALSE] L0009 | |
OR G63,#10 -> G63 | |
L0009: JE L05,#fff7 [FALSE] L0010 | |
OR G63,#20 -> G63 | |
L0010: JUMP L0003 | |
L0011: JE L01,"another","other","other" [FALSE] L0012 | |
STORE G62,#01 | |
STORE L03,#01 | |
OR G63,#01 -> G63 | |
L0012: JE L01,"all","each","every" [TRUE] L0013 | |
JE L01,"everythin","both" [FALSE] L0015 | |
L0013: STORE G62,#01 | |
STORE L03,#01 | |
STORE G64,#64 | |
JE G6b,#01 [FALSE] L0014 | |
STORE G6b,#02 | |
L0014: OR G63,#08 -> G63 | |
L0015: JZ G6a [TRUE] L0017 | |
JZ L00 [TRUE] L0017 | |
CALL_2S R0109 (L01) -> L06 | |
JE L06,#01 [FALSE] L0016 | |
STORE G62,#01 | |
STORE L03,#01 | |
L0016: JG L06,#01 [FALSE] L0017 | |
STORE G65,#01 | |
STORE G62,#01 | |
STORE L03,#01 | |
STORE G64,L06 | |
SUB G7c,#01 -> G69 | |
OR G63,#08 -> G63 | |
L0017: JE L03,#01 [FALSE] L0018 | |
CALL_1S R0058 -> -(SP) | |
PULL Gef | |
JE Gef,"of","of","of" [TRUE] L0018 | |
JE Gef,"of" [TRUE] L0018 | |
DEC G7c | |
L0018: JUMP L0002 | |
L0019: DEC G7c | |
JG G64,#00 [FALSE] L0020 | |
JZ L00 [FALSE] L0020 | |
RET #07 | |
L0020: RFALSE | |
Routine R0027, 1 local | |
TEST_ATTR L00,#00 [TRUE] RTRUE | |
TEST_ATTR L00,#16 [FALSE] RFALSE | |
JE G56,#53,#52,#51 [TRUE] RTRUE | |
JE G56,#5a [TRUE] RTRUE | |
RFALSE | |
Routine R0028, 2 locals | |
LOADW #1086,L01 -> -(SP) | |
JE (SP)+,L00 [FALSE] L0001 | |
RET L00 | |
L0001: LOADW #10c6,L01 -> -(SP) | |
LOADB (SP)+,#00 -> -(SP) | |
AND (SP)+,#20 -> -(SP) | |
JZ (SP)+ [FALSE] L0002 | |
RET #ffff | |
L0002: LOADW #1086,L01 -> -(SP) | |
JE (SP)+,L00 [FALSE] L0003 | |
RET L00 | |
L0003: INC L01 | |
LOADW #10c6,L01 -> -(SP) | |
JE (SP)+,#0f [TRUE] L0004 | |
LOADW #10c6,L01 -> -(SP) | |
LOADB (SP)+,#00 -> -(SP) | |
AND (SP)+,#10 -> -(SP) | |
JZ (SP)+ [FALSE] L0002 | |
L0004: RET #ffff | |
Routine R0029, 13 locals | |
LOADW #10c6,L01 -> L02 | |
CALL_2N R0018 (L02) | |
STORE G5b,#00 | |
STORE G3b,#01 | |
STORE Gef,G59 | |
JE Gef,#01 [FALSE] L0020 | |
STORE Gef,G5a | |
JE Gef,#07 [FALSE] L0004 | |
CALL_2S R0061 (G7c) -> L03 | |
CALL_1S R0057 -> G41 | |
JE L03,#fc18 [FALSE] L0001 | |
STORE L03,G41 | |
L0001: STORE G42,L03 | |
JZ G4f [FALSE] L0002 | |
STORE G50,L03 | |
JUMP L0003 | |
L0002: STORE G51,L03 | |
L0003: INC G4f | |
STORE L09,#01 | |
JUMP L0077 | |
L0004: JE Gef,#08 [FALSE] L0008 | |
PUSH G7c | |
INC G7c | |
CALL_2S R0061 ((SP)+) -> L03 | |
JE L03,#fc18 [FALSE] L0005 | |
STORE G49,#03 | |
RFALSE | |
L0005: PUSH G4f | |
INC G4f | |
JZ (SP)+ [FALSE] L0006 | |
STORE G50,L03 | |
JUMP L0007 | |
L0006: STORE G51,L03 | |
L0007: STORE L09,#01 | |
JUMP L0077 | |
L0008: JE Gef,#06 [FALSE] L0011 | |
JE G56,#52,#53,#5a [TRUE] L0009 | |
JE G56,#51 [FALSE] L0010 | |
L0009: STORE G71,#01 | |
L0010: JUMP L0019 | |
L0011: JE Gef,#09 [FALSE] L0019 | |
STORE G44,G7c | |
ADD L01,#01 -> -(SP) | |
LOADW #1046,(SP)+ -> -(SP) | |
JE (SP)+,#02 [TRUE] L0012 | |
ADD L01,#01 -> -(SP) | |
LOADW #10c6,(SP)+ -> -(SP) | |
JE (SP)+,#0f [TRUE] L0012 | |
CALL_2N R0116 (#0d) | |
L0012: CALL_1S R0058 -> L04 | |
JE L04,#ffff [TRUE] L0013 | |
ADD L01,#01 -> -(SP) | |
CALL_VS R0028 (L04,(SP)+) -> -(SP) | |
JE (SP)+,#ffff [TRUE] L0012 | |
L0013: DEC G7c | |
SUB G7c,G44 -> G45 | |
JZ G45 [FALSE] L0014 | |
RTRUE | |
L0014: JE G56,#53,#52,#51 [FALSE] L0018 | |
STORE L04,G7c | |
STORE G7c,G44 | |
CALL_1S R0057 -> G43 | |
JE G43,"the" [FALSE] L0015 | |
JG G45,#01 [FALSE] L0015 | |
CALL_1S R0057 -> G43 | |
L0015: STORE G7c,L04 | |
PUSH G4f | |
INC G4f | |
JZ (SP)+ [FALSE] L0016 | |
STORE G50,G43 | |
JUMP L0017 | |
L0016: STORE G51,G43 | |
L0017: STORE L09,#01 | |
JUMP L0077 | |
L0018: RTRUE | |
L0019: JUMP L0039 | |
L0020: JE Gef,#02 [FALSE] L0027 | |
LOADB L02,#00 -> -(SP) | |
AND (SP)+,#10 -> -(SP) | |
JZ (SP)+ [TRUE] L0021 | |
RTRUE | |
L0021: JG G7c,G7d [FALSE] L0024 | |
JZ G53 [FALSE] L0022 | |
JL G4e,G52 [FALSE] L0022 | |
STORE G53,G4c | |
STORE G54,L02 | |
CALL_2S R0064 (G5a) -> -(SP) | |
ADD #2710,(SP)+ -> -(SP) | |
STOREW #0fc6,G4c,(SP)+ | |
L0022: JZ G53 [FALSE] L0023 | |
RFALSE | |
L0023: CALL_2S R0064 (G5a) -> -(SP) | |
ADD #2710,(SP)+ -> -(SP) | |
STOREW #0fc6,G4c,(SP)+ | |
RTRUE | |
L0024: CALL_1S R0057 -> L04 | |
CALL_2S R0064 (L04) -> -(SP) | |
ADD #2710,(SP)+ -> -(SP) | |
STOREW #0fc6,G4c,(SP)+ | |
JE L04,G5a [FALSE] L0025 | |
RTRUE | |
L0025: CALL_VS R0028 (L04,L01) -> -(SP) | |
JE (SP)+,#ffff [TRUE] L0026 | |
RTRUE | |
L0026: RFALSE | |
L0027: JE Gef,#06 [FALSE] L0034 | |
CALL_1S G5a -> L03 | |
JL L03,#ff38 [FALSE] L0028 | |
ADD L03,#0100 -> G5a | |
JUMP L0039 | |
L0028: JL L03,#00 [TRUE] RFALSE | |
JZ L03 [FALSE] L0029 | |
DEC G52 | |
RTRUE | |
L0029: JE L03,#01 [FALSE] L0032 | |
JZ G4f [FALSE] L0030 | |
STORE G50,G43 | |
JUMP L0031 | |
L0030: STORE G51,G43 | |
L0031: INC G4f | |
L0032: JE L03,#2710 [FALSE] L0033 | |
RET L03 | |
L0033: STORE L09,L03 | |
JUMP L0077 | |
L0034: JE Gef,#05 [FALSE] L0037 | |
STORE G72,G5a | |
STORE G74,#01 | |
CALL_1S G72 -> L03 | |
JE L03,#01 [FALSE] L0035 | |
STORE G5a,#02 | |
JUMP L0036 | |
L0035: STORE G5a,#00 | |
L0036: JUMP L0039 | |
L0037: JE Gef,#04 [FALSE] L0038 | |
ADD #01,G5a -> G5b | |
STORE G5a,#00 | |
JUMP L0039 | |
L0038: JE Gef,#03 [FALSE] L0039 | |
STORE G5b,G5a | |
STORE G5a,#00 | |
L0039: STORE L02,G5a | |
STORE L0c,#00 | |
JE L02,#02,#03,#04 [TRUE] L0040 | |
JE L02,#05 [FALSE] L0041 | |
L0040: STORE L0c,#01 | |
L0041: STORE L0b,#00 | |
STORE L08,#01 | |
STORE G55,#00 | |
L0042: CALL_1S R0057 -> L04 | |
DEC G7c | |
STORE G6d,#ffff | |
STORE G6e,#ffff | |
CALL_2S R0070 (L04) -> L03 | |
JZ L03 [TRUE] L0047 | |
STORE G6d,L04 | |
STORE G6e,L03 | |
JE L03,#ffff [FALSE] L0047 | |
STORE L03,#01 | |
JUMP L0044 | |
L0043: ADD L03,#04 -> L03 | |
L0044: LOADW #14e5,#00 -> -(SP) | |
JG L03,(SP)+ [TRUE] L0046 | |
LOADW #14e5,L03 -> -(SP) | |
JE L04,(SP)+ [FALSE] L0045 | |
JUMP L0047 | |
L0045: JUMP L0043 | |
L0046: STORE G6f,G6d | |
STORE G70,G6e | |
STORE G49,#09 | |
RFALSE | |
L0047: JE L04,"me","myself","self" [FALSE] L0048 | |
STORE G6d,L04 | |
STORE G6e,G19 | |
L0048: STORE G6a,#01 | |
STORE L0a,G7c | |
L0049: CALL_2S R0026 (L0c) -> L03 | |
JZ L03 [TRUE] L0050 | |
STORE G49,L03 | |
RFALSE | |
L0050: STORE G81,G7c | |
JE L02,#01 [TRUE] L0065 | |
LOADW #0f26,#00 -> L05 | |
CALL_VS R0030 (G3d,G3c,L02) -> L03 | |
JE L03,#2710 [FALSE] L0051 | |
RET L03 | |
L0051: JZ L03 [FALSE] L0053 | |
JZ G68 [TRUE] L0052 | |
CALL_1N R0025 | |
STORE G7c,L0a | |
JUMP L0050 | |
L0052: CALL_1S R0038 -> G49 | |
JUMP L0080 | |
L0053: JE L03,#01 [FALSE] L0059 | |
JZ L0b [FALSE] L0054 | |
STORE L0b,#01 | |
JUMP L0058 | |
L0054: LOADW #0f26,#00 -> L07 | |
STOREW #0f26,#00,L05 | |
ADD L05,#01 -> L06 | |
L0055: JG L06,L07 [TRUE] L0058 | |
JZ L08 [TRUE] L0056 | |
LOADW #0f26,L06 -> -(SP) | |
CALL_2N R0039 ((SP)+) | |
JUMP L0057 | |
L0056: LOADW #0f26,L06 -> -(SP) | |
CALL_2N R0040 ((SP)+) | |
L0057: INC L06 | |
JUMP L0055 | |
L0058: JUMP L0064 | |
L0059: JZ G7a [FALSE] L0060 | |
JZ G68 [TRUE] L0060 | |
CALL_1N R0025 | |
STORE G7c,L0a | |
JUMP L0050 | |
L0060: JE L02,#06 [FALSE] L0061 | |
CALL_2S R0027 (L03) -> -(SP) | |
JZ (SP)+ [FALSE] L0061 | |
STORE G49,#0b | |
JUMP L0080 | |
L0061: JZ L0b [FALSE] L0062 | |
STORE L09,L03 | |
JUMP L0064 | |
L0062: JZ L08 [TRUE] L0063 | |
CALL_2N R0039 (L03) | |
JUMP L0064 | |
L0063: CALL_2N R0040 (L03) | |
L0064: JUMP L0071 | |
L0065: CALL_VS R0030 (G3c,G3d,L02) -> L03 | |
JE L03,#2710 [FALSE] L0066 | |
RET L03 | |
L0066: JZ L03 [FALSE] L0068 | |
JZ G68 [TRUE] L0067 | |
CALL_1N R0025 | |
STORE G7c,L0a | |
JUMP L0050 | |
L0067: CALL_1S R0038 -> G49 | |
RET L03 | |
L0068: GET_PARENT L03 -> L04 | |
JE L04,G3c [TRUE] L0070 | |
JE G46,#01 [FALSE] L0069 | |
STORE G82,G81 | |
STORE G49,#06 | |
JUMP L0080 | |
L0069: STORE G48,L03 | |
L0070: STORE L09,L03 | |
L0071: ADD G81,G7a -> G7c | |
CALL_1S R0057 -> L04 | |
JE L04,"and","and","and" [TRUE] L0072 | |
JE L04,"but","except","but" [TRUE] L0072 | |
JE L04,"comma," [FALSE] L0076 | |
L0072: JZ L0c [FALSE] L0073 | |
STORE G49,#07 | |
JUMP L0080 | |
L0073: JE L04,"but","except","but" [FALSE] L0074 | |
SUB #01,L08 -> L08 | |
L0074: JZ L0b [FALSE] L0075 | |
STOREW #0f26,#00,#01 | |
STOREW #0f26,#01,L09 | |
STORE L0b,#01 | |
L0075: STORE G55,#01 | |
STORE G53,#00 | |
JUMP L0042 | |
L0076: DEC G7c | |
L0077: JZ L0b [TRUE] L0078 | |
STORE L09,#00 | |
STORE G61,L02 | |
JUMP L0079 | |
L0078: JE G62,#01 [FALSE] L0079 | |
AND G63,#08 -> -(SP) | |
JZ (SP)+ [TRUE] L0079 | |
JL G64,#64 [FALSE] L0079 | |
JG G64,#01 [FALSE] L0079 | |
STORE G60,#01 | |
STORE G5f,G64 | |
STORE G49,#10 | |
JUMP L0080 | |
L0079: ADD G4e,#02 -> -(SP) | |
STOREW L00,(SP)+,L09 | |
INC G4e | |
STOREW #0fc6,G4c,L09 | |
RTRUE | |
L0080: JZ G6a [TRUE] L0081 | |
JE G65,#01 [FALSE] L0081 | |
STORE G6a,#00 | |
STORE G7c,L0a | |
JUMP L0049 | |
L0081: RFALSE | |
Routine R0030, 10 locals | |
STORE G7a,#00 | |
STORE G78,#00 | |
STORE G7b,G7c | |
STORE G77,#00 | |
CALL_VN R0044 (L00,L01,L02) | |
ADD G7b,G7a -> G7c | |
JZ G78 [FALSE] L0001 | |
INC G7c | |
RFALSE | |
L0001: JG G7b,G7d [TRUE] L0003 | |
JE G78,#01 [FALSE] L0002 | |
LOADW #1106,#00 -> L04 | |
RET L04 | |
L0002: JG G7c,G7d [TRUE] L0003 | |
CALL_1S R0057 -> L04 | |
DEC G7c | |
JE L04,"and","and","and" [TRUE] L0003 | |
JE L04,"comma,","then","then" [TRUE] L0003 | |
JE L04,"then","but","except" [TRUE] L0003 | |
JE L04,"but" [TRUE] L0003 | |
JE G5d,#0f [TRUE] RFALSE | |
L0003: STORE G79,#00 | |
JE G78,#01 [FALSE] L0004 | |
LOADW #1106,#00 -> L04 | |
L0004: JG G78,#01 [FALSE] L0005 | |
CALL_2S R0031 (L02) -> L04 | |
JE L04,#ffff [TRUE] RFALSE | |
JE L04,#01 [TRUE] RTRUE | |
L0005: JZ L04 [TRUE] L0008 | |
JZ G55 [TRUE] L0006 | |
RET L04 | |
L0006: JZ G53 [FALSE] L0007 | |
STORE G53,G4c | |
L0007: STOREW #0fc6,G4c,L04 | |
RET L04 | |
L0008: JG G7b,G7d [FALSE] L0009 | |
JUMP L0035 | |
L0009: JE L02,#06 [FALSE] L0010 | |
CALL_VN R0224 (#1007,#2d) | |
JUMP L0011 | |
L0010: CALL_VN R0224 (#1007,#2e) | |
L0011: STORE L05,G79 | |
STORE L09,#00 | |
STORE L04,#01 | |
L0012: JG L04,G79 [TRUE] L0019 | |
L0013: LOADW #1186,L09 -> -(SP) | |
JE (SP)+,L04 [TRUE] L0014 | |
SUB #00,L04 -> -(SP) | |
LOADW #1186,L09 -> -(SP) | |
JE (SP)+,(SP)+ [TRUE] L0014 | |
INC L09 | |
JUMP L0013 | |
L0014: LOADW #1106,L09 -> L06 | |
LOADW #1186,L09 -> -(SP) | |
JG (SP)+,#00 [FALSE] L0015 | |
CALL_2N R0105 (L06) | |
JUMP L0016 | |
L0015: CALL_2N R0104 (L06) | |
L0016: SUB L05,#01 -> -(SP) | |
JL L04,(SP)+ [FALSE] L0017 | |
PRINT ", " | |
L0017: SUB L05,#01 -> -(SP) | |
JE L04,(SP)+ [FALSE] L0018 | |
PRINT_PADDR S034 | |
L0018: INC L04 | |
JUMP L0012 | |
L0019: PRINT "? | |
" | |
L0020: STORE L04,#02 | |
L0021: JL L04,#78 [FALSE] L0022 | |
STOREB #1340,L04,#20 | |
INC L04 | |
JUMP L0021 | |
L0022: CALL_VS R0022 (#1340,#13b9) -> L08 | |
LOADW #13b9,#01 -> L03 | |
JE L03,"all","each","every" [TRUE] L0023 | |
JE L03,"everythin","both" [FALSE] L0028 | |
L0023: JE L02,#02,#03,#04 [TRUE] L0024 | |
JE L02,#05 [FALSE] L0027 | |
L0024: LOADW #0f26,#00 -> L07 | |
STORE L04,#00 | |
L0025: JL L04,G78 [FALSE] L0026 | |
ADD L07,L04 -> -(SP) | |
JL (SP)+,#3f [FALSE] L0026 | |
LOADW #1106,L04 -> L06 | |
ADD L04,#01 -> -(SP) | |
ADD (SP)+,L07 -> -(SP) | |
STOREW #0f26,(SP)+,L06 | |
INC L04 | |
JUMP L0025 | |
L0026: ADD L04,L07 -> -(SP) | |
STOREW #0f26,#00,(SP)+ | |
RTRUE | |
L0027: CALL_VN R0224 (#1007,#2f) | |
JUMP L0020 | |
L0028: JZ L03 [TRUE] L0029 | |
LOADB L03,#06 -> L05 | |
AND L05,#01 -> -(SP) | |
JE #00,(SP)+ [TRUE] L0029 | |
JE L03,"long","short","normal" [TRUE] L0029 | |
JE L03,"brief","full","verbose" [TRUE] L0029 | |
CALL_VN R0066 (#1286,#1340) | |
RET #2710 | |
L0029: CALL_2S R0059 (G7b) -> -(SP) | |
SUB (SP)+,#1286 -> L06 | |
LOADB #1340,#01 -> -(SP) | |
ADD (SP)+,#01 -> L07 | |
LOADB #1286,#00 -> -(SP) | |
ADD #1286,(SP)+ -> -(SP) | |
SUB (SP)+,#01 -> L05 | |
L0030: ADD #1286,L06 -> -(SP) | |
ADD (SP)+,L07 -> -(SP) | |
JL L05,(SP)+ [TRUE] L0031 | |
SUB L05,L07 -> -(SP) | |
LOADB #00,(SP)+ -> -(SP) | |
STOREB L05,#00,(SP)+ | |
DEC L05 | |
JUMP L0030 | |
L0031: STORE L04,#00 | |
L0032: JL L04,L07 [FALSE] L0033 | |
ADD #02,L04 -> -(SP) | |
LOADB #1340,(SP)+ -> -(SP) | |
ADD L06,L04 -> -(SP) | |
STOREB #1286,(SP)+,(SP)+ | |
INC L04 | |
JUMP L0032 | |
L0033: ADD L06,L07 -> -(SP) | |
SUB (SP)+,#01 -> -(SP) | |
STOREB #1286,(SP)+,#20 | |
LOADB #1286,#01 -> -(SP) | |
ADD (SP)+,L07 -> -(SP) | |
STOREB #1286,#01,(SP)+ | |
LOADB #1286,#00 -> -(SP) | |
SUB (SP)+,#01 -> -(SP) | |
LOADB #1286,#01 -> -(SP) | |
JL (SP)+,(SP)+ [TRUE] L0034 | |
LOADB #1286,#00 -> -(SP) | |
STOREB #1286,#01,(SP)+ | |
L0034: RET #2710 | |
L0035: JE L02,#06 [FALSE] L0036 | |
CALL_VN R0224 (#1007,#30) | |
JUMP L0037 | |
L0036: CALL_VN R0224 (#1007,#31) | |
L0037: STORE L04,#02 | |
L0038: JL L04,#78 [FALSE] L0039 | |
STOREB #1340,L04,#20 | |
INC L04 | |
JUMP L0038 | |
L0039: CALL_VS R0022 (#1340,#13b9) -> L08 | |
LOADW #13b9,#01 -> L03 | |
JZ L03 [TRUE] L0040 | |
LOADB L03,#06 -> L05 | |
AND L05,#01 -> -(SP) | |
JE #00,(SP)+ [TRUE] L0040 | |
CALL_VN R0066 (#1286,#1340) | |
RET #2710 | |
L0040: JZ G53 [TRUE] L0054 | |
STORE L05,G53 | |
L0041: JL L05,G4c [FALSE] L0054 | |
LOADW #0fc6,L05 -> -(SP) | |
JE (SP)+,#ffff [FALSE] L0042 | |
JUMP L0053 | |
L0042: LOADB #1286,#01 -> -(SP) | |
ADD #02,(SP)+ -> L04 | |
STORE Gef,#1286 | |
STORE Gee,#01 | |
LOADB Gef,Gee -> Ged | |
INC Ged | |
STOREB Gef,Gee,Ged | |
PUSH L04 | |
INC L04 | |
STOREB #1286,(SP)+,#20 | |
JL G37,#05 [TRUE] L0043 | |
PRINT_PADDR S108 | |
LOADW #0fc6,L05 -> -(SP) | |
PRINT_NUM (SP)+ | |
PRINT "] | |
" | |
L0043: STOREW #13b9,#01,#00 | |
LOADW #0fc6,L05 -> -(SP) | |
JL (SP)+,#02 [TRUE] L0049 | |
LOADW #0fc6,L05 -> -(SP) | |
JL (SP)+,#2710 [FALSE] L0049 | |
LOADW #0fc6,L05 -> -(SP) | |
CALL_2N R0073 ((SP)+) | |
STORE L06,#01 | |
JUMP L0045 | |
L0044: ADD L06,#03 -> L06 | |
L0045: LOADW #14cb,#00 -> -(SP) | |
JG L06,(SP)+ [TRUE] L0048 | |
ADD L06,#02 -> -(SP) | |
LOADW #14cb,(SP)+ -> -(SP) | |
LOADW #0fc6,L05 -> -(SP) | |
JE (SP)+,(SP)+ [FALSE] L0047 | |
LOADW #14cb,L06 -> -(SP) | |
STOREW #13b9,#01,(SP)+ | |
JL G37,#05 [TRUE] L0046 | |
PRINT "[Using pronoun '" | |
LOADW #13b9,#01 -> -(SP) | |
PRINT_ADDR (SP)+ | |
PRINT "'] | |
" | |
L0046: JUMP L0048 | |
L0047: JUMP L0044 | |
L0048: JUMP L0050 | |
L0049: LOADW #0fc6,L05 -> -(SP) | |
SUB (SP)+,#2710 -> -(SP) | |
CALL_2S R0065 ((SP)+) -> -(SP) | |
STOREW #13b9,#01,(SP)+ | |
JL G37,#05 [TRUE] L0050 | |
PRINT "[Using preposition '" | |
LOADW #13b9,#01 -> -(SP) | |
PRINT_ADDR (SP)+ | |
PRINT "'] | |
" | |
L0050: LOADW #13b9,#01 -> -(SP) | |
JZ (SP)+ [TRUE] L0053 | |
ADD #1286,L04 -> L06 | |
OUTPUT_STREAM REDIRECT_ENABLE,L06 | |
LOADW #13b9,#01 -> -(SP) | |
PRINT_ADDR (SP)+ | |
OUTPUT_STREAM #fffd | |
LOADW L06,#00 -> L06 | |
STORE L07,L04 | |
L0051: ADD L04,L06 -> -(SP) | |
JL L07,(SP)+ [FALSE] L0052 | |
ADD L07,#02 -> -(SP) | |
LOADB #1286,(SP)+ -> -(SP) | |
STOREB #1286,L07,(SP)+ | |
INC L07 | |
JUMP L0051 | |
L0052: ADD L04,L06 -> L04 | |
SUB L04,#02 -> -(SP) | |
STOREB #1286,#01,(SP)+ | |
L0053: INC L05 | |
JUMP L0041 | |
L0054: LOADB #1286,#01 -> -(SP) | |
ADD #02,(SP)+ -> L04 | |
STORE Gef,#1286 | |
STORE Gee,#01 | |
LOADB Gef,Gee -> Ged | |
INC Ged | |
STOREB Gef,Gee,Ged | |
PUSH L04 | |
INC L04 | |
STOREB #1286,(SP)+,#20 | |
STORE L05,#00 | |
JUMP L0056 | |
L0055: INC L04 | |
INC L05 | |
L0056: LOADB #1340,#01 -> -(SP) | |
JL L05,(SP)+ [FALSE] L0058 | |
ADD L05,#02 -> -(SP) | |
LOADB #1340,(SP)+ -> -(SP) | |
STOREB #1286,L04,(SP)+ | |
STORE Gef,#1286 | |
STORE Gee,#01 | |
LOADB Gef,Gee -> Ged | |
INC Ged | |
STOREB Gef,Gee,Ged | |
LOADB #1286,#01 -> -(SP) | |
JE (SP)+,#78 [FALSE] L0057 | |
JUMP L0058 | |
L0057: JUMP L0055 | |
L0058: JL L04,#78 [FALSE] L0059 | |
STOREB #1286,L04,#20 | |
INC L04 | |
JUMP L0058 | |
L0059: RET #2710 | |
Routine R0031, 10 locals | |
SUB G78,#01 -> L02 | |
STORE L04,#00 | |
LOADW #1106,#00 -> L05 | |
STORE L01,#00 | |
L0001: JG L01,L02 [TRUE] L0011 | |
LOADW #1106,L01 -> L06 | |
STOREW #1206,L01,L04 | |
CALL_2S R0024 (L06) -> L07 | |
JE L00,#01 [FALSE] L0002 | |
GET_PARENT L06 -> -(SP) | |
JE (SP)+,G3c [FALSE] L0002 | |
INC L04 | |
STORE L05,L06 | |
L0002: JE L00,#02 [FALSE] L0003 | |
CALL_2S R0024 (G3c) -> -(SP) | |
JE L07,(SP)+ [FALSE] L0003 | |
JE L06,G3c [TRUE] L0003 | |
TEST_ATTR L06,#03 [TRUE] L0003 | |
TEST_ATTR L06,#11 [TRUE] L0003 | |
INC L04 | |
STORE L05,L06 | |
L0003: JE L00,#03 [FALSE] L0004 | |
GET_PARENT L06 -> -(SP) | |
JE (SP)+,G3c [FALSE] L0004 | |
INC L04 | |
STORE L05,L06 | |
L0004: JE L00,#04,#05 [FALSE] L0009 | |
JE G58,#ffff [FALSE] L0007 | |
JE L00,#04 [FALSE] L0005 | |
INC L04 | |
STORE L05,L06 | |
L0005: JE L00,#05 [FALSE] L0006 | |
GET_PARENT L06 -> -(SP) | |
JE (SP)+,G3c [TRUE] L0006 | |
INC L04 | |
STORE L05,L06 | |
L0006: JUMP L0009 | |
L0007: JE L00,#04 [FALSE] L0008 | |
JE L06,G58 [TRUE] L0008 | |
INC L04 | |
STORE L05,L06 | |
L0008: JE L00,#05 [FALSE] L0009 | |
JIN L06,G58 [FALSE] L0009 | |
INC L04 | |
STORE L05,L06 | |
L0009: JE L00,#06 [FALSE] L0010 | |
CALL_2S R0027 (L06) -> -(SP) | |
JE (SP)+,#01 [FALSE] L0010 | |
INC L04 | |
STORE L05,L06 | |
L0010: LOADW #1206,L01 -> -(SP) | |
SUB L04,(SP)+ -> -(SP) | |
MUL #03e8,(SP)+ -> -(SP) | |
STOREW #1206,L01,(SP)+ | |
INC L01 | |
JUMP L0001 | |
L0011: JE L04,#01 [FALSE] L0012 | |
RET L05 | |
L0012: JE L00,#06 [FALSE] L0013 | |
JZ L04 [FALSE] L0013 | |
LOADW #1106,#00 -> -(SP) | |
RET_POPPED | |
L0013: JZ G62 [FALSE] L0014 | |
STORE G63,#00 | |
L0014: CALL_1N R0033 | |
JZ G78 [FALSE] L0015 | |
RET #ffff | |
L0015: JZ G62 [FALSE] L0016 | |
CALL_1S R0035 -> L01 | |
JL L01,#00 [TRUE] L0016 | |
RET L01 | |
L0016: JE G62,#01 [FALSE] L0028 | |
AND G63,#08 -> -(SP) | |
JZ (SP)+ [TRUE] L0028 | |
JE L00,#02,#03,#04 [TRUE] L0017 | |
JE L00,#05 [TRUE] L0017 | |
STORE G49,#07 | |
RET #ffff | |
L0017: STORE L01,#00 | |
LOADW #0f26,#00 -> L09 | |
CALL_1S R0034 -> L02 | |
JUMP L0019 | |
L0018: CALL_1S R0034 -> L02 | |
L0019: JE L02,#ffff [TRUE] L0026 | |
JL L01,G64 [FALSE] L0026 | |
ADD L01,L09 -> -(SP) | |
JL (SP)+,#3f [FALSE] L0026 | |
STORE L08,#00 | |
TEST_ATTR L02,#03 [TRUE] L0020 | |
TEST_ATTR L02,#1a [TRUE] L0020 | |
STORE L08,#01 | |
L0020: JE L00,#03,#04 [FALSE] L0021 | |
GET_PARENT L02 -> -(SP) | |
JE (SP)+,G3c [TRUE] L0021 | |
STORE L08,#00 | |
L0021: CALL_VS R0232 (L02,L08) -> L03 | |
JE L03,#01 [FALSE] L0022 | |
STORE L08,#01 | |
JUMP L0023 | |
L0022: JE L03,#02 [FALSE] L0023 | |
STORE L08,#00 | |
L0023: JE L08,#01 [FALSE] L0024 | |
INC L01 | |
ADD L01,L09 -> -(SP) | |
STOREW #0f26,(SP)+,L02 | |
JUMP L0025 | |
L0024: STORE L01,L01 | |
L0025: JUMP L0018 | |
L0026: JL L01,G64 [FALSE] L0027 | |
JL G64,#64 [FALSE] L0027 | |
STORE G49,#10 | |
STORE G5f,G64 | |
STORE G60,L01 | |
RET #ffff | |
L0027: ADD L01,L09 -> -(SP) | |
STOREW #0f26,#00,(SP)+ | |
STORE G61,L00 | |
RTRUE | |
L0028: STORE L01,#00 | |
L0029: JL L01,G78 [FALSE] L0030 | |
STOREW #1186,L01,#00 | |
INC L01 | |
JUMP L0029 | |
L0030: STORE L06,#01 | |
STORE L01,#00 | |
L0031: JL L01,G78 [FALSE] L0036 | |
LOADW #1186,L01 -> -(SP) | |
JZ (SP)+ [FALSE] L0035 | |
PUSH L06 | |
INC L06 | |
STOREW #1186,L01,(SP)+ | |
STORE L08,#00 | |
ADD L01,#01 -> L02 | |
L0032: JL L02,G78 [FALSE] L0034 | |
LOADW #1186,L02 -> -(SP) | |
JZ (SP)+ [FALSE] L0033 | |
LOADW #1106,L02 -> -(SP) | |
LOADW #1106,L01 -> -(SP) | |
CALL_VS R0036 ((SP)+,(SP)+) -> -(SP) | |
JE (SP)+,#01 [FALSE] L0033 | |
STORE L08,#01 | |
LOADW #1186,L01 -> -(SP) | |
STOREW #1186,L02,(SP)+ | |
L0033: INC L02 | |
JUMP L0032 | |
L0034: JE L08,#01 [FALSE] L0035 | |
SUB #01,L06 -> -(SP) | |
STOREW #1186,L01,(SP)+ | |
L0035: INC L01 | |
JUMP L0031 | |
L0036: DEC L06 | |
STORE G79,L06 | |
JZ G62 [FALSE] L0041 | |
JG L06,#01 [FALSE] L0041 | |
STORE L03,#ffff | |
STORE L01,#00 | |
L0037: JL L01,G78 [FALSE] L0040 | |
LOADW #1206,L01 -> -(SP) | |
JG (SP)+,L03 [FALSE] L0038 | |
LOADW #1206,L01 -> L03 | |
LOADW #1186,L01 -> L02 | |
MUL L02,L02 -> L02 | |
STORE L08,#00 | |
JUMP L0039 | |
L0038: LOADW #1206,L01 -> -(SP) | |
JE (SP)+,L03 [FALSE] L0039 | |
LOADW #1186,L01 -> -(SP) | |
LOADW #1186,L01 -> -(SP) | |
MUL (SP)+,(SP)+ -> -(SP) | |
JE (SP)+,L02 [TRUE] L0039 | |
STORE L08,#01 | |
L0039: INC L01 | |
JUMP L0037 | |
L0040: JZ L08 [TRUE] L0041 | |
RFALSE | |
L0041: JE L06,#01 [FALSE] L0042 | |
STORE G55,#01 | |
L0042: CALL_1S R0034 -> -(SP) | |
RET_POPPED | |
Routine R0032, 3 locals | |
JE G61,#04,#05 [FALSE] L0006 | |
STORE L01,#01 | |
STORE L02,#00 | |
L0001: LOADW #0f26,#00 -> -(SP) | |
JG L01,(SP)+ [TRUE] L0005 | |
JE G61,#04 [FALSE] L0002 | |
LOADW #0f26,L01 -> -(SP) | |
JE (SP)+,L00 [FALSE] L0003 | |
L0002: JE G61,#05 [FALSE] L0004 | |
LOADW #0f26,L01 -> -(SP) | |
JIN (SP)+,L00 [FALSE] L0004 | |
L0003: INC L02 | |
LOADW #0f26,L01 -> -(SP) | |
STOREW #0f26,L02,(SP)+ | |
L0004: INC L01 | |
JUMP L0001 | |
L0005: STOREW #0f26,#00,L02 | |
L0006: JE G61,#02 [FALSE] L0014 | |
JE G56,#0f [FALSE] L0014 | |
STORE L01,#01 | |
STORE L02,#00 | |
L0007: LOADW #0f26,#00 -> -(SP) | |
JG L01,(SP)+ [TRUE] L0009 | |
CALL_2S R0024 (G3c) -> -(SP) | |
LOADW #0f26,L01 -> -(SP) | |
CALL_2S R0024 ((SP)+) -> -(SP) | |
JE (SP)+,(SP)+ [FALSE] L0008 | |
INC L02 | |
L0008: INC L01 | |
JUMP L0007 | |
L0009: JE G6b,#02 [TRUE] L0010 | |
JG L02,#00 [FALSE] L0014 | |
L0010: STORE L01,#01 | |
STORE L02,#00 | |
L0011: LOADW #0f26,#00 -> -(SP) | |
JG L01,(SP)+ [TRUE] L0013 | |
CALL_2S R0024 (G3c) -> -(SP) | |
LOADW #0f26,L01 -> -(SP) | |
CALL_2S R0024 ((SP)+) -> -(SP) | |
JE (SP)+,(SP)+ [FALSE] L0012 | |
INC L02 | |
LOADW #0f26,L01 -> -(SP) | |
STOREW #0f26,L02,(SP)+ | |
L0012: INC L01 | |
JUMP L0011 | |
L0013: STOREW #0f26,#00,L02 | |
L0014: LOADW #0f26,#00 -> L01 | |
JZ L01 [FALSE] L0015 | |
RET #11 | |
L0015: RFALSE | |
Routine R0033, 8 locals | |
AND G63,#02 -> -(SP) | |
JZ (SP)+ [TRUE] L0001 | |
ADD L05,#2d -> L05 | |
L0001: AND G63,#04 -> -(SP) | |
JZ (SP)+ [TRUE] L0002 | |
ADD L05,#2d -> L05 | |
L0002: AND G63,#10 -> -(SP) | |
JZ (SP)+ [TRUE] L0003 | |
ADD L05,#2d -> L05 | |
L0003: AND G63,#20 -> -(SP) | |
JZ (SP)+ [TRUE] L0004 | |
ADD L05,#2d -> L05 | |
L0004: JZ G66 [TRUE] L0005 | |
ADD L05,#2d -> L05 | |
L0005: STORE L06,#1e | |
STORE L07,#14 | |
JE G56,#0f,#11 [FALSE] L0006 | |
STORE L06,#14 | |
STORE L07,#1e | |
L0006: STORE L03,#00 | |
L0007: JL L03,G78 [FALSE] L0020 | |
LOADW #1106,L03 -> L02 | |
GET_PARENT L02 -> L00 | |
STORE L01,#00 | |
AND G63,#02 -> -(SP) | |
JZ (SP)+ [TRUE] L0008 | |
JE L00,G3c [FALSE] L0008 | |
ADD L01,#2d -> L01 | |
L0008: AND G63,#04 -> -(SP) | |
JZ (SP)+ [TRUE] L0009 | |
JE L00,G3d [FALSE] L0009 | |
ADD L01,#2d -> L01 | |
L0009: AND G63,#10 -> -(SP) | |
JZ (SP)+ [TRUE] L0010 | |
TEST_ATTR L02,#09 [FALSE] L0010 | |
ADD L01,#2d -> L01 | |
L0010: AND G63,#20 -> -(SP) | |
JZ (SP)+ [TRUE] L0011 | |
TEST_ATTR L02,#09 [TRUE] L0011 | |
ADD L01,#2d -> L01 | |
L0011: JZ G66 [TRUE] L0012 | |
JE L00,G66 [FALSE] L0012 | |
ADD L01,#2d -> L01 | |
L0012: JL L01,L05 [FALSE] L0013 | |
STOREW #1106,L03,#ffff | |
JUMP L0019 | |
L0013: STORE L01,#00 | |
TEST_ATTR L02,#03 [TRUE] L0014 | |
STORE L01,#32 | |
L0014: JE L00,G3c [FALSE] L0015 | |
ADD L01,L06 -> L01 | |
JUMP L0017 | |
L0015: JE L00,G3d [FALSE] L0016 | |
ADD L01,L07 -> L01 | |
JUMP L0017 | |
L0016: JZ L01 [FALSE] L0017 | |
JE L00,#06 [TRUE] L0017 | |
ADD L01,#0a -> L01 | |
L0017: CALL_VS R0232 (L02,#02) -> -(SP) | |
ADD L01,(SP)+ -> L01 | |
MUL #02,L01 -> L01 | |
CALL_2S R0063 (L02) -> -(SP) | |
LOADW #14b3,(SP)+ -> -(SP) | |
AND G67,(SP)+ -> -(SP) | |
JZ (SP)+ [TRUE] L0018 | |
INC L01 | |
L0018: LOADW #1206,L03 -> -(SP) | |
ADD (SP)+,L01 -> -(SP) | |
STOREW #1206,L03,(SP)+ | |
L0019: INC L03 | |
JUMP L0007 | |
L0020: STORE L03,#00 | |
L0021: JL L03,G78 [FALSE] L0027 | |
L0022: LOADW #1106,L03 -> -(SP) | |
JE (SP)+,#ffff [FALSE] L0026 | |
SUB G78,#01 -> -(SP) | |
JE L03,(SP)+ [FALSE] L0023 | |
DEC G78 | |
JUMP L0026 | |
L0023: STORE L04,L03 | |
L0024: JL L04,G78 [FALSE] L0025 | |
ADD L04,#01 -> -(SP) | |
LOADW #1106,(SP)+ -> -(SP) | |
STOREW #1106,L04,(SP)+ | |
ADD L04,#01 -> -(SP) | |
LOADW #1206,(SP)+ -> -(SP) | |
STOREW #1206,L04,(SP)+ | |
INC L04 | |
JUMP L0024 | |
L0025: DEC G78 | |
JUMP L0022 | |
L0026: INC L03 | |
JUMP L0021 | |
L0027: RTRUE | |
Routine R0034, 4 locals | |
STORE L00,#00 | |
STORE L02,#ffff | |
STORE L03,#00 | |
L0001: JL L03,G78 [FALSE] L0003 | |
LOADW #1106,L03 -> -(SP) | |
JL (SP)+,#00 [TRUE] L0002 | |
LOADW #1206,L03 -> L01 | |
JG L01,L02 [FALSE] L0002 | |
STORE L02,L01 | |
STORE L00,L03 | |
L0002: INC L03 | |
JUMP L0001 | |
L0003: JL L02,#00 [FALSE] L0004 | |
RET #ffff | |
L0004: LOADW #1106,L00 -> L03 | |
STOREW #1106,L00,#ffff | |
RET L03 | |
Routine R0035, 4 locals | |
STORE L00,#ffff | |
STORE L02,#fc18 | |
STORE L03,#00 | |
L0001: JL L03,G78 [FALSE] L0004 | |
LOADW #1206,L03 -> L01 | |
JE L01,L02 [FALSE] L0002 | |
STORE L00,#ffff | |
L0002: JG L01,L02 [FALSE] L0003 | |
STORE L02,L01 | |
LOADW #1106,L03 -> L00 | |
L0003: INC L03 | |
JUMP L0001 | |
L0004: RET L00 | |
Routine R0036, 9 locals | |
JE L00,L01 [TRUE] RTRUE | |
JZ L00 [TRUE] RFALSE | |
JZ L01 [TRUE] RFALSE | |
GET_PARENT L00 -> -(SP) | |
JE (SP)+,#06 [TRUE] RFALSE | |
GET_PARENT L01 -> -(SP) | |
JE (SP)+,#06 [TRUE] RFALSE | |
GET_PROP L00,#30 -> -(SP) | |
JZ (SP)+ [FALSE] L0001 | |
GET_PROP L01,#30 -> -(SP) | |
JZ (SP)+ [TRUE] L0002 | |
L0001: GET_PROP L01,#30 -> -(SP) | |
GET_PROP L00,#30 -> -(SP) | |
JE (SP)+,(SP)+ [FALSE] RFALSE | |
STORE G38,#1004 | |
STORE G39,L00 | |
STORE G3a,L01 | |
STORE L07,G7c | |
CALL_VS R0088 (L00,#30) -> L06 | |
STORE G7c,L07 | |
JE L06,#ffff [TRUE] RTRUE | |
JE L06,#fffe [TRUE] RFALSE | |
L0002: GET_PROP_ADDR L00,#01 -> L02 | |
GET_PROP_ADDR L00,#01 -> Gef | |