_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

WAEHRUNG

FILE INFORMATION

FILENAME(S): WAEHRUNG

FILE TYPE(S): PRG

FILE SIZE: 2.1K

FIRST SEEN: 2025-10-20 14:31:57

APPEARS ON: 1 disk(s)

FILE HASH

2458168d64d8c0b39eaf8ba87550aaa9b640d38cca1bfeec2414d359d5703584

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DRUCKPROGRAMME WAEHRUNG PRG Treasure Chest - Klaus Der Suhler 13 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> 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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL