BACARÁ
06 AV 9401
Como em um jogo real, cada jogador desafia o banqueiro, que é o videogame. O objetivo é conseguir uma soma de pontos maior que a do banqueiro, mas cujo valor não exceda a 21. Acima disso ele "estoura". Cada jogador começa a partida com um cacife de $ 1.000 e faz a aposta com o auxílio do teclado alfanumérico.
O banqueiro vai distribuindo cartas "cobertas" e "descobertas", para si e para cada jogador. Cada um deles decide se quer mais cartas ou não. Variantes do tipo "blackjack", aposta dobrada e seguro aumentam ainda mais as emoções deste jogo sensacional.
Som: 
Gráficos:
Jogabilidade: 
Raridade no Brasil:
A máquina é o banqueiro. O objetivo do jogo é conseguir uma soma das cartas maior que o banqueiro, mas cujo valor não exceda a 21 pontos. Se um jogador receber cartas cuja soma total exceda a 21, ele "estoura", perdendo assim a aposta para o banqueiro. Cada jogador pode pedir até 5 cartas desde que não exceda o total de 21 pontos. Um "Ás" vale 1 ou 11, a critério do jogador. Figuras (Reis, Rainhas e Valetes) valem 10 pontos cada. Todas as outras cartas valem o número nelas indicado.
; ****************************************************************************
; 9401 LAS VEGAS BLACKJACK
;
; Brazilian Equivalent: 06AV9401 Bacará
;
; 1978 - MAGNAVOX
; ****************************************************************************
CART_A: 400 44 C3 JMP SELGAME ; 02C3
CART_B: 402 04 09 JMP VBLANK ; 0009
CART_C: 404 93 RETR
405 00 NOP
CART_D: 406 04 1A JMP LAB020 ; 001A
CART_E: 408 84 0C JMP START ; 040C
CART_F: 40A A4 86 JMP LAB239 ; 0586
START: 40C 27 CLR A
40D 62 MOV T,A
40E 55 STRT T
40F D4 D3 CALL LAB023 ; 06D3
411 BF 6E MOV R7,#6E
413 F4 27 CALL LAB024 ; 0727
LAB237: 415 D4 E1 CALL LAB033 ; 06E1
417 07 DEC A
418 C6 1E JZ LAB034 ; 041E
41A 07 DEC A
41B 96 15 JNZ LAB237 ; 0415
41D 17 INC A
LAB034: 41E 17 INC A
41F B8 31 MOV R0,#31
421 A0 MOV @R0,A
422 F5 SEL MB1
423 24 5B JMP LAB035 ; 095B
LAB120: 425 B8 30 MOV R0,#30
427 27 CLR A
428 A0 MOV @R0,A
429 D4 00 CALL LAB121 ; 0600
42B B8 39 MOV R0,#39
42D 80 MOVX A,@R0
42E C6 36 JZ LAB126 ; 0436
430 F5 SEL MB1
431 34 A5 CALL LAB226 ; 09A5
433 E5 SEL MB0
434 E6 46 JNC LAB232 ; 0446
LAB126: 436 BF B0 MOV R7,#B0
438 F4 27 CALL LAB024 ; 0727
43A 23 E7 MOV A,#E7
43C 34 A2 CALL SOUND ; 01A2
43E F4 E4 CALL LAB127 ; 07E4
440 23 2C MOV A,#2C
442 34 A2 CALL SOUND ; 01A2
444 F4 3B CALL LAB037 ; 073B
LAB232: 446 B8 31 MOV R0,#31
448 27 CLR A
449 20 XCH A,@R0
44A 53 03 ANL A,#03
44C 20 XCH A,@R0
44D 18 INC R0
44E A0 MOV @R0,A
44F 18 INC R0
450 18 INC R0
451 A0 MOV @R0,A
LAB221: 452 F4 0F CALL LAB049 ; 070F
LAB146: 454 D4 E5 CALL LAB128 ; 06E5
456 F4 08 CALL LAB060 ; 0708
458 96 54 JNZ LAB146 ; 0454
45A F0 MOV A,@R0
45B 53 80 ANL A,#80
45D 96 70 JNZ LAB147 ; 0470
45F 23 80 MOV A,#80
461 40 ORL A,@R0
462 A0 MOV @R0,A
463 D4 E5 CALL LAB128 ; 06E5
465 B9 36 MOV R1,#36
467 F1 MOV A,@R1
468 D3 20 XRL A,#20
46A 96 52 JNZ LAB221 ; 0452
46C D4 32 CALL LAB222 ; 0632
46E 84 52 JMP LAB221 ; 0452
LAB147: 470 D0 XRL A,@R0
471 A0 MOV @R0,A
472 B4 5A CALL LAB148 ; 055A
474 F4 0F CALL LAB049 ; 070F
LAB218: 476 F4 C4 CALL LAB137 ; 07C4
478 19 INC R1
479 81 MOVX A,@R1
47A D3 91 XRL A,#91
47C 96 9C JNZ LAB150 ; 049C
47E 18 INC R0
47F 18 INC R0
480 FF MOV A,R7
481 96 85 JNZ LAB219 ; 0485
483 23 04 MOV A,#04
LAB219: 485 40 ORL A,@R0
486 A0 MOV @R0,A
487 FF MOV A,R7
488 96 8C JNZ LAB220 ; 048C
48A B4 6A CALL LAB182 ; 056A
LAB220: 48C BD 10 MOV R5,#10
48E D4 78 CALL LAB175 ; 0678
490 BF 8B MOV R7,#8B
492 F4 27 CALL LAB024 ; 0727
494 23 4A MOV A,#4A
496 34 A2 CALL SOUND ; 01A2
498 F4 E4 CALL LAB127 ; 07E4
49A F4 3B CALL LAB037 ; 073B
LAB150: 49C F4 22 CALL LAB138 ; 0722
49E C6 A4 JZ LAB151 ; 04A4
4A0 F4 08 CALL LAB060 ; 0708
4A2 84 76 JMP LAB218 ; 0476
LAB151: 4A4 D4 FB CALL LAB152 ; 06FB
4A6 C6 E5 JZ LAB156 ; 04E5
4A8 F4 0F CALL LAB049 ; 070F
LAB211: 4AA D4 F4 CALL LAB183 ; 06F4
4AC 96 CE JNZ LAB195 ; 04CE
4AE E6 BA JNC LAB210 ; 04BA
LAB213: 4B0 F4 E0 CALL LAB070 ; 07E0
4B2 BD 25 MOV R5,#25
4B4 D4 78 CALL LAB175 ; 0678
4B6 23 40 MOV A,#40
4B8 34 A2 CALL SOUND ; 01A2
LAB210: 4BA F4 3B CALL LAB037 ; 073B
4BC D4 FB CALL LAB152 ; 06FB
4BE C6 E5 JZ LAB156 ; 04E5
4C0 F4 08 CALL LAB060 ; 0708
4C2 96 AA JNZ LAB211 ; 04AA
4C4 B4 6A CALL LAB182 ; 056A
LAB214: 4C6 D4 F4 CALL LAB183 ; 06F4
4C8 C6 E3 JZ LAB212 ; 04E3
4CA D4 E5 CALL LAB128 ; 06E5
4CC 84 C6 JMP LAB214 ; 04C6
LAB195: 4CE 07 DEC A
4CF 96 D7 JNZ LAB196 ; 04D7
4D1 D4 65 CALL LAB215 ; 0665
4D3 96 DF JNZ LAB217 ; 04DF
4D5 F4 3B CALL LAB037 ; 073B
LAB196: 4D7 BF A2 MOV R7,#A2
4D9 F4 27 CALL LAB024 ; 0727
4DB D4 85 CALL LAB197 ; 0685
4DD C6 BA JZ LAB210 ; 04BA
LAB217: 4DF D4 E5 CALL LAB128 ; 06E5
4E1 84 AA JMP LAB211 ; 04AA
LAB212: 4E3 F6 B0 JC LAB213 ; 04B0
LAB156: 4E5 F4 3B CALL LAB037 ; 073B
4E7 F4 E0 CALL LAB070 ; 07E0
4E9 B8 30 MOV R0,#30
4EB 23 40 MOV A,#40
4ED 50 ANL A,@R0
4EE 96 F2 JNZ LAB157 ; 04F2
4F0 B4 6A CALL LAB182 ; 056A
LAB157: 4F2 F4 0F CALL LAB049 ; 070F
LAB180: 4F4 F4 E0 CALL LAB070 ; 07E0
4F6 F4 00 CALL LAB158 ; 0700
4F8 F4 08 CALL LAB060 ; 0708
4FA 96 F4 JNZ LAB180 ; 04F4
4FC F4 E8 CALL LAB181 ; 07E8
4FE F5 SEL MB1
4FF 24 5B JMP LAB035 ; 095B
LAB129: 501 BF F1 MOV R7,#F1
503 BA FC MOV R2,#FC
505 54 93 CALL LAB130 ; 0293
507 1A INC R2
508 FB MOV A,R3
509 47 SWAP A
50A 4A ORL A,R2
50B AA MOV R2,A
50C 03 CB ADD A,#CB
50E F6 01 JC LAB129 ; 0501
510 FA MOV A,R2
511 B8 35 MOV R0,#35
LAB136: 513 A0 MOV @R0,A
LAB135: 514 F0 MOV A,@R0
515 B9 2F MOV R1,#2F
517 54 8A CALL LAB131 ; 028A
519 C6 24 JZ LAB132 ; 0524
51B 10 INC @R0
51C F0 MOV A,@R0
51D D3 35 XRL A,#35
51F 96 14 JNZ LAB135 ; 0514
521 17 INC A
522 A4 13 JMP LAB136 ; 0513
LAB132: 524 F0 MOV A,@R0
525 18 INC R0
526 AA MOV R2,A
527 BB 0D MOV R3,#0D
529 74 CF CALL LAB133 ; 03CF
52B 6D ADD A,R5
52C 03 40 ADD A,#40
52E A0 MOV @R0,A
52F A3 MOVP A,@A
530 20 XCH A,@R0
531 18 INC R0
532 17 INC A
533 A3 MOVP A,@A
534 A0 MOV @R0,A
535 FC MOV A,R4
536 67 RRC A
537 23 02 MOV A,#02
539 F6 3C JC LAB134 ; 053C
53B 27 CLR A
LAB134: 53C 20 XCH A,@R0
53D 18 INC R0
53E A0 MOV @R0,A
53F 83 RET
; Tabela de valores das cartas:
;
; K - 10
; A - 81h
; 2 - 2
; 3 - 3
; 4 - 4
; 5 - 5
; 6 - 6
; 7 - 7
; 8 - 8
; 9 - 9
; (10) - 10
; J - 10
; Q - 10
540 1F DB 1F ; K
541 10 DB 10
542 20 DB 20 ; A
543 81 DB 81
544 02 DB 02 ; 2
545 02 DB 02
546 03 DB 03 ; 3
547 03 DB 03
548 04 DB 04 ; 4
549 04 DB 04
54A 05 DB 05 ; 5
54B 05 DB 05 ;
54C 06 DB 06 ; 6
54D 06 DB 06
54E 07 DB 07 ; 7
54F 07 DB 07
550 08 DB 08 ; 8
551 08 DB 08
552 09 DB 09 ; 9
553 09 DB 09
554 30 DB 30 ; 10
555 10 DB 10
556 1E DB 1E ; J
557 10 DB 10
558 18 DB 18 ; Q
559 10 DB 10
LAB148: 55A B4 01 CALL LAB129 ; 0501
55C B8 36 MOV R0,#36
55E B9 39 MOV R1,#39
560 23 0C MOV A,#0C
562 20 XCH A,@R0
563 91 MOVX @R1,A
564 18 INC R0
565 19 INC R1
566 F0 MOV A,@R0
567 91 MOVX @R1,A
568 C4 E7 JMP LAB149 ; 06E7
LAB182: 56A B8 36 MOV R0,#36
56C B9 39 MOV R1,#39
56E 81 MOVX A,@R1
56F A0 MOV @R0,A
570 19 INC R1
571 18 INC R0
572 81 MOVX A,@R1
573 A0 MOV @R0,A
574 18 INC R0
575 27 CLR A
576 A0 MOV @R0,A
577 B9 33 MOV R1,#33
579 23 01 MOV A,#01
57B 91 MOVX @R1,A
57C B8 30 MOV R0,#30
57E 23 40 MOV A,#40
580 40 ORL A,@R0
581 53 FC ANL A,#FC
583 A0 MOV @R0,A
584 C4 E7 JMP LAB149 ; 06E7
LAB239: 586 FC MOV A,R4
587 F2 8B JB7 NEWSND ; 058B
589 04 44 JMP SNDINT ; 0044
NEWSND: 58B A3 MOVP A,@A
58C A9 MOV R1,A
58D 1C INC R4
58E FC MOV A,R4
58F A3 MOVP A,@A
590 AA MOV R2,A
591 F9 MOV A,R1
592 F2 96 JB7 LAB241 ; 0596
594 04 4B JMP LAB244 ; 004B
LAB241: 596 53 7F ANL A,#7F
598 AB MOV R3,A
599 B8 AA MOV R0,#AA
59B 27 CLR A
59C 90 MOVX @R0,A
59D B8 A7 MOV R0,#A7
59F B9 03 MOV R1,#03
LAB242: 5A1 FA MOV A,R2
5A2 A3 MOVP A,@A
5A3 90 MOVX @R0,A
5A4 18 INC R0
5A5 1A INC R2
5A6 E9 A1 DJNZ R1,LAB242 ; 05A1
5A8 FA MOV A,R2
5A9 A3 MOVP A,@A
5AA AA MOV R2,A
5AB 04 76 JMP LAB243 ; 0076
LAB177: 5AD B8 39 MOV R0,#39
5AF F0 MOV A,@R0
5B0 D3 11 XRL A,#11
5B2 C6 C1 JZ LAB178 ; 05C1
5B4 F0 MOV A,@R0
5B5 D3 14 XRL A,#14
5B7 C6 BD JZ LAB179 ; 05BD
5B9 23 28 MOV A,#28
5BB 24 A2 JMP SOUND ; 01A2
LAB179: 5BD 23 52 MOV A,#52
5BF 24 A2 JMP SOUND ; 01A2
LAB178: 5C1 23 4E MOV A,#4E
5C3 24 A2 JMP SOUND ; 01A2
5C5 94 DB 94 ; X..X.X..
5C6 53 DB 53 ; .X.X..XX
5C7 A4 DB A4 ; X.X..X..
5C8 92 DB 92 ; X..X..X.
5C9 B9 DB B9 ; X.XXX..X
5CA 3D DB 3D ; ..XXXX.X
5CB F1 DB F1 ; XXXX...X
5CC 32 DB 32 ; ..XX..X.
5CD D0 DB D0 ; XX.X....
5CE A4 DB A4 ; X.X..X..
5CF FF DB FF ; XXXXXXXX
5D0 01 DB 01 ; .......X
5D1 10 DB 10 ; ...X....
5D2 00 DB 00 ; ........
5D3 DF DB DF ; XX.XXXXX
5D4 01 DB 01 ; .......X
5D5 10 DB 10 ; ...X....
5D6 00 DB 00 ; ........
5D7 DC DB DC ; XX.XXX..
5D8 01 DB 01 ; .......X
5D9 01 DB 01 ; .......X
5DA 10 DB 10 ; ...X....
5DB D7 DB D7 ; XX.X.XXX
5DC 25 DB 25 ; ..X..X.X
5DD BA DB BA ; X.XXX.X.
5DE 02 DB 02 ; ......X.
5DF A4 DB A4 ; X.X..X..
5E0 83 DB 83 ; X.....XX
5E1 D8 DB D8 ; XX.XX...
5E2 22 DB 22 ; ..X...X.
5E3 81 DB 81 ; X......X
5E4 D0 DB D0 ; XX.X....
5E5 21 DB 21 ; ..X....X
5E6 00 DB 00 ; ........
5E7 84 DB 84 ; X....X..
5E8 D8 DB D8 ; XX.XX...
5E9 22 DB 22 ; ..X...X.
5EA 81 DB 81 ; X......X
5EB D0 DB D0 ; XX.X....
5EC 21 DB 21 ; ..X....X
5ED 81 DB 81 ; X......X
5EE D4 DB D4 ; XX.X.X..
5EF 23 DB 23 ; ..X...XX
5F0 82 DB 82 ; X.....X.
5F1 D8 DB D8 ; XX.XX...
5F2 22 DB 22 ; ..X...X.
5F3 82 DB 82 ; X.....X.
5F4 D4 DB D4 ; XX.X.X..
5F5 23 DB 23 ; ..X...XX
5F6 81 DB 81 ; X......X
5F7 D0 DB D0 ; XX.X....
5F8 10 DB 10 ; ...X....
5F9 E9 DB E9 ; XXX.X..X
5FA A0 DB A0 ; X.X.....
5FB 23 DB 23 ; ..X...XX
5FC 00 DB 00 ; ........
5FD 34 DB 34 ; ..XX.X..
5FE A2 DB A2 ; X.X...X.
5FF B8 DB B8 ; X.XXX...
LAB121: 600 BE D7 MOV R6,#D7
602 F5 SEL MB1
603 34 4A CALL LAB040 ; 094A
605 E5 SEL MB0
606 B8 40 MOV R0,#40
608 BB 0C MOV R3,#0C
60A BC 28 MOV R4,#28
60C BF 03 MOV R7,#03
LAB123: 60E BA 04 MOV R2,#04
LAB122: 610 BD 0C MOV R5,#0C
612 BE 04 MOV R6,#04
614 74 EA CALL WRCHAR ; 03EA
616 EA 10 DJNZ R2,LAB122 ; 0610
618 FC MOV A,R4
619 03 48 ADD A,#48
61B AC MOV R4,A
61C EF 0E DJNZ R7,LAB123 ; 060E
61E 96 26 JNZ LAB124 ; 0626
620 CC DEC R4
621 BB B0 MOV R3,#B0
623 1F INC R7
624 C4 0E JMP LAB123 ; 060E
LAB124: 626 D4 D3 CALL LAB023 ; 06D3
628 B9 33 MOV R1,#33
62A BA 06 MOV R2,#06
62C 27 CLR A
LAB125: 62D 91 MOVX @R1,A
62E 19 INC R1
62F EA 2D DJNZ R2,LAB125 ; 062D
631 83 RET
LAB222: 632 F4 0F CALL LAB049 ; 070F
LAB224: 634 B8 33 MOV R0,#33
636 47 SWAP A
637 50 ANL A,@R0
638 96 4D JNZ LAB223 ; 064D
63A BF 7E MOV R7,#7E
63C F4 27 CALL LAB024 ; 0727
63E BD 2A MOV R5,#2A
640 D4 89 CALL LAB225 ; 0689
642 C6 4D JZ LAB223 ; 064D
644 F4 22 CALL LAB138 ; 0722
646 47 SWAP A
647 40 ORL A,@R0
648 A0 MOV @R0,A
649 BD 16 MOV R5,#16
64B D4 78 CALL LAB175 ; 0678
LAB223: 64D F4 08 CALL LAB060 ; 0708
64F 96 34 JNZ LAB224 ; 0634
651 F4 3B CALL LAB037 ; 073B
653 F4 0F CALL LAB049 ; 070F
655 83 RET
LAB081: 656 F4 D3 CALL LAB026 ; 07D3
658 BF A9 MOV R7,#A9
65A F4 54 CALL LAB027 ; 0754
65C 23 02 MOV A,#02
65E DE XRL A,R6
65F C6 63 JZ LAB082 ; 0663
661 BB 2C MOV R3,#2C
LAB082: 663 E4 33 JMP LAB032 ; 0733
LAB215: 665 BF 98 MOV R7,#98
667 F4 27 CALL LAB024 ; 0727
669 D4 85 CALL LAB197 ; 0685
66B C6 77 JZ LAB216 ; 0677
66D F4 22 CALL LAB138 ; 0722
66F E7 RL A
670 E7 RL A
671 40 ORL A,@R0
672 A0 MOV @R0,A
673 BD 22 MOV R5,#22
675 D4 78 CALL LAB175 ; 0678
LAB216: 677 83 RET
LAB175: 678 F4 C4 CALL LAB137 ; 07C4
67A F4 BB CALL LAB143 ; 07BB
67C F4 D3 CALL LAB026 ; 07D3
67E FF MOV A,R7
67F 47 SWAP A
680 03 44 ADD A,#44
682 A8 MOV R0,A
683 C4 CF JMP LAB176 ; 06CF
LAB197: 685 23 01 MOV A,#01
687 C4 8A JMP LAB198 ; 068A
LAB225: 689 27 CLR A
LAB198: 68A B9 39 MOV R1,#39
68C A1 MOV @R1,A
LAB207: 68D BD 1E MOV R5,#1E
LAB201: 68F F4 C4 CALL LAB137 ; 07C4
691 F4 D3 CALL LAB026 ; 07D3
693 F4 BB CALL LAB143 ; 07BB
695 34 76 CALL WAITINT ; 0176
697 14 B0 CALL LAB199 ; 00B0
699 14 EC CALL SELRAM ; 00EC
69B F2 B6 JB7 LAB200 ; 06B6
69D 03 D3 ADD A,#D3
69F C6 A9 JZ LAB208 ; 06A9
6A1 03 01 ADD A,#01
6A3 96 B6 JNZ LAB200 ; 06B6
6A5 D4 A9 CALL LAB208 ; 06A9
6A7 17 INC A
6A8 83 RET
LAB208: 6A9 23 56 MOV A,#56
6AB 34 A2 CALL SOUND ; 01A2
6AD B9 39 MOV R1,#39
6AF F1 MOV A,@R1
6B0 32 B4 JB1 LAB209 ; 06B4
6B2 D4 BC CALL LAB202 ; 06BC
LAB209: 6B4 27 CLR A
6B5 83 RET
LAB200: 6B6 ED 8F DJNZ R5,LAB201 ; 068F
6B8 D4 BC CALL LAB202 ; 06BC
6BA C4 8D JMP LAB207 ; 068D
LAB202: 6BC B9 39 MOV R1,#39
6BE F1 MOV A,@R1
6BF D3 02 XRL A,#02
6C1 A1 MOV @R1,A
6C2 BD 0C MOV R5,#0C
6C4 32 C8 JB1 LAB203 ; 06C8
6C6 BD 0D MOV R5,#0D
LAB203: 6C8 12 D7 JB0 LAB204 ; 06D7
6CA FF MOV A,R7
6CB 47 SWAP A
6CC 03 48 ADD A,#48
6CE A8 MOV R0,A
LAB176: 6CF D4 DB CALL LAB028 ; 06DB
6D1 74 EA CALL WRCHAR ; 03EA
LAB023: 6D3 34 27 CALL DISPON ; 0127
6D5 04 EC JMP SELRAM ; 00EC
LAB204: 6D7 F4 F3 CALL LAB205 ; 07F3
6D9 C4 CF JMP LAB176 ; 06CF
LAB028: 6DB 14 E7 CALL SELVDC ; 00E7
6DD 34 76 CALL WAITINT ; 0176
6DF 24 1C JMP DISPOFF ; 011C
LAB033: 6E1 34 3D CALL GETKEY ; 013D
6E3 04 EC JMP SELRAM ; 00EC
LAB128: 6E5 B4 01 CALL LAB129 ; 0501
LAB149: 6E7 F4 E0 CALL LAB070 ; 07E0
6E9 23 E0 MOV A,#E0
6EB 34 A2 CALL SOUND ; 01A2
6ED F4 C4 CALL LAB137 ; 07C4
6EF F5 SEL MB1
6F0 34 00 CALL LAB140 ; 0900
6F2 E5 SEL MB0
6F3 83 RET
LAB183: 6F4 F4 C4 CALL LAB137 ; 07C4
6F6 F5 SEL MB1
6F7 14 00 CALL LAB184 ; 0800
6F9 E5 SEL MB0
6FA 83 RET
LAB152: 6FB F5 SEL MB1
6FC 34 C5 CALL LAB153 ; 09C5
6FE E5 SEL MB0
6FF 83 RET
LAB158: 700 F5 SEL MB1
701 14 73 CALL LAB159 ; 0873
703 E5 SEL MB0
704 D4 78 CALL LAB175 ; 0678
706 A4 AD JMP LAB177 ; 05AD
LAB060: 708 B8 30 MOV R0,#30
70A F0 MOV A,@R0
70B 53 03 ANL A,#03
70D 96 1E JNZ LAB061 ; 071E
LAB049: 70F B8 31 MOV R0,#31
711 F0 MOV A,@R0
712 53 03 ANL A,#03
714 C8 DEC R0
715 20 XCH A,@R0
716 53 FC ANL A,#FC
718 40 ORL A,@R0
LAB062: 719 A0 MOV @R0,A
LAB139: 71A 53 03 ANL A,#03
71C AF MOV R7,A
71D 83 RET
LAB061: 71E F0 MOV A,@R0
71F 07 DEC A
720 E4 19 JMP LAB062 ; 0719
LAB138: 722 B8 30 MOV R0,#30
724 F0 MOV A,@R0
725 E4 1A JMP LAB139 ; 071A
LAB024: 727 B8 3D MOV R0,#3D
729 80 MOVX A,@R0
72A C6 2D JZ LAB025 ; 072D
72C 18 INC R0
LAB025: 72D FF MOV A,R7
72E 90 MOVX @R0,A
72F F4 D3 CALL LAB026 ; 07D3
731 F4 54 CALL LAB027 ; 0754
LAB032: 733 FF MOV A,R7
734 A3 MOVP A,@A
735 AD MOV R5,A
736 F4 65 CALL LAB030 ; 0765
738 96 33 JNZ LAB032 ; 0733
73A 83 RET
LAB037: 73B B8 3E MOV R0,#3E
73D 80 MOVX A,@R0
73E 96 45 JNZ LAB038 ; 0745
740 C8 DEC R0
741 80 MOVX A,@R0
742 96 45 JNZ LAB038 ; 0745
744 83 RET
LAB038: 745 AF MOV R7,A
746 27 CLR A
747 90 MOVX @R0,A
LAB119: 748 F4 54 CALL LAB027 ; 0754
74A BC F8 MOV R4,#F8
74C BB F8 MOV R3,#F8
LAB039: 74E F4 65 CALL LAB030 ; 0765
750 96 4E JNZ LAB039 ; 074E
752 E4 3B JMP LAB037 ; 073B
LAB027: 754 D4 DB CALL LAB028 ; 06DB
756 B8 19 MOV R0,#19
LAB029: 758 FF MOV A,R7
759 A3 MOVP A,@A
75A A0 MOV @R0,A
75B 18 INC R0
75C 1F INC R7
75D F8 MOV A,R0
75E D3 1D XRL A,#1D
760 96 58 JNZ LAB029 ; 0758
762 F9 MOV A,R1
763 A8 MOV R0,A
764 83 RET
LAB030: 765 74 EA CALL WRCHAR ; 03EA
767 1F INC R7
768 EA 6D DJNZ R2,LAB031 ; 076D
76A D4 D3 CALL LAB023 ; 06D3
76C 27 CLR A
LAB031: 76D 83 RET
76E 10 DB 10 ; ...X....
76F 0C DB 0C ; String length
770 30 DB 30 ; ..XX....
771 70 DB 70 ; .XXX....
772 0F DB 0F ; PLAYERS ?
773 0E DB 0E
774 20 DB 20
775 2C DB 2C
776 12 DB 12
777 13 DB 13
778 19 DB 19
779 0C DB 0C
77A 0D DB 0D
77B 0C DB 0C
77C 0C DB 0C
77D 0C DB 0C
77E 14 DB 14 ; ...X.X..
77F 09 DB 09 ; String length
780 4A DB 4A ; .X..X.X.
781 26 DB 26 ; ..X..XX.
782 16 DB 16 ; INSURANCE
783 2D DB 2D
784 19 DB 19
785 15 DB 15
786 13 DB 13
787 20 DB 20
788 2D DB 2D
789 23 DB 23
78A 12 DB 12
78B 10 DB 10 ; ...X....
78C 09 DB 09 ; String length
78D 48 DB 48 ; .X..X...
78E 26 DB 26 ; ..X..XX.
78F 25 DB 25 ; BLACKJACK
790 0E DB 0E
791 20 DB 20
792 23 DB 23
793 1F DB 1F
794 1E DB 1E
795 20 DB 20
796 23 DB 23
797 1F DB 1F
798 24 DB 24 ; ..X..X..
799 06 DB 06 ; String length
79A 4A DB 4A ; .X..X.X.
79B 26 DB 26 ; ..X..XX.
79C 1A DB 1A ; ...XX.X.
79D 00 DB 00
79E 15 DB 15
79F 25 DB 25
7A0 0E DB 0E
7A1 12 DB 12
7A2 2C DB 2C ; ..X.XX..
7A3 03 DB 03 ; String length
7A4 58 DB 58 ; .X.XX...
7A5 26 DB 26 ; ..X..XX.
7A6 1D DB 1D ; HIT
7A7 16 DB 16
7A8 14 DB 14
7A9 34 DB 34 ; ..XX.X..
7AA 03 DB 03 ; String length
7AB 7C DB 7C ; .XXXXX..
7AC 70 DB 70 ; .XXX....
7AD 25 DB 25 ; BET
7AE 12 DB 12
7AF 14 DB 14
7B0 24 DB 24 ; ..X..X..
7B1 07 DB 07 ; String length
7B2 34 DB 34 ; ..XX.X..
7B3 38 DB 38 ; ..XXX...
7B4 19 DB 19 ; SHUFFLE
7B5 1D DB 1D
7B6 15 DB 15
7B7 1B DB 1B
7B8 1B DB 1B
7B9 0E DB 0E
7BA 12 DB 12
LAB143: 7BB FF MOV A,R7
7BC 03 C1 ADD A,#C1
7BE A3 MOVP A,@A
7BF AC MOV R4,A
7C0 83 RET
7C1 28 DB 28 ; ..X.X...
7C2 70 DB 70 ; .XXX....
7C3 B8 DB B8 ; X.XXX...
LAB137: 7C4 F4 22 CALL LAB138 ; 0722
7C6 E7 RL A
7C7 03 33 ADD A,#33
7C9 A9 MOV R1,A
7CA 81 MOVX A,@R1
7CB AA MOV R2,A
7CC E7 RL A
7CD 47 SWAP A
7CE 03 0C ADD A,#0C
7D0 AB MOV R3,A
7D1 FA MOV A,R2
7D2 83 RET
LAB026: 7D3 B8 30 MOV R0,#30
7D5 F0 MOV A,@R0
7D6 53 03 ANL A,#03
7D8 03 DD ADD A,#DD
7DA A3 MOVP A,@A
7DB AE MOV R6,A
7DC 83 RET
7DD 0A DB 0A ; ....X.X.
7DE 08 DB 08 ; ....X...
7DF 02 DB 02 ; ......X.
LAB070: 7E0 BA 02 MOV R2,#02
7E2 E4 EA JMP LAB071 ; 07EA
LAB127: 7E4 BA 04 MOV R2,#04
7E6 E4 EA JMP LAB071 ; 07EA
LAB181: 7E8 BA 0A MOV R2,#0A
LAB071: 7EA BB 1E MOV R3,#1E
LAB072: 7EC 34 76 CALL WAITINT ; 0176
7EE EB EC DJNZ R3,LAB072 ; 07EC
7F0 EA EA DJNZ R2,LAB071 ; 07EA
7F2 83 RET
LAB205: 7F3 F4 F7 CALL LAB206 ; 07F7
7F5 A8 MOV R0,A
7F6 83 RET
LAB206: 7F7 B8 34 MOV R0,#34
7F9 F0 MOV A,@R0
7FA E7 RL A
7FB E7 RL A
7FC 03 10 ADD A,#10
7FE 83 RET
7FF 83 DB 83 ; X.....XX
LAB184: 800 19 INC R1
801 81 MOVX A,@R1
802 53 7F ANL A,#7F
804 AD MOV R5,A
805 81 MOVX A,@R1
806 53 80 ANL A,#80
808 47 SWAP A
809 E7 RL A
80A 6D ADD A,R5
80B AE MOV R6,A
80C FA MOV A,R2
80D D3 02 XRL A,#02
80F C6 1B JZ LAB185 ; 081B
811 FF MOV A,R7
812 C6 3C JZ LAB190 ; 083C
814 E7 RL A
815 E7 RL A
816 50 ANL A,@R0
817 C6 3C JZ LAB190 ; 083C
819 27 CLR A
81A 83 RET
LAB185: 81B 23 21 MOV A,#21
81D DE XRL A,R6
81E C6 3B JZ LAB186 ; 083B
820 FF MOV A,R7
821 C6 61 JZ LAB187 ; 0861
823 23 F7 MOV A,#F7
825 6D ADD A,R5
826 E6 49 JNC LAB188 ; 0849
828 03 F7 ADD A,#F7
82A F6 49 JC LAB188 ; 0849
82C F0 MOV A,@R0
82D 47 SWAP A
82E B8 33 MOV R0,#33
830 50 ANL A,@R0
831 5F ANL A,R7
832 96 49 JNZ LAB188 ; 0849
834 F0 MOV A,@R0
835 77 RR A
836 77 RR A
837 5F ANL A,R7
838 96 49 JNZ LAB188 ; 0849
83A 17 INC A
LAB186: 83B 83 RET
LAB190: 83C 23 DE MOV A,#DE
83E 6D ADD A,R5
83F F6 57 JC LAB191 ; 0857
841 FA MOV A,R2
842 D3 05 XRL A,#05
844 C6 4C JZ LAB194 ; 084C
846 FF MOV A,R7
847 C6 61 JZ LAB187 ; 0861
LAB188: 849 23 02 MOV A,#02
84B 83 RET
LAB194: 84C 18 INC R0
84D FF MOV A,R7
84E 47 SWAP A
84F 96 53 JNZ LAB193 ; 0853
851 23 40 MOV A,#40
LAB193: 853 40 ORL A,@R0
854 A0 MOV @R0,A
855 27 CLR A
856 83 RET
LAB191: 857 FF MOV A,R7
858 96 5C JNZ LAB192 ; 085C
85A 23 20 MOV A,#20
LAB192: 85C E7 RL A
85D E7 RL A
85E 18 INC R0
85F 04 53 JMP LAB193 ; 0853
LAB187: 861 23 E9 MOV A,#E9
863 6E ADD A,R6
864 E6 49 JNC LAB188 ; 0849
866 FE MOV A,R6
867 03 DE ADD A,#DE
869 E6 70 JNC LAB189 ; 0870
86B FD MOV A,R5
86C 03 E9 ADD A,#E9
86E E6 49 JNC LAB188 ; 0849
LAB189: 870 97 CLR C
871 27 CLR A
872 83 RET
LAB159: 873 E7 RL A
874 03 34 ADD A,#34
876 A9 MOV R1,A
877 14 E3 CALL LAB160 ; 08E3
879 37 CPL A
87A 17 INC A
87B AC MOV R4,A
87C B9 34 MOV R1,#34
87E B8 32 MOV R0,#32
880 F0 MOV A,@R0
881 52 A0 JB2 LAB163 ; 08A0
883 5F ANL A,R7
884 96 A9 JNZ LAB170 ; 08A9
886 C8 DEC R0
887 F0 MOV A,@R0
888 77 RR A
889 77 RR A
88A 5F ANL A,R7
88B 96 B3 JNZ LAB164 ; 08B3
88D F0 MOV A,@R0
88E 47 SWAP A
88F 5F ANL A,R7
890 96 A9 JNZ LAB170 ; 08A9
892 F0 MOV A,@R0
893 F2 AD JB7 LAB173 ; 08AD
895 D2 B3 JB6 LAB164 ; 08B3
897 14 E3 CALL LAB160 ; 08E3
899 6C ADD A,R4
89A C6 A3 JZ LAB174 ; 08A3
89C F6 B3 JC LAB164 ; 08B3
89E 04 AD JMP LAB173 ; 08AD
LAB163: 8A0 5F ANL A,R7
8A1 C6 B3 JZ LAB164 ; 08B3
LAB174: 8A3 BA 00 MOV R2,#00
8A5 BD 14 MOV R5,#14
8A7 04 C7 JMP LAB166 ; 08C7
LAB170: 8A9 BA 04 MOV R2,#04
8AB 04 AF JMP LAB171 ; 08AF
LAB173: 8AD BA 02 MOV R2,#02
LAB171: 8AF BD 11 MOV R5,#11
8B1 04 B7 JMP LAB172 ; 08B7
LAB164: 8B3 BA FE MOV R2,#FE
8B5 BD 0E MOV R5,#0E
LAB172: 8B7 14 F3 CALL LAB165 ; 08F3
8B9 F0 MOV A,@R0
8BA 77 RR A
8BB 77 RR A
8BC 5F ANL A,R7
8BD C6 C7 JZ LAB166 ; 08C7
8BF FA MOV A,R2
8C0 F2 C4 JB7 LAB169 ; 08C4
8C2 03 04 ADD A,#04
LAB169: 8C4 03 FE ADD A,#FE
8C6 AA MOV R2,A
LAB166: 8C7 B8 30 MOV R0,#30
8C9 F0 MOV A,@R0
8CA 47 SWAP A
8CB 5F ANL A,R7
8CC C6 D8 JZ LAB167 ; 08D8
8CE 18 INC R0
8CF 18 INC R0
8D0 F0 MOV A,@R0
8D1 52 D6 JB2 LAB168 ; 08D6
8D3 CA DEC R2
8D4 04 D8 JMP LAB167 ; 08D8
LAB168: 8D6 1A INC R2
8D7 1A INC R2
LAB167: 8D8 FF MOV A,R7
8D9 03 3A ADD A,#3A
8DB A9 MOV R1,A
8DC FA MOV A,R2
8DD 91 MOVX @R1,A
8DE B8 39 MOV R0,#39
8E0 FD MOV A,R5
8E1 A0 MOV @R0,A
8E2 83 RET
LAB160: 8E3 81 MOVX A,@R1
8E4 F2 E7 JB7 LAB161 ; 08E7
8E6 83 RET
LAB161: 8E7 53 7F ANL A,#7F
8E9 AB MOV R3,A
8EA 03 EE ADD A,#EE
8EC F6 F1 JC LAB162 ; 08F1
8EE 03 22 ADD A,#22
8F0 83 RET
LAB162: 8F1 FB MOV A,R3
8F2 83 RET
LAB165: 8F3 B8 30 MOV R0,#30
8F5 F0 MOV A,@R0
8F6 53 03 ANL A,#03
8F8 AF MOV R7,A
8F9 83 RET
LAB089: 8FA FF MOV A,R7
LAB084: 8FB E7 RL A
8FC 03 2E ADD A,#2E
8FE A9 MOV R1,A
8FF 83 RET
LAB140: 900 17 INC A
901 91 MOVX @R1,A
902 19 INC R1
903 B8 36 MOV R0,#36
905 F0 MOV A,@R0
906 AD MOV R5,A
907 18 INC R0
908 F0 MOV A,@R0
909 AE MOV R6,A
90A 18 INC R0
90B 81 MOVX A,@R1
90C 53 7F ANL A,#7F
90E 60 ADD A,@R0
90F 53 7F ANL A,#7F
911 57 DAA
912 AC MOV R4,A
913 81 MOVX A,@R1
914 40 ORL A,@R0
915 53 80 ANL A,#80
917 4C ORL A,R4
918 91 MOVX @R1,A
919 FA MOV A,R2
91A 03 FE ADD A,#FE
91C F6 2C JC LAB141 ; 092C
91E FA MOV A,R2
91F C6 23 JZ LAB144 ; 0923
921 23 08 MOV A,#08
LAB144: 923 03 40 ADD A,#40
925 A8 MOV R0,A
926 FF MOV A,R7
927 47 SWAP A
928 68 ADD A,R0
929 A8 MOV R0,A
92A 24 2E JMP LAB145 ; 092E
LAB141: 92C 34 9B CALL LAB065 ; 099B
LAB145: 92E 54 F6 CALL LAB142 ; 0AF6
930 54 FB CALL LAB041 ; 0AFB
932 34 96 CALL LAB056 ; 0996
934 FA MOV A,R2
935 6A ADD A,R2
936 03 E0 ADD A,#E0
938 A8 MOV R0,A
939 FF MOV A,R7
93A 03 47 ADD A,#47
93C A3 MOVP A,@A
93D AA MOV R2,A
93E 80 MOVX A,@R0
93F 4A ORL A,R2
940 90 MOVX @R0,A
LAB044: 941 E5 SEL MB0
942 D4 D3 CALL LAB023 ; 06D3
944 F5 SEL MB1
945 83 RET
946 83 DB 83 ; X.....XX
947 03 DB 03 ; ......XX
948 18 DB 18 ; ...XX...
949 C0 DB C0 ; XX......
LAB040: 94A 54 FB CALL LAB041 ; 0AFB
94C B8 A3 MOV R0,#A3
94E FE MOV A,R6
94F 53 7F ANL A,#7F
951 90 MOVX @R0,A
952 B8 A0 MOV R0,#A0
954 80 MOVX A,@R0
955 2E XCH A,R6
956 53 80 ANL A,#80
958 4E ORL A,R6
959 90 MOVX @R0,A
95A 83 RET
LAB035: 95B B8 3D MOV R0,#3D
95D 23 6E MOV A,#6E
95F 90 MOVX @R0,A
960 34 91 CALL LAB036 ; 0991
962 BE 6F MOV R6,#6F
964 34 4A CALL LAB040 ; 094A
966 B8 E0 MOV R0,#E0
968 27 CLR A
969 BA 10 MOV R2,#10
LAB042: 96B 90 MOVX @R0,A
96C 18 INC R0
96D EA 6B DJNZ R2,LAB042 ; 096B
96F B8 40 MOV R0,#40
971 BA 40 MOV R2,#40
973 23 E8 MOV A,#E8
LAB043: 975 90 MOVX @R0,A
976 18 INC R0
977 EA 75 DJNZ R2,LAB043 ; 0975
979 34 41 CALL LAB044 ; 0941
97B B8 30 MOV R0,#30
97D F0 MOV A,@R0
97E 96 8A JNZ LAB045 ; 098A
980 B8 22 MOV R0,#22
982 23 10 MOV A,#10
984 90 MOVX @R0,A
985 B8 26 MOV R0,#26
987 90 MOVX @R0,A
988 44 1A JMP LAB236 ; 0A1A
LAB045: 98A 44 00 JMP LAB046 ; 0A00
LAB118: 98C E5 SEL MB0
98D F4 48 CALL LAB119 ; 0748
98F F5 SEL MB1
990 83 RET
LAB036: 991 E5 SEL MB0
992 F4 3B CALL LAB037 ; 073B
994 F5 SEL MB1
995 83 RET
LAB056: 996 E5 SEL MB0
997 74 EA CALL WRCHAR ; 03EA
999 F5 SEL MB1
99A 83 RET
LAB065: 99B B8 34 MOV R0,#34
99D F0 MOV A,@R0
99E E7 RL A
99F E7 RL A
9A0 03 10 ADD A,#10
9A2 10 INC @R0
9A3 A8 MOV R0,A
9A4 83 RET
LAB226: 9A5 B8 2E MOV R0,#2E
9A7 BC 07 MOV R4,#07
9A9 BA 00 MOV R2,#00
LAB229: 9AB BB 08 MOV R3,#08
9AD 80 MOVX A,@R0
9AE 97 CLR C
LAB228: 9AF F7 RLC A
9B0 E6 B3 JNC LAB227 ; 09B3
9B2 1A INC R2
LAB227: 9B3 EB AF DJNZ R3,LAB228 ; 09AF
9B5 C8 DEC R0
9B6 EC AB DJNZ R4,LAB229 ; 09AB
9B8 23 DD MOV A,#DD
9BA 6A ADD A,R2
9BB E6 C4 JNC LAB230 ; 09C4
9BD BC 07 MOV R4,#07
9BF 27 CLR A
LAB231: 9C0 18 INC R0
9C1 90 MOVX @R0,A
9C2 EC C0 DJNZ R4,LAB231 ; 09C0
LAB230: 9C4 83 RET
LAB153: 9C5 B8 31 MOV R0,#31
9C7 F0 MOV A,@R0
9C8 12 CB JB0 LAB154 ; 09CB
9CA 17 INC A
LAB154: 9CB AA MOV R2,A
9CC F2 E0 JB7 LAB155 ; 09E0
9CE D2 E0 JB6 LAB155 ; 09E0
9D0 47 SWAP A
9D1 AC MOV R4,A
9D2 47 SWAP A
9D3 77 RR A
9D4 77 RR A
9D5 AB MOV R3,A
9D6 18 INC R0
9D7 F0 MOV A,@R0
9D8 52 E0 JB2 LAB155 ; 09E0
9DA DB XRL A,R3
9DB DC XRL A,R4
9DC DA XRL A,R2
9DD 53 03 ANL A,#03
9DF 83 RET
LAB155: 9E0 27 CLR A
9E1 83 RET
LAB073: 9E2 FF MOV A,R7
9E3 03 3A ADD A,#3A
9E5 A8 MOV R0,A
9E6 80 MOVX A,@R0
9E7 F2 EA JB7 LAB074 ; 09EA
9E9 83 RET
LAB074: 9EA 37 CPL A
9EB 17 INC A
9EC 83 RET
LAB105: 9ED 34 E2 CALL LAB073 ; 09E2
9EF 12 F2 JB0 LAB106 ; 09F2
9F1 07 DEC A
LAB106: 9F2 07 DEC A
9F3 AA MOV R2,A
9F4 80 MOVX A,@R0
9F5 F2 FA JB7 LAB107 ; 09FA
9F7 FA MOV A,R2
9F8 90 MOVX @R0,A
9F9 83 RET
LAB107: 9FA FA MOV A,R2
9FB 37 CPL A
9FC 17 INC A
9FD 90 MOVX @R0,A
9FE 83 RET
9FF 00 DB 00 ; ........ 0
LAB046: A00 54 43 CALL LAB047 ; 0A43
A02 54 74 CALL LAB068 ; 0A74
A04 54 D8 CALL LAB069 ; 0AD8
A06 54 D8 CALL LAB069 ; 0AD8
A08 54 9F CALL LAB048 ; 0A9F
LAB076: A0A 34 E2 CALL LAB073 ; 09E2
A0C C6 16 JZ LAB075 ; 0A16
A0E 74 00 CALL LAB091 ; 0B00
A10 74 39 CALL LAB235 ; 0B39
A12 34 ED CALL LAB105 ; 09ED
A14 96 0A JNZ LAB076 ; 0A0A
LAB075: A16 54 D3 CALL LAB059 ; 0AD3
A18 96 0A JNZ LAB076 ; 0A0A
LAB236: A1A 54 43 CALL LAB047 ; 0A43
A1C 54 DD CALL LAB077 ; 0ADD
LAB116: A1E 54 74 CALL LAB068 ; 0A74
A20 74 65 CALL LAB083 ; 0B65
A22 96 1E JNZ LAB116 ; 0A1E
A24 54 74 CALL LAB068 ; 0A74
A26 54 D3 CALL LAB059 ; 0AD3
A28 C6 34 JZ LAB117 ; 0A34
A2A 54 F1 CALL LAB233 ; 0AF1
LAB234: A2C 54 74 CALL LAB068 ; 0A74
A2E 54 D3 CALL LAB059 ; 0AD3
A30 74 65 CALL LAB083 ; 0B65
A32 96 2C JNZ LAB234 ; 0A2C
LAB117: A34 54 74 CALL LAB068 ; 0A74
A36 BF A9 MOV R7,#A9
A38 34 8C CALL LAB118 ; 098C
A3A 54 D8 CALL LAB069 ; 0AD8
A3C BF 6E MOV R7,#6E
A3E 34 8C CALL LAB118 ; 098C
A40 E5 SEL MB0
A41 84 25 JMP LAB120 ; 0425
LAB047: A43 54 9F CALL LAB048 ; 0A9F
LAB063: A45 E7 RL A
A46 E7 RL A
A47 03 1C ADD A,#1C
A49 A9 MOV R1,A
A4A BC 08 MOV R4,#08
A4C 54 A4 CALL LAB050 ; 0AA4
A4E BC 38 MOV R4,#38
A50 BB 54 MOV R3,#54
A52 B8 40 MOV R0,#40
A54 EF 5A DJNZ R7,LAB055 ; 0A5A
A56 B8 60 MOV R0,#60
A58 BB 04 MOV R3,#04
LAB055: A5A 54 FB CALL LAB041 ; 0AFB
A5C B9 20 MOV R1,#20
A5E BA 02 MOV R2,#02
LAB058: A60 BF 04 MOV R7,#04
LAB057: A62 F1 MOV A,@R1
A63 AD MOV R5,A
A64 34 96 CALL LAB056 ; 0996
A66 19 INC R1
A67 19 INC R1
A68 EF 62 DJNZ R7,LAB057 ; 0A62
A6A B9 21 MOV R1,#21
A6C EA 60 DJNZ R2,LAB058 ; 0A60
A6E 34 41 CALL LAB044 ; 0941
A70 54 D3 CALL LAB059 ; 0AD3
A72 96 45 JNZ LAB063 ; 0A45
LAB068: A74 B9 34 MOV R1,#34
A76 27 CLR A
A77 A1 MOV @R1,A
A78 54 9F CALL LAB048 ; 0A9F
LAB067: A7A E7 RL A
A7B 03 2D ADD A,#2D
A7D A9 MOV R1,A
A7E BC 04 MOV R4,#04
A80 54 A4 CALL LAB050 ; 0AA4
A82 BC A8 MOV R4,#A8
A84 BB 74 MOV R3,#74
A86 EF 8A DJNZ R7,LAB064 ; 0A8A
A88 BB 24 MOV R3,#24
LAB064: A8A 54 FB CALL LAB041 ; 0AFB
A8C BF 04 MOV R7,#04
A8E B9 20 MOV R1,#20
LAB066: A90 34 9B CALL LAB065 ; 099B
A92 F1 MOV A,@R1
A93 AD MOV R5,A
A94 34 96 CALL LAB056 ; 0996
A96 19 INC R1
A97 EF 90 DJNZ R7,LAB066 ; 0A90
A99 34 41 CALL LAB044 ; 0941
A9B 54 D3 CALL LAB059 ; 0AD3
A9D 96 7A JNZ LAB067 ; 0A7A
LAB048: A9F E5 SEL MB0
AA0 F4 0F CALL LAB049 ; 070F
AA2 F5 SEL MB1
AA3 83 RET
LAB050: AA4 B8 20 MOV R0,#20
AA6 27 CLR A
AA7 AA MOV R2,A
AA8 AB MOV R3,A
LAB053: AA9 FA MOV A,R2
AAA 67 RRC A
AAB 1A INC R2
AAC 81 MOVX A,@R1
AAD F6 B0 JC LAB051 ; 0AB0
AAF 47 SWAP A
LAB051: AB0 53 0F ANL A,#0F
AB2 A0 MOV @R0,A
AB3 96 BD JNZ LAB052 ; 0ABD
AB5 FB MOV A,R3
AB6 96 BF JNZ LAB054 ; 0ABF
AB8 23 0C MOV A,#0C
ABA A0 MOV @R0,A
ABB 44 BF JMP LAB054 ; 0ABF
LAB052: ABD BB F0 MOV R3,#F0
LAB054: ABF 18 INC R0
AC0 E6 A9 JNC LAB053 ; 0AA9
AC2 19 INC R1
AC3 FA MOV A,R2
AC4 DC XRL A,R4
AC5 96 A9 JNZ LAB053 ; 0AA9
AC7 E5 SEL MB0
AC8 F4 D3 CALL LAB026 ; 07D3
ACA F5 SEL MB1
ACB 83 RET
LAB078: ACC FF MOV A,R7
ACD E7 RL A
ACE E7 RL A
ACF 03 1F ADD A,#1F
AD1 A9 MOV R1,A
AD2 83 RET
LAB059: AD3 E5 SEL MB0
AD4 F4 08 CALL LAB060 ; 0708
AD6 F5 SEL MB1
AD7 83 RET
LAB069: AD8 E5 SEL MB0
AD9 F4 E0 CALL LAB070 ; 07E0
ADB F5 SEL MB1
ADC 83 RET
LAB077: ADD 54 CC CALL LAB078 ; 0ACC
ADF BB 04 MOV R3,#04
AE1 BA 00 MOV R2,#00
LAB079: AE3 81 MOVX A,@R1
AE4 4A ORL A,R2
AE5 AA MOV R2,A
AE6 C9 DEC R1
AE7 EB E3 DJNZ R3,LAB079 ; 0AE3
LAB080: AE9 C6 E9 JZ LAB080 ; 0AE9
AEB 54 D3 CALL LAB059 ; 0AD3
AED 96 DD JNZ LAB077 ; 0ADD
AEF 54 9F CALL LAB048 ; 0A9F
LAB233: AF1 E5 SEL MB0
AF2 D4 56 CALL LAB081 ; 0656
AF4 F5 SEL MB1
AF5 83 RET
LAB142: AF6 E5 SEL MB0
AF7 F4 BB CALL LAB143 ; 07BB
AF9 F5 SEL MB1
AFA 83 RET
LAB041: AFB E5 SEL MB0
AFC D4 DB CALL LAB028 ; 06DB
AFE F5 SEL MB1
AFF 83 RET
LAB091: B00 14 FA CALL LAB089 ; 08FA
B02 C9 DEC R1
B03 34 E2 CALL LAB073 ; 09E2
B05 AA MOV R2,A
B06 B8 35 MOV R0,#35
B08 27 CLR A
B09 A0 MOV @R0,A
B0A 18 INC R0
B0B A0 MOV @R0,A
B0C 18 INC R0
B0D FA MOV A,R2
B0E 12 18 JB0 LAB092 ; 0B18
B10 81 MOVX A,@R1
B11 A0 MOV @R0,A
B12 18 INC R0
B13 19 INC R1
B14 81 MOVX A,@R1
B15 A0 MOV @R0,A
B16 83 RET
B17 00 DB 00 ; ........
LAB092: B18 97 CLR C
B19 81 MOVX A,@R1
B1A 67 RRC A
B1B 72 30 JB3 LAB093 ; 0B30
LAB094: B1D A0 MOV @R0,A
B1E 18 INC R0
B1F 19 INC R1
B20 81 MOVX A,@R1
B21 67 RRC A
B22 F2 26 JB7 LAB095 ; 0B26
B24 64 28 JMP LAB098 ; 0B28
LAB095: B26 03 D0 ADD A,#D0
LAB098: B28 72 2C JB3 LAB096 ; 0B2C
B2A 64 2E JMP LAB097 ; 0B2E
LAB096: B2C 03 FD ADD A,#FD
LAB097: B2E A0 MOV @R0,A
B2F 83 RET
LAB093: B30 03 FD ADD A,#FD
B32 97 CLR C
B33 64 1D JMP LAB094 ; 0B1D
LAB099: B35 B9 44 MOV R1,#44
B37 64 3B JMP LAB100 ; 0B3B
LAB235: B39 54 CC CALL LAB078 ; 0ACC
LAB100: B3B 34 E2 CALL LAB073 ; 09E2
B3D 80 MOVX A,@R0
B3E B8 38 MOV R0,#38
B40 BB 04 MOV R3,#04
B42 F2 50 JB7 LAB101 ; 0B50
LAB104: B44 81 MOVX A,@R1
B45 60 ADD A,@R0
B46 C8 DEC R0
B47 57 DAA
B48 E6 4B JNC LAB103 ; 0B4B
B4A 10 INC @R0
LAB103: B4B 91 MOVX @R1,A
B4C C9 DEC R1
B4D EB 44 DJNZ R3,LAB104 ; 0B44
B4F 83 RET
LAB101: B50 BE 01 MOV R6,#01
LAB102: B52 F0 MOV A,@R0
B53 37 CPL A
B54 17 INC A
B55 03 99 ADD A,#99
B57 6E ADD A,R6
B58 AC MOV R4,A
B59 81 MOVX A,@R1
B5A 6C ADD A,R4
B5B 57 DAA
B5C 91 MOVX @R1,A
B5D 27 CLR A
B5E F7 RLC A
B5F AE MOV R6,A
B60 C9 DEC R1
B61 C8 DEC R0
B62 EB 52 DJNZ R3,LAB102 ; 0B52
B64 83 RET
LAB083: B65 14 FB CALL LAB084 ; 08FB
B67 A8 MOV R0,A
LAB113: B68 E5 SEL MB0
B69 D4 E1 CALL LAB033 ; 06E1
B6B F5 SEL MB1
B6C AC MOV R4,A
B6D D3 2E XRL A,#2E
B6F C6 8D JZ LAB085 ; 0B8D
B71 FC MOV A,R4
B72 D3 2F XRL A,#2F
B74 C6 93 JZ LAB086 ; 0B93
B76 FC MOV A,R4
B77 03 F6 ADD A,#F6
B79 F6 68 JC LAB113 ; 0B68
B7B BB 01 MOV R3,#01
LAB115: B7D 80 MOVX A,@R0
B7E 47 SWAP A
B7F AA MOV R2,A
B80 53 F0 ANL A,#F0
B82 4C ORL A,R4
B83 90 MOVX @R0,A
B84 EB 91 DJNZ R3,LAB114 ; 0B91
B86 C8 DEC R0
B87 FA MOV A,R2
B88 53 0F ANL A,#0F
B8A AC MOV R4,A
B8B 64 7D JMP LAB115 ; 0B7D
LAB085: B8D 27 CLR A
B8E 90 MOVX @R0,A
B8F C8 DEC R0
B90 90 MOVX @R0,A
LAB114: B91 17 INC A
B92 83 RET
LAB086: B93 B8 33 MOV R0,#33
B95 27 CLR A
B96 A0 MOV @R0,A
B97 B8 3A MOV R0,#3A
B99 23 02 MOV A,#02
B9B A0 MOV @R0,A
LAB112: B9C B8 44 MOV R0,#44
B9E 54 CC CALL LAB078 ; 0ACC
BA0 BB 04 MOV R3,#04
LAB087: BA2 81 MOVX A,@R1
BA3 90 MOVX @R0,A
BA4 C8 DEC R0
BA5 C9 DEC R1
BA6 EB A2 DJNZ R3,LAB087 ; 0BA2
BA8 B9 3B MOV R1,#3B
BAA B8 3A MOV R0,#3A
BAC F0 MOV A,@R0
BAD 10 INC @R0
BAE 37 CPL A
BAF 17 INC A
BB0 91 MOVX @R1,A
BB1 19 INC R1
BB2 91 MOVX @R1,A
BB3 D3 FA XRL A,#FA
BB5 C6 E7 JZ LAB088 ; 0BE7
LAB108: BB7 74 00 CALL LAB091 ; 0B00
BB9 74 35 CALL LAB099 ; 0B35
BBB 34 ED CALL LAB105 ; 09ED
BBD 96 B7 JNZ LAB108 ; 0BB7
BBF B9 41 MOV R1,#41
BC1 81 MOVX A,@R1
BC2 F2 C6 JB7 LAB109 ; 0BC6
BC4 64 9C JMP LAB112 ; 0B9C
LAB109: BC6 B8 3A MOV R0,#3A
BC8 F0 MOV A,@R0
BC9 03 C9 ADD A,#C9
BCB B3 JMPP @A
BCC D0 XRL A,@R0
BCD DB XRL A,R3
BCE F6 FB JC LAB110 ; 0BFB
BD0 14 FA CALL LAB089 ; 08FA
BD2 A8 MOV R0,A
BD3 54 CC CALL LAB078 ; 0ACC
BD5 81 MOVX A,@R1
BD6 90 MOVX @R0,A
BD7 C8 DEC R0
BD8 C9 DEC R1
BD9 81 MOVX A,@R1
BDA 90 MOVX @R0,A
BDB FF MOV A,R7
BDC 47 SWAP A
BDD AA MOV R2,A
BDE FF MOV A,R7
BDF E7 RL A
BE0 E7 RL A
BE1 4A ORL A,R2
LAB111: BE2 4F ORL A,R7
BE3 B8 33 MOV R0,#33
BE5 40 ORL A,@R0
BE6 A0 MOV @R0,A
LAB088: BE7 14 FA CALL LAB089 ; 08FA
BE9 A8 MOV R0,A
BEA 80 MOVX A,@R0
BEB C8 DEC R0
BEC AA MOV R2,A
BED 80 MOVX A,@R0
BEE 4A ORL A,R2
BEF 96 F4 JNZ LAB090 ; 0BF4
BF1 17 INC A
BF2 18 INC R0
BF3 90 MOVX @R0,A
LAB090: BF4 27 CLR A
BF5 83 RET
BF6 FF DB FF ; XXXXXXXX
BF7 E7 DB E7 ; XXX..XXX
BF8 E7 DB E7 ; XXX..XXX
BF9 64 DB 64 ; .XX..X..
BFA E2 DB E2 ; XXX...X.
LAB110: BFB 27 CLR A
BFC 64 E2 JMP LAB111 ; 0BE2
BFE 41 DB 41 ; .X.....X
BFF 00 DB 00 ; ........