historicalsource/checkpoint
1
0
Fork 0
mirror of https://github.com/historicalsource/checkpoint synced 2024-04-25 13:39:24 +03:00
Code Issues Releases Wiki Activity
checkpoint/macros.cmp
historicalsource 8ae301e53b Final Revision
2019-04-13 22:12:44 -04:00

369 lines
9.1 KiB
Plaintext
Raw Permalink Blame History

;COMPARISON OF PS:<SWG>MACROS.ZAP.1 AND PS:<SWG>MACROS.ZAP.3
;OPTIONS ARE /1
**** FILE PS:<SWG>MACROS.ZAP.1, 1-8 (112)
?CND1: EQUAL? OBJ,POCKET \?CND6
**** FILE PS:<SWG>MACROS.ZAP.3, 1-8 (112)
?CND1: EQUAL? OBJ,POCKET \?CND5
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-11 (177)
?CND6: EQUAL? OBJ,TICKET \?CND11
**** FILE PS:<SWG>MACROS.ZAP.3, 1-11 (177)
?CND5: EQUAL? OBJ,TICKET \?CND9
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-14 (243)
?CND11: EQUAL? OBJ,PASSPORT \?CND16
**** FILE PS:<SWG>MACROS.ZAP.3, 1-14 (242)
?CND9: EQUAL? OBJ,PASSPORT \?CND13
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-17 (314)
?CND16: FSET? OBJ,NARTICLEBIT /?CND21
FSET? OBJ,SEENBIT /?THN27
FSET? OBJ,PERSONBIT /?ELS26
?THN27: PRINTI "The "
JUMP ?CND21
?ELS26: FSET? OBJ,VOWELBIT \?ELS32
**** FILE PS:<SWG>MACROS.ZAP.3, 1-17 (312)
?CND13: FSET? OBJ,NARTICLEBIT /?CND17
FSET? OBJ,SEENBIT /?THN20
FSET? OBJ,PERSONBIT /?ELS21
?THN20: PRINTI "The "
JUMP ?CND17
?ELS21: FSET? OBJ,VOWELBIT \?ELS24
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-24 (499)
JUMP ?CND21
?ELS32: PRINTI "A "
?CND21: FSET? OBJ,PERSONBIT \?CND39
**** FILE PS:<SWG>MACROS.ZAP.3, 1-24 (497)
JUMP ?CND17
?ELS24: PRINTI "A "
?CND17: FSET? OBJ,PERSONBIT \?CND29
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-28 (590)
?CND39: PRINTD OBJ
**** FILE PS:<SWG>MACROS.ZAP.3, 1-28 (588)
?CND29: PRINTD OBJ
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-41 (825)
EQUAL? O,TURN \?ELS5
LESS? 1,P-NUMBER \?ELS5
**** FILE PS:<SWG>MACROS.ZAP.3, 1-41 (823)
EQUAL? O,TURN \?ELS4
LESS? 1,P-NUMBER \?ELS4
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-47 (934)
?ELS5: CALL THE?,O
**** FILE PS:<SWG>MACROS.ZAP.3, 1-47 (932)
?ELS4: CALL THE?,O
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-55 (1040)
FSET? OBJ,SEENBIT /?THN7
FSET? OBJ,PERSONBIT /?ELS6
?THN7: PRINTI " the"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-55 (1038)
FSET? OBJ,SEENBIT /?THN4
FSET? OBJ,PERSONBIT /?ELS5
?THN4: PRINTI " the"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-59 (1131)
?ELS6: FSET? OBJ,VOWELBIT \?ELS12
**** FILE PS:<SWG>MACROS.ZAP.3, 1-59 (1129)
?ELS5: FSET? OBJ,VOWELBIT \?ELS8
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-62 (1194)
?ELS12: PRINTI " a"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-62 (1191)
?ELS8: PRINTI " a"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-69 (1300)
EQUAL? O,INTNUM \?ELS3
ZERO? P-DOLLAR-FLAG /?ELS3
**** FILE PS:<SWG>MACROS.ZAP.3, 1-69 (1296)
EQUAL? O,INTNUM \?ELS2
ZERO? P-DOLLAR-FLAG /?ELS2
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-73 (1380)
?ELS3: FSET? O,NARTICLEBIT \?ELS9
**** FILE PS:<SWG>MACROS.ZAP.3, 1-73 (1376)
?ELS2: FSET? O,NARTICLEBIT \?ELS7
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-75 (1428)
?ELS9: FSET? O,VOWELBIT \?ELS13
**** FILE PS:<SWG>MACROS.ZAP.3, 1-75 (1424)
?ELS7: FSET? O,VOWELBIT \?ELS8
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-78 (1489)
?ELS13: PRINTI "a "
**** FILE PS:<SWG>MACROS.ZAP.3, 1-78 (1484)
?ELS8: PRINTI "a "
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-84 (1576)
FSET? OBJ,PERSONBIT /?ELS3
ZERO? CAP /?ELS6
**** FILE PS:<SWG>MACROS.ZAP.3, 1-84 (1570)
FSET? OBJ,PERSONBIT /?ELS2
ZERO? CAP /?ELS4
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-88 (1651)
?ELS6: PRINTI "it"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-88 (1645)
?ELS4: PRINTI "it"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-90 (1684)
?ELS3: EQUAL? OBJ,PLAYER \?ELS15
ZERO? CAP /?ELS18
**** FILE PS:<SWG>MACROS.ZAP.3, 1-90 (1678)
?ELS2: EQUAL? OBJ,PLAYER \?ELS9
ZERO? CAP /?ELS11
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-94 (1766)
?ELS18: PRINTI "you"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-94 (1759)
?ELS11: PRINTI "you"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-96 (1801)
?ELS15: FSET? OBJ,FEMALE \?ELS27
ZERO? CAP /?ELS30
**** FILE PS:<SWG>MACROS.ZAP.3, 1-96 (1794)
?ELS9: FSET? OBJ,FEMALE \?ELS16
ZERO? CAP /?ELS18
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-100 (1883)
?ELS30: PRINTI "she"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-100 (1875)
?ELS18: PRINTI "she"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-102 (1918)
?ELS27: CALL ZMEMQ,OBJ,COUPLE-TABLE
ZERO? STACK /?ELS39
ZERO? CAP /?ELS42
**** FILE PS:<SWG>MACROS.ZAP.3, 1-102 (1910)
?ELS16: CALL ZMEMQ,OBJ,COUPLE-TABLE
ZERO? STACK /?ELS23
ZERO? CAP /?ELS25
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-107 (2026)
?ELS42: PRINTI "they"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-107 (2018)
?ELS25: PRINTI "they"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-109 (2062)
?ELS39: ZERO? CAP /?ELS54
**** FILE PS:<SWG>MACROS.ZAP.3, 1-109 (2054)
?ELS23: ZERO? CAP /?ELS31
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-112 (2116)
?ELS54: PRINTI "he"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-112 (2108)
?ELS31: PRINTI "he"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-115 (2175)
EQUAL? VERB,STR?1 \?ELS72
EQUAL? OBJ,PLAYER /?THN78
**** FILE PS:<SWG>MACROS.ZAP.3, 1-115 (2167)
EQUAL? VERB,STR?1 \?ELS43
EQUAL? OBJ,PLAYER /?THN47
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-118 (2261)
ZERO? STACK /?ELS77
?THN78: PRINTI "are"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-118 (2253)
ZERO? STACK /?ELS48
?THN47: PRINTI "are"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-121 (2314)
?ELS77: PRINTI "is"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-121 (2306)
?ELS48: PRINTI "is"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-123 (2344)
?ELS72: PRINT VERB
EQUAL? OBJ,PLAYER /FALSE
**** FILE PS:<SWG>MACROS.ZAP.3, 1-123 (2336)
?ELS43: PRINT VERB
EQUAL? OBJ,PLAYER /?PRD57
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-126 (2421)
ZERO? STACK \FALSE
EQUAL? VERB,STR?2,STR?3 \?CND97
**** FILE PS:<SWG>MACROS.ZAP.3, 1-126 (2414)
ZERO? STACK \?PRD57
EQUAL? VERB,STR?2,STR?3 \?CND60
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-129 (2489)
?CND97: PRINTI "s"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-129 (2483)
?CND60: PRINTI "s"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-133 (2522)
**** FILE PS:<SWG>MACROS.ZAP.3, 1-131 (2512)
?PRD57: PUSH 0
RSTACK
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-134 (2563)
FSET? OBJ,PERSONBIT /?ELS3
ZERO? CAP /?ELS6
**** FILE PS:<SWG>MACROS.ZAP.3, 1-136 (2583)
FSET? OBJ,PERSONBIT /?ELS2
ZERO? CAP /?ELS4
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-137 (2625)
JUMP ?CND4
?ELS6: PRINTI "it"
?CND4: ZERO? POSSESS? /TRUE
**** FILE PS:<SWG>MACROS.ZAP.3, 1-139 (2645)
JUMP ?CND3
?ELS4: PRINTI "it"
?CND3: ZERO? POSSESS? /TRUE
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-142 (2709)
?ELS3: EQUAL? OBJ,PLAYER \?ELS21
ZERO? CAP /?ELS24
**** FILE PS:<SWG>MACROS.ZAP.3, 1-144 (2729)
?ELS2: EQUAL? OBJ,PLAYER \?ELS13
ZERO? CAP /?ELS15
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-145 (2778)
JUMP ?CND22
?ELS24: PRINTI "you"
?CND22: ZERO? POSSESS? /TRUE
**** FILE PS:<SWG>MACROS.ZAP.3, 1-147 (2798)
JUMP ?CND14
?ELS15: PRINTI "you"
?CND14: ZERO? POSSESS? /TRUE
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-150 (2866)
?ELS21: CALL ZMEMQ,OBJ,COUPLE-TABLE
ZERO? STACK /?ELS39
ZERO? POSSESS? /?ELS42
ZERO? CAP /?ELS46
**** FILE PS:<SWG>MACROS.ZAP.3, 1-152 (2886)
?ELS13: CALL ZMEMQ,OBJ,COUPLE-TABLE
ZERO? STACK /?ELS24
ZERO? POSSESS? /?ELS26
ZERO? CAP /?ELS28
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-156 (2996)
?ELS46: PRINTI "their"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-158 (3016)
?ELS28: PRINTI "their"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-158 (3029)
?ELS42: ZERO? CAP /?ELS58
**** FILE PS:<SWG>MACROS.ZAP.3, 1-160 (3049)
?ELS26: ZERO? CAP /?ELS34
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-161 (3081)
?ELS58: PRINTI "them"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-163 (3101)
?ELS34: PRINTI "them"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-163 (3113)
?ELS39: FSET? OBJ,FEMALE \?ELS67
ZERO? CAP /?ELS70
**** FILE PS:<SWG>MACROS.ZAP.3, 1-165 (3133)
?ELS24: FSET? OBJ,FEMALE \?ELS39
ZERO? CAP /?ELS41
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-167 (3191)
?ELS70: PRINTI "her"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-169 (3211)
?ELS41: PRINTI "her"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-169 (3222)
?ELS67: ZERO? POSSESS? /?ELS79
ZERO? CAP /?ELS83
**** FILE PS:<SWG>MACROS.ZAP.3, 1-171 (3242)
?ELS39: ZERO? POSSESS? /?ELS46
ZERO? CAP /?ELS48
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-173 (3298)
?ELS83: PRINTI "his"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-175 (3318)
?ELS48: PRINTI "his"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-175 (3329)
?ELS79: ZERO? CAP /?ELS95
**** FILE PS:<SWG>MACROS.ZAP.3, 1-177 (3349)
?ELS46: ZERO? CAP /?ELS54
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-178 (3380)
?ELS95: PRINTI "him"
**** FILE PS:<SWG>MACROS.ZAP.3, 1-180 (3400)
?ELS54: PRINTI "him"
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-189 (3567)
ZERO? THIS /?ELS3
ZERO? CNT \?ELS3
**** FILE PS:<SWG>MACROS.ZAP.3, 1-191 (3587)
ZERO? THIS /?ELS2
ZERO? CNT \?ELS2
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-193 (3635)
?ELS3: SUB L,CNT
**** FILE PS:<SWG>MACROS.ZAP.3, 1-195 (3655)
?ELS2: SUB L,CNT
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-200 (3765)
EQUAL? CNT,L \?CND8
**** FILE PS:<SWG>MACROS.ZAP.3, 1-202 (3785)
EQUAL? CNT,L \?CND4
***************
**** FILE PS:<SWG>MACROS.ZAP.1, 1-202 (3800)
?CND8: PUT FROB,0,CNT
**** FILE PS:<SWG>MACROS.ZAP.3, 1-204 (3820)
?CND4: PUT FROB,0,CNT
***************
Reference in a new issue View git blame Copy permalink