HELLO
FILE INFORMATION
FILENAME(S): HELLO
FILE TYPE(S): PRG
FILE SIZE: 16.2K
FIRST SEEN: 2025-12-01 13:49:44
APPEARS ON: 1 disk(s)
FILE HASH
8b501d0a7d9b1dd5905953a4398fa118642605ff6b4e4dbccd8ae7840f32375a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES 64 | HELLO | PRG | hedning, Helsinborg | 16 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 1E 40 20 03 8B 20 C2 28 31 30 32 32 29 B3 |.@.@ .. .(1022).|
00000010: B1 39 39 20 A7 20 9E 35 31 39 37 34 3A 9C 00 34 |.99 . .51974:..4|
00000020: 40 25 03 9E 20 35 31 32 30 30 3A 97 35 33 32 38 |@%.. 51200:.5328|
00000030: 30 2C 42 4B 00 42 40 27 03 99 20 C7 28 31 34 37 |0,BK.B@'.. .(147|
00000040: 29 3B 00 64 40 3E 03 42 55 46 46 20 B2 20 35 33 |);.d@>.BUFF . 53|
00000050: 37 35 3A 42 42 B2 35 30 31 37 39 3A 43 47 B2 35 |75:BB.50179:CG.5|
00000060: 31 32 30 30 00 85 40 48 03 4F 46 46 20 B2 20 39 |1200..@H.OFF . 9|
00000070: 30 3A 52 30 46 46 20 B2 20 39 37 3A 20 97 42 42 |0:R0FF . 97: .BB|
00000080: AA 36 2C 31 36 00 A7 40 E8 03 4C 45 24 B2 C7 28 |.6,16..@..LE$..(|
00000090: 31 37 29 3A 52 49 24 B2 C7 28 32 39 29 3A 43 52 |17):RI$..(29):CR|
000000A0: 24 B2 C7 28 31 33 29 00 CC 40 F2 03 42 45 4C 4C |$..(13)..@..BELL|
000000B0: 24 B2 C7 28 37 29 3A 4E 57 24 B2 C7 28 31 33 29 |$..(7):NW$..(13)|
000000C0: 3A 43 4C 53 24 B2 C7 28 31 34 37 29 00 09 41 06 |:CLS$..(147)..A.|
000000D0: 04 46 52 20 B2 20 31 3A 4C 52 20 B2 20 32 35 3A |.FR . 1:LR . 25:|
000000E0: 46 43 20 B2 20 31 3A 4C 41 53 54 43 4F 4C 20 B2 |FC . 1:LASTCOL .|
000000F0: 20 34 30 3A 20 8F 20 20 43 36 34 20 53 43 52 45 | 40: . C64 SCRE|
00000100: 45 4E 20 4C 49 4D 49 54 53 00 7D 41 10 04 86 20 |EN LIMITS.}A... |
00000110: 48 25 28 31 2C 31 33 29 2C 48 4E 25 28 34 2C 31 |H%(1,13),HN%(4,1|
00000120: 33 29 2C 43 50 25 28 34 29 2C 53 50 25 28 34 29 |3),CP%(4),SP%(4)|
00000130: 2C 50 53 25 28 34 2C 31 33 2C 32 29 2C 4E 48 25 |,PS%(4,13,2),NH%|
00000140: 28 31 34 29 2C 42 53 25 28 35 2C 34 29 3A 20 8F |(14),BS%(5,4): .|
00000150: 20 20 20 20 20 4E 55 4D 45 52 49 43 20 52 45 50 | NUMERIC REP|
00000160: 52 45 53 45 4E 54 41 54 49 4F 4E 20 4F 46 20 48 |RESENTATION OF H|
00000170: 41 4E 44 20 49 4E 20 4D 45 4D 4F 52 59 00 AF 41 |AND IN MEMORY..A|
00000180: 1A 04 83 20 20 41 2C 4B 2C 51 2C 4A 2C 22 A5 22 |... A,K,Q,J,"."|
00000190: 2C 39 2C 38 2C 37 2C 36 2C 35 2C 34 2C 33 2C 32 |,9,8,7,6,5,4,3,2|
000001A0: 3A 20 8F 20 20 43 41 52 44 20 4E 41 4D 45 53 00 |: . CARD NAMES.|
000001B0: CF 41 24 04 83 20 20 4E 2C 53 2C 48 2C 44 2C 43 |.A$.. N,S,H,D,C|
000001C0: 3A 20 8F 20 20 53 55 49 54 20 4E 41 4D 45 53 00 |: . SUIT NAMES.|
000001D0: E8 41 2E 04 83 20 20 42 4F 54 48 2C 4E 4F 4E 45 |.A... BOTH,NONE|
000001E0: 2C 4E 2F 53 2C 45 2F 57 00 FE 41 33 04 83 20 22 |,N/S,E/W..A3.. "|
000001F0: C1 22 2C 22 D3 22 2C 22 DA 22 2C 22 D8 22 00 35 |.",".",".",".".5|
00000200: 42 38 04 86 20 43 41 52 44 24 28 31 33 29 2C 56 |B8.. CARD$(13),V|
00000210: 55 4C 24 28 33 29 2C 53 55 24 28 34 29 2C 42 49 |UL$(3),SU$(4),BI|
00000220: 44 24 28 33 38 29 2C 52 4B 24 28 31 33 29 2C 58 |D$(38),RK$(13),X|
00000230: 55 24 28 34 29 00 66 42 42 04 81 20 49 20 B2 20 |U$(4).fBB.. I . |
00000240: 31 20 A4 20 31 33 3A 20 87 20 43 41 52 44 24 28 |1 . 13: . CARD$(|
00000250: 49 29 3A 52 4B 24 28 49 29 B2 43 41 52 44 24 28 |I):RK$(I).CARD$(|
00000260: 49 29 3A 82 20 49 00 A2 42 4C 04 81 20 49 20 B2 |I):. I..BL.. I .|
00000270: 20 30 20 A4 20 34 3A 20 87 20 53 55 24 28 49 29 | 0 . 4: . SU$(I)|
00000280: 3A 20 82 20 49 3A 20 81 20 49 20 B2 20 30 20 A4 |: . I: . I . 0 .|
00000290: 20 33 3A 20 87 20 56 55 4C 24 28 49 29 3A 20 82 | 3: . VUL$(I): .|
000002A0: 20 49 00 BD 42 51 04 81 20 49 B2 31 20 A4 20 34 | I..BQ.. I.1 . 4|
000002B0: 3A 87 20 58 55 24 28 49 29 3A 82 20 49 00 07 43 |:. XU$(I):. I..C|
000002C0: 56 04 81 20 49 20 B2 20 31 20 A4 20 37 3A 20 81 |V.. I . 1 . 7: .|
000002D0: 20 4A 20 B2 20 34 20 A4 20 30 20 A9 20 20 AB 20 | J . 4 . 0 . . |
000002E0: 31 3A 42 49 44 24 28 35 20 AC 20 49 20 AB 20 4A |1:BID$(5 . I . J|
000002F0: 29 20 B2 C7 28 34 38 AA 49 29 AA 53 55 24 28 4A |) ..(48.I).SU$(J|
00000300: 29 3A 82 4A 3A 82 49 00 4D 43 60 04 42 49 44 24 |):.J:.I.MC`.BID$|
00000310: 28 33 36 29 20 B2 20 22 50 22 3A 42 49 44 24 28 |(36) . "P":BID$(|
00000320: 33 37 29 20 B2 20 22 44 22 3A 42 49 44 24 28 33 |37) . "D":BID$(3|
00000330: 38 29 20 B2 20 22 52 22 3A 20 8F 20 20 20 53 45 |8) . "R": . SE|
00000340: 54 55 50 20 42 49 44 20 41 52 52 41 59 00 53 43 |TUP BID ARRAY.SC|
00000350: 88 04 8F 00 9A 43 92 04 43 41 52 44 42 4C 41 4E |.....C..CARDBLAN|
00000360: 4B 24 20 B2 20 22 20 20 20 22 3A 42 4C 24 20 B2 |K$ . " ":BL$ .|
00000370: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00000380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000390: 20 20 20 20 20 20 20 20 20 22 00 D9 43 9C 04 4E | "..C..N|
000003A0: 52 20 B2 20 31 3A 50 4E 20 B2 20 30 3A 4E 50 24 |R . 1:PN . 0:NP$|
000003B0: 20 B2 20 22 59 22 3A 20 8F 20 20 20 20 45 4E 44 | . "Y": . END|
000003C0: 20 4F 46 20 53 54 41 54 49 43 20 49 4E 49 54 49 | OF STATIC INITI|
000003D0: 41 4C 49 5A 41 54 49 4F 4E 00 FA 43 A6 04 4C 52 |ALIZATION..C..LR|
000003E0: 25 20 B2 20 31 30 30 3A 8B 20 C2 28 31 30 32 32 |% . 100:. .(1022|
000003F0: 29 B2 39 39 20 A7 31 39 31 35 00 07 44 AB 04 97 |).99 .1915..D...|
00000400: 31 30 32 32 2C 39 39 00 21 44 B0 04 8B 20 4E 50 |1022,99.!D... NP|
00000410: 24 20 B3 20 20 B1 20 22 59 22 20 A7 20 31 39 33 |$ . . "Y" . 193|
00000420: 30 00 85 44 BA 04 48 5A 20 B2 20 37 3A 56 5A 20 |0..D..HZ . 7:VZ |
00000430: B2 20 31 3A 50 24 20 B2 20 22 50 4C 41 59 20 4F |. 1:P$ . "PLAY O|
00000440: 46 20 54 48 45 20 48 41 4E 44 20 42 59 20 47 4F |F THE HAND BY GO|
00000450: 52 45 4E 22 3A 20 8D 20 31 33 30 30 30 3A 20 99 |REN": . 13000: .|
00000460: 20 4E 57 24 3B 4E 57 24 3B 4E 57 24 3B 4E 57 24 | NW$;NW$;NW$;NW$|
00000470: 3B 4E 57 24 3A 52 4F 55 4E 44 20 B2 20 31 3A 54 |;NW$:ROUND . 1:T|
00000480: 45 20 B2 20 30 00 B8 44 C4 04 99 20 20 A3 20 37 |E . 0..D... . 7|
00000490: 29 3B 22 4E 45 58 54 20 48 41 4E 44 20 49 4E 20 |);"NEXT HAND IN |
000004A0: 53 45 51 55 45 4E 43 45 20 49 53 3A 22 3B 4E 52 |SEQUENCE IS:";NR|
000004B0: 3B 4E 57 24 3B 4E 57 24 00 14 45 CE 04 99 20 22 |;NW$;NW$..E... "|
000004C0: 57 48 49 43 48 20 48 41 4E 44 20 44 4F 20 59 4F |WHICH HAND DO YO|
000004D0: 55 20 57 49 53 48 20 54 4F 20 50 4C 41 59 3F 20 |U WISH TO PLAY? |
000004E0: 28 31 2D 31 30 30 29 22 3A 20 99 20 3A 20 99 20 |(1-100)": . : . |
000004F0: 22 4F 52 20 48 49 54 20 27 52 45 54 55 52 4E 27 |"OR HIT 'RETURN'|
00000500: 20 46 4F 52 20 48 41 4E 44 20 23 22 4E 52 3B 22 | FOR HAND #"NR;"|
00000510: 20 3E 22 3B 00 36 45 D3 04 4E 4E 20 B2 20 33 3A | >";.6E..NN . 3:|
00000520: 20 8D 20 33 30 30 30 30 3A 4E 50 20 B2 20 20 C5 | . 30000:NP . .|
00000530: 20 28 53 52 24 29 00 4D 45 D8 04 8B 20 4E 50 20 | (SR$).ME... NP |
00000540: B2 20 30 20 A7 20 4E 50 20 B2 20 4E 52 00 9B 45 |. 0 . NP . NR..E|
00000550: E2 04 8B 20 4E 50 20 B3 20 31 20 B0 20 4E 50 20 |... NP . 1 . NP |
00000560: B1 20 4C 52 25 20 A7 20 20 99 20 4E 57 24 3B 22 |. LR% . . NW$;"|
00000570: 54 48 41 54 20 49 53 20 4E 4F 54 20 41 20 56 41 |THAT IS NOT A VA|
00000580: 4C 49 44 20 48 41 4E 44 20 23 22 20 AA 20 42 45 |LID HAND #" . BE|
00000590: 4C 4C 24 3A 20 89 20 31 32 33 30 00 CB 45 EC 04 |LL$: . 1230..E..|
000005A0: 99 20 4E 57 24 3B 4E 57 24 3B 20 A3 20 31 32 29 |. NW$;NW$; . 12)|
000005B0: 22 4C 4F 41 44 49 4E 47 20 48 41 4E 44 20 23 22 |"LOADING HAND #"|
000005C0: 3B 4E 50 3A 4E 52 20 B2 20 4E 50 00 E7 45 EE 04 |;NP:NR . NP..E..|
000005D0: 9F 31 35 2C 38 2C 31 35 3A 9F 38 2C 38 2C 38 2C |.15,8,15:.8,8,8,|
000005E0: 22 48 41 4E 44 53 22 00 04 46 F0 04 98 31 35 2C |"HANDS"..F...15,|
000005F0: 22 50 22 C7 28 38 29 C7 28 4E 50 29 C7 28 30 29 |"P".(8).(NP).(0)|
00000600: C7 28 30 29 00 2F 46 F2 04 81 49 B2 31 20 A4 20 |.(0)./F...I.1 . |
00000610: 31 39 32 3A A1 23 38 2C 41 24 3A 97 42 55 46 46 |192:.#8,A$:.BUFF|
00000620: AA 49 2C C6 28 41 24 AA C7 28 30 29 29 3A 82 00 |.I,.(A$..(0)):..|
00000630: 3C 46 F4 04 A0 20 38 3A A0 20 31 35 00 42 46 F6 |<F... 8:. 15.BF.|
00000640: 04 8F 00 90 46 00 05 81 20 49 20 B2 20 30 20 A4 |....F... I . 0 .|
00000650: 20 33 3A 20 81 20 4A 20 B2 20 31 20 A4 20 31 33 | 3: . J . 1 . 13|
00000660: 3A 48 4E 25 28 49 20 AA 20 31 2C 4A 29 20 B2 20 |:HN%(I . 1,J) . |
00000670: 20 C2 20 28 42 55 46 46 20 AA 20 31 33 20 AC 20 | . (BUFF . 13 . |
00000680: 49 20 AA 20 4A 29 3A 20 82 20 4A 3A 20 82 20 49 |I . J): . J: . I|
00000690: 00 F8 46 0A 05 44 4C 20 B2 20 20 C2 20 28 42 55 |..F..DL . . (BU|
000006A0: 46 46 20 AA 20 31 37 30 29 3A 20 81 20 49 20 B2 |FF . 170): . I .|
000006B0: 20 30 20 A4 20 34 3A 20 81 20 4A 20 B2 20 31 20 | 0 . 4: . J . 1 |
000006C0: A4 20 34 3A 42 53 25 28 49 20 AA 20 31 2C 4A 29 |. 4:BS%(I . 1,J)|
000006D0: 20 B2 20 20 C2 20 28 42 55 46 46 20 AA 20 31 37 | . . (BUFF . 17|
000006E0: 30 20 AA 20 34 20 AC 20 49 20 AA 20 4A 29 3A 20 |0 . 4 . I . J): |
000006F0: 82 20 4A 3A 20 82 20 49 00 09 47 14 05 81 20 49 |. J: . I..G... I|
00000700: 20 B2 20 30 20 A4 20 31 32 00 3D 47 1E 05 42 41 | . 0 . 12.=G..BA|
00000710: 20 B2 20 49 20 AC 20 39 20 AA 20 31 3A 4E 48 25 | . I . 9 . 1:NH%|
00000720: 28 49 20 AA 20 31 29 20 B2 20 20 C2 20 28 42 55 |(I . 1) . . (BU|
00000730: 46 46 20 AA 20 42 41 20 AA 20 35 32 29 00 C3 47 |FF . BA . 52)..G|
00000740: 28 05 81 20 4A 20 B2 20 31 20 A4 20 34 3A 50 53 |(.. J . 1 . 4:PS|
00000750: 25 28 4A 2C 49 20 AA 20 31 2C 31 29 20 B2 20 20 |%(J,I . 1,1) . |
00000760: C2 20 28 42 55 46 46 20 AA 20 42 41 20 AA 20 35 |. (BUFF . BA . 5|
00000770: 32 20 AA 20 32 20 AC 20 4A 20 AB 20 31 29 3A 50 |2 . 2 . J . 1):P|
00000780: 53 25 28 4A 2C 49 20 AA 20 31 2C 32 29 20 B2 20 |S%(J,I . 1,2) . |
00000790: 20 C2 20 28 42 55 46 46 20 AA 20 42 41 20 AA 20 | . (BUFF . BA . |
000007A0: 35 32 20 AA 20 32 20 AC 20 4A 29 3A 50 53 25 28 |52 . 2 . J):PS%(|
000007B0: 4A 2C 49 20 AA 20 31 2C 30 29 20 B2 20 30 3A 20 |J,I . 1,0) . 0: |
000007C0: 82 20 4A 00 CB 47 32 05 82 20 49 00 0B 48 3C 05 |. J..G2.. I..H<.|
000007D0: 48 5A 20 B2 20 31 36 3A 56 5A 20 B2 20 31 3A 50 |HZ . 16:VZ . 1:P|
000007E0: 24 20 B2 20 22 54 48 45 20 41 55 43 54 49 4F 4E |$ . "THE AUCTION|
000007F0: 22 3A 20 8D 20 31 33 30 30 30 3A 9E 38 32 38 48 |": . 13000:.828H|
00000800: 2C 31 36 3A 9E 38 32 38 56 2C 38 00 4D 48 41 05 |,16:.828V,8.MHA.|
00000810: 99 22 53 20 20 20 57 20 20 20 4E 20 20 20 45 22 |."S W N E"|
00000820: 3A 9E 38 32 38 48 2C 31 38 3A 9E 38 32 38 56 2C |:.828H,18:.828V,|
00000830: 36 3A 99 22 56 55 4C 3A 20 22 3B 56 55 4C 24 28 |6:."VUL: ";VUL$(|
00000840: 4E 52 AB B5 28 4E 52 AD 34 29 AC 34 29 00 77 48 |NR..(NR.4).4).wH|
00000850: 46 05 48 4E 20 B2 20 31 3A 49 58 20 B2 20 31 3A |F.HN . 1:IX . 1:|
00000860: 56 20 B2 20 31 39 3A 20 8D 20 31 37 30 30 30 3A |V . 19: . 17000:|
00000870: 97 42 42 AA 38 2C 30 00 B2 48 50 05 52 4F 55 4E |.BB.8,0..HP.ROUN|
00000880: 44 20 B2 20 31 3A 50 43 20 B2 20 30 3A 4C 42 20 |D . 1:PC . 0:LB |
00000890: B2 20 30 3A 4F 42 20 B2 20 30 3A 54 42 20 B2 20 |. 0:OB . 0:TB . |
000008A0: 30 3A 20 8B 20 44 4C 20 B2 20 31 20 A7 20 31 33 |0: . DL . 1 . 13|
000008B0: 37 30 00 E7 48 55 05 81 20 49 20 B2 20 31 20 A4 |70..HU.. I . 1 .|
000008C0: 20 44 4C 20 AB 20 31 3A 48 44 20 B2 20 49 3A 44 | DL . 1:HD . I:D|
000008D0: 49 24 20 B2 20 22 2D 2D 22 3A 20 8D 20 31 30 31 |I$ . "--": . 101|
000008E0: 32 30 3A 20 82 20 49 00 28 49 5A 05 8B 20 44 4C |20: . I.(IZ.. DL|
000008F0: 20 B2 20 31 20 A7 9E 38 32 38 48 2C 31 30 3A 9E | . 1 ..828H,10:.|
00000900: 38 32 38 56 2C 32 35 3A 99 20 22 59 4F 55 20 44 |828V,25:. "YOU D|
00000910: 45 41 4C 54 20 54 48 49 53 20 48 41 4E 44 22 3B |EALT THIS HAND";|
00000920: 3A 20 89 20 31 33 39 30 00 9F 49 64 05 81 20 49 |: . 1390..Id.. I|
00000930: 20 B2 20 44 4C 20 A4 20 34 3A 44 49 24 20 B2 20 | . DL . 4:DI$ . |
00000940: 22 3F 20 22 3A 48 44 20 B2 20 49 3A 20 8D 20 31 |"? ":HD . I: . 1|
00000950: 30 38 31 30 3A 44 49 24 20 B2 20 42 49 44 24 28 |0810:DI$ . BID$(|
00000960: 42 53 25 28 52 4F 55 4E 44 2C 48 44 29 29 3A 4D |BS%(ROUND,HD)):M|
00000970: 49 20 B2 20 34 30 3A 4D 41 20 B2 20 34 30 3A 20 |I . 40:MA . 40: |
00000980: 8D 20 31 30 31 38 30 3A 20 8D 20 31 30 31 32 30 |. 10180: . 10120|
00000990: 3A 20 82 20 49 3A 52 4F 55 4E 44 20 B2 20 32 00 |: . I:ROUND . 2.|
000009A0: AA 49 6E 05 48 44 20 B2 20 31 00 C1 49 78 05 8B |.In.HD . 1..Ix..|
000009B0: 20 50 43 20 B1 20 20 B2 20 33 20 A7 20 31 34 33 | PC . . 3 . 143|
000009C0: 30 00 F6 49 7A 05 44 49 24 20 B2 20 22 3F 20 22 |0..Iz.DI$ . "? "|
000009D0: 3A 20 8D 20 31 30 38 31 30 3A 20 8B 20 48 44 20 |: . 10810: . HD |
000009E0: B2 20 31 20 A7 20 20 8D 20 31 30 32 30 30 3A 20 |. 1 . . 10200: |
000009F0: 89 20 31 34 31 30 00 2D 4A 7D 05 44 49 24 20 B2 |. 1410.-J}.DI$ .|
00000A00: 20 42 49 44 24 28 42 53 25 28 52 4F 55 4E 44 2C | BID$(BS%(ROUND,|
00000A10: 48 44 29 29 3A 4D 49 20 B2 20 34 30 3A 4D 41 20 |HD)):MI . 40:MA |
00000A20: B2 20 34 30 3A 20 8D 20 31 30 31 38 30 00 6A 4A |. 40: . 10180.jJ|
00000A30: 82 05 8D 20 31 30 31 32 30 3A 48 44 20 B2 20 48 |... 10120:HD . H|
00000A40: 44 20 AA 20 31 3A 20 8B 20 48 44 20 B1 20 34 20 |D . 1: . HD . 4 |
00000A50: A7 20 48 44 20 B2 20 31 3A 52 4F 55 4E 44 20 B2 |. HD . 1:ROUND .|
00000A60: 20 52 4F 55 4E 44 20 AA 20 31 00 7E 4A 8C 05 8B | ROUND . 1.~J...|
00000A70: 20 50 43 20 B3 20 33 20 A7 20 31 34 30 30 00 84 | PC . 3 . 1400..|
00000A80: 4A 96 05 8F 00 99 4A A0 05 8D 20 31 39 30 30 30 |J.....J... 19000|
00000A90: 3A 20 8D 20 31 30 32 37 30 00 D0 4A AA 05 48 4E |: . 10270..J..HN|
00000AA0: 20 B2 20 4E 48 25 28 31 29 3A 52 4F 55 4E 44 20 | . NH%(1):ROUND |
00000AB0: B2 20 31 3A 20 8B 20 48 4E 20 B1 20 31 20 A7 20 |. 1: . HN . 1 . |
00000AC0: 20 8D 20 31 30 35 37 30 3A 20 89 20 31 34 36 30 | . 10570: . 1460|
00000AD0: 00 DC 4A AF 05 8D 20 31 30 33 38 30 00 18 4B B4 |..J... 10380..K.|
00000AE0: 05 8D 20 31 30 30 30 30 3A 44 49 24 20 B2 20 43 |.. 10000:DI$ . C|
00000AF0: 53 24 3A 20 8D 20 31 30 36 36 30 3A 48 4E 20 B2 |S$: . 10660:HN .|
00000B00: 20 44 55 3A 20 8B 20 48 4E 20 B2 20 32 20 A7 20 | DU: . HN . 2 . |
00000B10: 20 8D 20 32 36 30 30 30 00 32 4B B5 05 49 58 20 | . 26000.2K..IX |
00000B20: B2 20 30 3A 56 20 B2 20 34 3A 20 8D 20 31 37 30 |. 0:V . 4: . 170|
00000B30: 30 30 00 80 4B BE 05 48 4E 20 B2 20 4E 48 25 28 |00..K..HN . NH%(|
00000B40: 31 29 3A 53 49 20 B2 20 53 50 25 28 48 4E 29 3A |1):SI . SP%(HN):|
00000B50: 20 81 20 49 20 B2 20 31 20 A4 20 33 3A 48 4E 20 | . I . 1 . 3:HN |
00000B60: B2 20 48 4E 20 AA 20 31 3A 20 8B 20 48 4E 20 B1 |. HN . 1: . HN .|
00000B70: 20 34 20 A7 20 48 4E 20 B2 20 48 4E 20 AB 20 34 | 4 . HN . HN . 4|
00000B80: 00 BF 4B C8 05 8B 20 48 4E 20 B2 20 31 20 B0 20 |..K... HN . 1 . |
00000B90: 28 48 4E 20 B2 20 33 20 AF 20 28 44 55 20 B2 20 |(HN . 3 . (DU . |
00000BA0: 31 20 B0 20 44 55 20 B2 20 33 29 29 20 A7 20 20 |1 . DU . 3)) . |
00000BB0: 8D 20 31 30 33 38 30 3A 20 89 20 31 34 39 30 00 |. 10380: . 1490.|
00000BC0: CB 4B CD 05 8D 20 31 30 35 37 30 00 EF 4B D2 05 |.K... 10570..K..|
00000BD0: 8D 20 31 30 30 30 30 3A 44 49 24 20 B2 20 43 53 |. 10000:DI$ . CS|
00000BE0: 24 3A 20 8D 20 31 30 36 36 30 3A 20 82 20 49 00 |$: . 10660: . I.|
00000BF0: 27 4C DC 05 8D 20 31 30 37 38 30 3A 8D 20 31 30 |'L... 10780:. 10|
00000C00: 37 33 30 3A 20 8B 20 57 49 20 B2 20 32 20 B0 20 |730: . WI . 2 . |
00000C10: 57 49 20 B2 20 34 20 A7 20 54 54 20 B2 20 31 3A |WI . 4 . TT . 1:|
00000C20: 20 89 20 31 35 31 30 00 32 4C E1 05 4F 54 20 B2 | . 1510.2L..OT .|
00000C30: 20 31 00 47 4C E6 05 81 20 52 4F 55 4E 44 20 B2 | 1.GL... ROUND .|
00000C40: 20 32 20 A4 20 31 33 00 69 4C F0 05 8B 20 52 4F | 2 . 13.iL... RO|
00000C50: 55 4E 44 20 B2 20 4C 43 20 AF 20 4C 43 20 B3 20 |UND . LC . LC . |
00000C60: 31 33 20 A7 20 31 37 37 30 00 8E 4C FA 05 53 49 |13 . 1770..L..SI|
00000C70: 20 B2 20 30 3A 48 4E 20 B2 20 57 49 3A 20 8D 20 | . 0:HN . WI: . |
00000C80: 31 30 33 34 30 3A 20 8D 20 32 35 30 30 30 00 DA |10340: . 25000..|
00000C90: 4C 04 06 81 20 49 20 B2 20 31 20 A4 20 34 3A 20 |L... I . 1 . 4: |
00000CA0: 8B 20 48 4E 20 B2 20 31 20 B0 20 28 48 4E 20 B2 |. HN . 1 . (HN .|
00000CB0: 20 33 20 AF 20 28 44 55 20 B2 20 31 20 B0 20 44 | 3 . (DU . 1 . D|
00000CC0: 55 20 B2 20 33 29 29 20 A7 20 20 8D 20 31 30 33 |U . 3)) . . 103|
00000CD0: 38 30 3A 20 89 20 31 35 35 30 00 E6 4C 09 06 8D |80: . 1550..L...|
00000CE0: 20 31 30 35 37 30 00 29 4D 0E 06 8D 20 31 30 30 | 10570.)M... 100|
00000CF0: 30 30 3A 44 49 24 20 B2 20 43 53 24 3A 20 8D 20 |00:DI$ . CS$: . |
00000D00: 31 30 36 36 30 3A 48 4E 20 B2 20 48 4E 20 AA 20 |10660:HN . HN . |
00000D10: 31 3A 20 8B 20 48 4E 20 B1 20 34 20 A7 20 48 4E |1: . HN . 4 . HN|
00000D20: 20 B2 20 48 4E 20 AB 20 34 00 40 4D 18 06 8B 20 | . HN . 4.@M... |
00000D30: 53 49 20 B2 20 30 20 A7 20 53 49 20 B2 20 53 4E |SI . 0 . SI . SN|
00000D40: 00 7B 4D 22 06 82 20 49 3A 20 8D 20 31 30 37 33 |.{M".. I: . 1073|
00000D50: 30 3A 20 8B 20 52 4F 55 4E 44 20 B3 20 4C 43 20 |0: . ROUND . LC |
00000D60: AF 20 4E 48 25 28 52 4F 55 4E 44 20 AA 20 31 29 |. NH%(ROUND . 1)|
00000D70: 20 B3 20 35 20 A7 20 31 37 32 30 00 AD 4D 2C 06 | . 5 . 1720..M,.|
00000D80: 8B 20 4C 43 20 B2 20 31 33 20 AF 20 52 4F 55 4E |. LC . 13 . ROUN|
00000D90: 44 20 B2 20 31 33 20 A7 20 4E 48 25 28 31 34 29 |D . 13 . NH%(14)|
00000DA0: 20 B2 20 57 49 3A 20 89 20 31 37 32 30 00 CA 4D | . WI: . 1720..M|
00000DB0: 36 06 8B 20 57 49 20 B2 20 31 20 B0 20 57 49 20 |6.. WI . 1 . WI |
00000DC0: B2 20 33 20 A7 20 31 37 32 30 00 EE 4D 40 06 8B |. 3 . 1720..M@..|
00000DD0: 20 52 4F 55 4E 44 20 B2 20 20 B1 20 4C 43 20 AF | ROUND . . LC .|
00000DE0: 20 4E 45 20 B3 20 31 20 A7 20 31 37 32 30 00 18 | NE . 1 . 1720..|
00000DF0: 4E 4A 06 8B 20 20 A8 20 28 52 4F 55 4E 44 20 B2 |NJ.. . (ROUND .|
00000E00: 20 20 B1 20 4C 43 20 AF 20 4C 43 20 B3 20 31 33 | . LC . LC . 13|
00000E10: 29 20 A7 20 31 36 37 30 00 4E 4E 4F 06 8D 20 32 |) . 1670.NNO.. 2|
00000E20: 30 30 30 30 3A 20 99 20 42 45 4C 4C 24 3B 22 59 |0000: . BELL$;"Y|
00000E30: 4F 55 20 4D 41 44 45 20 41 20 4D 49 53 54 41 4B |OU MADE A MISTAK|
00000E40: 45 20 43 41 53 48 49 4E 47 20 4F 55 54 22 00 8C |E CASHING OUT"..|
00000E50: 4E 54 06 99 20 22 57 45 20 57 49 4C 4C 20 52 45 |NT.. "WE WILL RE|
00000E60: 53 54 4F 52 45 20 54 48 45 20 48 41 4E 44 20 54 |STORE THE HAND T|
00000E70: 4F 20 52 4F 55 4E 44 20 22 3B 4C 43 3A 4C 4C B2 |O ROUND ";LC:LL.|
00000E80: 4C 43 3A 4F 42 B2 30 3A 54 42 B2 30 00 EE 4E 59 |LC:OB.0:TB.0..NY|
00000E90: 06 8D 31 39 30 30 30 3A 99 C7 28 31 34 37 29 3B |..19000:..(147);|
00000EA0: 3A 54 45 20 B2 20 54 45 20 AA 20 38 3A 20 81 20 |:TE . TE . 8: . |
00000EB0: 49 20 B2 20 31 20 A4 20 34 3A 20 81 20 4A 20 B2 |I . 1 . 4: . J .|
00000EC0: 20 31 20 A4 20 31 33 3A 20 8B 20 50 53 25 28 49 | 1 . 13: . PS%(I|
00000ED0: 2C 4A 2C 30 29 20 B2 20 20 B1 20 4C 4C 20 A7 20 |,J,0) . . LL . |
00000EE0: 50 53 25 28 49 2C 4A 2C 30 29 20 B2 20 30 00 0D |PS%(I,J,0) . 0..|
00000EF0: 4F 5A 06 57 49 B2 48 4C 3A 52 4F 55 4E 44 B2 4C |OZ.WI.HL:ROUND.L|
00000F00: 4C 3A 4F 54 B2 48 55 3A 54 54 B2 48 54 00 1D 4F |L:OT.HU:TT.HT..O|
00000F10: 5B 06 82 4A 3A 82 49 3A 89 31 36 38 35 00 B8 4F |[..J:.I:.1685..O|
00000F20: 86 06 8D 32 30 30 30 30 3A 99 20 42 45 4C 4C 24 |...20000:. BELL$|
00000F30: 3B 22 59 4F 55 20 53 48 4F 55 4C 44 20 48 41 56 |;"YOU SHOULD HAV|
00000F40: 45 20 57 4F 4E 20 54 48 49 53 20 54 52 49 43 4B |E WON THIS TRICK|
00000F50: 22 3A 99 22 57 45 20 57 49 4C 4C 20 52 45 53 54 |":."WE WILL REST|
00000F60: 4F 52 45 20 54 4F 20 42 45 46 4F 52 45 20 54 48 |ORE TO BEFORE TH|
00000F70: 49 53 20 54 52 49 43 4B 22 3B 3A 8D 31 39 30 30 |IS TRICK";:.1900|
00000F80: 30 3A 99 C7 28 31 34 37 29 3B 3A 81 4A B2 31 A4 |0:..(147);:.J.1.|
00000F90: 34 3A 81 4B B2 31 A4 31 33 3A 8B 50 53 25 28 4A |4:.K.1.13:.PS%(J|
00000FA0: 2C 4B 2C 30 29 B2 52 4F 55 4E 44 A7 50 53 25 28 |,K,0).ROUND.PS%(|
00000FB0: 4A 2C 4B 2C 30 29 B2 30 00 C5 4F 90 06 82 20 4B |J,K,0).0..O... K|
00000FC0: 3A 20 82 20 4A 00 06 50 95 06 81 4A B2 31 A4 31 |: . J..P...J.1.1|
00000FD0: 33 3A 8B 50 53 25 28 31 2C 4A 2C 30 29 B2 30 A7 |3:.PS%(1,J,0).0.|
00000FE0: 48 4E B2 31 3A 43 4E B2 4A 3A 8D 31 30 30 30 30 |HN.1:CN.J:.10000|
00000FF0: 3A 56 B2 31 39 3A 49 58 B2 31 3A 48 B2 48 25 28 |:V.19:IX.1:H.H%(|
00001000: 49 58 2C 43 4E 29 00 12 50 9A 06 8D 20 31 36 30 |IX,CN)..P... 160|
00001010: 30 30 00 66 50 A4 06 8B 20 50 53 25 28 44 55 2C |00.fP... PS%(DU,|
00001020: 4A 2C 30 29 20 B2 20 30 20 A7 20 48 4E 20 B2 20 |J,0) . 0 . HN . |
00001030: 44 55 3A 43 4E 20 B2 20 4A 3A 20 8D 20 31 30 30 |DU:CN . J: . 100|
00001040: 30 30 3A 56 20 B2 20 34 3A 49 58 20 B2 20 30 3A |00:V . 4:IX . 0:|
00001050: 48 20 B2 20 48 25 28 49 58 2C 43 4E 29 3A 20 8D |H . H%(IX,CN): .|
00001060: 20 31 36 30 30 30 00 8C 50 A9 06 82 20 4A 3A 4F | 16000..P... J:O|
00001070: 31 20 B2 20 4F 54 3A 54 31 20 B2 20 54 54 3A 54 |1 . OT:T1 . TT:T|
00001080: 54 20 B2 20 30 3A 4F 54 20 B2 20 30 00 D3 50 AE |T . 0:OT . 0..P.|
00001090: 06 8B 20 4F 31 20 B1 20 30 20 A7 20 57 49 20 B2 |.. O1 . 0 . WI .|
000010A0: 20 31 3A 20 81 20 4F 54 20 B2 20 31 20 A4 20 4F | 1: . OT . 1 . O|
000010B0: 31 3A 20 8D 20 31 30 33 34 30 3A 20 8D 20 32 35 |1: . 10340: . 25|
000010C0: 30 30 30 3A 20 82 20 3A 4F 54 20 B2 20 4F 54 20 |000: . :OT . OT |
000010D0: AB 20 31 00 1A 51 B2 06 8B 20 54 31 20 B1 20 30 |. 1..Q... T1 . 0|
000010E0: 20 A7 20 57 49 20 B2 20 32 3A 20 81 20 54 54 20 | . WI . 2: . TT |
000010F0: B2 20 31 20 A4 20 54 31 3A 20 8D 20 31 30 33 34 |. 1 . T1: . 1034|
00001100: 30 3A 20 8D 20 32 35 30 30 30 3A 20 82 20 3A 54 |0: . 25000: . :T|
00001110: 54 20 B2 20 54 54 20 AB 20 31 00 2E 51 B4 06 97 |T . TT . 1..Q...|
00001120: 42 42 AA 36 2C 38 30 3A 8D 31 30 38 30 30 00 42 |BB.6,80:.10800.B|
00001130: 51 B6 06 57 49 20 B2 20 4F 57 3A 20 89 20 31 35 |Q..WI . OW: . 15|
00001140: 33 30 00 96 51 B8 06 8B 20 52 4F 55 4E 44 20 B3 |30..Q... ROUND .|
00001150: 20 4C 43 20 A7 20 20 8B 20 4E 48 25 28 52 4F 55 | LC . . NH%(ROU|
00001160: 4E 44 20 AA 20 31 29 20 B2 20 32 20 B0 20 4E 48 |ND . 1) . 2 . NH|
00001170: 25 28 52 4F 55 4E 44 20 AA 20 31 29 20 B2 20 34 |%(ROUND . 1) . 4|
00001180: 20 A7 20 54 54 20 B2 20 54 54 20 AA 20 31 3A 20 | . TT . TT . 1: |
00001190: 89 20 31 37 33 30 00 A6 51 BD 06 4F 54 20 B2 20 |. 1730..Q..OT . |
000011A0: 4F 54 20 AA 20 31 00 F9 51 C2 06 8B 20 52 4F 55 |OT . 1..Q... ROU|
000011B0: 4E 44 20 B2 20 31 33 20 AF 20 4C 43 20 B2 20 31 |ND . 13 . LC . 1|
000011C0: 33 20 A7 20 20 8D 20 31 30 37 33 30 3A 20 8B 20 |3 . . 10730: . |
000011D0: 57 49 20 B2 20 32 20 B0 20 57 49 20 B2 20 34 20 |WI . 2 . WI . 4 |
000011E0: A7 20 4F 54 20 B2 20 4F 54 20 AB 20 31 3A 54 54 |. OT . OT . 1:TT|
000011F0: 20 B2 20 54 54 20 AA 20 31 00 15 52 CC 06 8B 20 | . TT . 1..R... |
00001200: 52 4F 55 4E 44 20 B3 20 31 33 20 A7 20 20 8D 20 |ROUND . 13 . . |
00001210: 31 30 37 38 30 00 32 52 D6 06 8D 20 31 30 37 33 |10780.2R... 1073|
00001220: 30 3A 4F 57 20 B2 20 57 49 3A 20 82 20 52 4F 55 |0:OW . WI: . ROU|
00001230: 4E 44 00 58 52 E0 06 8D 20 31 30 37 38 30 3A 20 |ND.XR... 10780: |
00001240: 8D 20 31 30 33 34 30 3A 20 8D 20 32 35 30 30 30 |. 10340: . 25000|
00001250: 3A 20 89 20 31 38 37 30 00 7C 52 EA 06 48 55 20 |: . 1870.|R..HU |
00001260: B2 20 4F 54 3A 48 54 20 B2 20 54 54 3A 48 4C 20 |. OT:HT . TT:HL |
00001270: B2 20 4E 48 25 28 52 4F 55 4E 44 29 00 F3 52 F4 |. NH%(ROUND)..R.|
00001280: 06 8D 32 30 30 30 30 3A 99 22 59 4F 55 20 53 48 |..20000:."YOU SH|
00001290: 4F 55 4C 44 20 54 41 4B 45 20 54 48 45 20 52 45 |OULD TAKE THE RE|
000012A0: 4D 41 49 4E 49 4E 47 20 54 52 49 43 4B 53 22 3A |MAINING TRICKS":|
000012B0: 99 22 44 4F 20 59 4F 55 20 57 49 53 48 20 54 4F |."DO YOU WISH TO|
000012C0: 20 50 4C 41 59 20 54 48 49 53 20 4F 55 54 3F 20 | PLAY THIS OUT? |
000012D0: 22 3B 3A 20 8D 20 31 30 30 39 30 3A 20 8B 20 41 |";: . 10090: . A|
000012E0: 4E 53 24 20 B2 20 22 59 22 20 A7 20 20 89 20 31 |NS$ . "Y" . . 1|
000012F0: 35 33 30 00 51 53 FE 06 8D 32 30 30 30 30 3A 99 |530.QS...20000:.|
00001300: 22 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 |"DO YOU WANT TO |
00001310: 57 41 54 43 48 20 4D 45 20 50 4C 41 59 20 3F 20 |WATCH ME PLAY ? |
00001320: 22 3B 3A 8D 31 30 30 39 30 3A 8B 41 4E 53 24 B2 |";:.10090:.ANS$.|
00001330: 22 4E 22 A7 4F 54 B2 4F 54 AA 31 34 AB 52 4F 55 |"N".OT.OT.14.ROU|
00001340: 4E 44 3A 52 4F 55 4E 44 B2 31 33 3A 89 31 37 35 |ND:ROUND.13:.175|
00001350: 30 00 66 53 03 07 8D 20 31 30 33 34 30 3A 20 8D |0.fS... 10340: .|
00001360: 20 32 35 30 30 30 00 D8 53 08 07 81 20 4A 20 B2 | 25000..S... J .|
00001370: 20 31 20 A4 20 31 34 20 AB 20 52 4F 55 4E 44 3A | 1 . 14 . ROUND:|
00001380: 20 8D 20 31 30 37 38 30 3A 20 8D 20 31 30 37 33 | . 10780: . 1073|
00001390: 30 3A 48 4E 20 B2 20 57 49 3A 20 81 20 49 20 B2 |0:HN . WI: . I .|
000013A0: 20 31 20 A4 20 34 3A 20 8B 20 48 4E 20 B2 20 32 | 1 . 4: . HN . 2|
000013B0: 20 B0 20 48 4E 20 B2 20 34 20 A7 20 43 4E 20 B2 | . HN . 4 . CN .|
000013C0: 20 50 53 25 28 48 4E 2C 52 4F 55 4E 44 2C 31 29 | PS%(HN,ROUND,1)|
000013D0: 3A 20 89 20 31 38 33 30 00 56 54 12 07 81 20 4B |: . 1830.VT... K|
000013E0: 20 B2 20 31 20 A4 20 31 33 3A 20 8B 20 50 53 25 | . 1 . 13: . PS%|
000013F0: 28 48 4E 2C 4B 2C 30 29 20 B2 20 30 20 AF 20 50 |(HN,K,0) . 0 . P|
00001400: 53 25 28 48 4E 2C 52 4F 55 4E 44 2C 31 29 20 B2 |S%(HN,ROUND,1) .|
00001410: 20 20 B1 20 48 4E 25 28 48 4E 2C 4B 29 20 AF 20 | . HN%(HN,K) . |
00001420: 50 53 25 28 48 4E 2C 52 4F 55 4E 44 2C 32 29 20 |PS%(HN,ROUND,2) |
00001430: B3 20 20 B2 20 48 4E 25 28 48 4E 2C 4B 29 20 A7 |. . HN%(HN,K) .|
00001440: 20 43 4E 20 B2 20 48 4E 25 28 48 4E 2C 4B 29 3A | CN . HN%(HN,K):|
00001450: 4B 20 B2 20 31 33 00 5E 54 1C 07 82 20 4B 00 91 |K . 13.^T... K..|
00001460: 54 26 07 81 20 4B 20 B2 20 31 20 A4 20 31 33 3A |T&.. K . 1 . 13:|
00001470: 20 8B 20 48 4E 25 28 48 4E 2C 4B 29 20 B2 20 43 | . HN%(HN,K) . C|
00001480: 4E 20 A7 20 43 4E 20 B2 20 4B 3A 4B 20 B2 20 31 |N . CN . K:K . 1|
00001490: 33 00 BA 54 30 07 82 20 4B 3A 20 8B 20 48 4E 20 |3..T0.. K: . HN |
000014A0: B3 20 20 B1 20 31 20 AF 20 48 4E 20 B3 20 20 B1 |. . 1 . HN . .|
000014B0: 20 44 55 20 A7 20 31 38 34 35 00 E3 54 32 07 49 | DU . 1845..T2.I|
000014C0: 58 B2 31 3A 52 57 B2 32 33 3A 56 B2 31 39 3A 8B |X.1:RW.23:V.19:.|
000014D0: 48 4E B2 44 55 A7 49 58 B2 30 3A 52 57 B2 39 3A |HN.DU.IX.0:RW.9:|
000014E0: 56 B2 34 00 0C 55 33 07 48 20 B2 20 48 25 28 49 |V.4..U3.H . H%(I|
000014F0: 58 2C 43 4E 29 3A 46 35 20 B2 20 31 3A 20 8D 20 |X,CN):F5 . 1: . |
00001500: 31 38 30 30 30 3A 46 35 20 B2 20 30 00 37 55 35 |18000:F5 . 0.7U5|
00001510: 07 8D 20 31 30 36 36 30 3A 48 4E 20 B2 20 48 4E |.. 10660:HN . HN|
00001520: 20 AA 20 31 3A 20 8B 20 48 4E 20 B1 20 34 20 A7 | . 1: . HN . 4 .|
00001530: 20 48 4E 20 B2 20 31 00 4D 55 3A 07 8B 20 49 20 | HN . 1.MU:.. I |
00001540: B2 20 31 20 A7 20 53 49 20 B2 20 53 4E 00 B9 55 |. 1 . SI . SN..U|
00001550: 44 07 82 20 49 3A 4D 41 20 B2 20 31 30 30 3A 4F |D.. I:MA . 100:O|
00001560: 54 20 B2 20 4F 54 20 AA 20 31 3A 20 8D 20 31 30 |T . OT . 1: . 10|
00001570: 31 38 30 3A 20 8D 20 31 30 37 33 30 3A 20 8D 20 |180: . 10730: . |
00001580: 31 30 33 34 30 3A 20 8D 20 32 35 30 30 30 3A 52 |10340: . 25000:R|
00001590: 4F 55 4E 44 20 B2 20 52 4F 55 4E 44 20 AA 20 31 |OUND . ROUND . 1|
000015A0: 3A 20 82 20 4A 3A 4F 54 20 B2 20 4F 54 20 AB 20 |: . J:OT . OT . |
000015B0: 31 3A 20 89 20 31 37 32 30 00 DE 55 4E 07 4E 52 |1: . 1720..UN.NR|
000015C0: 20 B2 20 4E 52 20 AA 20 31 3A 20 8B 20 4E 52 20 | . NR . 1: . NR |
000015D0: B1 20 31 30 30 20 A7 20 4E 52 20 B2 20 31 00 26 |. 100 . NR . 1.&|
000015E0: 56 58 07 8D 20 32 30 30 30 30 3A 20 8B 20 54 45 |VX.. 20000: . TE|
000015F0: 20 B1 20 38 20 A7 20 20 99 20 22 59 4F 55 20 4D | . 8 . . "YOU M|
00001600: 41 59 20 57 49 53 48 20 54 4F 20 43 48 45 43 4B |AY WISH TO CHECK|
00001610: 20 54 48 45 20 54 45 58 54 42 4F 4F 4B 22 3A 20 | THE TEXTBOOK": |
00001620: 89 20 31 39 31 30 00 6D 56 62 07 8B 20 54 45 20 |. 1910.mVb.. TE |
00001630: B1 20 33 20 A7 20 20 8D 20 32 30 30 30 30 3A 20 |. 3 . . 20000: |
00001640: 99 20 22 59 4F 55 20 50 4C 41 59 45 44 20 54 48 |. "YOU PLAYED TH|
00001650: 49 53 20 48 41 4E 44 20 51 55 49 54 45 20 57 45 |IS HAND QUITE WE|
00001660: 4C 4C 21 21 22 3A 20 89 20 31 39 31 30 00 9F 56 |LL!!": . 1910..V|
00001670: 6C 07 8D 20 32 30 30 30 30 3A 20 99 20 22 59 4F |l.. 20000: . "YO|
00001680: 55 52 20 50 4C 41 59 20 57 41 53 20 4F 46 20 45 |UR PLAY WAS OF E|
00001690: 58 50 45 52 54 20 43 41 4C 49 42 45 52 22 3B 00 |XPERT CALIBER";.|
000016A0: AB 56 76 07 8D 20 31 39 30 30 30 00 E8 56 7B 07 |.Vv.. 19000..V{.|
000016B0: 8D 32 30 30 30 30 3A 99 22 44 4F 20 59 4F 55 20 |.20000:."DO YOU |
000016C0: 57 41 4E 54 20 41 4E 4F 54 48 45 52 20 50 52 4F |WANT ANOTHER PRO|
000016D0: 42 4C 45 4D 3F 20 22 3B 3A 8D 31 30 30 39 30 3A |BLEM? ";:.10090:|
000016E0: 4E 50 24 B2 41 4E 53 24 00 FF 56 80 07 8B 20 4E |NP$.ANS$..V... N|
000016F0: 50 24 20 B2 20 22 59 22 20 A7 20 31 32 30 30 00 |P$ . "Y" . 1200.|
00001700: 3C 57 85 07 99 C7 28 31 34 37 29 3A 9E 38 32 38 |<W....(147):.828|
00001710: 56 2C 31 32 3A 9E 38 32 38 48 2C 31 32 3A 20 97 |V,12:.828H,12: .|
00001720: 31 30 32 33 2C 30 3A 99 20 22 4C 4F 41 44 49 4E |1023,0:. "LOADIN|
00001730: 47 20 4D 41 49 4E 20 4D 45 4E 55 22 00 4C 57 8A |G MAIN MENU".LW.|
00001740: 07 93 22 4D 41 49 4E 20 42 22 2C 38 00 93 57 10 |.."MAIN B",8..W.|
00001750: 27 8F 20 53 45 4C 45 43 54 20 44 49 53 50 4C 41 |'. SELECT DISPLA|
00001760: 59 20 52 45 50 52 45 53 45 4E 54 41 54 49 4F 4E |Y REPRESENTATION|
00001770: 20 4F 46 20 41 20 43 41 52 44 20 20 55 53 45 53 | OF A CARD USES|
00001780: 20 48 4E 2C 43 4E 3B 20 52 45 54 55 52 4E 53 20 | HN,CN; RETURNS |
00001790: 43 53 24 00 F8 57 1A 27 53 4E 20 B2 20 20 B5 20 |CS$..W.'SN . . |
000017A0: 28 48 4E 25 28 48 4E 2C 43 4E 29 20 AD 20 31 33 |(HN%(HN,CN) . 13|
000017B0: 20 AA 20 2E 39 39 29 3A 43 41 52 44 20 B2 20 48 | . .99):CARD . H|
000017C0: 4E 25 28 48 4E 2C 43 4E 29 20 AB 20 31 33 20 AC |N%(HN,CN) . 13 .|
000017D0: 20 28 53 4E 20 AB 20 31 29 3A 43 53 24 20 B2 20 | (SN . 1):CS$ . |
000017E0: 53 55 24 28 53 4E 29 20 AA 20 43 41 52 44 24 28 |SU$(SN) . CARD$(|
000017F0: 43 41 52 44 29 3A 20 8E 00 38 58 24 27 8F 20 20 |CARD): ..8X$'. |
00001800: 20 50 52 49 4E 54 20 41 20 43 41 52 44 20 49 4E | PRINT A CARD IN|
00001810: 20 43 41 52 44 20 50 4F 53 49 54 49 4F 4E 20 4F | CARD POSITION O|
00001820: 4E 20 53 43 52 45 45 4E 20 20 55 53 45 53 20 48 |N SCREEN USES H|
00001830: 4E 2C 43 4E 2C 44 49 24 00 56 58 2E 27 8B 20 48 |N,CN,DI$.VX.'. H|
00001840: 4E 20 B2 20 32 20 B0 20 48 4E 20 B2 20 34 20 A7 |N . 2 . HN . 4 .|
00001850: 20 31 30 30 36 30 00 76 58 38 27 8B 20 48 4E 20 | 10060.vX8'. HN |
00001860: B2 20 33 20 A7 20 52 57 20 B2 20 46 52 3A 20 89 |. 3 . RW . FR: .|
00001870: 20 31 30 30 35 30 00 82 58 3D 27 52 57 20 B2 20 | 10050..X='RW . |
00001880: 4C 52 00 A6 58 42 27 43 4F 4C 20 B2 20 33 20 AC |LR..XB'COL . 3 .|
00001890: 20 28 43 4E 20 AB 20 31 29 20 AA 20 36 3A 20 89 | (CN . 1) . 6: .|
000018A0: 20 31 30 30 38 30 00 C7 58 4C 27 8B 20 48 4E 20 | 10080..XL'. HN |
000018B0: B2 20 32 20 A7 20 43 4F 4C 20 B2 20 46 43 3A 20 |. 2 . COL . FC: |
000018C0: 89 20 31 30 30 37 30 00 D9 58 51 27 43 4F 4C 20 |. 10070..XQ'COL |
000018D0: B2 20 4C 41 53 54 43 4F 4C 00 E9 58 56 27 52 57 |. LASTCOL..XV'RW|
000018E0: 20 B2 20 35 20 AA 20 43 4E 00 12 59 60 27 9E 20 | . 5 . CN..Y`'. |
000018F0: 38 32 38 20 48 2C 20 43 4F 4C 3A 20 9E 20 38 32 |828 H, COL: . 82|
00001900: 38 20 56 2C 20 52 57 3A 20 99 20 44 49 24 3B 3A |8 V, RW: . DI$;:|
00001910: 20 8E 00 2F 59 6A 27 48 39 20 B2 C2 28 32 31 31 | ../Yj'H9 ..(211|
00001920: 29 AA 31 3A 56 39 B2 C2 28 32 31 34 29 AA 31 00 |).1:V9..(214).1.|
00001930: 55 59 74 27 4E 4E 20 B2 20 33 3A 20 8D 20 33 30 |UYt'NN . 3: . 30|
00001940: 30 30 30 3A 41 4E 53 24 20 B2 20 20 C8 20 28 53 |000:ANS$ . . (S|
00001950: 52 24 2C 31 29 00 A3 59 82 27 8B 41 4E 53 24 B3 |R$,1)..Y.'.ANS$.|
00001960: B1 22 59 22 AF 41 4E 53 24 B3 B1 22 4E 22 A7 99 |."Y".ANS$.."N"..|
00001970: 42 45 24 3B 3A 9E 38 32 38 48 2C 48 39 3A 9E 38 |BE$;:.828H,H9:.8|
00001980: 32 38 56 2C 56 39 3A 99 22 20 20 20 20 22 3B 20 |28V,V9:." "; |
00001990: 20 20 3A 9E 38 32 38 48 2C 48 39 3A 89 20 31 30 | :.828H,H9:. 10|
000019A0: 31 30 30 00 A9 59 86 27 8E 00 04 5A 88 27 8F 20 |100..Y.'...Z.'. |
000019B0: 20 20 20 20 50 52 49 4E 54 53 20 41 20 42 49 44 | PRINTS A BID|
000019C0: 20 49 4E 20 50 4C 41 43 45 20 4F 4E 20 53 43 52 | IN PLACE ON SCR|
000019D0: 45 45 4E 20 49 4E 20 42 49 44 20 44 49 53 50 4C |EEN IN BID DISPL|
000019E0: 41 59 2E 20 55 53 45 53 20 52 4F 55 4E 44 2C 48 |AY. USES ROUND,H|
000019F0: 44 2C 44 49 24 3B 20 52 45 54 55 52 4E 53 20 50 |D,DI$; RETURNS P|
00001A00: 43 2C 4C 42 00 53 5A 92 27 52 57 20 B2 20 52 4F |C,LB.SZ.'RW . RO|
00001A10: 55 4E 44 20 AA 20 39 3A 43 4F 4C 20 B2 20 28 48 |UND . 9:COL . (H|
00001A20: 44 20 AB 20 31 29 20 AC 20 34 20 AA 20 31 36 3A |D . 1) . 4 . 16:|
00001A30: 20 9E 20 38 32 38 20 48 2C 20 43 4F 4C 3A 20 9E | . 828 H, COL: .|
00001A40: 20 38 32 38 20 56 2C 20 52 57 3A 20 99 20 44 49 | 828 V, RW: . DI|
00001A50: 24 3B 3A 00 83 5A 9C 27 8B 20 42 53 25 28 52 4F |$;:..Z.'. BS%(RO|
00001A60: 55 4E 44 2C 48 44 29 20 B2 20 33 36 20 A7 20 50 |UND,HD) . 36 . P|
00001A70: 43 20 B2 20 50 43 20 AA 20 31 3A 20 89 20 31 30 |C . PC . 1: . 10|
00001A80: 31 35 30 00 8E 5A A1 27 50 43 20 B2 20 30 00 B1 |150..Z.'PC . 0..|
00001A90: 5A A6 27 8B 20 48 44 20 B2 20 44 4C 20 AF 20 52 |Z.'. HD . DL . R|
00001AA0: 4F 55 4E 44 20 B2 20 31 20 A7 20 50 43 20 B2 20 |OUND . 1 . PC . |
00001AB0: 30 00 DF 5A B0 27 8B 20 42 53 25 28 52 4F 55 4E |0..Z.'. BS%(ROUN|
00001AC0: 44 2C 48 44 29 20 B3 20 33 36 20 A7 20 4C 42 20 |D,HD) . 36 . LB |
00001AD0: B2 20 42 53 25 28 52 4F 55 4E 44 2C 48 44 29 00 |. BS%(ROUND,HD).|
00001AE0: E5 5A BA 27 8E 00 20 5B C4 27 8F 20 20 20 44 45 |.Z.'.. [.'. DE|
00001AF0: 4C 41 59 20 52 41 4E 44 4F 4D 4C 59 20 42 45 54 |LAY RANDOMLY BET|
00001B00: 57 45 45 4E 20 4D 49 20 41 4E 44 20 4D 41 20 4C |WEEN MI AND MA L|
00001B10: 4F 4F 50 53 20 20 55 53 45 53 20 4D 49 2C 4D 41 |OOPS USES MI,MA|
00001B20: 00 70 5B CE 27 4E 4F 20 B2 20 4D 49 20 AA 20 20 |.p[.'NO . MI . |
00001B30: B5 20 28 20 BB 20 28 30 29 20 AC 20 28 4D 41 20 |. ( . (0) . (MA |
00001B40: AB 20 4D 49 29 29 3A 20 81 20 4C 4F 4F 50 20 B2 |. MI)): . LOOP .|
00001B50: 20 31 20 A4 20 4E 4F 3A 41 4E 53 24 20 B2 20 49 | 1 . NO:ANS$ . I|
00001B60: 4E 4B 45 59 24 3A 20 82 20 4C 4F 4F 50 3A 20 8E |NKEY$: . LOOP: .|
00001B70: 00 AD 5B D8 27 8F 20 20 20 20 47 45 54 20 4E 45 |..[.'. GET NE|
00001B80: 58 54 20 42 49 44 20 46 52 4F 4D 20 53 4F 55 54 |XT BID FROM SOUT|
00001B90: 48 20 20 55 53 45 53 20 4C 42 2C 52 4F 55 4E 44 |H USES LB,ROUND|
00001BA0: 3B 20 52 45 54 55 52 4E 53 20 44 49 24 00 D1 5B |; RETURNS DI$..[|
00001BB0: E2 27 9E 20 38 32 38 20 48 2C 20 31 3A 20 9E 20 |.'. 828 H, 1: . |
00001BC0: 38 32 38 20 56 2C 20 31 35 3A 20 99 20 42 4C 24 |828 V, 15: . BL$|
00001BD0: 3B 00 44 5C EC 27 4C 47 24 B2 22 4E 22 3A 9E 38 |;.D\.'LG$."N":.8|
00001BE0: 32 38 48 2C 31 3A 9E 38 32 38 56 2C 31 35 3A 99 |28H,1:.828V,15:.|
00001BF0: 42 4C 24 3B 3A 9E 38 32 38 48 2C 31 32 3A 99 22 |BL$;:.828H,12:."|
00001C00: 57 48 41 54 20 49 53 20 59 4F 55 52 20 42 49 44 |WHAT IS YOUR BID|
00001C10: 3F 20 22 3B 3A 4E 4E 20 B2 20 33 3A 20 8D 20 33 |? ";:NN . 3: . 3|
00001C20: 30 30 30 30 3A 42 49 44 24 20 B2 20 53 52 24 3A |0000:BID$ . SR$:|
00001C30: 20 8B 20 42 49 44 24 20 B2 20 22 22 20 A7 20 31 | . BID$ . "" . 1|
00001C40: 30 32 31 30 00 98 5C F1 27 81 20 4C 4F 4F 50 20 |0210..\.'. LOOP |
00001C50: B2 20 31 20 A4 20 33 38 3A 20 8B 20 20 C8 20 28 |. 1 . 38: . . (|
00001C60: 42 49 44 24 2C 20 C3 20 28 42 49 44 24 28 4C 4F |BID$, . (BID$(LO|
00001C70: 4F 50 29 29 29 20 B2 20 42 49 44 24 28 4C 4F 4F |OP))) . BID$(LOO|
00001C80: 50 29 20 A7 20 4C 47 24 20 B2 20 22 59 22 3A 43 |P) . LG$ . "Y":C|
00001C90: 42 20 B2 20 4C 4F 4F 50 00 B2 5C F6 27 82 4C 4F |B . LOOP..\.'.LO|
00001CA0: 4F 50 3A 8B 4C 47 24 B3 B1 22 4E 22 A7 31 30 32 |OP:.LG$.."N".102|
00001CB0: 34 30 00 03 5D FB 27 9E 38 32 38 48 2C 31 3A 9E |40..].'.828H,1:.|
00001CC0: 38 32 38 56 2C 31 36 3A 99 42 4C 24 3B 3A 9E 38 |828V,16:.BL$;:.8|
00001CD0: 32 38 48 2C 31 33 3A 9E 38 32 38 56 2C 31 36 3A |28H,13:.828V,16:|
00001CE0: 99 42 45 4C 4C 24 3B 22 49 4C 4C 45 47 41 4C 20 |.BELL$;"ILLEGAL |
00001CF0: 42 49 44 2D 20 22 3B 42 49 44 24 3B 3A 8D 31 39 |BID- ";BID$;:.19|
00001D00: 30 30 30 00 3C 5D FD 27 9E 38 32 38 48 2C 31 3A |000.<].'.828H,1:|
00001D10: 9E 38 32 38 56 2C 31 34 3A 99 42 4C 24 3B 3A 9E |.828V,14:.BL$;:.|
00001D20: 38 32 38 48 2C 31 3A 9E 38 32 38 56 2C 31 36 3A |828H,1:.828V,16:|
00001D30: 99 42 4C 24 3B 3A 89 31 30 32 32 30 00 66 5D 00 |.BL$;:.10220.f].|
00001D40: 28 9E 38 32 38 48 2C 31 3A 9E 38 32 38 56 2C 31 |(.828H,1:.828V,1|
00001D50: 36 3A 99 42 4C 24 3A 8B 20 43 42 B1 B2 4C 42 A7 |6:.BL$:. CB..LB.|
00001D60: 20 31 30 32 35 30 00 A9 5D 05 28 9E 38 32 38 48 | 10250..].(.828H|
00001D70: 2C 36 3A 9E 38 32 38 56 2C 31 36 3A 99 42 45 4C |,6:.828V,16:.BEL|
00001D80: 4C 24 3B 22 54 48 41 54 20 49 53 20 41 4E 20 49 |L$;"THAT IS AN I|
00001D90: 4E 53 55 46 46 49 43 49 45 4E 54 20 42 49 44 22 |NSUFFICIENT BID"|
00001DA0: 3B 3A 8D 20 31 39 30 30 30 00 E2 5D 07 28 9E 38 |;:. 19000..].(.8|
00001DB0: 32 38 48 2C 31 3A 9E 38 32 38 56 2C 31 34 3A 99 |28H,1:.828V,14:.|
00001DC0: 42 4C 24 3B 3A 9E 38 32 38 48 2C 31 3A 9E 38 32 |BL$;:.828H,1:.82|
00001DD0: 38 56 2C 31 36 3A 99 42 4C 24 3B 3A 89 31 30 32 |8V,16:.BL$;:.102|
00001DE0: 32 30 00 14 5E 0A 28 8B 20 43 42 20 B2 20 42 53 |20..^.(. CB . BS|
00001DF0: 25 28 52 4F 55 4E 44 2C 31 29 20 A7 20 44 49 24 |%(ROUND,1) . DI$|
00001E00: 20 B2 20 42 49 44 24 28 43 42 29 3A 20 89 20 31 | . BID$(CB): . 1|
00001E10: 30 32 36 30 00 C4 5E 0F 28 9E 20 38 32 38 20 48 |0260..^.(. 828 H|
00001E20: 2C 20 31 3A 20 9E 20 38 32 38 20 56 2C 20 31 36 |, 1: . 828 V, 16|
00001E30: 3A 20 99 20 42 45 4C 4C 24 3B 22 54 48 41 54 20 |: . BELL$;"THAT |
00001E40: 49 53 20 49 4E 43 4F 52 52 45 43 54 2E 20 22 3B |IS INCORRECT. ";|
00001E50: 3A 20 99 20 42 49 44 24 28 42 53 25 28 52 4F 55 |: . BID$(BS%(ROU|
00001E60: 4E 44 2C 31 29 29 3B 22 20 57 4F 55 4C 44 20 42 |ND,1));" WOULD B|
00001E70: 45 20 43 4F 52 52 45 43 54 22 3A 44 49 24 20 B2 |E CORRECT":DI$ .|
00001E80: 20 42 49 44 24 28 42 53 25 28 52 4F 55 4E 44 2C | BID$(BS%(ROUND,|
00001E90: 31 29 29 3A 20 8D 20 31 39 30 30 30 3A 20 9E 20 |1)): . 19000: . |
00001EA0: 38 32 38 20 48 2C 20 31 3A 20 9E 20 38 32 38 20 |828 H, 1: . 828 |
00001EB0: 56 2C 20 31 35 3A 20 99 20 42 4C 24 3A 20 99 20 |V, 15: . BL$: . |
00001EC0: 42 4C 24 3B 00 CA 5E 14 28 8E 00 17 5F 1E 28 8F |BL$;..^.(..._.(.|
00001ED0: 20 43 4C 45 41 52 20 41 4C 4C 20 45 58 54 52 41 | CLEAR ALL EXTRA|
00001EE0: 4E 45 4F 55 53 20 57 52 49 54 49 4E 47 20 46 52 |NEOUS WRITING FR|
00001EF0: 4F 4D 20 53 43 52 45 45 4E 20 20 53 45 54 20 55 |OM SCREEN SET U|
00001F00: 50 20 54 52 49 43 4B 20 43 4F 55 4E 54 45 52 20 |P TRICK COUNTER |
00001F10: 44 49 53 50 4C 41 59 00 6A 5F 28 28 81 20 49 20 |DISPLAY.j_((. I |
00001F20: B2 20 31 20 A4 20 31 36 3A 20 9E 20 38 32 38 20 |. 1 . 16: . 828 |
00001F30: 48 2C 20 31 3A 20 9E 20 38 32 38 20 56 2C 20 49 |H, 1: . 828 V, I|
00001F40: 3A 20 99 20 42 4C 24 3B 3A 20 82 20 49 3A 4F 54 |: . BL$;: . I:OT|
00001F50: 20 B2 20 30 3A 54 54 20 B2 20 30 3A 46 43 24 20 | . 0:TT . 0:FC$ |
00001F60: B2 20 42 49 44 24 28 4C 42 29 00 B3 5F 32 28 54 |. BID$(LB).._2(T|
00001F70: 4E 20 B2 20 36 20 AA 20 20 B5 20 28 4C 42 20 AD |N . 6 . . (LB .|
00001F80: 20 35 20 AA 20 2E 39 39 29 3A 20 8B 20 4E 48 25 | 5 . .99): . NH%|
00001F90: 28 31 29 20 B2 20 31 20 B0 20 4E 48 25 28 31 29 |(1) . 1 . NH%(1)|
00001FA0: 20 B2 20 33 20 A7 20 54 4E 20 B2 20 31 34 20 AB | . 3 . TN . 14 .|
00001FB0: 20 54 4E 00 B9 5F 3C 28 8F 00 07 60 46 28 4C 43 | TN.._<(...`F(LC|
00001FC0: 20 B2 20 31 33 3A 20 81 20 49 20 B2 20 31 20 A4 | . 13: . I . 1 .|
00001FD0: 20 31 33 3A 20 8B 20 4E 48 25 28 49 29 20 B1 20 | 13: . NH%(I) . |
00001FE0: 36 34 20 A7 20 4E 48 25 28 49 29 20 B2 20 4E 48 |64 . NH%(I) . NH|
00001FF0: 25 28 49 29 20 AB 20 36 34 3A 4C 43 20 B2 20 49 |%(I) . 64:LC . I|
00002000: 3A 49 20 B2 20 31 33 00 37 60 50 28 82 20 49 3A |:I . 13.7`P(. I:|
00002010: 44 45 20 B2 20 4E 48 25 28 31 29 20 AB 20 31 3A |DE . NH%(1) . 1:|
00002020: 20 8B 20 44 45 20 B3 20 31 20 A7 20 44 45 20 B2 | . DE . 1 . DE .|
00002030: 20 44 45 20 AA 20 34 00 75 60 52 28 44 44 20 B2 | DE . 4.u`R(DD .|
00002040: 20 30 3A 20 8B 20 44 45 20 B2 20 32 20 B0 20 44 | 0: . DE . 2 . D|
00002050: 45 20 B2 20 34 20 A7 20 44 44 20 B2 20 31 3A 20 |E . 4 . DD . 1: |
00002060: 8F 20 20 41 52 45 20 54 48 45 59 20 44 45 43 4C |. ARE THEY DECL|
00002070: 41 52 45 52 3F 00 B7 60 55 28 48 42 20 B2 20 31 |ARER?..`U(HB . 1|
00002080: 20 AA 20 32 37 20 AC 20 44 44 3A 20 9E 20 38 32 | . 27 . DD: . 82|
00002090: 38 20 48 2C 20 48 42 3A 20 9E 20 38 32 38 20 56 |8 H, HB: . 828 V|
000020A0: 2C 31 30 3A 20 99 20 22 43 4F 4E 54 52 41 43 54 |,10: . "CONTRACT|
000020B0: 3A 20 22 46 43 24 3B 00 29 61 5A 28 44 55 20 B2 |: "FC$;.)aZ(DU .|
000020C0: 20 44 45 20 AA 20 32 3A 20 8B 20 44 55 20 B1 20 | DE . 2: . DU . |
000020D0: 34 20 A7 20 44 55 20 B2 20 44 55 20 AB 20 34 3A |4 . DU . DU . 4:|
000020E0: 20 8F 20 54 48 49 53 20 52 4F 55 54 49 4E 45 20 | . THIS ROUTINE |
000020F0: 46 41 4C 4C 53 20 54 48 52 4F 55 47 48 20 54 4F |FALLS THROUGH TO|
00002100: 20 54 48 45 20 54 52 49 43 4B 20 44 49 53 50 4C | THE TRICK DISPL|
00002110: 41 59 20 41 4E 44 20 52 45 54 55 52 4E 53 20 46 |AY AND RETURNS F|
00002120: 52 4F 4D 20 54 48 45 52 45 00 35 61 5F 28 8D 20 |ROM THERE.5a_(. |
00002130: 31 30 38 30 30 00 6D 61 64 28 8F 20 20 20 50 52 |10800.mad(. PR|
00002140: 49 4E 54 20 54 52 49 43 4B 20 43 4F 55 4E 54 45 |INT TRICK COUNTE|
00002150: 52 20 44 49 24 20 20 55 53 45 53 20 54 4E 2C 4F |R DI$ USES TN,O|
00002160: 54 2C 54 48 45 49 52 54 52 49 43 4B 53 00 A0 61 |T,THEIRTRICKS..a|
00002170: 69 28 41 B2 4F 54 3A 8D 31 30 33 37 32 3A 4F 54 |i(A.OT:.10372:OT|
00002180: 24 B2 41 24 3A 4E 45 B2 54 4E AB 4F 54 3A 41 B2 |$.A$:NE.TN.OT:A.|
00002190: 4E 45 3A 8D 31 30 33 37 32 3A 4E 45 24 B2 41 24 |NE:.10372:NE$.A$|
000021A0: 00 37 62 6E 28 9E 20 38 32 38 20 48 2C 20 31 3A |.7bn(. 828 H, 1:|
000021B0: 20 9E 20 38 32 38 20 56 2C 20 31 31 3A 20 99 20 | . 828 V, 11: . |
000021C0: 22 4F 55 52 20 54 52 49 43 4B 53 3A 22 3B 4F 54 |"OUR TRICKS:";OT|
000021D0: 24 3B 3A 9E 20 38 32 38 20 48 2C 20 32 38 3A 20 |$;:. 828 H, 28: |
000021E0: 99 20 22 54 48 45 49 52 53 3A 20 20 20 20 22 3B |. "THEIRS: ";|
000021F0: 54 54 3A 20 9E 20 38 32 38 20 48 2C 20 31 3A 20 |TT: . 828 H, 1: |
00002200: 9E 20 38 32 38 20 56 2C 20 31 36 3A 20 99 20 22 |. 828 V, 16: . "|
00002210: 57 45 20 4E 45 45 44 3A 20 20 20 22 3B 3A 4E 45 |WE NEED: ";:NE|
00002220: 20 B2 20 54 4E 20 AB 20 4F 54 3A 20 9E 20 38 32 | . TN . OT: . 82|
00002230: 38 20 48 2C 20 31 30 00 4E 62 70 28 8B 20 4E 45 |8 H, 10.Nbp(. NE|
00002240: 20 B3 20 31 20 A7 20 20 99 20 22 30 22 3B 00 65 | . 1 . . "0";.e|
00002250: 62 72 28 8B 20 4E 45 20 B1 20 30 20 A7 20 20 99 |br(. NE . 0 . .|
00002260: 20 4E 45 24 3B 00 91 62 74 28 8B 4E 45 B3 31 A7 | NE$;..bt(.NE.1.|
00002270: 9E 38 32 38 48 2C 32 38 3A 99 22 20 20 20 20 20 |.828H,28:." |
00002280: 20 20 20 20 20 20 20 20 22 3B 3A 89 31 30 33 37 | ";:.1037|
00002290: 30 00 D3 62 78 28 9E 38 32 38 48 2C 32 38 3A 99 |0..bx(.828H,28:.|
000022A0: 22 54 48 45 59 20 4E 45 45 44 3A 20 20 20 22 3B |"THEY NEED: ";|
000022B0: C7 28 31 35 37 29 3B 3A 9E 38 32 38 48 2C 33 38 |.(157);:.828H,38|
000022C0: 3A 8B 31 34 AB 54 4E AB 54 54 B3 31 A7 99 22 A0 |:.14.TN.TT.1..".|
000022D0: 30 22 3B 00 E7 62 7D 28 99 20 31 34 20 AB 20 54 |0";..b}(. 14 . T|
000022E0: 4E 20 AB 20 54 54 3B 00 ED 62 82 28 8E 00 0C 63 |N . TT;..b.(...c|
000022F0: 84 28 41 24 B2 C4 28 41 29 3A 41 24 B2 C9 28 41 |.(A$..(A):A$..(A|
00002300: 24 2C C3 28 41 24 29 AB 31 29 3A 8E 00 5A 63 8C |$,.(A$).1):..Zc.|
00002310: 28 8F 20 20 20 20 20 47 45 54 20 50 4C 41 59 45 |(. GET PLAYE|
00002320: 52 20 54 4F 20 53 45 4C 45 43 54 20 43 41 52 44 |R TO SELECT CARD|
00002330: 20 46 52 4F 4D 20 4E 2F 53 20 48 41 4E 44 20 20 | FROM N/S HAND |
00002340: 55 53 45 53 20 49 2C 52 4F 55 4E 44 2C 48 4E 3B |USES I,ROUND,HN;|
00002350: 52 45 54 55 52 4E 53 20 43 4E 00 93 63 91 28 49 |RETURNS CN..c.(I|
00002360: 58 20 B2 20 31 3A 52 57 20 B2 20 32 34 3A 56 B2 |X . 1:RW . 24:V.|
00002370: 20 31 39 3A 20 8B 20 48 4E 20 B2 20 33 20 A7 20 | 19: . HN . 3 . |
00002380: 49 58 20 B2 20 30 3A 52 57 20 B2 20 39 3A 56 20 |IX . 0:RW . 9:V |
00002390: B2 20 34 00 C1 63 96 28 41 4E 53 24 20 B2 20 52 |. 4..c.(ANS$ . R|
000023A0: 49 24 3A 56 50 24 20 B2 20 22 4E 22 3A 45 43 20 |I$:VP$ . "N":EC |
000023B0: B2 20 30 3A 43 50 20 B2 20 31 3A 4F 48 20 B2 20 |. 0:CP . 1:OH . |
000023C0: 30 00 DC 63 9B 28 8B 20 56 50 24 20 B3 20 20 B1 |0..c.(. VP$ . .|
000023D0: 20 22 4E 22 20 A7 20 31 30 35 36 30 00 FB 63 A0 | "N" . 10560..c.|
000023E0: 28 8B 20 50 53 25 28 48 4E 2C 43 50 2C 30 29 20 |(. PS%(HN,CP,0) |
000023F0: B1 20 30 20 A7 20 31 30 34 34 30 00 41 64 A5 28 |. 0 . 10440.Ad.(|
00002400: 53 4E 20 B2 20 20 B5 20 28 48 4E 25 28 48 4E 2C |SN . . (HN%(HN,|
00002410: 43 50 29 20 AD 20 31 33 20 AA 20 2E 39 39 29 3A |CP) . 13 . .99):|
00002420: 43 41 52 44 20 B2 20 48 4E 25 28 48 4E 2C 43 50 |CARD . HN%(HN,CP|
00002430: 29 20 AB 20 31 33 20 AC 20 28 53 4E 20 AB 20 31 |) . 13 . (SN . 1|
00002440: 29 00 4D 64 AA 28 8D 20 31 30 35 36 35 00 58 64 |).Md.(. 10565.Xd|
00002450: BE 28 97 31 39 38 2C 30 00 74 64 C0 28 A1 20 41 |.(.198,0.td.(. A|
00002460: 4E 53 24 3A 8B 20 41 4E 53 24 B2 22 22 A7 20 31 |NS$:. ANS$."". 1|
00002470: 30 34 33 32 00 CA 64 C6 28 97 20 31 39 38 2C 30 |0432..d.(. 198,0|
00002480: 3A 20 8B 20 41 4E 53 24 20 B3 20 20 B1 C7 28 31 |: . ANS$ . ..(1|
00002490: 33 33 29 AF 20 41 4E 53 24 20 B3 20 20 B1 20 4C |33). ANS$ . . L|
000024A0: 45 24 20 AF 20 41 4E 53 24 20 B3 20 20 B1 20 52 |E$ . ANS$ . . R|
000024B0: 49 24 20 AF 20 41 4E 53 24 20 B3 20 20 B1 20 43 |I$ . ANS$ . . C|
000024C0: 52 24 20 A7 20 31 30 34 33 30 00 DF 64 C7 28 8B |R$ . 10430..d.(.|
000024D0: 20 41 4E 53 24 20 B2 C7 28 31 33 33 29 A7 8A 00 | ANS$ ..(133)...|
000024E0: 12 65 C8 28 8B 20 41 4E 53 24 20 B2 20 4C 45 24 |.e.(. ANS$ . LE$|
000024F0: 20 A7 20 43 50 20 B2 20 43 50 20 AB 20 31 3A 20 | . CP . CP . 1: |
00002500: 8B 20 43 50 20 B3 20 31 20 A7 20 43 50 20 B2 20 |. CP . 1 . CP . |
00002510: 31 33 00 45 65 D2 28 8B 20 41 4E 53 24 20 B2 20 |13.Ee.(. ANS$ . |
00002520: 52 49 24 20 A7 20 43 50 20 B2 20 43 50 20 AA 20 |RI$ . CP . CP . |
00002530: 31 3A 20 8B 20 43 50 20 B1 20 31 33 20 A7 20 43 |1: . CP . 13 . C|
00002540: 50 20 B2 20 31 00 61 65 DC 28 8B 20 41 4E 53 24 |P . 1.ae.(. ANS$|
00002550: 20 B3 20 20 B1 20 43 52 24 20 A7 20 31 30 33 39 | . . CR$ . 1039|
00002560: 35 00 8D 65 DE 28 9E 20 38 32 38 20 56 2C 20 32 |5..e.(. 828 V, 2|
00002570: 35 3A 20 9E 20 38 32 38 20 48 2C 20 31 3A 20 99 |5: . 828 H, 1: .|
00002580: 42 4C 24 3B 3A 9E 20 38 32 38 48 2C 31 00 12 66 |BL$;:. 828H,1..f|
00002590: E1 28 50 4C 41 59 43 41 52 44 20 B2 20 48 4E 25 |.(PLAYCARD . HN%|
000025A0: 28 48 4E 2C 43 50 29 3A 20 8B 20 50 4C 41 59 43 |(HN,CP): . PLAYC|
000025B0: 41 52 44 20 B3 20 20 B2 20 50 53 25 28 48 4E 2C |ARD . . PS%(HN,|
000025C0: 52 4F 55 4E 44 2C 31 29 20 AF 20 50 4C 41 59 43 |ROUND,1) . PLAYC|
000025D0: 41 52 44 20 B2 20 20 B1 20 50 53 25 28 48 4E 2C |ARD . . PS%(HN,|
000025E0: 52 4F 55 4E 44 2C 32 29 20 AF 20 52 4F 55 4E 44 |ROUND,2) . ROUND|
000025F0: 20 B3 20 4C 43 20 A7 20 56 50 24 20 B2 20 22 59 | . LC . VP$ . "Y|
00002600: 22 3A 43 4E 20 B2 20 43 50 3A 20 89 20 31 30 35 |":CN . CP: . 105|
00002610: 35 30 00 33 66 E3 28 42 43 24 20 B2 20 22 4E 22 |50.3f.(BC$ . "N"|
00002620: 3A 20 8B 20 53 4E 20 B2 20 53 49 20 A7 20 31 30 |: . SN . SI . 10|
00002630: 34 37 30 00 CD 66 E4 28 81 4C 4F B2 31 A4 31 33 |470..f.(.LO.1.13|
00002640: 3A 53 55 B2 B5 28 48 4E 25 28 48 4E 2C 4C 4F 4F |:SU..(HN%(HN,LOO|
00002650: 50 29 AD 31 33 AA 2E 39 39 29 3A 8B 53 55 B2 53 |P).13..99):.SU.S|
00002660: 49 AF 50 53 25 28 48 4E 2C 4C 4F 2C 30 29 B2 30 |I.PS%(HN,LO,0).0|
00002670: AF A8 28 52 4F B2 31 AF 48 4E B2 4E 48 25 28 31 |..(RO.1.HN.NH%(1|
00002680: 29 29 A7 9E 38 32 38 48 2C 31 3A 9E 38 32 38 56 |))..828H,1:.828V|
00002690: 2C 32 35 3A 99 42 4C 24 3B 3A 9E 38 32 38 48 2C |,25:.BL$;:.828H,|
000026A0: 39 3A 99 42 45 24 3B 22 59 4F 55 20 4D 55 53 54 |9:.BE$;"YOU MUST|
000026B0: 20 46 4F 4C 4C 4F 57 20 53 55 49 54 21 22 3B 3A | FOLLOW SUIT!";:|
000026C0: 4C 4F B2 31 39 3A 42 43 24 B2 22 59 22 00 ED 66 |LO.19:BC$."Y"..f|
000026D0: E5 28 82 20 4C 4F 4F 50 3A 20 8B 20 42 43 24 20 |.(. LOOP: . BC$ |
000026E0: B2 20 22 59 22 20 A7 20 31 30 34 33 30 00 09 67 |. "Y" . 10430..g|
000026F0: E6 28 8B 20 52 4F 55 4E 44 20 B1 20 20 B2 20 4C |.(. ROUND . . L|
00002700: 43 20 A7 20 31 30 35 32 30 00 19 67 EB 28 45 43 |C . 10520..g.(EC|
00002710: 20 B2 20 45 43 20 AA 20 31 00 A6 67 F0 28 54 45 | . EC . 1..g.(TE|
00002720: B2 54 45 AA 31 3A 8B 50 53 25 28 48 4E AA 31 2C |.TE.1:.PS%(HN.1,|
00002730: 52 4F 2C 32 29 B1 30 AF 45 43 B2 31 A7 9E 38 32 |RO,2).0.EC.1..82|
00002740: 38 48 2C 31 3A 9E 38 32 38 56 2C 32 35 3A 20 99 |8H,1:.828V,25: .|
00002750: 42 4C 24 3B 3A 20 9E 20 38 32 38 20 48 2C 20 39 |BL$;: . 828 H, 9|
00002760: 3A 20 9E 20 38 32 38 20 56 2C 20 32 35 3A 20 99 |: . 828 V, 25: .|
00002770: 20 42 45 4C 4C 24 3B 22 57 52 4F 4E 47 20 50 4C | BELL$;"WRONG PL|
00002780: 41 59 2E 2E 2E 20 54 52 59 20 41 47 41 49 4E 22 |AY... TRY AGAIN"|
00002790: 3B 3A 54 45 20 B2 20 54 45 20 AA 20 32 3A 20 89 |;:TE . TE . 2: .|
000027A0: 20 31 30 34 33 30 00 3C 68 FA 28 81 20 4C 4F 4F | 10430.<h.(. LOO|
000027B0: 50 20 B2 20 31 33 20 A4 20 31 20 A9 20 20 AB 20 |P . 13 . 1 . . |
000027C0: 31 3A 20 8B 20 48 4E 25 28 48 4E 2C 4C 4F 4F 50 |1: . HN%(HN,LOOP|
000027D0: 29 20 B3 20 20 B2 20 50 53 25 28 48 4E 2C 52 4F |) . . PS%(HN,RO|
000027E0: 55 4E 44 2C 31 29 20 AF 20 48 4E 25 28 48 4E 2C |UND,1) . HN%(HN,|
000027F0: 4C 4F 4F 50 29 20 B2 20 20 B1 20 50 53 25 28 48 |LOOP) . . PS%(H|
00002800: 4E 2C 52 4F 55 4E 44 2C 32 29 20 AF 20 50 53 25 |N,ROUND,2) . PS%|
00002810: 28 48 4E 2C 4C 4F 4F 50 2C 30 29 20 B2 20 30 20 |(HN,LOOP,0) . 0 |
00002820: A7 20 43 4E 20 B2 20 4C 4F 4F 50 3A 4C 4F 4F 50 |. CN . LOOP:LOOP|
00002830: 20 B2 20 31 3A 43 50 20 B2 20 43 4E 00 96 68 04 | . 1:CP . CN..h.|
00002840: 29 82 20 4C 4F 4F 50 3A 53 4E 20 B2 20 20 B5 20 |). LOOP:SN . . |
00002850: 28 48 4E 25 28 48 44 2C 43 4E 29 20 AD 20 31 33 |(HN%(HD,CN) . 13|
00002860: 20 AA 20 2E 39 39 29 3A 20 8B 20 50 53 25 28 48 | . .99): . PS%(H|
00002870: 4E 20 AA 20 31 2C 52 4F 55 4E 44 2C 32 29 20 B1 |N . 1,ROUND,2) .|
00002880: 20 30 20 A7 20 20 8D 20 31 30 35 36 35 3A 20 89 | 0 . . 10565: .|
00002890: 20 31 32 30 30 30 00 FA 68 0E 29 8D 20 32 30 30 | 12000..h.). 200|
000028A0: 30 30 3A 20 99 20 42 45 4C 4C 24 3B 22 54 48 45 |00: . BELL$;"THE|
000028B0: 52 45 20 49 53 20 41 20 53 55 50 45 52 49 4F 52 |RE IS A SUPERIOR|
000028C0: 20 50 4C 41 59 2E 20 48 49 54 20 27 52 45 54 55 | PLAY. HIT 'RETU|
000028D0: 52 4E 27 22 3B 20 3A 20 8D 20 31 39 30 30 30 3A |RN'"; : . 19000:|
000028E0: 20 8D 20 32 30 30 30 30 3A 20 8D 20 31 30 35 36 | . 20000: . 1056|
000028F0: 35 3A 20 89 20 31 30 35 35 30 00 06 69 18 29 43 |5: . 10550..i.)C|
00002900: 4E 20 B2 20 43 50 00 1D 69 36 29 56 50 24 20 B2 |N . CP..i6)VP$ .|
00002910: 20 22 59 22 3A 20 8D 20 31 38 30 30 30 00 23 69 | "Y": . 18000.#i|
00002920: 40 29 8E 00 5F 69 45 29 8B 4F 48 A7 9E 38 32 38 |@).._iE).OH..828|
00002930: 48 2C 4F 48 3A 9E 38 32 38 56 2C 52 57 AB 33 3A |H,OH:.828V,RW.3:|
00002940: 97 43 47 AA 33 2C 31 3A 97 43 47 AA 35 2C 31 32 |.CG.3,1:.CG.5,12|
00002950: 38 3A 99 22 A0 22 3B 3A 97 43 47 AA 35 2C 30 00 |8:.".";:.CG.5,0.|
00002960: A4 69 47 29 48 B2 48 25 28 49 58 2C 43 50 29 3A |.iG)H.H%(IX,CP):|
00002970: 9E 38 32 38 48 2C 48 3A 9E 38 32 38 56 2C 52 57 |.828H,H:.828V,RW|
00002980: AB 33 3A 97 43 47 AA 34 2C 36 3A 97 43 47 AA 35 |.3:.CG.4,6:.CG.5|
00002990: 2C 31 32 38 3A 99 22 5E 22 3B C7 28 34 29 3B 3A |,128:."^";.(4);:|
000029A0: 4F 48 B2 48 00 BB 69 48 29 97 43 47 AA 34 2C 42 |OH.H..iH).CG.4,B|
000029B0: 4B 3A 97 43 47 AA 35 2C 30 3A 8E 00 F1 69 4A 29 |K:.CG.5,0:...iJ)|
000029C0: 8F 20 20 20 50 4C 41 59 20 41 4E 20 45 2F 57 20 |. PLAY AN E/W |
000029D0: 43 41 52 44 20 20 55 53 45 53 20 48 4E 2C 52 4F |CARD USES HN,RO|
000029E0: 55 4E 44 2C 4C 43 2C 52 45 54 55 52 4E 53 20 43 |UND,LC,RETURNS C|
000029F0: 4E 00 12 6A 4F 29 8B 20 44 55 20 B2 20 32 20 AF |N..jO). DU . 2 .|
00002A00: 20 48 4E 20 B2 20 32 20 A7 20 20 8D 20 32 36 30 | HN . 2 . . 260|
00002A10: 30 30 00 5C 6A 54 29 8B 20 4C 43 20 B1 20 52 4F |00.\jT). LC . RO|
00002A20: 55 4E 44 20 B0 20 28 4C 43 20 B2 20 31 33 20 AF |UND . (LC . 13 .|
00002A30: 20 52 4F 55 4E 44 20 B2 20 31 33 29 20 A7 20 43 | ROUND . 13) . C|
00002A40: 4E 20 B2 20 50 53 25 28 48 4E 2C 52 4F 55 4E 44 |N . PS%(HN,ROUND|
00002A50: 2C 31 29 3A 20 89 20 31 30 36 33 30 00 E1 6A 5E |,1): . 10630..j^|
00002A60: 29 43 4E 20 B2 20 30 3A 20 81 20 4C 4F 4F 50 20 |)CN . 0: . LOOP |
00002A70: B2 20 31 33 20 A4 20 31 20 A9 20 20 AB 20 31 3A |. 13 . 1 . . 1:|
00002A80: 20 8B 20 50 53 25 28 48 4E 2C 4C 4F 4F 50 2C 30 | . PS%(HN,LOOP,0|
00002A90: 29 20 B2 20 30 20 AF 20 53 49 20 B2 20 20 B5 20 |) . 0 . SI . . |
00002AA0: 28 48 4E 25 28 48 4E 2C 4C 4F 4F 50 29 20 AD 20 |(HN%(HN,LOOP) . |
00002AB0: 31 33 20 AA 20 2E 39 39 29 20 A7 20 43 4E 20 B2 |13 . .99) . CN .|
00002AC0: 20 48 4E 25 28 48 4E 2C 4C 4F 4F 50 29 3A 20 8B | HN%(HN,LOOP): .|
00002AD0: 20 49 20 B3 20 33 20 A7 20 4C 4F 4F 50 20 B2 20 | I . 3 . LOOP . |
00002AE0: 31 00 FE 6A 68 29 82 20 4C 4F 4F 50 3A 20 8B 20 |1..jh). LOOP: . |
00002AF0: 43 4E 20 B1 20 30 20 A7 20 31 30 36 33 30 00 16 |CN . 0 . 10630..|
00002B00: 6B 72 29 8B 20 43 4E 20 B3 20 20 B1 20 30 20 A7 |kr). CN . . 0 .|
00002B10: 20 31 30 36 33 30 00 5B 6B 75 29 54 43 20 B2 20 | 10630.[ku)TC . |
00002B20: 20 B5 20 28 20 BB 20 28 30 29 20 AC 20 31 33 20 | . ( . (0) . 13 |
00002B30: AA 20 31 29 3A 20 8B 20 50 53 25 28 48 4E 2C 54 |. 1): . PS%(HN,T|
00002B40: 43 2C 30 29 20 B2 20 30 20 A7 20 43 4E 20 B2 20 |C,0) . 0 . CN . |
00002B50: 54 43 3A 20 89 20 31 30 36 34 35 00 67 6B 7C 29 |TC: . 10645.gk|)|
00002B60: 89 20 31 30 36 31 33 00 A6 6B 86 29 81 20 4C 4F |. 10613..k.). LO|
00002B70: 4F 50 20 B2 20 31 20 A4 20 31 33 3A 20 8B 20 48 |OP . 1 . 13: . H|
00002B80: 4E 25 28 48 4E 2C 4C 4F 4F 50 29 20 B2 20 43 4E |N%(HN,LOOP) . CN|
00002B90: 20 A7 20 43 4E 20 B2 20 4C 4F 4F 50 3A 4C 4F 4F | . CN . LOOP:LOO|
00002BA0: 50 20 B2 20 31 33 00 B1 6B 90 29 82 20 4C 4F 4F |P . 13..k.). LOO|
00002BB0: 50 00 D5 6B 95 29 53 4E 20 B2 20 20 B5 20 28 48 |P..k.)SN . . (H|
00002BC0: 4E 25 28 48 4E 2C 43 4E 29 20 AD 20 31 33 20 AA |N%(HN,CN) . 13 .|
00002BD0: 20 2E 39 39 29 00 F6 6B 97 29 8B 20 44 55 20 B2 | .99)..k.). DU .|
00002BE0: 20 32 20 AF 20 48 4E 20 B2 20 32 20 A7 20 20 8D | 2 . HN . 2 . .|
00002BF0: 20 31 38 30 30 30 00 FC 6B 9A 29 8E 00 5A 6C A4 | 18000..k.)..Zl.|
00002C00: 29 8F 20 20 20 50 4C 41 59 20 41 20 43 41 52 44 |). PLAY A CARD|
00002C10: 20 49 4E 54 4F 20 54 48 49 53 20 54 52 49 43 4B | INTO THIS TRICK|
00002C20: 20 20 55 53 45 53 20 43 4E 2C 48 4E 3B 43 48 41 | USES CN,HN;CHA|
00002C30: 4E 47 45 53 20 50 4C 41 59 53 45 51 25 20 20 52 |NGES PLAYSEQ% R|
00002C40: 45 54 55 52 4E 53 20 43 41 52 44 50 4C 41 59 25 |ETURNS CARDPLAY%|
00002C50: 2C 53 55 49 54 50 4C 41 59 25 00 77 6C AE 29 8B |,SUITPLAY%.wl.).|
00002C60: 20 48 4E 20 B2 20 31 20 A7 20 48 20 B2 20 31 39 | HN . 1 . H . 19|
00002C70: 3A 56 20 B2 20 31 32 00 94 6C B8 29 8B 20 48 4E |:V . 12..l.). HN|
00002C80: 20 B2 20 33 20 A7 20 48 20 B2 20 32 30 3A 56 20 | . 3 . H . 20:V |
00002C90: B2 20 31 30 00 B1 6C C2 29 8B 20 48 4E 20 B2 20 |. 10..l.). HN . |
00002CA0: 32 20 A7 20 48 20 B2 20 31 35 3A 56 20 B2 20 31 |2 . H . 15:V . 1|
00002CB0: 31 00 CE 6C CC 29 8B 20 48 4E 20 B2 20 34 20 A7 |1..l.). HN . 4 .|
00002CC0: 20 48 20 B2 20 32 34 3A 56 20 B2 20 31 31 00 DC | H . 24:V . 11..|
00002CD0: 6C D1 29 97 20 42 42 AA 38 2C 31 35 00 24 6D D6 |l.). BB.8,15.$m.|
00002CE0: 29 53 4E B2 B5 28 48 4E 25 28 48 4E 2C 43 4E 29 |)SN..(HN%(HN,CN)|
00002CF0: AD 31 33 AA 2E 39 39 29 3A 43 41 52 44 B2 48 4E |.13..99):CARD.HN|
00002D00: 25 28 48 4E 2C 43 4E 29 AB 31 33 AC 28 53 4E AB |%(HN,CN).13.(SN.|
00002D10: 31 29 3A 47 4B B2 35 3A 8D 31 36 30 30 30 3A 47 |1):GK.5:.16000:G|
00002D20: 4B B2 42 4B 00 31 6D DB 29 97 20 42 42 AA 38 2C |K.BK.1m.). BB.8,|
00002D30: 30 00 6F 6D E0 29 53 50 25 28 48 4E 29 20 B2 20 |0.om.)SP%(HN) . |
00002D40: 53 4E 3A 43 50 25 28 48 4E 29 20 B2 20 48 4E 25 |SN:CP%(HN) . HN%|
00002D50: 28 48 4E 2C 43 4E 29 3A 50 53 25 28 48 4E 2C 43 |(HN,CN):PS%(HN,C|
00002D60: 4E 2C 30 29 20 B2 20 52 4F 55 4E 44 3A 20 8E 00 |N,0) . ROUND: ..|
00002D70: B8 6D EA 29 8F 20 20 20 43 48 45 43 4B 20 54 4F |.m.). CHECK TO|
00002D80: 20 53 45 45 20 57 48 4F 20 57 4F 4E 20 54 52 49 | SEE WHO WON TRI|
00002D90: 43 4B 3B 20 20 55 53 45 53 20 43 41 52 44 50 4C |CK; USES CARDPL|
00002DA0: 41 59 25 2C 53 55 49 54 50 4C 41 59 25 3B 52 45 |AY%,SUITPLAY%;RE|
00002DB0: 54 55 52 4E 53 20 57 49 00 C4 6D F4 29 57 43 20 |TURNS WI..m.)WC |
00002DC0: B2 20 35 33 00 1E 6E FE 29 81 20 4C 4F 4F 50 20 |. 53..n.). LOOP |
00002DD0: B2 20 31 20 A4 20 34 3A 20 8B 20 53 50 25 28 4C |. 1 . 4: . SP%(L|
00002DE0: 4F 4F 50 29 20 B2 20 53 49 20 AF 20 43 50 25 28 |OOP) . SI . CP%(|
00002DF0: 4C 4F 4F 50 29 20 B3 20 57 43 20 A7 20 57 49 20 |LOOP) . WC . WI |
00002E00: B2 20 4C 4F 4F 50 3A 57 43 20 B2 20 43 50 25 28 |. LOOP:WC . CP%(|
00002E10: 4C 4F 4F 50 29 3A 20 89 20 31 30 37 37 30 00 7E |LOOP): . 10770.~|
00002E20: 6E 08 2A 8B 20 53 50 25 28 4C 4F 4F 50 29 20 B3 |n.*. SP%(LOOP) .|
00002E30: 20 20 B1 20 53 49 20 AF 20 53 55 24 28 53 50 25 | . SI . SU$(SP%|
00002E40: 28 4C 4F 4F 50 29 29 20 B2 20 20 C9 20 28 46 43 |(LOOP)) . . (FC|
00002E50: 24 2C 31 29 20 A7 20 53 49 20 B2 20 53 50 25 28 |$,1) . SI . SP%(|
00002E60: 4C 4F 4F 50 29 3A 57 49 20 B2 20 4C 4F 4F 50 3A |LOOP):WI . LOOP:|
00002E70: 57 43 20 B2 20 43 50 25 28 4C 4F 4F 50 29 00 8C |WC . CP%(LOOP)..|
00002E80: 6E 12 2A 82 20 4C 4F 4F 50 3A 20 8E 00 DB 6E 1C |n.*. LOOP: ...n.|
00002E90: 2A 8F 20 20 20 57 41 49 54 20 55 4E 54 49 4C 20 |*. WAIT UNTIL |
00002EA0: 52 45 41 44 59 20 46 4F 52 20 4E 45 58 54 20 54 |READY FOR NEXT T|
00002EB0: 52 49 43 4B 20 20 54 48 45 4E 20 43 4C 45 41 52 |RICK THEN CLEAR|
00002EC0: 20 44 49 24 20 4F 46 20 43 41 52 44 53 20 54 4F | DI$ OF CARDS TO|
00002ED0: 20 54 48 49 53 20 54 52 49 43 4B 00 E7 6E 26 2A | THIS TRICK..n&*|
00002EE0: 8D 20 31 39 30 30 30 00 FC 6E 30 2A 97 42 42 AA |. 19000..n0*.BB.|
00002EF0: 36 2C 32 31 3A 97 42 42 AA 37 2C 30 00 34 6F 32 |6,21:.BB.7,0.4o2|
00002F00: 2A 97 20 42 42 AA 34 2C 36 38 3A 97 42 42 AA 35 |*. BB.4,68:.BB.5|
00002F10: 2C 31 33 31 3A 97 42 42 2C 31 33 20 AC 20 38 3A |,131:.BB,13 . 8:|
00002F20: 97 42 42 AA 31 2C 30 3A 97 42 42 AA 32 2C 32 37 |.BB.1,0:.BB.2,27|
00002F30: AC 38 AB 32 00 5D 6F 35 2A 97 20 42 42 AA 33 2C |.8.2.]o5*. BB.3,|
00002F40: 30 3A 9E 42 42 AB 33 3A 97 42 42 AA 37 2C 31 3A |0:.BB.3:.BB.7,1:|
00002F50: 97 42 42 AA 36 2C 31 36 AA 42 4B 3A 8E 00 8D 6F |.BB.6,16.BK:...o|
00002F60: 3A 2A 8F 20 20 20 50 52 49 4E 54 20 41 20 3F 20 |:*. PRINT A ? |
00002F70: 49 4E 20 42 49 44 20 44 49 24 20 20 55 53 45 53 |IN BID DI$ USES|
00002F80: 20 44 49 24 2C 52 4F 55 4E 44 2C 48 44 00 CB 6F | DI$,ROUND,HD..o|
00002F90: 44 2A 9E 20 38 32 38 20 48 2C 20 28 48 44 20 AB |D*. 828 H, (HD .|
00002FA0: 20 31 29 20 AC 20 34 20 AA 20 31 36 3A 20 9E 20 | 1) . 4 . 16: . |
00002FB0: 38 32 38 20 56 2C 20 52 4F 55 4E 44 20 AA 20 39 |828 V, ROUND . 9|
00002FC0: 3A 20 99 20 44 49 24 3B 3A 20 8E 00 DF 6F 20 2B |: . DI$;: ...o +|
00002FD0: 56 20 B2 20 31 37 3A 48 20 B2 20 20 AB 20 33 00 |V . 17:H . . 3.|
00002FE0: F9 6F 2A 2B 81 20 49 20 B2 20 31 20 A4 20 34 3A |.o*+. I . 1 . 4:|
00002FF0: 48 20 B2 20 48 20 AA 20 33 00 12 70 34 2B 8B 20 |H . H . 3..p4+. |
00003000: 44 53 25 28 49 29 20 B3 20 31 20 A7 20 31 31 30 |DS%(I) . 1 . 110|
00003010: 39 30 00 27 70 3E 2B 81 20 4A 20 B2 20 31 20 A4 |90.'p>+. J . 1 .|
00003020: 20 44 53 25 28 49 29 00 36 70 48 2B 8D 20 31 36 | DS%(I).6pH+. 16|
00003030: 30 30 30 3A 20 82 00 3E 70 52 2B 82 20 49 00 67 |000: ..>pR+. I.g|
00003040: 70 5C 2B 56 20 B2 20 35 3A 4F 46 46 20 B2 20 39 |p\+V . 5:OFF . 9|
00003050: 30 3A 52 30 46 46 20 B2 20 39 37 3A 20 48 AB 43 |0:R0FF . 97: H.C|
00003060: 4F 4C B0 B2 B2 20 37 00 89 70 66 2B 83 20 20 41 |OL... 7..pf+. A|
00003070: 2C 4B 2C 51 2C 4A 2C 31 30 2C 39 2C 38 2C 37 2C |,K,Q,J,10,9,8,7,|
00003080: 36 2C 35 2C 34 2C 33 2C 32 00 B5 70 70 2B 83 20 |6,5,4,3,2..pp+. |
00003090: 20 4E 4F 54 52 55 4D 50 2C 53 50 41 44 45 53 2C | NOTRUMP,SPADES,|
000030A0: 48 45 41 52 54 53 2C 44 49 41 4D 4F 4E 44 53 2C |HEARTS,DIAMONDS,|
000030B0: 43 4C 55 42 53 00 C6 70 7A 2B 81 20 49 20 B2 20 |CLUBS..pz+. I . |
000030C0: 31 20 A4 20 31 33 00 D3 70 84 2B 87 20 43 44 24 |1 . 13..p.+. CD$|
000030D0: 28 49 29 00 DB 70 8E 2B 82 20 49 00 EC 70 98 2B |(I)..p.+. I..p.+|
000030E0: 81 20 49 20 B2 20 31 20 A4 20 31 36 00 FB 70 A2 |. I . 1 . 16..p.|
000030F0: 2B 87 20 44 54 42 4C 24 28 49 29 00 03 71 AC 2B |+. DTBL$(I)..q.+|
00003100: 82 20 49 00 13 71 B6 2B 81 20 49 20 B2 20 30 20 |. I..q.+. I . 0 |
00003110: A4 20 34 00 1F 71 C0 2B 87 20 4D 24 28 49 29 00 |. 4..q.+. M$(I).|
00003120: 39 71 CA 2B 53 55 24 28 49 29 20 B2 20 20 C8 20 |9q.+SU$(I) . . |
00003130: 28 4D 24 28 49 29 2C 31 29 00 4E 71 DE 2B 82 20 |(M$(I),1).Nq.+. |
00003140: 49 3A 53 55 24 28 30 29 20 B2 20 22 4E 22 00 72 |I:SU$(0) . "N".r|
00003150: 71 E8 2B 96 20 20 A5 20 52 28 58 29 20 B2 20 20 |q.+. . R(X) . |
00003160: B5 20 28 20 BB 20 28 30 29 20 AC 20 58 29 20 AA |. ( . (0) . X) .|
00003170: 20 31 00 78 71 F2 2B 8E 00 BC 71 DF 2E 8F 20 20 | 1.xq.+...q... |
00003180: 20 20 43 52 49 54 49 43 41 4C 20 50 4C 41 59 20 | CRITICAL PLAY |
00003190: 4D 45 53 53 41 47 45 20 44 49 24 20 20 55 53 45 |MESSAGE DI$ USE|
000031A0: 53 20 46 49 4C 45 20 22 43 52 49 54 22 20 54 4F |S FILE "CRIT" TO|
000031B0: 20 47 45 54 20 4D 45 53 53 41 47 45 00 EB 71 E0 | GET MESSAGE..q.|
000031C0: 2E 8D 20 32 30 30 30 30 3A 20 9F 20 31 35 2C 38 |.. 20000: . 15,8|
000031D0: 2C 31 35 3A 9F 38 2C 38 2C 38 2C 22 40 3A 43 52 |,15:.8,8,8,"@:CR|
000031E0: 49 54 22 3A 97 43 47 AA 38 2C 38 00 1A 72 E1 2E |IT":.CG.8,8..r..|
000031F0: 98 31 35 2C 22 50 22 C7 28 38 29 C7 28 50 53 25 |.15,"P".(8).(PS%|
00003200: 28 48 4E AA 31 2C 52 4F 2C 32 29 29 C7 28 30 29 |(HN.1,RO,2)).(0)|
00003210: C7 28 30 29 3A 84 38 2C 4D 24 00 43 72 E2 2E A0 |.(0):.8,M$.Cr...|
00003220: 38 3A A0 31 35 3A 99 20 C7 28 31 39 29 3B 3A 99 |8:.15:. .(19);:.|
00003230: 4D 24 3B 3A 54 45 B2 54 45 AA 34 3A 97 43 47 AA |M$;:TE.TE.4:.CG.|
00003240: 38 2C 30 00 60 72 EA 2E 8D 20 31 39 30 30 30 3A |8,0.`r... 19000:|
00003250: 20 8D 20 32 30 30 30 30 3A 89 20 31 30 35 35 30 | . 20000:. 10550|
00003260: 00 6A 72 03 2F 56 20 B2 20 30 00 8E 72 08 2F 81 |.jr./V . 0..r./.|
00003270: 20 49 20 B2 20 31 20 A4 20 34 3A 48 20 B2 20 49 | I . 1 . 4:H . I|
00003280: 20 AA 20 31 3A 56 20 B2 20 56 20 AA 20 33 00 A7 | . 1:V . V . 3..|
00003290: 72 17 2F 8B 20 44 53 25 28 49 29 20 B3 20 31 20 |r./. DS%(I) . 1 |
000032A0: A7 20 31 32 30 39 30 00 BC 72 1C 2F 81 20 4A 20 |. 12090..r./. J |
000032B0: B2 20 31 20 A4 20 44 53 25 28 49 29 00 C8 72 2B |. 1 . DS%(I)..r+|
000032C0: 2F 8D 20 31 36 30 30 30 00 D0 72 30 2F 82 20 4A |/. 16000..r0/. J|
000032D0: 00 DD 72 3A 2F 8F 20 20 50 52 49 4E 54 00 E5 72 |..r:/. PRINT..r|
000032E0: 44 2F 82 20 49 00 EB 72 4E 2F 8E 00 1E 73 C8 32 |D/. I..rN/...s.2|
000032F0: 99 C7 28 31 34 37 29 3B 3A 20 9E 20 38 32 38 20 |..(147);: . 828 |
00003300: 48 2C 20 48 5A 3A 20 9E 20 38 32 38 20 56 2C 20 |H, HZ: . 828 V, |
00003310: 56 5A 3A 20 8D 20 31 34 30 30 30 3A 20 8E 00 2F |VZ: . 14000: ../|
00003320: 73 B0 36 8F 20 20 55 4E 44 45 52 4C 49 4E 45 00 |s.6. UNDERLINE.|
00003330: 45 73 BA 36 48 53 20 B2 C2 28 32 31 31 29 3A 20 |Es.6HS ..(211): |
00003340: 99 20 50 24 3B 00 75 73 D8 36 48 31 20 B2 20 48 |. P$;.us.6H1 . H|
00003350: 53 20 AC 20 38 3A 48 32 20 B2 C2 28 32 31 31 29 |S . 8:H2 ..(211)|
00003360: 20 AC 20 38 3A 56 31 20 B2 20 38 AC C2 28 32 31 | . 8:V1 . 8..(21|
00003370: 34 29 AA 31 30 00 89 73 DD 36 8B 20 56 31 20 B1 |4).10..s.6. V1 .|
00003380: 20 31 39 31 20 A7 20 20 8E 00 A2 73 E2 36 97 20 | 191 . ...s.6. |
00003390: 42 42 AA 36 2C 33 32 AA 42 4B 3A 97 42 42 AA 37 |BB.6,32.BK:.BB.7|
000033A0: 2C 31 00 E3 73 EC 36 42 38 B2 B5 28 48 31 AD 32 |,1..s.6B8..(H1.2|
000033B0: 35 36 29 3A 42 37 B2 48 31 AB 42 38 AC 32 35 36 |56):B7.H1.B8.256|
000033C0: 3A 51 38 B2 B5 28 48 32 AD 32 35 36 29 3A 51 37 |:Q8..(H2.256):Q7|
000033D0: B2 48 32 AB 51 38 AC 32 35 36 3A 97 42 42 AA 33 |.H2.Q8.256:.BB.3|
000033E0: 2C 51 38 00 1A 74 F6 36 97 42 42 AA 34 2C 56 31 |,Q8..t.6.BB.4,V1|
000033F0: 3A 97 42 42 AA 35 2C 56 31 3A 97 42 42 2C 42 37 |:.BB.5,V1:.BB,B7|
00003400: 3A 97 42 42 AA 31 2C 42 38 3A 97 42 42 AA 32 2C |:.BB.1,B8:.BB.2,|
00003410: 51 37 3A 9E 42 42 AB 33 3A 8E 00 42 74 80 3E 8F |Q7:.BB.3:..Bt.>.|
00003420: 20 20 20 55 53 45 53 20 48 2C 20 53 4E 2C 20 43 | USES H, SN, C|
00003430: 41 52 44 2E 20 44 52 41 57 53 20 41 20 43 41 52 |ARD. DRAWS A CAR|
00003440: 44 2E 00 4C 74 8A 3E 48 39 B2 33 33 00 67 74 E4 |D..Lt.>H9.33.gt.|
00003450: 3E 8F 20 45 4E 54 52 59 20 57 49 54 48 20 48 39 |>. ENTRY WITH H9|
00003460: 20 50 52 45 53 45 54 00 7F 74 0E 3F 97 42 42 AA | PRESET..t.?.BB.|
00003470: 36 2C 31 36 AA 47 4B 3A 97 42 42 AA 37 2C 31 00 |6,16.GK:.BB.7,1.|
00003480: 9B 74 16 3F 42 41 B2 42 42 3A 52 4B B2 43 41 52 |.t.?BA.BB:RK.CAR|
00003490: 44 3A 49 31 B2 49 3A 49 B2 53 4E 00 B1 74 48 3F |D:I1.I:I.SN..tH?|
000034A0: 97 34 34 2C 38 3A 8D 31 32 30 3A 49 B2 49 31 3A |.44,8:.120:I.I1:|
000034B0: 8E 00 FC 74 5C 3F 42 39 B2 48 AC 38 AB 31 33 3A |...t\?B9.H.8.13:|
000034C0: 51 39 B2 42 39 AA 48 39 3A 42 38 B2 B5 28 42 39 |Q9.B9.H9:B8..(B9|
000034D0: AD 32 35 36 29 3A 42 37 B2 42 39 AB 42 38 AC 32 |.256):B7.B9.B8.2|
000034E0: 35 36 3A 51 38 B2 B5 28 51 39 AD 32 35 36 29 3A |56:Q8..(Q9.256):|
000034F0: 51 37 B2 51 39 AB 51 38 AC 32 35 36 00 33 75 66 |Q7.Q9.Q8.256.3uf|
00003500: 3F 97 42 42 AA 34 2C 56 AC 38 AB 31 31 3A 97 42 |?.BB.4,V.8.11:.B|
00003510: 42 AA 35 2C 56 AC 38 AA 33 33 3A 97 42 42 2C 42 |B.5,V.8.33:.BB,B|
00003520: 37 3A 97 42 42 AA 31 2C 42 38 3A 97 42 42 AA 32 |7:.BB.1,B8:.BB.2|
00003530: 2C 51 37 00 54 75 6B 3F 97 42 42 AA 33 2C 51 38 |,Q7.Tuk?.BB.3,Q8|
00003540: 3A 9E 42 42 AB 33 3A 97 42 42 AA 36 2C 31 36 AA |:.BB.3:.BB.6,16.|
00003550: 42 4B 3A 8E 00 7B 75 AC 3F 9E 20 38 32 38 20 48 |BK:..{u.?. 828 H|
00003560: 2C 20 32 31 20 AB 20 20 C3 20 28 50 24 29 20 AD |, 21 . . (P$) .|
00003570: 20 32 3A 20 99 20 50 24 3A 20 8E 00 A3 75 B6 3F | 2: . P$: ...u.?|
00003580: 9E 20 38 32 38 20 48 2C 20 32 31 20 AB 20 20 C3 |. 828 H, 21 . .|
00003590: 20 28 50 24 29 20 AD 20 32 3A 20 99 20 50 24 3B | (P$) . 2: . P$;|
000035A0: 3A 20 8E 00 D8 75 10 40 9E 20 38 32 38 20 56 2C |: ...u.@. 828 V,|
000035B0: 20 32 35 3A 50 24 20 B2 20 22 54 59 50 45 20 27 | 25:P$ . "TYPE '|
000035C0: 3F 27 20 46 4F 52 20 48 45 4C 50 22 3A 20 8D 20 |?' FOR HELP": . |
000035D0: 31 35 31 30 30 3A 20 8E 00 27 76 68 42 48 20 B2 |15100: ..'vhBH .|
000035E0: 20 30 3A 4F 53 4E 20 B2 20 31 3A 20 81 20 43 4E | 0:OSN . 1: . CN|
000035F0: 20 B2 20 31 20 A4 20 31 33 3A 20 8D 20 31 30 30 | . 1 . 13: . 100|
00003600: 30 30 3A 48 20 B2 20 48 20 AA 20 32 3A 20 8B 20 |00:H . H . 2: . |
00003610: 53 4E 20 B3 20 20 B1 20 4F 53 4E 20 A7 20 48 20 |SN . . OSN . H |
00003620: B2 20 48 20 AA 20 33 00 34 76 6D 42 97 42 42 AA |. H . 3.4vmB.BB.|
00003630: 38 2C 31 35 00 61 76 72 42 4F 53 4E 20 B2 20 53 |8,15.avrBOSN . S|
00003640: 4E 3A 48 25 28 49 58 2C 43 4E 29 20 B2 20 48 3A |N:H%(IX,CN) . H:|
00003650: 20 8D 20 31 36 30 30 30 3A 20 82 20 43 4E 3A 20 | . 16000: . CN: |
00003660: 8E 00 A5 76 CC 42 48 20 B2 20 30 3A 4F 53 4E 20 |...v.BH . 0:OSN |
00003670: B2 20 31 3A 20 81 20 43 4E 20 B2 20 31 20 A4 20 |. 1: . CN . 1 . |
00003680: 4C 43 20 AB 20 31 3A 20 8B 20 50 53 25 28 48 4E |LC . 1: . PS%(HN|
00003690: 2C 43 4E 2C 30 29 20 B3 20 20 B1 20 30 20 A7 20 |,CN,0) . . 0 . |
000036A0: 31 37 31 33 30 00 B2 76 D1 42 97 42 42 AA 38 2C |17130..v.B.BB.8,|
000036B0: 31 35 00 E3 76 D6 42 8D 20 31 30 30 30 30 3A 48 |15..v.B. 10000:H|
000036C0: 20 B2 20 48 20 AA 20 32 3A 20 8B 20 53 4E 20 B3 | . H . 2: . SN .|
000036D0: 20 20 B1 20 4F 53 4E 20 A7 20 48 20 B2 20 48 20 | . OSN . H . H |
000036E0: AA 20 33 00 07 77 E0 42 4F 53 4E 20 B2 20 53 4E |. 3..w.BOSN . SN|
000036F0: 3A 48 25 28 49 58 2C 43 4E 29 20 B2 20 48 3A 20 |:H%(IX,CN) . H: |
00003700: 8D 20 31 36 30 30 30 00 13 77 EA 42 82 20 43 4E |. 16000..w.B. CN|
00003710: 3A 20 8E 00 25 77 50 46 8F 20 20 55 4E 44 52 41 |: ..%wPF. UNDRA|
00003720: 57 20 4E 2F 53 00 46 77 55 46 8B 20 48 4E 20 B2 |W N/S.FwUF. HN .|
00003730: 20 32 20 A7 20 48 20 B2 20 48 25 28 49 58 2C 43 | 2 . H . H%(IX,C|
00003740: 4E 29 3A 56 B2 34 00 5A 77 56 46 8B 20 46 35 B0 |N):V.4.ZwVF. F5.|
00003750: 48 4E B2 32 A7 31 38 30 31 30 00 91 77 58 46 8B |HN.2.18010..wXF.|
00003760: 4F 48 A7 9E 38 32 38 48 2C 4F 48 3A 9E 38 32 38 |OH..828H,OH:.828|
00003770: 56 2C 52 57 AB 33 3A 97 43 47 AA 34 2C 42 4B 3A |V,RW.3:.CG.4,BK:|
00003780: 97 43 47 AA 33 2C 31 3A 97 43 47 AA 35 2C 31 32 |.CG.3,1:.CG.5,12|
00003790: 38 00 A7 77 59 46 8B 4F 48 A7 99 22 A0 22 3B 3A |8..wYF.OH..".";:|
000037A0: 97 43 47 AA 35 2C 30 00 CE 77 5A 46 48 39 20 B2 |.CG.5,0..wZFH9 .|
000037B0: 20 33 33 3A 48 35 20 B2 20 33 38 3A 20 8B 20 43 | 33:H5 . 38: . C|
000037C0: 4E 20 B2 20 31 33 20 A7 20 31 38 30 38 30 00 E4 |N . 13 . 18080..|
000037D0: 77 64 46 81 20 41 20 B2 20 43 4E 20 AA 20 31 20 |wdF. A . CN . 1 |
000037E0: A4 20 31 33 00 03 78 6E 46 8B 20 48 25 28 49 58 |. 13..xnF. H%(IX|
000037F0: 2C 41 29 20 B1 20 48 20 AA 20 34 20 A7 20 31 38 |,A) . H . 4 . 18|
00003800: 30 38 30 00 21 78 78 46 8B 20 50 53 25 28 48 4E |080.!xxF. PS%(HN|
00003810: 2C 41 2C 30 29 20 B1 20 30 20 A7 20 31 38 30 36 |,A,0) . 0 . 1806|
00003820: 30 00 50 78 82 46 48 39 20 B2 20 28 48 25 28 49 |0.Px.FH9 . (H%(I|
00003830: 58 2C 41 29 AB 48 29 AC 38 3A 48 35 20 B2 20 48 |X,A).H).8:H5 . H|
00003840: 25 28 49 58 2C 41 29 3A 20 89 20 31 38 30 38 30 |%(IX,A): . 18080|
00003850: 00 58 78 8C 46 82 20 41 00 82 78 A0 46 97 42 42 |.Xx.F. A..x.F.BB|
00003860: AA 36 2C 31 36 AA 42 4B 3A 97 42 42 AA 37 2C 30 |.6,16.BK:.BB.7,0|
00003870: 3A 20 97 42 42 AA 38 2C 31 33 3A 8D 20 31 36 32 |: .BB.8,13:. 162|
00003880: 32 30 00 9D 78 B4 46 48 39 20 B2 20 33 33 3A 20 |20..x.FH9 . 33: |
00003890: 8B 20 43 4E 20 B2 20 31 20 A7 20 20 8E 00 B9 78 |. CN . 1 . ...x|
000038A0: BE 46 81 20 41 20 B2 20 43 4E 20 AB 20 31 20 A4 |.F. A . CN . 1 .|
000038B0: 20 31 20 A9 20 20 AB 20 31 00 DD 78 C8 46 8B 20 | 1 . . 1..x.F. |
000038C0: 48 25 28 49 58 2C 41 29 20 B3 20 48 25 28 49 58 |H%(IX,A) . H%(IX|
000038D0: 2C 43 4E 29 20 AB 20 34 20 A7 20 20 8E 00 FB 78 |,CN) . 4 . ...x|
000038E0: D2 46 8B 20 50 53 25 28 48 4E 2C 41 2C 30 29 20 |.F. PS%(HN,A,0) |
000038F0: B1 20 30 20 A7 20 31 38 31 35 30 00 1B 79 D7 46 |. 0 . 18150..y.F|
00003900: 8B 20 48 35 20 AB 20 48 25 28 49 58 2C 41 29 20 |. H5 . H%(IX,A) |
00003910: B1 20 34 20 A7 20 31 38 31 36 30 00 41 79 DC 46 |. 4 . 18160.Ay.F|
00003920: 48 39 20 B2 20 28 48 35 20 AB 20 48 25 28 49 58 |H9 . (H5 . H%(IX|
00003930: 2C 41 29 29 20 AC 20 38 3A 20 89 20 31 38 31 36 |,A)) . 8: . 1816|
00003940: 30 00 4C 79 E6 46 82 20 41 3A 20 8E 00 64 79 F0 |0.Ly.F. A: ..dy.|
00003950: 46 43 50 20 B2 20 43 4E 3A 20 8F 20 20 53 41 56 |FCP . CN: . SAV|
00003960: 45 20 43 4E 00 99 79 FA 46 43 4E 20 B2 20 41 3A |E CN..y.FCN . A:|
00003970: 48 20 B2 20 48 25 28 49 58 2C 41 29 3A 20 8D 20 |H . H%(IX,A): . |
00003980: 31 30 30 30 30 3A 20 8D 20 31 36 31 30 30 3A 43 |10000: . 16100:C|
00003990: 4E 20 B2 20 43 50 3A 20 8E 00 E0 79 38 4A 97 31 |N . CP: ...y8J.1|
000039A0: 39 38 2C 30 3A 9E 38 32 38 48 2C 31 3A 9E 38 32 |98,0:.828H,1:.82|
000039B0: 38 56 2C 32 35 3A 99 42 4C 24 3B 3A 9E 38 32 38 |8V,25:.BL$;:.828|
000039C0: 48 2C 38 3A 99 22 48 49 54 20 27 52 45 54 55 52 |H,8:."HIT 'RETUR|
000039D0: 4E 27 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 3B |N' TO CONTINUE";|
000039E0: 00 F9 79 39 4A A1 41 4E 53 24 3A 8B 41 4E 53 24 |..y9J.ANS$:.ANS$|
000039F0: B2 22 22 A7 31 39 30 30 31 00 2C 7A 3A 4A 9E 38 |."".19001.,z:J.8|
00003A00: 32 38 48 2C 31 3A 9E 38 32 38 56 2C 32 35 3A 99 |28H,1:.828V,25:.|
00003A10: 42 4C 24 3B 3A 9E 38 32 38 48 2C 31 3A 8B 20 41 |BL$;:.828H,1:. A|
00003A20: 4E 53 24 B2 C7 28 31 33 29 A7 20 8E 00 40 7A 3B |NS$..(13). ..@z;|
00003A30: 4A 8B 20 41 4E 53 24 B2 C7 28 31 33 33 29 A7 8A |J. ANS$..(133)..|
00003A40: 00 4B 7A 3D 4A 89 31 39 30 30 30 00 6C 7A 20 4E |.Kz=J.19000.lz N|
00003A50: 99 20 C7 28 31 39 29 3B 42 4C 24 42 4C 24 3B 22 |. .(19);BL$BL$;"|
00003A60: A0 A0 22 3B C7 28 31 39 29 3B 3A 8E 00 92 7A A8 |..";.(19);:...z.|
00003A70: 61 56 20 B2 20 31 32 3A 20 8B 20 57 49 20 B2 20 |aV . 12: . WI . |
00003A80: 32 20 B0 20 57 49 20 B2 20 34 20 A7 20 32 35 35 |2 . WI . 4 . 255|
00003A90: 30 30 00 CE 7A B2 61 8B 20 28 4F 54 20 B2 20 36 |00..z.a. (OT . 6|
00003AA0: 20 AF 20 44 44 20 B2 20 30 29 20 B0 20 28 4E 45 | . DD . 0) . (NE|
00003AB0: 20 B2 20 31 20 AF 20 44 44 29 20 A7 20 20 8D 20 | . 1 . DD) . . |
00003AC0: 32 35 34 30 30 3A 20 89 20 32 35 30 33 30 00 F9 |25400: . 25030..|
00003AD0: 7A B7 61 48 20 B2 20 31 20 AA 20 4F 54 3A 20 8B |z.aH . 1 . OT: .|
00003AE0: 20 4F 42 20 B1 20 30 20 A7 20 48 20 B2 20 33 20 | OB . 0 . H . 3 |
00003AF0: AA 20 4F 54 20 AB 20 4F 42 00 05 7B C6 61 8D 20 |. OT . OB..{.a. |
00003B00: 32 35 39 30 30 00 0B 7B D0 61 8E 00 35 7B 38 63 |25900..{.a..5{8c|
00003B10: 97 42 42 AA 37 2C 30 3A 48 20 B2 20 32 3A 56 20 |.BB.7,0:H . 2:V |
00003B20: B2 20 31 32 3A 20 8D 20 32 35 37 30 30 3A 4F 42 |. 12: . 25700:OB|
00003B30: 20 B2 20 4F 54 00 6C 7B 42 63 97 42 42 AA 37 2C | . OT.l{Bc.BB.7,|
00003B40: 31 3A 97 42 42 AA 36 2C 31 36 3A 48 20 B2 20 31 |1:.BB.6,16:H . 1|
00003B50: 2E 38 3A 56 20 B2 31 32 2E 32 3A 8D 32 35 39 30 |.8:V .12.2:.2590|
00003B60: 35 3A 48 B2 32 3A 56 B2 31 32 3A 8E 00 AE 7B 9C |5:H.2:V.12:...{.|
00003B70: 63 8B 20 28 54 54 20 B2 20 36 20 AF 20 44 44 29 |c. (TT . 6 . DD)|
00003B80: 20 B0 20 28 54 4E 20 AA 20 54 54 20 B2 20 31 33 | . (TN . TT . 13|
00003B90: 20 AF 20 44 44 20 B2 20 30 29 20 A7 20 20 8D 20 | . DD . 0) . . |
00003BA0: 32 35 38 30 30 3A 20 89 20 32 35 35 33 30 00 DB |25800: . 25530..|
00003BB0: 7B A6 63 48 20 B2 20 33 36 20 AB 20 54 54 3A 20 |{.cH . 36 . TT: |
00003BC0: 8B 20 54 42 20 B1 20 30 20 A7 20 48 20 B2 20 33 |. TB . 0 . H . 3|
00003BD0: 34 20 AB 20 54 54 20 AA 20 54 42 00 E7 7B BA 63 |4 . TT . TB..{.c|
00003BE0: 8D 20 32 35 39 30 30 00 ED 7B C4 63 8E 00 05 7C |. 25900..{.c...||
00003BF0: 64 64 48 39 20 B2 20 37 38 3A 97 42 42 AA 36 2C |ddH9 . 78:.BB.6,|
00003C00: 31 36 AA 42 4B 00 4B 7C A0 64 42 39 20 B2 20 48 |16.BK.K|.dB9 . H|
00003C10: 20 AC 20 38 20 AB 20 39 3A 51 39 20 B2 20 42 39 | . 8 . 9:Q9 . B9|
00003C20: 20 AA 20 48 39 3A 42 38 20 B2 20 20 B5 20 28 42 | . H9:B8 . . (B|
00003C30: 39 20 AD 20 32 35 36 29 3A 42 37 20 B2 20 42 39 |9 . 256):B7 . B9|
00003C40: 20 AB 20 42 38 20 AC 20 32 35 36 00 72 7C AA 64 | . B8 . 256.r|.d|
00003C50: 51 38 B2 B5 20 28 51 39 20 AD 20 32 35 36 29 3A |Q8.. (Q9 . 256):|
00003C60: 51 37 20 B2 20 51 39 20 AB 20 51 38 20 AC 20 32 |Q7 . Q9 . Q8 . 2|
00003C70: 35 36 00 A8 7C B4 64 97 42 42 AA 34 2C 56 AC 38 |56..|.d.BB.4,V.8|
00003C80: AB 39 3A 97 42 42 AA 35 2C 56 AC 38 AA 31 37 3A |.9:.BB.5,V.8.17:|
00003C90: 97 42 42 2C 42 37 3A 97 42 42 AA 31 2C 42 38 3A |.BB,B7:.BB.1,B8:|
00003CA0: 97 42 42 AA 32 2C 51 37 00 BC 7C B9 64 97 20 42 |.BB.2,Q7..|.d. B|
00003CB0: 42 AA 33 2C 51 38 3A 9E 42 42 AB 33 00 C2 7C BE |B.3,Q8:.BB.3..|.|
00003CC0: 64 8E 00 E5 7C C8 64 97 42 42 AA 37 2C 30 3A 48 |d...|.d.BB.7,0:H|
00003CD0: B2 33 31 3A 56 B2 31 32 3A 8D 32 35 37 30 30 3A |.31:V.12:.25700:|
00003CE0: 54 42 B2 54 54 00 13 7D CD 64 97 42 42 AA 37 2C |TB.TT..}.d.BB.7,|
00003CF0: 31 3A 97 42 42 AA 36 2C 31 36 3A 48 20 B2 20 33 |1:.BB.6,16:H . 3|
00003D00: 35 2E 34 3A 56 20 B2 31 32 2E 32 3A 8D 20 32 35 |5.4:V .12.2:. 25|
00003D10: 39 30 35 00 28 7D D2 64 48 20 B2 20 33 35 3A 56 |905.(}.dH . 35:V|
00003D20: 20 B2 20 31 32 3A 20 8E 00 40 7D 2C 65 8D 20 32 | . 12: ..@},e. 2|
00003D30: 35 39 30 35 3A 20 8D 20 32 35 39 34 30 3A 20 8E |5905: . 25940: .|
00003D40: 00 46 7D 31 65 8F 00 63 7D 36 65 97 42 42 AA 36 |.F}1e..c}6e.BB.6|
00003D50: 2C 31 36 3A 97 42 42 AA 37 2C 31 3A 48 39 20 B2 |,16:.BB.7,1:H9 .|
00003D60: 20 34 33 00 CF 7D 40 65 42 39 20 B2 20 48 20 AC | 43..}@eB9 . H .|
00003D70: 20 38 20 AB 31 30 3A 51 39 20 B2 20 42 39 20 AA | 8 .10:Q9 . B9 .|
00003D80: 20 48 39 3A 42 38 20 B2 20 20 B5 20 28 42 39 20 | H9:B8 . . (B9 |
00003D90: AD 20 32 35 36 29 3A 42 37 20 B2 20 42 39 20 AB |. 256):B7 . B9 .|
00003DA0: 20 42 38 20 AC 20 32 35 36 3A 51 38 20 B2 20 20 | B8 . 256:Q8 . |
00003DB0: B5 20 28 51 39 20 AD 20 32 35 36 29 3A 51 37 20 |. (Q9 . 256):Q7 |
00003DC0: B2 20 51 39 20 AB 20 51 38 20 AC 20 32 35 36 00 |. Q9 . Q8 . 256.|
00003DD0: 1C 7E 4A 65 97 42 42 AA 34 2C 56 20 AC 20 38 20 |.~Je.BB.4,V . 8 |
00003DE0: AB 20 39 3A 97 42 42 AA 35 2C 56 20 AC 20 38 20 |. 9:.BB.5,V . 8 |
00003DF0: AA 20 31 37 3A 97 42 42 2C 42 37 3A 97 42 42 AA |. 17:.BB,B7:.BB.|
00003E00: 31 2C 42 38 3A 97 42 42 AA 32 2C 51 37 3A 97 42 |1,B8:.BB.2,Q7:.B|
00003E10: 42 AA 33 2C 51 38 3A 9E 42 42 AB 33 00 22 7E 4F |B.3,Q8:.BB.3."~O|
00003E20: 65 8E 00 70 7E 54 65 9E 38 32 38 48 2C 48 3A 9E |e..p~Te.828H,H:.|
00003E30: 38 32 38 56 2C 56 3A 97 43 47 AA 35 2C 31 32 38 |828V,V:.CG.5,128|
00003E40: 3A 81 56 31 B2 56 A4 56 AA 32 3A 81 48 31 B2 48 |:.V1.V.V.2:.H1.H|
00003E50: A4 48 AA 34 3A 99 22 DA 22 3B 3A 82 3A 99 3A 9E |.H.4:.".";:.:.:.|
00003E60: 38 32 38 48 2C 48 3A 82 3A 97 43 47 AA 35 2C 30 |828H,H:.:.CG.5,0|
00003E70: 00 76 7E 5E 65 8E 00 AC 7E 90 65 8D 20 32 30 30 |.v~^e...~.e. 200|
00003E80: 30 30 3A 20 99 20 22 57 45 53 54 20 49 53 20 44 |00: . "WEST IS D|
00003E90: 55 4D 4D 59 22 3A 49 58 20 B2 20 30 3A 52 57 20 |UMMY":IX . 0:RW |
00003EA0: B2 20 38 3A 56 20 B2 20 33 3A 20 8E 00 CD 7E 30 |. 8:V . 3: ...~0|
00003EB0: 75 4E 31 20 B2 20 31 3A 53 52 24 20 B2 20 22 22 |uN1 . 1:SR$ . ""|
00003EC0: 3A 51 20 B2 20 30 3A 97 31 39 38 2C 30 00 E8 7E |:Q . 0:.198,0..~|
00003ED0: 3A 75 8B 4E 31 B1 4E 4E A7 8D 34 30 30 30 30 3A |:u.N1.NN..40000:|
00003EE0: 20 89 20 33 30 30 33 30 00 23 7F 44 75 8D 34 30 | . 30030.#.Du.40|
00003EF0: 30 30 30 3A 8B 41 24 B1 B2 22 20 22 AF 41 24 B3 |000:.A$.." ".A$.|
00003F00: B2 22 5A 22 A7 99 41 24 3B 3A 53 52 24 B2 53 52 |."Z"..A$;:SR$.SR|
00003F10: 24 AA 41 24 3A 4E 31 B2 4E 31 AA 31 3A 89 33 30 |$.A$:N1.N1.1:.30|
00003F20: 30 31 30 00 36 7F 4E 75 8B 20 41 24 20 B2 C7 28 |010.6.Nu. A$ ..(|
00003F30: 31 33 33 29 A7 8A 00 76 7F 58 75 8B 41 24 B2 C7 |133)...v.Xu.A$..|
00003F40: 28 32 30 29 AF 4E 31 B1 31 A7 8D 34 30 31 30 30 |(20).N1.1..40100|
00003F50: 3A 53 52 24 B2 CA 28 53 52 24 2C 31 2C C3 20 28 |:SR$..(SR$,1,. (|
00003F60: 53 52 24 29 AB 31 29 3A 4E 31 B2 4E 31 AB 31 3A |SR$).1):N1.N1.1:|
00003F70: 89 33 30 30 32 30 00 91 7F 62 75 8B 20 41 24 20 |.30020...bu. A$ |
00003F80: B3 20 20 B1 C7 28 31 33 29 20 A7 20 33 30 30 31 |. ..(13) . 3001|
00003F90: 30 00 AF 7F 6C 75 99 22 A0 22 3B 3A 8B 4E 31 B3 |0...lu.".";:.N1.|
00003FA0: B2 4E 4E A7 99 A6 4E 4E AB 4E 31 AA 31 29 3B 00 |.NN...NN.N1.1);.|
00003FB0: C8 7F 76 75 99 20 54 24 3B 3A 20 8B C2 28 32 31 |..vu. T$;: ..(21|
00003FC0: 34 29 B3 20 32 35 A7 99 00 CE 7F 80 75 8E 00 DF |4). 25......u...|
00003FD0: 7F 40 9C 99 22 A4 22 3B C7 28 31 35 37 29 3B 00 |.@..".";.(157);.|
00003FE0: F6 7F 4A 9C A1 20 41 24 3A 8B 41 24 B2 22 22 A7 |..J.. A$:.A$."".|
00003FF0: 20 34 30 30 31 30 00 FC 7F 54 9C 8E 00 23 80 A4 | 40010...T...#..|
00004000: 9C 99 22 A0 22 3B C7 28 31 35 37 29 3B C7 28 31 |..".";.(157);.(1|
00004010: 35 37 29 3B 3A 99 22 A4 22 3B C7 28 31 35 37 29 |57);:.".";.(157)|
00004020: 3B 3A 8E 00 40 80 C8 AF 9F 31 35 2C 38 2C 31 35 |;:..@....15,8,15|
00004030: 3A 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C 44 24 |:.15,A$,B$,C$,D$|
00004040: 00 56 80 D2 AF 99 20 41 24 2C 42 24 2C 43 24 2C |.V.... A$,B$,C$,|
00004050: 44 24 3A A0 31 35 00 5C 80 68 BF 80 00 77 80 50 |D$:.15.\.h...w.P|
00004060: C3 9F 31 35 2C 38 2C 31 35 2C 22 53 3A 48 45 4C |..15,8,15,"S:HEL|
00004070: 4C 4F 22 3A A0 31 35 00 7D 80 20 CB 80 00 AC 80 |LO":.15.}. .....|
00004080: D8 D6 42 42 B2 35 30 31 37 39 3A 9E 35 31 32 30 |..BB.50179:.5120|
00004090: 30 3A 99 C7 28 31 34 37 29 3B 3A 9E 42 42 AB 33 |0:..(147);:.BB.3|
000040A0: 3A 81 49 B2 31 A4 31 30 30 30 3A 82 00 D7 80 E2 |:.I.1.1000:.....|
000040B0: D6 97 20 42 42 AA 32 2C C2 28 42 42 AA 32 29 AB |.. BB.2,.(BB.2).|
000040C0: 32 3A 97 42 42 AA 37 2C 30 3A 9E 42 42 AB 33 3A |2:.BB.7,0:.BB.3:|
000040D0: 97 42 42 AA 37 2C 31 00 00 00 00 |.BB.7,1.... |
.@.@ .. B(1022)..99 . .51974:..4@%.. 512
00:.53280,BK.B@'.. G(147);.D@>.BUFF . 53
75:BB.50179:CG.51200..@H.OFF . 90:R0FF .
97: .BB.6,16..@..LE$.G(17):RI$.G(29):CR
$.G(13).L@..BELL$.G(7):NW$.G(13):CLS$.G(
147)..A..FR . 1:LR . 25:FC . 1:LASTCOL .
40: . C64 SCREEN LIMITS.}A... H%(1,13)
,HN%(4,13),CP%(4),SP%(4),PS%(4,13,2),NH%
(14),BS%(5,4): . NUMERIC REPRESENTAT
ION OF HAND IN MEMORY..A... A,K,Q,J,"."
,9,8,7,6,5,4,3,2: . CARD NAMES.OA$.. N
,S,H,D,C: . SUIT NAMES..A... BOTH,NONE
,N/S,E/W..A3.. "A","S","Z","X".5B8.. CAR
D$(13),VUL$(3),SU$(4),BID$(38),RK$(13),X
U$(4).FBB.. I . 1 . 13: . CARD$(I):RK$(I
).CARD$(I):. I..BL.. I . 0 . 4: . SU$(I)
: . I: . I . 0 . 3: . VUL$(I): . I..BQ..
I.1 . 4:. XU$(I):. I..CV.. I . 1 . 7: .
J . 4 . 0 . . 1:BID$(5 . I . J) .G(48.
I).SU$(J):.J:.I.MC`.BID$(36) . "P":BID$(
37) . "D":BID$(38) . "R": . SETUP BID
ARRAY.SC.....C..CARDBLANK$ . " ":BL$ .
"
".YC..NR . 1:PN . 0:NP$ . "Y": . END
OF STATIC INITIALIZATION..C..LR% . 100:
. B(1022).99 .1915..D...1022,99.!D... NP
$ . . "Y" . 1930..D..HZ . 7:VZ . 1:P$ .
"PLAY OF THE HAND BY GOREN": . 13000: .
NW$;NW$;NW$;NW$;NW$:ROUND . 1:TE . 0..D
D.. . 7);"NEXT HAND IN SEQUENCE IS:";NR
;NW$;NW$..EN.. "WHICH HAND DO YOU WISH T
O PLAY? (1-100)": . : . "OR HIT 'RETURN'
FOR HAND #"NR;" >";.6ES.NN . 3: . 30000
:NP . E (SR$).MEX.. NP . 0 . NP . NR..E
... NP . 1 . NP . LR% . . NW$;"THAT IS
NOT A VALID HAND #" . BELL$: . 1230.KE..
. NW$;NW$; . 12)"LOADING HAND #";NP:NR .
NP..E...15,8,15:.8,8,8,"HANDS"..F...15,
"P"G(8)G(NP)G(0)G(0)./F...I.1 . 192:.#8,
A$:.BUFF.I,F(A$.G(0)):..<F.. 8: 15.BF.
....F... I . 0 . 3: . J . 1 . 13:HN%(I .
1,J) . B (BUFF . 13 . I . J): . J: . I
..F..DL . B (BUFF . 170): . I . 0 . 4:
. J . 1 . 4:BS%(I . 1,J) . B (BUFF . 17
0 . 4 . I . J): . J: . I..G... I . 0 . 1
2.=G..BA . I . 9 . 1:NH%(I . 1) . B (BU
FF . BA . 52).CG(.. J . 1 . 4:PS%(J,I .
1,1) . B (BUFF . BA . 52 . 2 . J . 1):P
S%(J,I . 1,2) . B (BUFF . BA . 52 . 2 .
J):PS%(J,I . 1,0) . 0: . J.KG2.. I..H<.
HZ . 16:VZ . 1:P$ . "THE AUCTION": . 130
00:.828H,16:.828V,8.MHA.."S W N E"
:.828H,18:.828V,6:."VUL: ";VUL$(NR..(NR.
4).4).WHF.HN . 1:IX . 1:V . 19: . 17000:
.BB.8,0..HP.ROUND . 1:PC . 0:LB . 0:OB .
0:TB . 0: . DL . 1 . 1370..HU.. I . 1 .
DL . 1:HD . I:DI$ . "--": . 10120: . I.
(IZ.. DL . 1 ..828H,10:.828V,25:. "YOU D
EALT THIS HAND";: . 1390..ID.. I . DL .
4:DI$ . "? ":HD . I: . 10810:DI$ . BID$(
BS%(ROUND,HD)):MI . 40:MA . 40: . 10180:
. 10120: . I:ROUND . 2..IN.HD . 1.AIX..
PC . . 3 . 1430..IZ.DI$ . "? ": . 1081
0: . HD . 1 . . 10200: . 1410.-J}.DI$ .
BID$(BS%(ROUND,HD)):MI . 40:MA . 40: .
10180.JJ... 10120:HD . HD . 1: . HD . 4
. HD . 1:ROUND . ROUND . 1.~J... PC . 3
. 1400..J.....J .. 19000: . 10270.PJ..HN
. NH%(1):ROUND . 1: . HN . 1 . . 10570
: . 1460..J... 10380..K... 10000:DI$ . C
S$: . 10660:HN . DU: . HN . 2 . . 26000
.2K..IX . 0:V . 4: . 17000..K..HN . NH%(
1):SI . SP%(HN): . I . 1 . 3:HN . HN . 1
: . HN . 4 . HN . HN . 4..KH.. HN . 1 .
(HN . 3 . (DU . 1 . DU . 3)) . . 10380:
. 1490.KKM.. 10570..KR.. 10000:DI$ . CS
$: . 10660: . I.'L... 10780:. 10730: . W
I . 2 . WI . 4 . TT . 1: . 1510.2L..OT .
1.GL... ROUND . 2 . 13.IL... ROUND . LC
. LC . 13 . 1770..L..SI . 0:HN . WI: .
10340: . 25000.ZL... I . 1 . 4: . HN . 1
. (HN . 3 . (DU . 1 . DU . 3)) . . 103
80: . 1550..L... 10570.)M... 10000:DI$ .
CS$: . 10660:HN . HN . 1: . HN . 4 . HN
. HN . 4.@M... SI . 0 . SI . SN.{M".. I
: . 10730: . ROUND . LC . NH%(ROUND . 1)
. 5 . 1720..M,.. LC . 13 . ROUND . 13 .
NH%(14) . WI: . 1720.JM6.. WI . 1 . WI
. 3 . 1720..M@.. ROUND . . LC . NE . 1
. 1720..NJ.. . (ROUND . . LC . LC . 13
) . 1670.NNO.. 20000: . BELL$;"YOU MADE
A MISTAKE CASHING OUT"..NT.. "WE WILL RE
STORE THE HAND TO ROUND ";LC:LL.LC:OB.0:
TB.0..NY..19000:.G(147);:TE . TE . 8: .
I . 1 . 4: . J . 1 . 13: . PS%(I,J,0) .
. LL . PS%(I,J,0) . 0..OZ.WI.HL:ROUND.L
L:OT.HU:TT.HT..O[..J:.I:.1685..O...20000
:. BELL$;"YOU SHOULD HAVE WON THIS TRICK
":."WE WILL RESTORE TO BEFORE THIS TRICK
";:.19000:.G(147);:.J.1.4:.K.1.13:.PS%(J
,K,0).ROUND.PS%(J,K,0).0.EO... K: . J..P
...J.1.13:.PS%(1,J,0).0.HN.1:CN.J:.10000
:V.19:IX.1:H.H%(IX,CN)..P... 16000.FP...
PS%(DU,J,0) . 0 . HN . DU:CN . J: . 100
00:V . 4:IX . 0:H . H%(IX,CN): . 16000..
P... J:O1 . OT:T1 . TT:TT . 0:OT . 0.SP.
.. O1 . 0 . WI . 1: . OT . 1 . O1: . 103
40: . 25000: . :OT . OT . 1..Q... T1 . 0
. WI . 2: . TT . 1 . T1: . 10340: . 250
00: . :TT . TT . 1..Q...BB.6,80:.10800.B
Q..WI . OW: . 1530..Q... ROUND . LC . .
NH%(ROUND . 1) . 2 . NH%(ROUND . 1) . 4
. TT . TT . 1: . 1730..Q..OT . OT . 1..
QB.. ROUND . 13 . LC . 13 . . 10730: .
WI . 2 . WI . 4 . OT . OT . 1:TT . TT .
1..RL.. ROUND . 13 . . 10780.2RV.. 1073
0:OW . WI: . ROUND.XR... 10780: . 10340:
. 25000: . 1870.|R..HU . OT:HT . TT:HL
. NH%(ROUND)..R...20000:."YOU SHOULD TAK
E THE REMAINING TRICKS":."DO YOU WISH TO
PLAY THIS OUT? ";: . 10090: . ANS$ . "Y
" . . 1530.QS...20000:."DO YOU WANT TO
WATCH ME PLAY ? ";:.10090:.ANS$."N".OT.O
T.14.ROUND:ROUND.13:.1750.FS... 10340: .
25000.XS... J . 1 . 14 . ROUND: . 10780
: . 10730:HN . WI: . I . 1 . 4: . HN . 2
. HN . 4 . CN . PS%(HN,ROUND,1): . 1830
.VT... K . 1 . 13: . PS%(HN,K,0) . 0 . P
S%(HN,ROUND,1) . . HN%(HN,K) . PS%(HN,R
OUND,2) . . HN%(HN,K) . CN . HN%(HN,K):
K . 13.^T... K..T&.. K . 1 . 13: . HN%(H
N,K) . CN . CN . K:K . 13..T0.. K: . HN
. . 1 . HN . . DU . 1845..T2.IX.1:RW.2
3:V.19:.HN.DU.IX.0:RW.9:V.4..U3.H . H%(I
X,CN):F5 . 1: . 18000:F5 . 0.7U5.. 10660
:HN . HN . 1: . HN . 4 . HN . 1.MU:.. I
. 1 . SI . SN..UD.. I:MA . 100:OT . OT .
1: . 10180: . 10730: . 10340: . 25000:R
OUND . ROUND . 1: . J:OT . OT . 1: . 172
0..UN.NR . NR . 1: . NR . 100 . NR . 1.&
VX.. 20000: . TE . 8 . . "YOU MAY WISH
TO CHECK THE TEXTBOOK": . 1910.MVB.. TE
. 3 . . 20000: . "YOU PLAYED THIS HAND
QUITE WELL!!": . 1910..VL.. 20000: . "YO
UR PLAY WAS OF EXPERT CALIBER";..VV.. 19
000..V{..20000:."DO YOU WANT ANOTHER PRO
BLEM? ";:.10090:NP$.ANS$..V... NP$ . "Y"
. 1200.<W...G(147):.828V,12:.828H,12: .
1023,0:. "LOADING MAIN MENU".LW..."MAIN
B",8..W.'. SELECT DISPLAY REPRESENTATION
OF A CARD USES HN,CN; RETURNS CS$..W.'
SN . . (HN%(HN,CN) . 13 . .99):CARD . H
N%(HN,CN) . 13 . (SN . 1):CS$ . SU$(SN)
. CARD$(CARD): ..8X$'. PRINT A CARD IN
CARD POSITION ON SCREEN USES HN,CN,DI$
.VX.'. HN . 2 . HN . 4 . 10060.VX8'. HN
. 3 . RW . FR: . 10050..X='RW . LR..XB'C
OL . 3 . (CN . 1) . 6: . 10080.GXL'. HN
. 2 . COL . FC: . 10070.YXQ'COL . LASTCO
L..XV'RW . 5 . CN..Y`'. 828 H, COL: . 82
8 V, RW: . DI$;: ../YJ'H9 .B(211).1:V9.B
(214).1.UYT'NN . 3: . 30000:ANS$ . H (S
R$,1)..Y.'.ANS$.."Y".ANS$.."N"..BE$;:.82
8H,H9:.828V,V9:." "; :.828H,H9:. 10
100..Y.'...Z.'. PRINTS A BID IN PLAC
E ON SCREEN IN BID DISPLAY. USES ROUND,H
D,DI$; RETURNS PC,LB.SZ.'RW . ROUND . 9:
COL . (HD . 1) . 4 . 16: . 828 H, COL: .
828 V, RW: . DI$;:..Z.'. BS%(ROUND,HD)
. 36 . PC . PC . 1: . 10150..Z.'PC . 0..
Z.'. HD . DL . ROUND . 1 . PC . 0..Z.'.
BS%(ROUND,HD) . 36 . LB . BS%(ROUND,HD).
.Z.'.. [D'. DELAY RANDOMLY BETWEEN MI
AND MA LOOPS USES MI,MA.P[N'NO . MI .
. ( . (0) . (MA . MI)): . LOOP . 1 . NO:
ANS$ . INKEY$: . LOOP: ...[X'. GET NE
XT BID FROM SOUTH USES LB,ROUND; RETURN
S DI$.Q[.'. 828 H, 1: . 828 V, 15: . BL$
;.D\.'LG$."N":.828H,1:.828V,15:.BL$;:.82
8H,12:."WHAT IS YOUR BID? ";:NN . 3: . 3
0000:BID$ . SR$: . BID$ . "" . 10210..\.
'. LOOP . 1 . 38: . H (BID$, C (BID$(LO
OP))) . BID$(LOOP) . LG$ . "Y":CB . LOOP
..\.'.LOOP:.LG$.."N".10240..].'.828H,1:.
828V,16:.BL$;:.828H,13:.828V,16:.BELL$;"
ILLEGAL BID- ";BID$;:.19000.<].'.828H,1:
.828V,14:.BL$;:.828H,1:.828V,16:.BL$;:.1
0220.F].(.828H,1:.828V,16:.BL$:. CB..LB.
10250..].(.828H,6:.828V,16:.BELL$;"THAT
IS AN INSUFFICIENT BID";:. 19000..].(.8
28H,1:.828V,14:.BL$;:.828H,1:.828V,16:.B
L$;:.10220..^.(. CB . BS%(ROUND,1) . DI$
. BID$(CB): . 10260.D^.(. 828 H, 1: . 8
28 V, 16: . BELL$;"THAT IS INCORRECT. ";
: . BID$(BS%(ROUND,1));" WOULD BE CORREC
T":DI$ . BID$(BS%(ROUND,1)): . 19000: .
828 H, 1: . 828 V, 15: . BL$: . BL$;.J^.
(..._.(. CLEAR ALL EXTRANEOUS WRITING FR
OM SCREEN SET UP TRICK COUNTER DISPLAY.
J_((. I . 1 . 16: . 828 H, 1: . 828 V, I
: . BL$;: . I:OT . 0:TT . 0:FC$ . BID$(L
B).._2(TN . 6 . . (LB . 5 . .99): . NH%
(1) . 1 . NH%(1) . 3 . TN . 14 . TN.._<(
...`F(LC . 13: . I . 1 . 13: . NH%(I) .
64 . NH%(I) . NH%(I) . 64:LC . I:I . 13.
7`P(. I:DE . NH%(1) . 1: . DE . 1 . DE .
DE . 4.U`R(DD . 0: . DE . 2 . DE . 4 .
DD . 1: . ARE THEY DECLARER?..`U(HB . 1
. 27 . DD: . 828 H, HB: . 828 V,10: . "
CONTRACT: "FC$;.)AZ(DU . DE . 2: . DU .
4 . DU . DU . 4: . THIS ROUTINE FALLS TH
ROUGH TO THE TRICK DISPLAY AND RETURNS F
ROM THERE.5A_(. 10800.MAD(. PRINT TRIC
K COUNTER DI$ USES TN,OT,THEIRTRICKS. A
I(A.OT:.10372:OT$.A$:NE.TN.OT:A.NE:.1037
2:NE$.A$.7BN(. 828 H, 1: . 828 V, 11: .
"OUR TRICKS:";OT$;:. 828 H, 28: . "THEIR
S: ";TT: . 828 H, 1: . 828 V, 16: . "
WE NEED: ";:NE . TN . OT: . 828 H, 10.
NBP(. NE . 1 . . "0";.EBR(. NE . 0 . .
NE$;..BT(.NE.1..828H,28:."
";:.10370.SBX(.828H,28:."THEY NEED: ";
G(157);:.828H,38:.14.TN.TT.1.." 0";..B}(
. 14 . TN . TT;..B.(...C.(A$.D(A):A$.I(A
$,C(A$).1):..ZC.(. GET PLAYER TO SEL
ECT CARD FROM N/S HAND USES I,ROUND,HN;
RETURNS CN..C.(IX . 1:RW . 24:V. 19: . H
N . 3 . IX . 0:RW . 9:V . 4.AC.(ANS$ . R
I$:VP$ . "N":EC . 0:CP . 1:OH . 0..C.(.
VP$ . . "N" . 10560..C (. PS%(HN,CP,0)
. 0 . 10440.AD.(SN . . (HN%(HN,CP) . 13
. .99):CARD . HN%(HN,CP) . 13 . (SN . 1
).MD.(. 10565.XD.(.198,0.TD.(. ANS$:. AN
S$."". 10432.JDF(. 198,0: . ANS$ . .G(1
33). ANS$ . . LE$ . ANS$ . . RI$ . ANS
$ . . CR$ . 10430..DG(. ANS$ .G(133)...
.EH(. ANS$ . LE$ . CP . CP . 1: . CP . 1
. CP . 13.EER(. ANS$ . RI$ . CP . CP .
1: . CP . 13 . CP . 1.AE.(. ANS$ . . CR
$ . 10395..E.(. 828 V, 25: . 828 H, 1: .
BL$;:. 828H,1..F.(PLAYCARD . HN%(HN,CP):
. PLAYCARD . . PS%(HN,ROUND,1) . PLAYC
ARD . . PS%(HN,ROUND,2) . ROUND . LC .
VP$ . "Y":CN . CP: . 10550.3F.(BC$ . "N"
: . SN . SI . 10470.MF.(.LO.1.13:SU..(HN
%(HN,LOOP).13..99):.SU.SI.PS%(HN,LO,0).0
..(RO.1.HN.NH%(1))..828H,1:.828V,25:.BL$
;:.828H,9:.BE$;"YOU MUST FOLLOW SUIT!";:
LO.19:BC$."Y"..F.(. LOOP: . BC$ . "Y" .
10430..G.(. ROUND . . LC . 10520..G.(EC
. EC . 1..G.(TE.TE.1:.PS%(HN.1,RO,2).0.
EC.1..828H,1:.828V,25: .BL$;: . 828 H, 9
: . 828 V, 25: . BELL$;"WRONG PLAY... TR
Y AGAIN";:TE . TE . 2: . 10430.<H.(. LOO
P . 13 . 1 . . 1: . HN%(HN,LOOP) . . P
S%(HN,ROUND,1) . HN%(HN,LOOP) . . PS%(H
N,ROUND,2) . PS%(HN,LOOP,0) . 0 . CN . L
OOP:LOOP . 1:CP . CN..H.). LOOP:SN . .
(HN%(HD,CN) . 13 . .99): . PS%(HN . 1,RO
UND,2) . 0 . . 10565: . 12000..H.). 200
00: . BELL$;"THERE IS A SUPERIOR PLAY. H
IT 'RETURN'"; : . 19000: . 20000: . 1056
5: . 10550..I.)CN . CP..I6)VP$ . "Y": .
18000.#I@).._IE).OH..828H,OH:.828V,RW.3:
.CG.3,1:.CG.5,128:." ";:.CG.5,0..IG)H.H%
(IX,CP):.828H,H:.828V,RW.3:.CG.4,6:.CG.5
,128:."^";G(4);:OH.H..IH).CG.4,BK:.CG.5,
0:...IJ). PLAY AN E/W CARD USES HN,RO
UND,LC,RETURNS CN..JO). DU . 2 . HN . 2
. . 26000.\JT). LC . ROUND . (LC . 13 .
ROUND . 13) . CN . PS%(HN,ROUND,1): . 1
0630..J^)CN . 0: . LOOP . 13 . 1 . . 1:
. PS%(HN,LOOP,0) . 0 . SI . . (HN%(HN,
LOOP) . 13 . .99) . CN . HN%(HN,LOOP): .
I . 3 . LOOP . 1..JH). LOOP: . CN . 0 .
10630..KR). CN . . 0 . 10630.[KU)TC .
. ( . (0) . 13 . 1): . PS%(HN,TC,0) . 0
. CN . TC: . 10645.GK|). 10613..K.). LO
OP . 1 . 13: . HN%(HN,LOOP) . CN . CN .
LOOP:LOOP . 13..K.). LOOP.UK.)SN . . (H
N%(HN,CN) . 13 . .99)..K.). DU . 2 . HN
. 2 . . 18000..K.)..ZL.). PLAY A CARD
INTO THIS TRICK USES CN,HN;CHANGES PLA
YSEQ% RETURNS CARDPLAY%,SUITPLAY%.WL.).
HN . 1 . H . 19:V . 12..L.). HN . 3 . H
. 20:V . 10..LB). HN . 2 . H . 15:V . 1
1.NLL). HN . 4 . H . 24:V . 11..LQ). BB.
8,15.$MV)SN..(HN%(HN,CN).13..99):CARD.HN
%(HN,CN).13.(SN.1):GK.5:.16000:GK.BK.1M.
). BB.8,0.OM.)SP%(HN) . SN:CP%(HN) . HN%
(HN,CN):PS%(HN,CN,0) . ROUND: ...M.).
CHECK TO SEE WHO WON TRICK; USES CARDPL
AY%,SUITPLAY%;RETURNS WI.DM.)WC . 53..N.
). LOOP . 1 . 4: . SP%(LOOP) . SI . CP%(
LOOP) . WC . WI . LOOP:WC . CP%(LOOP): .
10770.~N.*. SP%(LOOP) . . SI . SU$(SP%
(LOOP)) . I (FC$,1) . SI . SP%(LOOP):WI
. LOOP:WC . CP%(LOOP)..N.*. LOOP: ...N.
*. WAIT UNTIL READY FOR NEXT TRICK TH
EN CLEAR DI$ OF CARDS TO THIS TRICK..N&*
. 19000..N0*.BB.6,21:.BB.7,0.4O2*. BB.4,
68:.BB.5,131:.BB,13 . 8:.BB.1,0:.BB.2,27
.8.2.]O5*. BB.3,0:.BB.3:.BB.7,1:.BB.6,16
.BK:...O:*. PRINT A ? IN BID DI$ USES
DI$,ROUND,HD.KOD*. 828 H, (HD . 1) . 4
. 16: . 828 V, ROUND . 9: . DI$;: ...O +
V . 17:H . . 3..O*+. I . 1 . 4:H . H .
3..P4+. DS%(I) . 1 . 11090.'P>+. J . 1 .
DS%(I).6PH+. 16000: ..>PR+. I.GP\+V . 5
:OFF . 90:R0FF . 97: H.COL... 7..PF+. A
,K,Q,J,10,9,8,7,6,5,4,3,2..PP+. NOTRUMP
,SPADES,HEARTS,DIAMONDS,CLUBS.FPZ+. I .
1 . 13.SP.+. CD$(I)..P.+. I..P.+. I . 1
. 16..P.+. DTBL$(I)..Q.+. I..Q.+. I . 0
. 4..Q.+. M$(I).9QJ+SU$(I) . H (M$(I),1
).NQ.+. I:SU$(0) . "N".RQ.+. . R(X) .
. ( . (0) . X) . 1.XQ.+...Q... CRITIC
AL PLAY MESSAGE DI$ USES FILE "CRIT" TO
GET MESSAGE..Q... 20000: . 15,8,15:.8,8
,8,"@:CRIT":.CG.8,8..R...15,"P"G(8)G(PS%
(HN.1,RO,2))G(0)G(0):.8,M$.CR.. 8: 15:.
G(19);:.M$;:TE.TE.4:.CG.8,0.`R... 19000:
. 20000:. 10550.JR./V . 0..R./. I . 1 .
4:H . I . 1:V . V . 3..R./. DS%(I) . 1
. 12090..R./. J . 1 . DS%(I).HR+/. 16000
.PR0/. J..R:/. PRINT..RD/. I..RN/...SH2
.G(147);: . 828 H, HZ: . 828 V, VZ: . 14
000: ../S.6. UNDERLINE.ES.6HS .B(211):
. P$;.USX6H1 . HS . 8:H2 .B(211) . 8:V1
. 8.B(214).10..S.6. V1 . 191 . ...S.6.
BB.6,32.BK:.BB.7,1..S.6B8..(H1.256):B7.H
1.B8.256:Q8..(H2.256):Q7.H2.Q8.256:.BB.3
,Q8..T.6.BB.4,V1:.BB.5,V1:.BB,B7:.BB.1,B
8:.BB.2,Q7:.BB.3:..BT.>. USES H, SN, C
ARD. DRAWS A CARD..LT.>H9.33.GT.>. ENTRY
WITH H9 PRESET.T.?.BB.6,16.GK:.BB.7,1.
.T.?BA.BB:RK.CARD:I1.I:I.SN..TH?.44,8:.1
20:I.I1:...T\?B9.H.8.13:Q9.B9.H9:B8..(B9
.256):B7.B9.B8.256:Q8..(Q9.256):Q7.Q9.Q8
.256.3UF?.BB.4,V.8.11:.BB.5,V.8.33:.BB,B
7:.BB.1,B8:.BB.2,Q7.TUK?.BB.3,Q8:.BB.3:.
BB.6,16.BK:..{U.?. 828 H, 21 . C (P$) .
2: . P$: ...U.?. 828 H, 21 . C (P$) .
2: . P$;: ..XU.@. 828 V, 25:P$ . "TYPE '
?' FOR HELP": . 15100: ..'VHBH . 0:OSN .
1: . CN . 1 . 13: . 10000:H . H . 2: .
SN . . OSN . H . H . 3.4VMB.BB.8,15.AVR
BOSN . SN:H%(IX,CN) . H: . 16000: . CN:
...VLBH . 0:OSN . 1: . CN . 1 . LC . 1:
. PS%(HN,CN,0) . . 0 . 17130..VQB.BB.8,
15..VVB. 10000:H . H . 2: . SN . . OSN
. H . H . 3..W.BOSN . SN:H%(IX,CN) . H:
. 16000..W.B. CN: ..%WPF. UNDRAW N/S.FW
UF. HN . 2 . H . H%(IX,CN):V.4.ZWVF. F5.
HN.2.18010..WXF.OH..828H,OH:.828V,RW.3:.
CG.4,BK:.CG.3,1:.CG.5,128..WYF.OH.." ";:
.CG.5,0.NWZFH9 . 33:H5 . 38: . CN . 13 .
18080..WDF. A . CN . 1 . 13..XNF. H%(IX
,A) . H . 4 . 18080.!XXF. PS%(HN,A,0) .
0 . 18060.PX.FH9 . (H%(IX,A).H).8:H5 . H
%(IX,A): . 18080.XX.F. A..X F.BB.6,16.BK
:.BB.7,0: .BB.8,13:. 16220..X.FH9 . 33:
. CN . 1 . ...X.F. A . CN . 1 . 1 . .
1..XHF. H%(IX,A) . H%(IX,CN) . 4 . ...X
RF. PS%(HN,A,0) . 0 . 18150..YWF. H5 . H
%(IX,A) . 4 . 18160.AY.FH9 . (H5 . H%(IX
,A)) . 8: . 18160.LY.F. A: ..DY.FCP . CN
: . SAVE CN..Y.FCN . A:H . H%(IX,A): .
10000: . 16100:CN . CP: ...Y8J.198,0:.82
8H,1:.828V,25:.BL$;:.828H,8:."HIT 'RETUR
N' TO CONTINUE";..Y9J.ANS$:.ANS$."".1900
1.,Z:J.828H,1:.828V,25:.BL$;:.828H,1:. A
NS$.G(13). ..@Z;J. ANS$.G(133)...KZ=J.19
000.LZ N. G(19);BL$BL$;" ";G(19);:...Z.
AV . 12: . WI . 2 . WI . 4 . 25500.NZ.A.
(OT . 6 . DD . 0) . (NE . 1 . DD) . .
25400: . 25030..Z.AH . 1 . OT: . OB . 0
. H . 3 . OT . OB..{FA. 25900..{PA..5{8C
.BB.7,0:H . 2:V . 12: . 25700:OB . OT.L{
BC.BB.7,1:.BB.6,16:H . 1.8:V .12.2:.2590
5:H.2:V.12:...{.C. (TT . 6 . DD) . (TN .
TT . 13 . DD . 0) . . 25800: . 25530..
{.CH . 36 . TT: . TB . 0 . H . 34 . TT .
TB..{.C. 25900..{DC...|DDH9 . 78:.BB.6,
16.BK.K| DB9 . H . 8 . 9:Q9 . B9 . H9:B8
. . (B9 . 256):B7 . B9 . B8 . 256.R|.D
Q8.. (Q9 . 256):Q7 . Q9 . Q8 . 256..|.D.
BB.4,V.8.9:.BB.5,V.8.17:.BB,B7:.BB.1,B8:
.BB.2,Q7..|.D. BB.3,Q8:.BB.3.B|.D...|HD.
BB.7,0:H.31:V.12:.25700:TB.TT..}MD.BB.7,
1:.BB.6,16:H . 35.4:V .12.2:. 25905.(}RD
H . 35:V . 12: ..@},E. 25905: . 25940: .
.F}1E..C}6E.BB.6,16:.BB.7,1:H9 . 43.O}@E
B9 . H . 8 .10:Q9 . B9 . H9:B8 . . (B9
. 256):B7 . B9 . B8 . 256:Q8 . . (Q9 .
256):Q7 . Q9 . Q8 . 256..~JE.BB.4,V . 8
. 9:.BB.5,V . 8 . 17:.BB,B7:.BB.1,B8:.BB
.2,Q7:.BB.3,Q8:.BB.3."~OE..P~TE.828H,H:.
828V,V:.CG.5,128:.V1.V.V.2:.H1.H.H.4:."Z
";:.:.:.828H,H:.:.CG.5,0.V~^E...~.E. 200
00: . "WEST IS DUMMY":IX . 0:RW . 8:V .
3: ..M~0UN1 . 1:SR$ . "":Q . 0:.198,0..~
:U.N1.NN..40000: . 30030.#DU.40000:.A$.
." ".A$.."Z"..A$;:SR$.SR$.A$:N1.N1.1:.30
010.6NU. A$ .G(133)...VXU.A$.G(20).N1.
1..40100:SR$.J(SR$,1,C (SR$).1):N1.N1.1:
.30020..BU. A$ . .G(13) . 30010..LU."
";:.N1..NN...NN.N1.1);.HVU. T$;: .B(21
4). 25...N.U...@..".";G(157);..J.. A$
:.A$."". 40010..T...#...." ";G(157);G(1
57);:.".";G(157);:..@.H..15,8,15:.15,A$,
B$,C$,D$.V.R.. A$,B$,C$,D$: 15.\.H...W.P
C.15,8,15,"S:HELLO": 15.}. K....XVBB.501
79:.51200:.G(147);:.BB.3:.I.1.1000:..W..
V. BB.2,B(BB.2).2:.BB.7,0:.BB.3:.BB.7,1.
...
> CLICK IMAGE PREVIEW FOR FULL MODAL