> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 01 00 8F 53 41 56 45 22 43 41 52 44 |.......SAVE"CARD|
00000010: 53 2E 56 35 2E 32 22 2C 38 00 22 08 02 00 89 34 |S.V5.2",8."....4|
00000020: 30 30 00 28 08 3F 00 3A 00 4A 08 40 00 8F 3D 3D |00.(.?.:.J.@..==|
00000030: 3D 3D 3D 3D 3D 50 52 49 4E 54 20 41 54 3D 3D 3D |=====PRINT AT===|
00000040: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 50 08 41 00 3A |==========.P.A.:|
00000050: 00 7D 08 42 00 97 37 38 33 2C C2 28 37 38 33 29 |.}.B..783,.(783)|
00000060: AF 32 35 34 3A 97 37 38 32 2C 58 3A 97 37 38 31 |.254:.782,X:.781|
00000070: 2C 59 3A 9E 36 35 35 32 30 3A 99 57 24 00 91 08 |,Y:.65520:.W$...|
00000080: 44 00 97 37 38 33 2C C2 28 37 38 33 29 B0 31 3A |D..783,.(783).1:|
00000090: 8E 00 AF 08 6B 00 8F 20 3D 3D 3D 3D 3D 44 49 4D |....k.. =====DIM|
000000A0: 20 46 4F 52 20 44 45 41 4C 3D 3D 3D 3D 3D 3D 00 | FOR DEAL======.|
000000B0: B5 08 6D 00 3A 00 EF 08 6F 00 4E 43 B2 35 32 3A |..m.:...o.NC.52:|
000000C0: 86 53 28 4E 43 AB 31 29 2C 44 24 28 35 31 29 2C |.S(NC.1),D$(51),|
000000D0: 56 41 24 28 31 33 29 3A 81 49 B2 30 A4 33 3A 87 |VA$(13):.I.0.3:.|
000000E0: 53 24 28 49 29 3A 87 43 4F 24 28 49 29 3A 82 00 |S$(I):.CO$(I):..|
000000F0: 05 09 71 00 81 49 B2 30 A4 31 32 3A 87 56 41 24 |..q..I.0.12:.VA$|
00000100: 28 49 29 3A 82 00 45 09 73 00 83 22 D8 22 2C 22 |(I):..E.s..".","|
00000110: 90 22 2C 22 DA 22 2C 22 1C 22 2C 22 D3 22 2C 22 |.",".",".",".","|
00000120: 1C 22 2C 22 C1 22 2C 22 90 22 2C 41 2C 32 2C 33 |.",".",".",A,2,3|
00000130: 2C 34 2C 35 2C 36 2C 37 2C 38 2C 39 2C 31 30 2C |,4,5,6,7,8,9,10,|
00000140: 4A 2C 51 2C 4B 00 8B 09 77 00 43 24 B2 22 1C B0 |J,Q,K...w.C$."..|
00000150: C0 C0 C0 C0 C0 C0 AE 11 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000160: DD 20 20 20 20 20 20 DD 11 9D 9D 9D 9D 9D 9D 9D |. .........|
00000170: 9D DD 20 20 20 20 20 20 DD 11 9D 9D 9D 9D 9D 9D |.. ........|
00000180: 9D 9D DD 20 20 20 20 20 20 DD 22 00 D0 09 79 00 |... ."...y.|
00000190: 43 24 B2 43 24 AA 20 20 20 20 20 22 11 9D 9D 9D |C$.C$. "....|
000001A0: 9D 9D 9D 9D 9D DD 20 20 20 20 20 20 DD 11 9D 9D |...... ....|
000001B0: 9D 9D 9D 9D 9D 9D DD 20 20 20 20 20 20 DD 11 9D |....... ...|
000001C0: 9D 9D 9D 9D 9D 9D 9D DD 20 20 20 20 20 20 DD 22 |........ ."|
000001D0: 00 EE 09 7B 00 43 24 B2 43 24 AA 22 11 9D 9D 9D |...{.C$.C$."....|
000001E0: 9D 9D 9D 9D 9D AD C0 C0 C0 C0 C0 C0 BD 22 00 F4 |............."..|
000001F0: 09 7C 00 3A 00 18 0A 7D 00 8F 3D 3D 3D 3D 3D 3D |.|.:...}..======|
00000200: 3D 3D 3D 3D 3D 3D 53 48 55 46 46 4C 45 3D 3D 3D |======SHUFFLE===|
00000210: 3D 3D 3D 3D 3D 3D 3D 3D 00 1E 0A 7E 00 3A 00 54 |========...~.:.T|
00000220: 0A 7F 00 81 4A B2 30 A4 4E 43 AB 31 3A 53 28 4A |....J.0.NC.1:S(J|
00000230: 29 B2 4A 3A 82 3A 81 4A B2 30 A4 4E 43 AB 32 3A |).J:.:.J.0.NC.2:|
00000240: 4A 25 B2 4A AA B5 28 BB 28 30 29 AC 28 4E 43 AB |J%.J..(.(0).(NC.|
00000250: 4A 29 29 3A 00 7C 0A 80 00 54 45 4D 50 B2 53 28 |J)):.|...TEMP.S(|
00000260: 4A 29 3A 53 28 4A 29 B2 53 28 4A 25 29 3A 53 28 |J):S(J).S(J%):S(|
00000270: 4A 25 29 B2 54 45 4D 50 3A 82 3A 8E 00 82 0A 81 |J%).TEMP:.:.....|
00000280: 00 3A 00 A7 0A 82 00 8F 20 3D 3D 3D 3D 3D 3D 53 |.:...... ======S|
00000290: 55 49 54 53 2C 56 41 4C 55 45 53 2C 47 52 41 50 |UITS,VALUES,GRAP|
000002A0: 48 49 43 53 3D 3D 3D 00 AD 0A 83 00 3A 00 EF 0A |HICS===.....:...|
000002B0: 85 00 81 49 B2 30 A4 35 31 3A 53 55 B2 28 B5 28 |...I.0.51:SU.(.(|
000002C0: 53 28 49 29 AD 31 33 29 29 3A 20 20 44 45 24 B2 |S(I).13)): DE$.|
000002D0: 43 4F 24 28 53 55 29 AA 56 41 24 28 53 28 49 29 |CO$(SU).VA$(S(I)|
000002E0: AB 31 33 AC B5 28 53 28 49 29 AD 31 33 29 29 00 |.13..(S(I).13)).|
000002F0: 23 0B 87 00 44 46 24 B2 44 45 24 AA 53 24 28 53 |#...DF$.DE$.S$(S|
00000300: 55 29 3A 44 24 28 49 29 B2 43 24 AA 22 91 91 91 |U):D$(I).C$."...|
00000310: 91 91 91 9D 9D 9D 9D 9D 9D 9D 22 AA 44 46 24 3A |..........".DF$:|
00000320: 82 3A 8E 00 29 0B B3 00 3A 00 4E 0B 8E 01 8F 3D |.:..)...:.N....=|
00000330: 3D 3D 3D 3D 3D 3D 3D 53 54 41 52 54 20 4F 46 20 |=======START OF |
00000340: 50 52 4F 47 52 41 4D 3D 3D 3D 3D 3D 3D 3D 00 54 |PROGRAM=======.T|
00000350: 0B 8F 01 3A 00 77 0B 90 01 97 35 33 32 38 30 2C |...:.w....53280,|
00000360: 31 3A 97 35 33 32 38 31 2C 31 3A 99 C7 28 38 29 |1:.53281,1:..(8)|
00000370: 3B C7 28 31 34 32 29 00 B0 0B 92 01 99 22 93 11 |;.(142)......"..|
00000380: 11 11 11 11 11 11 11 90 D8 D8 D8 D8 D8 D8 D8 D8 |................|
00000390: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 |................|
000003A0: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 22 |..............."|
000003B0: 00 EF 0B 93 01 99 22 1C D3 D3 D3 D3 D3 D3 D3 D3 |......".........|
000003C0: D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |................|
000003D0: D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 22 |..............."|
000003E0: 3A 99 22 11 11 22 3A 99 22 1D 1D 1D 1D 22 3B 00 |:."..":."....";.|
000003F0: 16 0C 94 01 99 20 22 54 48 45 20 57 49 4E 4E 45 |..... "THE WINNE|
00000400: 52 53 20 57 45 52 45 20 54 45 4C 4C 49 4E 47 20 |RS WERE TELLING |
00000410: 4A 4F 4B 45 53 22 00 48 0C 96 01 99 22 11 11 11 |JOKES".H...."...|
00000420: DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA |................|
00000430: DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA |................|
00000440: DA DA DA DA DA DA DA 22 00 78 0C 97 01 99 22 90 |.......".x....".|
00000450: C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 |................|
00000460: C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 |................|
00000470: C1 C1 C1 C1 C1 C1 C1 22 00 81 0C 98 01 8D 31 31 |......."......11|
00000480: 31 00 BA 0C 9C 01 99 22 93 11 11 11 11 11 11 11 |1......"........|
00000490: 11 90 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 |................|
000004A0: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 |................|
000004B0: D8 D8 D8 D8 D8 D8 D8 D8 D8 22 00 F9 0C 9D 01 99 |........."......|
000004C0: 22 1C D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |"...............|
000004D0: D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |................|
000004E0: D3 D3 D3 D3 D3 D3 D3 D3 D3 22 3A 99 22 11 11 22 |.........":.".."|
000004F0: 3A 99 22 1D 1D 1D 1D 22 3B 00 20 0D 9E 01 99 20 |:."....";. .... |
00000500: 22 41 4E 44 20 54 48 45 20 4C 4F 53 45 52 53 20 |"AND THE LOSERS |
00000510: 57 45 52 45 20 48 4F 4C 4C 45 52 49 4E 27 20 22 |WERE HOLLERIN' "|
00000520: 00 52 0D A0 01 99 22 11 11 11 DA DA DA DA DA DA |.R....".........|
00000530: DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA |................|
00000540: DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA DA |................|
00000550: DA 22 00 82 0D A1 01 99 22 90 C1 C1 C1 C1 C1 C1 |."......".......|
00000560: C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 |................|
00000570: C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 C1 |................|
00000580: C1 22 00 8B 0D A2 01 8D 31 32 37 00 9C 0D A4 01 |."......127.....|
00000590: 99 22 93 11 11 11 11 11 11 11 11 22 00 C4 0D A6 |."........."....|
000005A0: 01 99 22 20 20 20 20 20 20 20 20 20 12 20 20 20 |.." . |
000005B0: DF 1D 20 20 20 20 1D A9 20 20 DF 1D 20 1D 1D 1D |.. .. .. ...|
000005C0: 1D 1D 20 22 00 EE 0D A8 01 99 20 20 22 20 20 20 |.. "...... " |
000005D0: 20 20 20 20 20 20 12 20 1D 1D 20 1D 20 1D 1D 1D | . .. . ...|
000005E0: 1D 20 1D 1D 20 1D 20 1D 1D 1D 1D 1D 20 22 00 18 |. .. . ..... "..|
000005F0: 0E AA 01 99 20 20 22 20 20 20 20 20 20 20 20 20 |.... " |
00000600: 12 20 1D 1D 20 1D 20 20 20 1D 1D 20 20 20 20 1D |. .. . .. .|
00000610: 20 1D 1D 1D 1D 1D 20 22 00 3E 0E AC 01 99 20 20 | ..... ".>.... |
00000620: 22 20 20 20 20 20 20 20 20 20 12 20 1D 1D 20 1D |" . .. .|
00000630: 20 1D 1D 1D 1D 20 1D 1D 20 1D 20 1D 1D 22 00 6B | .... .. . ..".k|
00000640: 0E AE 01 99 20 20 22 20 20 20 20 20 20 20 20 20 |.... " |
00000650: 12 20 20 20 92 A9 12 1D 20 20 20 20 1D 20 1D 1D |. .... . ..|
00000660: 20 1D 20 20 20 20 1D 1D 92 D1 22 00 74 0E BE 01 | . ....".t...|
00000670: 8D 31 33 33 00 86 0E C1 01 59 B2 30 3A 58 33 B2 |.133.....Y.0:X3.|
00000680: 30 3A 58 B2 58 33 00 B3 0E C2 01 4B 31 B2 30 3A |0:X.X3.....K1.0:|
00000690: 81 4A B2 31 A4 37 3A 81 49 B2 31 A4 38 3A 57 24 |.J.1.7:.I.1.8:W$|
000006A0: B2 44 24 28 4B 31 29 3A 8D 36 36 3A 4B 31 B2 4B |.D$(K1):.66:K1.K|
000006B0: 31 AA 31 00 BD 0E C4 01 58 B2 58 AA 34 00 CC 0E |1.1.....X.X.4...|
000006C0: C6 01 8B 4B 31 B2 35 32 A7 34 37 34 00 D9 0E C8 |...K1.52.474....|
000006D0: 01 3A 82 3A 59 B2 59 AA 32 00 ED 0E CA 01 8B B5 |.:.:Y.Y.2.......|
000006E0: 28 4A AD 32 29 B2 4A AD 32 A7 34 36 30 00 F7 0E |(J.2).J.2.460...|
000006F0: CB 01 58 B2 32 3A 82 00 01 0F CC 01 58 B2 30 3A |..X.2:......X.0:|
00000700: 82 00 0A 0F DA 01 8D 31 32 37 00 4D 0F DE 01 58 |.......127.M...X|
00000710: B2 31 36 3A 59 B2 32 30 3A 57 24 B2 22 12 20 20 |.16:Y.20:W$.". |
00000720: 20 20 20 20 20 20 11 9D 9D 9D 9D 9D 9D 9D 9D 20 | ......... |
00000730: 41 47 41 49 4E 3F 20 11 9D 9D 9D 9D 9D 9D 9D 9D |AGAIN? .........|
00000740: 20 28 59 2F 4E 29 20 20 22 3A 8D 36 36 00 61 0F | (Y/N) ":.66.a.|
00000750: E0 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 20 34 38 |...A$:.A$."". 48|
00000760: 30 00 73 0F E2 01 8B 41 24 B2 22 4E 22 A7 36 30 |0.s....A$."N".60|
00000770: 30 30 30 00 7C 0F E4 01 89 34 32 30 00 82 0F F4 |000.|....420....|
00000780: 01 80 00 BB 0F 60 EA 9F 31 35 2C 38 2C 31 35 2C |.....`..15,8,15,|
00000790: 22 52 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 |"R0:HELLO CONNEC|
000007A0: 54 3D 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 |T=HELLO CONNECT"|
000007B0: 3A 84 31 35 2C 45 52 3A A0 31 35 00 D1 0F 6A EA |:.15,ER:.15...j.|
000007C0: 8B 20 45 52 B3 B1 36 33 20 A7 20 99 22 93 22 3A |. ER..63 . .".":|
000007D0: 80 00 F1 0F 74 EA 41 24 B2 22 48 45 4C 4C 4F 20 |....t.A$."HELLO |
000007E0: 43 4F 4E 4E 45 43 54 22 3A 51 24 B2 C7 28 33 34 |CONNECT":Q$..(34|
000007F0: 29 00 0C 10 7E EA 99 22 05 93 11 11 11 4C 4F 41 |)...~..".....LOA|
00000800: 44 22 51 24 41 24 51 24 22 2C 38 22 00 35 10 88 |D"Q$A$Q$",8".5..|
00000810: EA 99 22 11 11 11 11 52 55 4E 13 22 3A 97 36 33 |.."....RUN.":.63|
00000820: 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 31 39 |1,13:.632,13:.19|
00000830: 38 2C 32 3A 80 00 00 00 |8,2:.... |
.......SAVE"CARDS.V5.2",8."....400.(.?.:
.J.@..=======PRINT AT=============.P.A.:
.}.B..783,B(783).254:.782,X:.781,Y:.6552
0:.W$...D..783,B(783).1:....K.. =====DIM
FOR DEAL======...M.:...O.NC.52:.S(NC.1)
,D$(51),VA$(13):.I.0.3:.S$(I):.CO$(I):..
..Q..I.0.12:.VA$(I):..E.S.."X",".","Z","
.","S",".","A",".",A,2,3,4,5,6,7,8,9,10,
J,Q,K...W.C$."................... .
.......... ........... .".P.Y.
C$.C$. ".......... ...........
........... ."...{.C$.C$."....
............."...|.:...}..============SH
UFFLE===========...~.:.T...J.0.NC.1:S(J
).J:.:.J.0.NC.2:J%.J..(.(0).(NC.J)):.|..
.TEMP.S(J):S(J).S(J%):S(J%).TEMP:.:.....
.:...... ======SUITS,VALUES,GRAPHICS===.
....:......I.0.51:SU.(.(S(I).13)): DE$.
CO$(SU).VA$(S(I).13..(S(I).13)).#...DF$.
DE$.S$(SU):D$(I).C$.".............".DF$:
.:..)...:.N....========START OF PROGRAM=
======.T...:.W....53280,1:.53281,1:.G(8)
;G(142)......"..........XXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXX"......".SSSSSSSS
SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS":."..":.
"....";...... "THE WINNERS WERE TELLING
JOKES".H...."...ZZZZZZZZZZZZZZZZZZZZZZZZ
ZZZZZZZZZZZZZZZ".X....".AAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAA"......111......"
..........XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXX"......".SSSSSSSSSSSSSSSSSSSSSS
SSSSSSSSSSSSSSSSS":."..":."....";. ....
"AND THE LOSERS WERE HOLLERIN' ".R. ..".
..ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ
Z"......".AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAA"......127......".........".D..
.." . .. .. .. ..... "....
.. " . .. . .... .. . ..... "..
.... " . .. . .. . ..... "
.>.... " . .. . .... .. . ..".K
.... " . .... . .. . ..
.Q".T....133...A.Y.0:X3.0:X.X3...B.K1.0:
.J.1.7:.I.1.8:W$.D$(K1):.66:K1.K1.1...D.
X.X.4.L.F..K1.52.474.Y.H.:.:Y.Y.2...J...
(J.2).J.2.460...K.X.2:....L.X.0:....Z..1
27.M...X.16:Y.20:W$.". .........
AGAIN? ......... (Y/N) ":.66.A....A$:.A
$."". 480.S....A$."N".60000.|....420....
.....`..15,8,15,"R0:HELLO CONNECT=HELLO
CONNECT":.15,ER: 15.Q.J.. ER..63 . .".":
....T.A$."HELLO CONNECT":Q$.G(34)...~.."
.....LOAD"Q$A$Q$",8".5...."....RUN.":.63
1,13:.632,13:.198,2:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL