> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 0A 00 8F 20 20 2A 2A 2A 20 20 57 41 |..#.... *** WA|
00000010: 45 48 52 55 4E 47 53 52 45 43 48 4E 45 4E 20 20 |EHRUNGSRECHNEN |
00000020: 2A 2A 2A 00 29 08 14 00 3A 00 4C 08 1E 00 8F 20 |***.)...:.L.... |
00000030: 20 28 57 29 20 39 2F 31 39 39 32 20 54 48 4F 4D | (W) 9/1992 THOM|
00000040: 41 53 20 4B 4E 45 49 53 53 4C 45 52 00 52 08 28 |AS KNEISSLER.R.(|
00000050: 00 3A 00 58 08 32 00 3A 00 84 08 3C 00 97 20 35 |.:.X.2.:...<.. 5|
00000060: 33 32 38 30 2C 31 35 3A 97 20 35 33 32 38 31 2C |3280,15:. 53281,|
00000070: 31 35 3A 97 20 36 34 36 2C 30 3A 97 20 36 35 30 |15:. 646,0:. 650|
00000080: 2C 31 32 38 00 A1 08 46 00 81 49 B2 34 39 31 35 |,128...F..I.4915|
00000090: 32 A4 34 39 31 37 37 3A 87 58 3A 97 49 2C 58 3A |2.49177:.X:.I,X:|
000000A0: 82 00 D1 08 50 00 83 33 32 2C 32 35 33 2C 31 37 |....P..32,253,17|
000000B0: 34 2C 33 32 2C 31 35 38 2C 31 38 33 2C 31 33 38 |4,32,158,183,138|
000000C0: 2C 37 32 2C 33 32 2C 32 35 33 2C 31 37 34 2C 33 |,72,32,253,174,3|
000000D0: 32 00 0A 09 5A 00 83 31 35 38 2C 31 38 33 2C 31 |2...Z..158,183,1|
000000E0: 30 34 2C 31 36 38 2C 32 34 2C 33 32 2C 32 34 30 |04,168,24,32,240|
000000F0: 2C 32 35 35 2C 33 32 2C 32 35 33 2C 31 37 34 2C |,255,32,253,174,|
00000100: 37 36 2C 31 36 34 2C 31 37 30 00 10 09 64 00 3A |76,164,170...d.:|
00000110: 00 26 09 6E 00 50 52 B2 34 39 31 35 32 3A 50 31 |.&.n.PR.49152:P1|
00000120: B2 34 3A 51 B2 34 00 60 09 78 00 99 20 C7 28 31 |.4:Q.4.`.x.. .(1|
00000130: 34 37 29 3B C7 28 31 34 32 29 3B 22 20 20 12 20 |47);.(142);" . |
00000140: 20 52 45 43 48 4E 45 4E 20 4D 49 54 20 41 55 53 | RECHNEN MIT AUS|
00000150: 4C 2E 20 47 45 4C 44 53 4F 52 54 45 4E 20 20 22 |L. GELDSORTEN "|
00000160: 00 93 09 82 00 9E 20 50 52 2C 35 2C 34 2C 22 44 |...... PR,5,4,"D|
00000170: 4F 4C 4C 41 52 20 20 20 20 20 20 20 20 20 20 20 |OLLAR |
00000180: 20 20 20 20 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...........|
00000190: C0 C9 22 00 C6 09 8C 00 9E 20 50 52 2C 35 2C 35 |.."...... PR,5,5|
000001A0: 2C 22 50 46 55 4E 44 20 53 54 45 52 4C 49 4E 47 |,"PFUND STERLING|
000001B0: 20 20 20 20 20 20 20 20 DD 44 4D 20 49 4E 20 41 | .DM IN A|
000001C0: 55 53 4C 2E DD 22 00 F9 09 96 00 9E 20 50 52 2C |USL.."...... PR,|
000001D0: 35 2C 36 2C 22 48 4F 4C 4C 2E 20 47 55 4C 44 45 |5,6,"HOLL. GULDE|
000001E0: 4E 20 20 20 20 20 20 20 20 20 20 CA C0 C0 C0 C0 |N .....|
000001F0: C0 C0 C0 C0 C0 C0 C0 CB 22 00 14 0A A0 00 9E 20 |........"...... |
00000200: 50 52 2C 35 2C 37 2C 22 46 52 2E 20 53 43 48 57 |PR,5,7,"FR. SCHW|
00000210: 45 49 5A 22 00 2F 0A AA 00 9E 20 50 52 2C 35 2C |EIZ"./.... PR,5,|
00000220: 38 2C 22 46 52 2E 20 42 45 4C 47 49 45 4E 22 00 |8,"FR. BELGIEN".|
00000230: 4D 0A B4 00 9E 20 50 52 2C 35 2C 39 2C 22 46 52 |M.... PR,5,9,"FR|
00000240: 2E 20 46 52 41 4E 4B 52 45 49 43 48 22 00 6A 0A |. FRANKREICH".j.|
00000250: BE 00 9E 20 50 52 2C 35 2C 31 30 2C 22 44 41 45 |... PR,5,10,"DAE|
00000260: 4E 2E 20 4B 52 4F 4E 45 4E 22 00 87 0A C8 00 9E |N. KRONEN"......|
00000270: 20 50 52 2C 35 2C 31 31 2C 22 4E 4F 52 57 2E 20 | PR,5,11,"NORW. |
00000280: 4B 52 4F 4E 45 4E 22 00 A6 0A D2 00 9E 20 50 52 |KRONEN"...... PR|
00000290: 2C 35 2C 31 32 2C 22 53 43 48 57 45 44 2E 20 4B |,5,12,"SCHWED. K|
000002A0: 52 4F 4E 45 4E 22 00 C9 0A DC 00 9E 20 50 52 2C |RONEN"...... PR,|
000002B0: 35 2C 31 33 2C 22 4F 45 53 54 45 52 52 2E 20 53 |5,13,"OESTERR. S|
000002C0: 43 48 49 4C 4C 49 4E 47 22 00 E4 0A E6 00 9E 20 |CHILLING"...... |
000002D0: 50 52 2C 35 2C 31 34 2C 22 49 54 41 4C 2E 20 4C |PR,5,14,"ITAL. L|
000002E0: 49 52 45 22 00 FF 0A F0 00 9E 20 50 52 2C 35 2C |IRE"...... PR,5,|
000002F0: 31 35 2C 22 4A 55 47 2E 20 44 49 4E 41 52 22 00 |15,"JUG. DINAR".|
00000300: 1D 0B FA 00 9E 20 50 52 2C 35 2C 31 36 2C 22 53 |..... PR,5,16,"S|
00000310: 50 41 4E 2E 20 50 45 53 45 54 45 4E 22 00 3A 0B |PAN. PESETEN".:.|
00000320: 04 01 9E 20 50 52 2C 35 2C 31 37 2C 22 50 4F 52 |... PR,5,17,"POR|
00000330: 54 2E 20 45 53 43 55 44 4F 22 00 5E 0B 0E 01 9E |T. ESCUDO".^....|
00000340: 20 50 52 2C 31 32 2C 31 39 2C 22 D5 C0 C0 C0 C0 | PR,12,19,".....|
00000350: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 22 00 82 |............."..|
00000360: 0B 18 01 9E 20 50 52 2C 31 32 2C 32 30 2C 22 DD |.... PR,12,20,".|
00000370: 43 55 52 53 4F 52 20 55 50 3D 20 46 31 20 20 20 |CURSOR UP= F1 |
00000380: DD 22 00 A6 0B 22 01 9E 20 50 52 2C 31 32 2C 32 |."...".. PR,12,2|
00000390: 31 2C 22 DD 43 55 52 53 4F 52 20 44 4F 57 4E 3D |1,".CURSOR DOWN=|
000003A0: 20 46 33 20 DD 22 00 CA 0B 2C 01 9E 20 50 52 2C | F3 ."...,.. PR,|
000003B0: 31 32 2C 32 32 2C 22 DD 52 45 43 48 4E 2E 41 52 |12,22,".RECHN.AR|
000003C0: 54 3D 20 46 35 2C 46 37 DD 22 00 EE 0B 36 01 9E |T= F5,F7."...6..|
000003D0: 20 50 52 2C 31 32 2C 32 33 2C 22 DD 52 45 54 55 | PR,12,23,".RETU|
000003E0: 52 4E 3D 20 52 45 43 48 4E 45 4E 20 DD 22 00 13 |RN= RECHNEN ."..|
000003F0: 0C 40 01 9E 20 50 52 2C 31 32 2C 32 34 2C 22 CA |.@.. PR,12,24,".|
00000400: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000410: CB 22 3B 00 25 0C 4A 01 9E 20 50 52 2C 34 2C 50 |.";.%.J.. PR,4,P|
00000420: 31 2C 22 20 22 00 37 0C 54 01 9E 20 50 52 2C 34 |1," ".7.T.. PR,4|
00000430: 2C 51 2C 22 12 3E 22 00 40 0C 5E 01 A1 20 41 24 |,Q,".>".@.^.. A$|
00000440: 00 6A 0C 68 01 8B 20 41 24 B2 C7 28 31 33 34 29 |.j.h.. A$..(134)|
00000450: 20 AF 20 51 B3 31 37 20 A7 20 50 31 B2 51 3A 51 | . Q.17 . P1.Q:Q|
00000460: B2 51 AA 31 3A 89 20 33 33 30 00 92 0C 72 01 8B |.Q.1:. 330...r..|
00000470: 20 41 24 B2 C7 28 31 33 34 29 20 AF 20 51 B2 31 | A$..(134) . Q.1|
00000480: 37 20 A7 20 50 31 B2 51 3A 51 B2 34 3A 89 20 33 |7 . P1.Q:Q.4:. 3|
00000490: 33 30 00 BB 0C 7C 01 8B 20 41 24 B2 C7 28 31 33 |30...|.. A$..(13|
000004A0: 33 29 20 AF 20 51 B1 34 20 A7 20 50 31 B2 51 3A |3) . Q.4 . P1.Q:|
000004B0: 51 B2 51 AB 31 3A 89 20 33 33 30 00 E3 0C 86 01 |Q.Q.1:. 330.....|
000004C0: 8B 20 41 24 B2 C7 28 31 33 33 29 20 AF 20 51 B2 |. A$..(133) . Q.|
000004D0: 34 20 A7 20 50 31 B2 51 3A 51 B2 31 37 3A 89 20 |4 . P1.Q:Q.17:. |
000004E0: 33 33 30 00 F8 0C 90 01 8B 20 41 24 B2 C7 28 31 |330...... A$..(1|
000004F0: 33 29 20 A7 20 34 34 30 00 22 0D 9A 01 8B 20 41 |3) . 440.".... A|
00000500: 24 B2 C7 28 31 33 35 29 20 A7 20 9E 20 50 52 2C |$..(135) . . PR,|
00000510: 32 38 2C 35 2C 22 44 4D 20 49 4E 20 41 55 53 4C |28,5,"DM IN AUSL|
00000520: 2E 22 00 4E 0D A4 01 8B 20 41 24 B2 C7 28 31 33 |.".N.... A$..(13|
00000530: 36 29 20 A7 20 9E 20 50 52 2C 32 38 2C 35 2C 22 |6) . . PR,28,5,"|
00000540: 05 41 55 53 4C 2E 20 49 4E 20 44 4D 90 22 00 58 |.AUSL. IN DM.".X|
00000550: 0D AE 01 89 20 33 33 30 00 62 0D B8 01 45 B2 31 |.... 330.b...E.1|
00000560: 30 30 00 7E 0D C2 01 8B 20 51 B2 34 20 A7 20 45 |00.~.... Q.4 . E|
00000570: B2 31 3A 47 24 B2 22 44 4F 4C 4C 41 52 22 00 A2 |.1:G$."DOLLAR"..|
00000580: 0D CC 01 8B 20 51 B2 35 20 A7 20 45 B2 31 3A 47 |.... Q.5 . E.1:G|
00000590: 24 B2 22 50 46 55 4E 44 20 53 54 45 52 4C 49 4E |$."PFUND STERLIN|
000005A0: 47 22 00 C0 0D D6 01 8B 20 51 B2 36 20 A7 20 47 |G"...... Q.6 . G|
000005B0: 24 B2 22 48 4F 4C 4C 2E 20 47 55 4C 44 45 4E 22 |$."HOLL. GULDEN"|
000005C0: 00 E0 0D E0 01 8B 20 51 B2 37 20 A7 20 47 24 B2 |...... Q.7 . G$.|
000005D0: 22 53 43 48 57 45 49 5A 2E 20 46 52 41 4E 43 22 |"SCHWEIZ. FRANC"|
000005E0: 00 FD 0D EA 01 8B 20 51 B2 38 20 A7 20 47 24 B2 |...... Q.8 . G$.|
000005F0: 22 42 45 4C 47 2E 20 46 52 41 4E 43 22 00 1B 0E |"BELG. FRANC"...|
00000600: F4 01 8B 20 51 B2 39 20 A7 20 47 24 B2 22 46 52 |... Q.9 . G$."FR|
00000610: 41 4E 5A 2E 20 46 52 41 4E 43 22 00 3A 0E FE 01 |ANZ. FRANC".:...|
00000620: 8B 20 51 B2 31 30 20 A7 20 47 24 B2 22 44 41 45 |. Q.10 . G$."DAE|
00000630: 4E 2E 20 4B 52 4F 4E 45 4E 22 00 59 0E 08 02 8B |N. KRONEN".Y....|
00000640: 20 51 B2 31 31 20 A7 20 47 24 B2 22 4E 4F 52 57 | Q.11 . G$."NORW|
00000650: 2E 20 4B 52 4F 4E 45 4E 22 00 7A 0E 12 02 8B 20 |. KRONEN".z.... |
00000660: 51 B2 31 32 20 A7 20 47 24 B2 22 53 43 48 57 45 |Q.12 . G$."SCHWE|
00000670: 44 2E 20 4B 52 4F 4E 45 4E 22 00 9F 0E 1C 02 8B |D. KRONEN"......|
00000680: 20 51 B2 31 33 20 A7 20 47 24 B2 22 4F 45 53 54 | Q.13 . G$."OEST|
00000690: 45 52 52 2E 20 53 43 48 49 4C 4C 49 4E 47 22 00 |ERR. SCHILLING".|
000006A0: C3 0E 26 02 8B 20 51 B2 31 34 20 A7 20 45 B2 31 |..&.. Q.14 . E.1|
000006B0: 30 30 30 3A 47 24 B2 22 49 54 41 4C 2E 20 4C 49 |000:G$."ITAL. LI|
000006C0: 52 45 22 00 E3 0E 30 02 8B 20 51 B2 31 35 20 A7 |RE"...0.. Q.15 .|
000006D0: 20 47 24 B2 22 4A 55 47 4F 53 4C 2E 20 44 49 4E | G$."JUGOSL. DIN|
000006E0: 41 52 22 00 03 0F 3A 02 8B 20 51 B2 31 36 20 A7 |AR"...:.. Q.16 .|
000006F0: 20 47 24 B2 22 53 50 41 4E 2E 20 50 45 53 45 54 | G$."SPAN. PESET|
00000700: 45 4E 22 00 22 0F 44 02 8B 20 51 B2 31 37 20 A7 |EN".".D.. Q.17 .|
00000710: 20 47 24 B2 22 50 4F 52 54 2E 20 45 53 43 55 44 | G$."PORT. ESCUD|
00000720: 4F 22 00 38 0F 4E 02 8B 20 C2 28 31 32 35 32 29 |O".8.N.. .(1252)|
00000730: B2 31 20 A7 20 36 37 30 00 3E 0F 58 02 3A 00 4C |.1 . 670.>.X.:.L|
00000740: 0F 62 02 99 20 C7 28 31 34 37 29 3B 00 84 0F 6C |.b.. .(147);...l|
00000750: 02 57 32 B2 30 3A 99 22 57 49 45 56 49 45 4C 20 |.W2.0:."WIEVIEL |
00000760: 44 4D 20 28 52 45 54 55 52 4E 3D 4D 45 4E 55 45 |DM (RETURN=MENUE|
00000770: 29 22 3A 85 20 57 32 3A 8B 20 57 32 B2 30 20 A7 |)":. W2:. W2.0 .|
00000780: 20 31 32 30 00 92 0F 76 02 85 22 4B 55 52 53 22 | 120...v.."KURS"|
00000790: 3B 4B 00 B5 0F 80 02 57 31 B2 57 32 AC 45 AD 4B |;K.....W1.W2.E.K|
000007A0: 3A 57 33 B2 B5 28 57 31 AC 31 30 30 AA 30 2E 35 |:W3..(W1.100.0.5|
000007B0: 29 AD 31 30 30 00 D5 0F 8A 02 99 22 44 41 53 20 |).100......"DAS |
000007C0: 53 49 4E 44 22 57 33 3B 47 24 22 2E 22 3A 99 3A |SIND"W3;G$".":.:|
000007D0: 89 20 36 32 30 00 DB 0F 94 02 3A 00 E9 0F 9E 02 |. 620.....:.....|
000007E0: 99 20 C7 28 31 34 37 29 3B 00 22 10 A8 02 57 31 |. .(147);."...W1|
000007F0: B2 30 3A 99 22 57 49 45 56 49 45 4C 20 22 47 24 |.0:."WIEVIEL "G$|
00000800: 3A 85 22 28 52 45 54 55 52 4E 3D 4D 45 4E 55 45 |:."(RETURN=MENUE|
00000810: 29 22 3B 57 31 3A 8B 20 57 31 B2 30 20 A7 20 31 |)";W1:. W1.0 . 1|
00000820: 32 30 00 30 10 B2 02 85 22 4B 55 52 53 22 3B 4B |20.0...."KURS";K|
00000830: 00 53 10 BC 02 57 32 B2 57 31 AC 4B AD 45 3A 57 |.S...W2.W1.K.E:W|
00000840: 33 B2 B5 28 57 32 AC 31 30 30 AA 30 2E 35 29 AD |3..(W2.100.0.5).|
00000850: 31 30 30 00 72 10 C6 02 99 22 44 41 53 20 53 49 |100.r...."DAS SI|
00000860: 4E 44 22 57 33 22 44 4D 2E 22 3A 99 3A 89 20 36 |ND"W3"DM.":.:. 6|
00000870: 38 30 00 00 00 |80... |
..#.... *** WAEHRUNGSRECHNEN ***.)...
:.L.... (W) 9/1992 THOMAS KNEISSLER.R.(
.:.X.2.:...<.. 53280,15:. 53281,15:. 646
,0:. 650,128...F..I.49152.49177:.X:.I,X:
..Q.P..32,253,174,32,158,183,138,72,32,2
53,174,32...Z..158,183,104,168,24,32,240
,255,32,253,174,76,164,170...D.:.&.N.PR.
49152:P1.4:Q.4.`.X.. G(147);G(142);" .
RECHNEN MIT AUSL. GELDSORTEN "...... P
R,5,4,"DOLLAR U..........
.I".F.... PR,5,5,"PFUND STERLING
.DM IN AUSL.."...... PR,5,6,"HOLL. GULDE
N J...........K"... .. PR,5,7,"
FR. SCHWEIZ"./.... PR,5,8,"FR. BELGIEN".
M.... PR,5,9,"FR. FRANKREICH".J.... PR,5
,10,"DAEN. KRONEN"...H.. PR,5,11,"NORW.
KRONEN"...R.. PR,5,12,"SCHWED. KRONEN".I
.... PR,5,13,"OESTERR. SCHILLING"......
PR,5,14,"ITAL. LIRE"...... PR,5,15,"JUG.
DINAR"...... PR,5,16,"SPAN. PESETEN".:.
... PR,5,17,"PORT. ESCUDO".^.... PR,12,1
9,"U................I"...... PR,12,20,".
CURSOR UP= F1 ."...".. PR,12,21,".CURS
OR DOWN= F3 .".J.,.. PR,12,22,".RECHN.AR
T= F5,F7."...6.. PR,12,23,".RETURN= RECH
NEN ."...@.. PR,12,24,"J................
K";.%.J.. PR,4,P1," ".7.T.. PR,4,Q,".>".
@.^.. A$.J.H.. A$.G(134) . Q.17 . P1.Q:Q
.Q.1:. 330...R.. A$.G(134) . Q.17 . P1.Q
:Q.4:. 330...|.. A$.G(133) . Q.4 . P1.Q:
Q.Q.1:. 330...... A$.G(133) . Q.4 . P1.Q
:Q.17:. 330...... A$.G(13) . 440.".... A
$.G(135) . . PR,28,5,"DM IN AUSL.".N....
A$.G(136) . . PR,28,5,".AUSL. IN DM.".X
.... 330.B...E.100.~.B.. Q.4 . E.1:G$."D
OLLAR"...L.. Q.5 . E.1:G$."PFUND STERLIN
G"...V.. Q.6 . G$."HOLL. GULDEN"...... Q
.7 . G$."SCHWEIZ. FRANC"...... Q.8 . G$.
"BELG. FRANC"...... Q.9 . G$."FRANZ. FRA
NC".:.... Q.10 . G$."DAEN. KRONEN".Y....
Q.11 . G$."NORW. KRONEN".Z.... Q.12 . G
$."SCHWED. KRONEN"...... Q.13 . G$."OEST
ERR. SCHILLING".C.&.. Q.14 . E.1000:G$."
ITAL. LIRE"...0.. Q.15 . G$."JUGOSL. DIN
AR"...:.. Q.16 . G$."SPAN. PESETEN".".D.
. Q.17 . G$."PORT. ESCUDO".8.N.. B(1252)
.1 . 670.>.X.:.L.B.. G(147);...L.W2.0:."
WIEVIEL DM (RETURN=MENUE)":. W2:. W2.0 .
120...V.."KURS";K.....W1.W2.E.K:W3..(W1
.100.0.5).100.U...."DAS SIND"W3;G$".":.:
. 620.....:...... G(147);."...W1.0:."WIE
VIEL "G$:."(RETURN=MENUE)";W1:. W1.0 . 1
20.0...."KURS";K.S...W2.W1.K.E:W3..(W2.1
00.0.5).100.R.F.."DAS SIND"W3"DM.":.:. 6
80...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL