MONEY EXCHANGE.C
FILE INFORMATION
FILENAME(S): MONEY EXCHANGE.C
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-11-30 01:08:41
APPEARS ON: 2 disk(s)
FILE HASH
40ee5c34af95c52b494a01f6dc9c72827110468331e18591845a0c075a6ba530
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A NWENDER | MONEY EXCHANGE.C | PRG | Treasure Chest - Wolfgang Rauprich | 14 | 8 | DOWNLOAD FILE |
| FREESOFT DISK NR | MONEY EXCHANGE.C | PRG | Treasure Chest - Wolfgang Rauprich | 14 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 0A 00 86 43 24 28 31 32 29 2C 55 24 |.......C$(12),U$| 00000010: 28 31 32 29 00 3A 08 0C 00 99 22 90 93 22 3A 97 |(12).:...."..":.| 00000020: 35 33 32 38 30 2C 31 3A 97 35 33 32 38 31 2C 31 |53280,1:.53281,1| 00000030: 3A 97 35 33 32 37 32 2C 32 31 00 60 08 0D 00 99 |:.53272,21.`....| 00000040: 22 45 58 43 48 41 4E 47 45 20 52 41 54 45 53 20 |"EXCHANGE RATES | 00000050: 44 41 54 45 20 4D 41 59 20 36 2C 31 39 37 38 22 |DATE MAY 6,1978"| 00000060: 00 89 08 0F 00 99 22 4E 55 4D 42 45 52 22 2C 22 |......"NUMBER","| 00000070: 43 4F 55 4E 54 52 59 22 2C 22 55 4E 49 54 22 2C |COUNTRY","UNIT",| 00000080: 22 24 20 56 41 4C 55 45 22 00 8F 08 10 00 8C 00 |"$ VALUE".......| 00000090: 95 08 11 00 99 00 9D 08 14 00 43 B2 31 00 AA 08 |..........C.1...| 000000A0: 1E 00 87 43 24 2C 55 24 2C 44 00 B9 08 28 00 8B |...C$,U$,D...(..| 000000B0: 44 B2 AB 39 39 A7 31 30 30 00 C8 08 32 00 99 43 |D..99.100...2..C| 000000C0: 2C 43 24 2C 55 24 2C 44 00 D2 08 3C 00 43 B2 43 |,C$,U$,D...<.C.C| 000000D0: AA 31 00 DA 08 46 00 89 33 30 00 E0 08 64 00 99 |.1...F..30...d..| 000000E0: 00 E6 08 6E 00 99 00 14 09 78 00 99 22 57 48 49 |...n.....x.."WHI| 000000F0: 43 48 20 4E 55 4D 42 45 52 20 55 4E 49 54 53 20 |CH NUMBER UNITS | 00000100: 57 49 4C 4C 20 59 4F 55 20 53 54 41 52 54 20 57 |WILL YOU START W| 00000110: 49 54 48 22 00 1C 09 82 00 85 43 31 00 22 09 8C |ITH"......C1."..| 00000120: 00 8C 00 2E 09 96 00 81 49 B2 31 A4 43 31 00 3C |........I.1.C1.<| 00000130: 09 A0 00 87 20 43 24 2C 55 24 2C 44 00 43 09 A5 |.... C$,U$,D.C..| 00000140: 00 82 49 00 4C 09 AA 00 44 31 B2 44 00 5C 09 B4 |..I.L...D1.D.\..| 00000150: 00 99 43 31 2C 43 24 2C 55 24 2C 44 00 93 09 BE |..C1,C$,U$,D....| 00000160: 00 99 22 57 48 49 43 48 20 4E 55 4D 42 45 52 20 |.."WHICH NUMBER | 00000170: 55 4E 49 54 53 20 44 4F 20 59 4F 55 20 57 41 4E |UNITS DO YOU WAN| 00000180: 54 20 54 48 45 4D 43 4F 4E 56 45 52 54 45 44 20 |T THEMCONVERTED | 00000190: 54 4F 22 00 9B 09 C8 00 85 43 32 00 A1 09 FF 00 |TO"......C2.....| 000001A0: 8C 00 AD 09 04 01 81 49 B2 31 A4 43 32 00 BA 09 |.......I.1.C2...| 000001B0: 0E 01 87 43 24 2C 55 24 2C 44 00 C1 09 18 01 82 |...C$,U$,D......| 000001C0: 49 00 CA 09 1D 01 44 32 B2 44 00 DA 09 22 01 99 |I.....D2.D..."..| 000001D0: 43 32 2C 43 24 2C 55 24 2C 44 00 05 0A 27 01 99 |C2,C$,U$,D...'..| 000001E0: 22 57 48 41 54 20 51 55 41 4E 54 49 54 59 20 44 |"WHAT QUANTITY D| 000001F0: 4F 20 59 4F 55 20 57 41 4E 54 20 43 4F 4E 56 45 |O YOU WANT CONVE| 00000200: 52 54 45 44 22 00 0D 0A 28 01 85 51 31 00 1A 0A |RTED"...(..Q1...| 00000210: 2C 01 51 32 B2 51 31 AC 44 31 00 33 0A 36 01 99 |,.Q2.Q1.D1.3.6..| 00000220: 22 44 4F 4C 4C 41 52 20 56 41 4C 55 45 20 24 22 |"DOLLAR VALUE $"| 00000230: 3B 51 32 00 40 0A 40 01 51 33 B2 51 32 AD 44 32 |;Q2.@.@.Q3.Q2.D2| 00000240: 00 69 0A 4A 01 99 22 43 4F 4E 56 45 52 54 45 44 |.i.J.."CONVERTED| 00000250: 20 56 41 4C 55 45 20 22 3B 43 24 3B 22 20 22 3B | VALUE ";C$;" ";| 00000260: 55 24 3B 22 20 22 3B 51 33 00 7F 0A F3 01 83 22 |U$;" ";Q3......"| 00000270: 55 53 41 22 2C 22 44 4F 4C 4C 41 52 22 2C 31 00 |USA","DOLLAR",1.| 00000280: B9 0A F4 01 83 22 41 55 53 54 52 41 4C 49 41 22 |....."AUSTRALIA"| 00000290: 2C 22 44 4F 4C 4C 41 52 20 22 2C 31 2E 31 33 31 |,"DOLLAR ",1.131| 000002A0: 2C 22 41 52 47 45 4E 54 49 4E 41 22 2C 22 50 45 |,"ARGENTINA","PE| 000002B0: 53 4F 22 2C 2E 30 30 31 35 00 DA 0A F5 01 83 22 |SO",.0015......"| 000002C0: 41 55 53 54 52 49 41 22 2C 22 53 43 48 49 4C 4C |AUSTRIA","SCHILL| 000002D0: 49 4E 47 22 2C 2E 30 36 36 38 00 F8 0A F6 01 83 |ING",.0668......| 000002E0: 22 42 52 49 54 49 41 4E 22 2C 22 50 4F 55 4E 44 |"BRITIAN","POUND| 000002F0: 22 2C 31 2E 38 32 37 38 00 15 0B F7 01 83 22 43 |",1.8278......"C| 00000300: 41 4E 41 44 41 22 2C 22 44 4F 4C 4C 41 52 22 2C |ANADA","DOLLAR",| 00000310: 2E 38 38 36 34 00 31 0B F8 01 83 22 46 52 41 4E |.8864.1...."FRAN| 00000320: 43 45 22 2C 22 46 52 41 4E 43 22 2C 2E 32 31 36 |CE","FRANC",.216| 00000330: 36 00 4F 0B F9 01 83 22 47 52 45 45 43 45 22 2C |6.O...."GREECE",| 00000340: 22 44 52 41 43 48 4D 41 22 2C 2E 30 32 38 39 00 |"DRACHMA",.0289.| 00000350: 6E 0B FA 01 83 22 48 4F 4C 4C 41 4E 44 22 2C 22 |n...."HOLLAND","| 00000360: 47 55 49 4C 44 45 52 22 2C 2E 34 35 30 36 00 8E |GUILDER",.4506..| 00000370: 0B FB 01 83 22 48 4F 4E 47 20 4B 4F 4E 47 22 2C |...."HONG KONG",| 00000380: 22 44 4F 4C 4C 41 52 22 2C 2E 32 31 35 37 00 A9 |"DOLLAR",.2157..| 00000390: 0B FC 01 83 22 49 4E 44 49 41 22 2C 22 52 55 50 |...."INDIA","RUP| 000003A0: 45 45 22 2C 2E 31 31 39 31 00 C5 0B FD 01 83 22 |EE",.1191......"| 000003B0: 49 53 52 45 41 4C 22 2C 22 50 4F 55 4E 44 22 2C |ISREAL","POUND",| 000003C0: 2E 30 35 39 38 00 E1 0B FE 01 83 22 49 54 41 4C |.0598......"ITAL| 000003D0: 59 22 2C 22 4C 49 52 41 22 2C 2E 30 30 31 31 35 |Y","LIRA",.00115| 000003E0: 32 00 FC 0B FF 01 83 22 4A 41 50 41 4E 22 2C 22 |2......"JAPAN","| 000003F0: 59 45 4E 22 2C 2E 30 30 34 34 32 31 00 19 0C 00 |YEN",.004421....| 00000400: 02 83 22 4D 45 58 49 43 4F 22 2C 22 50 45 53 43 |.."MEXICO","PESC| 00000410: 4F 20 22 2C 2E 30 34 33 39 00 36 0C 01 02 83 22 |O ",.0439.6...."| 00000420: 53 2E 20 41 46 52 49 43 41 22 2C 22 52 41 4E 44 |S. AFRICA","RAND| 00000430: 22 2C 31 2E 31 35 00 55 0C 02 02 83 22 53 57 49 |",1.15.U...."SWI| 00000440: 54 5A 4C 41 4E 44 22 2C 22 46 52 41 4E 43 22 2C |TZLAND","FRANC",| 00000450: 2E 35 31 32 38 00 73 0C 03 02 83 22 57 20 47 45 |.5128.s...."W GE| 00000460: 52 4D 41 4E 59 22 2C 22 4D 41 52 4B 22 2C 2E 34 |RMANY","MARK",.4| 00000470: 38 31 36 00 92 0C 04 02 83 22 42 45 4C 47 49 55 |816......"BELGIU| 00000480: 4D 22 2C 22 46 52 41 4E 43 22 2C 2E 30 33 31 33 |M","FRANC",.0313| 00000490: 38 35 00 A7 0C 05 02 83 22 46 46 46 22 2C 22 46 |85......"FFF","F| 000004A0: 46 46 22 2C 2D 39 39 00 C4 0C 06 02 83 22 54 41 |FF",-99......"TA| 000004B0: 49 57 41 4E 22 2C 22 44 4F 4C 4C 41 52 22 2C 2E |IWAN","DOLLAR",.| 000004C0: 30 32 36 35 00 E0 0C 07 02 83 22 43 4F 4C 4F 4D |0265......"COLOM| 000004D0: 42 49 41 22 2C 22 50 45 53 4F 22 2C 2E 30 32 39 |BIA","PESO",.029| 000004E0: 00 FD 0C 08 02 83 22 44 45 4E 4D 41 52 4B 22 2C |......"DENMARK",| 000004F0: 22 4B 52 4F 4E 45 22 2C 2E 31 37 37 34 00 1B 0D |"KRONE",.1774...| 00000500: 09 02 83 22 46 49 4E 4C 41 4E 44 22 2C 22 4D 41 |..."FINLAND","MA| 00000510: 52 4B 4B 41 22 2C 2E 32 33 38 37 00 3C 0D 0A 02 |RKKA",.2387.<...| 00000520: 83 22 49 4E 44 4F 4E 45 53 49 41 22 2C 22 52 55 |."INDONESIA","RU| 00000530: 50 49 41 48 22 2C 2E 30 30 32 35 39 00 55 0D 0B |PIAH",.00259.U..| 00000540: 02 83 22 49 52 41 4E 22 2C 22 52 49 41 4C 22 2C |.."IRAN","RIAL",| 00000550: 2E 30 31 34 32 00 74 0D 0C 02 83 22 4D 41 4C 41 |.0142.t...."MALA| 00000560: 59 53 49 41 22 2C 22 44 4F 4C 4C 41 52 22 2C 2E |YSIA","DOLLAR",.| 00000570: 34 32 35 35 00 94 0D 0D 02 83 22 53 49 4E 47 41 |4255......"SINGA| 00000580: 50 4F 52 45 22 2C 22 44 4F 4C 4C 41 52 22 2C 2E |PORE","DOLLAR",.| 00000590: 34 33 31 37 00 A9 0D 57 02 83 22 46 46 46 22 2C |4317...W.."FFF",| 000005A0: 22 46 46 46 22 2C 2D 39 39 00 D1 0D 58 02 99 22 |"FFF",-99...X.."| 000005B0: 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 43 |DO YOU WANT TO C| 000005C0: 4F 4E 56 45 52 54 20 53 4F 4D 45 20 4D 4F 52 45 |ONVERT SOME MORE| 000005D0: 22 00 D9 0D 62 02 85 43 24 00 EB 0D 6C 02 8B 43 |"...b..C$...l..C| 000005E0: 24 B2 22 59 45 53 22 20 A7 31 32 00 F1 0D E7 03 |$."YES" .12.....| 000005F0: 90 00 F7 0D 0F 27 80 00 00 00 24 |.....'....$ |
.......C$(12),U$(12).:...."..":.53280,1: .53281,1:.53272,21.`...."EXCHANGE RATES DATE MAY 6,1978"......"NUMBER","COUNTRY" ,"UNIT","$ VALUE".................C.1... ...C$,U$,D...(..D..99.100.H.2..C,C$,U$,D .R.<.C.C.1.Z.F..30...D.....N.....X.."WHI CH NUMBER UNITS WILL YOU START WITH".... ..C1."..........I.1.C1.<. .. C$,U$,D.C.. ..I.L...D1.D.\....C1,C$,U$,D......"WHICH NUMBER UNITS DO YOU WANT THEMCONVERTED TO"...H..C2............I.1.C2......C$,U$ ,D.A....I.J...D2.D.Z."..C2,C$,U$,D...'.. "WHAT QUANTITY DO YOU WANT CONVERTED"... (..Q1...,.Q2.Q1.D1.3.6.."DOLLAR VALUE $" ;Q2.@.@.Q3.Q2.D2.I.J.."CONVERTED VALUE " ;C$;" ";U$;" ";Q3....."USA","DOLLAR",1. ....."AUSTRALIA","DOLLAR ",1.131,"ARGENT INA","PESO",.0015.Z...."AUSTRIA","SCHILL ING",.0668......"BRITIAN","POUND",1.8278 ......"CANADA","DOLLAR",.8864.1...."FRAN CE","FRANC",.2166.O...."GREECE","DRACHMA ",.0289.N...."HOLLAND","GUILDER",.4506.. ...."HONG KONG","DOLLAR",.2157......"IND IA","RUPEE",.1191.E...."ISREAL","POUND", .0598......"ITALY","LIRA",.001152......" JAPAN","YEN",.004421......"MEXICO","PESC O ",.0439.6...."S. AFRICA","RAND",1.15.U ...."SWITZLAND","FRANC",.5128.S...."W GE RMANY","MARK",.4816......"BELGIUM","FRAN C",.031385......"FFF","FFF",-99.D...."TA IWAN","DOLLAR",.0265......"COLOMBIA","PE SO",.029......"DENMARK","KRONE",.1774... ..."FINLAND","MARKKA",.2387.<...."INDONE SIA","RUPIAH",.00259.U...."IRAN","RIAL", .0142.T...."MALAYSIA","DOLLAR",.4255.... .."SINGAPORE","DOLLAR",.4317...W.."FFF", "FFF",-99.Q.X.."DO YOU WANT TO CONVERT S OME MORE".Y.B..C$...L..C$."YES" .12..... .....'....$
> CLICK IMAGE PREVIEW FOR FULL MODAL