Aisle Strings
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 | |
JZ Gef [TRUE] L0003 | |
GET_PROP_LEN Gef -> Gef | |
L0003: PUSH Gef | |
DIV (SP)+,#02 -> L04 | |
GET_PROP_ADDR L01,#01 -> L03 | |
GET_PROP_ADDR L01,#01 -> Gef | |
JZ Gef [TRUE] L0004 | |
GET_PROP_LEN Gef -> Gef | |
L0004: PUSH Gef | |
DIV (SP)+,#02 -> L05 | |
STORE L06,#00 | |
L0005: JL L06,L04 [FALSE] L0009 | |
STORE L08,#00 | |
STORE L07,#00 | |
L0006: JL L07,L05 [FALSE] L0008 | |
LOADW L03,L07 -> -(SP) | |
LOADW L02,L06 -> -(SP) | |
JE (SP)+,(SP)+ [FALSE] L0007 | |
STORE L08,#01 | |
L0007: INC L07 | |
JUMP L0006 | |
L0008: JZ L08 [TRUE] RFALSE | |
INC L06 | |
JUMP L0005 | |
L0009: STORE L07,#00 | |
L0010: JL L07,L05 [FALSE] L0014 | |
STORE L08,#00 | |
STORE L06,#00 | |
L0011: JL L06,L04 [FALSE] L0013 | |
LOADW L03,L07 -> -(SP) | |
LOADW L02,L06 -> -(SP) | |
JE (SP)+,(SP)+ [FALSE] L0012 | |
STORE L08,#01 | |
L0012: INC L06 | |
JUMP L0011 | |
L0013: JZ L08 [TRUE] RFALSE | |
INC L07 | |
JUMP L0010 | |
L0014: RTRUE | |
Routine R0037, 4 locals | |
JZ L00 [FALSE] L0002 | |
STORE L01,G7e | |
CALL_2S R0008 (L01) -> -(SP) | |
JZ (SP)+ [FALSE] L0001 | |
CALL_2S R0414 (L01) -> -(SP) | |
JZ (SP)+ [FALSE] L0001 | |
PRINT_ADDR L01 | |
L0001: INC L00 | |
STORE L03,#01 | |
L0002: STORE L02,L00 | |
L0003: JL L02,G4c [FALSE] L0011 | |
LOADW #0fc6,L02 -> L01 | |
JE L01,#ffff [FALSE] L0004 | |
JUMP L0010 | |
L0004: JZ L03 [TRUE] L0005 | |
PRINT_CHAR ' ' | |
L0005: JZ L01 [FALSE] L0006 | |
PRINT_PADDR S032 | |
JUMP L0009 | |
L0006: JE L01,#01 [FALSE] L0007 | |
PRINT_PADDR S033 | |
JUMP L0009 | |
L0007: JL L01,#2710 [TRUE] L0008 | |
SUB L01,#2710 -> -(SP) | |
CALL_2S R0065 ((SP)+) -> -(SP) | |
PRINT_ADDR (SP)+ | |
JUMP L0009 | |
L0008: CALL_2N R0105 (L01) | |
L0009: STORE L03,#01 | |
L0010: INC L02 | |
JUMP L0003 | |
L0011: RTRUE | |
Routine R0038, 3 locals | |
STORE G82,G81 | |
JZ G72 [TRUE] L0001 | |
STORE G73,G72 | |
RET #12 | |
L0001: DEC G7c | |
CALL_1S R0057 -> L01 | |
STORE L02,#04 | |
JE L01,G6d [FALSE] L0002 | |
STORE G6f,G6d | |
STORE G70,G6e | |
STORE L02,#0e | |
L0002: STORE L00,G3c | |
L0003: GET_PARENT L00 -> -(SP) | |
JZ (SP)+ [TRUE] L0004 | |
GET_PARENT L00 -> L00 | |
JUMP L0003 | |
L0004: TEST_ATTR L00,#18 [FALSE] L0005 | |
SUB G7c,#01 -> -(SP) | |
CALL_VS R0053 (L00,(SP)+) -> -(SP) | |
JE (SP)+,#01 [FALSE] L0005 | |
STORE L02,#0d | |
L0005: JG G49,L02 [FALSE] L0006 | |
RET G49 | |
L0006: RET L02 | |
Routine R0039, 3 locals | |
LOADW #0f26,#00 -> L01 | |
JE L01,#3f [FALSE] L0001 | |
STORE G40,#01 | |
RTRUE | |
L0001: STORE L02,#01 | |
L0002: JG L02,L01 [TRUE] L0003 | |
LOADW #0f26,L02 -> -(SP) | |
JE L00,(SP)+ [TRUE] RTRUE | |
INC L02 | |
JUMP L0002 | |
L0003: INC L01 | |
STOREW #0f26,L01,L00 | |
STOREW #0f26,#00,L01 | |
RTRUE | |
Routine R0040, 5 locals | |
LOADW #0f26,#00 -> L01 | |
STORE L04,#00 | |
STORE L02,#01 | |
L0001: JG L02,L01 [TRUE] L0005 | |
LOADW #0f26,L02 -> -(SP) | |
JE L00,(SP)+ [FALSE] L0004 | |
STORE L03,L02 | |
L0002: JG L03,L01 [TRUE] L0003 | |
ADD L03,#01 -> -(SP) | |
LOADW #0f26,(SP)+ -> -(SP) | |
STOREW #0f26,L03,(SP)+ | |
INC L03 | |
JUMP L0002 | |
L0003: DEC L01 | |
PUSH L01 | |
STOREW #0f26,#00,(SP)+ | |
RET L04 | |
L0004: INC L02 | |
JUMP L0001 | |
L0005: STORE L04,#09 | |
RET L04 | |
Routine R0041, 4 locals | |
L0001: LOADW #0f26,#00 -> L01 | |
STORE L02,#01 | |
L0002: JG L02,L01 [TRUE] L0004 | |
LOADW #0f26,L02 -> L03 | |
TEST_ATTR L03,L00 [TRUE] L0003 | |
CALL_2N R0040 (L03) | |
JUMP L0001 | |
L0003: INC L02 | |
JUMP L0002 | |
L0004: RTRUE | |
Routine R0042, 1 local | |
JG G5b,#00 [FALSE] L0001 | |
JL G5b,#31 [FALSE] L0001 | |
SUB G5b,#01 -> -(SP) | |
TEST_ATTR L00,(SP)+ [TRUE] RTRUE | |
RFALSE | |
L0001: STORE G32,L00 | |
CALL_1S G5b -> -(SP) | |
RET_POPPED | |
Routine R0043, 5 locals | |
MUL L00,#02 -> -(SP) | |
SUB (SP)+,#01 -> L03 | |
MUL L02,#02 -> -(SP) | |
SUB (SP)+,#01 -> L04 | |
PUSH L04 | |
INC L04 | |
LOADW L01,(SP)+ -> -(SP) | |
PUSH L03 | |
INC L03 | |
STOREW #12ff,(SP)+,(SP)+ | |
LOADW L01,L04 -> -(SP) | |
STOREW #12ff,L03,(SP)+ | |
RTRUE | |
Routine R0044, 4 locals | |
STORE L03,#00 | |
JZ G72 [TRUE] L0001 | |
STORE G74,#02 | |
CALL_1S G72 -> -(SP) | |
JZ (SP)+ [FALSE] RTRUE | |
L0001: JE G3c,L00,L01 [FALSE] L0002 | |
CALL_2S R0412 (G3c) -> -(SP) | |
JZ (SP)+ [FALSE] RTRUE | |
L0002: JE L02,#05 [FALSE] L0004 | |
JE G58,#ffff [TRUE] L0004 | |
CALL_2S R0045 (G58) -> -(SP) | |
JE (SP)+,#01 [FALSE] L0003 | |
CALL_VN R0048 (G58,#00,L02) | |
L0003: JUMP L0009 | |
L0004: JZ L00 [TRUE] L0006 | |
TEST_ATTR L00,#14 [TRUE] L0005 | |
TEST_ATTR L00,#04 [FALSE] L0006 | |
L0005: CALL_VN R0049 (L00,L00,L02) | |
L0006: CALL_VN R0048 (L00,L01,L02) | |
JZ L01 [TRUE] L0008 | |
TEST_ATTR L01,#14 [TRUE] L0007 | |
TEST_ATTR L01,#04 [FALSE] L0008 | |
L0007: CALL_VN R0049 (L01,L01,L02) | |
L0008: CALL_VN R0048 (L01,#00,L02) | |
L0009: JE #13,L00,L01 [FALSE] L0011 | |
CALL_VN R0049 (G3c,G3c,L02) | |
GET_PARENT G3c -> -(SP) | |
PULL Gef | |
TEST_ATTR Gef,#14 [TRUE] L0010 | |
TEST_ATTR Gef,#04 [FALSE] L0011 | |
L0010: GET_PARENT G3c -> -(SP) | |
GET_PARENT G3c -> -(SP) | |
CALL_VN R0049 ((SP)+,(SP)+,L02) | |
L0011: RTRUE | |
Routine R0045, 1 local | |
TEST_ATTR L00,#14 [TRUE] RTRUE | |
TEST_ATTR L00,#17 [TRUE] RTRUE | |
TEST_ATTR L00,#04 [FALSE] L0001 | |
TEST_ATTR L00,#0e [TRUE] RTRUE | |
L0001: RFALSE | |
Routine R0046, 1 local | |
JE G71,#00,#01 [TRUE] L0001 | |
CALL_2N R0047 (L00) | |
RTRUE | |
L0001: STORE G7c,G7b | |
CALL_2N R0052 (L00) | |
STORE G77,#01 | |
RTRUE | |
Routine R0047, 3 locals | |
STORE L01,G71 | |
STORE L02,G39 | |
STORE Gef,G71 | |
JE Gef,#03 [FALSE] L0003 | |
GET_PROP L00,#1a -> -(SP) | |
JE (SP)+,#00,#ffff [FALSE] L0001 | |
RTRUE | |
L0001: JZ G39 [FALSE] L0002 | |
CALL_VS R0088 (L00,#1a) -> G39 | |
L0002: JUMP L0011 | |
L0003: JE Gef,#04 [FALSE] L0006 | |
GET_PROP L00,#1b -> -(SP) | |
JE (SP)+,#00,#ffff [FALSE] L0004 | |
RTRUE | |
L0004: JZ G39 [FALSE] L0005 | |
CALL_VS R0088 (L00,#1b) -> G39 | |
L0005: JUMP L0011 | |
L0006: JE Gef,#02 [FALSE] L0008 | |
GET_PROP_ADDR L00,#2c -> -(SP) | |
JZ (SP)+ [FALSE] L0007 | |
RTRUE | |
L0007: CALL_VN R0086 (L00,#2c) | |
JUMP L0011 | |
L0008: JE Gef,#06 [FALSE] L0010 | |
JE L00,G39 [FALSE] L0009 | |
STORE G3a,#01 | |
L0009: JUMP L0011 | |
L0010: JE Gef,#05 [FALSE] L0011 | |
CALL_2N G39 (L00) | |
STORE G39,L02 | |
L0011: STORE G71,L01 | |
RTRUE | |
Routine R0048, 5 locals | |
JZ L00 [TRUE] RTRUE | |
JZ G62 [FALSE] L0001 | |
JE L00,G3d [FALSE] L0001 | |
JZ G71 [FALSE] L0001 | |
JE L02,#06 [TRUE] L0001 | |
CALL_2N R0048 (#06) | |
L0001: GET_CHILD L00 -> L03 [FALSE] L0002 | |
L0002: JZ L03 [TRUE] L0004 | |
GET_SIBLING L03 -> L04 [FALSE] L0003 | |
L0003: CALL_VN R0049 (L03,L01,L02) | |
STORE L03,L04 | |
JUMP L0002 | |
L0004: RTRUE | |
Routine R0049, 6 locals | |
JE L02,#04 [FALSE] L0001 | |
JE L00,G58 [FALSE] L0001 | |
JUMP L0006 | |
L0001: JE G71,#00,#01 [TRUE] L0002 | |
CALL_2N R0047 (L00) | |
JUMP L0006 | |
L0002: JG G7b,G7d [TRUE] L0004 | |
STORE G7c,G7b | |
CALL_1S R0056 -> L03 | |
JE L03,#01 [FALSE] L0003 | |
JE G19,L00 [FALSE] L0003 | |
CALL_VN R0051 (L00,#01) | |
L0003: JL L03,#02 [TRUE] L0004 | |
JL L03,#80 [FALSE] L0004 | |
LOADW #14cb,L03 -> -(SP) | |
JE (SP)+,L00 [FALSE] L0004 | |
CALL_VN R0051 (L00,#01) | |
L0004: STORE G7c,G7b | |
CALL_2S R0052 (L00) -> -(SP) | |
JG (SP)+,#00 [FALSE] L0006 | |
JG G69,#00 [FALSE] L0006 | |
JE G7b,G69 [TRUE] L0006 | |
STORE G7c,G69 | |
CALL_2S R0052 (L00) -> -(SP) | |
JG (SP)+,#00 [FALSE] L0005 | |
STORE G7b,G69 | |
CALL_1N R0025 | |
L0005: STORE G7c,G7b | |
L0006: GET_CHILD L00 -> -(SP) [FALSE] L0007 | |
L0007: JZ (SP)+ [TRUE] L0008 | |
JE L00,L01 [TRUE] L0008 | |
CALL_2S R0045 (L00) -> -(SP) | |
JE (SP)+,#01 [FALSE] L0008 | |
CALL_VN R0048 (L00,L01,L02) | |
L0008: GET_PROP_ADDR L00,#18 -> L04 | |
JZ L04 [TRUE] L0012 | |
LOADW L04,#00 -> -(SP) | |
CALL_VS R0111 ((SP)+,G0a) -> -(SP) | |
JG (SP)+,#00 [FALSE] L0009 | |
ADD #02,L02 -> G75 | |
CALL_VN R0088 (L00,#18) | |
STORE G75,#00 | |
JUMP L0012 | |
L0009: GET_PROP_ADDR L00,#18 -> Gef | |
JZ Gef [TRUE] L0010 | |
GET_PROP_LEN Gef -> Gef | |
L0010: STORE L05,Gef | |
STORE L03,#00 | |
L0011: MUL #02,L03 -> -(SP) | |
JL (SP)+,L05 [FALSE] L0012 | |
LOADW L04,L03 -> -(SP) | |
CALL_VN R0049 ((SP)+,#00,L02) | |
INC L03 | |
JUMP L0011 | |
L0012: RTRUE | |
Routine R0050, 1 local | |
JL G75,#02 [TRUE] L0001 | |
SUB G75,#02 -> -(SP) | |
CALL_VN R0049 (L00,#00,(SP)+) | |
L0001: JE G75,#01 [FALSE] L0002 | |
CALL_2S R0100 (L00) -> -(SP) | |
JE (SP)+,#01 [FALSE] L0002 | |
STORE G76,#01 | |
L0002: RTRUE | |
Routine R0051, 3 locals | |
JZ G5b [TRUE] L0001 | |
CALL_2S R0042 (L00) -> -(SP) | |
JZ (SP)+ [FALSE] L0001 | |
RTRUE | |
L0001: JL L01,G7a [TRUE] RTRUE | |
JG L01,G7a [FALSE] L0002 | |
STORE G7a,L01 | |
STORE G78,#00 | |
JUMP L0004 | |
L0002: MUL #02,G78 -> -(SP) | |
JL (SP)+,#80 [FALSE] RTRUE | |
STORE L02,#00 | |
L0003: JL L02,G78 [FALSE] L0004 | |
LOADW #1106,L02 -> -(SP) | |
JE (SP)+,L00 [TRUE] RTRUE | |
INC L02 | |
JUMP L0003 | |
L0004: PUSH G78 | |
INC G78 | |
STOREW #1106,(SP)+,L00 | |
RTRUE | |
Routine R0052, 5 locals | |
STORE G6c,#00 | |
JG G7c,G7d [FALSE] L0002 | |
JZ G62 [TRUE] L0001 | |
STORE G6c,#70 | |
L0001: CALL_VN R0051 (L00,#00) | |
RTRUE | |
L0002: GET_PROP L00,#30 -> -(SP) | |
JZ (SP)+ [TRUE] L0009 | |
STORE G38,#ffff | |
STORE L04,G7c | |
CALL_VS R0088 (L00,#30) -> L02 | |
JG L02,#00 [FALSE] L0008 | |
ADD L04,L02 -> G7c | |
L0003: JE G38,#1005 [FALSE] L0004 | |
OR G6c,#04 -> G6c | |
L0004: AND G6c,#04 -> -(SP) | |
JZ (SP)+ [TRUE] L0007 | |
JZ G6a [FALSE] L0005 | |
STORE L02,#00 | |
JUMP L0007 | |
L0005: JZ G62 [FALSE] L0006 | |
STORE G62,#01 | |
STORE G63,#00 | |
STORE G64,#00 | |
L0006: OR G63,#08 -> G63 | |
JZ G64 [FALSE] L0007 | |
STORE G64,#64 | |
L0007: CALL_VN R0051 (L00,L02) | |
RET L02 | |
L0008: JZ L02 [FALSE] L0009 | |
JUMP L0014 | |
L0009: STORE G38,#ffff | |
CALL_1S R0056 -> L03 | |
JE L03,#01 [FALSE] L0010 | |
JE G19,L00 [FALSE] L0010 | |
STORE L02,#01 | |
JUMP L0003 | |
L0010: JL L03,#02 [TRUE] L0011 | |
JL L03,#80 [FALSE] L0011 | |
LOADW #14cb,L03 -> -(SP) | |
JE (SP)+,L00 [FALSE] L0011 | |
STORE L02,#01 | |
JUMP L0003 | |
L0011: DEC G7c | |
STORE L04,G7c | |
CALL_2S R0417 (L00) -> L01 | |
JL L01,#00 [FALSE] L0012 | |
INC G7c | |
L0012: JG L01,#00 [FALSE] L0013 | |
STORE L02,L01 | |
JUMP L0003 | |
L0013: JZ L01 [TRUE] L0014 | |
SUB G7c,#01 -> -(SP) | |
CALL_VS R0053 (L00,(SP)+) -> -(SP) | |
JZ (SP)+ [FALSE] L0016 | |
L0014: JZ G62 [TRUE] L0015 | |
STORE L02,#00 | |
STORE G38,#ffff | |
JUMP L0003 | |
L0015: RFALSE | |
L0016: JL L01,#00 [FALSE] L0019 | |
STORE L01,#01 | |
LOADB L03,#06 -> -(SP) | |
AND (SP)+,#74 -> G6c | |
CALL_1S R0057 -> L03 | |
L0017: SUB G7c,#01 -> -(SP) | |
CALL_VS R0053 (L00,(SP)+) -> -(SP) | |
JZ (SP)+ [TRUE] L0019 | |
INC L01 | |
JZ L03 [TRUE] L0018 | |
LOADB L03,#06 -> -(SP) | |
AND (SP)+,#74 -> -(SP) | |
OR G6c,(SP)+ -> G6c | |
L0018: CALL_1S R0057 -> L03 | |
JUMP L0017 | |
L0019: STORE L02,L01 | |
JUMP L0003 | |
Routine R0053, 6 locals | |
JZ L00 [TRUE] RFALSE | |
STORE L03,G7c | |
STORE G7c,L01 | |
CALL_1S R0058 -> L02 | |
STORE G7c,L03 | |
JL G3b,#0100 [TRUE] L0002 | |
CALL_VS G3b (L00,L02) -> L03 | |
JL L03,#00 [TRUE] L0001 | |
RET L03 | |
L0001: SUB #00,L03 -> L05 | |
JUMP L0003 | |
L0002: STORE L05,G3b | |
L0003: CALL_VS R0422 (L00,L05) -> L03 | |
CALL_VS R0423 (L00,L05) -> -(SP) | |
DIV (SP)+,#02 -> -(SP) | |
SUB (SP)+,#01 -> L04 | |
STORE L05,#00 | |
L0004: JG L05,L04 [TRUE] L0005 | |
LOADW L03,L05 -> -(SP) | |
JE L02,(SP)+ [TRUE] RTRUE | |
INC L05 | |
JUMP L0004 | |
L0005: RFALSE | |
Routine R0054, 6 locals | |
CALL_VS R0422 (L01,L02) -> L03 | |
CALL_VS R0423 (L01,L02) -> -(SP) | |
DIV (SP)+,#02 -> -(SP) | |
SUB (SP)+,#01 -> L04 | |
STORE L05,#00 | |
L0001: JG L05,L04 [TRUE] L0002 | |
LOADW L03,L05 -> -(SP) | |
JE L00,(SP)+ [TRUE] RTRUE | |
INC L05 | |
JUMP L0001 | |
L0002: RFALSE | |
Routine R0055, 3 locals | |
STORE L02,#00 | |
L0001: JL L02,L01 [FALSE] L0002 | |
LOADB L00,L02 -> -(SP) | |
ADD #02,L02 -> -(SP) | |
STOREB #1340,(SP)+,(SP)+ | |
INC L02 | |
JUMP L0001 | |
L0002: STOREB #1340,#01,L01 | |
CALL_VN R0020 (#1340,#13b9) | |
LOADW #13b9,#01 -> -(SP) | |
RET_POPPED | |
Routine R0056, 3 locals | |
CALL_1S R0057 -> L00 | |
JZ L00 [TRUE] RFALSE | |
JE L00,"me","myself","self" [FALSE] L0001 | |
RTRUE | |
L0001: LOADW #14cb,#00 -> L02 | |
STORE L01,#01 | |
JUMP L0003 | |
L0002: ADD L01,#03 -> L01 | |
L0003: JG L01,L02 [TRUE] L0005 | |
LOADW #14cb,L01 -> -(SP) | |
JE L00,(SP)+ [FALSE] L0004 | |
ADD L01,#02 -> -(SP) | |
RET_POPPED | |
L0004: JUMP L0002 | |
L0005: LOADB L00,#06 -> -(SP) | |
AND (SP)+,#80 -> -(SP) | |
JZ (SP)+ [TRUE] RFALSE | |
RET L00 | |
Routine R0057, 3 locals | |
LOADB #12ff,#01 -> -(SP) | |
JG G7c,(SP)+ [FALSE] L0001 | |
INC G7c | |
RFALSE | |
L0001: MUL G7c,#02 -> -(SP) | |
SUB (SP)+,#01 -> L00 | |
INC G7c | |
LOADW #12ff,L00 -> L01 | |
JZ L01 [FALSE] L0003 | |
MUL G7c,#04 -> -(SP) | |
SUB (SP)+,#03 -> L02 | |
LOADB #12ff,L02 -> -(SP) | |
LOADB #1286,(SP)+ -> L00 | |
JE L00,#2c [FALSE] L0002 | |
STORE L01,"comma," | |
L0002: JE L00,#2e [FALSE] L0003 | |
STORE L01,"then" | |
L0003: RET L01 | |
Routine R0058, 0 locals | |
LOADB #12ff,#01 -> -(SP) | |
JG G7c,(SP)+ [FALSE] L0001 | |
INC G7c | |
RET #ffff | |
L0001: CALL_1S R0057 -> -(SP) | |
RET_POPPED | |
Routine R0059, 1 local | |
MUL L00,#04 -> -(SP) | |
ADD (SP)+,#01 -> -(SP) | |
LOADB #12ff,(SP)+ -> -(SP) | |
ADD #1286,(SP)+ -> -(SP) | |
RET_POPPED | |
Routine R0060, 1 local | |
MUL L00,#04 -> -(SP) | |
LOADB #12ff,(SP)+ -> -(SP) | |
RET_POPPED | |
Routine R0061, 10 locals | |
STORE L01,G7c | |
STORE G7c,L00 | |
CALL_1S R0057 -> L02 | |
STORE G7c,L01 | |
CALL_2S R0109 (L02) -> L02 | |
JL L02,#01 [TRUE] L0001 | |
RET L02 | |
L0001: MUL L00,#04 -> -(SP) | |
ADD (SP)+,#01 -> L01 | |
LOADB #12ff,L01 -> L02 | |
ADD L02,#1286 -> L04 | |
SUB L01,#01 -> -(SP) | |
LOADB #12ff,(SP)+ -> L05 | |
CALL_VS R0415 (L04,L05) -> L07 | |
JZ L07 [TRUE] L0002 | |
RET L07 | |
L0002: JL L05,#04 [TRUE] L0003 | |
STORE L06,#03e8 | |
L0003: JE L05,#03 [FALSE] L0004 | |
STORE L06,#64 | |
L0004: JE L05,#02 [FALSE] L0005 | |
STORE L06,#0a | |
L0005: JE L05,#01 [FALSE] L0006 | |
STORE L06,#01 | |
L0006: STORE L07,#00 | |
STORE L03,#00 | |
SUB L05,#01 -> L05 | |
STORE L03,#00 | |
L0007: JG L03,L05 [TRUE] L0019 | |
LOADB L04,L03 -> L09 | |
JE L09,#30 [FALSE] L0008 | |
STORE L08,#00 | |
JUMP L0018 | |
L0008: JE L09,#31 [FALSE] L0009 | |
STORE L08,#01 | |
JUMP L0018 | |
L0009: JE L09,#32 [FALSE] L0010 | |
STORE L08,#02 | |
JUMP L0018 | |
L0010: JE L09,#33 [FALSE] L0011 | |
STORE L08,#03 | |
JUMP L0018 | |
L0011: JE L09,#34 [FALSE] L0012 | |
STORE L08,#04 | |
JUMP L0018 | |
L0012: JE L09,#35 [FALSE] L0013 | |
STORE L08,#05 | |
JUMP L0018 | |
L0013: JE L09,#36 [FALSE] L0014 | |
STORE L08,#06 | |
JUMP L0018 | |
L0014: JE L09,#37 [FALSE] L0015 | |
STORE L08,#07 | |
JUMP L0018 | |
L0015: JE L09,#38 [FALSE] L0016 | |
STORE L08,#08 | |
JUMP L0018 | |
L0016: JE L09,#39 [FALSE] L0017 | |
STORE L08,#09 | |
JUMP L0018 | |
L0017: RET #fc18 | |
L0018: MUL L06,L08 -> -(SP) | |
ADD L07,(SP)+ -> L07 | |
DIV L06,#0a -> L06 | |
INC L03 | |
JUMP L0007 | |
L0019: JG L05,#03 [FALSE] L0020 | |
STORE L07,#2710 | |
L0020: RET L07 | |
Routine R0062, 1 local | |
TEST_ATTR L00,#1c [FALSE] RTRUE | |
RFALSE | |
Routine R0063, 3 locals | |
TEST_ATTR L00,#00 [TRUE] L0001 | |
STORE L01,#06 | |
L0001: TEST_ATTR L00,#1b [FALSE] L0002 | |
STORE L02,#1b | |
L0002: TEST_ATTR L00,#1c [FALSE] L0003 | |
STORE L02,#1c | |
L0003: TEST_ATTR L00,#1d [FALSE] L0004 | |
STORE L02,#1d | |
L0004: JZ L02 [FALSE] L0006 | |
JZ L01 [FALSE] L0005 | |
STORE L02,#1b | |
JUMP L0006 | |
L0005: STORE L02,#1d | |
L0006: JE L02,#1c [FALSE] L0007 | |
ADD L01,#01 -> L01 | |
L0007: JE L02,#1d [FALSE] L0008 | |
ADD L01,#02 -> L01 | |
L0008: TEST_ATTR L00,#1e [FALSE] L0009 | |
ADD L01,#03 -> L01 | |
L0009: RET L01 | |
Routine R0064, 1 local | |
LOADW #00,#04 -> -(SP) | |
ADD (SP)+,#07 -> -(SP) | |
SUB L00,(SP)+ -> -(SP) | |
DIV (SP)+,#09 -> -(SP) | |
RET_POPPED | |
Routine R0065, 1 local | |
MUL #09,L00 -> -(SP) | |
LOADW #00,#04 -> -(SP) | |
ADD (SP)+,#07 -> -(SP) | |
ADD (SP)+,(SP)+ -> -(SP) | |
RET_POPPED | |
Routine R0066, 4 locals | |
LOADB L00,#00 -> L03 | |
STORE L02,#01 | |
L0001: JG L02,L03 [TRUE] L0002 | |
LOADB L01,L02 -> -(SP) | |
STOREB L00,L02,(SP)+ | |
INC L02 | |
JUMP L0001 | |
L0002: RTRUE | |
Routine R0067, 3 locals | |
LOADB #1286,#01 -> L02 | |
LOADB #1286,#00 -> -(SP) | |
JG L02,(SP)+ [FALSE] L0001 | |
LOADB #1286,#00 -> L02 | |
L0001: ADD L02,#02 -> L02 | |
L0002: JG L02,L00 [FALSE] L0003 | |
SUB L02,#01 -> -(SP) | |