353 lines
9.6 KiB
Plaintext
353 lines
9.6 KiB
Plaintext
|
|
;COMPARISON OF PS:<SWG>STATION.ZAP.1 AND PS:<SWG>STATION.ZAP.3
|
|
;OPTIONS ARE /1
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-10 (163)
|
|
EQUAL? PRSA,V?WALK-TO \?ELS5
|
|
ZERO? ON-TRAIN /?ELS5
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-10 (163)
|
|
EQUAL? PRSA,V?WALK-TO \?ELS4
|
|
ZERO? ON-TRAIN /?ELS4
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-14 (256)
|
|
?ELS5: CALL ON-PLATFORM?,HERE
|
|
ZERO? STACK /?ELS9
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-14 (256)
|
|
?ELS4: CALL ON-PLATFORM?,HERE
|
|
ZERO? STACK /?ELS6
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-18 (359)
|
|
?ELS9: CALL ZMEMQ,HERE,STATION-ROOMS
|
|
ZERO? STACK \?THN12
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-18 (359)
|
|
?ELS6: CALL ZMEMQ,HERE,STATION-ROOMS
|
|
ZERO? STACK \?THN7
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-24 (526)
|
|
?THN12: GETP HERE,P?CAR
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-24 (525)
|
|
?THN7: GETP HERE,P?CAR
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-31 (657)
|
|
ZERO? CUSTOMS-SWEEP \?ELS5
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-31 (655)
|
|
ZERO? CUSTOMS-SWEEP \?ELS4
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-33 (706)
|
|
?ELS5: FSET? PASSPORT,LOCKED \?ELS7
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-33 (704)
|
|
?ELS4: FSET? PASSPORT,LOCKED \?ELS5
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-42 (928)
|
|
?ELS7: ZERO? BRIEFCASE-PASSED \?ELS11
|
|
IN? BRIEFCASE,PLAYER \?ELS11
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-42 (926)
|
|
?ELS5: ZERO? BRIEFCASE-PASSED \?ELS8
|
|
IN? BRIEFCASE,PLAYER \?ELS8
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-48 (1124)
|
|
FSET? BRIEFCASE,OPENBIT \?ELS18
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-48 (1120)
|
|
FSET? BRIEFCASE,OPENBIT \?ELS13
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-54 (1236)
|
|
?ELS18: PRINTI "as if to say, ""Open"
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-54 (1232)
|
|
?ELS13: PRINTI "as if to say, ""Open"
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-59 (1332)
|
|
?ELS11: FIRST? POCKET \?ELS26
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-59 (1328)
|
|
?ELS8: FIRST? POCKET \?ELS18
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-68 (1557)
|
|
?ELS26: IN? MCGUFFIN,PLAYER \?ELS30
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-68 (1552)
|
|
?ELS18: IN? MCGUFFIN,PLAYER \?ELS21
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-76 (1738)
|
|
?ELS30: IN? BRIEFCASE,PLAYER /?CND35
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-76 (1733)
|
|
?ELS21: IN? BRIEFCASE,PLAYER /?CND24
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-78 (1803)
|
|
?CND35: CALL QUEUE,I-DEPART-WARNING,5
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-78 (1798)
|
|
?CND24: CALL QUEUE,I-DEPART-WARNING,5
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-84 (1908)
|
|
ZERO? CUSTOMS-SWEEP /?ELS5
|
|
ZERO? IN-STATION /?ELS5
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-84 (1903)
|
|
ZERO? CUSTOMS-SWEEP /?ELS4
|
|
ZERO? IN-STATION /?ELS4
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-90 (2059)
|
|
?ELS5: RETURN PLATFORM-B
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-90 (2054)
|
|
?ELS4: RETURN PLATFORM-B
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-94 (2118)
|
|
EQUAL? RARG,M-LOOK \?ELS5
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-94 (2113)
|
|
EQUAL? RARG,M-LOOK \?ELS4
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-101 (2310)
|
|
EQUAL? HERE,PLATFORM-A \?ELS10
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-101 (2305)
|
|
EQUAL? HERE,PLATFORM-A \?ELS8
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-103 (2375)
|
|
JUMP ?CND8
|
|
?ELS10: EQUAL? HERE,PLATFORM-E \?ELS14
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-103 (2369)
|
|
JUMP ?CND7
|
|
?ELS8: EQUAL? HERE,PLATFORM-E \?ELS11
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-106 (2460)
|
|
JUMP ?CND8
|
|
?ELS14: PRINTI "on "
|
|
?CND8: PRINTI "the platform of the "
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-106 (2453)
|
|
JUMP ?CND7
|
|
?ELS11: PRINTI "on "
|
|
?CND7: PRINTI "the platform of the "
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-111 (2604)
|
|
EQUAL? HERE,PLATFORM-A \?ELS25
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-111 (2597)
|
|
EQUAL? HERE,PLATFORM-A \?ELS19
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-113 (2656)
|
|
JUMP ?CND23
|
|
?ELS25: EQUAL? HERE,PLATFORM-E \?ELS27
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-113 (2649)
|
|
JUMP ?CND18
|
|
?ELS19: EQUAL? HERE,PLATFORM-E \?ELS20
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-116 (2732)
|
|
JUMP ?CND23
|
|
?ELS27: EQUAL? HERE,PLATFORM-C \?ELS32
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-116 (2725)
|
|
JUMP ?CND18
|
|
?ELS20: EQUAL? HERE,PLATFORM-C \?ELS22
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-119 (2810)
|
|
JUMP ?CND30
|
|
?ELS32: PRINTI "wall of "
|
|
?CND30: PRINTI "the station house"
|
|
?CND23: PRINTI ". To the east "
|
|
ZERO? IN-STATION /?ELS45
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-119 (2803)
|
|
JUMP ?CND21
|
|
?ELS22: PRINTI "wall of "
|
|
?CND21: PRINTI "the station house"
|
|
?CND18: PRINTI ". To the east "
|
|
ZERO? IN-STATION /?ELS32
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-126 (3004)
|
|
EQUAL? HERE,PLATFORM-A \?CND43
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-126 (2997)
|
|
EQUAL? HERE,PLATFORM-A \?CND31
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-128 (3080)
|
|
JUMP ?CND43
|
|
?ELS45: PRINTI "are the train tracks"
|
|
?CND43: PRINTR ". The place is crowded with people."
|
|
?ELS5: EQUAL? RARG,M-BEG \?ELS61
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-128 (3073)
|
|
JUMP ?CND31
|
|
?ELS32: PRINTI "are the train tracks"
|
|
?CND31: PRINTR ". The place is crowded with people."
|
|
?ELS4: EQUAL? RARG,M-BEG \?ELS43
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-136 (3328)
|
|
EQUAL? P,GUARD \?CND72
|
|
ZERO? GUARD-SUSPICION /?CND72
|
|
FSET? GUARD,TOUCHBIT \?CND72
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-136 (3321)
|
|
EQUAL? P,GUARD \?CND51
|
|
ZERO? GUARD-SUSPICION /?CND51
|
|
FSET? GUARD,TOUCHBIT \?CND51
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-143 (3516)
|
|
?CND72: FSET P,NDESCBIT
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-143 (3509)
|
|
?CND51: FSET P,NDESCBIT
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-145 (3551)
|
|
?ELS61: EQUAL? RARG,M-END \?ELS80
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-145 (3544)
|
|
?ELS43: EQUAL? RARG,M-END \?ELS56
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-148 (3622)
|
|
?ELS80: EQUAL? RARG,M-ENTER \?ELS82
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-148 (3615)
|
|
?ELS56: EQUAL? RARG,M-ENTER \?ELS57
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-157 (3856)
|
|
?ELS82: ZERO? RARG \FALSE
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-157 (3849)
|
|
?ELS57: ZERO? RARG \FALSE
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-176 (4228)
|
|
ZERO? STACK /?ELS5
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-176 (4221)
|
|
ZERO? STACK /?ELS4
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-182 (4342)
|
|
?ELS5: ZERO? IN-STATION \?THN10
|
|
EQUAL? HERE,BESIDE-TRACKS \?ELS9
|
|
?THN10: SET 'ON-TRAIN,TRUE-VALUE
|
|
ZERO? PULLED-STOP-CORD /?CND12
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-182 (4335)
|
|
?ELS4: ZERO? IN-STATION \?THN7
|
|
EQUAL? HERE,BESIDE-TRACKS \?ELS8
|
|
?THN7: SET 'ON-TRAIN,TRUE-VALUE
|
|
ZERO? PULLED-STOP-CORD /?CND9
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-187 (4499)
|
|
?CND12: FSET? PEN,TOUCHBIT /?CND16
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-187 (4489)
|
|
?CND9: FSET? PEN,TOUCHBIT /?CND11
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-190 (4573)
|
|
?CND16: ZERO? IN-STATION /?CND19
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-190 (4562)
|
|
?CND11: ZERO? IN-STATION /?CND13
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-193 (4667)
|
|
?CND19: CALL V-REAR,CAR-HERE
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-193 (4656)
|
|
?CND13: CALL V-REAR,CAR-HERE
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-195 (4707)
|
|
?ELS9: PRINTI "Walking on the tracks is not a good idea."
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-195 (4696)
|
|
?ELS8: PRINTI "Walking on the tracks is not a good idea."
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-201 (4815)
|
|
ZERO? ARG \?THN8
|
|
EQUAL? PRSA,V?SEARCH-FOR,V?SEARCH /?THN8
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-201 (4804)
|
|
ZERO? ARG \?THN4
|
|
EQUAL? PRSA,V?SEARCH-FOR,V?SEARCH /?THN4
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-204 (4937)
|
|
?THN8: SET 'OBJ,GOOD-SPY
|
|
IN? OBJ,HERE \?ELS18
|
|
FSET? OBJ,NDESCBIT /?THN15
|
|
?ELS18: SET 'OBJ,GUARD
|
|
IN? OBJ,HERE \?ELS20
|
|
FSET? OBJ,NDESCBIT /?THN15
|
|
?ELS20: CALL CALL-FOR-EXTRA,HERE,FALSE-VALUE >OBJ
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-204 (4926)
|
|
?THN4: SET 'OBJ,GOOD-SPY
|
|
PUSH 1
|
|
IN? STACK,HERE \?ELS11
|
|
FSET? OBJ,NDESCBIT /?THN10
|
|
?ELS11: SET 'OBJ,GUARD
|
|
PUSH 1
|
|
IN? STACK,HERE \?ELS12
|
|
FSET? OBJ,NDESCBIT /?THN10
|
|
?ELS12: CALL CALL-FOR-EXTRA,HERE,FALSE-VALUE >OBJ
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-212 (5161)
|
|
?THN15: CALL THIS-IS-IT,OBJ
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-214 (5172)
|
|
?THN10: CALL THIS-IS-IT,OBJ
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-226 (5444)
|
|
EQUAL? RARG,M-ENTER \?ELS5
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-228 (5455)
|
|
EQUAL? RARG,M-ENTER \?ELS4
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-229 (5509)
|
|
?ELS5: EQUAL? RARG,M-FLASH \FALSE
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-231 (5520)
|
|
?ELS4: EQUAL? RARG,M-FLASH \FALSE
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-239 (5803)
|
|
ZERO? STACK \?CND10
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-241 (5814)
|
|
ZERO? STACK \?CND7
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-241 (5847)
|
|
?PRG13: GET EXTRA-TABLE,N >X
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-243 (5857)
|
|
?PRG9: GET EXTRA-TABLE,N >X
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-243 (5910)
|
|
ZERO? STACK /?ELS17
|
|
JUMP ?CND10
|
|
?ELS17: DLESS? 'N,1 \?PRG13
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-245 (5919)
|
|
ZERO? STACK /?ELS12
|
|
JUMP ?CND7
|
|
?ELS12: DLESS? 'N,1 \?PRG9
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-247 (5988)
|
|
JUMP ?PRG13
|
|
?CND10: CALL START-SENTENCE,GOOD-SPY
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-249 (5995)
|
|
JUMP ?PRG9
|
|
?CND7: CALL START-SENTENCE,GOOD-SPY
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-256 (6229)
|
|
EQUAL? PASSWORD,CAMERA,HANKY,SCARF \?CND22
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-258 (6234)
|
|
EQUAL? PASSWORD,CAMERA,HANKY,SCARF \?CND16
|
|
***************
|
|
|
|
**** FILE PS:<SWG>STATION.ZAP.1, 1-258 (6287)
|
|
?CND22: PRINTI " '"
|
|
**** FILE PS:<SWG>STATION.ZAP.3, 1-260 (6292)
|
|
?CND16: PRINTI " '"
|
|
***************
|
|
|