historicalsource/checkpoint
1
0
Fork 0
mirror of https://github.com/historicalsource/checkpoint synced 2024-05-20 09:48:21 +03:00
Code Issues Releases Wiki Activity
checkpoint/main.cmp
historicalsource 8ae301e53b Final Revision
2019-04-13 22:12:44 -04:00

407 lines
11 KiB
Plaintext
Raw Blame History

;COMPARISON OF PS:<SWG>MAIN.ZAP.1 AND PS:<SWG>MAIN.ZAP.3
;OPTIONS ARE /1
**** FILE PS:<SWG>MAIN.ZAP.1, 1-36 (832)
EQUAL? N,W?SPY,W?S \?ELS11
**** FILE PS:<SWG>MAIN.ZAP.3, 1-36 (832)
EQUAL? N,W?SPY,W?S \?ELS10
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-39 (893)
?ELS11: SET 'VARIATION,1
**** FILE PS:<SWG>MAIN.ZAP.3, 1-39 (893)
?ELS10: SET 'VARIATION,1
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-44 (1074)
EQUAL? N,W?L,W?LONG \?CND23
**** FILE PS:<SWG>MAIN.ZAP.3, 1-44 (1074)
EQUAL? N,W?L,W?LONG \?CND18
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-47 (1145)
?CND23: CALL TAKE-YOUR-PLACES
**** FILE PS:<SWG>MAIN.ZAP.3, 1-47 (1145)
?CND18: CALL TAKE-YOUR-PLACES
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-51 (1227)
EQUAL? EGO,BAD-SPY \?ELS28
**** FILE PS:<SWG>MAIN.ZAP.3, 1-51 (1227)
EQUAL? EGO,BAD-SPY \?ELS21
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-66 (2493)
JUMP ?CND26
?ELS28: PRINTI "With your business deal behind you, you want only to get out of this bleak corner of Eastern Europe. The frontier is now only a few hours away, and from there it's not far to Vienna, and civilization....
**** FILE PS:<SWG>MAIN.ZAP.3, 1-66 (2493)
JUMP ?CND20
?ELS21: PRINTI "With your business deal behind you, you want only to get out of this bleak corner of Eastern Europe. The frontier is now only a few hours away, and from there it's not far to Vienna, and civilization....
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-74 (3456)
ZERO? HARD? /?ELS37
**** FILE PS:<SWG>MAIN.ZAP.3, 1-74 (3456)
ZERO? HARD? /?ELS27
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-83 (3701)
JUMP ?CND35
?ELS37: PRINTI "deliver a "
**** FILE PS:<SWG>MAIN.ZAP.3, 1-83 (3701)
JUMP ?CND26
?ELS27: PRINTI "deliver a "
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-86 (3762)
?CND35: PRINTI " to our special agent in Gola. An enemy agent spotted me on the train, and I only barely managed to escape."" He groans softly, examining his wound.
**** FILE PS:<SWG>MAIN.ZAP.3, 1-86 (3762)
?CND26: PRINTI " to our special agent in Gola. An enemy agent spotted me on the train, and I only barely managed to escape."" He groans softly, examining his wound.
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-89 (4249)
ZERO? HARD? /?ELS49
**** FILE PS:<SWG>MAIN.ZAP.3, 1-89 (4249)
ZERO? HARD? /?ELS35
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-91 (4293)
JUMP ?CND47
?ELS49: PRINTD STATION-GOLA
?CND47: PRINTI " is "
**** FILE PS:<SWG>MAIN.ZAP.3, 1-91 (4293)
JUMP ?CND34
?ELS35: PRINTD STATION-GOLA
?CND34: PRINTI " is "
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-96 (4417)
ZERO? HARD? \?CND57
**** FILE PS:<SWG>MAIN.ZAP.3, 1-96 (4417)
ZERO? HARD? \?CND40
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-99 (4495)
EQUAL? PASSWORD,CAMERA,HANKY,SCARF \?CND62
**** FILE PS:<SWG>MAIN.ZAP.3, 1-99 (4495)
EQUAL? PASSWORD,CAMERA,HANKY,SCARF \?CND44
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-101 (4553)
?CND62: PRINTI " '"
**** FILE PS:<SWG>MAIN.ZAP.3, 1-101 (4553)
?CND44: PRINTI " '"
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-104 (4606)
?CND57: PRINTI "...."" Then he stops and listens. Before you can say anything, he checks the corridor and races out.
**** FILE PS:<SWG>MAIN.ZAP.3, 1-104 (4606)
?CND40: PRINTI "...."" Then he stops and listens. Before you can say anything, he checks the corridor and races out.
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-109 (4767)
?CND26: CALL V-VERSION
**** FILE PS:<SWG>MAIN.ZAP.3, 1-109 (4767)
?CND20: CALL V-VERSION
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-122 (5009)
?PRG6: GET P-LEXV,L >N
**** FILE PS:<SWG>MAIN.ZAP.3, 1-122 (5009)
?PRG5: GET P-LEXV,L >N
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-124 (5059)
ZERO? STACK \?CND8
JUMP ?REP7
?CND8: ADD L,P-LEXELEN >L
JUMP ?PRG6
?REP7: EQUAL? N,WD1,WD2 /?THN14
EQUAL? N,WD3,WD4 \?CND11
?THN14: RETURN N
?CND11: CALL WT?,N,PS?VERB,P1?VERB >N
EQUAL? N,ACT?QUIT \?ELS18
**** FILE PS:<SWG>MAIN.ZAP.3, 1-124 (5059)
ZERO? STACK \?CND7
JUMP ?REP6
?CND7: ADD L,P-LEXELEN >L
JUMP ?PRG5
?REP6: EQUAL? N,WD1,WD2 /?THN10
EQUAL? N,WD3,WD4 \?CND9
?THN10: RETURN N
?CND9: CALL WT?,N,PS?VERB,P1?VERB >N
EQUAL? N,ACT?QUIT \?ELS13
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-137 (5321)
?ELS18: EQUAL? N,ACT?RESTART \?ELS22
**** FILE PS:<SWG>MAIN.ZAP.3, 1-137 (5319)
?ELS13: EQUAL? N,ACT?RESTART \?ELS16
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-142 (5405)
?ELS22: EQUAL? N,ACT?$VERIFY \?ELS26
**** FILE PS:<SWG>MAIN.ZAP.3, 1-142 (5403)
?ELS16: EQUAL? N,ACT?$VERIFY \?ELS19
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-145 (5472)
?ELS26: EQUAL? N,ACT?RELEASE \?ELS28
**** FILE PS:<SWG>MAIN.ZAP.3, 1-145 (5470)
?ELS19: EQUAL? N,ACT?RELEASE \?ELS20
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-148 (5539)
?ELS28: EQUAL? N,ACT?RESTORE \?CND16
**** FILE PS:<SWG>MAIN.ZAP.3, 1-148 (5537)
?ELS20: EQUAL? N,ACT?RESTORE \?CND12
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-154 (5649)
?CND16: CALL PLEASE-TYPE-OR,WD1,WD2
**** FILE PS:<SWG>MAIN.ZAP.3, 1-154 (5647)
?CND12: CALL PLEASE-TYPE-OR,WD1,WD2
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-171 (5918)
GRTR? N,L \?ELS5
**** FILE PS:<SWG>MAIN.ZAP.3, 1-171 (5916)
GRTR? N,L \?ELS4
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-173 (5948)
?ELS5: RETURN N
**** FILE PS:<SWG>MAIN.ZAP.3, 1-173 (5946)
?ELS4: RETURN N
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-186 (6332)
EQUAL? VARIATION,1,2 \?ELS3
**** FILE PS:<SWG>MAIN.ZAP.3, 1-186 (6330)
EQUAL? VARIATION,1,2 \?ELS2
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-197 (6623)
?ELS3: EQUAL? VARIATION,3,4 \?CND1
**** FILE PS:<SWG>MAIN.ZAP.3, 1-197 (6621)
?ELS2: EQUAL? VARIATION,3,4 \?CND1
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-207 (6873)
?PRG6: IGRTR? 'N,L \?ELS10
JUMP ?REP7
?ELS10: GET BRIEFCASE-TBL,N >P
ZERO? P /?PRG6
**** FILE PS:<SWG>MAIN.ZAP.3, 1-207 (6871)
?PRG4: IGRTR? 'N,L \?ELS7
JUMP ?REP5
?ELS7: GET BRIEFCASE-TBL,N >P
ZERO? P /?PRG4
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-212 (6982)
JUMP ?PRG6
?REP7: PUTP BAD-SPY,P?ACTION,TRAVELER-F
**** FILE PS:<SWG>MAIN.ZAP.3, 1-212 (6978)
JUMP ?PRG4
?REP5: PUTP BAD-SPY,P?ACTION,TRAVELER-F
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-230 (7487)
ZERO? HARD? /?CND13
**** FILE PS:<SWG>MAIN.ZAP.3, 1-230 (7483)
ZERO? HARD? /?CND9
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-236 (7657)
EQUAL? PICKPOCKET,BAD-SPY \?CND13
**** FILE PS:<SWG>MAIN.ZAP.3, 1-236 (7652)
EQUAL? PICKPOCKET,BAD-SPY \?CND9
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-239 (7737)
?CND13: CALL SET-PASSES
**** FILE PS:<SWG>MAIN.ZAP.3, 1-239 (7731)
?CND9: CALL SET-PASSES
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-266 (8263)
?CND3: ZERO? NEW? \?ELS8
EQUAL? L,COMPARTMENT-START \?ELS8
EQUAL? N,CAR-START \?ELS8
**** FILE PS:<SWG>MAIN.ZAP.3, 1-266 (8256)
?CND3: ZERO? NEW? \?ELS6
EQUAL? L,COMPARTMENT-START \?ELS6
EQUAL? N,CAR-START \?ELS6
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-270 (8362)
JUMP ?CND6
?ELS8: CALL ZMEMQ,L,CAR-ROOMS-REST
ZERO? STACK /?CND6
**** FILE PS:<SWG>MAIN.ZAP.3, 1-270 (8355)
JUMP ?CND5
?ELS6: CALL ZMEMQ,L,CAR-ROOMS-REST
ZERO? STACK /?CND5
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-274 (8462)
ZERO? STACK \?THN16
**** FILE PS:<SWG>MAIN.ZAP.3, 1-274 (8455)
ZERO? STACK \?THN10
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-276 (8505)
ZERO? STACK /?ELS15
?THN16: GETPT L,P?OUT
GET STACK,REXIT >L
JUMP ?CND6
?ELS15: EQUAL? N,CAR-HERE \?ELS19
**** FILE PS:<SWG>MAIN.ZAP.3, 1-276 (8498)
ZERO? STACK /?ELS11
?THN10: GETPT L,P?OUT
CALL GET-REXIT-ROOM,STACK >L
JUMP ?CND5
?ELS11: EQUAL? N,CAR-HERE \?ELS12
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-283 (8669)
JUMP ?CND6
?ELS19: CALL FIND-FLAG-LG,L,DOORBIT
**** FILE PS:<SWG>MAIN.ZAP.3, 1-283 (8672)
JUMP ?CND5
?ELS12: CALL FIND-FLAG-LG,L,DOORBIT
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-286 (8741)
?CND6: CALL TAKE-YOUR-PLACE-TEST,OBJ,STA-ONLY?
ZERO? STACK /?CND22
EQUAL? N,CAR-HERE \?ELS27
**** FILE PS:<SWG>MAIN.ZAP.3, 1-286 (8744)
?CND5: CALL TAKE-YOUR-PLACE-TEST,OBJ,STA-ONLY?
ZERO? STACK /?CND13
EQUAL? N,CAR-HERE \?ELS16
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-290 (8852)
JUMP ?CND25
?ELS27: GETP L,P?CAR >X
ZERO? X /?CND25
**** FILE PS:<SWG>MAIN.ZAP.3, 1-290 (8855)
JUMP ?CND15
?ELS16: GETP L,P?CAR >X
ZERO? X /?CND15
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-294 (8922)
?CND25: PUTP OBJ,P?CAR,N
?CND22: ZERO? NEW? /?CND30
**** FILE PS:<SWG>MAIN.ZAP.3, 1-294 (8925)
?CND15: PUTP OBJ,P?CAR,N
?CND13: ZERO? NEW? /?CND18
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-297 (9008)
ZERO? X /?CND34
**** FILE PS:<SWG>MAIN.ZAP.3, 1-297 (9011)
ZERO? X /?CND20
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-301 (9096)
?CND34: EQUAL? OBJ,BAD-SPY /?CND30
**** FILE PS:<SWG>MAIN.ZAP.3, 1-301 (9099)
?CND20: EQUAL? OBJ,BAD-SPY /?CND18
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-305 (9196)
?CND30: DLESS? 'P,1 \?PRG1
**** FILE PS:<SWG>MAIN.ZAP.3, 1-305 (9199)
?CND18: DLESS? 'P,1 \?PRG1
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-315 (9422)
ZERO? STA-ONLY? /?ELS10
**** FILE PS:<SWG>MAIN.ZAP.3, 1-315 (9425)
ZERO? STA-ONLY? /?ELS7
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-317 (9459)
?ELS10: ZERO? X /TRUE
**** FILE PS:<SWG>MAIN.ZAP.3, 1-317 (9461)
?ELS7: ZERO? X /TRUE
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-322 (9518)
EQUAL? L,GAS-CAR-RM \?ELS3
**** FILE PS:<SWG>MAIN.ZAP.3, 1-322 (9519)
EQUAL? L,GAS-CAR-RM \?ELS2
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-324 (9572)
?ELS3: EQUAL? N,CAR-HERE /?CND1
**** FILE PS:<SWG>MAIN.ZAP.3, 1-324 (9573)
?ELS2: EQUAL? N,CAR-HERE /?CND1
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-353 (10089)
ZERO? FIRST /?ELS6
**** FILE PS:<SWG>MAIN.ZAP.3, 1-353 (10090)
ZERO? FIRST /?ELS4
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-359 (10182)
JUMP ?CND4
?ELS6: PRINTI "Location:"
**** FILE PS:<SWG>MAIN.ZAP.3, 1-359 (10183)
JUMP ?CND3
?ELS4: PRINTI "Location:"
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-363 (10252)
?CND4: BUFOUT TRUE-VALUE
**** FILE PS:<SWG>MAIN.ZAP.3, 1-363 (10253)
?CND3: BUFOUT TRUE-VALUE
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-393 (10779)
EQUAL? LAST-PLAYER-LOC,HERE \?THN13
EQUAL? PLAYER-NOT-FACING-OLD,PLAYER-NOT-FACING /?CND10
?THN13: SET 'LAST-PLAYER-LOC,HERE
**** FILE PS:<SWG>MAIN.ZAP.3, 1-393 (10780)
EQUAL? LAST-PLAYER-LOC,HERE \?THN7
EQUAL? PLAYER-NOT-FACING-OLD,PLAYER-NOT-FACING /?CND6
?THN7: SET 'LAST-PLAYER-LOC,HERE
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-399 (10997)
ZERO? PLAYER-NOT-FACING /?CND17
**** FILE PS:<SWG>MAIN.ZAP.3, 1-399 (10995)
ZERO? PLAYER-NOT-FACING /?CND11
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-403 (11107)
?CND17: DIROUT D-NORMAL
**** FILE PS:<SWG>MAIN.ZAP.3, 1-403 (11105)
?CND11: DIROUT D-NORMAL
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-407 (11183)
ZERO? PLAYER-NOT-FACING /?CND24
**** FILE PS:<SWG>MAIN.ZAP.3, 1-407 (11181)
ZERO? PLAYER-NOT-FACING /?CND17
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-410 (11257)
?CND24: SUB 51,LEN
**** FILE PS:<SWG>MAIN.ZAP.3, 1-410 (11255)
?CND17: SUB 51,LEN
***************
**** FILE PS:<SWG>MAIN.ZAP.1, 1-412 (11303)
?CND10: CURSET 1,68
**** FILE PS:<SWG>MAIN.ZAP.3, 1-412 (11301)
?CND6: CURSET 1,68
***************
Reference in a new issue View git blame Copy permalink