> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 64 00 8F 00 26 08 6E 00 50 B2 35 33 |....d...&.n.P.53|
00000010: 32 38 30 3A 97 50 2C 30 3A 97 50 AA 31 2C 30 3A |280:.P,0:.P.1,0:|
00000020: 97 36 34 36 2C 35 00 5B 08 78 00 50 54 24 B2 22 |.646,5.[.x.PT$."|
00000030: 93 12 20 20 20 20 20 20 20 20 20 20 49 4E 46 4F |.. INFO|
00000040: 20 20 20 54 45 54 52 41 43 52 59 53 54 41 4C 53 | TETRACRYSTALS|
00000050: 20 20 20 20 20 20 20 20 20 20 22 00 6A 08 7D 00 | ".j.}.|
00000060: 99 22 93 22 3A 8D 31 30 30 30 00 7E 08 82 00 99 |.".":.1000.~....|
00000070: 50 54 24 3A 81 5A B2 30 A4 35 30 30 3A 82 00 93 |PT$:.Z.0.500:...|
00000080: 08 8C 00 99 22 11 9E 48 4F 57 20 54 4F 20 50 4C |...."..HOW TO PL|
00000090: 41 59 1E 00 AF 08 96 00 99 22 11 46 55 4E 43 54 |AY.......".FUNCT|
000000A0: 49 4F 4E 20 4B 45 59 20 50 52 45 53 45 54 53 00 |ION KEY PRESETS.|
000000B0: D0 08 A0 00 99 22 11 20 20 46 31 20 43 48 41 4E |.....". F1 CHAN|
000000C0: 47 45 53 20 42 4F 52 44 45 52 20 43 4F 4C 4F 52 |GES BORDER COLOR|
000000D0: 00 F1 08 AA 00 99 22 11 20 20 46 32 20 43 4E 41 |......". F2 CNA|
000000E0: 4E 47 45 53 20 53 43 52 45 45 4E 20 43 4F 4C 4F |NGES SCREEN COLO|
000000F0: 52 00 10 09 B4 00 99 22 11 20 20 46 35 20 53 45 |R......". F5 SE|
00000100: 54 53 20 52 45 56 45 52 53 45 20 56 49 44 45 4F |TS REVERSE VIDEO|
00000110: 00 2F 09 BE 00 99 22 11 20 20 46 37 20 53 54 41 |./....". F7 STA|
00000120: 52 54 53 20 54 48 45 20 50 52 4F 47 52 41 4D 00 |RTS THE PROGRAM.|
00000130: 38 09 C8 00 8D 34 39 30 00 56 09 D2 00 99 22 11 |8....490.V....".|
00000140: 9E 50 52 4F 47 52 41 4D 20 53 50 45 45 44 3A 20 |.PROGRAM SPEED: |
00000150: 30 2D 39 39 39 1E 00 7D 09 DC 00 99 22 11 5A 45 |0-999..}....".ZE|
00000160: 52 4F 2D 39 39 20 49 53 20 52 41 50 49 44 20 20 |RO-99 IS RAPID |
00000170: 20 20 47 52 4F 57 54 48 20 52 41 54 45 00 A4 09 | GROWTH RATE...|
00000180: E6 00 99 22 11 31 30 30 2D 34 30 30 20 49 53 20 |...".100-400 IS |
00000190: 4D 4F 44 45 52 41 54 45 20 47 52 4F 57 54 48 20 |MODERATE GROWTH |
000001A0: 52 41 54 45 00 CB 09 F0 00 99 22 11 34 30 30 2D |RATE......".400-|
000001B0: 39 39 39 20 49 53 20 53 4C 4F 57 20 20 20 20 20 |999 IS SLOW |
000001C0: 47 52 4F 57 54 48 20 52 41 54 45 00 D4 09 FA 00 |GROWTH RATE.....|
000001D0: 8D 34 39 30 00 EC 09 04 01 99 22 11 9E 43 48 41 |.490......"..CHA|
000001E0: 52 41 43 54 45 52 20 53 45 54 53 1E 00 0A 0A 0E |RACTER SETS.....|
000001F0: 01 99 22 11 43 48 4F 4F 53 45 20 53 45 54 20 31 |..".CHOOSE SET 1|
00000200: 2C 32 2C 33 2C 20 4F 52 20 34 00 13 0A 18 01 8D |,2,3, OR 4......|
00000210: 34 39 30 00 2F 0A 22 01 99 22 11 9E 50 4C 41 4E |490./.".."..PLAN|
00000220: 54 20 54 48 45 20 43 52 59 53 54 41 4C 53 1E 00 |T THE CRYSTALS..|
00000230: 60 0A 2C 01 99 22 11 43 48 4F 4F 53 45 20 58 20 |`.,..".CHOOSE X |
00000240: 41 4E 44 20 59 20 43 4F 4F 52 44 49 4E 41 54 45 |AND Y COORDINATE|
00000250: 53 3A 20 9E 41 20 54 48 52 4F 55 47 48 20 50 1E |S: .A THROUGH P.|
00000260: 00 8B 0A 36 01 99 22 11 43 52 59 53 54 41 4C 20 |...6..".CRYSTAL |
00000270: 54 59 50 45 3A 20 31 20 28 53 45 45 44 29 20 4F |TYPE: 1 (SEED) O|
00000280: 52 20 32 20 28 4D 4F 4E 41 44 29 00 A4 0A 40 01 |R 2 (MONAD)...@.|
00000290: 99 22 11 43 48 4F 4F 53 45 20 43 4F 4C 4F 52 3A |.".CHOOSE COLOR:|
000002A0: 20 31 2D 38 00 D3 0A 4A 01 99 22 11 20 20 20 46 | 1-8...J..". F|
000002B0: 31 20 4B 45 59 3A 20 43 41 4E 43 45 4C 20 43 48 |1 KEY: CANCEL CH|
000002C0: 4F 49 43 45 53 20 28 55 50 20 54 4F 20 43 4F 4C |OICES (UP TO COL|
000002D0: 4F 52 29 00 F4 0A 54 01 99 22 11 20 20 20 46 37 |OR)...T..". F7|
000002E0: 20 4B 45 59 3A 20 53 54 41 52 54 20 54 48 45 20 | KEY: START THE |
000002F0: 47 41 4D 45 00 FD 0A 5E 01 8D 34 39 30 00 1A 0B |GAME...^..490...|
00000300: 68 01 99 22 11 9E 4F 50 54 49 4F 4E 53 20 44 55 |h.."..OPTIONS DU|
00000310: 52 49 4E 47 20 47 41 4D 45 1E 00 40 0B 72 01 99 |RING GAME..@.r..|
00000320: 22 11 20 20 20 46 31 20 52 55 4E 20 50 52 4F 47 |". F1 RUN PROG|
00000330: 52 41 4D 20 41 46 54 45 52 20 46 37 20 4B 45 59 |RAM AFTER F7 KEY|
00000340: 00 66 0B 7C 01 99 22 11 20 20 20 46 33 20 53 4C |.f.|..". F3 SL|
00000350: 4F 57 53 20 47 52 4F 57 54 48 3A 20 53 45 4C 45 |OWS GROWTH: SELE|
00000360: 43 54 20 31 2D 39 00 8D 0B 86 01 99 22 11 20 20 |CT 1-9......". |
00000370: 20 46 35 20 53 50 45 45 44 53 20 47 52 4F 57 54 | F5 SPEEDS GROWT|
00000380: 48 3A 20 53 45 4C 45 43 54 20 31 2D 39 00 CE 0B |H: SELECT 1-9...|
00000390: 90 01 99 22 11 20 20 20 46 37 20 53 54 4F 50 53 |...". F7 STOPS|
000003A0: 20 47 52 4F 57 54 48 3A 20 52 45 50 45 41 54 20 | GROWTH: REPEAT |
000003B0: 46 37 20 20 46 4F 52 20 20 20 20 20 20 20 20 20 |F7 FOR |
000003C0: 20 20 20 53 49 4E 47 4C 45 20 53 54 45 50 00 0C | SINGLE STEP..|
000003D0: 0C 9A 01 99 22 11 20 20 20 46 32 20 41 44 44 53 |....". F2 ADDS|
000003E0: 20 53 45 45 44 53 3A 20 52 41 4E 44 4F 4D 2D 43 | SEEDS: RANDOM-C|
000003F0: 4F 4C 4F 52 20 41 4E 44 20 20 20 20 20 20 20 20 |OLOR AND |
00000400: 20 20 20 20 4C 4F 43 41 54 49 4F 4E 00 38 0C A4 | LOCATION.8..|
00000410: 01 99 22 11 20 20 20 46 34 20 41 44 44 53 20 53 |..". F4 ADDS S|
00000420: 45 45 44 53 3A 20 53 45 4C 45 43 54 20 31 2D 38 |EEDS: SELECT 1-8|
00000430: 20 28 43 4F 4C 4F 52 29 00 52 0C AE 01 99 22 11 | (COLOR).R....".|
00000440: 20 20 20 46 36 20 52 45 53 54 41 52 54 20 47 41 | F6 RESTART GA|
00000450: 4D 45 00 5B 0C B8 01 8D 34 39 30 00 72 0C C2 01 |ME.[....490.r...|
00000460: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 52 55 |."............RU|
00000470: 4E 22 00 78 0C CC 01 3A 00 B7 0C D6 01 5A 24 B2 |N".x...:.....Z$.|
00000480: C7 28 33 34 29 3A 99 22 13 11 11 11 11 11 11 4C |.(34):.".......L|
00000490: 4F 41 44 22 5A 24 22 54 45 54 52 41 43 52 59 53 |OAD"Z$"TETRACRYS|
000004A0: 54 41 4C 53 20 32 22 5A 24 22 2C 22 C2 28 31 38 |TALS 2"Z$",".(18|
000004B0: 36 29 22 91 91 91 22 00 BD 0C E0 01 80 00 F5 0C |6)"...".........|
000004C0: EA 01 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............|
000004D0: 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 20 |............ |
000004E0: 20 20 20 20 20 20 20 20 20 20 20 4D 4F 52 45 20 | MORE |
000004F0: 3C 43 52 3E 22 00 0C 0D F4 01 A1 41 24 3A 8B 41 |<CR>"......A$:.A|
00000500: 24 B3 B1 C7 28 31 33 29 A7 35 30 30 00 15 0D FE |$...(13).500....|
00000510: 01 99 50 54 24 00 1B 0D 08 02 8E 00 37 0D E8 03 |..PT$.......7...|
00000520: 41 24 B2 22 54 45 54 52 41 43 52 59 53 54 41 4C |A$."TETRACRYSTAL|
00000530: 53 20 49 4E 46 4F 22 00 60 0D F2 03 41 B2 C3 28 |S INFO".`...A..(|
00000540: 41 24 29 3A 8B 41 AD 32 B3 B1 B5 28 41 AD 32 29 |A$):.A.2...(A.2)|
00000550: A7 41 24 B2 22 20 22 AA 41 24 3A 89 31 30 31 30 |.A$." ".A$:.1010|
00000560: 00 6D 0D FC 03 81 49 B2 31 A4 41 AD 32 00 8C 0D |.m....I.1.A.2...|
00000570: 06 04 99 22 13 22 A3 32 30 AB 49 29 3B C8 28 41 |...".".20.I);.(A|
00000580: 24 2C 49 29 3B C9 28 41 24 2C 49 29 00 96 0D 10 |$,I);.(A$,I)....|
00000590: 04 99 22 91 22 3B 00 AA 0D 1A 04 81 5A 5A B2 31 |..".";......ZZ.1|
000005A0: A4 35 30 3A 82 5A 5A 3A 82 49 00 BC 0D 24 04 81 |.50:.ZZ:.I...$..|
000005B0: 5A 5A B2 30 A4 35 30 30 3A 82 3A 8E 00 C2 0D 2E |ZZ.0.500:.:.....|
000005C0: 04 8F 00 00 00 |..... |
....D...&.N.P.53280:.P,0:.P.1,0:.646,5.[
.X.PT$.".. INFO TETRACRYSTALS
".J.}..".":.1000.~....PT$:.Z.0
.500:......."..HOW TO PLAY.......".FUNCT
ION KEY PRESETS.P. ..". F1 CHANGES BORD
ER COLOR......". F2 CNANGES SCREEN COLO
R......". F5 SETS REVERSE VIDEO./....".
F7 STARTS THE PROGRAM.8.H..490.V.R..".
.PROGRAM SPEED: 0-999..}....".ZERO-99 IS
RAPID GROWTH RATE......".100-400 IS
MODERATE GROWTH RATE.K....".400-999 IS S
LOW GROWTH RATE.T....490......"..CHA
RACTER SETS.......".CHOOSE SET 1,2,3, OR
4......490./.".."..PLANT THE CRYSTALS..
`.,..".CHOOSE X AND Y COORDINATES: .A TH
ROUGH P....6..".CRYSTAL TYPE: 1 (SEED) O
R 2 (MONAD)...@..".CHOOSE COLOR: 1-8.S.J
..". F1 KEY: CANCEL CHOICES (UP TO COL
OR)...T..". F7 KEY: START THE GAME...^
..490...H.."..OPTIONS DURING GAME..@.R..
". F1 RUN PROGRAM AFTER F7 KEY.F.|..".
F3 SLOWS GROWTH: SELECT 1-9......".
F5 SPEEDS GROWTH: SELECT 1-9.N....".
F7 STOPS GROWTH: REPEAT F7 FOR
SINGLE STEP......". F2 ADDS SEEDS:
RANDOM-COLOR AND LOCATION.8..
..". F4 ADDS SEEDS: SELECT 1-8 (COLOR)
.R....". F6 RESTART GAME.[....490.R.B.
."............RUN".X.L.:...V.Z$.G(34):."
.......LOAD"Z$"TETRACRYSTALS 2"Z$","B(18
6)"..."............"....................
.... MORE <CR>"......A$:.A
$..G(13).500......PT$.......7...A$."TETR
ACRYSTALS INFO".`...A.C(A$):.A.2...(A.2)
.A$." ".A$:.1010.M....I.1.A.2......".".2
0.I);H(A$,I);I(A$,I)......".";......ZZ.1
.50:.ZZ:.I...$..ZZ.0.500:.:..B.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL