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