> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 0A 00 64 1A 20 31 31 2C 30 3A 99 22 |......d. 11,0:."|
00000010: 93 05 22 3A 64 4E 20 31 30 00 2F 08 14 00 64 74 |..":dN 10./...dt|
00000020: 31 2C 22 93 4C 49 53 54 22 AA C7 28 31 33 29 00 |1,".LIST"..(13).|
00000030: 44 08 1E 00 64 74 33 2C 22 93 52 55 4E 22 AA C7 |D...dt3,".RUN"..|
00000040: 28 31 33 29 00 5A 08 28 00 64 74 35 2C 22 93 44 |(13).Z.(.dt5,".D|
00000050: 55 4D 50 22 AA C7 28 31 33 29 00 7E 08 64 00 8F |UMP"..(13).~.d..|
00000060: 2A 50 52 4F 47 2E 33 38 20 42 52 45 4B 49 4E 47 |*PROG.38 BREKING|
00000070: 20 56 41 4E 20 4C 49 43 48 54 20 55 49 54 00 9E | VAN LICHT UIT..|
00000080: 08 69 00 8F 2A 34 30 20 47 52 41 46 2E 50 52 4F |.i..*40 GRAF.PRO|
00000090: 47 2E 56 4F 4F 52 20 43 3D 36 34 20 2A 2A 00 B0 |G.VOOR C=64 **..|
000000A0: 08 6E 00 99 22 93 05 22 3A 64 1A 20 31 31 2C 30 |.n.."..":d. 11,0|
000000B0: 00 CB 08 78 00 85 22 20 42 52 45 4B 49 4E 47 53 |...x.." BREKINGS|
000000C0: 49 4E 44 45 58 20 4E 20 22 3B 4E 00 E4 08 82 00 |INDEX N ";N.....|
000000D0: 56 B2 31 30 30 3A 48 B2 30 2E 35 3A 52 44 B2 FF |V.100:H.0.5:RD..|
000000E0: AD 31 38 30 00 EF 08 8C 00 64 01 20 31 2C 30 00 |.180.....d. 1,0.|
000000F0: 02 09 96 00 64 03 20 30 2C 56 2C 33 32 30 2C 56 |....d. 0,V,320,V|
00000100: 2C 31 00 19 09 A0 00 64 03 20 30 2C 31 39 30 2C |,1.....d. 0,190,|
00000110: 33 32 30 2C 31 39 30 2C 31 00 31 09 AA 00 64 03 |320,190,1.1...d.|
00000120: 20 33 32 30 2C 31 39 30 2C 33 32 30 2C 31 30 2C | 320,190,320,10,|
00000130: 31 00 46 09 B4 00 64 03 20 33 32 30 2C 31 30 2C |1.F...d. 320,10,|
00000140: 30 2C 31 30 2C 31 00 5A 09 BE 00 64 03 20 30 2C |0,10,1.Z...d. 0,|
00000150: 31 30 2C 30 2C 31 39 30 2C 31 00 7F 09 C8 00 8F |10,0,190,1......|
00000160: 20 53 54 52 41 4C 45 4E 20 49 4E 20 53 54 4F 46 | STRALEN IN STOF|
00000170: 20 31 20 45 4E 20 32 20 54 45 4B 45 4E 45 4E 00 | 1 EN 2 TEKENEN.|
00000180: A5 09 D2 00 8F 20 42 3D 42 45 54 41 20 49 4E 20 |..... B=BETA IN |
00000190: 47 52 41 44 2E 3B 42 31 3D 42 45 54 41 20 49 4E |GRAD.;B1=BETA IN|
000001A0: 20 52 41 44 2E 00 C6 09 DC 00 8F 20 41 31 3D 41 | RAD....... A1=A|
000001B0: 4C 46 41 20 49 4E 20 52 41 44 2E 3A 53 41 3D 53 |LFA IN RAD.:SA=S|
000001C0: 49 4E 28 41 31 29 00 E4 09 E6 00 42 B2 42 AA 34 |IN(A1).....B.B.4|
000001D0: 3A 42 31 B2 42 AC 52 44 3A 58 31 B2 30 3A 59 31 |:B1.B.RD:X1.0:Y1|
000001E0: B2 31 39 30 00 FE 09 F0 00 58 32 B2 B5 28 39 30 |.190.....X2..(90|
000001F0: AC C0 28 42 31 29 AA 48 29 3A 59 32 B2 56 00 11 |..(B1).H):Y2.V..|
00000200: 0A FA 00 8B 20 58 32 B1 33 32 30 20 A7 20 34 30 |.... X2.320 . 40|
00000210: 30 00 32 0A 04 01 64 03 20 58 31 2C 59 31 2C 58 |0.2...d. X1,Y1,X|
00000220: 32 2C 59 32 2C 31 3A 58 31 B2 58 32 3A 59 31 B2 |2,Y2,1:X1.X2:Y1.|
00000230: 59 32 00 54 0A 0E 01 8F 20 53 49 4E 28 41 4C 46 |Y2.T.... SIN(ALF|
00000240: 41 29 20 45 4E 20 41 4C 46 41 20 42 45 52 45 4B |A) EN ALFA BEREK|
00000250: 45 4E 45 4E 00 77 0A 18 01 8F 20 43 4F 4E 54 52 |ENEN.w.... CONTR|
00000260: 4F 4C 45 20 4F 50 20 54 4F 54 41 4C 45 20 52 45 |OLE OP TOTALE RE|
00000270: 46 4C 45 43 54 49 45 00 91 0A 22 01 53 B2 4E AC |FLECTIE...".S.N.|
00000280: BF 28 42 31 29 3A 8B 20 53 B1 31 20 A7 20 33 35 |.(B1):. S.1 . 35|
00000290: 30 00 A6 0A 2C 01 41 31 B2 C1 28 53 AD BA 28 31 |0...,.A1..(S..(1|
000002A0: AB 53 AC 53 29 29 00 C4 0A 36 01 58 32 B2 B5 28 |.S.S))...6.X2..(|
000002B0: 58 31 AA 39 30 AC C0 28 41 31 29 AA 48 29 3A 59 |X1.90..(A1).H):Y|
000002C0: 32 B2 31 30 00 E5 0A 40 01 8B 58 32 B3 33 32 30 |2.10...@..X2.320|
000002D0: A7 64 03 58 31 2C 59 31 2C 58 32 2C 59 32 2C 31 |.d.X1,Y1,X2,Y2,1|
000002E0: 3A 89 32 33 30 00 09 0B 4A 01 58 32 B2 33 32 30 |:.230...J.X2.320|
000002F0: 3A 59 32 B2 B5 28 56 AB 28 33 32 30 AB 58 31 29 |:Y2..(V.(320.X1)|
00000300: AD C0 28 41 31 29 AA 48 29 00 24 0B 54 01 64 03 |..(A1).H).$.T.d.|
00000310: 20 58 31 2C 59 31 2C 58 32 2C 59 32 2C 31 3A 89 | X1,Y1,X2,Y2,1:.|
00000320: 20 32 33 30 00 3F 0B 5E 01 8F 20 54 4F 54 41 4C | 230.?.^.. TOTAL|
00000330: 45 20 54 45 52 55 47 4B 41 41 54 53 49 4E 47 00 |E TERUGKAATSING.|
00000340: 52 0B 68 01 58 32 B2 58 31 AA 58 31 3A 59 32 B2 |R.h.X2.X1.X1:Y2.|
00000350: 39 30 00 74 0B 72 01 8B 20 58 32 B3 33 32 30 A7 |90.t.r.. X2.320.|
00000360: 64 03 58 31 2C 59 31 2C 58 32 2C 59 32 2C 31 3A |d.X1,Y1,X2,Y2,1:|
00000370: 89 32 33 30 00 98 0B 7C 01 58 32 B2 33 32 30 3A |.230...|.X2.320:|
00000380: 59 32 B2 B5 28 56 AA 28 33 32 30 AB 58 31 29 AD |Y2..(V.(320.X1).|
00000390: C0 28 42 31 29 AA 48 29 00 B3 0B 86 01 64 03 20 |.(B1).H).....d. |
000003A0: 58 31 2C 59 31 2C 58 32 2C 59 32 2C 31 3A 89 20 |X1,Y1,X2,Y2,1:. |
000003B0: 32 33 30 00 C9 0B 90 01 A1 20 4B 24 3A 8B 20 4B |230...... K$:. K|
000003C0: 24 B2 22 22 20 A7 34 30 30 00 CF 0B 9A 01 80 00 |$."" .400.......|
000003D0: 00 00 |.. |
......D. 11,0:."..":DN 10./...DT1,".LIST
".G(13).D...DT3,".RUN".G(13).Z.(.DT5,".D
UMP".G(13).~.D..*PROG.38 BREKING VAN LIC
HT UIT...I..*40 GRAF.PROG.VOOR C=64 **..
.N.."..":D. 11,0.K.X.." BREKINGSINDEX N
";N.....V.100:H.0.5:RD...180.....D. 1,0.
....D. 0,V,320,V,1... .D. 0,190,320,190,
1.1...D. 320,190,320,10,1.F...D. 320,10,
0,10,1.Z...D. 0,10,0,190,1..H.. STRALEN
IN STOF 1 EN 2 TEKENEN...R.. B=BETA IN
GRAD.;B1=BETA IN RAD..F.... A1=ALFA IN R
AD.:SA=SIN(A1).....B.B.4:B1.B.RD:X1.0:Y1
.190.....X2..(90..(B1).H):Y2.V...... X2.
320 . 400.2...D. X1,Y1,X2,Y2,1:X1.X2:Y1.
Y2.T.... SIN(ALFA) EN ALFA BEREKENEN.W..
.. CONTROLE OP TOTALE REFLECTIE...".S.N.
.(B1):. S.1 . 350...,.A1.A(S..(1.S.S)).D
.6.X2..(X1.90..(A1).H):Y2.10...@..X2.320
.D.X1,Y1,X2,Y2,1:.230...J.X2.320:Y2..(V.
(320.X1)..(A1).H).$.T.D. X1,Y1,X2,Y2,1:.
230.?.^.. TOTALE TERUGKAATSING.R.H.X2.X
1.X1:Y2.90.T.R.. X2.320.D.X1,Y1,X2,Y2,1:
.230...|.X2.320:Y2..(V.(320.X1)..(B1).H)
.....D. X1,Y1,X2,Y2,1:. 230.I.... K$:. K
$."" .400.O.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL