CG.BAS
FILE INFORMATION
FILENAME(S): CG.BAS
FILE TYPE(S): PRG
FILE SIZE: 16.1K
FIRST SEEN: 2025-11-30 18:12:03
APPEARS ON: 1 disk(s)
FILE HASH
a8ed35d5f706315a6f572a6a27f768b308726fbd2545c69140ad7d7c49669968
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 63 S 3 | CG.BAS | PRG | Sailor, Ganheden | 5 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 8F 20 20 43 52 59 53 54 41 4C |....d.. CRYSTAL|
00000010: 20 47 41 52 44 45 4E 00 2B 08 6E 00 8F 20 20 20 | GARDEN.+.n.. |
00000020: 42 59 20 49 41 4E 20 41 44 41 4D 00 31 08 78 00 |BY IAN ADAM.1.x.|
00000030: 3A 00 4E 08 82 00 8F 20 20 56 41 4E 43 4F 55 56 |:.N.... VANCOUV|
00000040: 45 52 20 42 2E 43 2E 20 43 41 4E 41 44 41 00 67 |ER B.C. CANADA.g|
00000050: 08 8C 00 8F 20 20 20 20 20 28 43 29 20 4D 41 52 |.... (C) MAR|
00000060: 43 48 20 31 39 38 39 00 6D 08 96 00 3A 00 73 08 |CH 1989.m...:.s.|
00000070: A0 00 3A 00 7E 08 AA 00 99 20 22 93 22 3B 00 84 |..:.~.... ".";..|
00000080: 08 B4 00 3A 00 99 08 BE 00 8F 20 43 4F 44 45 20 |...:...... CODE |
00000090: 49 53 20 46 49 52 53 54 3A 00 9F 08 C8 00 3A 00 |IS FIRST:.....:.|
000000A0: AB 08 D2 00 52 24 B2 22 30 30 22 00 B1 08 DC 00 |....R$."00".....|
000000B0: 3A 00 C9 08 E6 00 8F 20 50 52 4F 47 52 41 4D 4D |:...... PROGRAMM|
000000C0: 45 52 20 4E 4F 54 45 53 3A 00 CF 08 F0 00 3A 00 |ER NOTES:.....:.|
000000D0: E0 08 FA 00 8F 20 56 41 52 49 41 42 4C 45 53 3A |..... VARIABLES:|
000000E0: 00 E6 08 04 01 3A 00 F7 08 0E 01 43 50 4C 4F 54 |.....:.....CPLOT|
000000F0: 20 B2 20 35 39 30 30 00 08 09 18 01 50 4C 4F 54 | . 5900.....PLOT|
00000100: 20 20 B2 20 35 39 30 33 00 19 09 22 01 53 43 4F | . 5903...".SCO|
00000110: 4C 52 20 B2 20 35 39 30 39 00 2A 09 2C 01 43 55 |LR . 5909.*.,.CU|
00000120: 52 53 52 20 B2 20 35 39 31 32 00 3B 09 36 01 44 |RSR . 5912.;.6.D|
00000130: 55 4D 50 20 20 B2 20 35 39 32 34 00 4C 09 40 01 |UMP . 5924.L.@.|
00000140: 42 4F 58 20 20 20 B2 20 35 39 33 33 00 5D 09 4A |BOX . 5933.].J|
00000150: 01 46 54 20 20 20 20 B2 20 35 39 33 39 00 6E 09 |.FT . 5939.n.|
00000160: 54 01 43 20 20 20 20 20 B2 20 35 39 35 32 00 7F |T.C . 5952..|
00000170: 09 5E 01 43 47 20 20 20 20 B2 20 35 39 35 37 00 |.^.CG . 5957.|
00000180: 90 09 68 01 53 41 20 20 20 20 B2 20 35 39 36 30 |..h.SA . 5960|
00000190: 00 B4 09 72 01 46 4D 20 B2 20 32 32 AC 32 35 36 |...r.FM . 22.256|
000001A0: AA 32 34 30 3A 8F 20 46 49 4C 45 4E 41 4D 45 20 |.240:. FILENAME |
000001B0: 42 41 53 45 00 BA 09 7C 01 3A 00 C4 09 86 01 89 |BASE...|.:......|
000001C0: 20 39 34 30 00 CA 09 90 01 3A 00 D0 09 9A 01 3A | 940.....:.....:|
000001D0: 00 E2 09 A4 01 3A 20 4A 55 4D 50 20 54 41 42 4C |.....: JUMP TABL|
000001E0: 45 3A 00 E8 09 AE 01 3A 00 08 0A B8 01 9E 20 43 |E:.....:...... C|
000001F0: 50 4C 4F 54 20 20 20 20 3A 20 43 4F 4C 4F 55 52 |PLOT : COLOUR|
00000200: 53 20 26 20 50 4C 4F 54 00 25 0A C2 01 9E 20 50 |S & PLOT.%.... P|
00000210: 4C 4F 54 20 20 20 20 20 3A 20 44 52 41 57 20 53 |LOT : DRAW S|
00000220: 43 52 45 45 4E 00 47 0A CC 01 3A 20 A1 53 20 52 |CREEN.G...: .S R|
00000230: 55 4C 45 20 46 52 4F 4D 20 46 49 52 53 54 20 56 |ULE FROM FIRST V|
00000240: 41 52 49 41 42 4C 45 00 60 0A D6 01 3A 20 97 20 |ARIABLE.`...: . |
00000250: 43 AB 31 2C 20 31 32 38 20 B0 20 30 20 2C 20 A4 |C.1, 128 . 0 , .|
00000260: 00 80 0A E0 01 3A 20 20 57 52 41 50 20 50 41 54 |.....: WRAP PAT|
00000270: 54 45 52 4E 20 41 52 4F 55 4E 44 2C 20 B0 20 A8 |TERN AROUND, . .|
00000280: 00 86 0A EA 01 3A 00 A5 0A F4 01 9E 20 50 4C 4F |.....:...... PLO|
00000290: 54 AA 33 20 20 20 3A 20 45 58 54 80 20 54 48 45 |T.3 : EXT. THE|
000002A0: 20 53 41 4D 45 00 C9 0A FE 01 9E 20 53 43 4F 4C | SAME...... SCOL|
000002B0: 52 20 20 20 20 3A 20 53 45 54 20 53 43 52 45 45 |R : SET SCREE|
000002C0: 4E 20 43 4F 4C 4F 55 52 53 00 E8 0A 08 02 3A 20 |N COLOURS.....: |
000002D0: 97 20 43 2C 20 20 20 42 41 43 4B 47 52 4F 55 4E |. C, BACKGROUN|
000002E0: 44 20 43 4F 4C 4F 55 52 00 02 0B 12 02 3A 20 97 |D COLOUR.....: .|
000002F0: 20 43 AA 31 2C 20 43 4F 4C 4F 55 52 20 42 59 54 | C.1, COLOUR BYT|
00000300: 45 53 00 1E 0B 1C 02 3A 20 97 20 43 AA 32 2C 20 |ES.....: . C.2, |
00000310: 43 4F 4C 4F 55 52 20 4E 49 42 42 4C 45 53 00 24 |COLOUR NIBBLES.$|
00000320: 0B 26 02 3A 00 3F 0B 30 02 9E 20 43 55 52 53 52 |.&.:.?.0.. CURSR|
00000330: 2C 20 52 4F 57 20 5B 2C 43 4F 4C 55 4D 4E 5D 00 |, ROW [,COLUMN].|
00000340: 64 0B 3A 02 3A 20 53 45 54 20 43 55 52 53 B0 20 |d.:.: SET CURS. |
00000350: 52 4F 57 20 26 20 4F 50 54 49 91 41 4C 20 43 4F |ROW & OPTI.AL CO|
00000360: 4C 55 4D 4E 00 6A 0B 44 02 3A 00 8C 0B 4E 02 9E |LUMN.j.D.:...N..|
00000370: 20 43 55 52 53 52 AA 33 20 20 3A 20 53 45 54 20 | CURSR.3 : SET |
00000380: 53 50 4C 49 54 20 53 43 52 45 45 4E 00 AA 0B 58 |SPLIT SCREEN...X|
00000390: 02 3A 20 97 20 43 47 2C 20 20 30 20 20 20 41 4C |.: . CG, 0 AL|
000003A0: 4C 20 47 52 41 50 48 49 43 53 00 C4 0B 62 02 3A |L GRAPHICS...b.:|
000003B0: 20 97 20 43 47 2C 20 20 34 30 20 20 41 4C 4C 20 | . CG, 40 ALL |
000003C0: 54 45 58 54 00 DF 0B 6C 02 3A 20 97 20 43 47 2C |TEXT...l.: . CG,|
000003D0: 20 20 32 31 38 20 AA AD AB 20 53 50 4C 49 54 00 | 218 ... SPLIT.|
000003E0: E5 0B 76 02 3A 00 07 0C 80 02 9E 20 43 55 52 53 |..v.:...... CURS|
000003F0: 52 AA 36 20 3A 20 43 41 4E 43 45 4C 20 53 50 4C |R.6 : CANCEL SPL|
00000400: 49 54 20 45 54 43 2E 00 23 0C 8A 02 9E 20 44 55 |IT ETC..#.... DU|
00000410: 4D 50 AB 33 20 20 3A 20 43 48 45 43 4B 20 81 20 |MP.3 : CHECK . |
00000420: 99 45 52 00 40 0C 94 02 3A 20 C2 28 31 37 32 29 |.ER.@...: .(172)|
00000430: B2 20 30 20 4D 45 41 4E 53 20 99 45 52 20 4F 4B |. 0 MEANS .ER OK|
00000440: 00 46 0C 9E 02 3A 00 5D 0C A8 02 9E 20 44 55 4D |.F...:.].... DUM|
00000450: 50 20 20 20 20 3A 20 99 20 54 45 58 54 00 7D 0C |P : . TEXT.}.|
00000460: B2 02 9E 20 44 55 4D 50 AA 33 20 20 3A 20 99 20 |... DUMP.3 : . |
00000470: 48 49 AB 52 45 53 20 53 43 52 45 45 4E 00 9D 0C |HI.RES SCREEN...|
00000480: BC 02 9E 20 44 55 4D 50 AA 36 20 20 3A 20 43 41 |... DUMP.6 : CA|
00000490: 54 43 48 20 4E 4D 49 2C 20 45 52 52 B0 00 BE 0C |TCH NMI, ERR....|
000004A0: C6 02 3A 20 97 20 43 AA 36 20 26 20 37 20 57 49 |..: . C.6 & 7 WI|
000004B0: 54 48 20 4C 49 4E 45 20 4E 55 4D 42 45 52 00 C4 |TH LINE NUMBER..|
000004C0: 0C D0 02 3A 00 E4 0C DA 02 9E 20 42 4F 58 20 20 |...:...... BOX |
000004D0: 20 20 20 3A 20 50 4F 50 20 4D 45 53 53 41 47 45 | : POP MESSAGE|
000004E0: 20 42 4F 58 00 FC 0C E4 02 3A 20 97 20 43 AA 34 | BOX.....: . C.4|
000004F0: 2C 20 42 4F 58 20 43 4F 4C 4F 55 52 00 02 0D EE |, BOX COLOUR....|
00000500: 02 3A 00 20 0D F8 02 9E 20 42 4F 58 AA 33 20 20 |.:. .... BOX.3 |
00000510: 20 3A 20 52 45 43 41 4C 4C 20 53 43 52 45 45 4E | : RECALL SCREEN|
00000520: 00 43 0D 02 03 9E 20 46 A4 50 2C 4E 20 20 3A 20 |.C.... F.P,N : |
00000530: 46 49 4C 4C 20 A4 50 20 4C 49 4E 45 20 57 49 54 |FILL .P LINE WIT|
00000540: 48 20 4E 00 49 0D 0C 03 3A 00 4F 0D 16 03 3A 00 |H N.I...:.O...:.|
00000550: 60 0D 20 03 3A 20 4D B0 45 20 4D 45 4D B0 59 3A |`. .: M.E MEM.Y:|
00000560: 00 66 0D 2A 03 3A 00 8B 0D 34 03 46 52 4F 4D 20 |.f.*.:...4.FROM |
00000570: 35 38 38 38 20 20 31 30 20 42 59 54 45 53 20 4F |5888 10 BYTES O|
00000580: 46 20 53 54 52 55 43 54 55 52 45 00 AE 0D 3E 03 |F STRUCTURE...>.|
00000590: 97 20 43 AA 33 2C 20 20 54 45 58 54 20 42 41 43 |. C.3, TEXT BAC|
000005A0: 4B 47 52 4F 55 4E 44 20 43 4F 4C 4F 55 52 00 CF |KGROUND COLOUR..|
000005B0: 0D 48 03 97 20 53 41 2C 20 20 20 32 4E 44 41 52 |.H.. SA, 2NDAR|
000005C0: 59 20 41 44 44 52 45 53 53 2C 20 54 45 58 54 00 |Y ADDRESS, TEXT.|
000005D0: F3 0D 52 03 97 20 53 41 AA 31 2C 20 20 20 27 27 |..R.. SA.1, ''|
000005E0: 20 20 20 20 20 27 27 20 20 2C 20 47 52 41 50 48 | '' , GRAPH|
000005F0: 49 43 53 00 0E 0E 5C 03 97 20 53 41 AA 32 2C 20 |ICS...\.. SA.2, |
00000600: 31 30 20 81 20 4C 46 2C 20 30 20 8B 20 A8 00 14 |10 . LF, 0 . ...|
00000610: 0E 66 03 3A 00 2E 0E 70 03 3A 20 A4 20 99 20 54 |.f.:...p.: . . T|
00000620: 48 45 53 45 2C 20 45 58 45 43 55 54 45 3A 00 34 |HESE, EXECUTE:.4|
00000630: 0E 7A 03 3A 00 4E 0E 84 03 9F 20 34 2C 34 2C 37 |.z.:.N.... 4,4,7|
00000640: 3A 9D 20 34 3A 9B 20 32 30 30 AB 39 33 30 00 5B |:. 4:. 200.930.[|
00000650: 0E 8E 03 98 34 3A A0 20 34 3A 80 00 61 0E 98 03 |....4:. 4:..a...|
00000660: 3A 00 67 0E A2 03 3A 00 8D 0E AC 03 42 42 B2 32 |:.g...:.....BB.2|
00000670: 35 35 3A 55 4C B2 38 31 39 32 3A 55 52 B2 38 35 |55:UL.8192:UR.85|
00000680: 30 34 3A 4E 42 B2 38 3A 41 53 B2 34 38 00 AF 0E |04:NB.8:AS.48...|
00000690: B6 03 4B B2 31 39 38 3A 53 31 B2 35 34 32 37 36 |..K.198:S1.54276|
000006A0: 3A 54 52 B2 32 36 3A 42 52 B2 35 33 32 38 30 00 |:TR.26:BR.53280.|
000006B0: B5 0E C0 03 3A 00 C5 0E CA 03 8F 20 53 45 54 20 |....:...... SET |
000006C0: 53 45 45 44 3A 00 CB 0E D4 03 3A 00 DB 0E DE 03 |SEED:.....:.....|
000006D0: 9E 20 46 54 2C 30 3A 9E 20 50 4C 00 EA 0E E8 03 |. FT,0:. PL.....|
000006E0: 97 20 38 34 31 36 2C 32 33 32 00 FE 0E F2 03 52 |. 8416,232.....R|
000006F0: 24 B2 22 31 30 33 31 30 33 31 33 33 32 22 00 04 |$."1031031332"..|
00000700: 0F FC 03 3A 00 17 0F 06 04 8F 20 53 45 54 20 43 |...:...... SET C|
00000710: 4F 4C 4F 55 52 53 3A 00 1D 0F 10 04 3A 00 39 0F |OLOURS:.....:.9.|
00000720: 1A 04 97 20 43 2C 34 3A 97 20 43 AA 31 2C 32 31 |... C,4:. C.1,21|
00000730: 36 3A 97 20 43 AA 32 2C 2E 00 3F 0F 24 04 3A 00 |6:. C.2,..?.$.:.|
00000740: 52 0F 2E 04 8F 20 50 4C 4F 54 20 53 43 52 45 45 |R.... PLOT SCREE|
00000750: 4E 3A 00 58 0F 38 04 3A 00 71 0F 42 04 97 20 35 |N:.X.8.:.q.B.. 5|
00000760: 33 32 36 35 2C 32 37 3A 97 20 35 33 32 36 39 2C |3265,27:. 53269,|
00000770: 2E 00 91 0F 4C 04 9E 20 35 39 31 35 3A 8F 20 45 |....L.. 5915:. E|
00000780: 4E 41 42 4C 45 20 53 50 4C 49 54 53 43 52 45 45 |NABLE SPLITSCREE|
00000790: 4E 00 A4 0F 56 04 97 20 43 AB 31 2C 2E 3A 8F 20 |N...V.. C.1,.:. |
000007A0: 57 52 41 50 00 B8 0F 60 04 52 24 B2 22 31 30 33 |WRAP...`.R$."103|
000007B0: 31 30 33 31 33 33 32 22 00 D3 0F 6A 04 9E 20 43 |1031332"...j.. C|
000007C0: 50 3A 8F 20 43 4F 4C 4F 55 52 53 2C 20 26 20 50 |P:. COLOURS, & P|
000007D0: 4C 4F 54 00 D9 0F 74 04 3A 00 EE 0F 7E 04 8F 20 |LOT...t.:...~.. |
000007E0: 43 48 45 43 4B 20 50 52 49 4E 54 45 52 3A 00 F4 |CHECK PRINTER:..|
000007F0: 0F 88 04 3A 00 FF 0F 92 04 9E 20 35 39 32 31 00 |...:...... 5921.|
00000800: 0F 10 9C 04 50 52 B2 C2 28 31 37 32 29 B2 30 00 |....PR..(172).0.|
00000810: 15 10 A6 04 3A 00 27 10 B0 04 8F 20 4D 4F 52 45 |....:.'.... MORE|
00000820: 20 53 45 54 55 50 3A 00 2D 10 BA 04 3A 00 48 10 | SETUP:.-...:.H.|
00000830: C4 04 9E 20 35 39 33 30 3A 8F 20 41 4C 54 45 52 |... 5930:. ALTER|
00000840: 20 56 45 43 54 4F 52 53 00 55 10 CE 04 4A B2 BB | VECTORS.U...J..|
00000850: 28 AB 54 49 29 00 5B 10 D8 04 3A 00 6B 10 E2 04 |(.TI).[...:.k...|
00000860: 97 20 53 31 AA 32 30 2C 31 32 38 00 9A 10 EC 04 |. S1.20,128.....|
00000870: 97 20 53 31 AB 33 2C 37 30 3A 97 20 53 31 AA 31 |. S1.3,70:. S1.1|
00000880: 31 2C 4B 3A 97 20 53 31 AA 31 36 2C 42 42 3A 97 |1,K:. S1.16,BB:.|
00000890: 20 53 31 AA 31 34 2C 31 32 39 00 BC 10 F6 04 97 | S1.14,129......|
000008A0: 20 53 31 AA 31 2C 37 3A 97 20 53 31 AA 32 2C 32 | S1.1,7:. S1.2,2|
000008B0: 31 37 3A 97 20 53 31 AA 32 30 2C 2E 00 C2 10 00 |17:. S1.20,.....|
000008C0: 05 3A 00 D5 10 0A 05 8F 20 4D 4F 52 45 20 49 4D |.:...... MORE IM|
000008D0: 41 47 45 53 3A 00 DB 10 14 05 3A 00 EE 10 1E 05 |AGES:.....:.....|
000008E0: 81 20 49 B2 31 20 A4 20 32 30 30 30 3A 82 00 02 |. I.1 . 2000:...|
000008F0: 11 28 05 52 24 B2 22 33 33 30 32 30 33 32 32 31 |.(.R$."330203221|
00000900: 30 22 00 0D 11 32 05 9E 20 46 54 2C 2E 00 2E 11 |0"...2.. FT,....|
00000910: 3C 05 81 20 49 B2 38 32 39 36 20 A4 20 38 34 30 |<.. I.8296 . 840|
00000920: 30 20 A9 20 38 3A 97 20 49 2C 32 30 3A 82 00 49 |0 . 8:. I,20:..I|
00000930: 11 46 05 97 20 43 2C 35 3A 97 20 43 AA 31 2C 33 |.F.. C,5:. C.1,3|
00000940: 33 3A 97 20 43 AA 32 2C 2E 00 52 11 50 05 9E 20 |3:. C.2,..R.P.. |
00000950: 43 50 00 58 11 5A 05 3A 00 6B 11 64 05 81 20 49 |CP.X.Z.:.k.d.. I|
00000960: B2 31 20 A4 20 32 30 30 30 3A 82 00 7F 11 6E 05 |.1 . 2000:....n.|
00000970: 52 24 B2 22 30 30 32 33 30 31 30 31 31 30 22 00 |R$."0023010110".|
00000980: 8A 11 78 05 9E 20 46 54 2C 30 00 A1 11 82 05 97 |..x.. FT,0......|
00000990: 20 38 33 33 36 2C 32 3A 97 20 38 34 31 36 2C 34 | 8336,2:. 8416,4|
000009A0: 38 00 BD 11 8C 05 97 20 43 2C 30 3A 97 20 43 AA |8...... C,0:. C.|
000009B0: 31 2C 33 34 3A 97 20 43 AA 32 2C 31 34 00 C6 11 |1,34:. C.2,14...|
000009C0: 96 05 9E 20 43 50 00 D8 11 A0 05 81 20 49 B2 31 |... CP...... I.1|
000009D0: 20 A4 20 39 39 39 3A 82 00 E6 11 AA 05 81 20 49 | . 999:....... I|
000009E0: B2 31 20 A4 20 36 00 FB 11 B4 05 3A 20 41 B2 28 |.1 . 6.....: A.(|
000009F0: 49 20 AF 20 31 29 AC 31 36 AA 32 00 0E 12 BE 05 |I . 1).16.2.....|
00000A00: 3A 20 97 20 43 AA 31 2C 41 3A 9E 20 53 43 00 31 |: . C.1,A:. SC.1|
00000A10: 12 C8 05 3A 20 81 20 4A B2 31 20 A4 20 35 30 30 |...: . J.1 . 500|
00000A20: AB 32 35 AC 41 AA 35 30 30 AC 28 49 B2 32 29 3A |.25.A.500.(I.2):|
00000A30: 82 00 37 12 D2 05 82 00 4D 12 DC 05 81 20 49 B2 |..7.....M.... I.|
00000A40: 35 30 20 A4 20 32 34 32 20 A9 20 31 36 00 5B 12 |50 . 242 . 16.[.|
00000A50: E6 05 3A 20 97 20 43 AA 31 2C 49 00 66 12 F0 05 |..: . C.1,I.f...|
00000A60: 3A 20 9E 20 53 43 00 79 12 FA 05 3A 20 81 20 4A |: . SC.y...: . J|
00000A70: B2 31 20 A4 20 39 39 3A 82 00 7F 12 04 06 82 00 |.1 . 99:........|
00000A80: 85 12 0E 06 3A 00 8B 12 18 06 3A 00 A3 12 22 06 |....:.....:...".|
00000A90: 8F 20 4F 4E 20 48 49 44 44 45 4E 20 53 43 52 45 |. ON HIDDEN SCRE|
00000AA0: 45 4E 3A 00 A9 12 2C 06 3A 00 B6 12 36 06 97 20 |EN:...,.:...6.. |
00000AB0: 43 47 2C 32 35 32 00 E1 12 40 06 99 22 9A CC CF |CG,252...@.."...|
00000AC0: C1 C4 D3 D4 C1 D2 20 50 52 45 53 45 4E 54 53 2E |...... PRESENTS.|
00000AD0: 2E 2E 22 A3 33 32 29 22 28 43 29 20 31 39 38 39 |..".32)"(C) 1989|
00000AE0: 22 00 09 13 4A 06 99 22 20 20 20 20 20 20 C3 52 |"...J.." .R|
00000AF0: 59 53 54 41 4C 20 C7 41 52 44 45 4E 20 20 46 4F |YSTAL .ARDEN FO|
00000B00: 52 20 54 48 45 20 36 34 22 00 31 13 54 06 99 22 |R THE 64".1.T.."|
00000B10: 20 20 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 | ..........|
00000B20: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000B30: 22 00 58 13 5E 06 99 22 20 20 20 D7 48 41 54 20 |".X.^.." .HAT |
00000B40: 59 4F 55 20 48 41 56 45 20 4A 55 53 54 20 53 45 |YOU HAVE JUST SE|
00000B50: 45 4E 20 49 53 20 41 22 00 80 13 68 06 99 22 20 |EN IS A"...h.." |
00000B60: 44 45 4D 4F 4E 53 54 52 41 54 49 4F 4E 20 4F 46 |DEMONSTRATION OF|
00000B70: 20 41 20 4E 45 57 20 47 52 41 50 48 49 43 53 22 | A NEW GRAPHICS"|
00000B80: 00 AD 13 72 06 99 22 20 53 54 52 55 43 54 55 52 |...r.." STRUCTUR|
00000B90: 45 2C 20 41 20 43 4F 4D 50 4C 45 58 20 41 52 54 |E, A COMPLEX ART|
00000BA0: 46 4F 52 4D 20 54 48 41 54 20 49 53 22 00 DA 13 |FORM THAT IS"...|
00000BB0: 7C 06 99 22 20 47 52 4F 57 4E 20 45 4E 54 49 52 ||.." GROWN ENTIR|
00000BC0: 45 4C 59 20 57 49 54 48 49 4E 20 59 4F 55 52 20 |ELY WITHIN YOUR |
00000BD0: 43 4F 4D 50 55 54 45 52 2E 22 00 09 14 86 06 99 |COMPUTER."......|
00000BE0: 22 20 CD 55 43 48 20 4C 49 4B 45 20 46 52 41 43 |" .UCH LIKE FRAC|
00000BF0: 54 41 4C 53 2C 20 54 48 45 53 45 20 43 52 59 53 |TALS, THESE CRYS|
00000C00: 54 41 4C 53 20 41 52 45 22 00 37 14 90 06 99 22 |TALS ARE".7...."|
00000C10: 20 47 45 4E 45 52 41 54 45 44 20 42 59 20 41 20 | GENERATED BY A |
00000C20: 53 49 4D 50 4C 45 20 53 45 54 20 4F 46 20 52 55 |SIMPLE SET OF RU|
00000C30: 4C 45 53 2E 22 3A 99 00 63 14 9A 06 99 22 20 20 |LES.":..c...." |
00000C40: 20 C2 59 20 56 41 52 59 49 4E 47 20 54 48 45 20 | .Y VARYING THE |
00000C50: 53 54 52 55 43 54 55 52 45 2C 20 59 4F 55 20 43 |STRUCTURE, YOU C|
00000C60: 41 4E 22 00 8D 14 A4 06 99 22 20 43 52 45 41 54 |AN"......" CREAT|
00000C70: 45 20 41 20 4E 45 41 52 2D 49 4E 46 49 4E 49 54 |E A NEAR-INFINIT|
00000C80: 45 20 56 41 52 49 45 54 59 20 4F 46 22 00 BB 14 |E VARIETY OF"...|
00000C90: AE 06 99 22 20 43 52 59 53 54 41 4C 4C 49 4E 45 |..." CRYSTALLINE|
00000CA0: 20 49 4D 41 47 45 53 20 45 46 46 4F 52 54 4C 45 | IMAGES EFFORTLE|
00000CB0: 53 53 4C 59 2E 20 20 D9 4F 55 22 00 E4 14 B8 06 |SSLY. .OU".....|
00000CC0: 99 22 20 43 41 4E 20 43 48 4F 4F 53 45 20 54 48 |." CAN CHOOSE TH|
00000CD0: 45 20 53 45 45 44 20 4F 4E 20 57 48 49 43 48 20 |E SEED ON WHICH |
00000CE0: 54 48 45 22 00 0C 15 C2 06 99 22 20 43 52 59 53 |THE"......" CRYS|
00000CF0: 54 41 4C 53 20 47 52 4F 57 2C 20 41 4E 44 20 44 |TALS GROW, AND D|
00000D00: 45 46 49 4E 45 20 54 48 45 49 52 22 00 33 15 CC |EFINE THEIR".3..|
00000D10: 06 99 22 20 52 55 4C 45 53 20 4F 46 20 47 52 4F |.." RULES OF GRO|
00000D20: 57 54 48 2E 20 20 D4 48 45 20 43 4F 4D 50 55 54 |WTH. .HE COMPUT|
00000D30: 45 52 22 00 5C 15 D6 06 99 22 20 54 41 4B 45 53 |ER".\...." TAKES|
00000D40: 20 49 54 20 46 52 4F 4D 20 54 48 45 52 45 2C 20 | IT FROM THERE, |
00000D50: 41 4E 44 20 43 52 45 41 54 45 53 22 00 73 15 E0 |AND CREATES".s..|
00000D60: 06 99 22 20 59 4F 55 52 20 49 4D 41 47 45 53 2E |.." YOUR IMAGES.|
00000D70: 22 3A 99 00 9F 15 EA 06 99 22 20 20 20 D6 49 44 |":......." .ID|
00000D80: 45 4F 20 57 41 4C 4C 50 41 50 45 52 3F 20 20 D9 |EO WALLPAPER? .|
00000D90: 45 53 2C 20 49 54 27 53 20 54 48 41 54 2C 22 00 |ES, IT'S THAT,".|
00000DA0: C8 15 F4 06 99 22 20 42 55 54 20 C3 D2 D9 D3 D4 |....." BUT .....|
00000DB0: C1 CC 20 C7 C1 D2 C4 C5 CE 20 49 53 20 4D 55 43 |.. ...... IS MUC|
00000DC0: 48 2C 20 4D 55 43 48 22 00 F8 15 FE 06 99 22 20 |H, MUCH"......" |
00000DD0: 4D 4F 52 45 2E 2E 2E 11 11 20 20 20 20 D0 52 45 |MORE..... .RE|
00000DE0: 53 53 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 46 49 4E |SS ...... TO FIN|
00000DF0: 44 20 4F 55 54 2E 22 3B 00 FE 15 08 07 3A 00 0E |D OUT.";.....:..|
00000E00: 16 12 07 8F 20 52 45 56 45 41 4C 20 49 54 00 14 |.... REVEAL IT..|
00000E10: 16 1C 07 3A 00 29 16 26 07 81 20 49 B2 32 35 30 |...:.).&.. I.250|
00000E20: 20 A4 20 32 36 20 A9 AB 38 00 3C 16 30 07 3A 20 | . 26 ..8.<.0.: |
00000E30: 97 20 43 47 2C 49 3A 4A B2 31 AE 31 00 42 16 3A |. CG,I:J.1.1.B.:|
00000E40: 07 82 00 48 16 44 07 3A 00 5B 16 4E 07 8F 20 4D |...H.D.:.[.N.. M|
00000E50: 41 49 4E 20 50 52 4F 47 52 41 4D 00 61 16 58 07 |AIN PROGRAM.a.X.|
00000E60: 3A 00 75 16 62 07 52 24 B2 22 30 31 32 30 31 32 |:.u.b.R$."012012|
00000E70: 33 31 32 33 22 00 86 16 6C 07 92 20 4B 2C 31 35 |3123"...l.. K,15|
00000E80: 3A 97 20 4B 2C 2E 00 8C 16 76 07 3A 00 A5 16 80 |:. K,....v.:....|
00000E90: 07 8D 20 35 37 34 30 2C 20 54 49 54 4C 45 20 26 |.. 5740, TITLE &|
00000EA0: 20 42 45 45 50 00 AB 16 8A 07 3A 00 BF 16 94 07 | BEEP.....:.....|
00000EB0: 8D 20 36 31 34 30 2C 20 52 45 53 50 91 53 45 00 |. 6140, RESP.SE.|
00000EC0: E4 16 9E 07 91 20 52 45 50 4C 59 20 8D 20 32 30 |..... REPLY . 20|
00000ED0: 33 30 2C 20 37 31 36 30 2C 20 36 32 33 30 2C 20 |30, 7160, 6230, |
00000EE0: 35 34 39 30 00 EA 16 A8 07 3A 00 F5 16 B2 07 89 |5490.....:......|
00000EF0: 20 31 39 32 30 00 FB 16 BC 07 3A 00 0A 17 C6 07 | 1920.....:.....|
00000F00: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 00 10 17 D0 07 3A |. ========.....:|
00000F10: 00 21 17 DA 07 3A 20 45 4E 54 45 52 20 4C 4F 4F |.!...: ENTER LOO|
00000F20: 50 00 27 17 E4 07 3A 00 32 17 EE 07 8D 20 36 30 |P.'...:.2.... 60|
00000F30: 31 30 00 4F 17 F8 07 97 20 43 2C 43 30 3A 97 20 |10.O.... C,C0:. |
00000F40: 43 AA 31 2C 43 31 3A 97 20 43 AA 32 2C 43 32 00 |C.1,C1:. C.2,C2.|
00000F50: 5D 17 02 08 52 24 B2 4F 24 3A 53 B2 2E 00 69 17 |]...R$.O$:S...i.|
00000F60: 0C 08 97 20 43 AB 31 2C 57 00 7E 17 16 08 49 B2 |... C.1,W.~...I.|
00000F70: 4C 53 3A 8D 20 33 32 34 30 2C 53 45 45 44 00 8C |LS:. 3240,SEED..|
00000F80: 17 20 08 99 22 93 22 3A 9E 20 43 50 00 92 17 2A |. ..".":. CP...*|
00000F90: 08 3A 00 A9 17 34 08 8F 20 2A 20 56 49 45 57 49 |.:...4.. * VIEWI|
00000FA0: 4E 47 20 4C 4F 4F 50 20 2A 00 AF 17 3E 08 3A 00 |NG LOOP *...>.:.|
00000FB0: CC 17 48 08 41 B2 C2 28 43 AA 32 29 3A 8F 20 53 |..H.A..(C.2):. S|
00000FC0: 45 4C 45 43 54 20 43 4F 4C 4F 55 52 00 DD 17 52 |ELECT COLOUR...R|
00000FD0: 08 8B 20 41 B2 2E 20 A7 20 41 B2 31 32 00 F1 17 |.. A.. . A.12...|
00000FE0: 5C 08 97 20 36 34 36 2C 41 3A 9E 20 43 55 2C 32 |\.. 646,A:. CU,2|
00000FF0: 30 00 F7 17 66 08 3A 00 15 18 70 08 81 20 49 B2 |0...f.:...p.. I.|
00001000: 2E 20 A4 20 39 39 39 3A 8F 20 41 57 41 49 54 20 |. . 999:. AWAIT |
00001010: 49 4E 50 55 54 00 29 18 7A 08 3A 20 8B 20 C2 28 |INPUT.).z.: . .(|
00001020: 4B 29 20 A7 20 32 33 38 30 00 2F 18 84 08 82 00 |K) . 2380./.....|
00001030: 35 18 8E 08 3A 00 64 18 98 08 99 22 C3 D2 D9 D3 |5...:.d...."....|
00001040: D4 C1 CC 3A 20 12 4E 92 20 4E 45 57 20 20 12 4D |...: .N. NEW .M|
00001050: 92 20 4D 41 4E 55 41 4C 20 12 58 92 20 45 58 54 |. MANUAL .X. EXT|
00001060: 45 4E 44 22 00 90 18 A2 08 8B 20 C2 28 43 AB 31 |END"...... .(C.1|
00001070: 29 B1 31 32 37 20 A7 20 99 20 22 20 20 20 20 20 |).127 . . " |
00001080: 20 12 57 92 20 4E 4F 22 3B 3A 89 20 32 32 33 30 | .W. NO";:. 2230|
00001090: 00 A5 18 AC 08 99 22 20 20 20 20 20 20 12 57 92 |......" .W.|
000010A0: 20 44 4F 22 3B 00 CB 18 B6 08 99 22 20 57 52 41 | DO";......" WRA|
000010B0: 50 20 12 52 92 20 52 41 4E 44 4F 4D 20 12 41 92 |P .R. RANDOM .A.|
000010C0: 20 41 55 54 4F 50 49 4C 4F 54 22 00 F7 18 C0 08 | AUTOPILOT".....|
000010D0: 99 22 D3 C5 C5 C4 3A 20 20 20 20 12 56 92 20 56 |."....: .V. V|
000010E0: 41 52 59 20 12 45 92 20 45 4E 54 45 52 20 4D 41 |ARY .E. ENTER MA|
000010F0: 4E 55 41 4C 4C 59 22 00 2B 19 CA 08 99 22 C3 CF |NUALLY".+...."..|
00001100: CC CF D2 D3 3A 20 20 12 C6 4B 45 59 53 92 20 20 |....: ..KEYS. |
00001110: 12 43 92 20 52 41 4E 44 4F 4D 20 20 20 20 20 12 |.C. RANDOM .|
00001120: 20 20 51 3D 51 55 49 54 20 20 22 00 5A 19 D4 08 | Q=QUIT ".Z...|
00001130: 99 22 CF D5 D4 D0 D5 D4 3A 20 20 12 53 92 20 53 |."......: .S. S|
00001140: 41 56 45 20 12 4C 92 20 4C 4F 41 44 20 20 20 12 |AVE .L. LOAD .|
00001150: 50 92 20 50 52 49 4E 54 91 22 00 60 19 DE 08 3A |P. PRINT.".`...:|
00001160: 00 7D 19 E8 08 54 52 B2 32 31 30 3A 8D 20 35 39 |.}...TR.210:. 59|
00001170: 35 30 3A 41 B2 2E 3A 8F 20 53 48 4F 57 00 83 19 |50:A..:. SHOW...|
00001180: F2 08 3A 00 8E 19 FC 08 8D 20 35 39 30 30 00 9F |..:...... 5900..|
00001190: 19 06 09 81 20 49 B2 2E 20 A4 20 31 36 30 30 00 |.... I.. . 1600.|
000011A0: B3 19 10 09 3A 20 8B 20 C2 28 4B 29 20 A7 20 32 |....: . .(K) . 2|
000011B0: 33 37 30 00 B9 19 1A 09 82 00 BF 19 24 09 3A 00 |370.........$.:.|
000011C0: E2 19 2E 09 9E 20 53 43 3A 8D 20 36 30 31 30 3A |..... SC:. 6010:|
000011D0: 89 20 32 31 32 30 3A 8F 20 54 52 59 20 41 47 41 |. 2120:. TRY AGA|
000011E0: 49 4E 00 E8 19 38 09 3A 00 F8 19 42 09 97 20 43 |IN...8.:...B.. C|
000011F0: 47 2C 2E 3A 9E 20 53 43 00 01 1A 4C 09 A1 20 42 |G,.:. SC...L.. B|
00001200: 24 00 10 1A 56 09 81 20 48 B2 31 20 A4 20 31 38 |$...V.. H.1 . 18|
00001210: 00 40 1A 60 09 3A 20 8B 20 CA 28 22 4E 58 57 52 |.@.`.: . .("NXWR|
00001220: 41 56 50 4D 45 53 4C 51 43 85 86 87 88 8C 22 2C |AVPMESLQC.....",|
00001230: 48 2C 31 29 B3 B1 42 24 20 A7 20 82 3A 48 B2 2E |H,1)..B$ . .:H..|
00001240: 00 46 1A 6A 09 3A 00 61 1A 74 09 8B 20 48 B1 31 |.F.j.:.a.t.. H.1|
00001250: 32 20 A7 20 8D 20 34 31 33 30 3A 89 20 32 31 32 |2 . . 4130:. 212|
00001260: 30 00 A2 1A 7E 09 91 20 48 20 8D 20 32 37 38 30 |0...~.. H . 2780|
00001270: 2C 32 38 36 30 2C 32 39 31 30 2C 32 39 37 30 2C |,2860,2910,2970,|
00001280: 33 30 33 30 2C 33 31 38 30 2C 35 33 32 30 2C 32 |3030,3180,5320,2|
00001290: 35 37 30 2C 33 37 30 30 2C 34 34 33 30 2C 35 30 |570,3700,4430,50|
000012A0: 38 30 00 B5 1A 88 09 8B 20 48 B2 31 32 20 A7 20 |80...... H.12 . |
000012B0: 53 B2 2E 3A 8E 00 C4 1A 92 09 8B 20 48 20 A7 20 |S..:....... H . |
000012C0: 32 31 32 30 00 F8 1A 9C 09 8B 20 C5 28 42 24 29 |2120...... .(B$)|
000012D0: 20 A7 20 48 B2 28 32 37 AA C5 28 42 24 29 AB 28 | . H.(27..(B$).(|
000012E0: C5 28 42 24 29 B2 38 29 29 AD 32 3A 42 24 B2 22 |.(B$).8)).2:B$."|
000012F0: 22 3A 89 20 32 34 32 30 00 07 1B A6 09 8B 20 41 |":. 2420...... A|
00001300: 20 A7 20 32 32 30 30 00 12 1B B0 09 89 20 32 31 | . 2200...... 21|
00001310: 32 30 00 27 1B BA 09 B2 B2 B2 B2 B2 B2 B2 B2 B2 |20.'............|
00001320: B2 B2 B2 B2 B2 B2 B2 00 2D 1B C4 09 3A 00 42 1B |........-...:.B.|
00001330: CE 09 AC 20 20 43 4F 44 45 20 45 4E 54 52 59 20 |... CODE ENTRY |
00001340: 20 AC 00 48 1B D8 09 3A 00 61 1B E2 09 3A 20 52 | ..H...:.a...: R|
00001350: 24 20 49 53 20 31 53 54 20 56 41 52 49 41 42 4C |$ IS 1ST VARIABL|
00001360: 45 00 67 1B EC 09 3A 00 7B 1B F6 09 3A 20 4D 41 |E.g...:.{...: MA|
00001370: 4E 55 41 4C 20 45 4E 54 52 59 3A 00 81 1B 00 0A |NUAL ENTRY:.....|
00001380: 3A 00 92 1B 0A 0A 99 22 93 22 3A 9E 20 43 55 2C |:......".":. CU,|
00001390: 31 38 00 C0 1B 14 0A 99 22 D4 48 45 20 43 52 59 |18......".HE CRY|
000013A0: 53 54 41 4C 20 49 53 20 47 52 4F 57 4E 20 55 53 |STAL IS GROWN US|
000013B0: 49 4E 47 20 41 20 53 54 52 55 43 54 55 52 45 22 |ING A STRUCTURE"|
000013C0: 00 E3 1B 1E 0A 99 22 4F 46 20 54 45 4E 20 44 49 |......"OF TEN DI|
000013D0: 47 49 54 53 2C 20 45 41 43 48 20 30 20 54 4F 20 |GITS, EACH 0 TO |
000013E0: 33 2E 22 00 0C 1C 28 0A 99 22 11 C5 4E 54 45 52 |3."...(.."..NTER|
000013F0: 20 41 20 43 4F 44 45 2C 20 54 48 45 4E 20 50 52 | A CODE, THEN PR|
00001400: 45 53 53 20 D2 C5 D4 D5 D2 CE 3A 22 00 24 1C 32 |ESS ......:".$.2|
00001410: 0A 4C B2 2E 3A 9E 20 43 55 2C 32 33 3A 99 20 52 |.L..:. CU,23:. R|
00001420: 24 22 91 22 00 36 1C 3C 0A 54 52 B2 31 39 34 3A |$".".6.<.TR.194:|
00001430: 8D 20 35 39 35 30 00 47 1C 46 0A 97 20 32 30 34 |. 5950.G.F.. 204|
00001440: 2C 2E 3A A1 20 42 24 00 87 1C 50 0A 8B 20 28 42 |,.:. B$...P.. (B|
00001450: 24 B1 22 2F 22 20 AF 20 42 24 B3 22 34 22 29 20 |$."/" . B$."4") |
00001460: B0 20 42 24 B2 22 20 22 20 B0 20 42 24 B2 22 1D |. B$." " . B$.".|
00001470: 22 20 A7 20 97 20 32 30 34 2C 31 3A 99 20 42 24 |" . . 204,1:. B$|
00001480: 3B 3A 4C B2 4C AA 31 00 BB 1C 5A 0A 8B 20 42 24 |;:L.L.1...Z.. B$|
00001490: B2 C7 28 32 30 29 20 B0 20 42 24 B2 22 9D 22 20 |..(20) . B$."." |
000014A0: A7 20 8B 20 4C 20 A7 20 97 20 32 30 34 2C 31 3A |. . L . . 204,1:|
000014B0: 99 20 42 24 3B 3A 4C B2 4C AB 31 00 D9 1C 64 0A |. B$;:L.L.1...d.|
000014C0: 8B 20 42 24 B3 B1 C7 28 31 33 29 20 AF 20 4C B3 |. B$...(13) . L.|
000014D0: 31 34 20 A7 20 32 36 33 30 00 E5 1C 6E 0A 97 20 |14 . 2630...n.. |
000014E0: 32 30 34 2C 31 00 EB 1C 78 0A 3A 00 F5 1C 82 0A |204,1...x.:.....|
000014F0: 52 24 B2 22 22 00 09 1D 8C 0A 81 20 49 B2 31 39 |R$.""...... I.19|
00001500: 34 34 20 A4 20 31 39 35 33 00 22 1D 96 0A 3A 20 |44 . 1953."...: |
00001510: 52 24 B2 52 24 AA C7 28 C2 28 49 29 20 AF 20 35 |R$.R$..(.(I) . 5|
00001520: 31 29 00 28 1D A0 0A 82 00 31 1D AA 0A 9E 20 43 |1).(.....1.... C|
00001530: 50 00 37 1D B4 0A 8E 00 3D 1D BE 0A 3A 00 4D 1D |P.7.....=...:.M.|
00001540: C8 0A 3A 20 52 AF 4F 4D 20 43 4F 44 45 00 53 1D |..: R.OM CODE.S.|
00001550: D2 0A 3A 00 5D 1D DC 0A 52 24 B2 22 22 00 6C 1D |..:.]...R$."".l.|
00001560: E6 0A 81 20 49 B2 31 20 A4 20 31 30 00 86 1D F0 |... I.1 . 10....|
00001570: 0A 3A 20 20 52 24 B2 52 24 AA C7 28 BB 28 49 29 |.: R$.R$..(.(I)|
00001580: AC 34 AA 41 53 29 00 8C 1D FA 0A 82 00 97 1D 04 |.4.AS)..........|
00001590: 0B 9E 20 50 4C 3A 8E 00 9D 1D 0E 0B 3A 00 B0 1D |.. PL:......:...|
000015A0: 18 0B 3A 20 45 58 54 80 20 43 52 59 53 54 41 4C |..: EXT. CRYSTAL|
000015B0: 00 B6 1D 22 0B 3A 00 C1 1D 2C 0B 9E 20 50 4C AA |...".:...,.. PL.|
000015C0: 33 00 C7 1D 36 0B 8E 00 CD 1D 40 0B 3A 00 D8 1D |3...6.....@.:...|
000015D0: 4A 0B 3A 20 57 52 41 50 00 DE 1D 54 0B 3A 00 F2 |J.: WRAP...T.:..|
000015E0: 1D 5E 0B 97 20 43 AB 31 2C 42 42 AB C2 28 43 AB |.^.. C.1,BB..(C.|
000015F0: 31 29 00 FB 1D 68 0B 9E 20 50 4C 00 01 1E 72 0B |1)...h.. PL...r.|
00001600: 8E 00 07 1E 7C 0B 3A 00 14 1E 86 0B 3A 20 31 20 |....|.:.....: 1 |
00001610: 52 AF 4F 4D 00 1A 1E 90 0B 3A 00 2B 1E 9A 0B 8D |R.OM.....:.+....|
00001620: 20 34 32 38 30 2C 43 4F 4C B0 53 00 3B 1E A4 0B | 4280,COL.S.;...|
00001630: 8D 20 33 32 32 30 2C 53 45 45 44 00 4B 1E AE 0B |. 3220,SEED.K...|
00001640: 89 20 32 37 38 30 2C 43 4F 44 45 00 51 1E B8 0B |. 2780,CODE.Q...|
00001650: 3A 00 60 1E C2 0B 3A 20 41 55 A4 50 49 4C 4F 54 |:.`...: AU.PILOT|
00001660: 00 66 1E CC 0B 3A 00 75 1E D6 0B 81 20 49 B2 31 |.f...:.u.... I.1|
00001670: 20 A4 20 35 30 00 82 1E E0 0B 3A 20 8D 20 34 32 | . 50.....: . 42|
00001680: 38 30 00 8F 1E EA 0B 3A 20 8D 20 33 32 32 30 00 |80.....: . 3220.|
00001690: A6 1E F4 0B 3A 20 4F 24 B2 52 24 3A 8B 20 C2 28 |....: O$.R$:. .(|
000016A0: 4B 29 20 A7 20 8E 00 B3 1E FE 0B 3A 20 8D 20 32 |K) . ......: . 2|
000016B0: 37 38 30 00 C4 1E 08 0C 3A 20 8B 20 C2 28 4B 29 |780.....: . .(K)|
000016C0: 20 A7 20 8E 00 CA 1E 12 0C 82 00 DC 1E 1C 0C 8D | . .............|
000016D0: 20 35 39 30 30 3A 89 20 33 30 33 30 00 E2 1E 26 | 5900:. 3030...&|
000016E0: 0C 3A 00 F7 1E 30 0C 3A B2 B2 B2 B2 B2 B2 B2 B2 |.:...0.:........|
000016F0: B2 B2 B2 B2 B2 B2 B2 00 FD 1E 3A 0C 3A 00 12 1F |..........:.:...|
00001700: 44 0C AC 20 20 53 45 45 44 20 45 4E 54 52 59 20 |D.. SEED ENTRY |
00001710: 20 AC 00 18 1F 4E 0C 3A 00 2E 1F 58 0C 3A 20 BB | ....N.:...X.: .|
00001720: 20 45 4E 54 52 59 2C 20 37 20 57 41 59 53 00 34 | ENTRY, 7 WAYS.4|
00001730: 1F 62 0C 3A 00 3F 1F 6C 0C 8D 20 33 32 32 30 00 |.b.:.?.l.. 3220.|
00001740: 48 1F 76 0C 9E 20 50 4C 00 4E 1F 80 0C 8E 00 54 |H.v.. PL.N.....T|
00001750: 1F 8A 0C 3A 00 72 1F 94 0C 49 B2 B5 28 BB 28 49 |...:.r...I..(.(I|
00001760: 29 AC 37 29 3A 8B 20 49 B2 4C 53 20 A7 20 33 32 |).7):. I.LS . 32|
00001770: 32 30 00 82 1F 9E 0C 4C 53 B2 49 3A 97 20 43 47 |20.....LS.I:. CG|
00001780: 2C 2E 00 AA 1F A8 0C 91 20 49 20 89 20 33 33 32 |,....... I . 332|
00001790: 30 2C 33 33 36 30 2C 33 34 32 30 2C 33 35 30 30 |0,3360,3420,3500|
000017A0: 2C 33 35 33 30 2C 33 36 31 30 00 B0 1F B2 0C 3A |,3530,3610.....:|
000017B0: 00 C1 1F BC 0C 8F 20 52 4E 44 20 43 45 4E 54 52 |...... RND CENTR|
000017C0: 45 00 CC 1F C6 0C 9E 20 46 54 2C 2E 00 E1 1F D0 |E...... FT,.....|
000017D0: 0C 97 20 38 33 34 34 2C BB 28 49 29 AC 42 42 AA |.. 8344,.(I).BB.|
000017E0: 31 00 E7 1F DA 0C 8E 00 ED 1F E4 0C 3A 00 03 20 |1...........:.. |
000017F0: EE 0C 3A 20 31 20 BB 20 42 59 54 45 20 41 43 52 |..: 1 . BYTE ACR|
00001800: 4F 53 53 00 16 20 F8 0C 9E 20 46 54 2C BB 28 49 |OSS.. ... FT,.(I|
00001810: 29 AC 42 42 AA 31 00 1C 20 02 0D 8E 00 22 20 0C |).BB.1.. ...." .|
00001820: 0D 3A 00 37 20 16 0D 3A 20 BB 20 42 59 54 45 53 |.:.7 ..: . BYTES|
00001830: 20 41 43 52 4F 53 53 00 4C 20 20 0D 81 20 49 B2 | ACROSS.L .. I.|
00001840: 55 4C 20 A4 20 55 52 20 A9 20 4E 42 00 5E 20 2A |UL . UR . NB.^ *|
00001850: 0D 3A 20 97 20 49 2C BB 28 49 29 AC 42 42 00 64 |.: . I,.(I).BB.d|
00001860: 20 34 0D 82 00 6A 20 3E 0D 8E 00 70 20 48 0D 3A | 4...j >...p H.:|
00001870: 00 86 20 52 0D 3A 20 53 45 56 45 52 41 4C 20 BB |.. R.: SEVERAL .|
00001880: 20 42 59 54 45 53 00 91 20 5C 0D 9E 20 46 54 2C | BYTES.. \.. FT,|
00001890: 2E 00 A8 20 66 0D 81 20 49 B2 55 4C 20 A4 20 38 |... f.. I.UL . 8|
000018A0: 34 30 30 20 A9 20 4E 42 00 C0 20 70 0D 3A 20 49 |400 . NB.. p.: I|
000018B0: B2 49 AA 4E 42 AC B5 28 BB 28 49 29 AC 31 32 29 |.I.NB..(.(I).12)|
000018C0: 00 D2 20 7A 0D 3A 20 97 20 49 2C BB 28 49 29 AC |.. z.: . I,.(I).|
000018D0: 42 42 00 D8 20 84 0D 82 00 DE 20 8E 0D 8E 00 E4 |BB.. ..... .....|
000018E0: 20 98 0D 3A 00 F5 20 A2 0D 3A 20 46 49 4C 4C 20 | ..:.. ..: FILL |
000018F0: 50 B0 54 49 91 00 00 21 AC 0D 9E 20 46 54 2C 2E |P.TI...!... FT,.|
00001900: 00 06 21 B6 0D 3A 00 1B 21 C0 0D 8F 20 43 48 41 |..!..:..!... CHA|
00001910: 4E 47 45 20 50 4F 52 54 49 4F 4E 00 32 21 CA 0D |NGE PORTION.2!..|
00001920: 41 B2 55 4C AA 4E 42 AC B5 28 BB 28 49 29 AC 31 |A.UL.NB..(.(I).1|
00001930: 35 29 00 42 21 D4 0D 42 B2 BB 28 49 29 AC 42 42 |5).B!..B..(I).BB|
00001940: AA 31 00 65 21 DE 0D 81 20 49 B2 41 20 A4 20 41 |.1.e!... I.A . A|
00001950: AA 4E 42 AC B5 28 BB 28 49 29 AC 32 32 AA 34 29 |.NB..(.(I).22.4)|
00001960: 20 A9 20 4E 42 00 71 21 E8 0D 3A 20 97 20 49 2C | . NB.q!..: . I,|
00001970: 42 00 77 21 F2 0D 82 00 7D 21 FC 0D 8E 00 83 21 |B.w!....}!.....!|
00001980: 06 0E 3A 00 97 21 10 0E 3A 20 53 45 4C 45 43 54 |..:..!..: SELECT|
00001990: 20 26 20 52 AF 4F 4D 00 A2 21 1A 0E 9E 20 46 54 | & R.OM..!... FT|
000019A0: 2C 2E 00 BB 21 24 0E 81 20 49 B2 38 32 33 32 20 |,...!$.. I.8232 |
000019B0: A4 20 38 33 31 32 20 A9 20 4E 42 00 CD 21 2E 0E |. 8312 . NB..!..|
000019C0: 3A 20 97 20 49 2C BB 28 49 29 AC 42 42 00 D3 21 |: . I,.(I).BB..!|
000019D0: 38 0E 82 00 E8 21 42 0E 97 20 38 34 34 30 2C BB |8....!B.. 8440,.|
000019E0: 28 49 29 AC 42 42 AA 31 00 EE 21 4C 0E 8E 00 F4 |(I).BB.1..!L....|
000019F0: 21 56 0E 3A 00 09 22 60 0E AC 20 4D 41 4E 55 41 |!V.:.."`.. MANUA|
00001A00: 4C 20 45 4E 54 52 59 20 AC 00 0F 22 6A 0E 3A 00 |L ENTRY ..."j.:.|
00001A10: 20 22 74 0E 99 22 93 22 3A 9E 20 43 55 2C 31 38 | "t..".":. CU,18|
00001A20: 00 47 22 7E 0E 99 22 20 D9 4F 55 20 4D 41 59 20 |.G"~.." .OU MAY |
00001A30: 45 4E 54 45 52 20 53 45 45 44 2D 56 41 4C 55 45 |ENTER SEED-VALUE|
00001A40: 20 42 59 54 45 53 22 00 70 22 88 0E 99 22 20 49 | BYTES".p"..." I|
00001A50: 4E 54 4F 20 41 53 20 4D 41 4E 59 20 43 4F 4E 53 |NTO AS MANY CONS|
00001A60: 45 43 55 54 49 56 45 20 54 4F 50 2D 52 4F 57 22 |ECUTIVE TOP-ROW"|
00001A70: 00 91 22 92 0E 99 22 20 50 4F 53 49 54 49 4F 4E |.."..." POSITION|
00001A80: 53 20 41 53 20 59 4F 55 20 57 49 53 48 2E 22 3A |S AS YOU WISH.":|
00001A90: 99 00 B4 22 9C 0E 99 22 20 D3 54 41 52 54 20 50 |..."..." .TART P|
00001AA0: 4F 53 49 54 49 4F 4E 20 28 31 20 54 4F 20 34 30 |OSITION (1 TO 40|
00001AB0: 29 3A 22 3B 00 C6 22 A6 0E 54 52 B2 31 39 34 3A |):";.."..TR.194:|
00001AC0: 8D 20 35 39 35 30 00 D9 22 B0 0E 41 24 B2 22 32 |. 5950.."..A$."2|
00001AD0: 30 22 3A 9E 20 46 54 2C 2E 00 E4 22 BA 0E 8D 20 |0":. FT,..."... |
00001AE0: 36 39 34 30 00 F6 22 C4 0E 8B 20 41 B1 34 30 20 |6940.."... A.40 |
00001AF0: A7 20 33 37 36 30 00 FC 22 CE 0E 3A 00 0D 23 D8 |. 3760.."..:..#.|
00001B00: 0E 99 22 93 22 3A 9E 20 43 55 2C 31 38 00 3A 23 |..".":. CU,18.:#|
00001B10: E2 0E 99 22 C5 4E 54 45 52 20 43 4F 4E 53 45 43 |...".NTER CONSEC|
00001B20: 55 54 49 56 45 20 53 45 45 44 20 56 41 4C 55 45 |UTIVE SEED VALUE|
00001B30: 53 2C 20 30 20 54 4F 22 42 42 00 55 23 EC 0E 99 |S, 0 TO"BB.U#...|
00001B40: 3A 99 22 D0 52 45 53 53 20 C6 31 20 54 4F 20 51 |:.".RESS .1 TO Q|
00001B50: 55 49 54 3A 22 00 64 23 F6 0E 81 20 49 B2 41 20 |UIT:".d#... I.A |
00001B60: A4 20 34 30 00 85 23 00 0F 3A 20 9E 20 43 55 2C |. 40..#..: . CU,|
00001B70: 32 32 3A 99 22 D0 4F 53 49 54 49 4F 4E 22 20 49 |22:.".OSITION" I|
00001B80: 20 22 9D 3A 22 00 92 23 0A 0F 3A 20 8D 20 36 39 | ".:"..#..: . 69|
00001B90: 33 30 00 AF 23 14 0F 3A 20 8B 20 41 B1 42 42 20 |30..#..: . A.BB |
00001BA0: B0 20 42 24 B1 22 84 22 20 A7 20 33 38 39 30 00 |. B$."." . 3890.|
00001BB0: C3 23 1E 0F 3A 20 97 20 38 31 38 34 AA 49 AC 4E |.#..: . 8184.I.N|
00001BC0: 42 2C 41 00 C9 23 28 0F 82 00 D4 23 32 0F 9E 20 |B,A..#(....#2.. |
00001BD0: 43 50 3A 8E 00 DA 23 3C 0F 3A 00 EE 23 46 0F AC |CP:...#<.:..#F..|
00001BE0: 20 53 45 54 20 55 50 20 4D 45 4E 55 20 AC 00 F4 | SET UP MENU ...|
00001BF0: 23 50 0F 3A 00 0C 24 5A 0F 99 22 93 22 3A 97 20 |#P.:..$Z..".":. |
00001C00: 42 52 2C 2E 3A 97 20 43 AA 33 2C 2E 00 24 24 64 |BR,.:. C.3,..$$d|
00001C10: 0F 8B 20 53 20 A7 20 9E 20 53 43 3A 97 20 43 47 |.. S . . SC:. CG|
00001C20: 2C 2E 3A 8E 00 48 24 6E 0F 4F 24 B2 52 24 3A 52 |,.:..H$n.O$.R$:R|
00001C30: 24 B2 22 30 32 33 30 30 31 31 31 33 33 22 3A 8F |$."0230011133":.|
00001C40: 20 50 41 54 54 45 52 4E 00 5E 24 78 0F 57 B2 C2 | PATTERN.^$x.W..|
00001C50: 28 43 AB 31 29 3A 97 20 43 AB 31 2C 42 42 00 7E |(C.1):. C.1,BB.~|
00001C60: 24 82 0F 43 30 B2 C2 28 43 29 3A 43 31 B2 C2 28 |$..C0..(C):C1..(|
00001C70: 43 AA 31 29 3A 43 32 B2 C2 28 43 AA 32 29 00 9B |C.1):C2..(C.2)..|
00001C80: 24 8C 0F 97 20 43 2C 2E 3A 97 20 43 AA 31 2C 32 |$... C,.:. C.1,2|
00001C90: 32 36 3A 97 20 43 AA 32 2C 31 33 00 A1 24 96 0F |26:. C.2,13..$..|
00001CA0: 3A 00 C6 24 A0 0F 41 B2 55 4C AA 38 30 3A 41 31 |:..$..A.UL.80:A1|
00001CB0: B2 31 34 34 3A 41 32 B2 31 32 39 3A 8F 20 31 53 |.144:A2.129:. 1S|
00001CC0: 54 20 4C 49 4E 45 00 D4 24 AA 0F 9E 20 46 54 2C |T LINE..$... FT,|
00001CD0: 41 31 AA 31 00 E7 24 B4 0F 97 20 55 4C 2C 31 3A |A1.1..$... UL,1:|
00001CE0: 97 20 55 52 2C 41 31 00 11 25 BE 0F 97 20 41 AB |. UR,A1..%... A.|
00001CF0: 4E 42 2C 41 31 3A 97 20 41 2C 41 32 3A 97 20 41 |NB,A1:. A,A2:. A|
00001D00: AA 4E 42 2C 41 32 AB 31 3A 97 20 41 AA 31 36 2C |.NB,A2.1:. A.16,|
00001D10: 2E 00 37 25 C8 0F 42 B2 36 34 3A 81 20 49 B2 41 |..7%..B.64:. I.A|
00001D20: AA 32 34 20 A4 20 38 34 31 32 20 A9 20 4E 42 3A |.24 . 8412 . NB:|
00001D30: 97 20 49 2C 42 3A 82 00 55 25 D2 0F 97 20 49 2C |. I,B:..U%... I,|
00001D40: 2E 3A 97 20 49 AA 4E 42 2C 41 31 3A 97 20 49 AA |.:. I.NB,A1:. I.|
00001D50: 31 36 2C 41 32 00 5B 25 DC 0F 3A 00 69 25 E6 0F |16,A2.[%..:.i%..|
00001D60: 53 B2 42 42 3A 9E 20 43 50 00 6F 25 F0 0F 8E 00 |S.BB:. CP.o%....|
00001D70: 7F 25 FA 0F 3A B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 00 |.%..:...........|
00001D80: 85 25 04 10 3A 00 95 25 0E 10 AC 20 43 4F 4C 4F |.%..:..%... COLO|
00001D90: 55 52 53 20 AC 00 9B 25 18 10 3A 00 C6 25 22 10 |URS ...%..:..%".|
00001DA0: 91 20 48 AB 31 32 20 89 20 34 32 38 30 2C 34 31 |. H.12 . 4280,41|
00001DB0: 35 30 2C 34 31 37 30 2C 34 32 31 30 2C 34 32 33 |50,4170,4210,423|
00001DC0: 30 2C 34 33 38 30 00 CC 25 2C 10 3A 00 E1 25 36 |0,4380..%,.:..%6|
00001DD0: 10 97 20 43 2C 20 C2 28 43 29 AA 31 20 AF 20 31 |.. C, .(C).1 . 1|
00001DE0: 35 00 EC 25 40 10 9E 20 53 43 3A 8E 00 FE 25 4A |5..%@.. SC:...%J|
00001DF0: 10 41 B2 C2 28 43 AA 31 29 20 AF 20 31 35 00 0D |.A..(C.1) . 15..|
00001E00: 26 54 10 41 B2 41 AA 31 20 AF 20 31 35 00 28 26 |&T.A.A.1 . 15.(&|
00001E10: 5E 10 97 20 43 AA 31 2C 20 28 C2 28 43 AA 31 29 |^.. C.1, (.(C.1)|
00001E20: AF 20 32 34 30 29 AA 41 00 33 26 68 10 9E 20 53 |. 240).A.3&h.. S|
00001E30: 43 3A 8E 00 4D 26 72 10 97 20 43 AA 31 2C 20 C2 |C:..M&r.. C.1, .|
00001E40: 28 43 AA 31 29 AA 31 36 20 AF 20 42 42 00 58 26 |(C.1).16 . BB.X&|
00001E50: 7C 10 9E 20 53 43 3A 8E 00 71 26 86 10 97 20 43 ||.. SC:..q&... C|
00001E60: AA 32 2C 20 C2 28 43 AA 32 29 AA 31 20 AF 20 31 |.2, .(C.2).1 . 1|
00001E70: 35 00 7C 26 90 10 9E 20 53 43 3A 8E 00 82 26 9A |5.|&... SC:...&.|
00001E80: 10 3A 00 92 26 A4 10 3A 20 BB 20 43 4F 4C 4F 55 |.:..&..: . COLOU|
00001E90: 52 53 00 98 26 AE 10 3A 00 B8 26 B8 10 97 20 43 |RS..&..:..&... C|
00001EA0: AA 31 2C 42 42 AC BB 28 49 29 3A 41 B2 C2 28 43 |.1,BB..(I):A..(C|
00001EB0: AA 31 29 20 AF 20 31 35 00 D3 26 C2 10 97 20 43 |.1) . 15..&... C|
00001EC0: AA 32 2C BB 28 49 29 AC 31 36 3A 42 B2 C2 28 43 |.2,.(I).16:B..(C|
00001ED0: AA 32 29 00 E4 26 CC 10 8B 20 41 B2 42 20 A7 20 |.2)..&... A.B . |
00001EE0: 34 32 39 30 00 F5 26 D6 10 49 B2 B5 28 BB 28 49 |4290..&..I..(.(I|
00001EF0: 29 AC 31 36 29 00 0C 27 E0 10 8B 20 49 B2 41 20 |).16)..'... I.A |
00001F00: B0 20 49 B2 42 20 A7 20 34 33 38 30 00 16 27 EA |. I.B . 4380..'.|
00001F10: 10 97 20 43 2C 49 00 21 27 F4 10 9E 20 53 43 3A |.. C,I.!'... SC:|
00001F20: 8E 00 27 27 FE 10 3A 00 39 27 08 11 3A 20 53 54 |..''..:.9'..: ST|
00001F30: 44 20 43 4F 4C 4F 55 52 53 00 3F 27 12 11 3A 00 |D COLOURS.?'..:.|
00001F40: 5C 27 1C 11 97 20 43 2C 2E 3A 97 20 43 AA 31 2C |\'... C,.:. C.1,|
00001F50: 32 32 36 3A 97 20 43 AA 32 2C 31 33 00 67 27 26 |226:. C.2,13.g'&|
00001F60: 11 9E 20 53 43 3A 8E 00 6D 27 30 11 3A 00 78 27 |.. SC:..m'0.:.x'|
00001F70: 3A 11 3A AC 20 94 20 AC 00 7E 27 44 11 3A 00 8D |:.:. . ..~'D.:..|
00001F80: 27 4E 11 99 22 93 22 3A 8D 37 35 36 30 00 9C 27 |'N..".":.7560..'|
00001F90: 58 11 8B 20 46 4C B2 2E 20 A7 20 8E 00 AA 27 62 |X.. FL.. . ...'b|
00001FA0: 11 9E 20 43 55 2C 31 37 2C 33 00 D1 27 6C 11 99 |.. CU,17,3..'l..|
00001FB0: 22 D3 41 56 45 20 C3 52 59 53 54 41 4C 20 54 4F |".AVE .RYSTAL TO|
00001FC0: 20 44 49 53 4B 20 41 53 20 D3 C5 C5 C4 20 2D 2D | DISK AS .... --|
00001FD0: 22 00 E3 27 76 11 44 24 B2 22 57 22 3A 8D 20 34 |"..'v.D$."W":. 4|
00001FE0: 36 33 30 00 FE 27 80 11 8B 20 41 B1 31 39 20 B0 |630..'... A.19 .|
00001FF0: 20 42 24 B2 22 85 22 20 A7 20 35 32 36 30 00 04 | B$."." . 5260..|
00002000: 28 8A 11 3A 00 19 28 94 11 81 20 49 B2 55 4C 20 |(..:..(... I.UL |
00002010: A4 20 55 52 20 A9 20 4E 42 00 2A 28 9E 11 3A 20 |. UR . NB.*(..: |
00002020: 98 32 2C C4 28 C2 28 49 29 29 00 30 28 A8 11 82 |.2,.(.(I)).0(...|
00002030: 00 3E 28 B2 11 98 32 2C C2 28 43 AA 31 29 00 4C |.>(...2,.(C.1).L|
00002040: 28 BC 11 98 32 2C C2 28 43 AA 32 29 00 58 28 C6 |(...2,.(C.2).X(.|
00002050: 11 98 32 2C C2 28 43 29 00 6C 28 D0 11 98 32 2C |..2,.(C).l(...2,|
00002060: 52 24 AA C7 28 C2 28 43 AB 31 29 29 00 85 28 DA |R$..(.(C.1))..(.|
00002070: 11 8D 20 34 38 32 30 3A 8B 20 41 B1 31 39 20 A7 |.. 4820:. A.19 .|
00002080: 20 35 32 37 30 00 8B 28 E4 11 3A 00 96 28 EE 11 | 5270..(..:..(..|
00002090: 89 20 35 32 35 30 00 9C 28 F8 11 3A 00 B1 28 02 |. 5250..(..:..(.|
000020A0: 12 3A 20 A1 20 4E 41 4D 45 2C 20 9F 20 46 49 4C |.: . NAME, . FIL|
000020B0: 45 00 B7 28 0C 12 3A 00 C4 28 16 12 4E 24 B2 22 |E..(..:..(..N$."|
000020C0: 43 47 2E 22 00 D6 28 20 12 54 52 B2 31 38 36 3A |CG."..( .TR.186:|
000020D0: 8D 20 35 39 35 30 00 F5 28 2A 12 99 22 11 D0 4C |. 5950..(*.."..L|
000020E0: 45 41 53 45 20 45 4E 54 45 52 20 54 48 45 20 4E |EASE ENTER THE N|
000020F0: 41 4D 45 2E 22 00 0C 29 34 12 99 22 D0 52 45 53 |AME."..)4..".RES|
00002100: 53 20 C6 31 20 45 53 43 41 50 45 22 00 28 29 3E |S .1 ESCAPE".()>|
00002110: 12 99 22 20 20 20 20 20 20 C6 37 20 44 49 52 45 |.." .7 DIRE|
00002120: 43 54 4F 52 59 3A 11 22 00 3D 29 48 12 9E 20 43 |CTORY:.".=)H.. C|
00002130: 55 2C 32 33 3A 99 20 4E 24 22 AF 20 22 00 4D 29 |U,23:. N$". ".M)|
00002140: 52 12 92 20 4B 2C 31 35 3A A1 20 42 24 00 84 29 |R.. K,15:. B$..)|
00002150: 5C 12 8B 20 42 24 B2 C7 28 32 30 29 20 B0 20 42 |\.. B$..(20) . B|
00002160: 24 B2 22 9D 22 20 A7 20 8B 20 C3 28 4E 24 29 B1 |$."." . . .(N$).|
00002170: 33 20 A7 20 4E 24 B2 C8 28 4E 24 2C C3 28 4E 24 |3 . N$..(N$,.(N$|
00002180: 29 AB 31 29 00 AC 29 66 12 8B 20 42 24 B2 C7 28 |).1)..)f.. B$..(|
00002190: 31 33 29 20 A7 20 9E 20 43 55 2C 32 33 3A 99 20 |13) . . CU,23:. |
000021A0: 4E 24 22 20 22 3A 89 20 34 37 39 30 00 BD 29 70 |N$" ":. 4790..)p|
000021B0: 12 8B 20 42 24 B2 22 85 22 20 A7 20 8E 00 DA 29 |.. B$."." . ...)|
000021C0: 7A 12 8B 20 42 24 B2 22 88 22 20 A7 20 8D 20 34 |z.. B$."." . . 4|
000021D0: 39 31 30 3A 89 20 34 36 34 30 00 F7 29 84 12 8B |910:. 4640..)...|
000021E0: 20 42 24 B3 22 2D 22 20 B0 20 42 24 B1 22 5A 22 | B$."-" . B$."Z"|
000021F0: 20 A7 20 34 36 38 30 00 16 2A 8E 12 8B 20 42 24 | . 4680..*... B$|
00002200: B1 22 39 22 20 A7 20 8B 20 42 24 B3 22 41 22 20 |."9" . . B$."A" |
00002210: A7 20 34 36 38 30 00 33 2A 98 12 8B 20 C3 28 4E |. 4680.3*... .(N|
00002220: 24 29 B1 31 35 20 A7 20 4E 24 B2 C8 28 4E 24 2C |$).15 . N$..(N$,|
00002230: 31 35 29 00 47 2A A2 12 4E 24 B2 4E 24 AA 42 24 |15).G*..N$.N$.B$|
00002240: 3A 89 20 34 36 38 30 00 4D 2A AC 12 3A 00 62 2A |:. 4680.M*..:.b*|
00002250: B6 12 8D 20 36 30 31 30 3A 97 20 37 38 38 2C 32 |... 6010:. 788,2|
00002260: 33 37 00 6F 2A C0 12 9F 20 31 2C 38 2C 31 35 00 |37.o*... 1,8,15.|
00002270: 87 2A CA 12 9F 20 32 2C 38 2C 38 2C 4E 24 AA 22 |.*... 2,8,8,N$."|
00002280: 2C 50 2C 22 AA 44 24 00 93 2A D4 12 84 31 2C 41 |,P,".D$..*...1,A|
00002290: 2C 42 24 00 A2 2A DE 12 8B 20 41 B3 32 30 20 A7 |,B$..*... A.20 .|
000022A0: 20 8E 00 B4 2A E8 12 54 52 B2 32 31 30 3A 8D 20 | ...*..TR.210:. |
000022B0: 35 39 35 30 00 D3 2A F2 12 97 20 37 38 38 2C 32 |5950..*... 788,2|
000022C0: 33 34 3A 99 3A 99 22 D0 52 4F 42 4C 45 4D 3A 22 |34:.:.".ROBLEM:"|
000022D0: 20 42 24 00 EA 2A FC 12 99 22 D0 52 45 53 53 20 | B$..*...".RESS |
000022E0: 53 50 41 43 45 20 42 41 52 22 00 FB 2A 06 13 92 |SPACE BAR"..*...|
000022F0: 20 4B 2C 42 42 3A 97 20 4B 2C 2E 00 06 2B 10 13 | K,BB:. K,...+..|
00002300: 8D 20 36 30 31 30 00 1E 2B 1A 13 97 20 37 38 38 |. 6010..+... 788|
00002310: 2C 32 33 34 3A A0 20 32 3A A0 20 31 3A 8E 00 24 |,234:. 2:. 1:..$|
00002320: 2B 24 13 3A 00 59 2B 2E 13 97 20 37 38 38 2C 32 |+$.:.Y+... 788,2|
00002330: 33 39 3A 9F 20 31 2C 38 2C 31 35 3A 9F 20 32 2C |39:. 1,8,15:. 2,|
00002340: 38 2C 30 2C 22 24 30 3A 43 47 2E 2A 22 3A 8F 20 |8,0,"$0:CG.*":. |
00002350: 44 49 52 45 43 54 4F 52 59 00 75 2B 38 13 99 3A |DIRECTORY.u+8..:|
00002360: 84 31 2C 41 2C 42 24 3A 8B 20 41 B1 31 39 20 A7 |.1,A,B$:. A.19 .|
00002370: 20 34 38 35 30 00 91 2B 42 13 97 20 43 47 2C 31 | 4850..+B.. CG,1|
00002380: 30 3A 42 24 B2 C7 28 33 34 29 3A 43 24 B2 22 20 |0:B$..(34):C$." |
00002390: 22 00 B4 2B 4C 13 81 20 49 B2 31 20 A4 20 38 3A |"..+L.. I.1 . 8:|
000023A0: A1 23 32 2C 41 24 2C 41 24 2C 41 24 2C 41 24 2C |.#2,A$,A$,A$,A$,|
000023B0: 41 24 3A 82 00 E2 2B 56 13 8B 20 41 24 B3 B1 42 |A$:...+V.. A$..B|
000023C0: 24 20 A7 20 99 22 CE 4F 20 43 52 59 53 54 41 4C |$ . .".O CRYSTAL|
000023D0: 53 20 4F 4E 20 44 49 53 4B 21 22 3A 89 20 34 38 |S ON DISK!":. 48|
000023E0: 39 30 00 E8 2B 60 13 3A 00 FE 2B 6A 13 81 20 49 |90..+`.:..+j.. I|
000023F0: B2 31 20 A4 20 31 38 3A A1 23 32 2C 41 24 00 1B |.1 . 18:.#2,A$..|
00002400: 2C 74 13 8B 20 41 24 B3 B1 42 24 20 A7 20 99 41 |,t.. A$..B$ . .A|
00002410: 24 3B 3A 82 3A 8F 20 4E 41 4D 45 00 21 2C 7E 13 |$;:.:. NAME.!,~.|
00002420: 3A 00 30 2C 88 13 81 20 49 B2 31 20 A4 20 33 30 |:.0,... I.1 . 30|
00002430: 00 49 2C 92 13 3A 20 A1 23 32 2C 41 24 3A 8B 20 |.I,..: .#2,A$:. |
00002440: 41 24 B2 43 24 20 A7 20 82 00 6D 2C 9C 13 81 20 |A$.C$ . ..m,... |
00002450: 49 B2 31 20 A4 20 34 3A A1 23 32 2C 41 24 2C 41 |I.1 . 4:.#2,A$,A|
00002460: 24 2C 41 24 3A 82 3A 8F 20 53 4B 49 50 00 89 2C |$,A$:.:. SKIP..,|
00002470: A6 13 99 3A A1 23 32 2C 41 24 3A 8B 20 41 24 B2 |...:.#2,A$:. A$.|
00002480: 42 24 20 A7 20 34 39 37 30 00 94 2C B0 13 89 20 |B$ . 4970..,... |
00002490: 34 38 39 30 00 9A 2C BA 13 3A 00 A5 2C C4 13 3A |4890..,..:..,..:|
000024A0: AC 20 93 20 AC 00 AB 2C CE 13 3A 00 BE 2C D8 13 |. . ...,..:..,..|
000024B0: 99 22 93 22 3A 9E 20 43 55 2C 31 37 2C 33 00 DC |.".":. CU,17,3..|
000024C0: 2C E2 13 99 22 CC 4F 41 44 20 C3 52 59 53 54 41 |,...".OAD .RYSTA|
000024D0: 4C 20 46 52 4F 4D 20 C4 49 53 4B 22 00 EE 2C EC |L FROM .ISK"..,.|
000024E0: 13 44 24 B2 22 52 22 3A 8D 20 34 36 33 30 00 09 |.D$."R":. 4630..|
000024F0: 2D F6 13 8B 20 41 B1 31 39 20 B0 20 42 24 B2 22 |-... A.19 . B$."|
00002500: 85 22 20 A7 20 35 32 36 30 00 0F 2D 00 14 3A 00 |." . 5260..-..:.|
00002510: 27 2D 0A 14 81 20 49 B2 38 31 39 32 20 A4 20 38 |'-... I.8192 . 8|
00002520: 35 30 34 20 A9 20 38 00 33 2D 14 14 3A 20 84 32 |504 . 8.3-..: .2|
00002530: 2C 41 24 00 48 2D 1E 14 3A 20 97 20 49 2C C5 28 |,A$.H-..: . I,.(|
00002540: 41 24 29 20 AF 20 42 42 00 4E 2D 28 14 82 00 69 |A$) . BB.N-(...i|
00002550: 2D 32 14 84 32 2C 41 24 3A 97 20 43 AA 31 2C C5 |-2..2,A$:. C.1,.|
00002560: 28 41 24 29 20 AF 20 42 42 00 84 2D 3C 14 84 32 |(A$) . BB..-<..2|
00002570: 2C 41 24 3A 97 20 43 AA 32 2C C5 28 41 24 29 20 |,A$:. C.2,.(A$) |
00002580: AF 20 42 42 00 9D 2D 46 14 84 32 2C 41 24 3A 97 |. BB..-F..2,A$:.|
00002590: 20 43 2C C5 28 41 24 29 20 AF 20 42 42 00 A7 2D | C,.(A$) . BB..-|
000025A0: 50 14 84 32 2C 52 24 00 C6 2D 5A 14 8B 20 C3 28 |P..2,R$..-Z.. .(|
000025B0: 52 24 29 B3 31 31 20 A7 20 97 20 43 AB 31 2C 2E |R$).11 . . C.1,.|
000025C0: 3A 89 35 32 35 30 00 DB 2D 64 14 97 20 43 AB 31 |:.5250..-d.. C.1|
000025D0: 2C C5 28 C9 28 52 24 2C 31 29 29 00 EB 2D 6E 14 |,.(.(R$,1))..-n.|
000025E0: 52 24 B2 C8 28 52 24 2C 31 30 29 00 F1 2D 78 14 |R$..(R$,10)..-x.|
000025F0: 3A 00 FF 2D 82 14 97 20 37 38 38 2C 32 33 34 00 |:..-... 788,234.|
00002600: 0B 2E 8C 14 A0 20 32 3A A0 20 31 00 14 2E 96 14 |..... 2:. 1.....|
00002610: 9E 20 43 50 00 1A 2E A0 14 8E 00 20 2E AA 14 3A |. CP....... ...:|
00002620: 00 30 2E B4 14 3A 20 99 20 43 52 59 53 54 41 4C |.0...: . CRYSTAL|
00002630: 00 36 2E BE 14 3A 00 44 2E C8 14 97 20 37 38 38 |.6...:.D.... 788|
00002640: 2C 32 33 37 00 4F 2E D2 14 9E 20 44 55 AB 33 00 |,237.O.... DU.3.|
00002650: 5F 2E DC 14 50 52 B2 C2 28 31 37 32 29 B2 2E 00 |_...PR..(172)...|
00002660: 86 2E E6 14 8B 20 50 52 B2 2E 20 A7 20 8D 20 35 |..... PR.. . . 5|
00002670: 34 33 30 3A 8D 20 36 32 33 30 3A 9E 20 53 43 3A |430:. 6230:. SC:|
00002680: 89 20 36 30 31 30 00 8C 2E F0 14 3A 00 97 2E FA |. 6010.....:....|
00002690: 14 9E 20 44 55 AA 33 00 A7 2E 04 15 9F 20 34 2C |.. DU.3...... 4,|
000026A0: 34 2C C2 28 53 41 29 00 BA 2E 0E 15 98 34 2C C7 |4,.(SA)......4,.|
000026B0: 28 32 37 29 C7 28 35 30 29 3B 00 C0 2E 18 15 3A |(27).(50);.....:|
000026C0: 00 EC 2E 22 15 8B 20 C2 28 53 41 AA 32 29 20 A7 |...".. .(SA.2) .|
000026D0: 20 98 34 2C C7 28 31 33 29 C7 28 31 34 29 22 C3 | .4,.(13).(14)".|
000026E0: CF C4 C5 3A 20 22 20 52 24 3A 98 34 00 F4 2E 2C |...: " R$:.4...,|
000026F0: 15 A0 20 34 00 02 2F 36 15 97 20 37 38 38 2C 32 |.. 4../6.. 788,2|
00002700: 33 34 00 08 2F 40 15 8E 00 0E 2F 4A 15 3A 00 14 |34../@..../J.:..|
00002710: 2F 54 15 3A 00 29 2F 5E 15 AC 20 51 55 49 54 20 |/T.:.)/^.. QUIT |
00002720: 43 52 59 53 54 41 4C 20 AC 00 2F 2F 68 15 3A 00 |CRYSTAL ..//h.:.|
00002730: 39 2F 72 15 9E 20 42 4F 58 00 60 2F 7C 15 9E 20 |9/r.. BOX.`/|.. |
00002740: 43 55 2C 31 39 2C 2E 3A 81 49 B2 32 31 37 A4 32 |CU,19,.:.I.217.2|
00002750: 34 32 3A 97 49 2C C2 28 49 29 B0 31 32 38 3A 82 |42:.I,.(I).128:.|
00002760: 00 7B 2F 86 15 99 20 A3 32 34 29 22 12 96 D1 55 |.{/... .24)"...U|
00002770: 49 54 20 D0 52 4F 47 52 41 4D 22 00 98 2F 90 15 |IT .ROGRAM"../..|
00002780: 99 20 A3 32 34 29 22 12 2D 20 C1 52 45 20 59 4F |. .24)".- .RE YO|
00002790: 55 20 53 55 52 45 3F 22 00 B1 2F 9A 15 99 20 A3 |U SURE?"../... .|
000027A0: 32 35 29 22 12 C6 31 20 C3 4F 4E 54 49 4E 55 45 |25)"..1 .ONTINUE|
000027B0: 22 00 DF 2F AE 15 99 20 A3 32 35 29 22 12 C6 37 |"../... .25)"..7|
000027C0: 20 D2 45 54 55 52 4E 22 3A 99 20 A3 32 38 29 20 | .ETURN":. .28) |
000027D0: 22 12 54 4F 20 CC CF C1 C4 D3 D4 C1 D2 22 3B 00 |".TO ........";.|
000027E0: E5 2F CC 15 3A 00 F0 2F D6 15 8D 20 36 31 34 30 |./..:../... 6140|
000027F0: 00 FF 2F E0 15 8B 20 52 45 AB 37 20 A7 20 8E 00 |../... RE.7 . ..|
00002800: 1B 30 EA 15 99 22 93 11 11 C7 4F 4F 44 42 59 45 |.0..."....OODBYE|
00002810: 20 46 52 4F 4D 20 2E 2E 2E 11 22 00 41 30 F4 15 | FROM ....".A0..|
00002820: 99 22 11 11 99 C3 A0 D2 20 D9 20 D3 20 D4 20 C1 |."...... . . . .|
00002830: 20 CC 20 20 20 C7 20 C1 20 D2 20 C4 20 C5 20 CE | . . . . . . .|
00002840: 22 00 47 30 FE 15 3A 00 52 30 08 16 9E 20 35 39 |".G0..:.R0... 59|
00002850: 31 38 00 58 30 12 16 3A 00 86 30 1C 16 9F 31 35 |18.X0..:..0...15|
00002860: 2C 38 2C 31 35 2C 22 52 30 3A 48 45 4C 4C 4F 20 |,8,15,"R0:HELLO |
00002870: 43 4F 4E 4E 45 43 54 3D 48 45 4C 4C 4F 20 43 4F |CONNECT=HELLO CO|
00002880: 4E 4E 45 43 54 22 00 94 30 26 16 84 31 35 2C 41 |NNECT"..0&..15,A|
00002890: 3A A0 31 35 00 A1 30 30 16 8B 41 B3 B1 36 33 A7 |:.15..00..A..63.|
000028A0: 80 00 CF 30 3A 16 99 22 93 90 11 11 11 4C 4F 41 |...0:..".....LOA|
000028B0: 44 22 C7 28 33 34 29 22 48 45 4C 4C 4F 20 43 4F |D".(34)"HELLO CO|
000028C0: 4E 4E 45 43 54 22 C7 28 33 34 29 22 2C 38 22 00 |NNECT".(34)",8".|
000028D0: 06 31 44 16 99 22 11 11 11 11 52 55 4E 13 22 3A |.1D.."....RUN.":|
000028E0: 97 32 30 34 38 2C 30 3A 97 34 34 2C 38 3A 97 36 |.2048,0:.44,8:.6|
000028F0: 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 31 |31,13:.632,13:.1|
00002900: 39 38 2C 32 3A 80 00 0C 31 4E 16 3A 00 21 31 58 |98,2:...1N.:.!1X|
00002910: 16 3A AC 20 20 4D 41 49 4E 20 4D 45 4E 55 20 20 |.:. MAIN MENU |
00002920: AC 00 27 31 62 16 3A 00 43 31 6C 16 97 20 37 38 |..'1b.:.C1l.. 78|
00002930: 38 2C 32 33 34 3A 8D 20 33 39 33 30 2C 20 53 45 |8,234:. 3930, SE|
00002940: 54 55 50 00 50 31 76 16 97 20 43 47 2C 31 35 34 |TUP.P1v.. CG,154|
00002950: 00 56 31 80 16 3A 00 7F 31 8A 16 9E 20 43 55 2C |.V1..:..1... CU,|
00002960: 31 33 2C 36 3A 99 A3 31 30 29 22 99 CC CF C1 C4 |13,6:..10)".....|
00002970: D3 D4 C1 D2 20 20 50 52 45 53 45 4E 54 53 22 00 |.... PRESENTS".|
00002980: AA 31 94 16 99 22 96 20 20 20 20 C3 A0 D2 A0 D9 |.1...". .....|
00002990: A0 D3 A0 D4 A0 C1 A0 CC A0 20 20 A0 A0 A0 C7 A0 |......... .....|
000029A0: C1 A0 D2 A0 C4 A0 C5 A0 CE 22 00 DD 31 9E 16 99 |........."..1...|
000029B0: 22 11 99 CD 41 49 4E 20 CD 45 4E 55 3A 20 05 31 |"...AIN .ENU: .1|
000029C0: 20 20 9A C7 52 4F 57 20 53 4F 4D 45 20 C3 52 59 | ..ROW SOME .RY|
000029D0: 53 54 41 4C 53 20 20 20 20 20 20 20 22 00 07 32 |STALS "..2|
000029E0: A8 16 99 A3 31 31 29 22 05 32 20 20 9A C8 45 4C |....11)".2 ..EL|
000029F0: 50 20 2D 20 D0 52 4F 47 52 41 4D 20 C3 4F 4D 4D |P - .ROGRAM .OMM|
00002A00: 41 4E 44 53 20 20 22 00 31 32 B2 16 99 A3 31 31 |ANDS ".12....11|
00002A10: 29 22 05 33 20 20 9A D0 52 49 4E 54 45 52 20 C3 |)".3 ..RINTER .|
00002A20: 4F 4E 54 52 4F 4C 53 20 20 20 20 20 20 20 20 20 |ONTROLS |
00002A30: 22 00 5D 32 BC 16 99 A3 31 31 29 22 05 34 20 20 |".]2....11)".4 |
00002A40: 9A CC 45 41 56 45 20 C3 52 59 53 54 41 4C 20 C7 |..EAVE .RYSTAL .|
00002A50: 41 52 44 45 4E 20 20 20 20 20 20 20 22 00 8E 32 |ARDEN "..2|
00002A60: C6 16 99 22 11 99 20 20 20 20 D0 52 45 53 53 20 |...".. .RESS |
00002A70: 41 20 CE 55 4D 42 45 52 20 4F 52 20 C6 55 4E 43 |A .UMBER OR .UNC|
00002A80: 54 49 4F 4E 20 CB 45 59 20 20 20 20 20 22 00 94 |TION .EY "..|
00002A90: 32 D0 16 3A 00 C0 32 DA 16 99 22 9A 20 20 20 20 |2..:..2...". |
00002AA0: C2 59 20 20 C9 41 4E 20 C1 44 41 4D 20 20 20 20 |.Y .AN .DAM |
00002AB0: 20 20 D6 41 4E 43 4F 55 56 45 52 20 C2 C3 99 22 | .ANCOUVER ..."|
00002AC0: 00 D8 32 E4 16 97 20 53 31 2C 32 31 3A 97 20 53 |..2... S1,21:. S|
00002AD0: 31 AA 32 30 2C 31 34 33 00 F7 32 EE 16 81 20 49 |1.20,143..2... I|
00002AE0: B2 32 30 20 A4 20 4B 20 A9 20 32 30 3A 97 20 53 |.20 . K . 20:. S|
00002AF0: 31 AB 33 2C 49 3A 82 00 03 33 F8 16 97 20 53 31 |1.3,I:...3... S1|
00002B00: 2C 32 30 00 09 33 02 17 3A 00 1C 33 0C 17 49 B2 |,20..3..:..3..I.|
00002B10: BB 28 AB C2 28 53 31 AA 32 33 29 29 00 22 33 16 |.(..(S1.23))."3.|
00002B20: 17 8E 00 28 33 20 17 3A 00 3A 33 2A 17 8F 20 52 |...(3 .:.:3*.. R|
00002B30: 45 56 45 41 4C 20 4D 45 4E 55 00 40 33 34 17 3A |EVEAL MENU.@34.:|
00002B40: 00 5A 33 3E 17 41 B2 C2 28 43 47 29 3A 8B 20 41 |.Z3>.A..(CG):. A|
00002B50: B2 2E 20 A7 20 41 B2 32 35 30 00 63 33 48 17 42 |.. . A.250.c3H.B|
00002B60: B2 AB 38 00 6E 33 52 17 89 20 36 30 35 30 00 74 |..8.n3R.. 6050.t|
00002B70: 33 5C 17 3A 00 87 33 66 17 8F 20 43 4F 4E 43 45 |3\.:..3f.. CONCE|
00002B80: 41 4C 20 4D 45 4E 55 00 8D 33 70 17 3A 00 A7 33 |AL MENU..3p.:..3|
00002B90: 7A 17 41 B2 C2 28 43 47 29 3A 8B 20 41 B3 35 30 |z.A..(CG):. A.50|
00002BA0: 20 A7 20 41 B2 35 30 00 AF 33 84 17 42 B2 38 00 | . A.50..3..B.8.|
00002BB0: B9 33 8E 17 54 52 B2 42 42 00 BF 33 98 17 3A 00 |.3..TR.BB..3..:.|
00002BC0: D7 33 A2 17 8B 20 C2 28 43 AA 31 29 B2 33 32 20 |.3... .(C.1).32 |
00002BD0: A7 20 42 B2 42 AD 34 00 EA 33 AC 17 81 20 49 B2 |. B.B.4..3... I.|
00002BE0: 41 20 A4 20 54 52 20 A9 20 42 00 02 34 B6 17 3A |A . TR . B..4..:|
00002BF0: 20 97 20 43 47 2C 49 20 AF 20 42 42 3A 4A B2 42 | . CG,I . BB:J.B|
00002C00: AE 32 00 08 34 C0 17 82 00 1D 34 CA 17 8B 20 54 |.2..4.....4... T|
00002C10: 52 B2 42 42 20 A7 20 97 20 43 47 2C 2E 00 29 34 |R.BB . . CG,..)4|
00002C20: D4 17 54 52 B2 32 36 3A 8E 00 2F 34 DE 17 3A 00 |..TR.26:../4..:.|
00002C30: 43 34 E8 17 3A 20 46 55 4E 43 54 49 91 20 4B 45 |C4..: FUNCTI. KE|
00002C40: 59 20 85 00 49 34 F2 17 3A 00 59 34 FC 17 99 22 |Y ..I4..:.Y4..."|
00002C50: 13 22 3A 92 20 4B 2C 31 35 00 6B 34 06 18 A1 20 |.":. K,15.k4... |
00002C60: 41 24 3A 52 45 B2 C5 28 41 24 29 00 A5 34 10 18 |A$:RE..(A$)..4..|
00002C70: 8B 20 41 24 B1 22 84 22 20 A7 20 8B 20 41 24 B3 |. A$."." . . A$.|
00002C80: 22 8C 22 20 A7 20 52 45 B2 32 AC C6 28 41 24 29 |"." . RE.2..(A$)|
00002C90: AB 32 36 35 3A 8B 20 52 45 B1 37 20 A7 20 52 45 |.265:. RE.7 . RE|
00002CA0: B2 52 45 AB 37 00 BB 34 1A 18 8B 20 41 24 B2 C7 |.RE.7..4... A$..|
00002CB0: 28 31 33 29 20 A7 20 52 45 B2 31 00 D1 34 24 18 |(13) . RE.1..4$.|
00002CC0: 8B 20 52 45 20 A7 20 8B 20 52 45 B3 38 20 A7 20 |. RE . . RE.8 . |
00002CD0: 8E 00 DC 34 2E 18 89 20 36 31 34 30 00 E2 34 38 |...4... 6140..48|
00002CE0: 18 3A 00 F5 34 42 18 3A AC 20 99 45 52 20 9A 52 |.:..4B.:. .ER .R|
00002CF0: 4F 4C 53 20 AC 00 FB 34 4C 18 3A 00 06 35 56 18 |OLS ...4L.:..5V.|
00002D00: 99 22 9E 93 11 22 00 3A 35 60 18 41 24 B2 22 20 |."...".:5`.A$." |
00002D10: 20 20 12 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00002D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002D30: 20 20 20 20 20 22 3A 99 41 24 00 68 35 6A 18 99 | ":.A$.h5j..|
00002D40: 22 20 20 20 12 20 20 20 C3 52 59 53 54 41 4C 20 |" . .RYSTAL |
00002D50: C7 41 52 44 45 4E 20 20 20 20 46 4F 52 20 54 48 |.ARDEN FOR TH|
00002D60: 45 20 36 34 20 20 20 22 00 70 35 74 18 99 41 24 |E 64 ".p5t..A$|
00002D70: 00 90 35 7E 18 99 20 A3 34 38 29 22 05 D0 52 49 |..5~.. .48)"..RI|
00002D80: 4E 54 45 52 20 C3 4F 4E 54 52 4F 4C 53 3A 11 22 |NTER .ONTROLS:."|
00002D90: 00 A1 35 88 18 54 52 B2 32 34 3A 8D 20 35 39 35 |..5..TR.24:. 595|
00002DA0: 30 00 C7 35 92 18 97 20 37 38 38 2C 32 33 39 3A |0..5... 788,239:|
00002DB0: 9E 20 44 55 AB 33 3A 97 20 37 38 38 2C 32 33 34 |. DU.3:. 788,234|
00002DC0: 3A 8F 20 54 45 53 54 00 D7 35 9C 18 50 52 B2 C2 |:. TEST..5..PR..|
00002DD0: 28 31 37 32 29 B2 30 00 E9 35 A6 18 8B 20 50 52 |(172).0..5... PR|
00002DE0: B2 30 20 A7 20 37 30 34 30 00 EF 35 B0 18 3A 00 |.0 . 7040..5..:.|
00002DF0: F8 35 BA 18 8F 20 4F 4B 00 FE 35 C4 18 3A 00 2C |.5... OK..5..:.,|
00002E00: 36 CE 18 99 20 A3 34 33 29 22 D4 48 45 20 53 45 |6... .43)".HE SE|
00002E10: 43 4F 4E 44 41 52 59 20 41 44 44 52 45 53 53 20 |CONDARY ADDRESS |
00002E20: 46 4F 52 20 54 45 58 54 20 49 53 22 00 5B 36 D8 |FOR TEXT IS".[6.|
00002E30: 18 99 22 20 20 20 53 45 54 20 54 4F 22 20 C2 28 |.." SET TO" .(|
00002E40: 53 41 29 20 22 46 4F 52 20 55 50 50 45 52 2F 4C |SA) "FOR UPPER/L|
00002E50: 4F 57 45 52 20 43 41 53 45 2C 22 00 80 36 E2 18 |OWER CASE,"..6..|
00002E60: 99 22 20 20 20 54 45 58 54 20 4D 4F 44 45 2C 20 |." TEXT MODE, |
00002E70: 41 55 54 4F 20 4C 49 4E 45 20 46 45 45 44 2E 22 |AUTO LINE FEED."|
00002E80: 00 AF 36 EC 18 99 20 A3 34 33 29 22 D4 48 45 20 |..6... .43)".HE |
00002E90: 53 45 43 4F 4E 44 41 52 59 20 41 44 44 52 45 53 |SECONDARY ADDRES|
00002EA0: 53 20 46 4F 52 20 47 52 41 50 48 49 43 53 22 00 |S FOR GRAPHICS".|
00002EB0: E0 36 F6 18 99 22 20 20 20 49 53 20 53 45 54 20 |.6..." IS SET |
00002EC0: 54 4F 22 20 C2 28 53 41 AA 31 29 20 22 46 4F 52 |TO" .(SA.1) "FOR|
00002ED0: 20 47 52 41 50 48 49 43 53 20 4D 4F 44 45 2C 22 | GRAPHICS MODE,"|
00002EE0: 00 F8 36 00 19 99 22 20 20 20 CE CF 20 4C 49 4E |..6..." .. LIN|
00002EF0: 45 20 46 45 45 44 2E 22 00 25 37 0A 19 99 20 A3 |E FEED.".%7... .|
00002F00: 34 33 29 22 D0 4C 45 41 53 45 20 43 48 45 43 4B |43)".LEASE CHECK|
00002F10: 20 54 48 45 20 4D 41 4E 55 41 4C 20 46 4F 52 20 | THE MANUAL FOR |
00002F20: 59 4F 55 52 22 00 51 37 14 19 99 22 20 20 20 50 |YOUR".Q7..." P|
00002F30: 52 49 4E 54 45 52 20 4F 52 20 49 4E 54 45 52 46 |RINTER OR INTERF|
00002F40: 41 43 45 20 46 4F 52 20 44 45 54 41 49 4C 53 2E |ACE FOR DETAILS.|
00002F50: 22 00 7C 37 1E 19 99 20 A3 34 35 29 22 C6 31 20 |".|7... .45)".1 |
00002F60: 20 C3 48 41 4E 47 45 20 53 45 43 4F 4E 44 41 52 | .HANGE SECONDAR|
00002F70: 59 20 41 44 44 52 45 53 53 45 53 22 00 9D 37 28 |Y ADDRESSES"..7(|
00002F80: 19 99 20 A3 35 29 22 C6 33 20 20 D0 52 49 4E 54 |.. .5)".3 .RINT|
00002F90: 20 48 45 4C 50 20 53 43 52 45 45 4E 22 00 B7 37 | HELP SCREEN"..7|
00002FA0: 3C 19 99 20 A3 35 29 22 C6 37 20 20 CD 41 49 4E |<.. .5)".7 .AIN|
00002FB0: 20 4D 45 4E 55 22 3B 00 D6 37 46 19 8D 20 36 31 | MENU";..7F.. 61|
00002FC0: 34 30 3A 8B 20 28 52 45 20 AF 20 31 29 B2 2E 20 |40:. (RE . 1).. |
00002FD0: A7 20 36 34 37 30 00 EA 37 50 19 8B 20 52 45 B2 |. 6470..7P.. RE.|
00002FE0: 31 20 A7 20 8D 20 36 36 32 30 00 FE 37 5A 19 8B |1 . . 6620..7Z..|
00002FF0: 20 52 45 B2 33 20 A7 20 8D 20 36 35 34 30 00 0D | RE.3 . . 6540..|
00003000: 38 6E 19 8B 20 52 45 B2 37 20 A7 20 8E 00 18 38 |8n.. RE.7 . ...8|
00003010: 78 19 89 20 36 32 33 30 00 1E 38 82 19 3A 00 2C |x.. 6230..8..:.,|
00003020: 38 8C 19 97 20 37 38 38 2C 32 33 39 00 40 38 96 |8... 788,239.@8.|
00003030: 19 9F 20 34 2C 34 2C C2 28 53 41 29 3A 9D 20 34 |.. 4,4,.(SA):. 4|
00003040: 00 52 38 A0 19 8D 20 37 33 32 30 3A 98 34 3A A0 |.R8... 7320:.4:.|
00003050: 20 34 00 60 38 AA 19 97 20 37 38 38 2C 32 33 34 | 4.`8... 788,234|
00003060: 00 66 38 B4 19 8E 00 6C 38 BE 19 3A 00 80 38 C8 |.f8....l8..:..8.|
00003070: 19 53 45 54 20 53 45 43 27 59 20 41 44 44 52 53 |.SET SEC'Y ADDRS|
00003080: 00 86 38 D2 19 3A 00 B7 38 DC 19 99 22 93 05 22 |..8..:..8...".."|
00003090: 20 A3 32 34 33 29 22 D4 48 45 20 54 45 58 54 20 | .243)".HE TEXT |
000030A0: 53 45 43 4F 4E 44 41 52 59 20 41 44 44 52 45 53 |SECONDARY ADDRES|
000030B0: 53 20 4D 55 53 54 22 00 E2 38 E6 19 99 22 20 20 |S MUST"..8..." |
000030C0: 20 42 45 20 53 45 54 20 46 4F 52 20 55 50 50 45 | BE SET FOR UPPE|
000030D0: 52 20 41 4E 44 20 4C 4F 57 45 52 20 43 41 53 45 |R AND LOWER CASE|
000030E0: 2C 22 00 0C 39 F0 19 99 22 20 20 20 54 45 58 54 |,"..9..." TEXT|
000030F0: 20 4D 4F 44 45 2C 20 41 55 54 4F 4D 41 54 49 43 | MODE, AUTOMATIC|
00003100: 20 4C 49 4E 45 20 46 45 45 44 2E 22 00 3A 39 FA | LINE FEED.".:9.|
00003110: 19 99 20 A3 31 36 33 29 22 C9 46 20 4E 45 43 45 |.. .163)".F NECE|
00003120: 53 53 41 52 59 2C 20 43 48 45 43 4B 20 59 4F 55 |SSARY, CHECK YOU|
00003130: 52 20 4D 41 4E 55 41 4C 2E 22 00 69 39 04 1A 99 |R MANUAL.".i9...|
00003140: 20 A3 31 36 33 29 22 C5 4E 54 45 52 20 53 45 43 | .163)".NTER SEC|
00003150: 4F 4E 44 41 52 59 20 41 44 44 52 45 53 53 2C 20 |ONDARY ADDRESS, |
00003160: 4F 52 20 50 52 45 53 53 22 00 84 39 0E 1A 99 22 |OR PRESS"..9..."|
00003170: 20 20 20 D2 C5 D4 D5 D2 CE 20 46 4F 52 22 20 C2 | ...... FOR" .|
00003180: 28 53 41 29 00 8F 39 18 1A 8D 20 36 39 33 30 00 |(SA)..9... 6930.|
00003190: A5 39 22 1A 8B 20 41 20 A7 20 97 20 53 41 2C 41 |.9".. A . . SA,A|
000031A0: 20 AF 20 42 42 00 AB 39 2C 1A 3A 00 DD 39 36 1A | . BB..9,.:..96.|
000031B0: 99 22 93 05 22 20 A3 32 34 33 29 22 D4 48 45 20 |.".." .243)".HE |
000031C0: 43 52 59 53 54 41 4C 53 20 43 41 4E 20 4F 4E 4C |CRYSTALS CAN ONL|
000031D0: 59 20 42 45 20 50 52 49 4E 54 45 44 22 00 07 3A |Y BE PRINTED"..:|
000031E0: 40 1A 99 22 20 20 20 4F 4E 20 41 4E 20 C5 50 53 |@.." ON AN .PS|
000031F0: 4F 4E 2D 43 4F 4D 50 41 54 49 42 4C 45 20 50 52 |ON-COMPATIBLE PR|
00003200: 49 4E 54 45 52 2E 22 00 36 3A 4A 1A 99 20 A3 31 |INTER.".6:J.. .1|
00003210: 32 33 29 22 D4 48 45 20 53 45 43 4F 4E 44 41 52 |23)".HE SECONDAR|
00003220: 59 20 41 44 44 52 45 53 53 20 4D 55 53 54 20 42 |Y ADDRESS MUST B|
00003230: 45 20 53 45 54 22 00 5F 3A 54 1A 99 22 20 20 20 |E SET"._:T.." |
00003240: 46 4F 52 20 54 52 41 4E 53 50 41 52 45 4E 54 20 |FOR TRANSPARENT |
00003250: 47 52 41 50 48 49 43 53 20 4D 4F 44 45 2C 22 00 |GRAPHICS MODE,".|
00003260: 8B 3A 5E 1A 99 22 20 20 20 CE CF 20 4C 49 4E 45 |.:^.." .. LINE|
00003270: 20 46 45 45 44 2E 20 20 C1 20 56 41 4C 55 45 20 | FEED. . VALUE |
00003280: 4F 46 20 35 20 57 4F 52 4B 53 22 00 B4 3A 68 1A |OF 5 WORKS"..:h.|
00003290: 99 22 20 20 20 46 4F 52 20 4D 4F 53 54 20 49 4E |." FOR MOST IN|
000032A0: 54 45 52 46 41 43 45 53 3B 20 20 48 4F 57 45 56 |TERFACES; HOWEV|
000032B0: 45 52 2C 22 00 D3 3A 72 1A 99 22 20 20 20 54 48 |ER,"..:r.." TH|
000032C0: 45 20 D4 59 4D 41 43 20 4E 45 45 44 53 20 41 20 |E .YMAC NEEDS A |
000032D0: 36 2E 22 00 02 3B 7C 1A 99 20 A3 31 32 33 29 22 |6."..;|.. .123)"|
000032E0: C5 4E 54 45 52 20 53 45 43 4F 4E 44 41 52 59 20 |.NTER SECONDARY |
000032F0: 41 44 44 52 45 53 53 2C 20 4F 52 20 50 52 45 53 |ADDRESS, OR PRES|
00003300: 53 22 00 1F 3B 86 1A 99 22 20 20 20 D2 C5 D4 D5 |S"..;..." ....|
00003310: D2 CE 20 46 4F 52 22 20 C2 28 53 41 AA 31 29 00 |.. FOR" .(SA.1).|
00003320: 2A 3B 90 1A 8D 20 36 39 33 30 00 42 3B 9A 1A 8B |*;... 6930.B;...|
00003330: 20 41 20 A7 20 97 20 53 41 AA 31 2C 41 20 AF 20 | A . . SA.1,A . |
00003340: 42 42 00 6D 3B A4 1A 99 22 93 05 11 11 11 11 C3 |BB.m;...".......|
00003350: 52 59 53 54 41 4C 53 20 41 52 45 20 4E 4F 52 4D |RYSTALS ARE NORM|
00003360: 41 4C 4C 59 20 50 52 49 4E 54 45 44 22 00 8F 3B |ALLY PRINTED"..;|
00003370: AE 1A 99 22 57 49 54 48 20 41 20 53 50 41 43 45 |..."WITH A SPACE|
00003380: 20 42 45 54 57 45 45 4E 20 54 48 45 4D 2E 22 00 | BETWEEN THEM.".|
00003390: B4 3B B8 1A 99 22 11 11 11 D0 52 45 53 53 3A 11 |.;..."....RESS:.|
000033A0: 22 3A 99 20 22 C6 31 20 20 4F 4B 2D 20 52 45 54 |":. ".1 OK- RET|
000033B0: 55 52 4E 22 00 E3 3B C2 1A 99 22 C6 37 20 20 53 |URN"..;...".7 S|
000033C0: 45 54 20 50 52 49 4E 54 4F 55 54 53 20 57 49 54 |ET PRINTOUTS WIT|
000033D0: 48 20 4E 4F 20 53 50 41 43 45 20 42 45 54 57 45 |H NO SPACE BETWE|
000033E0: 45 4E 22 00 10 3C CC 1A 99 22 20 20 20 49 4D 41 |EN"..<..." IMA|
000033F0: 47 45 53 2E 20 20 D4 48 49 53 20 41 4C 4C 4F 57 |GES. .HIS ALLOW|
00003400: 53 20 59 4F 55 20 54 4F 20 45 58 54 45 4E 44 22 |S YOU TO EXTEND"|
00003410: 00 3F 3C D6 1A 99 22 20 20 20 41 20 43 52 59 53 |.?<..." A CRYS|
00003420: 54 41 4C 20 41 4E 44 20 50 52 49 4E 54 20 49 54 |TAL AND PRINT IT|
00003430: 20 41 53 20 4F 4E 45 20 49 4D 41 47 45 2E 22 00 | AS ONE IMAGE.".|
00003440: 5C 3C E0 1A 8D 20 36 31 34 30 3A 97 20 53 41 AA |\<... 6140:. SA.|
00003450: 32 2C 31 30 AC B6 28 52 45 B3 37 29 00 67 3C EA |2,10..(RE.7).g<.|
00003460: 1A 52 45 B2 31 3A 8E 00 6D 3C F4 1A 3A 00 7C 3C |.RE.1:..m<..:.|<|
00003470: FE 1A 3A 20 85 20 4E 55 4D 42 45 52 00 82 3C 08 |..: . NUMBER..<.|
00003480: 1B 3A 00 8C 3C 12 1B 41 24 B2 22 22 00 A3 3C 1C |.:..<..A$.""..<.|
00003490: 1B 9E 20 43 55 2C 32 33 3A 99 20 41 24 22 AF 20 |.. CU,23:. A$". |
000034A0: 20 20 22 00 B3 3C 26 1B 92 20 4B 2C 31 35 3A A1 | "..<&.. K,15:.|
000034B0: 20 42 24 00 EB 3C 30 1B 8B 20 42 24 B2 C7 28 32 | B$..<0.. B$..(2|
000034C0: 30 29 20 B0 20 42 24 B2 C7 28 31 35 37 29 20 A7 |0) . B$..(157) .|
000034D0: 20 8B 20 C3 28 41 24 29 20 A7 20 41 24 B2 C8 28 | . .(A$) . A$..(|
000034E0: 41 24 2C C3 28 41 24 29 AB 31 29 00 0F 3D 3A 1B |A$,.(A$).1)..=:.|
000034F0: 8B 20 42 24 B2 C7 28 31 33 29 20 B0 20 42 24 B1 |. B$..(13) . B$.|
00003500: 22 84 22 20 A7 20 41 B2 C5 28 41 24 29 3A 8E 00 |"." . A..(A$):..|
00003510: 2C 3D 44 1B 8B 20 42 24 B3 22 30 22 20 B0 20 42 |,=D.. B$."0" . B|
00003520: 24 B1 22 39 22 20 A7 20 36 39 34 30 00 47 3D 4E |$."9" . 6940.G=N|
00003530: 1B 8B 20 C3 28 41 24 29 B1 32 20 A7 20 41 24 B2 |.. .(A$).2 . A$.|
00003540: C8 28 41 24 2C 32 29 00 5B 3D 58 1B 41 24 B2 41 |.(A$,2).[=X.A$.A|
00003550: 24 AA 42 24 3A 89 20 36 39 34 30 00 61 3D 62 1B |$.B$:. 6940.a=b.|
00003560: 3A 00 6E 3D 6C 1B 3A 20 4E 4F 20 99 45 52 00 74 |:.n=l.: NO .ER.t|
00003570: 3D 76 1B 3A 00 9C 3D 80 1B 99 20 A3 34 35 29 22 |=v.:..=... .45)"|
00003580: D4 48 45 52 45 20 49 53 20 4E 4F 20 50 52 49 4E |.HERE IS NO PRIN|
00003590: 54 45 52 20 41 43 54 49 56 45 2E 22 00 C6 3D 8A |TER ACTIVE."..=.|
000035A0: 1B 99 20 A3 34 35 29 22 C9 46 20 59 4F 55 20 48 |.. .45)".F YOU H|
000035B0: 41 56 45 20 41 20 50 52 49 4E 54 45 52 2C 20 50 |AVE A PRINTER, P|
000035C0: 4C 45 41 53 45 22 00 EB 3D 94 1B 99 20 A3 35 29 |LEASE"..=... .5)|
000035D0: 22 43 48 45 43 4B 20 54 48 41 54 20 49 54 20 49 |"CHECK THAT IT I|
000035E0: 53 20 50 52 4F 50 45 52 4C 59 22 00 16 3E 9E 1B |S PROPERLY"..>..|
000035F0: 99 20 A3 35 29 22 43 4F 4E 4E 45 43 54 45 44 2C |. .5)"CONNECTED,|
00003600: 20 48 41 53 20 50 41 50 45 52 20 41 56 41 49 4C | HAS PAPER AVAIL|
00003610: 41 42 4C 45 2C 22 00 33 3E A8 1B 99 20 A3 35 29 |ABLE,".3>... .5)|
00003620: 22 41 4E 44 20 49 53 20 54 55 52 4E 45 44 20 4F |"AND IS TURNED O|
00003630: 4E 2E 22 00 55 3E B2 1B 99 20 A3 31 36 35 29 22 |N.".U>... .165)"|
00003640: C6 31 20 20 41 43 54 49 56 41 54 45 20 50 52 49 |.1 ACTIVATE PRI|
00003650: 4E 54 45 52 22 00 71 3E BC 1B 99 20 A3 35 29 22 |NTER".q>... .5)"|
00003660: C6 33 20 20 42 41 43 4B 20 54 4F 20 4D 45 4E 55 |.3 BACK TO MENU|
00003670: 22 00 8A 3E C6 1B 8D 20 36 31 34 30 3A 8B 20 52 |"..>... 6140:. R|
00003680: 45 B2 31 20 A7 20 36 32 33 30 00 90 3E D0 1B 8E |E.1 . 6230..>...|
00003690: 00 96 3E DA 1B 3A 00 AD 3E E4 1B 3A AC 20 20 48 |..>..:..>..:. H|
000036A0: 45 4C 50 20 53 43 52 45 45 4E 20 20 AC 00 B3 3E |ELP SCREEN ...>|
000036B0: EE 1B 3A 00 C0 3E F8 1B 99 22 93 05 12 96 22 3B |..:..>..."....";|
000036C0: 00 D1 3E 02 1C 54 52 B2 32 34 3A 8D 20 35 39 35 |..>..TR.24:. 595|
000036D0: 30 00 E4 3E 0C 1C 97 20 43 AA 33 2C 39 3A 97 20 |0..>... C.3,9:. |
000036E0: 42 52 2C 39 00 EA 3E 16 1C 3A 00 FA 3E 20 1C 8B |BR,9..>..:..> ..|
000036F0: 20 50 52 20 A7 20 37 32 32 30 00 37 3F 2A 1C 44 | PR . 7220.7?*.D|
00003700: 24 B2 22 12 96 20 20 20 20 20 20 20 20 20 20 20 |$.".. |
00003710: D0 52 45 53 53 20 C6 31 20 54 4F 20 52 45 54 55 |.RESS .1 TO RETU|
00003720: 52 4E 20 20 20 20 20 20 20 20 20 20 9D 94 20 22 |RN .. "|
00003730: 3A 89 20 37 32 34 30 00 6D 3F 34 1C 44 24 B2 22 |:. 7240.m?4.D$."|
00003740: 12 96 20 20 20 20 20 C6 31 20 D2 45 54 55 52 4E |.. .1 .ETURN|
00003750: 20 20 20 20 20 20 20 20 C6 35 20 D0 52 49 4E 54 | .5 .RINT|
00003760: 20 50 41 47 45 20 20 20 20 9D 94 20 22 00 73 3F | PAGE .. ".s?|
00003770: 3E 1C 3A 00 7E 3F 48 1C 8D 20 37 33 32 30 00 8F |>.:.~?H.. 7320..|
00003780: 3F 52 1C 9E 20 43 55 2C 32 34 3A 99 44 24 3B 00 |?R.. CU,24:.D$;.|
00003790: 9F 3F 5C 1C 92 20 4B 2C 31 35 3A A1 20 41 24 00 |.?\.. K,15:. A$.|
000037A0: C3 3F 66 1C 8B 20 41 24 B2 22 35 22 20 B0 20 41 |.?f.. A$."5" . A|
000037B0: 24 B2 22 87 22 20 A7 20 8B 20 50 52 20 A7 20 36 |$."." . . PR . 6|
000037C0: 35 34 30 00 C9 3F 70 1C 8E 00 CF 3F 7A 1C 3A 00 |540..?p....?z.:.|
000037D0: DF 3F 84 1C 3A 20 48 45 4C 50 20 54 45 58 54 00 |.?..: HELP TEXT.|
000037E0: E5 3F 8E 1C 3A 00 17 40 98 1C 99 22 20 20 20 C3 |.?..:..@..." .|
000037F0: D2 D9 D3 D4 C1 CC 20 C7 C1 D2 C4 C5 CE 20 20 20 |...... ...... |
00003800: 2D 2D 20 20 20 C8 45 4C 50 20 D3 43 52 45 45 4E |-- .ELP .CREEN|
00003810: 20 20 20 20 22 3A 99 00 2A 40 A2 1C 97 20 36 34 | ":..*@... 64|
00003820: 36 2C 31 3A 9E 20 43 55 2C 31 00 59 40 AC 1C 99 |6,1:. CU,1.Y@...|
00003830: 22 D4 48 45 53 45 20 41 52 45 20 54 48 45 20 43 |".HESE ARE THE C|
00003840: 4F 4D 4D 41 4E 44 53 20 57 48 49 4C 45 20 56 49 |OMMANDS WHILE VI|
00003850: 45 57 49 4E 47 3A 22 3A 99 00 83 40 B6 1C 99 22 |EWING:":...@..."|
00003860: C3 52 59 53 54 41 4C 3A 20 CE 20 20 CE 45 57 20 |.RYSTAL: . .EW |
00003870: C3 52 59 53 54 41 4C 2C 20 41 55 54 4F 4D 41 54 |.RYSTAL, AUTOMAT|
00003880: 49 43 22 00 A5 40 C0 1C 99 20 A3 39 29 22 CD 20 |IC"..@... .9)". |
00003890: 20 CE 45 57 20 C3 52 59 53 54 41 4C 2C 20 4D 41 | .EW .RYSTAL, MA|
000038A0: 4E 55 41 4C 22 00 C7 40 CA 1C 99 20 A3 39 29 22 |NUAL"..@... .9)"|
000038B0: D8 20 20 C5 58 54 45 4E 44 20 53 41 4D 45 20 43 |. .XTEND SAME C|
000038C0: 52 59 53 54 41 4C 22 00 F1 40 D4 1C 99 20 A3 39 |RYSTAL"..@... .9|
000038D0: 29 22 D7 20 20 D4 55 52 4E 20 50 41 54 54 45 52 |)". .URN PATTER|
000038E0: 4E 2D 57 52 41 50 20 4F 4E 20 4F 52 20 4F 46 46 |N-WRAP ON OR OFF|
000038F0: 22 00 19 41 DE 1C 99 20 A3 39 29 22 D2 20 20 D2 |"..A... .9)". .|
00003900: 41 4E 44 4F 4D 20 43 52 59 53 54 41 4C 20 41 4E |ANDOM CRYSTAL AN|
00003910: 44 20 43 4F 4C 4F 52 53 22 00 44 41 E8 1C 99 20 |D COLORS".DA... |
00003920: A3 39 29 22 C1 20 20 C1 55 54 4F 50 49 4C 4F 54 |.9)". .UTOPILOT|
00003930: 20 20 28 41 4E 59 20 4B 45 59 20 3D 20 51 55 49 | (ANY KEY = QUI|
00003940: 54 29 11 22 00 70 41 F2 1C 99 22 D3 45 45 44 3A |T).".pA...".EED:|
00003950: 20 20 20 20 D6 20 20 D6 41 52 59 20 50 41 54 54 | . .ARY PATT|
00003960: 45 52 4E 20 28 41 55 54 4F 20 53 45 45 44 29 22 |ERN (AUTO SEED)"|
00003970: 00 99 41 FC 1C 99 20 A3 39 29 22 C5 20 20 C5 4E |..A... .9)". .N|
00003980: 54 45 52 20 CE 45 57 20 D3 45 45 44 2C 20 4D 41 |TER .EW .EED, MA|
00003990: 4E 55 41 4C 4C 59 22 3A 99 00 BD 41 06 1D 99 22 |NUALLY":...A..."|
000039A0: C3 4F 4C 4F 52 53 3A 20 C6 31 20 20 C2 41 43 4B |.OLORS: .1 .ACK|
000039B0: 47 52 4F 55 4E 44 20 C3 4F 4C 4F 52 22 00 DB 41 |GROUND .OLOR"..A|
000039C0: 10 1D 99 20 A3 38 29 22 C6 33 20 20 C3 48 41 4E |... .8)".3 .HAN|
000039D0: 47 45 20 C3 4F 4C 4F 52 20 31 22 00 F9 41 1A 1D |GE .OLOR 1"..A..|
000039E0: 99 20 A3 38 29 22 C6 35 20 20 C3 48 41 4E 47 45 |. .8)".5 .HANGE|
000039F0: 20 C3 4F 4C 4F 52 20 32 22 00 17 42 24 1D 99 20 | .OLOR 2"..B$.. |
00003A00: A3 38 29 22 C6 37 20 20 C3 48 41 4E 47 45 20 C3 |.8)".7 .HANGE .|
00003A10: 4F 4C 4F 52 20 33 22 00 36 42 2E 1D 99 20 A3 38 |OLOR 3".6B... .8|
00003A20: 29 22 C6 38 20 20 D3 54 41 4E 44 41 52 44 20 C3 |)".8 .TANDARD .|
00003A30: 4F 4C 4F 52 53 22 00 54 42 38 1D 99 20 A3 39 29 |OLORS".TB8.. .9)|
00003A40: 22 C3 20 20 D2 41 4E 44 4F 4D 20 C3 4F 4C 4F 52 |". .ANDOM .OLOR|
00003A50: 53 22 3A 99 00 82 42 42 1D 99 22 C5 58 54 52 41 |S":...BB..".XTRA|
00003A60: 53 3A 20 20 D0 20 20 D0 52 49 4E 54 20 43 52 59 |S: . .RINT CRY|
00003A70: 53 54 41 4C 20 28 C5 50 53 4F 4E 2D 54 59 50 45 |STAL (.PSON-TYPE|
00003A80: 29 22 00 A5 42 4C 1D 99 20 A3 39 29 22 D3 20 20 |)"..BL.. .9)". |
00003A90: D3 41 56 45 20 43 52 59 53 54 41 4C 20 54 4F 20 |.AVE CRYSTAL TO |
00003AA0: 44 49 53 4B 22 00 CA 42 56 1D 99 20 A3 39 29 22 |DISK"..BV.. .9)"|
00003AB0: CC 20 20 CC 4F 41 44 20 43 52 59 53 54 41 4C 20 |. .OAD CRYSTAL |
00003AC0: 46 52 4F 4D 20 44 49 53 4B 22 00 F1 42 60 1D 99 |FROM DISK"..B`..|
00003AD0: 20 A3 39 29 22 D1 20 20 D1 55 49 54 20 2D 20 42 | .9)". .UIT - B|
00003AE0: 41 43 4B 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 |ACK TO MAIN MENU|
00003AF0: 22 00 F7 42 6A 1D 8E 00 FD 42 74 1D 3A 00 03 43 |"..Bj....Bt.:..C|
00003B00: 7E 1D 3A 00 12 43 88 1D 99 22 93 22 3A 8D 35 39 |~.:..C...".":.59|
00003B10: 35 30 00 41 43 92 1D 99 22 11 11 11 20 20 20 20 |50.AC..."... |
00003B20: 20 05 D3 41 56 45 20 50 49 43 54 55 52 45 20 49 | ..AVE PICTURE I|
00003B30: 4E 20 57 48 49 43 48 20 46 4F 52 4D 41 54 3F 11 |N WHICH FORMAT?.|
00003B40: 22 00 58 43 9C 1D 99 22 11 20 20 20 20 20 20 20 |".XC...". |
00003B50: 9E CB 9B 4F 41 4C 41 22 00 76 43 A6 1D 99 22 11 |...OALA".vC...".|
00003B60: 20 20 20 20 20 20 20 9E C1 9B 44 56 41 4E 43 45 | ...DVANCE|
00003B70: 44 20 CF C3 D0 22 00 A0 43 B0 1D 99 22 11 20 20 |D ..."..C...". |
00003B80: 20 20 20 20 20 9E D3 9B 45 45 44 20 28 4D 41 54 | ...EED (MAT|
00003B90: 48 45 4D 41 54 49 43 41 4C 20 44 41 54 41 29 22 |HEMATICAL DATA)"|
00003BA0: 00 B8 43 BA 1D 99 22 11 11 20 20 20 20 20 20 20 |..C...".. |
00003BB0: 9F C5 9A 58 49 54 9C 22 00 C8 43 C4 1D 92 4B 2C |...XIT."..C...K,|
00003BC0: 31 35 20 3A 20 A1 41 24 00 DB 43 CE 1D 8B 41 24 |15 : .A$..C...A$|
00003BD0: B3 B1 22 53 22 A7 89 37 36 35 30 00 EA 43 D8 1D |.."S"..7650..C..|
00003BE0: 46 4C B2 31 3A 89 37 36 37 30 00 FD 43 E2 1D 8B |FL.1:.7670..C...|
00003BF0: 41 24 B3 B1 22 45 22 A7 89 37 36 39 30 00 06 44 |A$.."E"..7690..D|
00003C00: EC 1D 46 4C B2 30 00 17 44 F6 1D 99 22 93 22 3A |..FL.0..D...".":|
00003C10: 8D 36 30 31 30 3A 8E 00 1D 44 00 1E 3A 00 30 44 |.6010:...D..:.0D|
00003C20: 0A 1E 8B 41 24 B3 B1 22 4B 22 A7 89 37 37 36 30 |...A$.."K"..7760|
00003C30: 00 3A 44 14 1E 4D 4C B2 31 30 00 62 44 1E 1E 45 |.:D..ML.10.bD..E|
00003C40: 4E 24 B2 22 05 CB 4F 41 4C 41 22 3A 55 4E 24 B2 |N$."..OALA":UN$.|
00003C50: 22 27 12 C1 92 50 49 43 20 27 20 50 52 45 46 49 |"'...PIC ' PREFI|
00003C60: 58 22 00 79 44 28 1E 8D 20 37 38 36 30 3A 8B 4D |X".yD(.. 7860:.M|
00003C70: 53 B2 2E A7 89 37 36 36 30 00 95 44 32 1E 97 37 |S....7660..D2..7|
00003C80: 38 38 2C 32 33 39 3A 9E 35 36 33 32 3A 97 37 38 |88,239:.5632:.78|
00003C90: 38 2C 32 33 34 00 B1 44 3C 1E 89 37 36 36 30 3A |8,234..D<..7660:|
00003CA0: 20 8F 20 47 45 54 20 42 41 43 4B 20 4A 4F 2D 4A | . GET BACK JO-J|
00003CB0: 4F 00 B7 44 46 1E 3A 00 CA 44 50 1E 8B 41 24 B3 |O..DF.:..DP..A$.|
00003CC0: B1 22 41 22 A7 89 37 36 32 30 00 DB 44 5A 1E 4D |."A"..7620..DZ.M|
00003CD0: 4C B2 31 32 3A 50 58 24 B2 22 22 00 F3 44 64 1E |L.12:PX$.""..Dd.|
00003CE0: 45 4E 24 B2 22 05 C1 44 56 41 4E 43 45 44 20 CF |EN$."..DVANCED .|
00003CF0: C3 D0 22 00 0B 45 6E 1E 55 4E 24 B2 22 27 4D 50 |.."..En.UN$."'MP|
00003D00: 49 43 27 20 53 55 46 46 49 58 22 00 22 45 78 1E |IC' SUFFIX"."Ex.|
00003D10: 8D 20 37 38 36 30 3A 8B 4D 53 B2 2E A7 89 37 36 |. 7860:.MS....76|
00003D20: 36 30 00 3E 45 82 1E 97 37 38 38 2C 32 33 39 3A |60.>E...788,239:|
00003D30: 9E 35 36 33 35 3A 97 37 38 38 2C 32 33 34 00 5E |.5635:.788,234.^|
00003D40: 45 8C 1E 89 37 36 36 30 3A 20 8F 20 54 4F 20 57 |E...7660: . TO W|
00003D50: 45 52 45 20 59 4F 55 20 42 45 4C 4F 4E 47 00 64 |ERE YOU BELONG.d|
00003D60: 45 96 1E 3A 00 89 45 A0 1E 3A AB AB AB AB AB AB |E..:..E..:......|
00003D70: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
00003D80: AB AB AB AB AB AB AB AB AB 00 8F 45 AA 1E 3A 00 |...........E..:.|
00003D90: BF 45 B4 1E 99 22 93 11 11 9B 20 20 D0 4C 45 41 |.E...".... .LEA|
00003DA0: 53 45 20 45 4E 54 45 52 20 22 3B 45 4E 24 3B 22 |SE ENTER ";EN$;"|
00003DB0: 9B 20 46 49 4C 45 4E 41 4D 45 20 2D 2D 11 22 00 |. FILENAME --.".|
00003DC0: EF 45 BE 1E 99 22 20 20 20 20 20 20 20 20 5B CD |.E..." [.|
00003DD0: 41 58 49 4D 55 4D 20 4F 46 05 22 3B 4D 4C 3B 22 |AXIMUM OF.";ML;"|
00003DE0: 20 9B 43 48 41 52 41 43 54 45 52 53 5D 11 22 00 | .CHARACTERS].".|
00003DF0: 06 46 C8 1E 99 22 20 20 20 20 20 20 20 20 9F 5B |.F..." .[|
00003E00: 20 22 3B 55 4E 24 00 30 46 D2 1E 99 22 20 20 20 | ";UN$.0F..." |
00003E10: 20 20 20 20 20 20 20 20 20 49 53 20 CE CF D4 20 | IS ... |
00003E20: 52 45 51 55 49 52 45 44 2E 5D 11 11 11 11 05 22 |REQUIRED.]....."|
00003E30: 00 56 46 DC 1E 4D 53 B2 2E 20 3A 20 42 53 24 B2 |.VF..MS.. : BS$.|
00003E40: 22 22 20 3A 20 4C 24 B2 22 A4 A4 A4 A4 A4 A4 A4 |"" : L$.".......|
00003E50: A4 A4 A4 A4 A4 22 00 7F 46 E6 1E 99 22 91 1D 1D |....."..F..."...|
00003E60: 1D 1D 1D 1D 22 3B 42 53 24 3B C9 28 4C 24 2C 4D |....";BS$;.(L$,M|
00003E70: 4C AB 4D 53 29 3A 92 4B 2C 31 35 3A A1 41 24 00 |L.MS):.K,15:.A$.|
00003E80: 96 46 F0 1E 8B 41 24 B2 22 85 22 A7 4D 53 B2 2E |.F...A$.".".MS..|
00003E90: 3A 89 37 39 35 30 00 AB 46 FA 1E 8B 41 24 B3 B1 |:.7950..F...A$..|
00003EA0: C7 28 31 33 29 A7 89 37 39 36 30 00 BB 46 04 1F |.(13)..7960..F..|
00003EB0: 8B 4D 53 B1 2E A7 89 38 30 34 30 00 C8 46 0E 1F |.MS....8040..F..|
00003EC0: 99 22 93 22 20 3A 20 8E 00 E4 46 18 1F 8B 41 24 |."." : ...F...A$|
00003ED0: B3 B1 22 9D 22 AF 41 24 B3 B1 C7 28 32 30 29 A7 |..".".A$...(20).|
00003EE0: 37 39 39 30 00 04 47 22 1F 8B 4D 53 B1 30 A7 4D |7990..G"..MS.0.M|
00003EF0: 53 B2 4D 53 AB 31 3A 42 53 24 B2 C8 28 42 53 24 |S.MS.1:BS$..(BS$|
00003F00: 2C 4D 53 29 00 0F 47 2C 1F 89 20 37 39 31 30 00 |,MS)..G,.. 7910.|
00003F10: 20 47 36 1F 8B 41 24 B3 22 30 22 A7 37 39 31 30 | G6..A$."0".7910|
00003F20: 00 41 47 40 1F 8B 28 41 24 B1 22 39 22 AF 41 24 |.AG@..(A$."9".A$|
00003F30: B3 22 41 22 29 B0 41 24 B1 22 5A 22 A7 37 39 31 |."A").A$."Z".791|
00003F40: 30 00 51 47 4A 1F 8B 4D 53 B2 4D 4C A7 37 39 31 |0.QGJ..MS.ML.791|
00003F50: 30 00 6E 47 54 1F 42 53 24 B2 42 53 24 AA 41 24 |0.nGT.BS$.BS$.A$|
00003F60: 3A 4D 53 B2 4D 53 AA 31 3A 89 37 39 31 30 00 74 |:MS.MS.1:.7910.t|
00003F70: 47 5E 1F 3A 00 86 47 68 1F 8B 4D 4C B3 B1 31 30 |G^.:..Gh..ML..10|
00003F80: A7 89 38 30 36 30 00 BF 47 72 1F 46 53 24 B2 C8 |..8060..Gr.FS$..|
00003F90: 28 C7 28 31 32 39 29 AA 22 50 49 43 20 22 AA 42 |(.(129)."PIC ".B|
00003FA0: 53 24 AA 22 20 20 20 20 20 20 20 20 20 20 22 2C |S$." ",|
00003FB0: 31 35 29 3A 4D 53 B2 31 35 3A 89 38 30 37 30 00 |15):MS.15:.8070.|
00003FC0: F4 47 7C 1F 42 53 24 B2 42 53 24 AA 22 20 20 20 |.G|.BS$.BS$." |
00003FD0: 20 20 20 20 20 20 20 20 22 3A 46 53 24 B2 C8 28 | ":FS$..(|
00003FE0: 42 53 24 2C 31 32 29 AA 22 4D 50 49 43 22 3A 4D |BS$,12)."MPIC":M|
00003FF0: 53 B2 31 36 00 21 48 86 1F 81 58 B2 31 A4 4D 53 |S.16.!H...X.1.MS|
00004000: 3A 97 28 28 46 4D AB 31 29 AA 58 29 2C C6 28 CA |:.((FM.1).X),.(.|
00004010: 28 46 53 24 2C 58 2C 31 29 29 3A 82 3A 99 22 93 |(FS$,X,1)):.:.".|
00004020: 22 00 39 48 90 1F 97 35 37 31 32 2C 4D 53 20 3A |".9H...5712,MS :|
00004030: 20 4D 53 B2 31 20 3A 20 8E 00 64 48 10 27 9F 31 | MS.1 : ..dH.'.1|
00004040: 35 2C 38 2C 31 35 2C 22 53 30 3A 43 47 2E 42 41 |5,8,15,"S0:CG.BA|
00004050: 53 22 3A A0 31 35 3A 94 22 43 47 2E 42 41 53 22 |S":.15:."CG.BAS"|
00004060: 2C 38 3A 80 00 00 00 |,8:.... |
....D.. CRYSTAL GARDEN.+.N.. BY IAN A
DAM.1.X.:.N.... VANCOUVER B.C. CANADA.G
.... (C) MARCH 1989.M...:.S. .:.~...
. ".";.....:...... CODE IS FIRST:...H.:.
..R.R$."00".....:.I.... PROGRAMMER NOTES
:.O...:...... VARIABLES:.....:.....CPLOT
. 5900.....PLOT . 5903...".SCOLR . 590
9.*.,.CURSR . 5912.;.6.DUMP . 5924.L.@.
BOX . 5933.].J.FT . 5939.N.T.C
. 5952..^.CG . 5957...H.SA . 5960
...R.FM . 22.256.240:. FILENAME BASE...|
.:.D.... 940.J...:.P...:.....: JUMP TABL
E:.....:...... CPLOT : COLOURS & PLOT
.%.B.. PLOT : DRAW SCREEN.G.L.: .S R
ULE FROM FIRST VARIABLE.`.V.: . C.1, 128
. 0 , ......: WRAP PATTERN AROUND, . .
.....:...... PLOT.3 : EXT. THE SAME.I.
... SCOLR : SET SCREEN COLOURS.....:
. C, BACKGROUND COLOUR.....: . C.1, CO
LOUR BYTES.....: . C.2, COLOUR NIBBLES.$
.&.:.?.0.. CURSR, ROW [,COLUMN].D.:.: SE
T CURS. ROW & OPTI.AL COLUMN.J.D.:...N..
CURSR.3 : SET SPLIT SCREEN...X.: . CG,
0 ALL GRAPHICS.D.B.: . CG, 40 ALL
TEXT...L.: . CG, 218 ... SPLIT...V.:...
... CURSR.6 : CANCEL SPLIT ETC..#.... DU
MP.3 : CHECK . .ER.@...: B(172). 0 MEAN
S .ER OK.F...:.].... DUMP : . TEXT.}.
... DUMP.3 : . HI.RES SCREEN...... DUMP
.6 : CATCH NMI, ERR....F.: . C.6 & 7 WI
TH LINE NUMBER.D.P.:...Z.. BOX : POP
MESSAGE BOX.....: . C.4, BOX COLOUR....
.:. .... BOX.3 : RECALL SCREEN.C.... F
.P,N : FILL .P LINE WITH N.I...:.O...:.
`. .: M.E MEM.Y:.F.*.:...4.FROM 5888 10
BYTES OF STRUCTURE...>.. C.3, TEXT BAC
KGROUND COLOUR.O.H.. SA, 2NDARY ADDRES
S, TEXT...R.. SA.1, '' '' , GRAPH
ICS...\.. SA.2, 10 . LF, 0 . ....F.:...P
.: . . THESE, EXECUTE:.4.Z.:.N.... 4,4,7
:. 4:. 200.930.[....4: 4:..A...:.G...:.
....BB.255:UL.8192:UR.8504:NB.8:AS.48...
..K.198:S1.54276:TR.26:BR.53280.....:.E.
J.. SET SEED:.K.T.:...... FT,0:. PL.....
. 8416,232.....R$."1031031332".....:....
.. SET COLOURS:.....:.9.... C,4:. C.1,21
6:. C.2,..?.$.:.R.... PLOT SCREEN:.X.8.:
.Q.B.. 53265,27:. 53269,....L.. 5915:. E
NABLE SPLITSCREEN...V.. C.1,.:. WRAP...`
.R$."1031031332".S.J.. CP:. COLOURS, & P
LOT.Y.T.:...~.. CHECK PRINTER:.....:....
.. 5921.....PR.B(172).0.....:.'.... MORE
SETUP:.-...:.H.D.. 5930:. ALTER VECTORS
.U.N.J..(.TI).[.X.:.K.... S1.20,128.....
. S1.3,70:. S1.11,K:. S1.16,BB:. S1.14,1
29...... S1.1,7:. S1.2,217:. S1.20,..B..
.:.U.... MORE IMAGES:.....:...... I.1 .
2000:....(.R$."3302032210"...2.. FT,....
<.. I.8296 . 8400 . 8:. I,20:..I.F.. C,5
:. C.1,33:. C.2,..R.P.. CP.X.Z.:.K.D.. I
.1 . 2000:...N.R$."0023010110"...X.. FT
,0...... 8336,2:. 8416,48...... C,0:. C.
1,34:. C.2,14.F.... CP.X. .. I.1 . 999:.
...... I.1 . 6.....: A.(I . 1).16.2.....
: . C.1,A:. SC.1.H.: . J.1 . 500.25.A.50
0.(I.2):..7.R...M.... I.50 . 242 . 16.[.
..: . C.1,I.F...: . SC.Y...: . J.1 . 99:
...........:.....:...".. ON HIDDEN SCRE
EN:...,.:...6.. CG,252...@..".LOADSTAR P
RESENTS...".32)"(C) 1989"...J.." CR
YSTAL GARDEN FOR THE 64".1.T.." ..
........................".X.^.." WHAT
YOU HAVE JUST SEEN IS A"...H.." DEMONSTR
ATION OF A NEW GRAPHICS"...R.." STRUCTUR
E, A COMPLEX ARTFORM THAT IS".Z.|.." GRO
WN ENTIRELY WITHIN YOUR COMPUTER."......
" MUCH LIKE FRACTALS, THESE CRYSTALS ARE
".7...." GENERATED BY A SIMPLE SET OF RU
LES.":..C...." BY VARYING THE STRUCTUR
E, YOU CAN"......" CREATE A NEAR-INFINIT
E VARIETY OF"......" CRYSTALLINE IMAGES
EFFORTLESSLY. YOU"......" CAN CHOOSE TH
E SEED ON WHICH THE"...B.." CRYSTALS GRO
W, AND DEFINE THEIR".3.L.." RULES OF GRO
WTH. THE COMPUTER".\.V.." TAKES IT FROM
THERE, AND CREATES".S...." YOUR IMAGES.
":......." VIDEO WALLPAPER? YES, IT'S
THAT,".H...." BUT CRYSTAL GARDEN IS MUC
H, MUCH"......" MORE..... PRESS RETUR
N TO FIND OUT.";.....:...... REVEAL IT..
...:.).&.. I.250 . 26 ..8.<.0.: . CG,I:J
.1.1.B.:...H.D.:.[.N.. MAIN PROGRAM.A.X.
:.U.B.R$."0120123123"...L.. K,15:. K,...
.V.:...... 5740, TITLE & BEEP.....:.....
. 6140, RESP.SE...... REPLY . 2030, 7160
, 6230, 5490.....:...... 1920.....:...F.
. ========...P.:.!.Z.: ENTER LOOP.'...:.
2.... 6010.O.... C,C0:. C.1,C1:. C.2,C2.
]...R$.O$:S...I.... C.1,W.~...I.LS:. 324
0,SEED... ..".":. CP...*.:...4.. * VIEWI
NG LOOP *...>.:.L.H.A.B(C.2):. SELECT CO
LOUR...R.. A.. . A.12...\.. 646,A:. CU,2
0...F.:...P.. I.. . 999:. AWAIT INPUT.).
Z.: . B(K) . 2380./.....5...:.D...."CRYS
TAL: .N. NEW .M. MANUAL .X. EXTEND"....
.. B(C.1).127 . . " .W. NO";:. 2230
......" .W. DO";.K...." WRAP .R. RA
NDOM .A. AUTOPILOT"......"SEED: .V. V
ARY .E. ENTER MANUALLY".+.J.."COLORS: .
FKEYS. .C. RANDOM . Q=QUIT ".Z.T.
."OUTPUT: .S. SAVE .L. LOAD .P. PRINT
.".`...:.}...TR.210:. 5950:A..:. SHOW...
..:...... 5900...... I.. . 1600.....: .
B(K) . 2370.........$.:...... SC:. 6010:
. 2120:. TRY AGAIN...8.:...B.. CG,.:. SC
...L.. B$...V.. H.1 . 18.@.`.: . J("NXWR
AVPMESLQC.....",H,1)..B$ . .:H...F.J.:.A
.T.. H.12 . . 4130:. 2120...~.. H . 2780
,2860,2910,2970,3030,3180,5320,2570,3700
,4430,5080...... H.12 . S..:..D.... H .
2120...... E(B$) . H.(27.E(B$).(E(B$).8)
).2:B$."":. 2420...... A . 2200...... 21
20.'....................-.D.:.B.N.. COD
E ENTRY ..H.X.:.A...: R$ IS 1ST VARIABL
E.G...:.{...: MANUAL ENTRY:.....:......"
.":. CU,18......"THE CRYSTAL IS GROWN US
ING A STRUCTURE"......"OF TEN DIGITS, EA
CH 0 TO 3."...(..".ENTER A CODE, THEN PR
ESS RETURN:".$.2.L..:. CU,23:. R$".".6.<
.TR.194:. 5950.G.F.. 204,.:. B$...P.. (B
$."/" . B$."4") . B$." " . B$."." . . 20
4,1:. B$;:L.L.1...Z.. B$.G(20) . B$."."
. . L . . 204,1:. B$;:L.L.1.Y.D.. B$..G(
13) . L.14 . 2630...N.. 204,1...X.:.....
R$.""...... I.1944 . 1953."...: R$.R$.G(
B(I) . 51).(. ...1.... CP.7.....=...:.M.
H.: R.OM CODE.S.R.:.]...R$."".L.... I.1
. 10.....: R$.R$.G(.(I).4.AS)..........
.. PL:......:.....: EXT. CRYSTAL...".:.A
.,.. PL.3.G.6...M.@.:.X.J.: WRAP...T.:..
.^.. C.1,BB.B(C.1)...H.. PL...R.....|.:.
....: 1 R.OM.....:.+.... 4280,COL.S.;...
. 3220,SEED.K.... 2780,CODE.Q...:.`.B.:
AU.PILOT.F.L.:.U.V.. I.1 . 50.....: . 42
80.....: . 3220.....: O$.R$:. B(K) . ...
...: . 2780.D...: . B(K) . ..J..........
5900:. 3030...&.:...0.:................
..:.:...D.. SEED ENTRY ....N.:...X.: .
ENTRY, 7 WAYS.4.B.:.?.L.. 3220.H.V.. PL
.N.....T...:.R...I..(.(I).7):. I.LS . 32
20.....LS.I:. CG,....... I . 3320,3360,3
420,3500,3530,3610.....:.A.... RND CENTR
E.L.F.. FT,....P.. 8344,.(I).BB.1...Z...
....:.. ..: 1 . BYTE ACROSS.. ... FT,.(I
).BB.1.. ...." ..:.7 ..: . BYTES ACROSS.
L .. I.UL . UR . NB.^ *.: . I,.(I).BB.D
4...J >...P H.:.. R.: SEVERAL . BYTES..
\.. FT,... F.. I.UL . 8400 . NB.. P.: I
.I.NB..(.(I).12).R Z.: . I,.(I).BB.X ...
.. ..... ..:.. ..: FILL P.TI...!... FT,.
..!..:..!... CHANGE PORTION.2!J.A.UL.NB.
.(.(I).15).B!T.B..(I).BB.1.E!... I.A . A
.NB..(.(I).22.4) . NB.Q!..: . I,B.W!....
}!.....!..:..!..: SELECT & R.OM..!... FT
,...!$.. I.8232 . 8312 . NB.M!..: . I,.(
I).BB.S!8....!B.. 8440,.(I).BB.1..!L....
!V.:.."`.. MANUAL ENTRY ..."J.:. "T.."."
:. CU,18.G"~.." YOU MAY ENTER SEED-VALUE
BYTES".P"..." INTO AS MANY CONSECUTIVE
TOP-ROW".."..." POSITIONS AS YOU WISH.":
..."..." START POSITION (1 TO 40):";.F".
.TR.194:. 5950.Y"..A$."20":. FT,..."...
6940.."D.. A.40 . 3760.."N.:..#X..".":.
CU,18.:#..."ENTER CONSECUTIVE SEED VALUE
S, 0 TO"BB.U#...:."PRESS F1 TO QUIT:".D#
... I.A . 40..#..: . CU,22:."POSITION" I
".:"..#..: . 6930..#..: . A.BB . B$."."
. 3890.C#..: . 8184.I.NB,A.I#(...T#2..
CP:..Z#<.:..#F.. SET UP MENU ...#P.:..$Z
..".":. BR,.:. C.3,..$$D.. S . . SC:. CG
,.:..H$N.O$.R$:R$."0230011133":. PATTERN
.^$X.W.B(C.1):. C.1,BB.~$..C0.B(C):C1.B(
C.1):C2.B(C.2)..$... C,.:. C.1,226:. C.2
,13..$..:.F$ .A.UL.80:A1.144:A2.129:. 1S
T LINE.T$... FT,A1.1..$... UL,1:. UR,A1.
.%... A.NB,A1:. A,A2:. A.NB,A2.1:. A.16,
..7%H.B.64:. I.A.24 . 8412 . NB:. I,B:..
U%R.. I,.:. I.NB,A1:. I.16,A2.[%..:.I%..
S.BB:. CP.O%....%..:............%..:..%
... COLOURS ...%..:.F%".. H.12 . 4280,41
50,4170,4210,4230,4380.L%,.:..%6.. C, B(
C).1 . 15..%@.. SC:...%J.A.B(C.1) . 15..
&T.A.A.1 . 15.(&^.. C.1, (B(C.1). 240).A
.3&H.. SC:..M&R.. C.1, B(C.1).16 . BB.X&
|.. SC:..Q&... C.2, B(C.2).1 . 15.|&...
SC:...&..:..&..: . COLOURS..&..:..&... C
.1,BB..(I):A.B(C.1) . 15.S&B.. C.2,.(I).
16:B.B(C.2)..&L.. A.B . 4290..&V.I..(.(I
).16)..'... I.A . I.B . 4380..'... C,I.!
'... SC:..''..:.9'..: STD COLOURS.?'..:.
\'... C,.:. C.1,226:. C.2,13.G'&.. SC:..
M'0.:.X':.:. . ..~'D.:..'N..".":.7560..'
X.. FL.. . ...'B.. CU,17,3.Q'L.."SAVE CR
YSTAL TO DISK AS SEED --"..'V.D$."W":. 4
630..'... A.19 . B$."." . 5260..(..:..(.
.. I.UL . UR . NB.*(..: .2,D(B(I)).0(...
.>(...2,B(C.1).L(...2,B(C.2).X(F..2,B(C)
.L(P..2,R$.G(B(C.1))..(Z.. 4820:. A.19 .
5270..(..:..(... 5250..(..:..(..: . NAM
E, . FILE..(..:.D(..N$."CG.".V( .TR.186:
. 5950..(*..".PLEASE ENTER THE NAME."..)
4.."PRESS F1 ESCAPE".()>.." F7 DIRE
CTORY:.".=)H.. CU,23:. N$". ".M)R.. K,15
:. B$..)\.. B$.G(20) . B$."." . . C(N$).
3 . N$.H(N$,C(N$).1)..)F.. B$.G(13) . .
CU,23:. N$" ":. 4790..)P.. B$."." . ..Z)
Z.. B$."." . . 4910:. 4640..)... B$."-"
. B$."Z" . 4680..*... B$."9" . . B$."A"
. 4680.3*... C(N$).15 . N$.H(N$,15).G*..
N$.N$.B$:. 4680.M*..:.B*... 6010:. 788,2
37.O*... 1,8,15..*J.. 2,8,8,N$.",P,".D$.
.*T..1,A,B$..*... A.20 . ...*..TR.210:.
5950.S*... 788,234:.:."PROBLEM:" B$..*..
."PRESS SPACE BAR"..*... K,BB:. K,...+..
. 6010..+... 788,234: 2: 1:..$+$.:.Y+.
.. 788,239:. 1,8,15:. 2,8,0,"$0:CG.*":.
DIRECTORY.U+8..:.1,A,B$:. A.19 . 4850..+
B.. CG,10:B$.G(34):C$." "..+L.. I.1 . 8:
.#2,A$,A$,A$,A$,A$:...+V.. A$..B$ . ."NO
CRYSTALS ON DISK!":. 4890..+`.:..+J.. I
.1 . 18:.#2,A$..,T.. A$..B$ . .A$;:.:. N
AME.!,~.:.0,... I.1 . 30.I,..: .#2,A$:.
A$.C$ . ..M,... I.1 . 4:.#2,A$,A$,A$:.:.
SKIP..,...:.#2,A$:. A$.B$ . 4970..,...
4890..,..:..,D.:. . ...,N.:..,X..".":. C
U,17,3..,..."LOAD CRYSTAL FROM DISK"..,.
.D$."R":. 4630..-... A.19 . B$."." . 526
0..-..:.'-... I.8192 . 8504 . 8.3-..: .2
,A$.H-..: . I,E(A$) . BB.N-(...I-2..2,A$
:. C.1,E(A$) . BB..-<..2,A$:. C.2,E(A$)
. BB..-F..2,A$:. C,E(A$) . BB..-P..2,R$.
F-Z.. C(R$).11 . . C.1,.:.5250..-D.. C.1
,E(I(R$,1))..-N.R$.H(R$,10)..-X.:..-...
788,234..... 2: 1...... CP... ... ...:
.0...: . CRYSTAL.6...:.D.H.. 788,237.O.R
.. DU.3._...PR.B(172)........ PR.. . . 5
430:. 6230:. SC:. 6010.....:...... DU.3.
..... 4,4,B(SA)......4,G(27)G(50);.....:
...".. B(SA.2) . .4,G(13)G(14)"CODE: " R
$:.4...,. 4../6.. 788,234../@..../J.:..
/T.:.)/^.. QUIT CRYSTAL ..//H.:.9/R.. BO
X.`/|.. CU,19,.:.I.217.242:.I,B(I).128:.
.{/... .24)"..QUIT PROGRAM"../... .24)".
- ARE YOU SURE?"../... .25)".F1 CONTINUE
"../... .25)".F7 RETURN":. .28) ".TO LOA
DSTAR";../L.:../V.. 6140../... RE.7 . ..
.0..."...GOODBYE FROM ....".A0..."...C R
Y S T A L G A R D E N".G0..:.R0... 59
18.X0..:..0...15,8,15,"R0:HELLO CONNECT=
HELLO CONNECT"..0&..15,A: 15..00..A..63.
..O0:..".....LOAD"G(34)"HELLO CONNECT"G(
34)",8"..1D.."....RUN.":.2048,0:.44,8:.6
31,13:.632,13:.198,2:...1N.:.!1X.:. MAI
N MENU ..'1B.:.C1L.. 788,234:. 3930, SE
TUP.P1V.. CG,154.V1..:.1... CU,13,6:..1
0)".LOADSTAR PRESENTS"..1...". C R Y
S T A L G A R D E N"..1..."..MAIN
MENU: .1 .GROW SOME CRYSTALS "..2
....11)".2 .HELP - PROGRAM COMMANDS ".
12....11)".3 .PRINTER CONTROLS
".]2....11)".4 .LEAVE CRYSTAL GARDEN
"..2F..".. PRESS A NUMBER OR FUNC
TION KEY "..2P.:..2Z..". BY IAN
ADAM VANCOUVER BC.".X2... S1,21:. S
1.20,143..2... I.20 . K . 20:. S1.3,I:..
.3... S1,20..3..:..3..I..(.B(S1.23))."3.
...(3 .:.:3*.. REVEAL MENU.@34.:.Z3>.A.B
(CG):. A.. . A.250.C3H.B..8.N3R.. 6050.T
3\.:..3F.. CONCEAL MENU..3P.:..3Z.A.B(CG
):. A.50 . A.50..3..B.8..3..TR.BB..3..:.
W3... B(C.1).32 . B.B.4..3... I.A . TR .
B..4..: . CG,I . BB:J.B.2..4.....4J.. T
R.BB . . CG,..)4T.TR.26:../4..:.C4..: FU
NCTI. KEY ..I4..:.Y4...".":. K,15.K4...
A$:RE.E(A$)..4... A$."." . . A$."." . RE
.2.F(A$).265:. RE.7 . RE.RE.7..4... A$.G
(13) . RE.1.Q4$.. RE . . RE.8 . ...4...
6140..48.:..4B.:. .ER .ROLS ...4L.:..5V.
."...".:5`.A$." .
":.A$.H5J.." . CRYSTAL
GARDEN FOR THE 64 ".P5T..A$..5~.. .
48)".PRINTER CONTROLS:."..5..TR.24:. 595
0.G5... 788,239:. DU.3:. 788,234:. TEST.
W5..PR.B(172).0..5... PR.0 . 7040..5..:.
.5... OK..5D.:.,6N.. .43)"THE SECONDARY
ADDRESS FOR TEXT IS".[6X.." SET TO" B(
SA) "FOR UPPER/LOWER CASE,"..6..." TEX
T MODE, AUTO LINE FEED."..6... .43)"THE
SECONDARY ADDRESS FOR GRAPHICS"..6..."
IS SET TO" B(SA.1) "FOR GRAPHICS MODE,"
..6..." NO LINE FEED.".%7... .43)"PLEA
SE CHECK THE MANUAL FOR YOUR".Q7..." P
RINTER OR INTERFACE FOR DETAILS.".|7...
.45)"F1 CHANGE SECONDARY ADDRESSES"..7(
.. .5)"F3 PRINT HELP SCREEN"..7<.. .5)"
F7 MAIN MENU";.V7F.. 6140:. (RE . 1)..
. 6470..7P.. RE.1 . . 6620..7Z.. RE.3 .
. 6540..8N.. RE.7 . ...8X.. 6230..8..:.,
8... 788,239.@8... 4,4,B(SA):. 4.R8 .. 7
320:.4: 4.`8... 788,234.F8....L8..:..8H
.SET SEC'Y ADDRS..8R.:..8...".." .243)"T
HE TEXT SECONDARY ADDRESS MUST"..8..."
BE SET FOR UPPER AND LOWER CASE,"..9...
" TEXT MODE, AUTOMATIC LINE FEED.".:9.
.. .163)"IF NECESSARY, CHECK YOUR MANUAL
.".I9... .163)"ENTER SECONDARY ADDRESS,
OR PRESS"..9..." RETURN FOR" B(SA)..9.
.. 6930..9".. A . . SA,A . BB..9,.:..96.
.".." .243)"THE CRYSTALS CAN ONLY BE PRI
NTED"..:@.." ON AN EPSON-COMPATIBLE PR
INTER.".6:J.. .123)"THE SECONDARY ADDRES
S MUST BE SET"._:T.." FOR TRANSPARENT
GRAPHICS MODE,"..:^.." NO LINE FEED.
A VALUE OF 5 WORKS"..:H.." FOR MOST IN
TERFACES; HOWEVER,".S:R.." THE TYMAC
NEEDS A 6."..;|.. .123)"ENTER SECONDARY
ADDRESS, OR PRESS"..;..." RETURN FOR"
B(SA.1).*;... 6930.B;... A . . SA.1,A .
BB.M;..."......CRYSTALS ARE NORMALLY PRI
NTED"..;..."WITH A SPACE BETWEEN THEM.".
.;..."...PRESS:.":. "F1 OK- RETURN"..;B
.."F7 SET PRINTOUTS WITH NO SPACE BETWE
EN"..<L.." IMAGES. THIS ALLOWS YOU TO
EXTEND".?<V.." A CRYSTAL AND PRINT IT
AS ONE IMAGE.".\<... 6140:. SA.2,10..(R
E.7).G<..RE.1:..M<..:.|<..: . NUMBER..<.
.:..<..A$.""..<... CU,23:. A$". "..<&.
. K,15:. B$..<0.. B$.G(20) . B$.G(157) .
. C(A$) . A$.H(A$,C(A$).1)..=:.. B$.G(1
3) . B$."." . A.E(A$):..,=D.. B$."0" . B
$."9" . 6940.G=N.. C(A$).2 . A$.H(A$,2).
[=X.A$.A$.B$:. 6940.A=B.:.N=L.: NO .ER.T
=V.:..=... .45)"THERE IS NO PRINTER ACTI
VE.".F=... .45)"IF YOU HAVE A PRINTER, P
LEASE"..=... .5)"CHECK THAT IT IS PROPER
LY"..>... .5)"CONNECTED, HAS PAPER AVAIL
ABLE,".3>... .5)"AND IS TURNED ON.".U>..
. .165)"F1 ACTIVATE PRINTER".Q>... .5)"
F3 BACK TO MENU"..>F.. 6140:. RE.1 . 62
30..>P....>Z.:..>..:. HELP SCREEN ...>
..:..>..."....";.Q>..TR.24:. 5950..>...
C.3,9:. BR,9..>..:..> .. PR . 7220.7?*.D
$.".. PRESS F1 TO RETURN
.. ":. 7240.M?4.D$.".. F1 RETURN
F5 PRINT PAGE .. ".S?>.:.~?H.
. 7320..?R.. CU,24:.D$;..?\.. K,15:. A$.
C?F.. A$."5" . A$."." . . PR . 6540.I?P.
..O?Z.:..?..: HELP TEXT..?..:..@..." C
RYSTAL GARDEN -- HELP SCREEN ":..
*@... 646,1:. CU,1.Y@..."THESE ARE THE C
OMMANDS WHILE VIEWING:":...@..."CRYSTAL:
N NEW CRYSTAL, AUTOMATIC"..@... .9)"M
NEW CRYSTAL, MANUAL".G@J.. .9)"X EXTEN
D SAME CRYSTAL"..@T.. .9)"W TURN PATTER
N-WRAP ON OR OFF"..A... .9)"R RANDOM CR
YSTAL AND COLORS".DA... .9)"A AUTOPILOT
(ANY KEY = QUIT).".PA..."SEED: V V
ARY PATTERN (AUTO SEED)"..A... .9)"E EN
TER NEW SEED, MANUALLY":...A..."COLORS:
F1 BACKGROUND COLOR"..A... .8)"F3 CHAN
GE COLOR 1"..A... .8)"F5 CHANGE COLOR 2
"..B$.. .8)"F7 CHANGE COLOR 3".6B... .8
)"F8 STANDARD COLORS".TB8.. .9)"C RAND
OM COLORS":...BB.."EXTRAS: P PRINT CRY
STAL (EPSON-TYPE)"..BL.. .9)"S SAVE CRY
STAL TO DISK".JBV.. .9)"L LOAD CRYSTAL
FROM DISK"..B`.. .9)"Q QUIT - BACK TO M
AIN MENU"..BJ....BT.:..C~.:..C...".":.59
50.AC..."... .SAVE PICTURE IN WHICH
FORMAT?.".XC...". .K.OALA".VC...".
.A.DVANCED OCP". C...". .S.
EED (MATHEMATICAL DATA)"..C..."..
.E.XIT.".HCD..K,15 : .A$..CN..A$.."S"..7
650..CX.FL.1:.7670..C...A$.."E"..7690..D
..FL.0..D...".":.6010:...D..:.0D...A$.."
K"..7760.:D..ML.10.BD..EN$.".KOALA":UN$.
"'.A.PIC ' PREFIX".YD(.. 7860:.MS....766
0..D2..788,239:.5632:.788,234..D<..7660:
. GET BACK JO-JO..DF.:.JDP..A$.."A"..76
20..DZ.ML.12:PX$.""..DD.EN$.".ADVANCED O
CP"..EN.UN$."'MPIC' SUFFIX"."EX.. 7860:.
MS....7660.>E...788,239:.5635:.788,234.^
E...7660: . TO WERE YOU BELONG.DE..:..E
.:.................................E..:.
.E...".... PLEASE ENTER ";EN$;". FILENA
ME --."..E..." [MAXIMUM OF.";ML;"
.CHARACTERS]."..FH.." .[ ";UN$.0
FR.." IS NOT REQUIRED.]....."
.VF..MS.. : BS$."" : L$."............".
F...".......";BS$;I(L$,ML.MS):.K,15:.A$.
.F...A$.".".MS..:.7950..F...A$..G(13)..7
960..F...MS....8040.HF..."." : ...F...A$
..".".A$..G(20).7990..G"..MS.0.MS.MS.1:B
S$.H(BS$,MS)..G,.. 7910. G6..A$."0".7910
.AG@..(A$."9".A$."A").A$."Z".7910.QGJ..M
S.ML.7910.NGT.BS$.BS$.A$:MS.MS.1:.7910.T
G^.:..GH..ML..10..8060..GR.FS$.H(G(129).
"PIC ".BS$." ",15):MS.15:.8070.
.G|.BS$.BS$." ":FS$.H(BS$,12).
"MPIC":MS.16.!H...X.1.MS:.((FM.1).X),F(J
(FS$,X,1)):.:.".".9H...5712,MS : MS.1 :
..DH.'.15,8,15,"S0:CG.BAS": 15:."CG.BAS"
,8:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL