> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 49 08 0A 00 83 20 22 CA C1 CE D5 C1 D2 D9 |..I.... ".......|
00000010: 22 2C 22 C6 C5 C2 D2 D5 C1 D2 D9 22 2C 22 CD C1 |","........","..|
00000020: D2 C3 C8 22 2C 22 C1 D0 D2 C9 CC 22 2C 22 CD C1 |...",".....","..|
00000030: D9 22 2C 22 CA D5 CE C5 22 2C 22 CA D5 CC D9 22 |.","....","...."|
00000040: 2C 22 C1 D5 C7 D5 D3 D4 22 00 7B 08 14 00 83 20 |,"......".{.... |
00000050: 22 D3 C5 D0 D4 C5 CD C2 C5 D2 22 2C 22 CF C3 D4 |".........","...|
00000060: CF C2 C5 D2 22 2C 22 CE CF D6 C5 CD C2 C5 D2 22 |....","........"|
00000070: 2C 22 C4 C5 C3 C5 CD C2 C5 D2 22 00 88 08 1E 00 |,"........".....|
00000080: 86 20 4D 24 28 31 32 29 00 A5 08 28 00 81 20 4C |. M$(12)...(.. L|
00000090: B2 31 20 A4 20 31 32 20 3A 20 87 20 4D 24 28 4C |.1 . 12 : . M$(L|
000000A0: 29 20 3A 20 82 00 CC 08 63 00 8F 20 20 2A 2A 2A |) : ....c.. ***|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E9 08 64 |************...d|
000000D0: 00 8F 20 20 20 20 20 20 20 47 45 54 20 46 49 4C |.. GET FIL|
000000E0: 45 20 44 45 54 41 49 4C 53 00 0F 09 65 00 8F 20 |E DETAILS...e.. |
000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000110: 19 09 6E 00 99 20 22 93 22 00 42 09 78 00 85 20 |..n.. ".".B.x.. |
00000120: 22 C5 CE D4 C5 D2 20 CE D5 CD C2 C5 D2 20 CF C6 |"..... ...... ..|
00000130: 20 D3 D4 C1 D2 D4 20 CD CF CE D4 C8 20 22 3B 53 | ..... ..... ";S|
00000140: 4D 25 00 5D 09 7D 00 8B 20 53 4D 25 B3 31 20 B0 |M%.].}.. SM%.1 .|
00000150: 20 53 4D 25 B1 31 32 20 A7 20 31 31 30 00 86 09 | SM%.12 . 110...|
00000160: 82 00 85 20 22 C5 CE D4 C5 D2 20 D3 D4 C1 D2 D4 |... "..... .....|
00000170: 20 D9 C5 C1 D2 20 20 20 20 20 20 20 20 20 20 20 | .... |
00000180: 20 22 3B 53 59 25 00 AF 09 8C 00 85 20 22 C5 CE | ";SY%...... "..|
00000190: D4 C5 D2 20 CE D5 CD C2 C5 D2 20 CF C6 20 D3 C5 |... ...... .. ..|
000001A0: D2 C9 C5 D3 20 20 20 20 20 20 22 3B 4E 53 25 00 |.... ";NS%.|
000001B0: CA 09 91 00 8B 20 4E 53 25 B3 33 20 B0 20 4E 53 |..... NS%.3 . NS|
000001C0: 25 B1 39 38 20 A7 20 31 31 30 00 F3 09 96 00 85 |%.98 . 110......|
000001D0: 20 22 C5 CE D4 C5 D2 20 CE D5 CD C2 C5 D2 20 CF | "..... ...... .|
000001E0: C6 20 D0 C5 D2 C9 CF C4 D3 20 20 20 20 20 22 3B |. ....... ";|
000001F0: 4E 50 25 00 1E 0A 9B 00 8B 20 4E 50 25 B3 31 20 |NP%...... NP%.1 |
00000200: B0 20 4E 50 25 B1 31 30 34 20 B0 20 4E 50 25 AC |. NP%.104 . NP%.|
00000210: 4E 53 25 B1 33 35 30 30 20 A7 20 31 31 30 00 41 |NS%.3500 . 110.A|
00000220: 0A A0 00 85 20 22 C5 CE D4 C5 D2 20 C6 C9 CC C5 |.... "..... ....|
00000230: CE C1 CD C5 20 20 20 20 20 20 20 20 20 22 3B 4E |.... ";N|
00000240: 24 00 4F 0A C8 00 86 20 50 24 28 4E 50 25 29 00 |$.O.... P$(NP%).|
00000250: 5D 0A D2 00 86 20 4C 24 28 4E 50 25 29 00 83 0A |].... L$(NP%)...|
00000260: 2B 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |+.. ************|
00000270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000280: 2A 2A 2A 00 A3 0A 2C 01 8F 20 20 20 20 20 20 20 |***...,.. |
00000290: 43 52 45 41 54 45 20 44 45 53 43 52 49 50 54 49 |CREATE DESCRIPTI|
000002A0: 4F 4E 53 00 C9 0A 2D 01 8F 20 2A 2A 2A 2A 2A 2A |ONS...-.. ******|
000002B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DE 0A 36 01 4D 25 |*********...6.M%|
000002D0: B2 53 4D 25 20 3A 20 59 52 25 B2 53 59 25 00 EE |.SM% : YR%.SY%..|
000002E0: 0A 40 01 81 20 4C B2 31 20 A4 20 4E 50 25 00 1E |.@.. L.1 . NP%..|
000002F0: 0B 4A 01 50 24 28 4C 29 B2 C8 28 4D 24 28 4D 25 |.J.P$(L)..(M$(M%|
00000300: 29 AA C4 28 59 52 25 29 AA 22 20 20 20 20 20 20 |)..(YR%)." |
00000310: 20 20 20 20 20 20 20 20 20 22 2C 31 35 29 00 2A | ",15).*|
00000320: 0B 54 01 4D 25 B2 4D 25 AA 31 00 49 0B 5E 01 8B |.T.M%.M%.1.I.^..|
00000330: 20 4D 25 B1 31 32 20 A7 20 4D 25 B2 31 20 3A 20 | M%.12 . M%.1 : |
00000340: 59 52 25 B2 59 52 25 AA 31 00 4F 0B 68 01 82 00 |YR%.YR%.1.O.h...|
00000350: 75 0B 8F 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |u.... **********|
00000360: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000370: 2A 2A 2A 2A 2A 00 8F 0B 90 01 8F 20 20 20 20 20 |*****...... |
00000380: 20 20 43 52 45 41 54 45 20 4C 41 42 45 4C 53 00 | CREATE LABELS.|
00000390: B5 0B 91 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********|
000003A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003B0: 2A 2A 2A 2A 2A 00 CA 0B 9A 01 4D 25 B2 53 4D 25 |*****.....M%.SM%|
000003C0: 20 3A 20 59 52 25 B2 53 59 25 00 DA 0B A4 01 81 | : YR%.SY%......|
000003D0: 20 4C B2 31 20 A4 20 4E 50 25 00 EE 0B AE 01 4C | L.1 . NP%.....L|
000003E0: 31 24 B2 C8 28 4D 24 28 4D 25 29 2C 33 29 00 02 |1$..(M$(M%),3)..|
000003F0: 0C B8 01 4C 32 24 B2 C9 28 C4 28 59 52 25 29 2C |...L2$..(.(YR%),|
00000400: 32 29 00 14 0C C2 01 4C 24 28 4C 29 B2 4C 31 24 |2).....L$(L).L1$|
00000410: AA 4C 32 24 00 20 0C CC 01 4D 25 B2 4D 25 AA 31 |.L2$. ...M%.M%.1|
00000420: 00 3E 0C D6 01 8B 4D 25 B1 31 32 20 A7 20 4D 25 |.>....M%.12 . M%|
00000430: B2 31 20 3A 20 59 52 25 B2 59 52 25 AA 31 00 44 |.1 : YR%.YR%.1.D|
00000440: 0C E0 01 82 00 6A 0C F3 01 8F 20 2A 2A 2A 2A 2A |.....j.... *****|
00000450: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 89 0C F4 01 8F |**********......|
00000470: 20 20 20 20 20 20 20 43 52 45 41 54 45 20 54 49 | CREATE TI|
00000480: 54 4C 45 53 20 46 49 4C 45 00 AF 0C F5 01 8F 20 |TLES FILE...... |
00000490: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000004B0: C4 0C FE 01 58 24 B2 4E 24 AA 22 54 22 20 3A 20 |....X$.N$."T" : |
000004C0: 99 22 93 22 00 DE 0C 08 02 9F 33 2C 38 2C 33 2C |."."......3,8,3,|
000004D0: 22 30 3A 22 AA 58 24 AA 22 2C 53 2C 57 22 00 F0 |"0:".X$.",S,W"..|
000004E0: 0C 12 02 4E B2 4E 53 25 20 3A 20 50 B2 4E 50 25 |...N.NS% : P.NP%|
000004F0: 00 00 0D 1C 02 98 33 2C 4E 20 3A 20 98 33 2C 50 |......3,N : .3,P|
00000500: 00 0E 0D 26 02 81 20 4C B2 31 20 A4 20 4E 00 31 |...&.. L.1 . N.1|
00000510: 0D 30 02 98 33 2C 22 2E 20 20 20 20 20 20 20 20 |.0..3,". |
00000520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2E | .|
00000530: 22 00 37 0D 3A 02 82 00 3F 0D 44 02 A0 20 33 00 |".7.:...?.D.. 3.|
00000540: 65 0D 57 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |e.W.. **********|
00000550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000560: 2A 2A 2A 2A 2A 00 82 0D 58 02 8F 20 20 20 20 20 |*****...X.. |
00000570: 20 43 52 45 41 54 45 20 44 41 54 41 20 46 49 4C | CREATE DATA FIL|
00000580: 45 53 00 A8 0D 59 02 8F 20 2A 2A 2A 2A 2A 2A 2A |ES...Y.. *******|
00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 00 B6 0D 62 02 81 20 4C |********...b.. L|
000005B0: B2 31 20 A4 20 4E 00 D2 0D 6C 02 99 20 22 13 C3 |.1 . N...l.. "..|
000005C0: D2 C5 C1 D4 C9 CE C7 20 D3 C5 D2 C9 C5 D3 20 22 |....... ...... "|
000005D0: 3B 4C 00 E3 0D 76 02 4E 41 4D 24 B2 4E 24 AA C4 |;L...v.NAM$.N$..|
000005E0: 28 4C 29 00 00 0E 80 02 9F 20 35 2C 38 2C 35 2C |(L)...... 5,8,5,|
000005F0: 22 30 3A 22 AA 4E 41 4D 24 AA 22 2C 53 2C 57 22 |"0:".NAM$.",S,W"|
00000600: 00 0E 0E 8A 02 81 20 4B B2 31 20 A4 20 50 00 1B |...... K.1 . P..|
00000610: 0E 94 02 98 35 2C 50 24 28 4B 29 00 28 0E 9E 02 |....5,P$(K).(...|
00000620: 98 35 2C 4C 24 28 4B 29 00 31 0E A8 02 98 35 2C |.5,L$(K).1....5,|
00000630: 30 00 3D 0E B2 02 82 20 3A 20 A0 20 35 00 43 0E |0.=.... : . 5.C.|
00000640: BC 02 82 00 49 0E E7 03 80 00 49 00 88 08 1E 00 |....I.....I.....|
00000650: 86 20 4D 24 28 31 32 29 00 A7 08 28 00 81 20 4C |. M$(12)...(.. L|
00000660: 25 B2 31 20 A4 20 31 32 20 3A 20 87 20 4D 24 28 |%.1 . 12 : . M$(|
00000670: 4C 25 29 20 3A 20 82 00 CE 08 63 00 8F 20 20 2A |L%) : ....c.. *|
00000680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E8 |**************..|
000006A0: 08 64 00 8F 20 20 20 20 C7 C5 D4 A0 C6 C9 CC C5 |.d.. ........|
000006B0: 20 C4 C5 D4 C1 C9 CC D3 00 0E 09 65 00 8F 20 2A | ..........e.. *|
000006C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000006D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 17 |**************..|
000006E0: 09 6E 00 99 22 93 22 00 40 09 78 00 85 20 22 C5 |.n..".".@.x.. ".|
000006F0: CE D4 C5 D2 20 CE D5 CD C2 C5 D2 20 CF C6 20 D3 |.... ...... .. .|
00000700: D4 C1 D2 D4 20 CD CF CE D4 C8 20 22 3B 53 4D 25 |.... ..... ";SM%|
00000710: 00 5B 09 7D 00 8B 20 53 4D 25 B3 31 20 B0 20 53 |.[.}.. SM%.1 . S|
00000720: 4D 25 B1 31 32 20 A7 20 31 31 30 00 79 09 82 00 |M%.12 . 110.y...|
00000730: 85 20 22 C5 CE D4 C5 D2 20 D3 D4 C1 D2 D4 20 D9 |. "..... ..... .|
00000740: C5 C1 D2 20 22 3B 53 59 25 00 9D 09 8C 00 85 20 |... ";SY%...... |
00000750: 22 C5 CE D4 C5 D2 A0 CE D5 CD C2 C5 D2 20 CF C6 |"............ ..|
00000760: 20 D3 C5 D2 C9 C5 D3 20 22 3B 4E 53 25 00 B0 09 | ...... ";NS%...|
00000770: 91 00 8B 20 4E 53 25 B1 39 38 20 A7 20 31 31 30 |... NS%.98 . 110|
00000780: 00 D5 09 96 00 85 20 22 C5 CE D4 C5 D2 20 CE D5 |...... "..... ..|
00000790: CD C2 C5 D2 20 CF C6 20 D0 C5 D2 C9 CF C4 D3 20 |.... .. ....... |
000007A0: 22 2C 4E 50 25 00 E9 09 9B 00 8B 20 4E 50 25 B1 |",NP%...... NP%.|
000007B0: 31 30 34 20 A7 20 31 31 30 00 02 0A A0 00 8B 20 |104 . 110...... |
000007C0: 4E 53 25 AC 4E 50 25 B1 33 35 30 30 20 A7 20 31 |NS%.NP%.3500 . 1|
000007D0: 31 30 00 10 0A D2 00 86 20 50 24 28 4E 50 25 29 |10...... P$(NP%)|
000007E0: 00 1E 0A DC 00 86 20 4C 24 28 4E 50 25 29 00 44 |...... L$(NP%).D|
000007F0: 0A 2B 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.+.. ***********|
00000800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000810: 2A 2A 2A 2A 00 62 0A 2C 01 8F 20 20 20 20 20 C3 |****.b.,.. .|
00000820: D2 C5 C1 D4 C5 20 C4 C5 D3 C3 D2 C9 D0 D4 C9 CF |..... ..........|
00000830: CE D3 00 88 0A 2D 01 8F 20 2A 2A 2A 2A 2A 2A 2A |.....-.. *******|
00000840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000850: 2A 2A 2A 2A 2A 2A 2A 2A 00 00 00 BE AA BD DE 0E |********........|
00000860: 25 62 05 63 F0 B4 A5 61 99 00 28 A5 62 99 01 28 |%b.c...a..(.b..(|
00000870: A5 63 99 02 28 A5 64 99 03 28 A5 65 99 04 28 A5 |.c..(.d..(.e..(.|
00000880: 66 99 05 28 4C 26 09 A9 01 99 06 28 4A 99 02 28 |f..(L&.....(J..(|
00000890: 99 03 28 4C 26 09 A0 00 B1 39 29 1F 8D CF 0A D0 |..(L&....9).....|
000008A0: 03 4C EB 0A 4C 1D 0B 4C 66 0B 4C 04 0B 4C 33 0B |.L..L..Lf.L..L3.|
000008B0: 4C 8A 0B 4C 42 0B 4C 54 0B 4C AE 0B C8 84 10 B1 |L..LB.LT.L......|
000008C0: 39 85 65 C8 B1 39 85 64 A5 39 69 02 85 39 90 1B |9.e..9.d.9i..9..|
000008D0: E6 3A 4C |.:L |
..I.... "JANUARY","FEBRUARY","MARCH","AP
RIL","MAY","JUNE","JULY","AUGUST".{....
"SEPTEMBER","OCTOBER","NOVEMBER","DECEMB
ER"...... M$(12)...(.. L.1 . 12 : . M$(L
) : ..L.C.. ***************************
****...D.. GET FILE DETAILS...E..
*******************************...N.. ".
".B.X.. "ENTER NUMBER OF START MONTH ";S
M%.].}.. SM%.1 . SM%.12 . 110...... "ENT
ER START YEAR ";SY%...... "EN
TER NUMBER OF SERIES ";NS%.J.... NS
%.3 . NS%.98 . 110...... "ENTER NUMBER O
F PERIODS ";NP%...... NP%.1 . NP%.10
4 . NP%.NS%.3500 . 110.A. .. "ENTER FILE
NAME ";N$.O.H.. P$(NP%).].R.. L$
(NP%)...+.. ****************************
***...,.. CREATE DESCRIPTIONS.I.-.
. *******************************...6.M%
.SM% : YR%.SY%...@.. L.1 . NP%...J.P$(L)
.H(M$(M%).D(YR%)." ",15).*
.T.M%.M%.1.I.^.. M%.12 . M%.1 : YR%.YR%.
1.O.H...U.... **************************
*****...... CREATE LABELS...... **
*****************************.J...M%.SM%
: YR%.SY%.Z.... L.1 . NP%.....L1$.H(M$(
M%),3).....L2$.I(D(YR%),2)...B.L$(L).L1$
.L2$. .L.M%.M%.1.>.V..M%.12 . M%.1 : YR%
.YR%.1.D.....J.... *********************
**********...... CREATE TITLES FIL
E...... *******************************.
D...X$.N$."T" : ."."......3,8,3,"0:".X$.
",S,W".....N.NS% : P.NP%......3,N : .3,P
...&.. L.1 . N.1.0..3,".
.".7.:...?.D. 3.E.W.. **********
*********************...X.. CREATE
DATA FILES...Y.. ***********************
********...B.. L.1 . N.R.L.. ".CREATING
SERIES ";L...V.NAM$.N$.D(L)...... 5,8,5,
"0:".NAM$.",S,W"...... K.1 . P......5,P$
(K).(....5,L$(K).1....5,0.=.... : 5.C.
....I.....I...... M$(12)...(.. L%.1 . 12
: . M$(L%) : ..N.C.. *****************
**************...D.. GET FILE DETAILS
...E.. *******************************..
.N..".".@.X.. "ENTER NUMBER OF START MON
TH ";SM%.[.}.. SM%.1 . SM%.12 . 110.Y...
. "ENTER START YEAR ";SY%...... "ENTER N
UMBER OF SERIES ";NS%...... NS%.98 . 110
.U.... "ENTER NUMBER OF PERIODS ",NP%...
... NP%.104 . 110... .. NS%.NP%.3500 . 1
10...R.. P$(NP%)...... L$(NP%).D.+.. ***
****************************.B.,.. C
REATE DESCRIPTIONS...-.. ***************
****************........%B.C...A..(.B..(
.C..(.D..(.E..(.F..(L&.....(J..(..(L&. .
.9)..O.P.L..L..LF.L..L3.L..LB.LT.L..H...
9.EH.9.D.9I..9...:L
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL