00000000: 01 04 17 04 0A 00 27 48 49 53 54 4F 47 52 41 4D |......'HISTOGRAM|
00000010: 20 43 42 4D 2D 36 34 00 3D 04 14 00 E1 01 3A 42 | CBM-64.=.....:B|
00000020: 53 B2 34 30 3A 99 22 93 48 49 53 54 4F 47 52 41 |S.40:.".HISTOGRA|
00000030: 4D 11 11 11 11 22 3A 86 44 28 42 53 29 00 64 04 |M....":.D(BS).d.|
00000040: 1E 00 41 24 B2 22 22 3A EA 22 11 11 20 20 46 28 |..A$."":.".. F(|
00000050: 58 29 3D 22 3B 41 24 3A 8B 41 24 B2 22 22 80 EF |X)=";A$:.A$.""..|
00000060: 99 22 11 22 00 90 04 28 00 EA 22 13 42 45 47 49 |."."...(..".BEGI|
00000070: 4E 3D 22 3B 42 24 2C 31 30 3A E7 42 53 AD 32 3B |N=";B$,10:.BS.2;|
00000080: 3A EA 22 45 49 4E 44 45 3D 22 3B 43 24 2C 31 30 |:."EINDE=";C$,10|
00000090: 00 BC 04 32 00 41 B2 FE 28 42 24 29 3A 45 B2 FE |...2.A..(B$):E..|
000000A0: 28 43 24 29 3A 4B B2 30 3A 4C B2 31 45 33 38 3A |(C$):K.0:L.1E38:|
000000B0: 48 B2 AB 4C 3A 8B 41 B2 45 A7 33 30 00 F9 04 3C |H..L:.A.E.30...<|
000000C0: 00 81 58 B2 41 A4 45 A9 28 45 AB 41 29 AD 42 53 |..X.A.E.(E.A).BS|
000000D0: 3A 4A B2 FE 28 41 24 29 3A 44 28 4B 29 B2 4A 3A |:J..(A$):D(K).J:|
000000E0: 4B B2 4B AA 31 3A 48 B2 F8 28 48 2C 4A 29 3A 4C |K.K.1:H..(H,J):L|
000000F0: B2 F7 28 4C 2C 4A 29 3A 82 00 32 05 46 00 99 22 |..(L,J):..2.F.."|
00000100: 93 22 3A E7 32 34 AC 42 53 3B 3A 44 B2 31 39 32 |.":.24.BS;:D.192|
00000110: AD 28 48 AB 4C 29 3A 81 49 B2 30 A4 42 53 AB 31 |.(H.L):.I.0.BS.1|
00000120: 3A 07 28 44 28 49 29 AB 4C 29 AC 44 3A 82 3A 89 |:.(D(I).L).D:.:.|
00000130: 34 30 00 6A 05 50 00 27 50 52 4F 42 45 45 52 20 |40.j.P.'PROBEER |
00000140: 56 4F 4F 52 20 46 28 58 29 3A 20 53 49 4E 28 58 |VOOR F(X): SIN(X|
00000150: 29 2B 43 4F 53 28 58 29 3B 20 42 45 47 49 4E 20 |)+COS(X); BEGIN |
00000160: 32 2C 20 45 49 4E 44 45 20 35 00 00 00 00 |2, EINDE 5.... |
......'HISTOGRAM CBM-64.=.....:BS.40:.".
HISTOGRAM....":.D(BS).D...A$."":.".. F(
X)=";A$:.A$.""..."."...(..".BEGIN=";B$,1
0:.BS.2;:."EINDE=";C$,10...2.A..(B$):E..
(C$):K.0:L.1E38:H..L:.A.E.30...<..X.A.E.
(E.A).BS:J..(A$):D(K).J:K.K.1:H..(H,J):L
..(L,J):..2.F..".":.24.BS;:D.192.(H.L):.
I.0.BS.1:.(D(I).L).D:.:.40.J.P.'PROBEER
VOOR F(X): SIN(X)+COS(X); BEGIN 2, EINDE
5....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL