DICE PIG
FILE INFORMATION
FILENAME(S): DICE PIG
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 01:08:03
APPEARS ON: 2 disk(s)
FILE HASH
a3b5c36a9f9a55aca77f488db0c3406a6b2677de56e2d6ff40366f11fda86f71
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | DICE PIG | PRG | Treasure Chest - Wolfgang Rauprich | 1 | 2 | DOWNLOAD FILE |
| S PIELE | DICE PIG | PRG | Treasure Chest - Wolfgang Rauprich | 1 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 01 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..)....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2F 08 02 00 8F 00 |*********./.....|
00000030: 56 08 03 00 8F 20 50 49 47 2E 2E 2E 2E 57 52 49 |V.... PIG....WRI|
00000040: 54 54 45 4E 20 42 59 20 4A 41 4D 45 53 20 43 20 |TTEN BY JAMES C |
00000050: 44 4F 57 4E 45 52 00 6F 08 04 00 8F 20 20 20 20 |DOWNER.o.... |
00000060: 20 20 20 20 20 41 50 52 49 4C 20 31 39 37 39 00 | APRIL 1979.|
00000070: 97 08 05 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....***********|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000090: 2A 2A 2A 2A 2A 2A 2A 00 A4 08 06 00 86 56 56 24 |*******......VV$|
000000A0: 28 34 35 29 00 B8 08 09 00 86 20 42 24 28 38 30 |(45)...... B$(80|
000000B0: 29 2C 41 24 28 38 30 29 00 C7 08 0A 00 99 22 93 |),A$(80)......".|
000000C0: 22 3A 99 3A 99 3A 99 00 F7 08 0F 00 43 43 24 B2 |":.:.:......CC$.|
000000D0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
000000E0: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000000F0: 1D 1D 1D 1D 1D 1D 22 00 15 09 12 00 99 22 20 20 |......"......" |
00000100: 20 20 20 20 20 20 20 20 20 20 12 50 1D 49 1D 47 | .P.I.G|
00000110: 22 3A 99 3A 99 00 39 09 14 00 99 22 57 45 4C 43 |":.:..9...."WELC|
00000120: 4F 4D 45 20 54 4F 20 54 48 45 20 44 49 43 45 20 |OME TO THE DICE |
00000130: 47 41 4D 45 20 50 49 47 22 00 65 09 1E 00 99 22 |GAME PIG".e...."|
00000140: 54 48 45 20 4F 42 4A 45 43 54 20 4F 46 20 54 48 |THE OBJECT OF TH|
00000150: 49 53 20 47 41 4D 45 20 49 53 20 54 48 45 20 46 |IS GAME IS THE F|
00000160: 49 52 53 54 22 00 80 09 28 00 99 22 54 4F 20 53 |IRST"...(.."TO S|
00000170: 43 4F 52 45 20 31 30 30 20 50 4F 49 4E 54 53 2E |CORE 100 POINTS.|
00000180: 00 99 09 29 00 51 24 B2 22 13 11 11 11 11 11 11 |...).Q$.".......|
00000190: 11 11 11 11 11 11 11 11 22 00 C1 09 2A 00 55 24 |........"...*.U$|
000001A0: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001C0: 22 00 EC 09 32 00 99 22 59 4F 55 20 43 41 4E 20 |"...2.."YOU CAN |
000001D0: 52 4F 4C 4C 20 54 48 45 20 44 49 43 45 20 41 53 |ROLL THE DICE AS|
000001E0: 20 4D 41 4E 59 20 54 49 4D 45 53 22 00 1A 0A 3C | MANY TIMES"...<|
000001F0: 00 99 22 41 53 20 59 4F 55 20 4C 49 4B 45 20 4F |.."AS YOU LIKE O|
00000200: 4E 20 59 4F 55 52 20 54 55 52 4E 20 42 55 54 20 |N YOUR TURN BUT |
00000210: 59 4F 55 20 4C 4F 53 45 22 3B 00 3A 0A 46 00 99 |YOU LOSE";.:.F..|
00000220: 22 20 41 4C 4C 20 54 48 45 20 50 4F 49 4E 54 53 |" ALL THE POINTS|
00000230: 20 46 4F 52 20 54 48 41 54 22 00 5A 0A 50 00 99 | FOR THAT".Z.P..|
00000240: 22 54 55 52 4E 20 57 48 45 4E 20 41 20 41 43 45 |"TURN WHEN A ACE|
00000250: 20 53 48 4F 57 53 20 55 50 22 00 A2 0A 51 00 99 | SHOWS UP"...Q..|
00000260: 3A 99 22 59 4F 55 20 57 49 4C 4C 20 50 52 45 53 |:."YOU WILL PRES|
00000270: 53 20 54 48 45 20 27 52 27 20 54 4F 20 43 4F 4E |S THE 'R' TO CON|
00000280: 54 49 4E 55 45 20 41 4E 44 20 20 20 41 4E 59 20 |TINUE AND ANY |
00000290: 4F 54 48 45 52 20 4B 45 59 20 54 4F 20 53 54 4F |OTHER KEY TO STO|
000002A0: 50 22 00 AC 0A 52 00 8D 37 31 30 30 00 D2 0A 53 |P"...R..7100...S|
000002B0: 00 99 3A 99 3A 99 20 22 50 52 45 53 53 20 41 4E |..:.:. "PRESS AN|
000002C0: 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |Y KEY TO CONTINU|
000002D0: 45 22 00 E6 0A 54 00 A1 53 53 24 3A 8B 53 53 24 |E"...T..SS$:.SS$|
000002E0: B2 22 22 A7 38 34 00 F0 0A 55 00 8D 35 30 30 30 |."".84...U..5000|
000002F0: 00 16 0B 56 00 43 28 31 29 B2 30 3A 43 28 30 29 |...V.C(1).0:C(0)|
00000300: B2 30 3A 43 31 B2 30 3A 43 32 B2 30 3A 43 33 B2 |.0:C1.0:C2.0:C3.|
00000310: 30 3A 43 34 B2 30 00 22 0B 64 00 8F 20 53 54 41 |0:C4.0.".d.. STA|
00000320: 52 54 00 34 0B 6E 00 43 28 31 29 B2 30 3A 43 28 |RT.4.n.C(1).0:C(|
00000330: 30 29 B2 30 00 41 0B 78 00 43 B2 31 3A 43 34 B2 |0).0.A.x.C.1:C4.|
00000340: 30 00 4B 0B 7B 00 8D 35 32 30 30 00 55 0B 7D 00 |0.K.{..5200.U.}.|
00000350: 8D 31 30 30 30 00 66 0B 82 00 8B 43 28 31 29 B1 |.1000.f....C(1).|
00000360: 39 39 A7 32 30 30 00 78 0B 8C 00 50 B2 B5 28 BB |99.200.x...P..(.|
00000370: 28 37 29 AC 36 29 AA 32 00 91 0B 8D 00 99 22 13 |(7).6).2......".|
00000380: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
00000390: 3B 00 9A 0B 8E 00 43 33 B2 30 00 D9 0B 8F 00 99 |;.....C3.0......|
000003A0: 22 43 4F 4D 50 55 54 45 52 20 57 49 4C 4C 20 52 |"COMPUTER WILL R|
000003B0: 4F 4C 4C 20 44 49 43 45 22 3B 50 3B 22 54 49 4D |OLL DICE";P;"TIM|
000003C0: 45 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ES |
000003D0: 20 20 20 20 20 20 20 20 22 00 E1 0B 91 00 43 B2 | ".....C.|
000003E0: 30 00 EA 0B 96 00 50 31 B2 30 00 F4 0B A0 00 8D |0.....P1.0......|
000003F0: 31 30 30 30 00 05 0C B4 00 8B 43 28 30 29 B1 39 |1000......C(0).9|
00000400: 39 A7 33 30 30 00 0E 0C BE 00 89 31 32 30 00 20 |9.300......120. |
00000410: 0C C8 00 8F 20 50 4C 41 59 45 52 20 57 49 4E 53 |.... PLAYER WINS|
00000420: 00 45 0C CD 00 99 51 24 3B 55 24 3B 55 53 3B 55 |.E....Q$;U$;US;U|
00000430: 24 3B 55 24 3B 55 24 3B 22 91 91 1D 1D 1D 1D 1D |$;U$;U$;".......|
00000440: 1D 1D 1D 22 3B 00 5F 0C D2 00 99 22 59 4F 55 20 |...";._...."YOU |
00000450: 57 49 4E 21 21 21 21 21 21 21 21 21 21 21 22 00 |WIN!!!!!!!!!!!".|
00000460: 6F 0C D3 00 47 28 31 29 B2 47 28 31 29 AA 31 00 |o...G(1).G(1).1.|
00000470: A8 0C D4 00 99 22 41 46 54 45 52 20 22 3B 47 28 |....."AFTER ";G(|
00000480: 31 29 AA 47 28 30 29 3B 22 20 47 41 4D 45 53 20 |1).G(0);" GAMES |
00000490: 59 4F 55 20 22 3B 47 28 31 29 22 43 4F 4D 50 55 |YOU ";G(1)"COMPU|
000004A0: 54 45 52 22 47 28 30 29 00 CE 0C DC 00 99 3A 99 |TER"G(0)......:.|
000004B0: 3A 99 20 22 44 4F 20 59 4F 55 20 57 41 4E 54 20 |:. "DO YOU WANT |
000004C0: 54 4F 20 50 4C 41 59 20 41 47 41 49 4E 22 00 E3 |TO PLAY AGAIN"..|
000004D0: 0C F0 00 A1 53 53 24 3A 8B 53 53 24 B2 22 22 A7 |....SS$:.SS$."".|
000004E0: 32 34 30 00 F3 0C F1 00 8B 53 53 24 B3 B1 22 59 |240......SS$.."Y|
000004F0: 22 A7 80 00 05 0D 04 01 43 28 31 29 B2 30 3A 43 |".......C(1).0:C|
00000500: 28 30 29 B2 30 00 0D 0D 18 01 89 38 35 00 21 0D |(0).0......85.!.|
00000510: 2C 01 8F 20 43 4F 4D 50 55 54 45 52 20 57 49 4E |,.. COMPUTER WIN|
00000520: 53 00 48 0D 31 01 99 51 24 3B 55 24 3B 55 53 3B |S.H.1..Q$;U$;US;|
00000530: 55 24 3B 55 24 3B 55 24 3B 22 91 91 91 91 1D 1D |U$;U$;U$;"......|
00000540: 1D 1D 1D 1D 1D 1D 22 3B 00 55 0D 36 01 99 22 49 |......";.U.6.."I|
00000550: 20 57 49 4E 22 00 65 0D 37 01 47 28 30 29 B2 47 | WIN".e.7.G(0).G|
00000560: 28 30 29 AA 31 00 9E 0D 38 01 99 22 41 46 54 45 |(0).1...8.."AFTE|
00000570: 52 20 22 3B 47 28 31 29 AA 47 28 30 29 3B 22 20 |R ";G(1).G(0);" |
00000580: 47 41 4D 45 53 20 59 4F 55 20 22 3B 47 28 31 29 |GAMES YOU ";G(1)|
00000590: 22 43 4F 4D 50 55 54 45 52 22 47 28 30 29 00 B0 |"COMPUTER"G(0)..|
000005A0: 0D 40 01 43 28 31 29 B2 30 3A 43 28 30 29 B2 30 |.@.C(1).0:C(0).0|
000005B0: 00 BF 0D 4A 01 99 20 3A 99 3A 99 3A 99 3A 99 00 |...J.. :.:.:.:..|
000005C0: D1 0D 4F 01 99 22 50 4C 41 59 20 41 47 41 49 4E |..O.."PLAY AGAIN|
000005D0: 22 00 E6 0D 50 01 A1 53 53 24 3A 8B 53 53 24 B2 |"...P..SS$:.SS$.|
000005E0: 22 22 A7 32 34 30 00 F6 0D 51 01 8B 53 53 24 B3 |"".240...Q..SS$.|
000005F0: B1 22 59 22 A7 80 00 FE 0D 54 01 89 38 35 00 11 |."Y".....T..85..|
00000600: 0E E8 03 8F 20 44 49 43 45 20 52 4F 55 54 49 4E |.... DICE ROUTIN|
00000610: 45 00 1D 0E ED 03 50 31 B2 50 31 AA 31 00 2F 0E |E.....P1.P1.1./.|
00000620: F2 03 58 B2 B5 28 BB 28 37 29 AC 36 29 AA 31 00 |..X..(.(7).6).1.|
00000630: 50 0E F8 03 99 43 43 24 3B 42 24 3B 43 43 24 3B |P....CC$;B$;CC$;|
00000640: 22 1D 11 22 3B 41 24 28 30 29 3B 41 24 28 58 29 |"..";A$(0);A$(X)|
00000650: 00 65 0E 06 04 8B 58 B2 31 A7 8D 39 30 30 30 3A |.e....X.1..9000:|
00000660: 89 31 31 31 30 00 76 0E 07 04 8B 43 B2 30 A7 43 |.1110.v....C.0.C|
00000670: 33 B2 43 33 AA 58 00 87 0E 08 04 8B 43 B2 31 A7 |3.C3.X......C.1.|
00000680: 43 34 B2 43 34 AA 58 00 93 0E 10 04 43 31 B2 43 |C4.C4.X.....C1.C|
00000690: 31 AA 58 00 B7 0E 11 04 99 22 13 11 11 11 11 11 |1.X......"......|
000006A0: 11 11 11 11 11 11 22 3B A3 32 31 29 3B 43 34 3B |......";.21);C4;|
000006B0: A3 33 32 29 3B 43 33 00 CD 0E 12 04 8B 43 28 30 |.32);C3......C(0|
000006C0: 29 AA 43 31 B1 31 30 30 A7 31 30 39 30 00 DC 0E |).C1.100.1090...|
000006D0: 13 04 8B 43 B2 30 A7 8D 39 30 30 30 00 EA 0E 1C |...C.0..9000....|
000006E0: 04 8B 43 B2 31 A7 31 30 36 30 00 F9 0E 1F 04 8B |..C.1.1060......|
000006F0: 50 B2 50 31 A7 31 30 39 30 00 03 0F 20 04 89 31 |P.P1.1090... ..1|
00000700: 30 30 30 00 09 0F 24 04 8F 00 50 0F 2E 04 99 22 |000...$...P...."|
00000710: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000720: 20 54 4F 20 52 4F 4C 4C 20 41 47 41 49 4E 20 50 | TO ROLL AGAIN P|
00000730: 52 45 53 53 20 27 52 27 3A 20 41 4E 59 20 4F 54 |RESS 'R': ANY OT|
00000740: 48 45 52 20 4B 45 59 20 54 4F 20 53 54 4F 50 22 |HER KEY TO STOP"|
00000750: 00 64 0F 2F 04 A1 53 24 3A 8B 53 24 B2 22 22 A7 |.d./..S$:.S$."".|
00000760: 31 30 37 30 00 75 0F 38 04 8B 53 24 B2 22 52 22 |1070.u.8..S$."R"|
00000770: A7 31 30 30 30 00 86 0F 42 04 43 28 43 29 B2 43 |.1000...B.C(C).C|
00000780: 28 43 29 AA 43 31 00 90 0F 43 04 8D 35 32 30 30 |(C).C1...C..5200|
00000790: 00 99 0F 44 04 43 31 B2 30 00 9F 0F 4B 04 8E 00 |...D.C1.0...K...|
000007A0: AD 0F 56 04 8B 43 B2 30 A7 31 31 31 35 00 F4 0F |..V..C.0.1115...|
000007B0: 57 04 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |W.."............|
000007C0: 11 11 11 11 20 59 20 4F 20 55 20 20 20 4C 20 4F |.... Y O U L O|
000007D0: 20 53 20 45 20 20 54 20 48 20 49 20 53 20 20 54 | S E T H I S T|
000007E0: 20 55 20 52 20 4E 20 20 20 20 20 20 20 20 20 20 | U R N |
000007F0: 20 20 20 22 00 08 10 58 04 8D 39 30 30 30 3A 43 | "...X..9000:C|
00000800: 34 B2 30 3A 43 31 B2 30 00 0E 10 59 04 8E 00 55 |4.0:C1.0...Y...U|
00000810: 10 5B 04 99 22 13 11 11 11 11 11 11 11 11 11 11 |.[.."...........|
00000820: 11 11 11 11 11 20 49 20 20 4C 20 4F 20 53 20 45 |..... I L O S E|
00000830: 20 20 54 20 48 20 49 20 53 20 20 54 20 55 20 52 | T H I S T U R|
00000840: 20 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | N |
00000850: 20 20 20 20 22 00 63 10 60 04 43 31 B2 30 3A 43 | ".c.`.C1.0:C|
00000860: 33 B2 30 00 6D 10 6A 04 8D 39 30 30 30 00 73 10 |3.0.m.j..9000.s.|
00000870: 74 04 8E 00 79 10 88 13 8F 00 82 10 8D 13 99 22 |t...y.........."|
00000880: 93 22 00 B5 10 8E 13 56 56 24 B2 20 20 22 A5 20 |.".....VV$. ". |
00000890: 20 20 20 20 20 20 A5 20 20 20 20 20 20 20 20 20 | . |
000008A0: A5 20 20 20 20 20 20 20 20 A5 20 20 20 20 20 20 |. . |
000008B0: 20 20 20 A7 22 00 E2 10 92 13 99 22 CF A3 A3 A3 | ."......"....|
000008C0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000008D0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000008E0: A3 D0 00 0F 11 9C 13 99 22 A5 20 20 20 20 20 20 |........". |
000008F0: 20 20 20 50 49 47 20 53 43 4F 52 45 20 42 4F 41 | PIG SCORE BOA|
00000900: 52 44 20 20 20 20 20 20 20 20 20 20 20 20 A7 00 |RD ..|
00000910: 3C 11 A6 13 99 22 CC A4 A4 A4 A4 A4 A4 A4 A4 A4 |<...."..........|
00000920: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000930: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 BA 00 69 11 B0 |.............i..|
00000940: 13 99 22 A5 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00000950: 20 20 20 20 20 A5 20 20 20 20 20 20 20 20 20 20 | . |
00000960: 20 20 20 20 20 20 20 20 A7 00 96 11 BA 13 99 22 | ......."|
00000970: A5 20 20 20 20 20 54 4F 54 41 4C 53 20 20 20 20 |. TOTALS |
00000980: 20 20 A5 20 20 53 43 4F 52 45 20 54 48 49 53 20 | . SCORE THIS |
00000990: 54 55 52 4E 20 A7 00 C3 11 C4 13 99 22 CC A4 A4 |TURN ......."...|
000009A0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 CC |................|
000009B0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000009C0: A4 A4 BA 00 F0 11 C9 13 99 22 A5 20 20 20 20 20 |.........". |
000009D0: 20 20 A5 20 20 20 20 20 20 20 20 20 A5 20 20 20 | . . |
000009E0: 20 20 20 20 20 A5 20 20 20 20 20 20 20 20 20 A7 | . .|
000009F0: 00 1E 12 CE 13 99 22 A5 20 59 4F 55 20 20 20 A5 |......". YOU .|
00000A00: 43 4F 4D 50 55 54 45 52 20 A5 20 20 20 59 4F 55 |COMPUTER . YOU|
00000A10: 20 20 A5 43 4F 4D 50 55 54 45 52 20 A7 22 00 4B | .COMPUTER .".K|
00000A20: 12 D8 13 99 22 CC A4 A4 A4 A4 A4 A4 A4 CC A4 A4 |...."...........|
00000A30: A4 A4 A4 A4 A4 A4 A4 CC A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000A40: CC A4 A4 A4 A4 A4 A4 A4 A4 A4 BA 00 79 12 E2 13 |............y...|
00000A50: 99 22 A5 20 20 20 20 20 20 20 A5 20 20 20 20 20 |.". . |
00000A60: 20 20 20 20 A5 20 20 20 20 20 20 20 20 A5 20 20 | . . |
00000A70: 20 20 20 20 20 20 20 A7 22 00 A7 12 E7 13 99 22 | ."......"|
00000A80: A5 20 20 20 20 20 20 20 A5 20 20 20 20 20 20 20 |. . |
00000A90: 20 20 A5 20 20 20 20 20 20 20 20 A5 20 20 20 20 | . . |
00000AA0: 20 20 20 20 20 A7 22 00 D4 12 EC 13 99 22 CC A4 | ."......"..|
00000AB0: A4 A4 A4 A4 A4 A4 CC A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000AC0: CC A4 A4 A4 A4 A4 A4 A4 A4 CC A4 A4 A4 A4 A4 A4 |................|
00000AD0: A4 A4 A4 BA 00 DA 12 50 14 8F 00 F2 12 51 14 99 |.......P.....Q..|
00000AE0: 22 13 11 11 11 11 11 11 11 11 11 11 11 22 3B 56 |"............";V|
00000AF0: 56 24 00 1E 13 5A 14 99 22 91 22 3B A3 33 29 3B |V$...Z..".";.3);|
00000B00: 43 28 31 29 3B A3 31 32 29 3B 43 28 30 29 3B A3 |C(1);.12);C(0);.|
00000B10: 32 31 29 3B 43 34 3B A3 33 32 29 3B 43 33 00 24 |21);C4;.32);C3.$|
00000B20: 13 6E 14 8E 00 37 13 70 17 8F 20 44 49 43 45 20 |.n...7.p.. DICE |
00000B30: 52 4F 55 54 49 4E 45 00 4A 13 BC 1B 8F 20 44 49 |ROUTINE.J.... DI|
00000B40: 43 45 20 52 4F 55 54 49 4E 45 00 6D 13 C1 1B 41 |CE ROUTINE.m...A|
00000B50: 24 28 30 29 B2 22 A6 A6 A6 9D 9D 9D 11 A6 A6 A6 |$(0)."..........|
00000B60: 9D 9D 9D 11 A6 A6 A6 9D 9D 9D 91 91 22 00 90 13 |............"...|
00000B70: C6 1B 41 24 28 31 29 B2 22 20 20 20 9D 9D 9D 11 |..A$(1)." ....|
00000B80: 20 D1 20 9D 9D 9D 11 20 20 20 9D 9D 9D 91 91 22 | . .... ....."|
00000B90: 00 B3 13 CB 1B 41 24 28 32 29 B2 22 D1 20 20 9D |.....A$(2).". .|
00000BA0: 9D 9D 11 20 20 20 9D 9D 9D 11 20 20 D1 9D 9D 9D |... .... ....|
00000BB0: 91 91 22 00 D6 13 D0 1B 41 24 28 33 29 B2 22 D1 |..".....A$(3).".|
00000BC0: 20 20 9D 9D 9D 11 20 D1 20 9D 9D 9D 11 20 20 D1 | .... . .... .|
00000BD0: 9D 9D 9D 91 91 22 00 F9 13 D5 1B 41 24 28 34 29 |.....".....A$(4)|
00000BE0: B2 22 D1 20 D1 9D 9D 9D 11 20 20 20 9D 9D 9D 11 |.". ..... ....|
00000BF0: D1 20 D1 9D 9D 9D 91 91 22 00 1C 14 DA 1B 41 24 |. ......".....A$|
00000C00: 28 35 29 B2 22 D1 20 D1 9D 9D 9D 11 20 D1 20 9D |(5).". ..... . .|
00000C10: 9D 9D 11 D1 20 D1 9D 9D 9D 91 91 22 00 3F 14 DF |.... ......".?..|
00000C20: 1B 41 24 28 36 29 B2 22 D1 D1 D1 9D 9D 9D 11 20 |.A$(6)."....... |
00000C30: 20 20 9D 9D 9D 11 D1 D1 D1 9D 9D 9D 91 91 22 00 | ............".|
00000C40: 63 14 E4 1B 42 24 B2 22 B0 C0 C0 C0 AE 9D 11 DD |c...B$."........|
00000C50: 9D 11 DD 9D 11 DD 9D 11 BD 9D 9D C0 9D 9D C0 9D |................|
00000C60: 9D C0 22 00 85 14 E9 1B 42 24 B2 42 24 AA 22 9D |..".....B$.B$.".|
00000C70: 9D AD 9D 91 DD 9D 91 DD 9D 91 DD 9D 91 22 3A 53 |.............":S|
00000C80: 54 24 B2 22 22 00 8B 14 3F 1F 8E 00 9E 14 28 23 |T$.""...?.....(#|
00000C90: 8F 20 57 41 49 54 20 52 4F 55 54 49 4E 45 00 A7 |. WAIT ROUTINE..|
00000CA0: 14 32 23 46 B2 54 49 00 B1 14 3C 23 46 31 B2 39 |.2#F.TI...<#F1.9|
00000CB0: 30 00 C3 14 46 23 8B 54 49 AB 46 B3 46 31 A7 39 |0...F#.TI.F.F1.9|
00000CC0: 30 32 30 00 C9 14 50 23 8E 00 00 00 01 |020...P#..... |
..)....*********************************
*./.....V.... PIG....WRITTEN BY JAMES C
DOWNER.O.... APRIL 1979......***
*******************************......VV$
(45)...... B$(80),A$(80).G....".":.:.:..
....CC$."...............................
......"......" .P.I.G":.:..9.
..."WELCOME TO THE DICE GAME PIG".E...."
THE OBJECT OF THIS GAME IS THE FIRST"...
(.."TO SCORE 100 POINTS....).Q$.".......
........".A.*.U$."
"...2.."YOU CAN ROLL THE DICE AS
MANY TIMES"...<.."AS YOU LIKE ON YOUR T
URN BUT YOU LOSE";.:.F.." ALL THE POINTS
FOR THAT".Z.P.."TURN WHEN A ACE SHOWS U
P"...Q..:."YOU WILL PRESS THE 'R' TO CON
TINUE AND ANY OTHER KEY TO STOP"...R..
7100.R.S..:.:. "PRESS ANY KEY TO CONTINU
E"...T..SS$:.SS$."".84...U..5000...V.C(1
).0:C(0).0:C1.0:C2.0:C3.0:C4.0.".D.. STA
RT.4.N.C(1).0:C(0).0.A.X.C.1:C4.0.K.{..5
200.U.}..1000.F....C(1).99.200.X...P..(.
(7).6).2......"................";.....C3
.0.Y...."COMPUTER WILL ROLL DICE";P;"TIM
ES ".....C.0.....P1
.0... ..1000......C(0).99.300......120.
.H.. PLAYER WINS.E.M..Q$;U$;US;U$;U$;U$;
"..........";._.R.."YOU WIN!!!!!!!!!!!".
O.S.G(1).G(1).1...T.."AFTER ";G(1).G(0);
" GAMES YOU ";G(1)"COMPUTER"G(0).N....:.
:. "DO YOU WANT TO PLAY AGAIN"......SS$:
.SS$."".240......SS$.."Y".......C(1).0:C
(0).0......85.!.,.. COMPUTER WINS.H.1..Q
$;U$;US;U$;U$;U$;"............";.U.6.."I
WIN".E.7.G(0).G(0).1...8.."AFTER ";G(1)
.G(0);" GAMES YOU ";G(1)"COMPUTER"G(0)..
.@.C(1).0:C(0).0...J.. :.:.:.:..Q.O.."PL
AY AGAIN"...P..SS$:.SS$."".240...Q..SS$.
."Y".....T..85...... DICE ROUTINE.....P1
.P1.1./...X..(.(7).6).1.P....CC$;B$;CC$;
"..";A$(0);A$(X).E....X.1..9000:.1110.V.
...C.0.C3.C3.X......C.1.C4.C4.X.....C1.C
1.X......"............";.21);C4;.32);C3.
M....C(0).C1.100.1090......C.0..9000....
..C.1.1060......P.P1.1090... ..1000...$.
..P...."................ TO ROLL AGAIN P
RESS 'R': ANY OTHER KEY TO STOP".D./..S$
:.S$."".1070.U.8..S$."R".1000...B.C(C).C
(C).C1...C..5200...D.C1.0...K.....V..C.0
.1115...W.."................ Y O U L O
S E T H I S T U R N "...X
..9000:C4.0:C1.0...Y...U.[.."...........
..... I L O S E T H I S T U R N
".C.`.C1.0:C3.0.M.J..9000.S.
T...Y..........".".....VV$. ". .
. . ."......"O...
.................................P......
". PIG SCORE BOARD ..
<...."L.................................
.....I....". .
.......". TOTALS . SCO
RE THIS TURN ..C.D.."L.................L
......................I..". .
. . ....N..". YOU .
COMPUTER . YOU .COMPUTER .".K.X.."L..
.....L.........L........L...........Y...
.". . . . .
"......". . . .
.".T...."L.......L.........L.......
.L...........Z.P.....Q.."............";V
V$...Z..".";.3);C(1);.12);C(0);.21);C4;.
32);C3.$.N...7.P.. DICE ROUTINE.J.... DI
CE ROUTINE.M.A.A$(0)."..................
...."...F.A$(1)." .... Q .... ....."
...K.A$(2)."Q .... .... Q.....".V.P.
A$(3)."Q .... Q .... Q....."...U.A$(4)
."Q Q.... ....Q Q....."...Z.A$(5)."Q Q
.... Q ....Q Q.....".?...A$(6)."QQQ....
....QQQ.....".C...B$."................
..........".....B$.B$."..............":S
T$.""...?.....(#. WAIT ROUTINE...2#F.TI.
..<#F1.90.C.F#.TI.F.F1.9020.I.P#.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL