> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 64 00 52 54 B2 BB 28 AB 54 49 29 3A |..).d.RT..(.TI):|
00000010: 97 33 31 30 30 30 2C B5 28 BB 28 31 29 AC 32 35 |.31000,.(.(1).25|
00000020: 36 29 3A 97 36 34 36 2C 30 00 51 08 78 00 81 49 |6):.646,0.Q.x..I|
00000030: B2 31 A4 C2 28 33 30 30 30 30 29 3A 41 24 B2 41 |.1..(30000):A$.A|
00000040: 24 AA C7 28 C2 28 33 30 30 30 30 AA 49 29 29 3A |$..(.(30000.I)):|
00000050: 82 00 6A 08 82 00 99 22 93 05 34 31 30 20 44 45 |..j...."..410 DE|
00000060: 46 46 4E 41 28 58 29 3D 22 3B 00 73 08 A0 00 99 |FFNA(X)=";.s....|
00000070: 41 24 3B 00 A1 08 B4 00 8B BB 28 31 29 B3 2E 34 |A$;.......(1)..4|
00000080: A7 99 22 2B 22 3B B5 28 BB 28 31 29 AC 32 30 29 |.."+";.(.(1).20)|
00000090: AD 31 30 AB B5 28 BB 28 31 29 AC 32 30 29 AD 31 |.10..(.(1).20).1|
000000A0: 30 00 C5 08 BE 00 97 32 31 34 2C 32 3A 97 32 31 |0......214,2:.21|
000000B0: 31 2C 2E 3A 9E 35 38 36 34 30 3A 99 22 47 4F 54 |1,.:.58640:."GOT|
000000C0: 4F 32 34 30 22 00 F9 08 C8 00 97 36 33 31 2C 31 |O240"......631,1|
000000D0: 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 |9:.632,13:.633,1|
000000E0: 39 3A 97 36 33 34 2C 31 37 3A 97 36 33 35 2C 31 |9:.634,17:.635,1|
000000F0: 37 3A 97 36 33 36 2C 31 33 00 06 09 D2 00 97 31 |7:.636,13......1|
00000100: 39 38 2C 36 3A 90 00 0E 09 F0 00 49 B2 2E 00 1E |98,6:......I....|
00000110: 09 FA 00 45 49 B2 C2 28 32 39 30 30 30 29 00 46 |...EI..(29000).F|
00000120: 09 FF 00 81 49 B2 31 A4 C2 28 33 30 30 30 30 29 |....I.1..(30000)|
00000130: 3A 41 24 B2 41 24 AA C7 28 C2 28 33 30 30 30 30 |:A$.A$..(.(30000|
00000140: AA 49 29 29 3A 82 00 85 09 5E 01 5A 24 B2 22 36 |.I)):....^.Z$."6|
00000150: 31 30 22 3A 58 24 B2 22 58 22 3A 59 24 B2 22 59 |10":X$."X":Y$."Y|
00000160: 22 3A 8B C2 28 33 31 30 30 30 29 B3 35 31 A7 5A |":..(31000).51.Z|
00000170: 24 B2 22 38 32 30 22 3A 58 24 B2 22 59 22 3A 59 |$."820":X$."Y":Y|
00000180: 24 B2 22 58 22 00 9F 09 68 01 99 22 93 05 22 3B |$."X"...h.."..";|
00000190: 5A 24 3B 59 24 3B 22 3D 4D 46 2A 46 4E 22 3B 00 |Z$;Y$;"=MF*FN";.|
000001A0: AE 09 72 01 99 C7 28 36 34 AA 45 49 29 3B 00 F0 |..r...(64.EI);..|
000001B0: 09 7C 01 99 22 28 22 3B 58 24 3B 22 2B 52 57 29 |.|.."(";X$;"+RW)|
000001C0: 2D 41 42 53 28 22 3B 58 24 3B 22 2F 32 30 29 2B |-ABS(";X$;"/20)+|
000001D0: 43 4F 53 28 22 3B 58 24 3B 22 29 2F 32 30 2B 53 |COS(";X$;")/20+S|
000001E0: 49 4E 28 22 3B 58 24 3B 22 2A 34 29 2F 32 30 22 |IN(";X$;"*4)/20"|
000001F0: 00 FF 09 86 01 99 22 47 4F 54 4F 34 31 30 22 00 |......"GOTO410".|
00000200: 24 0A 90 01 97 36 33 31 2C 31 39 3A 97 36 33 32 |$....631,19:.632|
00000210: 2C 31 33 3A 97 36 33 33 2C 31 33 3A 97 31 39 38 |,13:.633,13:.198|
00000220: 2C 33 3A 90 00 3E 0A 9A 01 96 A5 41 28 58 29 B2 |,3:..>.....A(X).|
00000230: 31 AA AB 2E 30 39 39 39 39 39 39 39 39 38 00 63 |1...0999999998.c|
00000240: 0A A4 01 96 A5 42 28 58 29 B2 28 A5 41 28 58 29 |.....B(X).(.A(X)|
00000250: AB A5 41 28 58 AB 2E 30 33 37 35 29 29 AD 2E 30 |..A(X..0375))..0|
00000260: 33 37 35 00 88 0A AE 01 96 A5 43 28 58 29 B2 28 |375.......C(X).(|
00000270: A5 42 28 58 29 AB A5 42 28 58 AB 2E 30 33 37 35 |.B(X)..B(X..0375|
00000280: 29 29 AD 2E 30 33 37 35 00 C6 0A B8 01 41 B2 2E |))..0375.....A..|
00000290: 3A 42 B2 2E 3A 41 B2 C2 28 34 39 29 3A 42 B2 C2 |:B..:A..(49):B..|
000002A0: 28 35 30 29 3A 86 46 28 28 31 36 31 39 31 AB 41 |(50):.F((16191.A|
000002B0: AB 42 AC 32 35 36 29 AD 35 29 3A 97 34 39 2C 41 |.B.256).5):.49,A|
000002C0: 3A 97 35 30 2C 42 00 DC 0A C2 01 97 37 36 38 2C |:.50,B......768,|
000002D0: 36 31 3A 52 54 B2 BB 28 AB 54 49 29 00 F2 0A CC |61:RT..(.TI)....|
000002E0: 01 97 35 33 32 37 32 2C C2 28 35 33 32 37 32 29 |..53272,.(53272)|
000002F0: B0 38 00 09 0B D6 01 97 35 33 32 36 35 2C C2 28 |.8......53265,.(|
00000300: 35 33 32 36 35 29 B0 33 32 00 21 0B E0 01 81 4B |53265).32.!....K|
00000310: B2 31 30 32 34 A4 32 30 32 33 3A 97 4B 2C 31 3A |.1024.2023:.K,1:|
00000320: 82 00 4C 0B EA 01 81 49 B2 38 33 35 32 A4 31 36 |..L....I.8352.16|
00000330: 30 33 32 A9 33 32 30 3A 81 4A B2 2E A4 37 3A 97 |032.320:.J...7:.|
00000340: 49 AA 4A 2C 31 32 38 3A 82 4A 2C 49 00 70 0B F4 |I.J,128:.J,I.p..|
00000350: 01 81 49 B2 31 32 30 33 36 A4 31 32 33 35 35 A9 |..I.12036.12355.|
00000360: 38 3A 97 49 2C C2 28 49 29 B0 32 35 35 3A 82 49 |8:.I,.(I).255:.I|
00000370: 00 9A 0B FE 01 81 50 58 B2 2E A4 33 30 30 A9 38 |......PX...300.8|
00000380: 30 AD 33 3A 81 50 59 B2 39 38 A4 31 30 32 3A 8D |0.3:.PY.98.102:.|
00000390: 37 37 30 3A 82 50 59 2C 50 58 00 C4 0B 08 02 81 |770:.PY,PX......|
000003A0: 50 59 B2 32 35 A4 31 37 36 A9 32 35 3A 81 50 58 |PY.25.176.25:.PX|
000003B0: B2 31 35 38 A4 31 36 32 3A 8D 37 37 30 3A 82 50 |.158.162:.770:.P|
000003C0: 58 2C 50 59 00 F0 0B 12 02 50 59 B2 39 37 3A 81 |X,PY.....PY.97:.|
000003D0: 50 58 B2 33 31 36 A4 33 31 39 3A 8D 37 37 30 3A |PX.316.319:.770:|
000003E0: 50 59 B2 50 59 AA 31 3A 82 3A 50 59 B2 31 30 30 |PY.PY.1:.:PY.100|
000003F0: 00 12 0C 1C 02 81 50 58 B2 33 31 39 A4 33 31 36 |......PX.319.316|
00000400: A9 AB 31 3A 8D 37 37 30 3A 50 59 B2 50 59 AA 31 |..1:.770:PY.PY.1|
00000410: 3A 82 00 3E 0C 26 02 50 58 B2 31 35 37 3A 81 50 |:..>.&.PX.157:.P|
00000420: 59 B2 33 A4 2E A9 AB 31 3A 8D 37 37 30 3A 50 58 |Y.3....1:.770:PX|
00000430: B2 50 58 AA 31 3A 82 3A 50 58 B2 31 36 30 00 59 |.PX.1:.:PX.160.Y|
00000440: 0C 30 02 81 50 59 B2 2E A4 33 3A 8D 37 37 30 3A |.0..PY...3:.770:|
00000450: 50 58 B2 50 58 AA 31 3A 82 00 8A 0C 3A 02 52 57 |PX.PX.1:....:.RW|
00000460: B2 2E 3A 8B BB 28 31 29 B3 2E 34 A7 52 57 B2 B5 |..:..(1)..4.RW..|
00000470: 28 BB 28 31 29 AC 32 30 29 AD 31 30 AB B5 28 BB |(.(1).20).10..(.|
00000480: 28 31 29 AC 32 30 29 AD 31 30 00 A6 0C 44 02 4D |(1).20).10...D.M|
00000490: 46 B2 31 3A 8B BB 28 31 29 B3 2E 34 A7 4D 46 B2 |F.1:..(1)..4.MF.|
000004A0: BB 28 31 29 AC 32 00 BB 0C 4E 02 8B C2 28 33 31 |.(1).2...N...(31|
000004B0: 30 30 30 29 B3 35 31 A7 38 31 30 00 CD 0C 58 02 |000).51.810...X.|
000004C0: 81 58 B2 AB 36 A4 36 A9 2E 30 33 37 35 00 F9 0C |.X..6.6..0375...|
000004D0: 62 02 59 B2 4D 46 AC A5 42 28 58 AA 52 57 29 AB |b.Y.MF..B(X.RW).|
000004E0: B6 28 58 AD 32 30 29 AA BE 28 58 29 AD 32 30 AA |.(X.20)..(X).20.|
000004F0: BF 28 58 AC 34 29 AD 32 30 00 0B 0D 6C 02 50 58 |.(X.4).20...l.PX|
00000500: B2 31 36 30 AA 38 30 AD 33 AC 58 00 1B 0D 76 02 |.160.80.3.X...v.|
00000510: 50 59 B2 31 30 30 AB 32 35 AC 59 00 30 0D 80 02 |PY.100.25.Y.0...|
00000520: 8B 50 59 B3 2E B0 50 59 B1 32 30 30 A7 36 38 30 |.PY...PY.200.680|
00000530: 00 66 0D 8A 02 41 44 B2 B5 28 38 31 39 32 AA 33 |.f...AD..(8192.3|
00000540: 32 30 AC B5 28 50 59 AD 38 29 AA 38 AC B5 28 50 |20..(PY.8).8..(P|
00000550: 58 AD 38 29 AA 38 AC 28 50 59 AD 38 AB B5 28 50 |X.8).8.(PY.8..(P|
00000560: 59 AD 38 29 29 29 00 87 0D 94 02 57 45 B2 32 AE |Y.8))).....WE.2.|
00000570: 28 37 AB B5 28 38 AC 28 50 58 AD 38 AB B5 28 50 |(7..(8.(PX.8..(P|
00000580: 58 AD 38 29 29 29 29 00 98 0D 9E 02 97 41 44 2C |X.8))))......AD,|
00000590: C2 28 41 44 29 B0 57 45 00 9E 0D A8 02 82 00 D0 |.(AD).WE........|
000005A0: 0D B2 02 97 37 36 38 2C C2 28 37 36 38 29 B0 31 |....768,.(768).1|
000005B0: 33 39 3A 97 37 36 39 2C C2 28 37 36 39 29 B0 32 |39:.769,.(769).2|
000005C0: 32 37 3A 97 31 39 38 2C 2E 3A 92 31 39 38 2C 31 |27:.198,.:.198,1|
000005D0: 00 F0 0D BC 02 97 35 33 32 36 35 2C C2 28 35 33 |......53265,.(53|
000005E0: 32 36 35 29 B0 32 37 3A 97 35 33 32 37 32 2C 2E |265).27:.53272,.|
000005F0: 00 10 0E C6 02 97 36 34 38 2C 34 3A 9E 36 34 37 |......648,4:.647|
00000600: 38 39 3A 9E 35 38 34 35 31 3A 9E 35 38 37 38 34 |89:.58451:.58784|
00000610: 00 2E 0E D0 02 97 35 33 32 38 30 2C 31 34 3A 97 |......53280,14:.|
00000620: 35 33 32 38 31 2C 36 3A 97 36 34 36 2C 36 00 62 |53281,6:.646,6.b|
00000630: 0E DA 02 99 22 93 4E 45 57 22 3A 99 22 4C 4F 41 |....".NEW":."LOA|
00000640: 44 22 3B C7 28 33 34 29 3B 22 43 41 4C 43 55 57 |D";.(34);"CALCUW|
00000650: 41 44 45 52 22 3B C7 28 33 34 29 3B 22 2C 38 2C |ADER";.(34);",8,|
00000660: 31 22 00 8E 0E E4 02 97 36 33 31 2C 31 39 3A 97 |1"......631,19:.|
00000670: 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 39 3A 97 |632,13:.633,19:.|
00000680: 36 33 34 2C 31 37 3A 97 36 33 35 2C 31 33 00 B9 |634,17:.635,13..|
00000690: 0E EE 02 97 36 33 36 2C 38 32 3A 97 36 33 37 2C |....636,82:.637,|
000006A0: 38 35 3A 97 36 33 38 2C 37 38 3A 97 36 33 39 2C |85:.638,78:.639,|
000006B0: 31 33 3A 97 31 39 38 2C 39 00 BF 0E F8 02 80 00 |13:.198,9.......|
000006C0: F5 0E 02 03 41 44 B2 B5 28 38 31 39 32 AA 33 32 |....AD..(8192.32|
000006D0: 30 AC B5 28 50 59 AD 38 29 AA 38 AC B5 28 50 58 |0..(PY.8).8..(PX|
000006E0: AD 38 29 AA 38 AC 28 50 59 AD 38 AB B5 28 50 59 |.8).8.(PY.8..(PY|
000006F0: AD 38 29 29 29 00 16 0F 0C 03 57 45 B2 32 AE 28 |.8))).....WE.2.(|
00000700: 37 AB B5 28 38 AC 28 50 58 AD 38 AB B5 28 50 58 |7..(8.(PX.8..(PX|
00000710: AD 38 29 29 29 29 00 27 0F 16 03 97 41 44 2C C2 |.8)))).'....AD,.|
00000720: 28 41 44 29 B0 57 45 00 2D 0F 20 03 8E 00 45 0F |(AD).WE.-. ...E.|
00000730: 2A 03 81 59 B2 AB 33 2E 37 35 A4 33 2E 37 35 A9 |*..Y..3.75.3.75.|
00000740: 2E 30 33 37 35 00 71 0F 34 03 58 B2 4D 46 AC A5 |.0375.q.4.X.MF..|
00000750: 41 28 59 AA 52 57 29 AB B6 28 59 AD 32 30 29 AA |A(Y.RW)..(Y.20).|
00000760: BE 28 59 29 AD 32 30 AA BF 28 59 AC 34 29 AD 32 |.(Y).20..(Y.4).2|
00000770: 30 00 83 0F 3E 03 50 58 B2 31 36 30 AA 38 30 AD |0...>.PX.160.80.|
00000780: 33 AC 58 00 93 0F 48 03 50 59 B2 31 30 30 AB 32 |3.X...H.PY.100.2|
00000790: 35 AC 59 00 A8 0F 52 03 8B 50 58 B3 2E B0 50 58 |5.Y...R..PX...PX|
000007A0: B1 33 32 30 A7 38 39 30 00 DE 0F 5C 03 41 44 B2 |.320.890...\.AD.|
000007B0: B5 28 38 31 39 32 AA 33 32 30 AC B5 28 50 59 AD |.(8192.320..(PY.|
000007C0: 38 29 AA 38 AC B5 28 50 58 AD 38 29 AA 38 AC 28 |8).8..(PX.8).8.(|
000007D0: 50 59 AD 38 AB B5 28 50 59 AD 38 29 29 29 00 FF |PY.8..(PY.8)))..|
000007E0: 0F 66 03 57 45 B2 32 AE 28 37 AB B5 28 38 AC 28 |.f.WE.2.(7..(8.(|
000007F0: 50 58 AD 38 AB B5 28 50 58 AD 38 29 29 29 29 00 |PX.8..(PX.8)))).|
00000800: 10 10 70 03 97 41 44 2C C2 28 41 44 29 B0 57 45 |..p..AD,.(AD).WE|
00000810: 00 16 10 7A 03 82 00 1F 10 84 03 89 36 39 30 00 |...z........690.|
00000820: 00 00 |.. |
..).D.RT..(.TI):.31000,.(.(1).256):.646,
0.Q.X..I.1.B(30000):A$.A$.G(B(30000.I)):
..J...."..410 DEFFNA(X)=";.S. ..A$;.....
..(1)..4.."+";.(.(1).20).10..(.(1).20).1
0.E....214,2:.211,.:.58640:."GOTO240"...
H..631,19:.632,13:.633,19:.634,17:.635,1
7:.636,13...R..198,6:......I.......EI.B(
29000).F....I.1.B(30000):A$.A$.G(B(30000
.I)):....^.Z$."610":X$."X":Y$."Y":.B(310
00).51.Z$."820":X$."Y":Y$."X"...H.."..";
Z$;Y$;"=MF*FN";...R..G(64.EI);...|.."(";
X$;"+RW)-ABS(";X$;"/20)+COS(";X$;")/20+S
IN(";X$;"*4)/20"......"GOTO410".$....631
,19:.632,13:.633,13:.198,3:..>.....A(X).
1...0999999998.C.....B(X).(.A(X)..A(X..0
375))..0375.......C(X).(.B(X)..B(X..0375
))..0375.F...A..:B..:A.B(49):B.B(50):.F(
(16191.A.B.256).5):.49,A:.50,B...B..768,
61:RT..(.TI)...L..53272,B(53272).8...V..
53265,B(53265).32.!....K.1024.2023:.K,1:
..L....I.8352.16032.320:.J...7:.I.J,128:
.J,I.P....I.12036.12355.8:.I,B(I).255:.I
......PX...300.80.3:.PY.98.102:.770:.PY,
PX.D....PY.25.176.25:.PX.158.162:.770:.P
X,PY.....PY.97:.PX.316.319:.770:PY.PY.1:
.:PY.100......PX.319.316..1:.770:PY.PY.1
:..>.&.PX.157:.PY.3....1:.770:PX.PX.1:.:
PX.160.Y.0..PY...3:.770:PX.PX.1:....:.RW
..:..(1)..4.RW..(.(1).20).10..(.(1).20).
10...D.MF.1:..(1)..4.MF..(1).2...N..B(31
000).51.810.M.X..X..6.6..0375...B.Y.MF..
B(X.RW)..(X.20)..(X).20..(X.4).20...L.PX
.160.80.3.X...V.PY.100.25.Y.0....PY...PY
.200.680.F...AD..(8192.320..(PY.8).8..(P
X.8).8.(PY.8..(PY.8))).....WE.2.(7..(8.(
PX.8..(PX.8))))......AD,B(AD).WE.......P
....768,B(768).139:.769,B(769).227:.198,
.:.198,1......53265,B(53265).27:.53272,.
...F..648,4:.64789:.58451:.58784...P..53
280,14:.53281,6:.646,6.B.Z..".NEW":."LOA
D";G(34);"CALCUWADER";G(34);",8,1"......
631,19:.632,13:.633,19:.634,17:.635,13..
....636,82:.637,85:.638,78:.639,13:.198,
9...........AD..(8192.320..(PY.8).8..(PX
.8).8.(PY.8..(PY.8))).....WE.2.(7..(8.(P
X.8..(PX.8)))).'....AD,B(AD).WE.-. ...E.
*..Y..3.75.3.75..0375.Q.4.X.MF..A(Y.RW).
.(Y.20)..(Y).20..(Y.4).20...>.PX.160.80.
3.X...H.PY.100.25.Y...R..PX...PX.320.890
...\.AD..(8192.320..(PY.8).8..(PX.8).8.(
PY.8..(PY.8)))...F.WE.2.(7..(8.(PX.8..(P
X.8))))...P..AD,B(AD).WE...Z........690.
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL