checkpoint/goal.cmp
historicalsource 8ae301e53b Final Revision
2019-04-13 22:12:44 -04:00

2644 lines
68 KiB
Plaintext

;COMPARISON OF PS:<SWG>GOAL.ZAP.1 AND PS:<SWG>GOAL.ZAP.3
;OPTIONS ARE /1
**** FILE PS:<SWG>GOAL.ZAP.1, 1-8 (119)
ZERO? ON-TRAIN /?CND6
ZERO? IN-STATION /?THN13
EQUAL? DIR,P?DOWN /?CND6
?THN13: SET 'TBL,NAUTICAL-DIR-STRINGS
?CND6:
?PRG15: GET TBL,CNT >X
ZERO? X \?ELS19
**** FILE PS:<SWG>GOAL.ZAP.3, 1-8 (119)
ZERO? ON-TRAIN /?CND5
ZERO? IN-STATION /?THN8
EQUAL? DIR,P?DOWN /?CND5
?THN8: SET 'TBL,NAUTICAL-DIR-STRINGS
?CND5:
?PRG10: GET TBL,CNT >X
ZERO? X \?ELS13
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-17 (319)
?ELS19: EQUAL? X,DIR \?CND17
EQUAL? DIR,P?UP,P?DOWN /?CND24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-17 (317)
?ELS13: EQUAL? X,DIR \?CND12
EQUAL? DIR,P?UP,P?DOWN /?CND17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-20 (398)
?CND24: ZERO? ON-TRAIN /?ELS31
ZERO? IN-STATION /?ELS31
EQUAL? DIR,P?DOWN \?ELS31
**** FILE PS:<SWG>GOAL.ZAP.3, 1-20 (396)
?CND17: ZERO? ON-TRAIN /?ELS22
ZERO? IN-STATION /?ELS22
EQUAL? DIR,P?DOWN \?ELS22
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-25 (520)
?ELS31: ADD CNT,1
**** FILE PS:<SWG>GOAL.ZAP.3, 1-25 (518)
?ELS22: ADD CNT,1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-29 (578)
?CND17: ADD CNT,2 >CNT
JUMP ?PRG15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-29 (576)
?CND12: ADD CNT,2 >CNT
JUMP ?PRG10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-38 (731)
ZERO? STACK \?ELS10
**** FILE PS:<SWG>GOAL.ZAP.3, 1-38 (729)
ZERO? STACK \?ELS7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-42 (804)
?ELS10: SUB CNT,2
**** FILE PS:<SWG>GOAL.ZAP.3, 1-42 (801)
?ELS7: SUB CNT,2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-45 (862)
**** FILE PS:<SWG>GOAL.ZAP.3, 1-45 (858)
?CND6:
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-50 (923)
EQUAL? LN,1 \?ELS5
**** FILE PS:<SWG>GOAL.ZAP.3, 1-51 (928)
EQUAL? LN,1 \?ELS4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-52 (964)
?ELS5: EQUAL? LN,2 \?ELS7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-53 (969)
?ELS4: EQUAL? LN,2 \?ELS5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-54 (1011)
?ELS7: EQUAL? LN,3 \?ELS9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-55 (1016)
?ELS5: EQUAL? LN,3 \?ELS6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-56 (1058)
?ELS9: EQUAL? LN,4 \?ELS11
**** FILE PS:<SWG>GOAL.ZAP.3, 1-57 (1063)
?ELS6: EQUAL? LN,4 \?ELS7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-58 (1106)
?ELS11: EQUAL? LN,5 \FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-59 (1110)
?ELS7: EQUAL? LN,5 \FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-67 (1302)
EQUAL? HERE,STACK \?ELS3
**** FILE PS:<SWG>GOAL.ZAP.3, 1-68 (1305)
EQUAL? HERE,STACK \?ELS2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-70 (1366)
?ELS3: GET GT,GOAL-ENABLE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-71 (1369)
?ELS2: GET GT,GOAL-ENABLE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-73 (1445)
EQUAL? HERE,X /?CND6
ZERO? X \?CND9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-74 (1448)
EQUAL? HERE,X /?CND4
ZERO? X \?CND6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-80 (1564)
?CND9: CALL ZMEMQ,HERE,CAR-ROOMS-REST
ZERO? STACK /?CND14
**** FILE PS:<SWG>GOAL.ZAP.3, 1-81 (1567)
?CND6: CALL ZMEMQ,HERE,CAR-ROOMS-REST
ZERO? STACK /?CND10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-84 (1680)
?CND14: CALL MOVE-PERSON,PERSON,X
**** FILE PS:<SWG>GOAL.ZAP.3, 1-85 (1683)
?CND10: CALL MOVE-PERSON,PERSON,X
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-86 (1725)
?CND6: GET GT,GOAL-I >IGOAL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-87 (1728)
?CND4: GET GT,GOAL-I >IGOAL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-88 (1787)
ZERO? GOAL \?CND17
**** FILE PS:<SWG>GOAL.ZAP.3, 1-89 (1790)
ZERO? GOAL \?CND12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-91 (1855)
?CND17: ZERO? GOAL /FALSE
EQUAL? HERE,GOAL \?CND20
ZERO? IGOAL /?ELS27
**** FILE PS:<SWG>GOAL.ZAP.3, 1-92 (1858)
?CND12: ZERO? GOAL /FALSE
EQUAL? HERE,GOAL \?CND14
ZERO? IGOAL /?ELS18
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-96 (1977)
ZERO? FLG \?CND29
**** FILE PS:<SWG>GOAL.ZAP.3, 1-97 (1980)
ZERO? FLG \?CND19
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-102 (2078)
?CND29: CALL MOVE-PERSON,PERSON,FLG >FLG
**** FILE PS:<SWG>GOAL.ZAP.3, 1-103 (2081)
?CND19: CALL MOVE-PERSON,PERSON,FLG >FLG
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-106 (2184)
?ELS27: GET GT,GOAL-F >FLG
EQUAL? HERE,FLG /?ELS35
ZERO? FLG \?CND36
**** FILE PS:<SWG>GOAL.ZAP.3, 1-107 (2187)
?ELS18: GET GT,GOAL-F >FLG
EQUAL? HERE,FLG /?ELS23
ZERO? FLG \?CND24
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-114 (2339)
?CND36: EQUAL? PERSON,CONDUCTOR,CUSTOMS-AGENT /?CND41
**** FILE PS:<SWG>GOAL.ZAP.3, 1-115 (2342)
?CND24: EQUAL? PERSON,CONDUCTOR,CUSTOMS-AGENT /?CND28
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-117 (2443)
?CND41: CALL ZMEMQ,FLG,CAR-ROOMS-REST
ZERO? STACK /?CND44
EQUAL? PERSON,PLAYER /?ELS49
**** FILE PS:<SWG>GOAL.ZAP.3, 1-118 (2446)
?CND28: CALL ZMEMQ,FLG,CAR-ROOMS-REST
ZERO? STACK /?CND30
EQUAL? PERSON,PLAYER /?ELS33
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-122 (2582)
ZERO? STACK /?ELS49
**** FILE PS:<SWG>GOAL.ZAP.3, 1-123 (2585)
ZERO? STACK /?ELS33
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-125 (2641)
?ELS49: CALL FIND-FLAG-LG,FLG,DOORBIT
**** FILE PS:<SWG>GOAL.ZAP.3, 1-126 (2644)
?ELS33: CALL FIND-FLAG-LG,FLG,DOORBIT
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-127 (2700)
?CND44: CALL MOVE-PERSON,PERSON,FLG >FLG
**** FILE PS:<SWG>GOAL.ZAP.3, 1-128 (2703)
?CND30: CALL MOVE-PERSON,PERSON,FLG >FLG
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-129 (2755)
?ELS35: CALL GOAL-REACHED,PERSON
**** FILE PS:<SWG>GOAL.ZAP.3, 1-130 (2758)
?ELS23: CALL GOAL-REACHED,PERSON
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-131 (2799)
?CND20: CALL FOLLOW-GOAL-NEXT,HERE,GOAL,PERSON >FLG
EQUAL? HERE,FLG \?CND56
**** FILE PS:<SWG>GOAL.ZAP.3, 1-132 (2802)
?CND14: CALL FOLLOW-GOAL-NEXT,HERE,GOAL,PERSON >FLG
EQUAL? HERE,FLG \?CND35
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-135 (2943)
?CND56: CALL MOVE-PERSON,PERSON,FLG
**** FILE PS:<SWG>GOAL.ZAP.3, 1-136 (2946)
?CND35: CALL MOVE-PERSON,PERSON,FLG
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-145 (3163)
EQUAL? HERE,LOC /?CND6
**** FILE PS:<SWG>GOAL.ZAP.3, 1-146 (3166)
EQUAL? HERE,LOC /?CND4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-147 (3204)
?CND6: GETP GOAL,P?STATION >LOC
EQUAL? GOAL,LOC /?CND9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-148 (3207)
?CND4: GETP GOAL,P?STATION >LOC
EQUAL? GOAL,LOC /?CND6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-150 (3278)
?CND9: CALL FOLLOW-GOAL-NEXT,HERE,GOAL,PERSON >LOC
EQUAL? LOC,HERE \?CND12
**** FILE PS:<SWG>GOAL.ZAP.3, 1-151 (3281)
?CND6: CALL FOLLOW-GOAL-NEXT,HERE,GOAL,PERSON >LOC
EQUAL? LOC,HERE \?CND8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-154 (3421)
?CND12: CALL DIR-FROM,HERE,LOC
**** FILE PS:<SWG>GOAL.ZAP.3, 1-155 (3423)
?CND8: CALL DIR-FROM,HERE,LOC
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-163 (3636)
ZERO? LINE \?ELS6
**** FILE PS:<SWG>GOAL.ZAP.3, 1-164 (3637)
ZERO? LINE \?ELS4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-171 (3764)
?ELS6: GETP HERE,P?LINE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-172 (3765)
?ELS4: GETP HERE,P?LINE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-173 (3811)
EQUAL? LINE,STACK /?CND4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-174 (3812)
EQUAL? LINE,STACK /?CND3
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-183 (3979)
?CND4:
?PRG13: GET LINE,CNT >RM
EQUAL? RM,HERE \?ELS17
ZERO? GOAL-FLAG /?ELS20
**** FILE PS:<SWG>GOAL.ZAP.3, 1-184 (3980)
?CND3:
?PRG10: GET LINE,CNT >RM
EQUAL? RM,HERE \?ELS13
ZERO? GOAL-FLAG /?ELS15
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-190 (4112)
?ELS20: ADD CNT,3
**** FILE PS:<SWG>GOAL.ZAP.3, 1-191 (4113)
?ELS15: ADD CNT,3
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-193 (4166)
?ELS17: EQUAL? RM,GOAL \?CND15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-194 (4167)
?ELS13: EQUAL? RM,GOAL \?CND12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-195 (4226)
?CND15: ADD CNT,3 >CNT
JUMP ?PRG13
**** FILE PS:<SWG>GOAL.ZAP.3, 1-196 (4227)
?CND12: ADD CNT,3 >CNT
JUMP ?PRG10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-200 (4326)
EQUAL? HERE,ROOF \?ELS3
**** FILE PS:<SWG>GOAL.ZAP.3, 1-201 (4327)
EQUAL? HERE,ROOF \?ELS2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-202 (4385)
LESS? CAR,CAR-HERE \?ELS8
**** FILE PS:<SWG>GOAL.ZAP.3, 1-203 (4386)
LESS? CAR,CAR-HERE \?ELS5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-204 (4430)
?ELS8: RETURN P?SOUTH
?ELS3: EQUAL? HERE,VESTIBULE-FWD,VESTIBULE-FWD-DINER \?ELS12
**** FILE PS:<SWG>GOAL.ZAP.3, 1-205 (4431)
?ELS5: RETURN P?SOUTH
?ELS2: EQUAL? HERE,VESTIBULE-FWD,VESTIBULE-FWD-DINER \?ELS6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-207 (4532)
EQUAL? CAR,STACK \?ELS15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-208 (4532)
EQUAL? CAR,STACK \?ELS8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-209 (4577)
EQUAL? THERE,STACK \?ELS15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-210 (4576)
EQUAL? THERE,STACK \?ELS8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-211 (4623)
?ELS15: RETURN FALSE-VALUE
?ELS12: EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER \?CND1
**** FILE PS:<SWG>GOAL.ZAP.3, 1-212 (4621)
?ELS8: RETURN FALSE-VALUE
?ELS6: EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER \?CND1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-214 (4732)
EQUAL? CAR,STACK \?ELS24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-215 (4728)
EQUAL? CAR,STACK \?ELS12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-216 (4776)
EQUAL? THERE,STACK \?ELS24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-217 (4772)
EQUAL? THERE,STACK \?ELS12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-218 (4822)
?ELS24: RETURN FALSE-VALUE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-219 (4818)
?ELS12: RETURN FALSE-VALUE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-223 (4955)
?PRG29: GET COR,CNT >RM
EQUAL? RM,HERE \?ELS33
**** FILE PS:<SWG>GOAL.ZAP.3, 1-224 (4951)
?PRG14: GET COR,CNT >RM
EQUAL? RM,HERE \?ELS17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-226 (5019)
JUMP ?REP30
?ELS33: EQUAL? RM,THERE \?CND31
JUMP ?REP30
?CND31: INC 'CNT
JUMP ?PRG29
?REP30: GET COR,PAST
**** FILE PS:<SWG>GOAL.ZAP.3, 1-227 (5015)
JUMP ?REP15
?ELS17: EQUAL? RM,THERE \?CND16
JUMP ?REP15
?CND16: INC 'CNT
JUMP ?PRG14
?REP15: GET COR,PAST
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-236 (5169)
EQUAL? NUM,1 \?ELS5
**** FILE PS:<SWG>GOAL.ZAP.3, 1-237 (5165)
EQUAL? NUM,1 \?ELS4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-238 (5206)
?ELS5: EQUAL? NUM,2 \?ELS7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-239 (5202)
?ELS4: EQUAL? NUM,2 \?ELS5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-240 (5249)
?ELS7: RETURN COR-4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-241 (5245)
?ELS5: RETURN COR-4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-256 (5572)
LESS? C,0 \?ELS15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-257 (5568)
LESS? C,0 \?ELS11
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-259 (5644)
?ELS15:
?PRG18: SUB C,4 >Z
LESS? Z,0 /?ELS22
**** FILE PS:<SWG>GOAL.ZAP.3, 1-260 (5640)
?ELS11:
?PRG12: SUB C,4 >Z
LESS? Z,0 /?ELS15
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-263 (5711)
JUMP ?CND20
?ELS22: SUB C,2 >Z
LESS? Z,0 /?ELS24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-264 (5707)
JUMP ?CND14
?ELS15: SUB C,2 >Z
LESS? Z,0 /?ELS16
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-267 (5782)
JUMP ?CND20
?ELS24: SUB C,1 >Z
LESS? Z,0 /?REP19
**** FILE PS:<SWG>GOAL.ZAP.3, 1-268 (5778)
JUMP ?CND14
?ELS16: SUB C,1 >Z
LESS? Z,0 /?REP13
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-271 (5853)
?CND20: CALL CORRIDOR-CHECK,COR,ITM,CAR >VAL
ZERO? FOUND \?CND29
**** FILE PS:<SWG>GOAL.ZAP.3, 1-272 (5849)
?CND14: CALL CORRIDOR-CHECK,COR,ITM,CAR >VAL
ZERO? FOUND \?CND18
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-274 (5938)
?CND29: SET 'C,Z
JUMP ?PRG18
?REP19: RETURN FOUND
**** FILE PS:<SWG>GOAL.ZAP.3, 1-275 (5934)
?CND18: SET 'C,Z
JUMP ?PRG12
?REP13: RETURN FOUND
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-280 (6079)
ZERO? COR /?ORP4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-281 (6075)
ZERO? COR /?ORP3
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-283 (6122)
?ORP4: PUSH COR-1
**** FILE PS:<SWG>GOAL.ZAP.3, 1-284 (6118)
?ORP3: PUSH COR-1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-285 (6169)
?PRG5: ZERO? COR /?ELS9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-286 (6165)
?PRG4: ZERO? COR /?ELS7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-287 (6212)
ZERO? RM \?CND7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-288 (6208)
ZERO? RM \?CND8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-290 (6261)
?ELS9: EQUAL? HERE,ROOF \?ELS14
**** FILE PS:<SWG>GOAL.ZAP.3, 1-291 (6257)
?CND8: JUMP ?CND6
?ELS7: EQUAL? HERE,ROOF \?ELS10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-292 (6315)
ZERO? NCAR \?ELS17
**** FILE PS:<SWG>GOAL.ZAP.3, 1-294 (6330)
ZERO? NCAR \?ELS12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-294 (6359)
ZERO? NCAR \?CND7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-296 (6374)
ZERO? NCAR \?CND11
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-296 (6393)
ZERO? COR /?ORP24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-298 (6409)
ZERO? COR /?ORP17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-298 (6424)
JUMP ?THN21
?ORP24: PUSH COR-1
?THN21: GET STACK,PAST >DIR
**** FILE PS:<SWG>GOAL.ZAP.3, 1-300 (6440)
JUMP ?THN15
?ORP17: PUSH COR-1
?THN15: GET STACK,PAST >DIR
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-302 (6510)
JUMP ?CND7
?ELS17: ZERO? PAST \?ELS26
**** FILE PS:<SWG>GOAL.ZAP.3, 1-304 (6526)
JUMP ?CND11
?ELS12: ZERO? PAST \?ELS18
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-305 (6563)
ZERO? NCAR \?CND7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-307 (6580)
ZERO? NCAR \?CND11
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-307 (6597)
ZERO? COR /?ORP33
**** FILE PS:<SWG>GOAL.ZAP.3, 1-309 (6615)
ZERO? COR /?ORP23
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-309 (6628)
JUMP ?THN30
?ORP33: PUSH COR-1
?THN30: GET STACK,PAST >DIR
**** FILE PS:<SWG>GOAL.ZAP.3, 1-311 (6646)
JUMP ?THN21
?ORP23: PUSH COR-1
?THN21: GET STACK,PAST >DIR
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-313 (6714)
JUMP ?CND7
?ELS26: INC 'NCAR
GRTR? NCAR,CAR-MAX \?CND7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-315 (6732)
JUMP ?CND11
?ELS18: INC 'NCAR
GRTR? NCAR,CAR-MAX \?CND24
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-318 (6805)
?ELS14: ZERO? RM /?ELS40
**** FILE PS:<SWG>GOAL.ZAP.3, 1-320 (6825)
?CND24:
?CND11: JUMP ?CND6
?ELS10: ZERO? RM /?ELS26
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-321 (6862)
?ELS40: EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER \?ELS42
**** FILE PS:<SWG>GOAL.ZAP.3, 1-325 (6912)
?ELS26: EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER \?ELS27
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-323 (6941)
ZERO? COR /?ORP46
**** FILE PS:<SWG>GOAL.ZAP.3, 1-327 (6991)
ZERO? COR /?ORP30
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-325 (6972)
JUMP ?THN43
?ORP46: PUSH COR-1
?THN43: GET STACK,PAST >DIR
**** FILE PS:<SWG>GOAL.ZAP.3, 1-329 (7022)
JUMP ?THN28
?ORP30: PUSH COR-1
?THN28: GET STACK,PAST >DIR
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-330 (7080)
JUMP ?CND7
?ELS42: EQUAL? HERE,VESTIBULE-FWD,VESTIBULE-FWD-DINER \?CND7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-334 (7130)
JUMP ?CND6
?ELS27: EQUAL? HERE,VESTIBULE-FWD,VESTIBULE-FWD-DINER \?CND6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-334 (7201)
?CND7: EQUAL? RM,HERE \?ELS51
**** FILE PS:<SWG>GOAL.ZAP.3, 1-338 (7251)
?CND6: EQUAL? RM,HERE \?ELS33
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-336 (7246)
ZERO? COR /?ORP57
**** FILE PS:<SWG>GOAL.ZAP.3, 1-340 (7296)
ZERO? COR /?ORP37
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-338 (7277)
JUMP ?THN54
?ORP57: PUSH COR-1
?THN54: GET STACK,PAST >DIR
JUMP ?CND49
?ELS51: SET 'OBJ,RM
EQUAL? ITM,OBJ /?THN60
FIRST? RM >OBJ \?CND49
?THN60:
?PRG62: ZERO? ITM /?ELS66
EQUAL? OBJ,ITM \?CND64
ZERO? COR /?ELS72
**** FILE PS:<SWG>GOAL.ZAP.3, 1-342 (7327)
JUMP ?THN35
?ORP37: PUSH COR-1
?THN35: GET STACK,PAST >DIR
JUMP ?CND32
?ELS33: SET 'OBJ,RM
PUSH 1
EQUAL? ITM,STACK /?THN38
FIRST? RM >OBJ \?CND32
?THN38:
?PRG40: ZERO? ITM /?ELS43
EQUAL? OBJ,ITM \?CND44
ZERO? COR /?ELS47
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-350 (7529)
JUMP ?REP63
?ELS72: EQUAL? NCAR,CAR \?CND64
**** FILE PS:<SWG>GOAL.ZAP.3, 1-355 (7590)
JUMP ?REP41
?ELS47: EQUAL? NCAR,CAR \?CND46
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-353 (7600)
JUMP ?REP63
?ELS66: ZERO? COR-ALL-DIRS \?THN79
EQUAL? DIR,PLAYER-NOT-FACING /?CND64
?THN79: EQUAL? OBJ,BRIEFCASE /?THN81
**** FILE PS:<SWG>GOAL.ZAP.3, 1-358 (7661)
JUMP ?REP41
?CND46:
?CND44: JUMP ?CND42
?ELS43: ZERO? COR-ALL-DIRS \?THN50
EQUAL? DIR,PLAYER-NOT-FACING /?CND42
?THN50: EQUAL? OBJ,BRIEFCASE /?THN51
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-358 (7750)
ZERO? STACK /?CND64
?THN81: ZERO? COR \?THN83
**** FILE PS:<SWG>GOAL.ZAP.3, 1-365 (7842)
ZERO? STACK /?CND42
?THN51: ZERO? COR \?THN52
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-361 (7816)
EQUAL? NCAR,STACK \?CND64
?THN83: FSET? OBJ,NDESCBIT /?CND64
ZERO? COR-GRAB-FLAG \?THN85
**** FILE PS:<SWG>GOAL.ZAP.3, 1-368 (7908)
EQUAL? NCAR,STACK \?CND42
?THN52: FSET? OBJ,NDESCBIT /?CND42
ZERO? COR-GRAB-FLAG \?THN53
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-365 (7932)
ZERO? STACK \?CND64
?THN85: ZERO? COR-GRAB-FLAG /?ELS89
**** FILE PS:<SWG>GOAL.ZAP.3, 1-372 (8024)
ZERO? STACK \?CND42
?THN53: ZERO? COR-GRAB-FLAG /?ELS56
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-368 (8020)
ZERO? X /?CND90
**** FILE PS:<SWG>GOAL.ZAP.3, 1-375 (8112)
ZERO? X /?CND57
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-374 (8146)
?CND90: ZERO? Y \?CND87
**** FILE PS:<SWG>GOAL.ZAP.3, 1-381 (8238)
?CND57: ZERO? Y \?CND55
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-376 (8182)
JUMP ?CND87
?ELS89: CALL COR-ADD-PER,OBJ,DIR
ZERO? STACK /?ELS101
JUMP ?CND64
?ELS101: CALL START-SENTENCE,OBJ
**** FILE PS:<SWG>GOAL.ZAP.3, 1-383 (8274)
JUMP ?CND55
?ELS56: CALL COR-ADD-PER,OBJ,DIR
ZERO? STACK /?ELS65
JUMP ?CND42
?ELS65: CALL START-SENTENCE,OBJ
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-385 (8366)
?CND87:
?CND64: NEXT? OBJ >OBJ /?KLU114
?KLU114: ZERO? OBJ \?PRG62
?REP63: ZERO? FOUND /?CND49
**** FILE PS:<SWG>GOAL.ZAP.3, 1-392 (8456)
?CND55:
?CND42: NEXT? OBJ >OBJ /?KLU74
?KLU74: ZERO? OBJ \?PRG40
?REP41: ZERO? FOUND /?CND72
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-390 (8481)
?CND49: INC 'CNT
JUMP ?PRG5
**** FILE PS:<SWG>GOAL.ZAP.3, 1-397 (8569)
?CND72:
?CND32: INC 'CNT
JUMP ?PRG4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-399 (8635)
?PRG4: GET T,L
ZERO? STACK \?ELS8
**** FILE PS:<SWG>GOAL.ZAP.3, 1-407 (8733)
?PRG3: GET T,L
ZERO? STACK \?ELS6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-403 (8695)
?ELS8: DLESS? 'L,1 \?PRG4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-411 (8793)
?ELS6: DLESS? 'L,1 \?PRG3
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-418 (8955)
ZERO? FIRST /?ELS10
**** FILE PS:<SWG>GOAL.ZAP.3, 1-426 (9053)
ZERO? FIRST /?ELS8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-422 (9039)
?ELS10: EQUAL? L,1 /?THN19
**** FILE PS:<SWG>GOAL.ZAP.3, 1-430 (9136)
?ELS8: EQUAL? L,1 /?THN12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-425 (9091)
ZERO? STACK \?ELS18
?THN19: PRINTI " and"
JUMP ?CND16
?ELS18: PRINTI ","
?CND16: CALL PRINTT,P
**** FILE PS:<SWG>GOAL.ZAP.3, 1-433 (9187)
ZERO? STACK \?ELS13
?THN12: PRINTI " and"
JUMP ?CND11
?ELS13: PRINTI ","
?CND11: CALL PRINTT,P
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-431 (9220)
ZERO? NUM \?ELS34
**** FILE PS:<SWG>GOAL.ZAP.3, 1-439 (9316)
ZERO? NUM \?ELS23
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-433 (9253)
?ELS34: EQUAL? NUM,1 \?ELS36
**** FILE PS:<SWG>GOAL.ZAP.3, 1-441 (9349)
?ELS23: EQUAL? NUM,1 \?ELS24
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-435 (9298)
JUMP ?CND32
?ELS36: PRINTI " are"
?CND32: PRINTI " off to "
**** FILE PS:<SWG>GOAL.ZAP.3, 1-443 (9394)
JUMP ?CND22
?ELS24: PRINTI " are"
?CND22: PRINTI " off to "
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-455 (9734)
LOC PERSON >L
**** FILE PS:<SWG>GOAL.ZAP.3, 1-463 (9830)
LOC PERSON
SET 'L,STACK
SET '?TMP1,1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-457 (9769)
EQUAL? L,F /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-467 (9892)
EQUAL? ?TMP1,F /FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-496 (10583)
?CND1: ZERO? WALK-TRAIN \?CND4
EQUAL? PERSON,CONDUCTOR,CUSTOMS-AGENT /?CND4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-506 (10710)
?CND1: ZERO? WALK-TRAIN \?CND3
EQUAL? PERSON,CONDUCTOR,CUSTOMS-AGENT /?CND3
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-500 (10712)
?CND4: LOC PERSON
**** FILE PS:<SWG>GOAL.ZAP.3, 1-510 (10839)
?CND3: LOC PERSON
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-508 (10879)
EQUAL? CAR,CARH /?ELS3
**** FILE PS:<SWG>GOAL.ZAP.3, 1-518 (11006)
EQUAL? CAR,CARH /?ELS2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-512 (10988)
LESS? CAR,CARH \?ELS6
**** FILE PS:<SWG>GOAL.ZAP.3, 1-522 (11115)
LESS? CAR,CARH \?ELS4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-515 (11049)
?ELS6: CALL L-REAR,CARH >GOAL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-525 (11176)
?ELS4: CALL L-REAR,CARH >GOAL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-517 (11093)
?ELS3: GET GT,GOAL-OFUNCTION
**** FILE PS:<SWG>GOAL.ZAP.3, 1-527 (11220)
?ELS2: GET GT,GOAL-OFUNCTION
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-558 (12070)
ZERO? STACK \?THN6
**** FILE PS:<SWG>GOAL.ZAP.3, 1-568 (12197)
ZERO? STACK \?THN4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-561 (12138)
?THN6: CALL PRINTT,RM
**** FILE PS:<SWG>GOAL.ZAP.3, 1-571 (12265)
?THN4: CALL PRINTT,RM
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-576 (12491)
EQUAL? OL,VESTIBULE-FWD,OTHER-VESTIBULE-FWD,VESTIBULE-FWD-DINER \?ELS6
EQUAL? WHERE,LIMBO-FWD,OTHER-LIMBO-FWD,LIMBO-FWD-DINER \?CND4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-586 (12618)
EQUAL? OL,VESTIBULE-FWD,OTHER-VESTIBULE-FWD,VESTIBULE-FWD-DINER \?ELS3
EQUAL? WHERE,LIMBO-FWD,OTHER-LIMBO-FWD,LIMBO-FWD-DINER \?CND2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-580 (12667)
JUMP ?CND4
?ELS6: EQUAL? OL,VESTIBULE-REAR,OTHER-VESTIBULE-REAR,VESTIBULE-REAR-DINER \?CND4
EQUAL? WHERE,LIMBO-REAR,OTHER-LIMBO-REAR,LIMBO-REAR-DINER \?CND4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-590 (12794)
JUMP ?CND2
?ELS3: EQUAL? OL,VESTIBULE-REAR,OTHER-VESTIBULE-REAR,VESTIBULE-REAR-DINER \?CND2
EQUAL? WHERE,LIMBO-REAR,OTHER-LIMBO-REAR,LIMBO-REAR-DINER \?CND2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-585 (12867)
?CND4: ZERO? DIR /?CND15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-595 (12994)
?CND2: ZERO? DIR /?CND9
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-587 (12911)
ZERO? X /?CND15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-597 (13037)
ZERO? X /?CND9
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-589 (12940)
EQUAL? STACK,DEXIT \?CND15
GET X,DEXITOBJ >DOOR
**** FILE PS:<SWG>GOAL.ZAP.3, 1-599 (13065)
EQUAL? STACK,DEXIT \?CND9
CALL GET-DOOR-OBJ,X >DOOR
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-592 (13023)
ZERO? STACK /?CND15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-602 (13152)
ZERO? STACK /?CND9
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-594 (13069)
?CND15: EQUAL? PERSON,PLAYER \?ELS25
**** FILE PS:<SWG>GOAL.ZAP.3, 1-604 (13197)
?CND9: EQUAL? PERSON,PLAYER \?ELS15
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-596 (13139)
ZERO? OL /?CND26
**** FILE PS:<SWG>GOAL.ZAP.3, 1-606 (13266)
ZERO? OL /?CND16
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-599 (13242)
?CND26: ZERO? DOOR /?CND23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-609 (13369)
?CND16: ZERO? DOOR /?CND14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-601 (13295)
ZERO? STACK \?CND23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-611 (13422)
ZERO? STACK \?CND14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-604 (13336)
?ELS25: FSET? PERSON,NDESCBIT \?ELS37
JUMP ?CND23
?ELS37: EQUAL? OL,HERE \?ELS39
**** FILE PS:<SWG>GOAL.ZAP.3, 1-614 (13463)
?ELS15: FSET? PERSON,NDESCBIT \?ELS23
JUMP ?CND14
?ELS23: EQUAL? OL,HERE \?ELS24
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-609 (13483)
EQUAL? PERSON,CONDUCTOR \?CND40
ZERO? TOUCH-CAP? /?CND40
**** FILE PS:<SWG>GOAL.ZAP.3, 1-619 (13610)
EQUAL? PERSON,CONDUCTOR \?CND25
ZERO? TOUCH-CAP? /?CND25
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-613 (13618)
?CND40: ZERO? DOOR /?CND47
**** FILE PS:<SWG>GOAL.ZAP.3, 1-623 (13745)
?CND25: ZERO? DOOR /?CND30
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-617 (13699)
?CND47: EQUAL? DIR,P?OUT /?THN56
**** FILE PS:<SWG>GOAL.ZAP.3, 1-627 (13826)
?CND30: EQUAL? DIR,P?OUT /?THN35
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-619 (13767)
ZERO? STACK \?THN56
**** FILE PS:<SWG>GOAL.ZAP.3, 1-629 (13894)
ZERO? STACK \?THN35
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-621 (13824)
ZERO? STACK /?ELS55
?THN56: PRINTI " leaves."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-631 (13951)
ZERO? STACK /?ELS36
?THN35: PRINTI " leaves."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-624 (13881)
JUMP ?CND23
?ELS55: CALL ENTERS?,DIR,OWHERE
ZERO? STACK /?ELS61
**** FILE PS:<SWG>GOAL.ZAP.3, 1-634 (14008)
JUMP ?CND14
?ELS36: CALL ENTERS?,DIR,OWHERE
ZERO? STACK /?ELS39
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-629 (14002)
ZERO? DOOR /?CND66
FSET? DOOR,LOCKED \?CND66
**** FILE PS:<SWG>GOAL.ZAP.3, 1-639 (14129)
ZERO? DOOR /?CND43
FSET? DOOR,LOCKED \?CND43
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-632 (14081)
?CND66: PRINTI "."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-642 (14208)
?CND43: PRINTI "."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-634 (14109)
JUMP ?CND23
?ELS61: EQUAL? CAR,CAR-MAX \?ELS76
EQUAL? OL,VESTIBULE-REAR \?ELS76
EQUAL? WHERE,LIMBO-REAR \?ELS76
**** FILE PS:<SWG>GOAL.ZAP.3, 1-644 (14236)
JUMP ?CND14
?ELS39: EQUAL? CAR,CAR-MAX \?ELS50
EQUAL? OL,VESTIBULE-REAR \?ELS50
EQUAL? WHERE,LIMBO-REAR \?ELS50
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-642 (14337)
JUMP ?CND23
?ELS76: EQUAL? PERSON,PLAYER \?ELS85
**** FILE PS:<SWG>GOAL.ZAP.3, 1-652 (14464)
JUMP ?CND14
?ELS50: EQUAL? PERSON,PLAYER \?ELS55
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-645 (14407)
JUMP ?CND83
?ELS85: PRINTI " heads "
?CND83: EQUAL? DIR,P?UP,P?DOWN /?CND92
**** FILE PS:<SWG>GOAL.ZAP.3, 1-655 (14534)
JUMP ?CND54
?ELS55: PRINTI " heads "
?CND54: EQUAL? DIR,P?UP,P?DOWN /?CND60
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-649 (14506)
?CND92: CALL DIR-PRINT,DIR
ZERO? DOOR /?CND97
FSET? DOOR,LOCKED \?CND97
**** FILE PS:<SWG>GOAL.ZAP.3, 1-659 (14633)
?CND60: CALL DIR-PRINT,DIR
ZERO? DOOR /?CND64
FSET? DOOR,LOCKED \?CND64
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-653 (14613)
?CND97: PRINTI "."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-663 (14740)
?CND64: PRINTI "."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-655 (14641)
JUMP ?CND23
?ELS39: EQUAL? OWHERE,HERE \?ELS107
ZERO? GT /?THN111
**** FILE PS:<SWG>GOAL.ZAP.3, 1-665 (14768)
JUMP ?CND14
?ELS24: EQUAL? OWHERE,HERE \?ELS71
ZERO? GT /?THN73
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-659 (14728)
EQUAL? HERE,STACK /?CND23
?THN111: ZERO? TICKETS-PUNCHED? /?ELS119
ZERO? CUSTOMS-SWEEP /?THN116
?ELS119: EQUAL? PERSON,CONDUCTOR /?CND23
?THN116: SET 'VAL,TRUE-VALUE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-669 (14853)
EQUAL? HERE,STACK /?CND14
?THN73: ZERO? TICKETS-PUNCHED? /?ELS77
ZERO? CUSTOMS-SWEEP /?THN76
?ELS77: EQUAL? PERSON,CONDUCTOR /?CND14
?THN76: SET 'VAL,TRUE-VALUE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-665 (14941)
ZERO? DOOR /?CND120
**** FILE PS:<SWG>GOAL.ZAP.3, 1-675 (15061)
ZERO? DOOR /?CND79
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-669 (15016)
?CND120: PRINTI " walks "
EQUAL? PRSA,V?WALK \?ELS130
EQUAL? OL,LAST-PLAYER-LOC \?ELS130
**** FILE PS:<SWG>GOAL.ZAP.3, 1-679 (15135)
?CND79: PRINTI " walks "
EQUAL? PRSA,V?WALK \?ELS86
EQUAL? OL,LAST-PLAYER-LOC \?ELS86
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-673 (15136)
JUMP ?CND128
?ELS130: PRINTI "past you"
EQUAL? DIR,P?IN,P?OUT /?CND128
**** FILE PS:<SWG>GOAL.ZAP.3, 1-683 (15252)
JUMP ?CND85
?ELS86: PRINTI "past you"
EQUAL? DIR,P?IN,P?OUT /?CND85
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-679 (15272)
?CND128: PRINTI "."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-689 (15385)
?CND85: PRINTI "."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-681 (15301)
JUMP ?CND23
?ELS107: GETP HERE,P?CORRIDOR >COR
ZERO? COR /?CND23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-691 (15413)
JUMP ?CND14
?ELS71: GETP HERE,P?CORRIDOR >COR
ZERO? COR /?CND14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-685 (15409)
EQUAL? PCOR,FALSE-VALUE,PLAYER-NOT-FACING /?ELS150
**** FILE PS:<SWG>GOAL.ZAP.3, 1-695 (15520)
EQUAL? PCOR,FALSE-VALUE,PLAYER-NOT-FACING /?ELS100
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-687 (15495)
EQUAL? STACK,FALSE-VALUE,PLAYER-NOT-FACING \?ELS153
**** FILE PS:<SWG>GOAL.ZAP.3, 1-697 (15606)
EQUAL? STACK,FALSE-VALUE,PLAYER-NOT-FACING \?ELS102
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-690 (15611)
ZERO? STACK \?CND154
**** FILE PS:<SWG>GOAL.ZAP.3, 1-700 (15722)
ZERO? STACK \?CND103
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-692 (15647)
?CND154: PRINTI " off to "
**** FILE PS:<SWG>GOAL.ZAP.3, 1-702 (15758)
?CND103: PRINTI " off to "
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-695 (15710)
ZERO? DOOR /?CND163
**** FILE PS:<SWG>GOAL.ZAP.3, 1-705 (15821)
ZERO? DOOR /?CND111
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-699 (15785)
?CND163: CALL ENTERS?,DIR,OWHERE
ZERO? STACK /?ELS171
**** FILE PS:<SWG>GOAL.ZAP.3, 1-709 (15896)
?CND111: CALL ENTERS?,DIR,OWHERE
ZERO? STACK /?ELS116
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-703 (15894)
JUMP ?CND169
?ELS171: PRINTI " disappears "
EQUAL? DIR,P?UP,P?DOWN /?CND180
**** FILE PS:<SWG>GOAL.ZAP.3, 1-713 (16005)
JUMP ?CND115
?ELS116: PRINTI " disappears "
EQUAL? DIR,P?UP,P?DOWN /?CND122
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-707 (15990)
?CND180: CALL DIR-PRINT,DIR
?CND169: ZERO? DOOR /?CND185
FSET? DOOR,LOCKED \?CND185
**** FILE PS:<SWG>GOAL.ZAP.3, 1-717 (16101)
?CND122: CALL DIR-PRINT,DIR
?CND115: ZERO? DOOR /?CND126
FSET? DOOR,LOCKED \?CND126
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-711 (16108)
?CND185: PRINTI "."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-721 (16219)
?CND126: PRINTI "."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-713 (16137)
JUMP ?CND148
?ELS153: SET 'VAL,TRUE-VALUE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-723 (16248)
JUMP ?CND99
?ELS102: SET 'VAL,TRUE-VALUE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-719 (16289)
EQUAL? PCOR,DIR \?ELS202
**** FILE PS:<SWG>GOAL.ZAP.3, 1-729 (16399)
EQUAL? PCOR,DIR \?ELS138
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-721 (16341)
JUMP ?CND200
?ELS202: CALL OPP-DIR,DIR
EQUAL? PCOR,STACK \?ELS206
**** FILE PS:<SWG>GOAL.ZAP.3, 1-731 (16451)
JUMP ?CND137
?ELS138: CALL OPP-DIR,DIR
EQUAL? PCOR,STACK \?ELS141
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-725 (16434)
JUMP ?CND200
?ELS206: EQUAL? DIR,P?UP,P?DOWN /?CND211
**** FILE PS:<SWG>GOAL.ZAP.3, 1-735 (16544)
JUMP ?CND137
?ELS141: EQUAL? DIR,P?UP,P?DOWN /?CND144
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-728 (16510)
?CND211: CALL DIR-PRINT,DIR
?CND200: PRINTI "."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-738 (16620)
?CND144: CALL DIR-PRINT,DIR
?CND137: PRINTI "."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-731 (16568)
JUMP ?CND148
?ELS150: CALL CORRIDOR-LOOK,OWHERE,NCAR >PCOR
EQUAL? PCOR,FALSE-VALUE,PLAYER-NOT-FACING /?CND23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-741 (16678)
JUMP ?CND99
?ELS100: CALL CORRIDOR-LOOK,OWHERE,NCAR >PCOR
EQUAL? PCOR,FALSE-VALUE,PLAYER-NOT-FACING /?CND14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-738 (16762)
IN? BRIEFCASE,PERSON \?CND224
FSET? BRIEFCASE,SEENBIT /?CND224
**** FILE PS:<SWG>GOAL.ZAP.3, 1-748 (16871)
IN? BRIEFCASE,PERSON \?CND155
FSET? BRIEFCASE,SEENBIT /?CND155
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-744 (16913)
?CND224: PRINTI " appears"
**** FILE PS:<SWG>GOAL.ZAP.3, 1-754 (17022)
?CND155: PRINTI " appears"
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-746 (16972)
EQUAL? DIR,P?IN /?CND233
**** FILE PS:<SWG>GOAL.ZAP.3, 1-756 (17081)
EQUAL? DIR,P?IN /?CND162
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-749 (17045)
?CND233: PRINTI "."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-759 (17154)
?CND162: PRINTI "."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-751 (17074)
?CND148:
?CND23: ZERO? PERSON \?ELS242
**** FILE PS:<SWG>GOAL.ZAP.3, 1-761 (17183)
?CND99:
?CND14: ZERO? PERSON \?ELS169
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-755 (17147)
JUMP ?CND240
?ELS242: MOVE PERSON,WHERE
?CND240: EQUAL? PERSON,PLAYER /?CND247
EQUAL? PERSON,BAD-SPY \?ELS252
ZERO? BAD-SPY-DONE-PEEKING \?ELS252
**** FILE PS:<SWG>GOAL.ZAP.3, 1-765 (17255)
JUMP ?CND168
?ELS169: MOVE PERSON,WHERE
?CND168: EQUAL? PERSON,PLAYER /?CND172
EQUAL? PERSON,BAD-SPY \?ELS175
ZERO? BAD-SPY-DONE-PEEKING \?ELS175
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-761 (17336)
JUMP ?CND247
?ELS252: EQUAL? PERSON,CONDUCTOR,CUSTOMS-AGENT /?CND247
**** FILE PS:<SWG>GOAL.ZAP.3, 1-771 (17444)
JUMP ?CND172
?ELS175: EQUAL? PERSON,CONDUCTOR,CUSTOMS-AGENT /?CND172
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-764 (17433)
?CND247: ZERO? GT /?CND257
**** FILE PS:<SWG>GOAL.ZAP.3, 1-774 (17541)
?CND172: ZERO? GT /?CND178
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-766 (17477)
EQUAL? STACK,WHERE \?ELS263
**** FILE PS:<SWG>GOAL.ZAP.3, 1-776 (17585)
EQUAL? STACK,WHERE \?ELS181
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-768 (17539)
ZERO? VAL \?CND261
**** FILE PS:<SWG>GOAL.ZAP.3, 1-778 (17647)
ZERO? VAL \?CND180
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-770 (17583)
EQUAL? I-WALK-TRAIN,STACK /?CND261
EQUAL? HERE,WHERE \?CND261
FSET? PERSON,NDESCBIT /?CND261
**** FILE PS:<SWG>GOAL.ZAP.3, 1-780 (17691)
EQUAL? I-WALK-TRAIN,STACK /?CND180
EQUAL? HERE,WHERE \?CND180
FSET? PERSON,NDESCBIT /?CND180
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-777 (17773)
JUMP ?CND261
?ELS263: SET 'GOAL-PERSON,PERSON
**** FILE PS:<SWG>GOAL.ZAP.3, 1-787 (17881)
JUMP ?CND180
?ELS181: SET 'GOAL-PERSON,PERSON
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-781 (17889)
?CND261:
?CND257: ZERO? DEBUG /?CND273
**** FILE PS:<SWG>GOAL.ZAP.3, 1-791 (17997)
?CND180:
?CND178: ZERO? DEBUG /?CND187
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-790 (18080)
ZERO? STACK /?CND279
**** FILE PS:<SWG>GOAL.ZAP.3, 1-800 (18188)
ZERO? STACK /?CND191
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-795 (18164)
?CND279: PRINTI ".]"
**** FILE PS:<SWG>GOAL.ZAP.3, 1-805 (18272)
?CND191: PRINTI ".]"
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-798 (18207)
?CND273: RETURN VAL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-808 (18315)
?CND187: RETURN VAL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-802 (18271)
EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER \?ELS3
EQUAL? THERE,ROOF \?ELS3
**** FILE PS:<SWG>GOAL.ZAP.3, 1-812 (18379)
EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER \?ELS2
EQUAL? THERE,ROOF \?ELS2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-805 (18369)
?ELS3: EQUAL? HERE,PLATFORM-A \?ELS7
EQUAL? THERE,PLATFORM-B \?ELS7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-815 (18477)
?ELS2: EQUAL? HERE,PLATFORM-A \?ELS4
EQUAL? THERE,PLATFORM-B \?ELS4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-808 (18457)
?ELS7: EQUAL? HERE,PLATFORM-B \?ELS11
EQUAL? THERE,PLATFORM-A \?ELS11
**** FILE PS:<SWG>GOAL.ZAP.3, 1-818 (18565)
?ELS4: EQUAL? HERE,PLATFORM-B \?ELS6
EQUAL? THERE,PLATFORM-A \?ELS6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-811 (18547)
?ELS11: EQUAL? THERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS15
EQUAL? HERE,ROOF,OTHER-ROOF \?ELS15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-821 (18653)
?ELS6: EQUAL? THERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS8
EQUAL? HERE,ROOF,OTHER-ROOF \?ELS8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-814 (18688)
?ELS15: EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS19
**** FILE PS:<SWG>GOAL.ZAP.3, 1-824 (18791)
?ELS8: EQUAL? HERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-816 (18800)
ZERO? STACK /?ELS19
**** FILE PS:<SWG>GOAL.ZAP.3, 1-826 (18902)
ZERO? STACK /?ELS10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-818 (18838)
?ELS19: EQUAL? THERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-828 (18940)
?ELS10: EQUAL? THERE,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-820 (18950)
ZERO? STACK /?ELS23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-830 (19052)
ZERO? STACK /?ELS12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-822 (18986)
?ELS23: EQUAL? HERE,VESTIBULE-FWD,OTHER-VESTIBULE-FWD \?ELS31
EQUAL? THERE,LIMBO-FWD,OTHER-LIMBO-FWD /?THN28
?ELS31: EQUAL? HERE,VESTIBULE-FWD-DINER \?ELS27
EQUAL? THERE,LIMBO-FWD-DINER \?ELS27
?THN28: RETURN P?NORTH
?ELS27: EQUAL? HERE,VESTIBULE-REAR,OTHER-VESTIBULE-REAR \?ELS39
EQUAL? THERE,LIMBO-REAR,OTHER-LIMBO-REAR /?THN36
?ELS39: EQUAL? HERE,VESTIBULE-REAR-DINER \?CND1
**** FILE PS:<SWG>GOAL.ZAP.3, 1-832 (19088)
?ELS12: EQUAL? HERE,VESTIBULE-FWD,OTHER-VESTIBULE-FWD \?ELS15
EQUAL? THERE,LIMBO-FWD,OTHER-LIMBO-FWD /?THN14
?ELS15: EQUAL? HERE,VESTIBULE-FWD-DINER \?ELS16
EQUAL? THERE,LIMBO-FWD-DINER \?ELS16
?THN14: RETURN P?NORTH
?ELS16: EQUAL? HERE,VESTIBULE-REAR,OTHER-VESTIBULE-REAR \?ELS19
EQUAL? THERE,LIMBO-REAR,OTHER-LIMBO-REAR /?THN18
?ELS19: EQUAL? HERE,VESTIBULE-REAR-DINER \?CND1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-831 (19414)
?THN36: RETURN P?SOUTH
**** FILE PS:<SWG>GOAL.ZAP.3, 1-841 (19516)
?THN18: RETURN P?SOUTH
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-833 (19481)
ZERO? STACK /?ELS44
**** FILE PS:<SWG>GOAL.ZAP.3, 1-843 (19583)
ZERO? STACK /?ELS23
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-835 (19517)
?ELS44: CALL DIR-FROM-TEST,HERE,THERE,P?OUT
ZERO? STACK /?CND42
**** FILE PS:<SWG>GOAL.ZAP.3, 1-845 (19619)
?ELS23: CALL DIR-FROM-TEST,HERE,THERE,P?OUT
ZERO? STACK /?CND22
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-838 (19599)
?CND42:
?PRG47: NEXTP HERE,P >P
LESS? P,LOW-DIRECTION \?ELS51
**** FILE PS:<SWG>GOAL.ZAP.3, 1-848 (19701)
?CND22:
?PRG25: NEXTP HERE,P >P
LESS? P,LOW-DIRECTION \?ELS28
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-842 (19677)
?ELS51: CALL DIR-FROM-TEST,HERE,THERE,P >D
ZERO? D /?PRG47
LESS? D,LOW-DIRECTION \?ELS56
ZERO? V \?ELS56
**** FILE PS:<SWG>GOAL.ZAP.3, 1-852 (19779)
?ELS28: CALL DIR-FROM-TEST,HERE,THERE,P >D
ZERO? D /?PRG25
LESS? D,LOW-DIRECTION \?ELS31
ZERO? V \?ELS31
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-847 (19800)
JUMP ?PRG47
?ELS56: RETURN P
**** FILE PS:<SWG>GOAL.ZAP.3, 1-857 (19902)
JUMP ?CND30
?ELS31: RETURN P
?CND30: JUMP ?PRG25
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-862 (20065)
?PRG1: IGRTR? 'CNT,CHARACTER-MAX \?ELS5
**** FILE PS:<SWG>GOAL.ZAP.3, 1-873 (20188)
?PRG1: IGRTR? 'CNT,CHARACTER-MAX \?ELS4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-864 (20119)
?ELS5: GET GOAL-TABLES,CNT >GT
**** FILE PS:<SWG>GOAL.ZAP.3, 1-875 (20242)
?ELS4: GET GOAL-TABLES,CNT >GT
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-879 (20410)
EQUAL? ARG,G-ENROUTE \?ELS5
**** FILE PS:<SWG>GOAL.ZAP.3, 1-890 (20533)
EQUAL? ARG,G-ENROUTE \?ELS4
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-881 (20497)
ZERO? VAL /?ELS10
EQUAL? NOW-LURCHING,MOVES /?THN13
**** FILE PS:<SWG>GOAL.ZAP.3, 1-892 (20620)
ZERO? VAL /?ELS8
EQUAL? NOW-LURCHING,MOVES /?THN9
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-884 (20566)
LESS? 50,STACK /?ELS10
?THN13: GETP VAL,P?LDESC
ZERO? STACK \?CND15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-895 (20687)
LESS? 50,STACK /?ELS8
?THN9: GETP VAL,P?LDESC
ZERO? STACK \?CND11
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-890 (20707)
?CND15: CALL DIR-FROM,HERE,LAST-PLAYER-LOC
ZERO? STACK \?CND18
**** FILE PS:<SWG>GOAL.ZAP.3, 1-901 (20826)
?CND11: CALL DIR-FROM,HERE,LAST-PLAYER-LOC
ZERO? STACK \?CND13
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-893 (20781)
?CND18: EQUAL? NOW-LURCHING,MOVES \?ELS23
EQUAL? VAL,PICKPOCKET \?CND24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-904 (20900)
?CND13: EQUAL? NOW-LURCHING,MOVES \?ELS16
EQUAL? VAL,PICKPOCKET \?CND17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-896 (20879)
?CND24: PRINTI "As the train lurches,"
**** FILE PS:<SWG>GOAL.ZAP.3, 1-907 (20998)
?CND17: PRINTI "As the train lurches,"
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-899 (20964)
JUMP ?CND21
?ELS23: CALL START-SENTENCE,VAL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-910 (21083)
JUMP ?CND15
?ELS16: CALL START-SENTENCE,VAL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-902 (21040)
?CND21: PRINTR " at this point."
?ELS10: PRINTI "("
**** FILE PS:<SWG>GOAL.ZAP.3, 1-913 (21159)
?CND15: PRINTR " at this point."
?ELS8: PRINTI "("
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-910 (21181)
?ELS5: EQUAL? ARG,G-REACHED /TRUE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-921 (21299)
?ELS4: EQUAL? ARG,G-REACHED /TRUE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-916 (21279)
LESS? 2,STACK \?ELS3
**** FILE PS:<SWG>GOAL.ZAP.3, 1-927 (21397)
LESS? 2,STACK \?ELS2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-919 (21338)
?ELS3: FIRST? POCKET >X /?CND1
**** FILE PS:<SWG>GOAL.ZAP.3, 1-930 (21456)
?ELS2: FIRST? POCKET >X /?CND1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-922 (21403)
?CND1: NEXT? X >Y \?CND12
**** FILE PS:<SWG>GOAL.ZAP.3, 1-933 (21521)
?CND1: NEXT? X >Y \?CND7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-924 (21441)
?CND12: EQUAL? X,BRIEFCASE /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-935 (21558)
?CND7: EQUAL? X,BRIEFCASE /FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-935 (21670)
EQUAL? GARG,G-REACHED \?CND7
EQUAL? L,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS12
**** FILE PS:<SWG>GOAL.ZAP.3, 1-946 (21786)
EQUAL? GARG,G-REACHED \?CND5
EQUAL? L,VESTIBULE-REAR,VESTIBULE-REAR-DINER,OTHER-VESTIBULE-REAR \?ELS8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-938 (21805)
GRTR? P,PLATFORM-MAX \?CND13
**** FILE PS:<SWG>GOAL.ZAP.3, 1-949 (21920)
GRTR? P,PLATFORM-MAX \?CND9
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-940 (21858)
?CND13: GET STATION-ROOMS,P
**** FILE PS:<SWG>GOAL.ZAP.3, 1-951 (21972)
?CND9: GET STATION-ROOMS,P
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-945 (22012)
EQUAL? STACK,I-TRAVELER-FINDS-CONTACT \?ELS18
**** FILE PS:<SWG>GOAL.ZAP.3, 1-956 (22125)
EQUAL? STACK,I-TRAVELER-FINDS-CONTACT \?ELS12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-948 (22153)
JUMP ?CND10
?ELS18: CALL ESTABLISH-GOAL,GOAL-PERSON,PLATFORM-B
JUMP ?CND10
?ELS12: EQUAL? L,PLATFORM-B \?ELS22
**** FILE PS:<SWG>GOAL.ZAP.3, 1-959 (22266)
JUMP ?CND7
?ELS12: CALL ESTABLISH-GOAL,GOAL-PERSON,PLATFORM-B
JUMP ?CND7
?ELS8: EQUAL? L,PLATFORM-B \?ELS13
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-953 (22298)
ZERO? STACK /?CND23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-964 (22408)
ZERO? STACK /?CND14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-959 (22470)
IN? BRIEFCASE,GOAL-PERSON \?CND28
**** FILE PS:<SWG>GOAL.ZAP.3, 1-970 (22580)
IN? BRIEFCASE,GOAL-PERSON \?CND18
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-961 (22536)
?CND28: PRINTI "to"
**** FILE PS:<SWG>GOAL.ZAP.3, 1-972 (22646)
?CND18: PRINTI "to"
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-965 (22606)
?CND23: CALL ESTABLISH-GOAL,GOAL-PERSON,PLATFORM-A
JUMP ?CND7
?ELS22: EQUAL? L,PLATFORM-A \?ELS36
**** FILE PS:<SWG>GOAL.ZAP.3, 1-976 (22716)
?CND14: CALL ESTABLISH-GOAL,GOAL-PERSON,PLATFORM-A
JUMP ?CND5
?ELS13: EQUAL? L,PLATFORM-A \?ELS24
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-972 (22827)
EQUAL? EGO,BAD-SPY \?CND37
EQUAL? P,BAD-SPY-C \?CND37
**** FILE PS:<SWG>GOAL.ZAP.3, 1-983 (22937)
EQUAL? EGO,BAD-SPY \?CND25
EQUAL? P,BAD-SPY-C \?CND25
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-976 (22966)
?CND37: GET CHAR-LOCS,P >?TMP1
**** FILE PS:<SWG>GOAL.ZAP.3, 1-987 (23076)
?CND25: GET CHAR-LOCS,P >?TMP1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-979 (23068)
JUMP ?CND7
?ELS36: PRINTI "[!! LEAVE-TRAIN GOAL? ("
**** FILE PS:<SWG>GOAL.ZAP.3, 1-990 (23178)
JUMP ?CND5
?ELS24: PRINTI "[!! LEAVE-TRAIN GOAL? ("
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-987 (23212)
?CND10:
?CND7: ZERO? IDEBUG /?CND46
**** FILE PS:<SWG>GOAL.ZAP.3, 1-998 (23322)
?CND7:
?CND5: ZERO? IDEBUG /?CND30
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-993 (23298)
?CND46: RETURN VAL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1004 (23407)
?CND30: RETURN VAL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1005 (23593)
EQUAL? GARG,G-ENROUTE \?ELS9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1016 (23702)
EQUAL? GARG,G-ENROUTE \?ELS6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1007 (23666)
JUMP ?CND7
?ELS9: EQUAL? GARG,G-REACHED \?CND7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1018 (23775)
JUMP ?CND5
?ELS6: EQUAL? GARG,G-REACHED \?CND5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1010 (23747)
EQUAL? L,LIMBO-FWD,LIMBO-FWD-DINER,OTHER-LIMBO-FWD \?ELS14
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1021 (23856)
EQUAL? L,LIMBO-FWD,LIMBO-FWD-DINER,OTHER-LIMBO-FWD \?ELS9
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1016 (23930)
EQUAL? CAR,CARH \?ELS17
EQUAL? CARH,DINER-CAR,CAR-HERE /?CND18
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1027 (24038)
EQUAL? CAR,CARH \?ELS11
EQUAL? CARH,DINER-CAR,CAR-HERE /?CND12
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1019 (24021)
?CND18: CALL ESTABLISH-GOAL,GOAL-PERSON,GOAL,2
JUMP ?CND12
?ELS17: CALL L-FWD,CARH
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1030 (24129)
?CND12: CALL ESTABLISH-GOAL,GOAL-PERSON,GOAL,2
JUMP ?CND8
?ELS11: CALL L-FWD,CARH
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1023 (24150)
JUMP ?CND12
?ELS14: EQUAL? L,LIMBO-REAR,LIMBO-REAR-DINER,OTHER-LIMBO-REAR \?ELS24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1034 (24257)
JUMP ?CND8
?ELS9: EQUAL? L,LIMBO-REAR,LIMBO-REAR-DINER,OTHER-LIMBO-REAR \?ELS14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1030 (24356)
EQUAL? CAR,CARH \?ELS27
EQUAL? CARH,DINER-CAR,CAR-HERE /?CND28
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1041 (24461)
EQUAL? CAR,CARH \?ELS16
EQUAL? CARH,DINER-CAR,CAR-HERE /?CND17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1033 (24447)
?CND28: CALL ESTABLISH-GOAL,GOAL-PERSON,GOAL,2
JUMP ?CND12
?ELS27: CALL L-REAR,CARH
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1044 (24552)
?CND17: CALL ESTABLISH-GOAL,GOAL-PERSON,GOAL,2
JUMP ?CND8
?ELS16: CALL L-REAR,CARH
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1037 (24577)
JUMP ?CND12
?ELS24: PRINTI "[!! WALK-TRAIN GOAL? ("
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1048 (24681)
JUMP ?CND8
?ELS14: PRINTI "[!! WALK-TRAIN GOAL? ("
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1045 (24721)
?CND12:
?CND7: ZERO? IDEBUG /?CND37
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1056 (24824)
?CND8:
?CND5: ZERO? IDEBUG /?CND21
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1051 (24807)
?CND37: RETURN VAL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1062 (24909)
?CND21: RETURN VAL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1055 (24864)
FIRST? OBJ >F /?KLU15
?KLU15:
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1066 (24966)
FIRST? OBJ >F /?KLU9
?KLU9:
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1058 (24920)
NEXT? F >N /?KLU16
?KLU16: GETP F,P?CAR
ZERO? STACK /?CND9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1069 (25020)
NEXT? F >N /?CND3
?CND3: GETP F,P?CAR
ZERO? STACK /?CND5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1062 (25003)
FIRST? F \?CND9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1073 (25101)
FIRST? F \?CND5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1064 (25046)
?CND9: SET 'F,N
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1075 (25144)
?CND5: SET 'F,N
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1074 (25253)
ZERO? GARG \?ELS11
EQUAL? CLERK,EXTRA /?ELS11
ZERO? ON-TRAIN \?CND14
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1085 (25351)
ZERO? GARG \?ELS8
EQUAL? CLERK,EXTRA /?ELS8
ZERO? ON-TRAIN \?CND10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1083 (25421)
?CND14: RANDOM 2
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1094 (25517)
?CND10: RANDOM 2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1087 (25494)
LESS? NCAR,1 \?ELS25
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1098 (25590)
LESS? NCAR,1 \?ELS17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1089 (25531)
JUMP ?CND23
?ELS25: GRTR? NCAR,CAR-MAX \?CND23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1100 (25627)
JUMP ?CND16
?ELS17: GRTR? NCAR,CAR-MAX \?CND16
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1092 (25601)
?CND23: EQUAL? NCAR,DINER-CAR \?ELS30
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1103 (25697)
?CND16: EQUAL? NCAR,DINER-CAR \?ELS20
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1094 (25679)
JUMP ?CND28
?ELS30: CALL PICK-ONE,CAR-ROOMS-COMPS >DEST
?CND28: ZERO? DEBUG /?CND33
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1105 (25775)
JUMP ?CND19
?ELS20: CALL PICK-ONE,CAR-ROOMS-COMPS >DEST
?CND19: ZERO? DEBUG /?CND21
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1110 (25968)
?CND33: EQUAL? NCAR,GAS-CAR \?CND39
EQUAL? DEST,GAS-CAR-RM \?CND39
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1121 (26064)
?CND21: EQUAL? NCAR,GAS-CAR \?CND25
EQUAL? DEST,GAS-CAR-RM \?CND25
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1113 (26064)
?CND39: GET GOAL-TABLES,EXTRA-C
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1124 (26160)
?CND25: GET GOAL-TABLES,EXTRA-C
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1120 (26230)
?ELS11: EQUAL? GARG,G-ENROUTE \?ELS54
EQUAL? L,HERE \?CND55
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1131 (26326)
?ELS8: EQUAL? GARG,G-ENROUTE \?ELS33
EQUAL? L,HERE \?CND34
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1126 (26376)
?CND55: CALL VISIBLE?,LAST-EXTRA-LOC >VLEL
ZERO? VL /?ELS68
ZERO? VLEL \?ELS68
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1137 (26471)
?CND34: CALL VISIBLE?,LAST-EXTRA-LOC >VLEL
ZERO? VL /?ELS43
ZERO? VLEL \?ELS43
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1133 (26550)
?ELS68: ZERO? VL \?ELS80
ZERO? VLEL /?ELS80
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1144 (26645)
?ELS43: ZERO? VL \?ELS51
ZERO? VLEL /?ELS51
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1139 (26687)
?ELS80: SET 'LAST-EXTRA-LOC,L
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1150 (26782)
?ELS51: SET 'LAST-EXTRA-LOC,L
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1144 (26772)
?ELS54: EQUAL? GARG,G-REACHED \?CND52
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1155 (26867)
?ELS33: EQUAL? GARG,G-REACHED \?CND32
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1149 (26922)
?CND52: EQUAL? CAR-HERE,DINER-CAR \?ELS103
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1160 (27017)
?CND32: EQUAL? CAR-HERE,DINER-CAR \?ELS65
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1151 (27005)
JUMP ?CND101
?ELS103: CALL PICK-ONE,CAR-ROOMS-COMPS >DEST
?CND101: CALL CALL-FOR-EXTRA,DEST,CAR-HERE,EXTRA >EXTRA
ZERO? EXTRA /?ELS108
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1162 (27099)
JUMP ?CND64
?ELS65: CALL PICK-ONE,CAR-ROOMS-COMPS >DEST
?CND64: CALL CALL-FOR-EXTRA,DEST,CAR-HERE,EXTRA >EXTRA
ZERO? EXTRA /?ELS67
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1160 (27291)
JUMP ?CND106
?ELS108: CALL QUEUE,I-EXTRA,5
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1171 (27381)
JUMP ?CND66
?ELS67: CALL QUEUE,I-EXTRA,5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1163 (27353)
?CND106: ZERO? IDEBUG /?CND112
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1174 (27441)
?CND66: ZERO? IDEBUG /?CND68
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1167 (27418)
?CND112: RETURN VL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1178 (27504)
?CND68: RETURN VL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1172 (27490)
ZERO? TICKETS-PUNCHED? /?ELS3
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1183 (27575)
ZERO? TICKETS-PUNCHED? /?ELS2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1174 (27551)
?ELS3: ZERO? ON-TRAIN /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1185 (27636)
?ELS2: ZERO? ON-TRAIN /FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1179 (27658)
ZERO? X \?THN13
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1190 (27743)
ZERO? X \?THN7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1181 (27695)
ZERO? X /?CND10
?THN13: GET X,REXIT >X
?CND10: ZERO? X /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1192 (27779)
ZERO? X /?CND6
?THN7: CALL GET-REXIT-ROOM,X >X
?CND6: ZERO? X /FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1192 (27910)
ZERO? GARG \?ELS11
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1203 (28001)
ZERO? GARG \?ELS8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1198 (28048)
?ELS11: EQUAL? GARG,G-REACHED \?ELS19
EQUAL? L,PLATFORM-A \?ELS24
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1209 (28138)
?ELS8: EQUAL? GARG,G-REACHED \?ELS13
EQUAL? L,PLATFORM-A \?ELS17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1204 (28224)
ZERO? STACK /?ELS29
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1215 (28313)
ZERO? STACK /?ELS21
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1210 (28350)
?ELS29: ZERO? IDEBUG /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1221 (28439)
?ELS21: ZERO? IDEBUG /FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1214 (28413)
?ELS24: EQUAL? L,VESTIBULE-FWD,OTHER-VESTIBULE-FWD \?ELS47
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1225 (28502)
?ELS17: EQUAL? L,VESTIBULE-FWD,OTHER-VESTIBULE-FWD \?ELS32
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1217 (28574)
ZERO? IDEBUG /?CND48
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1228 (28663)
ZERO? IDEBUG /?CND33
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1222 (28640)
?CND48: RETURN X
?ELS47: EQUAL? L,VESTIBULE-REAR,OTHER-VESTIBULE-REAR \?ELS55
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1233 (28729)
?CND33: RETURN X
?ELS32: EQUAL? L,VESTIBULE-REAR,OTHER-VESTIBULE-REAR \?ELS37
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1228 (28882)
ZERO? IDEBUG /?CND56
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1239 (28971)
ZERO? IDEBUG /?CND38
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1233 (28948)
?CND56: RETURN X
?ELS55: ZERO? IDEBUG /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1244 (29037)
?CND38: RETURN X
?ELS37: ZERO? IDEBUG /FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1238 (29029)
?ELS19: EQUAL? GARG,G-ENROUTE \FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1249 (29118)
?ELS13: EQUAL? GARG,G-ENROUTE \FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1240 (29090)
ZERO? STACK /?CND72
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1251 (29179)
ZERO? STACK /?CND47
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1244 (29207)
ZERO? DEBUG \?THN78
EQUAL? X,FALSE-VALUE,PLAYER-NOT-FACING /?CND72
?THN78: ZERO? DEBUG /?CND80
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1255 (29296)
ZERO? DEBUG \?THN50
EQUAL? X,FALSE-VALUE,PLAYER-NOT-FACING /?CND47
?THN50: ZERO? DEBUG /?CND52
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1248 (29320)
?CND80: CALL THIS-IS-IT,TICKET
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1259 (29409)
?CND52: CALL THIS-IS-IT,TICKET
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1250 (29384)
IN? CONDUCTOR,HERE /?CND88
ZERO? X /?CND88
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1261 (29473)
IN? CONDUCTOR,HERE /?CND58
ZERO? X /?CND58
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1257 (29539)
?CND88: PRINTI " stops "
IN? CONDUCTOR,HERE \?CND99
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1268 (29628)
?CND58: PRINTI " stops "
IN? CONDUCTOR,HERE \?CND67
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1260 (29611)
?CND99: PRINTI "to "
ZERO? CUSTOMS-SWEEP /?ELS108
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1271 (29700)
?CND67: PRINTI "to "
ZERO? CUSTOMS-SWEEP /?ELS74
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1263 (29710)
JUMP ?CND106
?ELS108: PRINTI "punch tickets."
?CND106: ZERO? X \?CND116
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1274 (29798)
JUMP ?CND73
?ELS74: PRINTI "punch tickets."
?CND73: ZERO? X \?CND79
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1267 (29799)
?CND116: CRLF
?CND72: ZERO? IDEBUG /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1278 (29883)
?CND79: CRLF
?CND47: ZERO? IDEBUG /FALSE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1284 (30116)
EQUAL? L,STACK \?ELS3
EQUAL? CAR,CAR-HERE \?ELS3
ZERO? CUSTOMS-SWEEP \?THN6
FSET? PLAYER,LOCKED \?ELS3
?THN6: RETURN PLAYER
?ELS3: EQUAL? L,GAS-CAR-RM \?CND1
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1295 (30199)
EQUAL? L,STACK \?ELS2
EQUAL? CAR,CAR-HERE \?ELS2
ZERO? CUSTOMS-SWEEP \?THN3
FSET? PLAYER,LOCKED \?ELS2
?THN3: RETURN PLAYER
?ELS2: EQUAL? L,GAS-CAR-RM \?CND1
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1291 (30312)
ZERO? CUSTOMS-SWEEP \?THN12
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1302 (30395)
ZERO? CUSTOMS-SWEEP \?THN6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1293 (30374)
?THN12: SET 'CONDUCTOR-KNOWS,BRIEFCASE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1304 (30456)
?THN6: SET 'CONDUCTOR-KNOWS,BRIEFCASE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1295 (30424)
?CND1: FIRST? L >O /?KLU29
?KLU29:
?PRG14: ZERO? O \?ELS18
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1306 (30505)
?CND1: FIRST? L >O /?KLU18
?KLU18:
?PRG8: ZERO? O \?ELS11
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1299 (30500)
?ELS18: FSET? O,PERSONBIT \?CND16
FSET? O,LOCKED \?CND16
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1310 (30580)
?ELS11: FSET? O,PERSONBIT \?CND10
FSET? O,LOCKED \?CND10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1302 (30575)
EQUAL? CAR,STACK \?CND16
ZERO? VAL \?CND23
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1313 (30655)
EQUAL? CAR,STACK \?CND10
ZERO? VAL \?CND14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1305 (30635)
?CND23: CALL IN-MOTION?,O
ZERO? STACK /?CND16
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1316 (30715)
?CND14: CALL IN-MOTION?,O
ZERO? STACK /?CND10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1310 (30765)
?CND16: NEXT? O >O /?KLU30
?KLU30: JUMP ?PRG14
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1321 (30845)
?CND10: NEXT? O >O /?KLU19
?KLU19: JUMP ?PRG8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1324 (31073)
ZERO? IDEBUG /?CND19
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1335 (31152)
ZERO? IDEBUG /?CND15
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1327 (31120)
?CND19: RETURN 2
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1338 (31199)
?CND15: RETURN 2
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1333 (31217)
?CND1: ZERO? GARG /?CND7
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1344 (31296)
?CND1: ZERO? GARG /?CND5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1338 (31299)
?CND7: EQUAL? HERE,ROOF \?ELS19
ZERO? SUPPRESS-I-BOND \?ELS22
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1349 (31378)
?CND5: EQUAL? HERE,ROOF \?ELS12
ZERO? SUPPRESS-I-BOND \?ELS14
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1346 (31481)
JUMP ?CND17
?ELS22: SET 'SUPPRESS-I-BOND,FALSE-VALUE
JUMP ?CND17
?ELS19: INC 'BOND-CTR
EQUAL? 1,BOND-CTR \?ELS31
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1357 (31560)
JUMP ?CND11
?ELS14: SET 'SUPPRESS-I-BOND,FALSE-VALUE
JUMP ?CND11
?ELS12: INC 'BOND-CTR
EQUAL? 1,BOND-CTR \?ELS18
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1353 (31668)
JUMP ?CND17
?ELS31: EQUAL? 2,BOND-CTR \?ELS33
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1364 (31747)
JUMP ?CND11
?ELS18: EQUAL? 2,BOND-CTR \?ELS19
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1359 (31818)
EQUAL? CAR,CAR-HERE /?CND29
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1370 (31897)
EQUAL? CAR,CAR-HERE /?CND17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1361 (31871)
JUMP ?CND29
?ELS33: EQUAL? 3,BOND-CTR \?ELS38
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1372 (31950)
JUMP ?CND17
?ELS19: EQUAL? 3,BOND-CTR \?ELS22
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1365 (31961)
ZERO? STACK \?PRD42
PUSH 1
JUMP ?PRD43
?PRD42: PUSH 0
?PRD43: SET 'VAL,STACK
ZERO? VAL /?CND29
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1376 (32040)
ZERO? STACK \?PRD24
SET 'VAL,1
JUMP ?PRD25
?PRD24: SET 'VAL,0
?PRD25: ZERO? VAL /?CND17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1373 (32141)
JUMP ?CND29
?ELS38: EQUAL? 4,BOND-CTR \?ELS47
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1383 (32211)
JUMP ?CND17
?ELS22: EQUAL? 4,BOND-CTR \?ELS29
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1378 (32262)
ZERO? VAL /?CND29
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1388 (32332)
ZERO? VAL /?CND17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1383 (32428)
JUMP ?CND29
?ELS47: EQUAL? 5,BOND-CTR \?CND17
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1393 (32498)
JUMP ?CND17
?ELS29: EQUAL? 5,BOND-CTR \?CND11
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1386 (32503)
?CND29:
?CND17: ZERO? IDEBUG /?CND55
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1396 (32573)
?CND17:
?CND11: ZERO? IDEBUG /?CND35
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1392 (32590)
?CND55: RETURN VAL
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1402 (32660)
?CND35: RETURN VAL
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1432 (33094)
GRTR? ATT,0 /?CND6
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1442 (33164)
GRTR? ATT,0 /?CND5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1434 (33128)
?CND6: DEC 'ATT
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1444 (33198)
?CND5: DEC 'ATT
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1436 (33176)
ZERO? PER \?ELS11
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1446 (33246)
ZERO? PER \?ELS8
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1439 (33233)
JUMP ?CND9
?ELS11: ZERO? ATT \?ELS15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1449 (33302)
JUMP ?CND7
?ELS8: ZERO? ATT \?ELS11
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1442 (33295)
EQUAL? PER,BAD-SPY \?ELS18
ZERO? BAD-SPY-DONE-PEEKING \?ELS18
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1452 (33363)
EQUAL? PER,BAD-SPY \?ELS13
ZERO? BAD-SPY-DONE-PEEKING \?ELS13
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1445 (33393)
JUMP ?CND16
?ELS18: EQUAL? PER,CONDUCTOR \?ELS22
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1455 (33461)
JUMP ?CND12
?ELS13: EQUAL? PER,CONDUCTOR \?ELS15
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1448 (33467)
JUMP ?CND16
?ELS22: PUTP PER,P?LDESC,14
?CND16: EQUAL? PER,CONDUCTOR \?THN28
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1458 (33535)
JUMP ?CND12
?ELS15: PUTP PER,P?LDESC,14
?CND12: EQUAL? PER,CONDUCTOR \?THN17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1452 (33571)
ZERO? STACK \?CND9
?THN28: PUT GT,GOAL-ENABLE,TRUE-VALUE
JUMP ?CND9
?ELS15: EQUAL? ATT,1 \?CND9
IN? PER,HERE \?CND9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1462 (33639)
ZERO? STACK \?CND7
?THN17: PUT GT,GOAL-ENABLE,TRUE-VALUE
JUMP ?CND7
?ELS11: EQUAL? ATT,1 \?CND7
IN? PER,HERE \?CND7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1459 (33759)
ZERO? STACK /?CND9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1469 (33827)
ZERO? STACK /?CND7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1461 (33802)
?CND9: PUT GT,ATTENTION,ATT
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1471 (33870)
?CND7: PUT GT,ATTENTION,ATT
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1472 (34049)
ZERO? STACK /?CND4
ZERO? LEN /?ELS9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1482 (34117)
ZERO? STACK /?CND3
ZERO? LEN /?ELS6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1475 (34104)
JUMP ?CND7
?ELS9: GET GT,ATTENTION-SPAN >ATT
?CND7: PUT GT,ATTENTION,ATT
ZERO? ATT \?ELS15
EQUAL? PERSON,CONDUCTOR \?THN19
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1485 (34172)
JUMP ?CND5
?ELS6: GET GT,ATTENTION-SPAN >ATT
?CND5: PUT GT,ATTENTION,ATT
ZERO? ATT \?ELS8
EQUAL? PERSON,CONDUCTOR \?THN10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1482 (34279)
?THN19: PUT GT,GOAL-ENABLE,TRUE-VALUE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1492 (34346)
?THN10: PUT GT,GOAL-ENABLE,TRUE-VALUE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1484 (34328)
?ELS15: GET GT,GOAL-ENABLE
ZERO? STACK /?CND4
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1494 (34395)
?ELS8: GET GT,GOAL-ENABLE
ZERO? STACK /?CND3
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1487 (34410)
?CND4: CALL SAID-TO,PERSON
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1497 (34476)
?CND3: CALL SAID-TO,PERSON
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1496 (34605)
ZERO? X \?THN9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1506 (34671)
ZERO? X \?THN5
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1498 (34641)
ZERO? X /?CND6
?THN9: GET X,REXIT >L1
?CND6: CALL STOP-CONDUCTOR? >PER
ZERO? PER /?ELS15
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1508 (34707)
ZERO? X /?CND4
?THN5: CALL GET-REXIT-ROOM,X >L1
?CND4: CALL STOP-CONDUCTOR? >PER
ZERO? PER /?ELS10
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1505 (34832)
EQUAL? PER,PLAYER \?ELS20
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1515 (34908)
EQUAL? PER,PLAYER \?ELS15
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1507 (34876)
EQUAL? HERE,STACK \?ELS25
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1517 (34952)
EQUAL? HERE,STACK \?ELS17
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1509 (34936)
JUMP ?CND23
?ELS25: CALL FIND-FLAG-LG,HERE,DOORBIT >X
ZERO? X /?CND30
FSET? X,LOCKED \?CND30
ZERO? TICKET-KNOCK /?ELS37
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1519 (35012)
JUMP ?CND16
?ELS17: CALL FIND-FLAG-LG,HERE,DOORBIT >X
ZERO? X /?CND20
FSET? X,LOCKED \?CND20
ZERO? TICKET-KNOCK /?ELS24
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1515 (35083)
JUMP ?CND30
?ELS37: SET 'TICKET-KNOCK,TRUE-VALUE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1525 (35159)
JUMP ?CND20
?ELS24: SET 'TICKET-KNOCK,TRUE-VALUE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1518 (35176)
?CND30: SET 'TICKET-KNOCK,FALSE-VALUE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1528 (35252)
?CND20: SET 'TICKET-KNOCK,FALSE-VALUE
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1524 (35323)
?CND23: EQUAL? PRSA,V?SAY,V?TELL \?ELS47
JUMP ?CND45
?ELS47: GET GESTURE-TABLE,0
LESS? TICKET-COUNT,STACK \?ELS49
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1534 (35399)
?CND16: EQUAL? PRSA,V?SAY,V?TELL \?ELS30
JUMP ?CND29
?ELS30: GET GESTURE-TABLE,0
LESS? TICKET-COUNT,STACK \?ELS31
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1529 (35463)
JUMP ?CND45
?ELS49: CALL ARREST-PLAYER
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1539 (35539)
JUMP ?CND29
?ELS31: CALL ARREST-PLAYER
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1532 (35555)
?CND45: PRINTI " makes a gesture"
LESS? 1,TICKET-COUNT \?CND56
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1542 (35631)
?CND29: PRINTI " makes a gesture"
LESS? 1,TICKET-COUNT \?CND36
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1536 (35668)
?CND56: SET 'VAL,TRUE-VALUE
ZERO? CUSTOMS-SWEEP /?ELS63
GRTR? 5,TICKET-COUNT \?ELS67
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1546 (35744)
?CND36: SET 'VAL,TRUE-VALUE
ZERO? CUSTOMS-SWEEP /?ELS41
GRTR? 5,TICKET-COUNT \?ELS43
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1540 (35785)
JUMP ?CND65
?ELS67: PRINTI ", demanding that you"
?CND65: PRINTI " leave the train."
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1550 (35861)
JUMP ?CND42
?ELS43: PRINTI ", demanding that you"
?CND42: PRINTI " leave the train."
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1544 (35882)
JUMP ?CND61
?ELS63: EQUAL? PER,PLAYER \?CND61
GRTR? 5,TICKET-COUNT \?ELS80
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1554 (35958)
JUMP ?CND40
?ELS41: EQUAL? PER,PLAYER \?CND40
GRTR? 5,TICKET-COUNT \?ELS52
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1548 (35987)
JUMP ?CND78
?ELS80: PRINTI ", demanding "
?CND78: CALL THIS-IS-IT,TICKET
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1558 (36063)
JUMP ?CND51
?ELS52: PRINTI ", demanding "
?CND51: CALL THIS-IS-IT,TICKET
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1554 (36101)
?CND61: CALL ARREST-MCGUFFIN?
EQUAL? EGO,BAD-SPY \?CND94
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1564 (36177)
?CND40: CALL ARREST-MCGUFFIN?
EQUAL? EGO,BAD-SPY \?CND62
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1557 (36189)
?CND94: RETURN VAL
?ELS20: FCLEAR PER,LOCKED
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1567 (36265)
?CND62: RETURN VAL
?ELS15: FCLEAR PER,LOCKED
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1562 (36307)
ZERO? STACK /?CND99
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1572 (36383)
ZERO? STACK /?CND64
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1565 (36387)
?CND99: CALL VISIBLE?,PER >X
EQUAL? X,FALSE-VALUE,PLAYER-NOT-FACING \?THN107
ZERO? DEBUG /FALSE
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1575 (36463)
?CND64: CALL VISIBLE?,PER >X
EQUAL? X,FALSE-VALUE,PLAYER-NOT-FACING \?THN69
ZERO? DEBUG /?PRD68
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1569 (36501)
?THN107: CALL START-SENTENCE,CONDUCTOR
ZERO? CUSTOMS-SWEEP /?ELS117
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1579 (36577)
ZERO? 1 /?PRD68
?THN69: CALL START-SENTENCE,CONDUCTOR
ZERO? CUSTOMS-SWEEP /?ELS77
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1574 (36639)
JUMP ?CND115
?ELS117: EQUAL? EGO,BAD-SPY \?CND123
EQUAL? PER,BAD-SPY \?CND123
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1585 (36731)
JUMP ?CND76
?ELS77: EQUAL? EGO,BAD-SPY \?CND80
EQUAL? PER,BAD-SPY \?CND80
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1579 (36765)
?CND123: PRINTI " punches"
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1590 (36853)
?CND80: PRINTI " punches"
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1582 (36833)
?CND115: ZERO? X \?CND130
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1593 (36920)
?CND76: ZERO? X \?CND85
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1584 (36873)
?CND130: CRLF
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1595 (36958)
?CND85: CRLF
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1586 (36898)
?ELS15: GET GOAL-TABLES,CONDUCTOR-C
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1597 (36982)
?PRD68: PUSH 0
RSTACK
?ELS10: GET GOAL-TABLES,CONDUCTOR-C
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1589 (36999)
ZERO? X /?CND137
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1602 (37109)
ZERO? X /?CND89
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1591 (37057)
ZERO? STACK \?THN143
ZERO? L1 /?ELS142
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1604 (37166)
ZERO? STACK \?THN92
ZERO? L1 /?ELS93
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1594 (37140)
ZERO? STACK /?ELS142
?THN143: SET 'TOUCH-CAP?,TRUE-VALUE
JUMP ?CND137
?ELS142: SET 'TOUCH-CAP?,FALSE-VALUE
?CND137: GETP L,P?STATION
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1607 (37247)
ZERO? STACK /?ELS93
?THN92: SET 'TOUCH-CAP?,TRUE-VALUE
JUMP ?CND89
?ELS93: SET 'TOUCH-CAP?,FALSE-VALUE
?CND89: GETP L,P?STATION
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1609 (37464)
EQUAL? X,PLAYER /?THN9
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1622 (37566)
EQUAL? X,PLAYER /?THN6
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1615 (37603)
?THN9: MOVE OBJ,LIMBO-FWD
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1628 (37705)
?THN6: MOVE OBJ,LIMBO-FWD
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1635 (38122)
ZERO? PER \?CND11
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1648 (38224)
ZERO? PER \?CND7
***************
**** FILE PS:<SWG>GOAL.ZAP.1, 1-1637 (38163)
?CND11: CALL START-SENTENCE,PER
**** FILE PS:<SWG>GOAL.ZAP.3, 1-1650 (38264)
?CND7: CALL START-SENTENCE,PER
***************