PBA 06/10/76 TABLEAU II ADR W1 W2 W3 W4 ISN LAREL OP OPERANDE 1 * LISTE DE PROGRAMME PGOL - JEU # 409 2 * ETIQUETTES F11-F20 INDICATEUR DE RETOURNEMENT ET EMBOUCHIRE DE FRAPPE 3 * F1 TOUS LES DISPOSITES DE RETOURNEMENT BAISSES 4 * F2 TOUTES CIBLES BATSSEES 5 * F3 TOUTES CTBLES BATSSEES - SEUL LE PRENIER JOUE 6 * F4 RECOMPENBE SPECIALE 7 * L4 LE MINE DOUEUR REJOUE 8 * F5 FRAPPE SFECIALE 9 * F6 FRAPPE SUPPELEMENTAIRE 10 * F38 BILLE S = O, BILLE 3 = 1 11 * F7 ETIQUETTE TFMP - (10 POINTS) 12 * F9 ETIQUETTE TEMP 13 * F21 BILLE SUPPLEMENTAIRE 14 * 0100 E 4 1 5 15 GOTO INIT 0104 E 2 6 B 16 GOTO BONUS 0108 F F F F 17 FILL 24 0120 E 3 C R 18 SIOP GOTO IOP 10 POINTS 0124 E 3 C B 19 SCPB GOTO CPB TAMPON CENTRAL 0128 E 3 A 3 20 SRIG GOTO RTG CIBLE DRDITE 0129 E 2 F D 21 SCTG GOTO CTG CIBLE CENTRALE 0130 E 3 B 5 22 SLTG GOTO LTG CIBLE GAUCHE 0134 F F F F 23 FILL 12 0140 E 1 C D 24 SRRO GOTO BROI RETOURNEMENT BLEU 0144 E 1 D 1 25 SGRO GOTO GROI RETOURNEMENT VERT 0148 1 A 5 26 SRRB SCORE A1000,5 BOUTON DRDIT DE RETOURNEMENT 0148 C 27 STOP 0140 F 2 0 C 28 SWDT GOTO WDT CIBLF TDMBANTE BLANCHE 0150 E 2 0 2 29 SYDT GOTO YDT CIBLE TOMBANTE JAUNE 0154 F F F F 30 FILL 12 0160 E 2 2 A 31 SGDT GOTO GDT CIBLE TOMBANTE VERTE 0164 E 1 B 2 32 SRRO GOTO RROI RETOURNEMENT ROUGE 0168 E 2 1 6 33 SRDT GOTO RDT CIBLE TOMBANTE ROUGE 0160 E 1 9 0 34 SYRO GOTO YROI RETOURNEMENT JAUNE 0170 E 1 A 1 35 SWRD GOTO WROI RETOURNEMENT BLANC 0174 F F F F 36 FILL 12 0180 E 3 7 F 37 SRPB GOTO POP TAMPONS DRDITS 0184 E 3 1 2 38 SRHL GOTO RHI. TROU DRDIT 0188 E 3 0 9 39 SLHL GOTO LHI. TROU GAUCHE 0180 E 2 2 0 40 SBDT GOTO HDT CIBLE TOMBANTE BIEUE 41 * 42 * RETOURNFMENT JAUNE TABLEAU II (suite) PBA 06/10/76 ADR :W1 W2 W3 W4 ISN LABEL OP OPERANDE 0190 0 C 7 43 YROI COPY TL28 0193 2 4 7 44 SET FL28 0196 2 6 6 45 SET FL22 0199 2 C 2 46 SET TL8 019C 9 47 INCR 019D E 1 D E 48 GOTO ROV 49 * 50 * RETROUNEMENT BLANC 51 * 01A1 0 D 8 52 WROI COPY TL29 01A4 2 5 8 53 SET FL29 01A7 2 7 6 54 SET FL23 01AA 2 E 2 55 SET TL6 01AD 9 56 INCR 01AE E 1 D E 57 GOTO ROV 58 * 59 * RETOURNEMENT ROUGE 60 * 0182 0 E 8 61 RROI COPY TL39 0185 2 6 8 62 SET FL 30 0188 2 D 2 63 SET TL5 0188 9 64 INCR QIBC E 1 D E 65 GOTO ROV 66 * 67 * RETOURNEMENT BLEU 68 * 01C0 0 F 8 69 BROI COPY TL31 01C3 2 7 8 70 SET FL31 01C6 2 4 6 71 SET FL24 01C9 2 F 2 72 SET TL7 01C0 9 73 INCR 01C0 E 1 D E 74 GOTO ROV 75 * 76 * RETOURNEMENT VERT 77 * 01D1 0 C 8 78 GROI COPY TL 32 01D4 2 4 8 79 SET FL 32 01D7 2 5 7 80 SET FL75 01DA 2 D 3 81 SET TL9 01DD 9 82 INCR 83 * 84 * RETOURNEMENT TABLE II (suite) PBA 08/10/76 ACR W1 W2 W3 W4 ISN LABEL OP OPERANDE 85 * 01DE 0 D 2 86 ROV COPY TL5 SI TOUS LES COMMUTATEURS DE RETOURNEMENT BAISSES 01E1 0 E 2 87 COPY TL6 01E4 0 F 2 88 COPY TL7 01E7 0 C 2 89 COPY TL8 01EA 0 D 3 90 COPY TL9 01ED 2 9 0 91 SET TF1 F1=1 01F0 2 B 0 92 SET TF3 ETIQUETTE PREMIER PASSASE 01F3 B 93 FLAS 01F4 0 0 1 94 COPY FFB 01F7 1 8 5 95 SCORE A100,5 01FA H 96 FLAG O1FB 2 0 1 97 SET FF8 01FE E 3 D 2 98 GOTO RODT 99 * 100 * CIBLE TOMBAMFE JAUNE 101 * 0202 0 5 4 102 YDT COPY FL13 DOPIE NECESSAIBE D'ETIQUETT PREMIER PASSAGE 0205 2 0 4 103 SET TL13 0208 E 2 3 0 104 GOTO DT 105 GOTO DT 106 * CIBLE TOMBANTE BLANCHE 020C 0 T 3 107 WOT COPY FLII 020F 2 F 3 108 SET TLII 0212 E 2 3 O 109 GOTO DT 110 111 CIBLE TOMBANTE ROUGE 0216 0 6 3 112 RDT COPY FLIO 0219 2 E 3 113 SET TLIO 021C E 2 3 0 114 GOTO DT 115 * 116 * CTBLE TOMBANTE BLEUE 0220 0 4 3 117 BDT COPY FL12 0223 2 C 3 118 SET TL12 0226 E 2 3 0 119 GOTO DT 120 * 121 * CIBLE TOMBANTE VERTE 022A 0 6 4 122 GDT COPY FL14 022D 2 E 4 123 SET TL14 124 * 125 * CIBLES TOMBANTES - BILLE SUPPLEMENTA*RES ET LAMPES SPECIALES 126 * TABLEAU II (suite) PBA 06/10/76 ADR W1 W2 W3 W4 ISN LABEL OP OPERANDE 0230 0 E 3 127 DT COPY TL10 0231 0 F 3 128 COPY TL11 0236 0 C 3 129 COPY TL12 0239 0 D 4 130 COPY TL13 0230 0 E 4 131 COPY TL14 023F 2 A 0 132 SET TF2 0242 2 B 0 133 SET TF3 0245 2 E 7 134 SET TL26 CIBLE CENTRALE 135 * 136 * CIBLES TOMBANTES - MARQUE 137 * 0248 B 138 FLAG 0249 7 1 139 REQL 1 0248 1 A 1 140 SCORE A1000,1 024E B 141 FLAG 024F 7 2 142 REQL 2 0251 1 A 2 143 SCORE A1000,2 0254 B 144 FLAG 0255 7 B 145 REQL 3 0257 1 A 3 146 SCORE A1000,3 0254 B 147 FLAG 025B 7 B 148 REQL 4 0250 0 A 4 149 SCORF A1000,4 0260 B 150 FLAG 0261 7 5 151 REQL 5 0263 1 A 5 152 SCORF A1000,5 0266 B 153 FLAG 0267 E 3 D 2 154 GOTO ROOT 155 * 156 * DECOMPTAGE BONUS 157 * 158 * BONUS VERT 159 * 0260 2 F 5 160 RONUS SET TL19 020E 0 0 3 161 COPY TL9 0271 0 E 4 162 COPY TL14 0274 1 A 1 163 SCORE A1000,1 0277 F F 164 FILL 2 0279 0 C 5 165 COPY TL20 0270 0 0 6 166 CPY TL21 0273 1 A 1 167 SCORE A1000,1 0292 F E 168 FILL 2 TABLEAU II (Suite) PBA 06/10/76 AUPA W1 W2 W3 W4 ISN LABEL OP DPERANCE 0284 B 169 FLAS 0285 2 7 5 170 SET FL19 171 * 172 * BONUS JAUNE 173 * 0286 2 E 5 174 SET TL18 JAUNE 0288 0 C 2 175 COPY TL8 028E 0 0 4 176 COPY TL13 0291 1 A 2 177 SCORE A1000,2 0294 F F 178 FILL 2 0296 0 C 5 179 COPY TL20 0299 0 0 6 180 COPY TL21 029C 1 A 2 181 SCORE A1000,2 0291 F F 182 FILL 2 02A1 B 183 FLAG 02A2 2 6 5 184 SET FL18 185 * 186 * BONUS PLEU 02A5 2 D 5 187 SET TL17 02A8 D F 2 188 COPY TL7 02AB 0 C 3 189 COPY TL12 02AE 1 A 3 190 SCORE A1000.3 02B1 F F 191 FILL 2 02B3 0 C 5 192 COPY TL20 02B6 0 D 6 193 COPY TL21 0289 1 A 3 194 SCORE A1000,3 0280 F F 195 FILL 2 028E B 196 FLAB 028F 2 6 5 197 SET FL17 198 * 199 * BONUS BLANC 0202 2 C 4 200 SET TL16 0205 0 E 2 201 COPY TL6 0208 0 F 3 202 COPY TL11 0208 1 A 4 203 SCORE A1000.4 020E F F 204 FILL 2 02D0 0 C 5 205 COPY TL20 O2D3 0 D 6 206 COPY TL21 O2D6 1 A 4 207 SCORE A1000.4 0209 F F 208 FILL 2 020B B 209 FLAG 020C 2 4 4 210 SET FL16 PBA 06/10/76 TABLEAU II (suite) ADP W1 W2 W3 W4 ISN LABEL OP OPERANDE 211 * 212 * SONUS ROUGE 02DF 2 F 4 213 SET TLIS 02E2 0 D 2 214 COPY TLS 02E5 0 E 3 215 COPY TL10 02E8 1 A 5 216 SCORE A1000.5 02EB F F 217 FILL 2 02E0 0 C 5 218 COPY TL20 02F0 0 D 6 219 COPY TL21 02F3 1 A 5 220 SCORE A1000.5 02F6 F F 221 FILL 2 02F8 8 222 FLAG 02F9 2 7 4 223 SET FL15 02FC C 224 STOP 225 * 226 * CIBLE CENTRALE 227 * 02FD 0 6 7 228 CTG COPY FL26 CIBLE CENTRALE = 17 0300 1 B 5 229 SCORE AInq,5 0309 D 230 TOGL 0304 1 A 5 231 SCORE A1000.5 0307 C 232 STOP 233 * 234 * TROU GAUCHE 235 * 030B 2 C 5 236 LHL SET TL20 DOUBLE BONUS MOITIE GAUCHE = 1 030B 2 2 5 237 SET FF22 030E E 3 1 8 238 GOTO HOLE 239 * 240 * 241 * TROU DRGIT 0312 2 D 6 242 RML SET TL21 DOUBLE BONUS MOITIE DROITE = 1 0315 2 A 5 243 SET TF22 0318 0 A 9 244 HOLE COPY TF38 3 BILLES 7 031B 1 A 5 245 SCORC A1000,5 MARGUER 5000 031F D 246 TOGL SINON 031F 1 A 3 247 SCORE A1000.3 MARGUER 3000 0322 B 248 FLAB 0323 0 A 5 249 COPY TF22 0326 2 A D 250 SET T56 0324 D 251 TOGL 032A 2 B D 252 SET IST TABLEAU II (suite) PBA 06/10/76 ADR W1 W2 W3 W4 ISN LABEL OP OPERANDE 032D B 253 FLAG TF34 032E 2 A 8 254 SET TF8 0331 2 8 1 255 SET TF12 0334 0 9 2 256 COPY TF38 3 BILLES 0337 0 A 9 257 COPY TF11 033A A B 2 258 OR YRO1 ECLAIRER RETOURNEMENT JAUNE 033D E 1 9 0 259 GOTO 0341 B 260 FLAG TF14 0342 0 A 3 261 COPY TF38 0345 0 A 9 262 COPY TF13 034B A 9 3 263 OR WRO1 ECLAIRER RETOURNEMENT BLANC 0348 E 1 A 1 264 GOTO 034F B 265 FLAG 0350 0 8 3 266 COPY TF16 0353 0 A 9 267 COPY TF38 0356 A B 3 268 OR TF15 0359 E 1 B 2 269 GOTO RRO1 ECLAIRER RETOURNEMENT ROUGE 035D B 270 FLAG 035E 0 A 4 271 COPY TF18 0361 0 .A 9 272 COPY TF38 0364 A 9 4 273 OR TF17 0367 F 1 C 0 274 GOTO BR01 ECLAIRER RETOURNEMENT BLEU 036B B 275 FLAG 036C 0 8 4 276 COPY TF20 036F 0 A 9 277 COPY TF38 0372 A B 4 278 OR TF19 0375 E 1 D 1 279 GOTO GRO1 ECLAIRER RETOURNEMENT VERT 0379 B 280 FLAG 037A 2 0 1 281 SET FF8 037D C 282 STOP . 283 * . 284 * TAMPONS GAUCHES OU DROITS 285 * 037E 1 8 1 286 POP SCOPE A100,1 0381 4 287 LBDN DEPLACER ETIQUETTE RETOUREMENT D'UNE POSITION 288 * 289 * LAMPE BILLE SUPPLEMENTAIRE (L41.L40) 290 * 0382 E 4 5 9 291 6010 POP01 292 * 293 * CIBLE GAUCHE 294 * TABLEAU II (suite) PBA 06/10/76 ADR W1 W2 W3 W4 ISN LABEL OP OPERANDE 0386 1 B 5 295 LTG SCORE A100,5 0389 0 F 9 296 COPY TL35 SPECIAL ? 038C 2 7 9 297 SET FL35 L35=0 038F 2 9 1 298 SET TF5 SPECIAL INHIBE 0392 2 B 0 299 .SET TF4 ETIQUETTE EREDIT 0395 B 300 FLAG 0396 0 E 9 301 COPY TL34 BILLE RUPPLEMENTAIRE = 1 7 0399 2 8 9 302 SET FL34 L34 = O 039C 2 A 1 303 SET TF6 IMMIBER BILLE SUPPLEMENTAIRE 039F 2 9 5 304 SET TF21 ETIQUETTE BILLE SUPPLEMENTAIRE 03A2 C 305 STOP 306 * 307 * CIBLE DROITE 308 * 03A3 1 B 5 309 RTG SCORE A100,5 SPECIAL ? 03A6 0 C 9 310 COPY TL36 L36=0 03A9 2 4 9 311 SET FL36 03AC 2 9 1 312 SET TF5 03AF 2 B 0 313 SET TF4 ETIQUETTE CREDIT 03B2 B 314 FLAG 03B3 0 0 9 315 COPY TL33 BILLE SUPPLEMENTAIRE ? 03B6 2 5 9 316 SET FL33 L40=0 03B9 2 A 1 317 SET TF6 03BC 2 9 5 318 SET TF21 ETIQUETTE BILLE SUPPLEMENTAIRE 03BF C 319 STOP 320 * 321 * TAMPON CENTRAL 322 * 03C0 0 A 9 323 CP8 COPY TF38 3 BILLES ? 03C3 1 A 1 324 SCORE A1000,1 MARQUER 1000 03C8 D 325 TOGL AUTREMENT 03C7 1 B 1 326 SCORE A100,1 MARQUER 100 03CA C 327 STOP 328 * 329 * 10 POINTS 330 * 03CB 1 C 1 331 10P SCORE A10,1 ALTERNATIVEMENT LAMPES SPECIALES ET BILLE SUPPLEMENTAIRE 03C5 2 8 8 332 SET TF36 03D1 C 333 STOP 334 * 335 * SOUS-PROGRAMME DF SORTIF RETOURNEMENT ET CIBLE TOMBANTE 03D2 0 B 0 336 PODT COPY TF3 PREMIER PASSAGE ? TABLEAU II (suite) PBA 06/10/76 ADR W1 W2 W3 W4 ISN LABEL OP OPERANDE 03D5 0 6 9 337 COPY FL34 03D8 0 5 9 338 COPY FL33 ((L33,L34)=0 ? 03DB 0 2 1 339 COPY FF6 BILLE SUPPLEMENTAIRE NON FRAPPEE ? 03DE 0 7 9 340 COPY FL35 03F1 0 4 1 341 COPY FL4 03E4 2 E 9 342 SET TL34 03E7 B 343 FLAG 03F8 0 B 0 344 COPY TF3 PREMIER PASSAGE ? 03FB 0 9 0 345 COPY TF1 TOUS RETOURNEMENTS ? 03EF 0 A 0 346 COPY TF2 TOUTES CIBLES TOMBEES ? 03F1 0 6 9 347 COPY FL34 L34=0 ? 03F4 0 1 1 348 COPY FF5 03F7 2 F 9 349 SET TL35 L35=1 (SPECIAL) 03FA B 350 FLAG 03FB 0 B 0 351 COPY TF3 PREMIER PASSAGE ? 03FE 0 9 0 352 COPY TF1 TOUS RETOURNEMENTS ? 0401 0 A 0 353 COPY TF2 TOUTES CIBLES TOMBEES 0404 0 5 9 354 COPY FL33 L33=0 0407 0 7 9 355 COPY FL35 040A 0 1 1 356 COPY FF5 040D 2 C 9 357 SET TL36 L36=1 (SPECIAL) 0410 B 358 FLAG 0411 2 3 0 359 SET FF3 0414 C 360 STOP 361 * 362 * INITIALISATION 363 * 0415 2 C 7 364 INIT SET TL28 0418 2 D 8 365 SET TL29 041B 2 E 8 366 SET TL30 041E 2 F 8 367 SET TL31 0421 2 C 8 368 SET TL32 0424 2 E 6 369 SET TL22 0427 2 F 6 370 SET TL23 042A 2 C 6 371 SET TL24 042D 2 D 7 372 SET TL25 0430 2 B 2 373 SET TF11 0433 2 8 D 374 SET TSR 0436 2 8 D 375 SET TSR 0439 2 8 D 376 SET TSR 0430 0 2 6 377 COPY IF27 043F 0 9 6 378 COPY IF25 DERNIERF BILLE ? TABLEAU II (suite) PBA 06/10/76 ADR W1 W2 W3 W4 ISN LABEL OP OPERANDE 0442 2 C 5 379 SET TL20 0445 2 D 6 380 SET TL21 DOUBLE BONUS=1 0448 8 381 FLAG 0449 0 A 6 382 COPY TF26 044C 0 9 6 383 COPY TF25 DERNIERE BILLE ? 044F 0 A 9 384 COPY TF38 3 BILLES ? 0452 2 C 5 385 SET TL20 0455 2 D 6 386 SET TL21 DOUBLE BONUS=1 0458 C 387 STOP 388 * 389 * ALTERNATIVEMENT LAMPE BILLE SUPPLEMENTAIRE ET BILLES 390 * 0459 0 9 0 391 POP01 COPY TF1 TOUS RETOURNEMENTS 045C A A 0 392 OR TF2 OR.DT.HS 045F E 4 6 4 393 GOTO POP1 0463 C 394 STOP 0464 0 2 1 395 POP1 COPY FF6 BILLE SUPPLEMENTAIRE FRAPPEE ? 0467 E 4 6 C 396 GOTO POP2 NON 0469 C 397 STOP OUI 046C 0 2 9 398 POP2 COPY FF38 3 BILLES ? 046F E 4 7 4 399 GOTO POP3 NON 0473 C 400 STOP 0474 0 D 9 401 POP3 COPY TL33 L33=1? 0477 E 4 A 2 402 GOTO POP4 OUI 0478 B 403 STOP 047C 0 E 9 404 COPY TL34 L34=1 ? 047F E 4 A 9 405 GOTO POP5 OUI 0483 B 406 FLAG 0484 0 C 9 407 COPY TL36 L36=1 ? 0487 @ 4 B 0 408 GOTO POP6 0488 B 409 FLAG 048C 0 F 9 410 COPY TL35 L35=1 ? 048F E 4 8 4 411 GOTO POP7 0493 H 412 FLAG 0494 0 8 5 413 COPY TF23 0497 2 D 9 414 SET TL33 049A B 415 FLAG 049B 0 3 5 416 COPY FF23 049E 2 E 9 417 SET TL34 04A1 C 418 STOP 04A2 2 5 9 419 POP4 SET FL37 L33=0 04A5 2 8 5 420 SET TF23 F23=1 TABLEAU II (suite) PBA 06/10/76 ADR W1 W2 W3 W4 ISN LABEL OP OPERANDE 04A8 C 421 STOP 04A9 2 6 9 422 POP5 SET FL34 L34=0 04AC 2 3 5 423 SET FF23 F23=0 04AF C 424 STOP 04B0 2 E 9 425 POP6 SET TL34 L34=1 04B3 C 426 STOP 04B4 2 D 9 427 POP7 SET TL33 04B7 C 428 STOP *** 429