BAR CHART
FILE INFORMATION
FILENAME(S): BAR CHART
FILE TYPE(S): PRG
FILE SIZE: 4.1K
FIRST SEEN: 2025-11-30 18:13:11
APPEARS ON: 1 disk(s)
FILE HASH
c0ef119a7cdebc1c60916c610d3e064de7e2bfcdd1470edd401d1f72a5d42deb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PRINTER PROGRAMS | BAR CHART | PRG | Sailor, Ganheden | 22 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 09 08 01 00 89 31 30 00 3D 08 02 00 9F 31 |.......10.=....1|
00000010: 35 2C 38 2C 31 35 3A 98 31 35 2C 22 53 3A 42 41 |5,8,15:.15,"S:BA|
00000020: 52 20 47 52 41 50 48 22 3A A0 31 35 3A 94 22 42 |R GRAPH":.15:."B|
00000030: 41 52 20 47 52 41 50 48 22 2C 38 3A 80 00 67 08 |AR GRAPH",8:..g.|
00000040: 0A 00 42 4F B2 35 33 32 38 30 3A 42 47 B2 42 4F |..BO.53280:BG.BO|
00000050: AA 31 3A 97 42 47 2C 30 3A 97 42 4F 2C 36 3A 97 |.1:.BG,0:.BO,6:.|
00000060: 35 36 32 39 36 2C 30 00 9B 08 14 00 4F 56 24 B2 |56296,0.....OV$.|
00000070: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000080: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000090: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 BC 08 1E 00 |..........".....|
000000A0: 44 4E 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |DN$."...........|
000000B0: 11 11 11 11 11 11 11 11 11 11 11 22 00 F7 08 28 |..........."...(|
000000C0: 00 42 4C 24 B2 44 4E 24 AA 22 11 11 11 22 AA 22 |.BL$.DN$."..."."|
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 13 22 00 2C 09 32 00 43 43 B2 34 | .".,.2.CC.4|
00000100: 3A 86 46 52 24 28 37 29 2C 54 24 28 33 36 29 2C |:.FR$(7),T$(36),|
00000110: 56 28 33 36 29 2C 43 4C 24 28 37 29 2C 46 24 28 |V(36),CL$(7),F$(|
00000120: 32 29 2C 53 28 32 29 2C 45 28 32 29 00 5A 09 3C |2),S(2),E(2).Z.<|
00000130: 00 53 28 31 29 B2 31 30 32 34 3A 45 28 31 29 B2 |.S(1).1024:E(1).|
00000140: 32 30 32 34 3A 53 28 32 29 B2 35 35 32 39 36 3A |2024:S(2).55296:|
00000150: 45 28 32 29 B2 35 36 32 39 37 00 A0 09 46 00 43 |E(2).56297...F.C|
00000160: 4C 24 28 30 29 B2 22 98 22 3A 43 4C 24 28 31 29 |L$(0).".":CL$(1)|
00000170: B2 22 9E 22 3A 43 4C 24 28 32 29 B2 22 81 22 3A |.".":CL$(2).".":|
00000180: 43 4C 24 28 33 29 B2 22 1C 22 3A 43 4C 24 28 34 |CL$(3).".":CL$(4|
00000190: 29 B2 22 9C 22 3A 43 4C 24 28 35 29 B2 22 1F 22 |).".":CL$(5)."."|
000001A0: 00 BA 09 50 00 43 4C 24 28 36 29 B2 22 9A 22 3A |...P.CL$(6).".":|
000001B0: 43 4C 24 28 37 29 B2 22 9B 22 00 DE 09 5A 00 99 |CL$(7)."."...Z..|
000001C0: 22 93 05 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
000001D0: 47 52 41 50 48 4D 41 4B 45 52 20 36 34 22 00 11 |GRAPHMAKER 64"..|
000001E0: 0A 64 00 99 22 11 11 1D 43 20 5F 20 43 52 45 41 |.d.."...C _ CREA|
000001F0: 54 45 20 41 20 47 52 41 50 48 22 3A 99 22 11 1D |TE A GRAPH":."..|
00000200: 4C 20 5F 20 4C 4F 41 44 20 41 20 47 52 41 50 48 |L _ LOAD A GRAPH|
00000210: 22 00 3D 0A 6E 00 A1 47 24 3A 91 AB 28 47 24 B2 |".=.n..G$:..(G$.|
00000220: 22 22 29 89 31 31 30 3A 8B 47 24 B3 B1 22 4C 22 |"").110:.G$.."L"|
00000230: AF 20 47 24 B3 B1 22 43 22 A7 31 31 30 00 4E 0A |. G$.."C".110.N.|
00000240: 78 00 8B 47 24 B2 22 4C 22 A7 31 31 37 30 00 94 |x..G$."L".1170..|
00000250: 0A 82 00 85 22 93 11 1D 4D 41 58 49 4D 55 4D 20 |...."...MAXIMUM |
00000260: 56 45 52 54 49 43 41 4C 20 53 43 41 4C 45 20 56 |VERTICAL SCALE V|
00000270: 41 4C 55 45 22 3B 4D 58 3A 42 49 B2 4D 58 AD 32 |ALUE";MX:BI.MX.2|
00000280: 30 3A 4C 49 B2 42 49 AD 37 3A 8B 4D 58 B2 B3 30 |0:LI.BI.7:.MX..0|
00000290: A7 31 33 30 00 A2 0A 8C 00 8D 32 38 30 3A 8D 35 |.130......280:.5|
000002A0: 37 30 00 AE 0A 96 00 81 49 B2 31 A4 56 42 00 E7 |70......I.1.VB..|
000002B0: 0A A0 00 99 22 93 11 1D 56 41 4C 55 45 20 54 4F |...."...VALUE TO|
000002C0: 20 42 45 20 47 52 41 50 48 45 44 22 3A 99 22 11 | BE GRAPHED":.".|
000002D0: 1D 46 4F 52 20 42 41 52 20 23 22 49 22 9D 2C 20 |.FOR BAR #"I"., |
000002E0: 22 54 24 28 49 29 3B 00 02 0B AA 00 85 56 28 49 |"T$(I);......V(I|
000002F0: 29 3A 8B 56 28 49 29 B1 4D 58 A7 56 28 49 29 B2 |):.V(I).MX.V(I).|
00000300: 4D 58 00 0B 0B B4 00 8D 33 39 30 00 19 0B BE 00 |MX......390.....|
00000310: 82 3A 99 47 52 24 4D 58 24 00 1F 0B C8 00 3A 00 |.:.GR$MX$.....:.|
00000320: 2A 0B D2 00 8F 20 4C 4F 4F 50 00 30 0B DC 00 3A |*.... LOOP.0...:|
00000330: 00 57 0B E6 00 81 43 B2 31 A4 56 42 3A 56 B2 56 |.W....C.1.VB:V.V|
00000340: 28 43 29 3A 56 B2 56 AB 33 AC 28 42 49 AD 37 29 |(C):V.V.3.(BI.7)|
00000350: 3A 8D 34 36 30 3A 82 00 60 0B F0 00 89 38 31 30 |:.460:..`....810|
00000360: 00 66 0B FA 00 3A 00 76 0B 04 01 8F 20 50 41 52 |.f...:.v.... PAR|
00000370: 41 4D 45 54 45 52 00 7C 0B 0E 01 3A 00 AF 0B 18 |AMETER.|...:....|
00000380: 01 99 22 93 11 1D 48 4F 57 20 4D 41 4E 59 20 56 |.."...HOW MANY V|
00000390: 45 52 54 49 43 41 4C 20 42 41 52 53 22 3A 99 22 |ERTICAL BARS":."|
000003A0: 11 1D 28 32 2D 33 36 29 20 22 3B 3A 85 56 42 00 |..(2-36) ";:.VB.|
000003B0: C3 0B 22 01 8B 56 42 B1 33 36 B0 56 42 B3 32 A7 |.."..VB.36.VB.2.|
000003C0: 32 38 30 00 D3 0B 2C 01 42 57 B2 B5 28 33 36 AD |280...,.BW..(36.|
000003D0: 56 42 29 00 DF 0B 36 01 81 49 B2 31 A4 56 42 00 |VB)...6..I.1.VB.|
000003E0: 14 0C 40 01 99 22 93 11 1D 54 49 54 4C 45 20 46 |..@.."...TITLE F|
000003F0: 4F 52 20 42 41 52 20 23 22 49 3A 99 22 11 1D 55 |OR BAR #"I:."..U|
00000400: 50 20 54 4F 22 42 57 22 43 48 41 52 41 43 54 45 |P TO"BW"CHARACTE|
00000410: 52 53 22 3B 00 34 0C 4A 01 85 54 24 28 49 29 3A |RS";.4.J..T$(I):|
00000420: 8B 54 24 28 49 29 B2 22 22 A7 54 24 28 49 29 B2 |.T$(I)."".T$(I).|
00000430: C4 28 49 29 00 50 0C 54 01 8B C3 28 54 24 28 49 |.(I).P.T...(T$(I|
00000440: 29 29 B1 42 57 AF 28 42 57 B1 32 29 A7 33 32 30 |)).BW.(BW.2).320|
00000450: 00 58 0C 5E 01 82 3A 8E 00 5E 0C 68 01 3A 00 6B |.X.^..:..^.h.:.k|
00000460: 0C 72 01 8F 20 43 45 4E 54 45 52 00 71 0C 7C 01 |.r.. CENTER.q.|.|
00000470: 3A 00 8E 0C 86 01 8B 42 57 B3 33 A7 54 24 28 49 |:......BW.3.T$(I|
00000480: 29 B2 C9 28 54 24 28 49 29 2C 31 29 3A 8E 00 A1 |)..(T$(I),1):...|
00000490: 0C 90 01 8B C3 28 54 24 28 49 29 29 B2 42 57 A7 |.....(T$(I)).BW.|
000004A0: 8E 00 C4 0C 9A 01 4D 52 B2 42 57 AB C3 28 54 24 |......MR.BW..(T$|
000004B0: 28 49 29 29 3A 4D 52 B2 4D 52 AD 32 3A 8B 4D 52 |(I)):MR.MR.2:.MR|
000004C0: B3 31 A7 8E 00 FA 0C A4 01 4D 52 24 B2 22 22 3A |.1.......MR$."":|
000004D0: 81 4A B2 31 A4 4D 52 3A 43 24 B2 22 1D 22 AA 43 |.J.1.MR:C$.".".C|
000004E0: 24 3A 82 3A 54 24 28 49 29 B2 43 24 AA 54 24 28 |$:.:T$(I).C$.T$(|
000004F0: 49 29 3A 43 24 B2 22 22 3A 8E 00 00 0D AE 01 3A |I):C$."":......:|
00000500: 00 0C 0D B8 01 8F 20 43 48 41 52 54 00 12 0D C2 |...... CHART....|
00000510: 01 3A 00 2D 0D CC 01 8B 56 B3 4C 49 AF 56 28 43 |.:.-....V.LI.V(C|
00000520: 29 B1 30 A7 46 52 B2 31 3A 89 34 38 30 00 56 0D |).0.FR.1:.480.V.|
00000530: D6 01 8B 56 B1 30 A7 42 4C B2 B5 28 56 AD 42 49 |...V.0.BL..(V.BI|
00000540: 29 3A 46 B2 56 AB 42 4C AC 42 49 3A 46 52 B2 B5 |):F.V.BL.BI:FR..|
00000550: 28 46 AD 4C 49 29 00 68 0D E0 01 43 43 24 B2 C8 |(F.LI).h...CC$..|
00000560: 28 4F 56 24 2C 43 43 29 00 7F 0D EA 01 99 44 4E |(OV$,CC)......DN|
00000570: 24 22 05 11 11 22 43 43 24 54 24 28 43 29 3B 00 |$"..."CC$T$(C);.|
00000580: 90 0D F4 01 99 22 13 22 43 4C 24 28 43 AF 37 29 |....."."CL$(C.7)|
00000590: 00 A7 0D FE 01 99 44 4E 24 43 43 24 3B 3A 8B 42 |......DN$CC$;:.B|
000005A0: 4C B2 30 A7 35 33 30 00 BB 0D 08 02 81 49 B2 31 |L.0.530......I.1|
000005B0: A4 42 4C 3A 99 43 4C 24 3B 3A 82 00 CE 0D 12 02 |.BL:.CL$;:......|
000005C0: 8B 46 52 B1 30 A7 99 46 52 24 28 46 52 29 00 E7 |.FR.0..FR$(FR)..|
000005D0: 0D 1C 02 43 43 B2 43 43 AA 42 57 3A 42 4C B2 30 |...CC.CC.BW:BL.0|
000005E0: 3A 46 52 B2 30 3A 8E 00 ED 0D 26 02 3A 00 FB 0D |:FR.0:....&.:...|
000005F0: 30 02 8F 20 53 54 52 49 4E 47 53 00 01 0E 3A 02 |0.. STRINGS...:.|
00000600: 3A 00 23 0E 44 02 4D 58 24 B2 C4 28 4D 58 29 3A |:.#.D.MX$..(MX):|
00000610: 4D 58 24 B2 C9 28 4D 58 24 2C C3 28 4D 58 24 29 |MX$..(MX$,.(MX$)|
00000620: AB 31 29 00 48 0E 4E 02 4D 58 24 B2 C8 28 4D 58 |.1).H.N.MX$..(MX|
00000630: 24 2C 33 29 3A 4A B2 33 AB C3 28 4D 58 24 29 3A |$,3):J.3..(MX$):|
00000640: 8B 4A B2 30 A7 36 31 30 00 70 0E 58 02 81 49 B2 |.J.0.610.p.X..I.|
00000650: 31 A4 4A 3A 4D 24 B2 22 20 22 AA 4D 24 3A 82 3A |1.J:M$." ".M$:.:|
00000660: 4D 58 24 B2 4D 24 AA 4D 58 24 3A 4D 24 B2 22 22 |MX$.M$.MX$:M$.""|
00000670: 00 9D 0E 62 02 48 46 B2 31 30 30 AC 4D 58 3A 48 |...b.HF.100.MX:H|
00000680: 46 B2 B5 28 48 46 AD 32 29 3A 48 46 B2 48 46 AD |F..(HF.2):HF.HF.|
00000690: 31 30 30 3A 48 46 24 B2 C4 28 48 46 29 00 C2 0E |100:HF$..(HF)...|
000006A0: 6C 02 48 46 24 B2 C9 28 48 46 24 2C C3 28 48 46 |l.HF$..(HF$,.(HF|
000006B0: 24 29 AB 31 29 3A 48 46 24 B2 C8 28 48 46 24 2C |$).1):HF$..(HF$,|
000006C0: 33 29 00 DA 0E 76 02 4A B2 33 AB C3 28 48 46 24 |3)...v.J.3..(HF$|
000006D0: 29 3A 8B 4A B2 30 A7 36 35 30 00 02 0F 80 02 81 |):.J.0.650......|
000006E0: 49 B2 31 A4 4A 3A 4D 24 B2 4D 24 AA 22 20 22 3A |I.1.J:M$.M$." ":|
000006F0: 82 3A 48 46 24 B2 4D 24 AA 48 46 24 3A 4D 24 B2 |.:HF$.M$.HF$:M$.|
00000700: 22 22 00 26 0F 8A 02 8B C5 28 48 46 24 29 B1 C5 |"".&.....(HF$)..|
00000710: 28 4D 58 24 29 A7 48 46 24 B2 C8 28 22 20 22 AA |(MX$).HF$..(" ".|
00000720: 48 46 24 2C 33 29 00 4C 0F 94 02 4D 58 24 B2 22 |HF$,3).L...MX$."|
00000730: 13 11 11 22 AA 4D 58 24 AA 22 11 11 11 11 11 11 |...".MX$."......|
00000740: 11 11 11 11 9D 9D 9D 22 AA 48 46 24 00 76 0F 9E |.......".HF$.v..|
00000750: 02 47 52 24 B2 22 DD 11 9D AB 11 9D 22 3A 81 49 |.GR$."......":.I|
00000760: B2 31 A4 34 3A 43 24 B2 43 24 AA 47 52 24 3A 82 |.1.4:C$.C$.GR$:.|
00000770: 3A 43 24 B2 43 24 00 8D 0F A8 02 43 24 B2 22 05 |:C$.C$.....C$.".|
00000780: 93 11 11 1D 1D 1D AB 11 9D 22 AA 43 24 00 B7 0F |.........".C$...|
00000790: B2 02 81 49 B2 31 A4 35 3A 43 24 B2 43 24 AA 47 |...I.1.5:C$.C$.G|
000007A0: 52 24 3A 82 3A 47 52 24 B2 43 24 AA 22 DD 9D 11 |R$:.:GR$.C$."...|
000007B0: 22 3A 43 24 B2 22 22 00 EE 0F BC 02 47 52 24 B2 |":C$."".....GR$.|
000007C0: 47 52 24 AA 22 9D 30 AD C0 C0 C0 C0 C0 C0 C0 C0 |GR$.".0.........|
000007D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000007E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 13 22 00 13 |............."..|
000007F0: 10 C6 02 81 49 B2 31 A4 42 57 3A 43 24 B2 43 24 |....I.1.BW:C$.C$|
00000800: AA 22 20 22 3A 82 3A 43 4C 24 B2 43 24 3A 43 24 |." ":.:CL$.C$:C$|
00000810: B2 22 22 00 45 10 D0 02 81 49 B2 31 A4 42 57 3A |."".E....I.1.BW:|
00000820: 43 24 B2 43 24 AA 22 9D 22 3A 82 3A 43 4C 24 B2 |C$.C$.".":.:CL$.|
00000830: 22 12 22 AA 43 4C 24 AA 43 24 AA 22 91 92 22 3A |".".CL$.C$."..":|
00000840: 43 24 B2 22 22 00 70 10 DA 02 46 52 24 B2 22 A4 |C$."".p...FR$.".|
00000850: AF B9 A2 B8 B7 A3 22 3A 81 49 B2 31 A4 37 3A 46 |......":.I.1.7:F|
00000860: 52 24 28 49 29 B2 CA 28 46 52 24 2C 49 2C 31 29 |R$(I)..(FR$,I,1)|
00000870: 00 8F 10 E4 02 8B 49 B1 34 A7 46 52 24 28 49 29 |......I.4.FR$(I)|
00000880: B2 22 12 22 AA 46 52 24 28 49 29 AA 22 92 22 00 |.".".FR$(I).".".|
00000890: 95 10 EE 02 82 00 CB 10 F8 02 81 49 B2 31 A4 37 |...........I.1.7|
000008A0: 3A 81 4A B2 31 A4 42 57 3A 46 24 B2 46 24 AA 46 |:.J.1.BW:F$.F$.F|
000008B0: 52 24 28 49 29 3A 82 4A 3A 46 52 24 28 49 29 B2 |R$(I):.J:FR$(I).|
000008C0: 46 24 3A 46 24 B2 22 22 3A 82 49 00 D1 10 02 03 |F$:F$."":.I.....|
000008D0: 8E 00 D7 10 0C 03 3A 00 E3 10 16 03 8F 20 54 49 |......:...... TI|
000008E0: 54 4C 45 00 E9 10 20 03 3A 00 29 11 2A 03 99 44 |TLE... .:.).*..D|
000008F0: 4E 24 22 05 11 11 11 1D 3C 54 3E 45 58 54 20 3C |N$".....<T>EXT <|
00000900: 53 3E 41 56 45 20 3C 41 3E 42 4F 52 54 20 3C 4C |S>AVE <A>BORT <L|
00000910: 3E 4F 41 44 20 3C 50 3E 52 49 4E 54 13 22 3A 81 |>OAD <P>RINT.":.|
00000920: 54 B2 31 A4 38 30 30 3A 82 00 43 11 34 03 A1 47 |T.1.800:..C.4..G|
00000930: 24 3A 8B 47 24 B3 B1 22 22 A7 99 42 4C 24 3A 89 |$:.G$..""..BL$:.|
00000940: 38 34 30 00 5C 11 3E 03 99 42 4C 24 3A 81 54 B2 |840.\.>..BL$:.T.|
00000950: 31 A4 31 32 35 3A 82 3A 89 38 31 30 00 6A 11 48 |1.125:.:.810.j.H|
00000960: 03 8B 47 24 B2 22 41 22 A7 8A 00 7B 11 52 03 8B |..G$."A"...{.R..|
00000970: 47 24 B2 22 4C 22 A7 31 31 37 30 00 8C 11 5C 03 |G$."L".1170...\.|
00000980: 8B 47 24 B2 22 54 22 A7 31 32 35 30 00 9D 11 66 |.G$."T".1250...f|
00000990: 03 8B 47 24 B2 22 50 22 A7 31 34 36 30 00 AE 11 |..G$."P".1460...|
000009A0: 70 03 8B 47 24 B3 B1 22 53 22 A7 38 31 30 00 B4 |p..G$.."S".810..|
000009B0: 11 7A 03 3A 00 BF 11 84 03 8F 20 53 41 56 45 00 |.z.:...... SAVE.|
000009C0: C5 11 8E 03 3A 00 E5 11 98 03 46 24 B2 22 22 3A |....:.....F$."":|
000009D0: 99 44 4E 24 22 11 11 11 46 49 4C 45 4E 41 4D 45 |.DN$"...FILENAME|
000009E0: 3F A6 9D 22 3B 00 FB 11 A2 03 A1 47 24 3A 91 AB |?..";......G$:..|
000009F0: 28 47 24 B2 22 22 29 89 39 33 30 00 1B 12 AC 03 |(G$."").930.....|
00000A00: 8B C6 28 47 24 29 B1 33 31 AF C6 28 47 24 29 B3 |..(G$).31..(G$).|
00000A10: 39 36 A7 46 24 B2 46 24 AA 47 24 00 3C 12 B6 03 |96.F$.F$.G$.<...|
00000A20: 8B 47 24 B3 B1 C7 28 31 33 29 A7 99 22 9D 22 47 |.G$...(13).."."G|
00000A30: 24 22 A6 3B 3A 47 4F 54 4F 39 33 30 00 50 12 C0 |$".;:GOTO930.P..|
00000A40: 03 99 42 4C 24 3A 8B 46 24 B2 22 22 A7 38 31 30 |..BL$:.F$."".810|
00000A50: 00 62 12 CA 03 8B C3 28 46 24 29 B1 31 34 A7 39 |.b.....(F$).14.9|
00000A60: 32 30 00 7D 12 D4 03 46 24 28 31 29 B2 46 24 3A |20.}...F$(1).F$:|
00000A70: 46 24 28 32 29 B2 46 24 AA 22 2E 43 22 00 99 12 |F$(2).F$.".C"...|
00000A80: DE 03 4F 50 24 B2 22 53 22 3A 81 4A B2 31 A4 32 |..OP$."S":.J.1.2|
00000A90: 3A 46 24 B2 46 24 28 4A 29 00 AB 12 E8 03 53 B2 |:F$.F$(J).....S.|
00000AA0: 53 28 4A 29 3A 45 B2 45 28 4A 29 00 C2 12 F2 03 |S(J):E.E(J).....|
00000AB0: 8D 31 30 35 30 3A 82 3A 8D 31 36 30 30 3A 89 38 |.1050:.:.1600:.8|
00000AC0: 31 30 00 C8 12 FC 03 3A 00 DC 12 06 04 8F 20 53 |10.....:...... S|
00000AD0: 41 56 45 20 41 4E 44 20 4C 4F 41 44 00 E2 12 10 |AVE AND LOAD....|
00000AE0: 04 3A 00 07 13 1A 04 81 49 B2 31 A4 C3 28 46 24 |.:......I.1..(F$|
00000AF0: 29 3A 97 38 31 39 AA 49 2C C6 28 CA 28 46 24 2C |):.819.I,.(.(F$,|
00000B00: 49 2C 31 29 29 3A 82 00 33 13 24 04 97 31 38 33 |I,1)):..3.$..183|
00000B10: 2C C3 28 46 24 29 3A 97 31 38 37 2C 35 32 3A 97 |,.(F$):.187,52:.|
00000B20: 31 38 38 2C 33 3A 97 31 38 36 2C 38 3A 97 31 38 |188,3:.186,8:.18|
00000B30: 35 2C 31 00 45 13 2E 04 8B 4F 50 24 B2 22 4C 22 |5,1.E....OP$."L"|
00000B40: A7 31 32 31 30 00 4B 13 38 04 3A 00 56 13 42 04 |.1210.K.8.:.V.B.|
00000B50: 8F 20 53 41 56 45 00 5C 13 4C 04 3A 00 90 13 56 |. SAVE.\.L.:...V|
00000B60: 04 53 48 B2 B5 28 53 AD 32 35 36 29 3A 53 4C B2 |.SH..(S.256):SL.|
00000B70: 53 AB 53 48 AC 32 35 36 3A 45 48 B2 B5 28 45 AD |S.SH.256:EH..(E.|
00000B80: 32 35 36 29 3A 45 4C B2 45 AB 45 48 AC 32 35 36 |256):EL.E.EH.256|
00000B90: 00 BD 13 60 04 97 32 35 31 2C 53 4C 3A 97 32 35 |...`..251,SL:.25|
00000BA0: 32 2C 53 48 3A 97 37 38 30 2C 32 35 31 3A 97 37 |2,SH:.780,251:.7|
00000BB0: 38 31 2C 45 4C 3A 97 37 38 32 2C 45 48 00 CA 13 |81,EL:.782,EH...|
00000BC0: 6A 04 9E 36 35 34 39 36 3A 8E 00 D0 13 74 04 3A |j..65496:....t.:|
00000BD0: 00 DB 13 7E 04 8F 20 4C 4F 41 44 00 E1 13 88 04 |...~.. LOAD.....|
00000BE0: 3A 00 12 14 92 04 85 22 93 11 1D 45 58 41 43 54 |:......"...EXACT|
00000BF0: 20 46 49 4C 45 4E 41 4D 45 22 3B 46 24 3A 8B 46 | FILENAME";F$:.F|
00000C00: 24 B2 22 22 B0 C3 28 46 24 29 B1 31 34 A7 31 31 |$.""..(F$).14.11|
00000C10: 37 30 00 2D 14 9C 04 46 24 28 31 29 B2 46 24 3A |70.-...F$(1).F$:|
00000C20: 46 24 28 32 29 B2 46 24 AA 22 2E 43 22 00 4F 14 |F$(2).F$.".C".O.|
00000C30: A6 04 81 4A B2 31 A4 32 3A 46 24 B2 46 24 28 4A |...J.1.2:F$.F$(J|
00000C40: 29 3A 4F 50 24 B2 22 4C 22 3A 8D 31 30 35 30 00 |):OP$."L":.1050.|
00000C50: 60 14 B0 04 82 3A 8D 31 36 30 30 3A 89 38 31 30 |`....:.1600:.810|
00000C60: 00 74 14 BA 04 97 37 38 30 2C 30 3A 9E 36 35 34 |.t....780,0:.654|
00000C70: 39 33 3A 8E 00 7A 14 C4 04 3A 00 87 14 CE 04 8F |93:..z...:......|
00000C80: 20 43 55 52 53 4F 52 00 8D 14 D8 04 3A 00 A2 14 | CURSOR.....:...|
00000C90: E2 04 53 43 B2 31 30 32 34 3A 43 52 B2 35 35 32 |..SC.1024:CR.552|
00000CA0: 39 36 00 B1 14 EC 04 8B 49 4E B3 30 A7 49 4E B2 |96......IN.0.IN.|
00000CB0: 30 00 C4 14 F6 04 8B 49 4E B1 39 35 39 A7 49 4E |0......IN.959.IN|
00000CC0: B2 39 35 39 00 E0 14 00 05 4F 4D B2 C2 28 53 43 |.959.....OM..(SC|
00000CD0: AA 49 4E 29 3A 4F 43 B2 C2 28 43 52 AA 49 4E 29 |.IN):OC..(CR.IN)|
00000CE0: 00 0C 15 0A 05 97 53 43 AA 49 4E 2C 28 C2 28 53 |......SC.IN,(.(S|
00000CF0: 43 AA 49 4E 29 AA 31 32 38 29 AF 32 35 35 3A 97 |C.IN).128).255:.|
00000D00: 43 52 AA 49 4E 2C C2 28 36 34 36 29 00 23 15 14 |CR.IN,.(646).#..|
00000D10: 05 A1 47 24 3A 91 AB 28 47 24 B2 22 22 29 89 31 |..G$:..(G$."").1|
00000D20: 32 39 30 00 3A 15 1E 05 8B 47 24 B2 22 5C 22 A7 |290.:....G$."\".|
00000D30: 8D 31 34 31 30 3A 89 38 31 30 00 53 15 28 05 8B |.1410:.810.S.(..|
00000D40: 47 24 B2 22 94 22 B0 47 24 B2 22 22 A7 47 24 B2 |G$.".".G$."".G$.|
00000D50: 22 DD 22 00 85 15 32 05 8B 47 24 B2 C7 28 31 33 |"."...2..G$..(13|
00000D60: 29 A7 4F 4D B2 28 4F 4D AA 31 32 38 29 AF 32 35 |).OM.(OM.128).25|
00000D70: 35 3A 8D 31 34 31 30 3A 49 4E B2 49 4E AA 31 3A |5:.1410:IN.IN.1:|
00000D80: 89 31 32 36 30 00 A7 15 3C 05 8B 47 24 B2 22 1D |.1260...<..G$.".|
00000D90: 22 A7 8D 31 34 31 30 3A 49 4E B2 28 49 4E AA 31 |"..1410:IN.(IN.1|
00000DA0: 29 3A 89 31 32 36 30 00 C9 15 46 05 8B 47 24 B2 |):.1260...F..G$.|
00000DB0: 22 9D 22 A7 8D 31 34 31 30 3A 49 4E B2 28 49 4E |"."..1410:IN.(IN|
00000DC0: AB 31 29 3A 89 31 32 36 30 00 EC 15 50 05 8B 47 |.1):.1260...P..G|
00000DD0: 24 B2 22 91 22 A7 8D 31 34 31 30 3A 49 4E B2 28 |$."."..1410:IN.(|
00000DE0: 49 4E AB 34 30 29 3A 89 31 32 36 30 00 0F 16 5A |IN.40):.1260...Z|
00000DF0: 05 8B 47 24 B2 22 11 22 A7 8D 31 34 31 30 3A 49 |..G$."."..1410:I|
00000E00: 4E B2 28 49 4E AA 34 30 29 3A 89 31 32 36 30 00 |N.(IN.40):.1260.|
00000E10: 23 16 64 05 53 50 B2 49 4E 3A 8D 31 34 32 30 3A |#.d.SP.IN:.1420:|
00000E20: 99 47 24 00 43 16 6E 05 8B C6 28 47 24 29 B1 33 |.G$.C.n...(G$).3|
00000E30: 31 AF C6 28 47 24 29 B3 31 32 38 A7 49 4E B2 49 |1..(G$).128.IN.I|
00000E40: 4E AA 31 00 4D 16 78 05 89 31 32 36 30 00 67 16 |N.1.M.x..1260.g.|
00000E50: 82 05 97 53 43 AA 49 4E 2C 4F 4D 3A 97 43 52 AA |...SC.IN,OM:.CR.|
00000E60: 49 4E 2C 4F 43 3A 8E 00 97 16 8C 05 59 B2 B5 28 |IN,OC:......Y..(|
00000E70: 53 50 AD 34 30 29 3A 58 B2 53 50 AB 34 30 AC 59 |SP.40):X.SP.40.Y|
00000E80: 3A 97 37 38 31 2C 59 3A 97 37 38 32 2C 58 3A 9E |:.781,Y:.782,X:.|
00000E90: 36 35 35 32 30 3A 8E 00 9D 16 96 05 3A 00 B0 16 |65520:......:...|
00000EA0: A0 05 8F 20 50 52 49 4E 54 45 52 20 44 55 4D 50 |... PRINTER DUMP|
00000EB0: 00 B6 16 AA 05 3A 00 E3 16 B4 05 52 24 B2 C7 28 |.....:.....R$..(|
00000EC0: 31 34 35 29 3A 56 24 B2 C7 28 31 34 36 29 3A 9F |145):V$..(146):.|
00000ED0: 34 2C 34 3A 9D 34 3A 47 B2 C2 28 36 34 38 29 AC |4,4:.4:G..(648).|
00000EE0: 32 35 36 00 F2 16 BE 05 99 52 24 AA C7 28 31 35 |256......R$..(15|
00000EF0: 29 3B 00 01 17 C8 05 81 50 B2 47 A4 47 AA 39 39 |);......P.G.G.99|
00000F00: 39 00 12 17 D2 05 43 B2 C2 28 50 29 3A 43 24 B2 |9.....C..(P):C$.|
00000F10: 22 22 00 3F 17 DC 05 8B 28 50 AB 47 29 AD 34 30 |"".?....(P.G).40|
00000F20: B2 B5 28 28 50 AB 47 29 AD 34 30 29 A7 99 C7 28 |..((P.G).40)...(|
00000F30: 38 29 AA C7 28 31 33 29 AA C7 28 31 34 29 3B 00 |8)..(13)..(14);.|
00000F40: 5B 17 E6 05 8B 43 B1 31 32 38 A7 43 B2 43 AB 31 |[....C.128.C.C.1|
00000F50: 32 38 3A 43 24 B2 C7 28 31 38 29 00 77 17 F0 05 |28:C$..(18).w...|
00000F60: 8B 43 B3 33 32 B0 43 B1 39 35 A7 43 B2 43 AA 36 |.C.32.C.95.C.C.6|
00000F70: 34 3A 89 31 35 34 30 00 8E 17 FA 05 8B 43 B1 36 |4:.1540......C.6|
00000F80: 33 AF 43 B3 39 36 A7 43 B2 43 AA 31 32 38 00 B2 |3.C.96.C.C.128..|
00000F90: 17 04 06 43 24 B2 43 24 AA C7 28 43 29 3A 8B C3 |...C$.C$..(C):..|
00000FA0: 28 43 24 29 B1 31 A7 43 24 B2 43 24 AA 56 24 AA |(C$).1.C$.C$.V$.|
00000FB0: 52 24 00 C3 17 0E 06 99 43 24 3B 3A 82 3A 98 34 |R$......C$;:.:.4|
00000FC0: 3A A0 34 00 CC 17 18 06 89 38 31 30 00 D2 17 22 |:.4......810..."|
00000FD0: 06 3A 00 E3 17 2C 06 8F 20 45 52 52 4F 52 20 43 |.:...,.. ERROR C|
00000FE0: 48 41 4E 00 E9 17 36 06 3A 00 03 18 40 06 9F 31 |HAN...6.:...@..1|
00000FF0: 35 2C 38 2C 31 35 3A 84 31 35 2C 41 2C 42 24 2C |5,8,15:.15,A,B$,|
00001000: 43 2C 44 00 0B 18 4A 06 A0 31 35 00 16 18 54 06 |C,D...J..15...T.|
00001010: 8B 41 B2 30 A7 8E 00 43 18 5E 06 99 42 4C 24 44 |.A.0...C.^..BL$D|
00001020: 4E 24 22 11 11 11 1D 1D 22 41 22 9D 22 42 24 22 |N$"....."A"."B$"|
00001030: 20 45 52 52 4F 52 13 22 3A 81 54 B2 31 A4 38 35 | ERROR.":.T.1.85|
00001040: 30 3A 82 00 55 18 68 06 A1 47 24 3A 8B 47 24 B3 |0:..U.h..G$:.G$.|
00001050: B1 22 22 A7 8E 00 90 18 72 06 99 44 4E 24 22 11 |."".....r..DN$".|
00001060: 11 11 1D 1D 50 52 45 53 53 20 41 4E 59 20 4B 45 |....PRESS ANY KE|
00001070: 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 13 22 3A |Y TO CONTINUE.":|
00001080: 81 54 B2 31 A4 38 35 30 3A 82 3A 89 31 36 33 30 |.T.1.850:.:.1630|
00001090: 00 00 00 |... |
.......10.=....15,8,15:.15,"S:BAR GRAPH"
: 15:."BAR GRAPH",8:..G...BO.53280:BG.BO
.1:.BG,0:.BO,6:.56296,0.....OV$.".......
..................................".....
DN$."......................"...(.BL$.DN$
."..."."
.".,.2.CC.4:.FR$(7),T$(36),V(36),CL
$(7),F$(2),S(2),E(2).Z.<.S(1).1024:E(1).
2024:S(2).55296:E(2).56297. .F.CL$(0).".
":CL$(1).".":CL$(2).".":CL$(3).".":CL$(4
).".":CL$(5)."."...P.CL$(6).".":CL$(7)."
."...Z..".. GRAPHMAKER 64"..
.D.."...C _ CREATE A GRAPH":."..L _ LOAD
A GRAPH".=.N..G$:..(G$."").110:.G$.."L"
. G$.."C".110.N.X..G$."L".1170......"...
MAXIMUM VERTICAL SCALE VALUE";MX:BI.MX.2
0:LI.BI.7:.MX..0.130......280:.570......
I.1.VB... .."...VALUE TO BE GRAPHED":.".
.FOR BAR #"I"., "T$(I);......V(I):.V(I).
MX.V(I).MX......390......:.GR$MX$...H.:.
*.R.. LOOP.0...:.W....C.1.VB:V.V(C):V.V.
3.(BI.7):.460:..`....810.F...:.V.... PAR
AMETER.|...:......"...HOW MANY VERTICAL
BARS":."..(2-36) ";:.VB.C."..VB.36.VB.2.
280.S.,.BW..(36.VB)...6..I.1.VB...@.."..
.TITLE FOR BAR #"I:."..UP TO"BW"CHARACTE
RS";.4.J..T$(I):.T$(I)."".T$(I).D(I).P.T
..C(T$(I)).BW.(BW.2).320.X.^..:..^.H.:.K
.R.. CENTER.Q.|.:......BW.3.T$(I).I(T$(I
),1):.......C(T$(I)).BW...D...MR.BW.C(T$
(I)):MR.MR.2:.MR.1.......MR$."":.J.1.MR:
C$.".".C$:.:T$(I).C$.T$(I):C$."":......:
...... CHART...B.:.-.L..V.LI.V(C).0.FR.1
:.480.V.V..V.0.BL..(V.BI):F.V.BL.BI:FR..
(F.LI).H...CC$.H(OV$,CC).....DN$"..."CC
$T$(C);......"."CL$(C.7)......DN$CC$;:.B
L.0.530......I.1.BL:.CL$;:..N....FR.0..F
R$(FR).....CC.CC.BW:BL.0:FR.0:....&.:...
0.. STRINGS...:.:.#.D.MX$.D(MX):MX$.I(MX
$,C(MX$).1).H.N.MX$.H(MX$,3):J.3.C(MX$):
.J.0.610.P.X..I.1.J:M$." ".M$:.:MX$.M$.M
X$:M$.""...B.HF.100.MX:HF..(HF.2):HF.HF.
100:HF$.D(HF).B.L.HF$.I(HF$,C(HF$).1):HF
$.H(HF$,3).Z.V.J.3.C(HF$):.J.0.650......
I.1.J:M$.M$." ":.:HF$.M$.HF$:M$."".&....
E(HF$).E(MX$).HF$.H(" ".HF$,3).L...MX$."
...".MX$.".............".HF$.V...GR$."..
....":.I.1.4:C$.C$.GR$:.:C$.C$.....C$.".
.........".C$......I.1.5:C$.C$.GR$:.:GR$
.C$."...":C$."".....GR$.GR$.".0.........
............................."...F..I.1.
BW:C$.C$." ":.:CL$.C$:C$."".E.P..I.1.BW:
C$.C$.".":.:CL$.".".CL$.C$."..":C$."".P.
Z.FR$.".......":.I.1.7:FR$(I).J(FR$,I,1)
......I.4.FR$(I).".".FR$(I).".".......K.
...I.1.7:.J.1.BW:F$.F$.FR$(I):.J:FR$(I).
F$:F$."":.I.Q.....W...:...... TITLE... .
:.).*..DN$".....<T>EXT <S>AVE <A>BORT <L
>OAD <P>RINT.":.T.1.800:..C.4..G$:.G$.."
"..BL$:.840.\.>..BL$:.T.1.125:.:.810.J.H
..G$."A"...{.R..G$."L".1170...\..G$."T".
1250...F..G$."P".1460...P..G$.."S".810..
.Z.:...... SAVE.E...:.....F$."":.DN$"...
FILENAME?..";......G$:..(G$."").930.....
.F(G$).31.F(G$).96.F$.F$.G$.<....G$..G(1
3).."."G$".;:GOTO930.P....BL$:.F$."".810
.B.J..C(F$).14.920.}.T.F$(1).F$:F$(2).F$
.".C".....OP$."S":.J.1.2:F$.F$(J).....S.
S(J):E.E(J).B....1050:.:.1600:.810.H...:
...... SAVE AND LOAD.....:......I.1.C(F$
):.819.I,F(J(F$,I,1)):..3.$..183,C(F$):.
187,52:.188,3:.186,8:.185,1.E....OP$."L"
.1210.K.8.:.V.B.. SAVE.\.L.:...V.SH..(S.
256):SL.S.SH.256:EH..(E.256):EL.E.EH.256
...`..251,SL:.252,SH:.780,251:.781,EL:.7
82,EH.J.J..65496:..P.T.:...~.. LOAD.....
:......"...EXACT FILENAME";F$:.F$."".C(F
$).14.1170.-...F$(1).F$:F$(2).F$.".C".O.
...J.1.2:F$.F$(J):OP$."L":.1050.`....:.1
600:.810.T....780,0:.65493:..Z.D.:...N..
CURSOR...X.:.....SC.1024:CR.55296......
IN.0.IN.0.D....IN.959.IN.959.....OM.B(SC
.IN):OC.B(CR.IN)......SC.IN,(B(SC.IN).12
8).255:.CR.IN,B(646).#....G$:..(G$."").1
290.:....G$."\"..1410:.810.S.(..G$.".".G
$."".G$."."...2..G$.G(13).OM.(OM.128).25
5:.1410:IN.IN.1:.1260...<..G$."."..1410:
IN.(IN.1):.1260.I.F..G$."."..1410:IN.(IN
.1):.1260...P..G$."."..1410:IN.(IN.40):.
1260...Z..G$."."..1410:IN.(IN.40):.1260.
#.D.SP.IN:.1420:.G$.C.N..F(G$).31.F(G$).
128.IN.IN.1.M.X..1260.G....SC.IN,OM:.CR.
IN,OC:......Y..(SP.40):X.SP.40.Y:.781,Y:
.782,X:.65520:......:... .. PRINTER DUMP
.....:.....R$.G(145):V$.G(146):.4,4:.4:G
.B(648).256......R$.G(15);...H..P.G.G.99
9...R.C.B(P):C$."".?....(P.G).40..((P.G)
.40)..G(8).G(13).G(14);.[....C.128.C.C.1
28:C$.G(18).W....C.32.C.95.C.C.64:.1540.
.....C.63.C.96.C.C.128.....C$.C$.G(C):.C
(C$).1.C$.C$.V$.R$.C....C$;:.:.4: 4.L...
.810.R.".:...,.. ERROR CHAN...6.:...@..1
5,8,15:.15,A,B$,C,D...J. 15...T..A.0...C
.^..BL$DN$"....."A"."B$" ERROR.":.T.1.85
0:..U.H..G$:.G$.."".....R..DN$".....PRES
S ANY KEY TO CONTINUE.":.T.1.850:.:.1630
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL