FRACTALS

00000000: 01 40 20 40 0A 00 8F 20  2D 2D 2A 20 4D 41 4E 44  |.@ @... --* MAND|
00000010: 45 4C 42 52 4F 54 20 50  4C 4F 54 53 20 2A 2D 2D  |ELBROT PLOTS *--|
00000020: 00 3F 40 14 00 8F 20 2D  2D 2A 20 31 32 38 20 56  |.?@... --* 128 V|
00000030: 45 52 53 49 4F 4E 20 20  20 20 20 20 2A 2D 2D 00  |ERSION      *--.|
00000040: 5E 40 1E 00 8F 20 2D 2D  2A 20 57 41 59 4E 45 20  |^@... --* WAYNE |
00000050: 53 2E 20 57 41 52 44 20  20 20 20 2A 2D 2D 00 98  |S. WARD    *--..|
00000060: 40 23 00 E7 34 2C 31 32  3A E7 35 2C 31 36 3A E8  |@#..4,12:.5,16:.|
00000070: 3A E0 2C 31 34 2C 34 2C  22 57 41 59 4E 45 20 53  |:.,14,4,"WAYNE S|
00000080: 2E 20 57 41 52 44 22 3A  E0 2C 31 37 2C 36 2C 22  |. WARD":.,17,6,"|
00000090: 36 2D 32 33 2D 38 37 22  00 A2 40 28 00 8D 31 34  |6-23-87"..@(..14|
000000A0: 39 30 00 AD 40 32 00 49  54 25 B2 38 30 00 BA 40  |90..@2.IT%.80..@|
000000B0: 3C 00 8D 38 30 3A 89 35  33 30 00 C8 40 46 00 8D  |<..80:.530..@F..|
000000C0: 31 32 30 3A 89 32 37 30  00 E2 40 50 00 8F 20 2D  |120:.270..@P.. -|
000000D0: 3E 20 53 43 52 45 45 4E  20 53 45 54 55 50 53 20  |> SCREEN SETUPS |
000000E0: 3C 2D 00 E9 40 5A 00 3A  3A 00 17 41 64 00 DE 30  |<-..@Z.::..Ad..0|
000000F0: 2C 31 3A E7 31 2C 33 3A  E7 32 2C 38 3A E7 33 2C  |,1:.1,3:.2,8:.3,|
00000100: 37 3A 97 35 33 32 38 31  2C 31 35 3A E7 34 2C 31  |7:.53281,15:.4,1|
00000110: 36 3A E7 35 2C 31 32 00  1D 41 6E 00 8E 00 3C 41  |6:.5,12..An...<A|
00000120: 78 00 8F 20 2D 3E 20 49  4E 50 55 54 20 58 20 26  |x.. -> INPUT X &|
00000130: 20 59 20 52 41 4E 47 45  53 20 3C 2D 00 43 41 82  | Y RANGES <-.CA.|
00000140: 00 3A 3A 00 56 41 8C 00  81 51 B2 31 A4 38 3A FE  |.::.VA...Q.1.8:.|
00000150: 07 51 2C 30 3A 82 00 5F  41 96 00 DE 30 2C 31 00  |.Q,0:.._A...0,1.|
00000160: 81 41 A0 00 99 22 11 11  20 20 52 45 41 4C 20 41  |.A..."..  REAL A|
00000170: 58 49 53 20 43 4F 4F 52  44 49 4E 41 54 45 53 3A  |XIS COORDINATES:|
00000180: 22 00 A9 41 AA 00 85 22  20 20 4C 4F 57 45 52 20  |"..A..."  LOWER |
00000190: 42 4F 55 4E 44 2C 20 55  50 50 45 52 20 42 4F 55  |BOUND, UPPER BOU|
000001A0: 4E 44 22 3B 52 4E 2C 52  58 00 BB 41 B4 00 8B 52  |ND";RN,RX..A...R|
000001B0: 58 B3 B2 52 4E 20 A7 20  31 36 30 00 D3 41 BE 00  |X..RN . 160..A..|
000001C0: 8B 52 58 B1 32 20 B0 20  52 4E B3 AB 32 20 A7 20  |.RX.2 . RN..2 . |
000001D0: 31 36 30 00 FA 41 C8 00  99 22 11 11 20 20 49 4D  |160..A..."..  IM|
000001E0: 41 47 49 4E 41 52 59 20  41 58 49 53 20 43 4F 4F  |AGINARY AXIS COO|
000001F0: 52 44 49 4E 41 54 45 53  3A 22 00 22 42 D2 00 85  |RDINATES:"."B...|
00000200: 22 20 20 4C 4F 57 45 52  20 42 4F 55 4E 44 2C 20  |"  LOWER BOUND, |
00000210: 55 50 50 45 52 20 42 4F  55 4E 44 22 3B 49 4E 2C  |UPPER BOUND";IN,|
00000220: 49 58 00 34 42 DC 00 8B  49 58 B3 B2 49 4E 20 A7  |IX.4B...IX..IN .|
00000230: 20 32 30 30 00 4C 42 E6  00 8B 49 58 B1 32 20 B0  | 200.LB...IX.2 .|
00000240: 20 52 4E B3 AB 32 20 A7  20 32 30 30 00 54 42 F0  | RN..2 . 200.TB.|
00000250: 00 FE 0B 32 00 6D 42 FA  00 8F 20 2D 3E 20 44 52  |...2.mB... -> DR|
00000260: 41 57 20 46 52 41 43 54  41 4C 20 3C 2D 00 74 42  |AW FRACTAL <-.tB|
00000270: 04 01 3A 3A 00 7E 42 0E  01 8D 31 34 30 30 00 94  |..::.~B...1400..|
00000280: 42 18 01 DE 20 33 2C 31  3A E7 20 30 2C 31 3A E7  |B... 3,1:. 0,1:.|
00000290: 20 34 2C 31 00 BB 42 22  01 44 58 B2 28 52 58 AB  | 4,1..B".DX.(RX.|
000002A0: 52 4E 29 AD 38 30 3A 44  59 B2 28 49 58 AB 49 4E  |RN).80:DY.(IX.IN|
000002B0: 29 AD 31 30 30 3A 8D 31  33 30 30 00 CD 42 2C 01  |).100:.1300..B,.|
000002C0: E1 32 2C 30 2C 30 2C 38  32 2C 31 30 32 00 E5 42  |.2,0,0,82,102..B|
000002D0: 36 01 81 59 B2 31 A4 31  30 31 3A FE 25 3A 81 58  |6..Y.1.101:.%:.X|
000002E0: B2 31 A4 38 31 00 09 43  40 01 49 25 B2 30 3A 5A  |.1.81..C@.I%.0:Z|
000002F0: 47 B2 30 3A 43 52 B2 44  58 AC 58 AA 52 4E 3A 43  |G.0:CR.DX.X.RN:C|
00000300: 49 B2 49 58 AB 44 59 AC  59 00 19 43 4A 01 5A 52  |I.IX.DY.Y..CJ.ZR|
00000310: B2 43 52 3A 5A 49 B2 43  49 00 2F 43 54 01 EB 20  |.CR:ZI.CI./CT.. |
00000320: FD 20 5A 47 B3 32 20 AF  20 49 25 B3 49 54 25 00  |. ZG.2 . I%.IT%.|
00000330: 3E 43 5E 01 8D 20 34 30  30 3A 8D 34 32 30 00 5C  |>C^.. 400:.420.\|
00000340: 43 68 01 5A 52 B2 5A 31  AA 43 52 3A 5A 49 B2 5A  |Ch.ZR.Z1.CR:ZI.Z|
00000350: 32 AA 43 49 3A 49 25 B2  49 25 AA 31 00 62 43 72  |2.CI:I%.I%.1.bCr|
00000360: 01 EC 00 6C 43 7C 01 8D  20 34 36 30 00 79 43 86  |...lC|.. 460.yC.|
00000370: 01 82 3A 82 3A 89 35 32  30 00 9B 43 90 01 54 31  |..:.:.520..C..T1|
00000380: B2 5A 52 AC 5A 52 3A 54  32 B2 5A 49 AC 5A 49 3A  |.ZR.ZR:T2.ZI.ZI:|
00000390: 5A 47 B2 BA 28 54 31 AA  54 32 29 00 A1 43 9A 01  |ZG..(T1.T2)..C..|
000003A0: 8E 00 B9 43 A4 01 5A 31  B2 54 31 AB 54 32 3A 5A  |...C..Z1.T1.T2:Z|
000003B0: 32 B2 32 AC 5A 52 AC 5A  49 00 BF 43 AE 01 8E 00  |2.2.ZR.ZI..C....|
000003C0: D4 43 B8 01 8F 20 2D 3E  20 50 4C 4F 54 20 58 2C  |.C... -> PLOT X,|
000003D0: 59 20 3C 2D 00 DB 43 C2  01 3A 3A 00 EB 43 CC 01  |Y <-..C..::..C..|
000003E0: 8B 49 25 B1 33 39 20 A7  34 39 30 00 17 44 D6 01  |.I%.39 .490..D..|
000003F0: 50 43 B2 30 3A 8B 49 25  B1 39 A7 50 43 B2 33 3A  |PC.0:.I%.9.PC.3:|
00000400: 8B 49 25 B1 31 39 A7 50  43 B2 32 3A 8B 49 25 B1  |.I%.19.PC.2:.I%.|
00000410: 32 39 A7 50 43 B2 31 00  21 44 E0 01 89 20 35 30  |29.PC.1.!D... 50|
00000420: 30 00 4E 44 EA 01 50 43  B2 30 3A 8B 49 25 B1 34  |0.ND..PC.0:.I%.4|
00000430: 39 A7 50 43 B2 33 3A 8B  49 25 B1 35 39 A7 50 43  |9.PC.3:.I%.59.PC|
00000440: B2 32 3A 8B 49 25 B1 36  39 A7 50 43 B2 31 00 5B  |.2:.I%.69.PC.1.[|
00000450: 44 F4 01 E5 20 50 43 2C  58 2C 59 00 61 44 FE 01  |D... PC,X,Y.aD..|
00000460: 8E 00 71 44 08 02 FE 26  3A FE 0B 38 3A 89 35 33  |..qD...&:..8:.53|
00000470: 30 00 89 44 12 02 8F 20  2D 3E 20 4D 45 4E 55 20  |0..D... -> MENU |
00000480: 53 43 52 45 45 4E 20 3C  2D 00 90 44 1C 02 3A 3A  |SCREEN <-..D..::|
00000490: 00 98 44 26 02 8D 38 30  00 D0 44 30 02 DE 30 2C  |..D&..80..D0..0,|
000004A0: 31 3A FE 06 31 2C 31 30  30 2C 31 36 35 3A FE 06  |1:..1,100,165:..|
000004B0: 34 2C 31 30 30 2C 31 32  35 3A FE 06 35 2C 31 30  |4,100,125:..5,10|
000004C0: 30 2C 38 35 3A FE 06 36  2C 31 30 30 2C 31 39 35  |0,85:..6,100,195|
000004D0: 00 FA 44 3A 02 81 51 B2  31 A4 36 3A 8B 51 B2 32  |..D:..Q.1.6:.Q.2|
000004E0: A7 35 38 30 3A D5 FE 07  51 2C 31 2C 31 2C 31 2C  |.580:...Q,1,1,1,|
000004F0: 30 2C 30 3A 82 3A 89 35  39 30 00 10 45 44 02 FE  |0,0:.:.590..ED..|
00000500: 07 32 2C 30 3A FE 07 33  2C 30 3A 51 B2 33 3A 82  |.2,0:..3,0:Q.3:.|
00000510: 00 78 45 4E 02 E0 31 2C  31 34 2C 35 2C 22 44 52  |.xEN..1,14,5,"DR|
00000520: 41 57 20 46 52 41 43 54  41 4C 22 3A E0 2C 31 34  |AW FRACTAL":.,14|
00000530: 2C 31 30 2C 22 4C 4F 41  44 2F 53 41 56 45 20 46  |,10,"LOAD/SAVE F|
00000540: 52 41 43 54 41 4C 22 3A  E0 2C 31 34 2C 31 35 2C  |RACTAL":.,14,15,|
00000550: 22 4D 41 47 4E 49 46 59  20 46 52 41 43 54 41 4C  |"MAGNIFY FRACTAL|
00000560: 22 3A E0 2C 31 34 2C 31  39 2C 22 45 58 49 54 20  |":.,14,19,"EXIT |
00000570: 50 52 4F 47 52 41 4D 22  00 B8 45 58 02 E0 2C 39  |PROGRAM"..EX..,9|
00000580: 2C 31 2C 22 43 2D 31 32  38 20 46 52 41 43 54 41  |,1,"C-128 FRACTA|
00000590: 4C 20 50 4C 4F 54 54 45  52 22 3A E0 2C 39 2C 32  |L PLOTTER":.,9,2|
000005A0: 2C 22 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |,"..............|
000005B0: A3 A3 A3 A3 A3 A3 A3 22  00 D2 45 62 02 FE 07 33  |......."..Eb...3|
000005C0: 2C 31 2C 32 2C 31 3A FE  06 33 2C 31 30 35 2C 32  |,1,2,1:..3,105,2|
000005D0: 32 30 00 13 46 6C 02 EB  FD CF 28 32 29 B3 31 32  |20..Fl....(2).12|
000005E0: 38 3A FE 17 31 2C 36 39  30 3A 8B CF 28 32 29 B2  |8:..1,690:..(2).|
000005F0: 31 A7 FE 06 33 2C AB 30  2C AB 32 3A D5 8B CF 28  |1...3,.0,.2:...(|
00000600: 32 29 B2 35 A7 FE 06 33  2C AA 30 2C AA 32 3A D5  |2).5...3,.0,.2:.|
00000610: 36 33 30 00 19 46 76 02  EC 00 28 46 80 02 8B 42  |630..Fv...(F...B|
00000620: 50 B2 32 30 A7 31 32 30  00 37 46 8A 02 8B 42 50  |P.20.120.7F...BP|
00000630: B2 31 32 A7 39 38 30 00  45 46 94 02 8B 42 50 B2  |.12.980.EF...BP.|
00000640: 35 A7 37 31 30 00 54 46  9E 02 8B 42 50 B2 33 36  |5.710.TF...BP.36|
00000650: A7 37 30 30 00 5D 46 A8  02 89 35 33 30 00 6C 46  |.700.]F...530.lF|
00000660: B2 02 42 50 B2 CE 03 28  31 29 3A 8E 00 8B 46 BC  |..BP...(1):...F.|
00000670: 02 DE 33 2C 31 3A DE 30  2C 31 3A 81 51 B2 31 A4  |..3,1:.0,1:.Q.1.|
00000680: 38 3A FE 07 51 2C 30 3A  82 3A 80 00 A4 46 C6 02  |8:..Q,0:.:...F..|
00000690: 8F 20 2D 3E 20 4D 41 47  4E 49 46 59 20 41 52 45  |. -> MAGNIFY ARE|
000006A0: 41 20 3C 2D 00 AB 46 D0  02 3A 3A 00 BE 46 DA 02  |A <-..F..::..F..|
000006B0: 81 51 B2 31 A4 38 3A FE  07 51 2C 30 3A 82 00 C7  |.Q.1.8:..Q,0:...|
000006C0: 46 E4 02 DE 30 2C 31 00  F7 46 EE 02 99 22 11 11  |F...0,1..F..."..|
000006D0: 11 20 55 53 45 20 54 48  45 20 4A 4F 59 53 54 49  |. USE THE JOYSTI|
000006E0: 43 4B 20 54 4F 20 4D 4F  56 45 20 27 4D 41 47 4E  |CK TO MOVE 'MAGN|
000006F0: 49 46 59 49 4E 47 22 00  24 47 F8 02 99 22 11 47  |IFYING".$G...".G|
00000700: 4C 41 53 53 27 20 4F 56  45 52 20 50 4F 52 54 49  |LASS' OVER PORTI|
00000710: 4F 4E 20 4F 46 20 50 49  43 54 55 52 45 20 54 4F  |ON OF PICTURE TO|
00000720: 20 42 45 22 00 52 47 02  03 99 22 11 4D 41 47 4E  | BE".RG...".MAGN|
00000730: 49 46 49 45 44 2C 20 54  48 45 4E 20 50 52 45 53  |IFIED, THEN PRES|
00000740: 53 20 54 48 45 20 42 55  54 54 4F 4E 2E 22 3A FE  |S THE BUTTON.":.|
00000750: 0B 33 00 79 47 0C 03 FE  07 31 2C 31 2C 32 2C 30  |.3.yG....1,1,2,0|
00000760: 3A FE 06 31 2C 31 32 2C  34 34 3A DE 33 2C 30 3A  |:..1,12,44:.3,0:|
00000770: E7 30 2C 31 3A E7 34 2C  31 00 93 47 16 03 58 58  |.0,1:.4,1..G..XX|
00000780: B2 30 3A 59 59 B2 30 3A  53 58 B2 31 32 3A 53 59  |.0:YY.0:SX.12:SY|
00000790: B2 34 34 00 A2 47 20 03  EB FD CF 28 32 29 B3 31  |.44..G ....(2).1|
000007A0: 32 38 00 D6 47 2A 03 8B  CF 28 32 29 B2 31 A7 59  |28..G*...(2).1.Y|
000007B0: 59 B2 59 59 AB 31 3A 53  59 B2 53 59 AB 31 3A 8B  |Y.YY.1:SY.SY.1:.|
000007C0: 53 59 B2 B3 34 34 A7 53  59 B2 34 34 3A 59 59 B2  |SY..44.SY.44:YY.|
000007D0: 30 3A 89 38 39 30 00 E6  47 34 03 8B CF 28 32 29  |0:.890..G4...(2)|
000007E0: B2 32 A7 39 30 30 00 1E  48 3E 03 8B CF 28 32 29  |.2.900..H>...(2)|
000007F0: B2 33 A7 58 58 B2 58 58  AA 31 3A 53 58 B2 53 58  |.3.XX.XX.1:SX.SX|
00000800: AA 31 3A 8B 53 58 B2 B1  31 37 32 A7 53 58 B2 31  |.1:.SX..172.SX.1|
00000810: 37 32 3A 58 58 B2 31 36  30 3A 89 38 39 30 00 2E  |72:XX.160:.890..|
00000820: 48 48 03 8B CF 28 32 29  B2 34 A7 39 30 30 00 66  |HH...(2).4.900.f|
00000830: 48 52 03 8B CF 28 32 29  B2 35 A7 59 59 B2 59 59  |HR...(2).5.YY.YY|
00000840: AA 31 3A 53 59 B2 53 59  AA 31 3A 8B 53 59 B2 B1  |.1:SY.SY.1:.SY..|
00000850: 31 34 34 A7 53 59 B2 31  34 34 3A 59 59 B2 31 30  |144.SY.144:YY.10|
00000860: 30 3A 89 38 39 30 00 76  48 5C 03 8B CF 28 32 29  |0:.890.vH\...(2)|
00000870: B2 36 A7 39 30 30 00 AA  48 66 03 8B CF 28 32 29  |.6.900..Hf...(2)|
00000880: B2 37 A7 58 58 B2 58 58  AB 31 3A 53 58 B2 53 58  |.7.XX.XX.1:SX.SX|
00000890: AB 31 3A 8B 53 58 B2 B3  31 32 A7 53 58 B2 31 32  |.1:.SX..12.SX.12|
000008A0: 3A 58 58 B2 30 3A 89 38  39 30 00 BA 48 70 03 8B  |:XX.0:.890..Hp..|
000008B0: CF 28 32 29 B2 38 A7 39  30 30 00 0A 49 7A 03 FE  |.(2).8.900..Iz..|
000008C0: 06 31 2C 53 58 2C 53 59  3A 8F 20 43 48 41 52 31  |.1,SX,SY:. CHAR1|
000008D0: 2C 34 2C 34 2C 53 54 52  24 28 58 58 29 2B 22 20  |,4,4,STR$(XX)+" |
000008E0: 22 2B 53 54 52 24 28 59  59 29 3A 43 48 41 52 31  |"+STR$(YY):CHAR1|
000008F0: 2C 34 2C 36 2C 53 54 52  24 28 53 58 29 2B 22 20  |,4,6,STR$(SX)+" |
00000900: 22 2B 53 54 52 24 28 53  59 29 00 10 49 84 03 EC  |"+STR$(SY)..I...|
00000910: 00 46 49 8E 03 FE 0B 31  3A FE 07 31 2C 30 3A DE  |.FI....1:..1,0:.|
00000920: 30 2C 31 3A E0 31 2C 31  30 2C 34 2C 22 50 4C 4F  |0,1:.1,10,4,"PLO|
00000930: 54 54 49 4E 47 20 4E 45  57 20 46 52 41 43 54 41  |TTING NEW FRACTA|
00000940: 4C 22 3A FE 0B 32 00 52  49 98 03 58 58 B2 58 58  |L":..2.RI..XX.XX|
00000950: AD 32 00 73 49 A2 03 44  58 B2 28 52 58 AB 52 4E  |.2.sI..DX.(RX.RN|
00000960: 29 AD 38 30 3A 44 59 B2  28 49 58 AB 49 4E 29 AD  |).80:DY.(IX.IN).|
00000970: 31 30 30 00 8F 49 AC 03  46 52 B2 44 58 AC 58 58  |100..I..FR.DX.XX|
00000980: AA 52 4E 3A 46 49 B2 49  58 AB 44 59 AC 59 59 00  |.RN:FI.IX.DY.YY.|
00000990: AF 49 B6 03 44 31 B2 28  52 58 AB 52 4E 29 AD 32  |.I..D1.(RX.RN).2|
000009A0: 30 3A 44 32 B2 28 49 58  AB 49 4E 29 AD 32 30 00  |0:D2.(IX.IN).20.|
000009B0: D7 49 C0 03 52 58 B2 46  52 AA 44 31 3A 52 4E B2  |.I..RX.FR.D1:RN.|
000009C0: 46 52 AB 44 31 3A 49 58  B2 46 49 AA 44 32 3A 49  |FR.D1:IX.FI.D2:I|
000009D0: 4E B2 46 49 AB 44 32 00  E1 49 CA 03 89 20 32 37  |N.FI.D2..I... 27|
000009E0: 30 00 F7 49 D4 03 8F 20  2D 3E 20 4C 4F 41 44 2F  |0..I... -> LOAD/|
000009F0: 53 41 56 45 20 3C 2D 00  FE 49 DE 03 3A 3A 00 26  |SAVE <-..I..::.&|
00000A00: 4A E8 03 8D 38 30 3A 81  51 B2 31 A4 38 3A FE 07  |J...80:.Q.1.8:..|
00000A10: 51 2C 30 3A 82 3A FE 06  34 2C 31 36 30 2C 35 30  |Q,0:.:..4,160,50|
00000A20: 3A FE 07 34 2C 31 00 2F  4A F2 03 44 44 B2 30 00  |:..4,1./J..DD.0.|
00000A30: 62 4A FC 03 DE 30 2C 31  3A E0 31 2C 34 2C 34 2C  |bJ...0,1:.1,4,4,|
00000A40: 22 28 4C 29 4F 41 44 20  46 52 41 43 54 41 4C 20  |"(L)OAD FRACTAL |
00000A50: 4F 52 20 28 53 29 41 56  45 20 46 52 41 43 54 41  |OR (S)AVE FRACTA|
00000A60: 4C 22 00 90 4A 06 04 A1  F9 20 41 51 24 3A 8B 41  |L"..J.... AQ$:.A|
00000A70: 51 24 B2 22 53 22 A7 31  30 35 30 3A D5 8B 41 51  |Q$."S".1050:..AQ|
00000A80: 24 B2 22 4C 22 A7 31 31  35 30 3A D5 31 30 33 30  |$."L".1150:.1030|
00000A90: 00 9A 4A 10 04 89 31 30  33 30 00 B3 4A 1A 04 8F  |..J...1030..J...|
00000AA0: 20 2D 3E 20 53 41 56 45  20 46 52 41 43 54 41 4C  | -> SAVE FRACTAL|
00000AB0: 20 3C 2D 00 BA 4A 24 04  3A 3A 00 DA 4A 2E 04 DE  | <-..J$.::..J...|
00000AC0: 30 2C 31 3A E0 31 2C 31  32 2C 34 2C 22 53 41 56  |0,1:.1,12,4,"SAV|
00000AD0: 45 20 46 52 41 43 54 41  4C 22 00 07 4B 38 04 85  |E FRACTAL"..K8..|
00000AE0: 22 13 11 11 11 11 11 11  20 20 20 20 20 20 20 46  |".......       F|
00000AF0: 49 4C 45 4E 41 4D 45 22  3B 46 24 3A 46 24 B2 C8  |ILENAME";F$:F$..|
00000B00: 28 46 24 2C 31 30 29 00  28 4B 42 04 46 50 24 B2  |(F$,10).(KB.FP$.|
00000B10: 22 2E 50 49 43 22 3A 46  44 24 B2 22 2E 44 41 54  |".PIC":FD$.".DAT|
00000B20: 41 22 3A FE 07 34 2C 30  00 47 4B 4C 04 FE 10 28  |A":..4,0.GKL...(|
00000B30: 46 24 AA 46 50 24 29 2C  42 30 2C 50 37 31 36 38  |F$.FP$),B0,P7168|
00000B40: A4 50 31 36 33 38 34 00  5B 4B 56 04 FE 0D 23 32  |.P16384.[KV...#2|
00000B50: 2C 28 46 24 AA 46 44 24  29 2C 57 00 7D 4B 60 04  |,(F$.FD$),W.}K`.|
00000B60: 98 32 2C 44 44 3A 98 32  2C 52 58 3A 98 32 2C 52  |.2,DD:.2,RX:.2,R|
00000B70: 4E 3A 98 32 2C 49 58 3A  98 32 2C 49 4E 00 84 4B  |N:.2,IX:.2,IN..K|
00000B80: 6A 04 FE 0F 00 BC 4B 74  04 99 22 07 22 3B 3A 99  |j.....Kt..".";:.|
00000B90: 22 11 11 20 20 20 20 20  20 20 20 20 20 20 53 41  |"..           SA|
00000BA0: 56 45 20 43 4F 4D 50 4C  45 54 45 44 22 3A FE 07  |VE COMPLETED":..|
00000BB0: 34 2C 30 3A FE 0B 32 3A  89 35 33 30 00 D5 4B 7E  |4,0:..2:.530..K~|
00000BC0: 04 8F 20 2D 3E 20 4C 4F  41 44 20 46 52 41 43 54  |.. -> LOAD FRACT|
00000BD0: 41 4C 20 3C 2D 00 DC 4B  88 04 3A 3A 00 F9 4B 92  |AL <-..K..::..K.|
00000BE0: 04 52 58 B2 30 3A 44 44  B2 30 3A 52 4E B2 30 3A  |.RX.0:DD.0:RN.0:|
00000BF0: 49 58 B2 30 3A 49 4E B2  30 00 1E 4C 9C 04 DE 33  |IX.0:IN.0..L...3|
00000C00: 2C 31 3A DE 30 2C 31 3A  E0 31 2C 31 32 2C 34 2C  |,1:.0,1:.1,12,4,|
00000C10: 22 4C 4F 41 44 20 46 52  41 43 54 41 4C 22 00 4B  |"LOAD FRACTAL".K|
00000C20: 4C A6 04 85 22 13 11 11  11 11 11 11 20 20 20 20  |L...".......    |
00000C30: 20 20 20 46 49 4C 45 4E  41 4D 45 22 3B 46 24 3A  |   FILENAME";F$:|
00000C40: 46 24 B2 C8 28 46 24 2C  31 30 29 00 6C 4C B0 04  |F$..(F$,10).lL..|
00000C50: 46 50 24 B2 22 2E 50 49  43 22 3A 46 44 24 B2 22  |FP$.".PIC":FD$."|
00000C60: 2E 44 41 54 41 22 3A FE  07 34 2C 30 00 84 4C BA  |.DATA":..4,0..L.|
00000C70: 04 FE 11 28 46 24 AA 46  50 24 29 2C 42 30 2C 50  |...(F$.FP$),B0,P|
00000C80: 37 31 36 38 00 96 4C C4  04 FE 0D 23 32 2C 28 46  |7168..L....#2,(F|
00000C90: 24 AA 46 44 24 29 00 B8  4C CE 04 84 32 2C 44 44  |$.FD$)..L...2,DD|
00000CA0: 3A 84 32 2C 52 58 3A 84  32 2C 52 4E 3A 84 32 2C  |:.2,RX:.2,RN:.2,|
00000CB0: 49 58 3A 84 32 2C 49 4E  00 BF 4C D8 04 FE 0F 00  |IX:.2,IN..L.....|
00000CC0: 0D 4D E2 04 99 22 07 22  3B 3A 99 22 11 11 20 20  |.M...".";:."..  |
00000CD0: 20 20 20 20 20 20 20 20  20 4C 4F 41 44 20 43 4F  |         LOAD CO|
00000CE0: 4D 50 4C 45 54 45 44 22  3A FE 07 34 2C 30 3A FE  |MPLETED":..4,0:.|
00000CF0: 0B 32 3A DE 33 3A E7 30  2C 31 3A E7 34 2C 31 3A  |.2:.3:.0,1:.4,1:|
00000D00: FE 0B 33 3A DE 30 2C 31  3A 89 35 33 30 00 2F 4D  |..3:.0,1:.530./M|
00000D10: EC 04 99 22 20 20 20 20  27 46 35 27 20 43 4F 4E  |..."    'F5' CON|
00000D20: 54 49 4E 55 45 53 20 57  4F 52 4B 49 4E 47 22 00  |TINUES WORKING".|
00000D30: 56 4D F6 04 99 22 20 20  20 20 27 46 37 27 20 41  |VM..."    'F7' A|
00000D40: 46 54 45 52 20 53 54 4F  50 50 45 44 20 46 4F 52  |FTER STOPPED FOR|
00000D50: 20 4D 45 4E 55 22 00 85  4D 00 05 99 22 11 11 20  | MENU"..M...".. |
00000D60: 20 20 20 50 52 45 53 53  20 4A 4F 59 53 54 49 43  |   PRESS JOYSTIC|
00000D70: 4B 20 42 55 54 54 4F 4E  20 54 4F 20 43 4F 4E 54  |K BUTTON TO CONT|
00000D80: 49 4E 55 45 22 00 9C 4D  0A 05 8B CF 28 32 29 B1  |INUE"..M....(2).|
00000D90: B2 31 32 38 A7 8E 3A D5  31 32 39 30 00 B3 4D 14  |.128..:.1290..M.|
00000DA0: 05 8F 20 2D 3E 20 50 52  49 4E 54 20 49 4E 46 4F  |.. -> PRINT INFO|
00000DB0: 20 3C 2D 00 BA 4D 1E 05  3A 3A 00 D0 4D 28 05 E0  | <-..M..::..M(..|
00000DC0: 31 2C 35 2C 31 34 2C 22  52 45 41 4C 20 58 3A 22  |1,5,14,"REAL X:"|
00000DD0: 00 EF 4D 32 05 E0 31 2C  35 2C 31 36 2C C4 28 52  |..M2..1,5,16,.(R|
00000DE0: 4E 29 AA 22 20 54 4F 20  22 AA C4 28 52 58 29 00  |N)." TO "..(RX).|
00000DF0: 05 4E 3C 05 E0 31 2C 35  2C 31 39 2C 22 49 4D 41  |.N<..1,5,19,"IMA|
00000E00: 47 20 59 3A 22 00 24 4E  46 05 E0 31 2C 35 2C 32  |G Y:".$NF..1,5,2|
00000E10: 31 2C C4 28 49 4E 29 AA  22 20 54 4F 20 22 AA C4  |1,.(IN)." TO "..|
00000E20: 28 49 58 29 00 7A 4E 50  05 E0 31 2C 32 36 2C 32  |(IX).zNP..1,26,2|
00000E30: 2C 22 43 2D 31 32 38 20  46 52 41 43 54 41 4C 22  |,"C-128 FRACTAL"|
00000E40: 3A E0 31 2C 32 38 2C 34  2C 22 47 45 4E 45 52 41  |:.1,28,4,"GENERA|
00000E50: 54 4F 52 22 3A E0 31 2C  33 31 2C 36 2C 22 42 59  |TOR":.1,31,6,"BY|
00000E60: 3A 22 3A E0 31 2C 32 36  2C 39 2C 22 57 41 59 4E  |:":.1,26,9,"WAYN|
00000E70: 45 20 53 2E 20 57 41 52  44 22 00 80 4E 5A 05 8E  |E S. WARD"..NZ..|
00000E80: 00 9A 4E 64 05 8F 20 2D  3E 20 46 55 4E 43 54 49  |..Nd.. -> FUNCTI|
00000E90: 4F 4E 20 4B 45 59 53 20  3C 2D 00 A1 4E 6E 05 3A  |ON KEYS <-..Nn.:|
00000EA0: 3A 00 B9 4E 78 05 81 51  B2 31 A4 38 3A FE 07 51  |:..Nx..Q.1.8:..Q|
00000EB0: 2C 30 3A 82 3A DE 30 2C  31 00 05 4F 82 05 F9 31  |,0:.:.0,1..O...1|
00000EC0: 2C 22 53 4C 4F 57 22 AA  C7 28 31 33 29 3A F9 33  |,"SLOW"..(13):.3|
00000ED0: 2C 22 46 41 53 54 3A 43  4F 4E 54 22 AA C7 28 31  |,"FAST:CONT"..(1|
00000EE0: 33 29 3A F9 35 2C 22 47  4F 54 4F 36 30 30 22 AA  |3):.5,"GOTO600".|
00000EF0: C7 28 31 33 29 3A F9 37  2C 22 43 4F 4E 54 22 AA  |.(13):.7,"CONT".|
00000F00: C7 28 31 33 29 00 2D 4F  8C 05 99 22 11 11 11 11  |.(13).-O..."....|
00000F10: 20 20 20 20 27 52 55 4E  2F 53 54 4F 50 27 20 53  |    'RUN/STOP' S|
00000F20: 54 4F 50 53 20 57 4F 52  4B 49 4E 47 22 00 58 4F  |TOPS WORKING".XO|
00000F30: 96 05 99 22 11 11 20 20  20 20 27 46 31 27 20 56  |..."..    'F1' V|
00000F40: 49 45 57 53 20 46 52 41  43 54 41 4C 20 41 46 54  |IEWS FRACTAL AFT|
00000F50: 45 52 20 53 54 4F 50 22  00 8A 4F A0 05 99 22 11  |ER STOP"..O...".|
00000F60: 20 20 20 20 27 46 33 27  20 43 4F 4E 54 49 4E 55  |    'F3' CONTINU|
00000F70: 45 53 20 41 46 54 45 52  20 53 54 4F 50 20 28 46  |ES AFTER STOP (F|
00000F80: 41 53 54 20 4D 4F 44 45  29 22 00 B6 4F AA 05 99  |AST MODE)"..O...|
00000F90: 22 11 20 20 20 20 27 46  35 27 20 52 45 54 55 52  |".    'F5' RETUR|
00000FA0: 4E 53 20 54 4F 20 4D 45  4E 55 20 41 46 54 45 52  |NS TO MENU AFTER|
00000FB0: 20 53 54 4F 50 22 00 E8  4F B4 05 99 22 11 20 20  | STOP"..O...".  |
00000FC0: 20 20 27 46 37 27 20 43  4F 4E 54 49 4E 55 45 53  |  'F7' CONTINUES|
00000FD0: 20 41 46 54 45 52 20 53  54 4F 50 20 28 53 4C 4F  | AFTER STOP (SLO|
00000FE0: 57 20 4D 4F 44 45 29 22  00 10 50 BE 05 99 22 11  |W MODE)"..P...".|
00000FF0: 11 11 20 20 20 20 20 50  52 45 53 53 20 42 55 54  |..     PRESS BUT|
00001000: 54 4F 4E 20 54 4F 20 43  4F 4E 54 49 4E 55 45 22  |TON TO CONTINUE"|
00001010: 00 27 50 C8 05 8B CF 28  32 29 B1 B2 31 32 38 A7  |.'P....(2)..128.|
00001020: 8E 3A D5 31 34 38 30 00  3F 50 D2 05 8F 20 2D 3E  |.:.1480.?P... ->|
00001030: 20 53 50 52 49 54 45 20  44 41 54 41 20 3C 2D 00  | SPRITE DATA <-.|
00001040: 46 50 DC 05 3A 3A 00 66  50 E6 05 81 51 B2 30 A4  |FP..::.fP...Q.0.|
00001050: 33 38 33 3A 87 51 44 3A  97 33 35 38 34 AA 51 2C  |383:.QD:.3584.Q,|
00001060: 51 44 3A 82 3A 8E 00 82  50 F0 05 83 20 30 2C 33  |QD:.:...P... 0,3|
00001070: 31 2C 31 39 32 2C 31 2C  32 32 34 2C 35 36 2C 36  |1,192,1,224,56,6|
00001080: 2C 30 00 9A 50 FA 05 83  20 34 2C 38 2C 30 2C 32  |,0..P... 4,8,0,2|
00001090: 2C 31 36 2C 30 2C 32 2C  33 32 00 B2 50 04 06 83  |,16,0,2,32..P...|
000010A0: 20 30 2C 32 2C 36 34 2C  30 2C 32 2C 36 34 2C 30  | 0,2,64,0,2,64,0|
000010B0: 2C 36 00 D0 50 0E 06 83  20 31 32 38 2C 30 2C 31  |,6..P... 128,0,1|
000010C0: 34 2C 31 32 38 2C 30 2C  33 30 2C 31 32 38 2C 30  |4,128,0,30,128,0|
000010D0: 00 F2 50 18 06 83 20 31  32 36 2C 31 39 32 2C 31  |..P... 126,192,1|
000010E0: 2C 32 35 32 2C 32 34 30  2C 33 30 2C 32 34 2C 32  |,252,240,30,24,2|
000010F0: 35 35 00 17 51 22 06 83  20 32 35 33 2C 32 30 38  |55..Q".. 253,208|
00001100: 2C 31 32 37 2C 32 35 31  2C 32 32 34 2C 36 33 2C  |,127,251,224,63,|
00001110: 32 35 33 2C 32 34 30 00  34 51 2C 06 83 20 31 35  |253,240.4Q,.. 15|
00001120: 2C 32 32 35 2C 32 34 38  2C 30 2C 30 2C 32 35 32  |,225,248,0,0,252|
00001130: 2C 30 2C 30 00 4E 51 36  06 83 20 31 32 36 2C 30  |,0,0.NQ6.. 126,0|
00001140: 2C 30 2C 36 32 2C 30 2C  30 2C 32 38 2C 30 00 64  |,0,62,0,0,28,0.d|
00001150: 51 40 06 83 20 30 2C 30  2C 30 2C 30 2C 30 2C 30  |Q@.. 0,0,0,0,0,0|
00001160: 2C 30 2C 30 00 7C 51 4A  06 83 20 30 2C 30 2C 35  |,0,0.|QJ.. 0,0,5|
00001170: 2C 30 2C 30 2C 32 36 2C  36 34 2C 30 00 9E 51 54  |,0,0,26,64,0..QT|
00001180: 06 83 20 31 31 31 2C 31  34 34 2C 30 2C 31 31 31  |.. 111,144,0,111|
00001190: 2C 32 32 38 2C 31 2C 31  39 31 2C 32 32 38 00 C2  |,228,1,191,228..|
000011A0: 51 5E 06 83 20 32 32 2C  32 35 35 2C 32 32 38 2C  |Q^.. 22,255,228,|
000011B0: 31 37 31 2C 32 35 35 2C  31 34 34 2C 32 32 2C 32  |171,255,144,22,2|
000011C0: 35 35 00 E2 51 68 06 83  20 32 32 38 2C 31 2C 31  |55..Qh.. 228,1,1|
000011D0: 39 31 2C 32 32 38 2C 30  2C 31 31 31 2C 32 32 38  |91,228,0,111,228|
000011E0: 2C 30 00 FE 51 72 06 83  20 31 31 31 2C 31 34 34  |,0..Qr.. 111,144|
000011F0: 2C 30 2C 32 36 2C 36 34  2C 30 2C 35 2C 30 00 14  |,0,26,64,0,5,0..|
00001200: 52 7C 06 83 20 30 2C 30  2C 30 2C 30 2C 30 2C 30  |R|.. 0,0,0,0,0,0|
00001210: 2C 30 2C 30 00 2A 52 86  06 83 20 30 2C 30 2C 30  |,0,0.*R... 0,0,0|
00001220: 2C 30 2C 30 2C 30 2C 30  2C 30 00 4A 52 90 06 83  |,0,0,0,0,0.JR...|
00001230: 20 32 35 35 2C 32 35 34  2C 30 2C 31 32 38 2C 32  | 255,254,0,128,2|
00001240: 2C 30 2C 31 35 39 2C 32  32 38 00 69 52 9A 06 83  |,0,159,228.iR...|
00001250: 20 30 2C 31 35 39 2C 31  33 36 2C 30 2C 31 35 39  | 0,159,136,0,159|
00001260: 2C 34 38 2C 30 2C 31 35  39 00 89 52 A4 06 83 20  |,48,0,159..R... |
00001270: 31 34 34 2C 30 2C 31 35  39 2C 32 30 30 2C 30 2C  |144,0,159,200,0,|
00001280: 31 35 33 2C 32 32 38 2C  30 00 AA 52 AE 06 83 20  |153,228,0..R... |
00001290: 31 34 34 2C 32 34 32 2C  30 2C 31 33 34 2C 31 32  |144,242,0,134,12|
000012A0: 31 2C 30 2C 31 33 37 2C  36 30 00 CD 52 B8 06 83  |1,0,137,60..R...|
000012B0: 20 31 32 38 2C 31 34 34  2C 31 35 38 2C 36 34 2C  | 128,144,158,64,|
000012C0: 31 36 30 2C 37 39 2C 33  32 2C 31 39 32 00 EB 52  |160,79,32,192..R|
000012D0: C2 06 83 20 33 39 2C 31  34 34 2C 30 2C 31 39 2C  |... 39,144,0,19,|
000012E0: 32 30 30 2C 30 2C 39 2C  32 32 38 00 04 53 CC 06  |200,0,9,228..S..|
000012F0: 83 20 30 2C 34 2C 31 39  36 2C 30 2C 32 2C 32 34  |. 0,4,196,0,2,24|
00001300: 2C 30 2C 31 00 1D 53 D6  06 83 20 33 32 2C 30 2C  |,0,1..S... 32,0,|
00001310: 30 2C 31 39 32 2C 30 2C  30 2C 30 2C 30 00 3F 53  |0,192,0,0,0,0.?S|
00001320: E0 06 83 20 32 35 35 2C  32 35 35 2C 32 35 35 2C  |... 255,255,255,|
00001330: 31 32 38 2C 37 2C 32 35  35 2C 31 32 38 2C 37 00  |128,7,255,128,7.|
00001340: 63 53 EA 06 83 20 32 35  35 2C 31 32 38 2C 37 2C  |cS... 255,128,7,|
00001350: 32 35 35 2C 32 35 35 2C  32 35 35 2C 32 35 35 2C  |255,255,255,255,|
00001360: 31 32 37 00 89 53 F4 06  83 20 32 35 35 2C 32 35  |127..S... 255,25|
00001370: 34 2C 32 35 35 2C 32 35  35 2C 32 35 35 2C 32 35  |4,255,255,255,25|
00001380: 35 2C 32 35 35 2C 32 35  35 00 AD 53 FE 06 83 20  |5,255,255..S... |
00001390: 32 35 35 2C 32 33 31 2C  32 35 35 2C 32 35 35 2C  |255,231,255,255,|
000013A0: 31 32 39 2C 32 35 35 2C  32 35 35 2C 30 00 D1 53  |129,255,255,0..S|
000013B0: 08 07 83 20 32 35 35 2C  32 35 35 2C 30 2C 32 35  |... 255,255,0,25|
000013C0: 35 2C 32 35 35 2C 31 32  39 2C 32 35 35 2C 32 35  |5,255,129,255,25|
000013D0: 35 00 F6 53 12 07 83 20  32 33 31 2C 36 33 2C 32  |5..S... 231,63,2|
000013E0: 35 35 2C 32 35 35 2C 32  35 35 2C 32 35 35 2C 32  |55,255,255,255,2|
000013F0: 33 31 2C 32 35 35 00 1C  54 1C 07 83 20 32 35 35  |31,255..T... 255|
00001400: 2C 32 33 31 2C 32 35 35  2C 32 35 35 2C 32 33 31  |,231,255,255,231|
00001410: 2C 32 35 35 2C 32 35 35  2C 32 33 31 00 40 54 26  |,255,255,231.@T&|
00001420: 07 83 20 32 35 35 2C 32  35 35 2C 32 33 31 2C 32  |.. 255,255,231,2|
00001430: 35 35 2C 32 35 35 2C 32  35 35 2C 32 35 35 2C 30  |55,255,255,255,0|
00001440: 00 5E 54 30 07 83 20 33  2C 32 35 35 2C 31 39 32  |.^T0.. 3,255,192|
00001450: 2C 37 2C 32 35 35 2C 32  32 34 2C 36 2C 30 00 77  |,7,255,224,6,0.w|
00001460: 54 3A 07 83 20 39 36 2C  36 2C 30 2C 39 36 2C 36  |T:.. 96,6,0,96,6|
00001470: 2C 30 2C 39 36 2C 36 00  90 54 44 07 83 20 30 2C  |,0,96,6..TD.. 0,|
00001480: 39 36 2C 36 2C 30 2C 39  36 2C 36 2C 30 2C 39 36  |96,6,0,96,6,0,96|
00001490: 00 AD 54 4E 07 83 20 36  2C 30 2C 39 36 2C 37 2C  |..TN.. 6,0,96,7,|
000014A0: 32 35 35 2C 32 32 34 2C  33 2C 32 35 32 00 CF 54  |255,224,3,252..T|
000014B0: 58 07 83 20 31 39 32 2C  33 2C 32 35 35 2C 31 39  |X.. 192,3,255,19|
000014C0: 32 2C 33 31 2C 32 35 35  2C 32 34 38 2C 35 34 00  |2,31,255,248,54.|
000014D0: F2 54 62 07 83 20 32 31  39 2C 31 30 38 2C 35 33  |.Tb.. 219,108,53|
000014E0: 2C 38 35 2C 39 32 2C 31  30 36 2C 31 37 30 2C 31  |,85,92,106,170,1|
000014F0: 37 34 00 12 55 6C 07 83  20 32 35 34 2C 30 2C 32  |74..Ul.. 254,0,2|
00001500: 35 35 2C 32 35 35 2C 32  35 35 2C 32 35 35 2C 30  |55,255,255,255,0|
00001510: 2C 30 00 28 55 76 07 83  20 30 2C 30 2C 30 2C 30  |,0.(Uv.. 0,0,0,0|
00001520: 2C 30 2C 30 2C 30 2C 30  00 3E 55 80 07 83 20 30  |,0,0,0,0.>U... 0|
00001530: 2C 30 2C 30 2C 30 2C 30  2C 30 2C 30 2C 30 00 54  |,0,0,0,0,0,0,0.T|
00001540: 55 8A 07 83 20 30 2C 30  2C 30 2C 30 2C 30 2C 30  |U... 0,0,0,0,0,0|
00001550: 2C 30 2C 30 00 74 55 94  07 83 20 30 2C 30 2C 32  |,0,0.tU... 0,0,2|
00001560: 35 32 2C 31 39 35 2C 36  30 2C 32 35 32 2C 31 39  |52,195,60,252,19|
00001570: 35 2C 36 32 00 98 55 9E  07 83 20 31 39 32 2C 32  |5,62..U... 192,2|
00001580: 32 37 2C 35 35 2C 31 39  32 2C 32 34 33 2C 35 31  |27,55,192,243,51|
00001590: 2C 32 34 38 2C 32 35 31  00 BB 55 A8 07 83 20 35  |,248,251..U... 5|
000015A0: 31 2C 32 34 38 2C 32 32  33 2C 35 31 2C 31 39 32  |1,248,223,51,192|
000015B0: 2C 32 30 37 2C 35 31 2C  31 39 32 00 DE 55 B2 07  |,207,51,192..U..|
000015C0: 83 20 31 39 39 2C 35 35  2C 32 35 32 2C 31 39 35  |. 199,55,252,195|
000015D0: 2C 36 32 2C 32 35 32 2C  31 39 35 2C 36 30 00 F4  |,62,252,195,60..|
000015E0: 55 BC 07 83 20 30 2C 30  2C 30 2C 30 2C 30 2C 30  |U... 0,0,0,0,0,0|
000015F0: 2C 30 2C 30 00 0A 56 C6  07 83 20 30 2C 30 2C 30  |,0,0..V... 0,0,0|
00001600: 2C 30 2C 30 2C 30 2C 30  2C 30 00 00 00           |,0,0,0,0,0...   |

.@ @... --* MANDELBROT PLOTS *--.?@... -
-* 128 VERSION      *--.^@... --* WAYNE 
S. WARD    *--..@#..4,12:.5,16:.:.,14,4,
"WAYNE S. WARD":.,17,6,"6-23-87"..@(..14
90..@2.IT%.80..@<..80:.530.H@F..120:.270
..@P.. -> SCREEN SETUPS <-..@Z.::..AD..0
,1:.1,3:.2,8:.3,7:.53281,15:.4,16:.5,12.
.AN...<AX.. -> INPUT X & Y RANGES <-.CA.
.::.VA...Q.1.8:..Q,0:.._A...0,1..A .."..
  REAL AXIS COORDINATES:"..A..."  LOWER 
BOUND, UPPER BOUND";RN,RX..A...RX..RN . 
160.SA...RX.2 . RN..2 . 160..AH.."..  IM
AGINARY AXIS COORDINATES:"."BR.."  LOWER
 BOUND, UPPER BOUND";IN,IX.4B...IX..IN .
 200.LB...IX.2 . RN..2 . 200.TB....2.MB.
.. -> DRAW FRACTAL <-.TB..::.~B...1400..
B... 3,1:. 0,1:. 4,1..B".DX.(RX.RN).80:D
Y.(IX.IN).100:.1300.MB,..2,0,0,82,102..B
6..Y.1.101:.%:.X.1.81..C@.I%.0:ZG.0:CR.D
X.X.RN:CI.IX.DY.Y..CJ.ZR.CR:ZI.CI./CT.. 
. ZG.2 . I%.IT%.>C^.. 400:.420.\CH.ZR.Z1
.CR:ZI.Z2.CI:I%.I%.1.BCR...LC|.. 460.YC.
..:.:.520..C..T1.ZR.ZR:T2.ZI.ZI:ZG..(T1.
T2)..C.....C..Z1.T1.T2:Z2.2.ZR.ZI..C....
TC... -> PLOT X,Y <-..CB.::..CL..I%.39 .
490..DV.PC.0:.I%.9.PC.3:.I%.19.PC.2:.I%.
29.PC.1.!D... 500.ND..PC.0:.I%.49.PC.3:.
I%.59.PC.2:.I%.69.PC.1.[D... PC,X,Y.AD..
..QD...&:..8:.530..D... -> MENU SCREEN <
-..D..::..D&..80.PD0..0,1:..1,100,165:..
4,100,125:..5,100,85:..6,100,195..D:..Q.
1.6:.Q.2.580:U..Q,1,1,1,0,0:.:.590..ED..
.2,0:..3,0:Q.3:..XEN..1,14,5,"DRAW FRACT
AL":.,14,10,"LOAD/SAVE FRACTAL":.,14,15,
"MAGNIFY FRACTAL":.,14,19,"EXIT PROGRAM"
..EX..,9,1,"C-128 FRACTAL PLOTTER":.,9,2
,".....................".REB...3,1,2,1:.
.3,105,220..FL...O(2).128:..1,690:.O(2).
1...3,.0,.2:U.O(2).5...3,.0,.2:U630..FV.
..(F...BP.20.120.7F...BP.12.980.EF...BP.
5.710.TF...BP.36.700.]F...530.LF..BP.N.(
1):...F...3,1:.0,1:.Q.1.8:..Q,0:.:...FF.
. -> MAGNIFY AREA <-..FP.::..FZ..Q.1.8:.
.Q,0:..GF...0,1..F..."... USE THE JOYSTI
CK TO MOVE 'MAGNIFYING".$G...".GLASS' OV
ER PORTION OF PICTURE TO BE".RG...".MAGN
IFIED, THEN PRESS THE BUTTON.":..3.YG...
.1,1,2,0:..1,12,44:.3,0:.0,1:.4,1..G..XX
.0:YY.0:SX.12:SY.44..G ...O(2).128.VG*..
O(2).1.YY.YY.1:SY.SY.1:.SY..44.SY.44:YY.
0:.890..G4..O(2).2.900..H>..O(2).3.XX.XX
.1:SX.SX.1:.SX..172.SX.172:XX.160:.890..
HH..O(2).4.900.FHR..O(2).5.YY.YY.1:SY.SY
.1:.SY..144.SY.144:YY.100:.890.VH\..O(2)
.6.900..HF..O(2).7.XX.XX.1:SX.SX.1:.SX..
12.SX.12:XX.0:.890..HP..O(2).8.900..IZ..
.1,SX,SY:. CHAR1,4,4,STR$(XX)+" "+STR$(Y
Y):CHAR1,4,6,STR$(SX)+" "+STR$(SY)..I...
.FI....1:..1,0:.0,1:.1,10,4,"PLOTTING NE
W FRACTAL":..2.RI..XX.XX.2.SI..DX.(RX.RN
).80:DY.(IX.IN).100..I..FR.DX.XX.RN:FI.I
X.DY.YY..I..D1.(RX.RN).20:D2.(IX.IN).20.
WI..RX.FR.D1:RN.FR.D1:IX.FI.D2:IN.FI.D2.
.IJ.. 270..IT.. -> LOAD/SAVE <-..I..::.&
J...80:.Q.1.8:..Q,0:.:..4,160,50:..4,1./
J..DD.0.BJ...0,1:.1,4,4,"(L)OAD FRACTAL 
OR (S)AVE FRACTAL"..J.... AQ$:.AQ$."S".1
050:U.AQ$."L".1150:U1030..J...1030..J...
 -> SAVE FRACTAL <-..J$.::.ZJ...0,1:.1,1
2,4,"SAVE FRACTAL"..K8..".......       F
ILENAME";F$:F$.H(F$,10).(KB.FP$.".PIC":F
D$.".DATA":..4,0.GKL...(F$.FP$),B0,P7168
.P16384.[KV...#2,(F$.FD$),W.}K`..2,DD:.2
,RX:.2,RN:.2,IX:.2,IN..KJ.....KT..".";:.
"..           SAVE COMPLETED":..4,0:..2:
.530.UK~.. -> LOAD FRACTAL <-..K..::..K.
.RX.0:DD.0:RN.0:IX.0:IN.0..L...3,1:.0,1:
.1,12,4,"LOAD FRACTAL".KL...".......    
   FILENAME";F$:F$.H(F$,10).LL..FP$.".PI
C":FD$.".DATA":..4,0..L....(F$.FP$),B0,P
7168..LD...#2,(F$.FD$)..LN..2,DD:.2,RX:.
2,RN:.2,IX:.2,IN..LX.....M...".";:."..  
         LOAD COMPLETED":..4,0:..2:.3:.0
,1:.4,1:..3:.0,1:.530./M..."    'F5' CON
TINUES WORKING".VM..."    'F7' AFTER STO
PPED FOR MENU"..M..."..    PRESS JOYSTIC
K BUTTON TO CONTINUE"..M...O(2)..128..:U
1290..M... -> PRINT INFO <-..M..::.PM(..
1,5,14,"REAL X:"..M2..1,5,16,D(RN)." TO 
".D(RX)..N<..1,5,19,"IMAG Y:".$NF..1,5,2
1,D(IN)." TO ".D(IX).ZNP..1,26,2,"C-128 
FRACTAL":.1,28,4,"GENERATOR":.1,31,6,"BY
:":.1,26,9,"WAYNE S. WARD"..NZ....ND.. -
> FUNCTION KEYS <-..NN.::..NX..Q.1.8:..Q
,0:.:.0,1..O...1,"SLOW".G(13):.3,"FAST:C
ONT".G(13):.5,"GOTO600".G(13):.7,"CONT".
G(13).-O..."....    'RUN/STOP' STOPS WOR
KING".XO..."..    'F1' VIEWS FRACTAL AFT
ER STOP"..O ..".    'F3' CONTINUES AFTER
 STOP (FAST MODE)"..O...".    'F5' RETUR
NS TO MENU AFTER STOP"..O...".    'F7' C
ONTINUES AFTER STOP (SLOW MODE)"..P...".
..     PRESS BUTTON TO CONTINUE".'PH..O(
2)..128..:U1480.?PR.. -> SPRITE DATA <-.
FP..::.FP...Q.0.383:.QD:.3584.Q,QD:.:...
P... 0,31,192,1,224,56,6,0..P... 4,8,0,2
,16,0,2,32..P... 0,2,64,0,2,64,0,6.PP...
 128,0,14,128,0,30,128,0..P... 126,192,1
,252,240,30,24,255..Q".. 253,208,127,251
,224,63,253,240.4Q,.. 15,225,248,0,0,252
,0,0.NQ6.. 126,0,0,62,0,0,28,0.DQ@.. 0,0
,0,0,0,0,0,0.|QJ.. 0,0,5,0,0,26,64,0..QT
.. 111,144,0,111,228,1,191,228.BQ^.. 22,
255,228,171,255,144,22,255..QH.. 228,1,1
91,228,0,111,228,0..QR.. 111,144,0,26,64
,0,5,0..R|.. 0,0,0,0,0,0,0,0.*R... 0,0,0
,0,0,0,0,0.JR... 255,254,0,128,2,0,159,2
28.IR... 0,159,136,0,159,48,0,159..R... 
144,0,159,200,0,153,228,0..R... 144,242,
0,134,121,0,137,60.MR... 128,144,158,64,
160,79,32,192..RB.. 39,144,0,19,200,0,9,
228..SL.. 0,4,196,0,2,24,0,1..SV.. 32,0,
0,192,0,0,0,0.?S... 255,255,255,128,7,25
5,128,7.CS... 255,128,7,255,255,255,255,
127..S... 255,254,255,255,255,255,255,25
5..S... 255,231,255,255,129,255,255,0.QS
... 255,255,0,255,255,129,255,255..S... 
231,63,255,255,255,255,231,255..T... 255
,231,255,255,231,255,255,231.@T&.. 255,2
55,231,255,255,255,255,0.^T0.. 3,255,192
,7,255,224,6,0.WT:.. 96,6,0,96,6,0,96,6.
.TD.. 0,96,6,0,96,6,0,96..TN.. 6,0,96,7,
255,224,3,252.OTX.. 192,3,255,192,31,255
,248,54..TB.. 219,108,53,85,92,106,170,1
74..UL.. 254,0,255,255,255,255,0,0.(UV..
 0,0,0,0,0,0,0,0.>U... 0,0,0,0,0,0,0,0.T
U... 0,0,0,0,0,0,0,0.TU... 0,0,252,195,6
0,252,195,62..U... 192,227,55,192,243,51
,248,251..U... 51,248,223,51,192,207,51,
192..U... 199,55,252,195,62,252,195,60..
U... 0,0,0,0,0,0,0,0..VF.. 0,0,0,0,0,0,0
,0...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL