CRP
FILE INFORMATION
FILENAME(S): CRP
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-12-01 19:06:39
APPEARS ON: 1 disk(s)
FILE HASH
8c237e9641a4b24743202c3b3f5b5ea700a9a3b93a83f03591a028ac7dfe5af4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HAL | CRP | PRG | Icebreaker | 16 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 99 20 22 93 22 00 23 08 14 00 |....... ".".#...| 00000010: 97 20 35 33 32 38 30 2C 30 3A 97 20 35 33 32 38 |. 53280,0:. 5328| 00000020: 31 2C 30 00 29 08 1E 00 99 00 42 08 28 00 99 20 |1,0.).....B.(.. | 00000030: 22 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 59 2F |"INSTRUCTIONS Y/| 00000040: 4E 22 00 57 08 32 00 A1 20 41 24 3A 8B 20 41 24 |N".W.2.. A$:. A$| 00000050: B2 22 22 A7 20 35 30 00 69 08 3C 00 8B 20 41 24 |."". 50.i.<.. A$| 00000060: B2 22 59 22 20 A7 20 39 30 00 7C 08 46 00 8B 20 |."Y" . 90.|.F.. | 00000070: 41 24 B2 22 4E 22 20 A7 20 31 39 30 00 85 08 50 |A$."N" . 190...P| 00000080: 00 89 20 34 30 00 B8 08 5A 00 99 20 22 93 05 20 |.. 40...Z.. ".. | 00000090: 31 3D 57 48 54 20 32 3D 52 45 44 20 33 3D 43 59 |1=WHT 2=RED 3=CY| 000000A0: 4E 20 34 3D 50 55 52 20 35 3D 47 52 4E 20 36 3D |N 4=PUR 5=GRN 6=| 000000B0: 42 4C 55 20 45 54 43 22 00 BE 08 64 00 99 00 D4 |BLU ETC"...d....| 000000C0: 08 6E 00 85 20 22 42 49 52 44 20 43 4F 4C 4F 52 |.n.. "BIRD COLOR| 000000D0: 22 3B 42 43 00 EC 08 78 00 85 20 22 54 41 52 47 |";BC...x.. "TARG| 000000E0: 45 54 20 43 4F 4C 4F 52 22 3B 58 43 00 07 09 82 |ET COLOR";XC....| 000000F0: 00 85 20 22 42 41 43 4B 47 52 4F 55 4E 44 20 43 |.. "BACKGROUND C| 00000100: 4F 4C 4F 52 22 3B 49 00 1F 09 8C 00 85 20 22 42 |OLOR";I...... "B| 00000110: 4F 52 44 45 52 20 43 4F 4C 4F 52 22 3B 49 49 00 |ORDER COLOR";II.| 00000120: 38 09 96 00 97 20 35 33 32 38 30 2C 49 49 3A 97 |8.... 53280,II:.| 00000130: 20 35 33 32 38 31 2C 49 00 3E 09 A0 00 99 00 57 | 53281,I.>.....W| 00000140: 09 BE 00 8B 20 41 24 B2 22 4E 22 20 A7 20 42 43 |.... A$."N" . BC| 00000150: B2 36 3A 58 43 B2 31 00 9A 09 C3 00 41 B2 30 3A |.6:XC.1.....A.0:| 00000160: 42 B2 31 35 32 32 3A 43 B2 35 35 37 39 34 3A 44 |B.1522:C.55794:D| 00000170: B2 30 3A 45 B2 30 3A 46 B2 30 3A 47 B2 30 3A 48 |.0:E.0:F.0:G.0:H| 00000180: B2 30 3A 49 B2 30 3A 4A B2 30 3A 54 B2 31 39 36 |.0:I.0:J.0:T.196| 00000190: 31 3A 54 43 B2 35 36 32 33 33 00 C1 09 C8 00 8F |1:TC.56233......| 000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 | *** | 000001B0: 4D 41 49 4E 20 50 52 4F 47 52 41 4D 20 2A 2A 2A |MAIN PROGRAM ***| 000001C0: 22 00 DE 09 D2 00 97 20 42 AB 31 2C 38 35 3A 97 |"...... B.1,85:.| 000001D0: 20 42 2C 38 37 3A 97 20 42 AA 31 2C 37 33 00 FB | B,87:. B.1,73..| 000001E0: 09 DC 00 97 20 43 AB 31 2C 42 43 3A 97 20 43 2C |.... C.1,BC:. C,| 000001F0: 42 43 3A 97 20 43 AA 31 2C 42 43 00 10 0A E6 00 |BC:. C.1,BC.....| 00000200: 81 20 43 54 B2 31 20 A4 20 35 30 3A 82 20 43 54 |. CT.1 . 50:. CT| 00000210: 00 2A 0A F0 00 A1 20 42 24 3A 8B 20 42 24 B3 B1 |.*.... B$:. B$..| 00000220: 22 22 20 A7 20 8D 20 35 30 30 00 59 0A FA 00 8B |"" . . 500.Y....| 00000230: 20 41 B3 B1 30 20 A7 20 97 20 41 2C 33 32 3A 41 | A..0 . . A,32:A| 00000240: B2 41 AA 34 30 3A 47 B2 47 AA 34 30 3A 97 20 41 |.A.40:G.G.40:. A| 00000250: 2C 38 31 3A 97 20 47 2C 38 00 88 0A 04 01 8B 20 |,81:. G,8...... | 00000260: 44 B3 B1 30 20 A7 20 97 20 44 2C 33 32 3A 44 B2 |D..0 . . D,32:D.| 00000270: 44 AA 34 30 3A 48 B2 48 AA 34 30 3A 97 20 44 2C |D.40:H.H.40:. D,| 00000280: 38 31 3A 97 20 48 2C 39 00 B7 0A 0E 01 8B 20 45 |81:. H,9...... E| 00000290: B3 B1 30 20 A7 20 97 20 45 2C 33 32 3A 45 B2 45 |..0 . . E,32:E.E| 000002A0: AA 34 30 3A 49 B2 49 AA 34 30 3A 97 20 45 2C 38 |.40:I.I.40:. E,8| 000002B0: 31 3A 97 20 49 2C 39 00 E5 0A 18 01 8B 20 46 B2 |1:. I,9...... F.| 000002C0: 30 20 A7 20 97 20 46 2C 33 32 3A 46 B2 46 AA 34 |0 . . F,32:F.F.4| 000002D0: 30 3A 4A B2 4A AA 34 30 3A 97 20 45 2C 38 31 3A |0:J.J.40:. E,81:| 000002E0: 97 20 4A 2C 35 00 09 0B 22 01 8F 20 20 20 20 20 |. J,5...".. | 000002F0: 5E 5E 5E 20 4B 52 50 3A 43 4C 53 2C 4D 4F 56 45 |^^^ KRP:CLS,MOVE| 00000300: 2C 50 4F 4B 45 20 5E 5E 5E 00 26 0B 2C 01 97 20 |,POKE ^^^.&.,.. | 00000310: 54 AB 31 2C 33 32 3A 97 20 54 2C 33 32 3A 97 20 |T.1,32:. T,32:. | 00000320: 54 AA 31 2C 33 32 00 42 0B 36 01 54 B2 54 AA 31 |T.1,32.B.6.T.T.1| 00000330: 3A 8B 20 54 B2 31 39 38 33 20 A7 20 54 B2 31 39 |:. T.1983 . T.19| 00000340: 34 35 00 62 0B 40 01 97 20 54 AB 31 2C 31 32 31 |45.b.@.. T.1,121| 00000350: 3A 97 20 54 2C 31 32 31 3A 97 20 54 AA 31 2C 31 |:. T,121:. T.1,1| 00000360: 32 31 00 7C 0B 4A 01 A1 20 42 24 3A 8B 20 42 24 |21.|.J.. B$:. B$| 00000370: B3 B1 22 22 20 A7 20 8D 20 35 30 30 00 93 0B 54 |.."" . . 500...T| 00000380: 01 8F 20 20 20 20 20 20 20 2A 2A 20 50 4C 4F 50 |.. ** PLOP| 00000390: 20 2A 2A 00 CA 0B 5E 01 8F 20 49 46 20 41 3D 54 | **...^.. IF A=T| 000003A0: 20 4F 52 20 44 3D 54 20 4F 52 20 45 3D 54 20 4F | OR D=T OR E=T O| 000003B0: 52 20 46 3D 54 20 54 48 45 4E 20 50 4F 4B 45 20 |R F=T THEN POKE | 000003C0: 54 43 2C 38 3A 54 3D 54 2B 32 00 14 0C 68 01 8F |TC,8:T=T+2...h..| 000003D0: 49 46 20 41 2D 31 3D 54 2D 31 20 4F 52 20 44 2D |IF A-1=T-1 OR D-| 000003E0: 31 3D 54 2D 31 20 4F 52 20 45 2D 31 3D 54 2D 31 |1=T-1 OR E-1=T-1| 000003F0: 20 4F 52 20 46 2D 31 3D 54 2D 31 20 54 48 45 4E | OR F-1=T-1 THEN| 00000400: 20 50 4F 4B 45 20 54 43 2C 38 3A 52 45 4D 20 54 | POKE TC,8:REM T| 00000410: 3D 54 2B 32 00 5F 0C 72 01 8F 20 49 46 20 41 2B |=T+2._.r.. IF A+| 00000420: 31 3D 54 2B 31 20 4F 52 20 44 2B 31 3D 54 2B 31 |1=T+1 OR D+1=T+1| 00000430: 20 4F 52 20 45 2B 31 3D 54 2B 31 20 4F 52 20 46 | OR E+1=T+1 OR F| 00000440: 2B 31 3D 54 2B 31 20 54 48 45 4E 20 50 4F 4B 45 |+1=T+1 THEN POKE| 00000450: 20 54 43 2C 38 3A 52 45 4D 20 54 3D 54 2B 32 00 | TC,8:REM T=T+2.| 00000460: 69 0C 77 01 8D 20 38 30 30 00 81 0C 7C 01 8B 20 |i.w.. 800...|.. | 00000470: 41 B1 20 31 39 38 33 20 A7 20 41 B2 30 3A 47 B2 |A. 1983 . A.0:G.| 00000480: 30 00 99 0C 86 01 8B 20 44 B1 20 31 39 38 33 20 |0...... D. 1983 | 00000490: A7 20 44 B2 30 3A 48 B2 30 00 B1 0C 90 01 8B 20 |. D.0:H.0...... | 000004A0: 45 B1 20 31 39 38 33 20 A7 20 45 B2 30 3A 49 B2 |E. 1983 . E.0:I.| 000004B0: 30 00 C9 0C 9A 01 8B 20 46 B1 20 31 39 38 33 20 |0...... F. 1983 | 000004C0: A7 20 46 B2 30 3A 4A B2 30 00 E6 0C AE 01 97 20 |. F.0:J.0...... | 000004D0: 42 AB 31 2C 37 34 3A 97 20 42 2C 38 37 3A 97 20 |B.1,74:. B,87:. | 000004E0: 42 AA 31 2C 37 35 00 03 0D B8 01 97 20 43 AB 31 |B.1,75...... C.1| 000004F0: 2C 42 43 3A 97 20 43 2C 42 43 3A 97 20 43 AA 31 |,BC:. C,BC:. C.1| 00000500: 2C 42 43 00 18 0D C2 01 81 20 43 54 B2 31 20 A4 |,BC...... CT.1 .| 00000510: 20 35 30 3A 82 20 43 54 00 22 0D EA 01 89 20 32 | 50:. CT.".... 2| 00000520: 30 30 00 45 0D F4 01 8F 20 20 2A 2A 2A 20 47 4F |00.E.... *** GO| 00000530: 53 55 42 53 20 2A 2A 2A 20 42 24 20 47 4F 53 55 |SUBS *** B$ GOSU| 00000540: 42 20 2A 2A 2A 00 61 0D FE 01 8B 20 42 24 B2 22 |B ***.a.... B$."| 00000550: 2E 22 20 B0 20 42 24 B2 22 3E 22 20 A7 20 36 35 |." . B$.">" . 65| 00000560: 30 00 7D 0D 08 02 8B 20 42 24 B2 22 2C 22 20 B0 |0.}.... B$."," .| 00000570: 20 42 24 B2 22 3C 22 20 A7 20 36 35 30 00 90 0D | B$."<" . 650...| 00000580: 12 02 8B 20 42 24 B2 22 5E 22 20 A7 20 36 35 30 |... B$."^" . 650| 00000590: 00 A3 0D 1C 02 8B 20 42 24 B2 22 3D 22 20 A7 20 |...... B$."=" . | 000005A0: 36 35 30 00 BF 0D 26 02 8B 20 42 24 B2 22 20 22 |650...&.. B$." "| 000005B0: 20 B0 20 42 24 B2 22 2A 22 20 A7 20 37 36 30 00 | . B$."*" . 760.| 000005C0: D0 0D 30 02 8B 20 42 24 B2 22 52 22 20 A7 20 8A |..0.. B$."R" . .| 000005D0: 00 EA 0D 3A 02 8B 20 42 24 B2 22 45 22 20 B0 20 |...:.. B$."E" . | 000005E0: 42 24 B2 22 53 22 20 A7 20 80 00 FB 0D 44 02 8B |B$."S" . ....D..| 000005F0: 20 42 24 B2 22 4C 22 20 A7 20 9B 00 01 0E 4E 02 | B$."L" . ....N.| 00000600: 8E 00 07 0E 58 02 80 00 28 0E 8A 02 8F 20 20 20 |....X...(.... | 00000610: 20 2A 2A 20 4D 4F 56 45 20 42 49 52 44 20 2A 2A | ** MOVE BIRD **| 00000620: 20 3C 20 3E 20 5E 20 3D 00 45 0E 94 02 97 20 42 | < > ^ =.E.... B| 00000630: AB 31 2C 33 32 3A 97 20 42 2C 33 32 3A 97 20 42 |.1,32:. B,32:. B| 00000640: AA 31 2C 33 32 00 5B 0E A8 02 8B 20 42 24 B2 22 |.1,32.[.... B$."| 00000650: 5E 22 20 A7 20 42 B2 42 AB 34 30 00 71 0E B2 02 |^" . B.B.40.q...| 00000660: 8B 20 42 24 B2 22 3D 22 20 A7 20 42 B2 42 AA 34 |. B$."=" . B.B.4| 00000670: 30 00 8F 0E BC 02 8B 20 42 24 B2 22 2C 22 20 B0 |0...... B$."," .| 00000680: 20 42 24 B2 22 3C 22 20 A7 20 42 B2 42 AB 31 00 | B$."<" . B.B.1.| 00000690: AD 0E C6 02 8B 20 42 24 B2 22 2E 22 20 B0 20 42 |..... B$."." . B| 000006A0: 24 B2 22 3E 22 20 A7 20 42 B2 42 AA 31 00 C3 0E |$.">" . B.B.1...| 000006B0: D0 02 8B 20 42 B1 31 39 34 34 20 A7 20 42 B2 42 |... B.1944 . B.B| 000006C0: AB 34 30 00 D9 0E DA 02 8B 20 42 B3 31 30 36 34 |.40...... B.1064| 000006D0: 20 A7 20 42 B2 42 AA 34 30 00 E3 0E E4 02 89 20 | . B.B.40...... | 000006E0: 35 35 30 00 02 0F EE 02 8F 20 20 20 20 20 20 20 |550...... | 000006F0: 20 2A 2A 2A 2A 20 53 45 54 20 43 52 50 20 2A 2A | **** SET CRP **| 00000700: 2A 2A 00 22 0F F8 02 8B 20 41 B2 30 20 A7 20 41 |**.".... A.0 . A| 00000710: B2 42 AA 34 30 3A 47 B2 43 AA 34 30 3A 89 20 35 |.B.40:G.C.40:. 5| 00000720: 36 30 00 42 0F 02 03 8B 20 44 B2 30 20 A7 20 44 |60.B.... D.0 . D| 00000730: B2 42 AA 34 30 3A 48 B2 43 AA 34 30 3A 89 20 35 |.B.40:H.C.40:. 5| 00000740: 36 30 00 62 0F 0C 03 8B 20 45 B2 30 20 A7 20 45 |60.b.... E.0 . E| 00000750: B2 42 AA 34 30 3A 49 B2 43 AA 34 30 3A 89 20 35 |.B.40:I.C.40:. 5| 00000760: 36 30 00 82 0F 16 03 8B 20 46 B2 30 20 A7 20 46 |60...... F.0 . F| 00000770: B2 42 AA 34 30 3A 4A B2 43 AA 34 30 3A 89 20 35 |.B.40:J.C.40:. 5| 00000780: 36 30 00 8C 0F 1B 03 89 20 32 30 30 00 B9 0F 20 |60...... 200... | 00000790: 03 8B 20 41 B2 54 AB 31 20 B0 20 44 B2 54 AB 31 |.. A.T.1 . D.T.1| 000007A0: 20 B0 20 45 B2 54 AB 31 20 B0 20 46 B2 54 AB 31 | . E.T.1 . F.T.1| 000007B0: 20 A7 20 97 20 54 43 2C 32 00 DF 0F 2A 03 8B 20 | . . TC,2...*.. | 000007C0: 41 B2 54 20 B0 20 44 B2 54 20 B0 20 45 B2 54 20 |A.T . D.T . E.T | 000007D0: 4F 46 20 46 B2 54 20 A7 20 97 20 54 43 2C 32 00 |OF F.T . . TC,2.| 000007E0: 0C 10 34 03 8B 20 41 B2 54 AA 31 20 B0 20 44 B2 |..4.. A.T.1 . D.| 000007F0: 54 AA 31 20 B0 20 45 B2 54 AA 31 20 B0 20 46 B2 |T.1 . E.T.1 . F.| 00000800: 54 AA 31 20 A7 20 97 20 54 43 2C 32 00 12 10 48 |T.1 . . TC,2...H| 00000810: 03 8E 00 00 00 |..... |
....... ".".#.... 53280,0:. 53281,0.)... ..B.(.. "INSTRUCTIONS Y/N".W.2.. A$:. A$ ."". 50.I.<.. A$."Y" . 90.|.F.. A$."N" . 190...P.. 40...Z.. ".. 1=WHT 2=RED 3=CY N 4=PUR 5=GRN 6=BLU ETC"...D...T.N.. "BI RD COLOR";BC...X.. "TARGET COLOR";XC.... .. "BACKGROUND COLOR";I...... "BORDER CO LOR";II.8.... 53280,II:. 53281,I.>. ...W .... A$."N" . BC.6:XC.1...C.A.0:B.1522:C .55794:D.0:E.0:F.0:G.0:H.0:I.0:J.0:T.196 1:TC.56233.A.H.. *** MAIN PRO GRAM ***"...R.. B.1,85:. B,87:. B.1,73.. .... C.1,BC:. C,BC:. C.1,BC...... CT.1 . 50:. CT.*.... B$:. B$.."" . . 500.Y.... A..0 . . A,32:A.A.40:G.G.40:. A,81:. G, 8...... D..0 . . D,32:D.D.40:H.H.40:. D, 81:. H,9...... E..0 . . E,32:E.E.40:I.I. 40:. E,81:. I,9...... F.0 . . F,32:F.F.4 0:J.J.40:. E,81:. J,5...".. ^^^ KRP: CLS,MOVE,POKE ^^^.&.,.. T.1,32:. T,32:. T.1,32.B.6.T.T.1:. T.1983 . T.1945.B.@.. T.1,121:. T,121:. T.1,121.|.J.. B$:. B$ .."" . . 500...T.. ** PLOP **.J.^. . IF A=T OR D=T OR E=T OR F=T THEN POKE TC,8:T=T+2...H..IF A-1=T-1 OR D-1=T-1 OR E-1=T-1 OR F-1=T-1 THEN POKE TC,8:REM T =T+2._.R.. IF A+1=T+1 OR D+1=T+1 OR E+1= T+1 OR F+1=T+1 THEN POKE TC,8:REM T=T+2. I.W.. 800...|.. A. 1983 . A.0:G.0...... D. 1983 . D.0:H.0...... E. 1983 . E.0:I. 0.I.... F. 1983 . F.0:J.0...... B.1,74:. B,87:. B.1,75...... C.1,BC:. C,BC:. C.1 ,BC...B.. CT.1 . 50:. CT.".... 200.E.... *** GOSUBS *** B$ GOSUB ***.A.... B$." ." . B$.">" . 650.}.... B$."," . B$."<" . 650...... B$."^" . 650...... B$."=" . 650...&.. B$." " . B$."*" . 760.P.0.. B$ ."R" . ....:.. B$."E" . B$."S" . ....D.. B$."L" . ....N.....X...(.... ** MOVE BIRD ** < > ^ =.E.... B.1,32:. B,32:. B .1,32.[.... B$."^" . B.B.40.Q.... B$."=" . B.B.40...... B$."," . B$."<" . B.B.1. ..F.. B$."." . B$.">" . B.B.1.C.P.. B.19 44 . B.B.40.Y.Z.. B.1064 . B.B.40...... 550...... **** SET CRP ****.".... A.0 . A.B.40:G.C.40:. 560.B.... D.0 . D .B.40:H.C.40:. 560.B.... E.0 . E.B.40:I. C.40:. 560...... F.0 . F.B.40:J.C.40:. 5 60...... 200... .. A.T.1 . D.T.1 . E.T.1 . F.T.1 . . TC,2...*.. A.T . D.T . E.T OF F.T . . TC,2...4.. A.T.1 . D.T.1 . E. T.1 . F.T.1 . . TC,2...H.....
> CLICK IMAGE PREVIEW FOR FULL MODAL