RESONA.BAS
FILE INFORMATION
FILENAME(S): RESONA.BAS
FILE TYPE(S): PRG
FILE SIZE: 4.2K
FIRST SEEN: 2025-11-30 21:26:13
APPEARS ON: 1 disk(s)
FILE HASH
f04923ed44d13029df6dbea10f14b12543900d811ead00b412c5503aa7c066c6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DEMO 1 | RESONA.BAS | PRG | DuncanTwain | 8 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4D 08 01 00 89 20 31 30 30 30 20 20 20 20 |..M.... 1000 | 00000010: 20 20 20 20 3A 8F 20 44 52 41 41 49 45 4E 2E 20 | :. DRAAIEN. | 00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000030: 20 20 50 52 4F 47 52 41 4D 4D 41 20 20 20 3A 20 | PROGRAMMA : | 00000040: 20 52 45 53 4F 4E 41 2E 42 41 53 20 2E 00 94 08 | RESONA.BAS ....| 00000050: 02 00 89 20 31 30 30 30 20 20 20 20 20 20 20 20 |... 1000 | 00000060: 3A 8F 20 44 52 41 41 49 45 4E 2E 20 20 20 20 20 |:. DRAAIEN. | 00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 49 | DI| 00000080: 53 4B 20 20 20 20 20 20 20 20 3A 20 20 44 45 4D |SK : DEM| 00000090: 4F 2D 31 2E 00 DA 08 03 00 89 20 32 30 30 30 20 |O-1....... 2000 | 000000A0: 20 20 20 20 20 20 20 3A 8F 20 56 45 52 53 49 45 | :. VERSIE| 000000B0: 5A 45 54 2E 20 20 20 20 20 20 20 20 20 20 20 20 |ZET. | 000000C0: 20 20 20 20 20 54 41 41 4C 20 20 20 20 20 20 20 | TAAL | 000000D0: 20 3A 20 20 42 41 53 49 43 2E 00 2A 09 04 00 8F | : BASIC..*....| 000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 | DA| 00000110: 54 55 4D 20 20 20 20 20 20 20 3A 20 20 32 30 20 |TUM : 20 | 00000120: 4A 55 4E 49 20 31 39 39 31 2E 00 7A 09 05 00 8F |JUNI 1991..z....| 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 | PR| 00000160: 4F 47 52 41 4D 4D 45 55 52 20 3A 20 20 4A 2E 48 |OGRAMMEUR : J.H| 00000170: 2E 56 41 4E 20 52 49 4A 4E 2E 00 80 09 06 00 8F |.VAN RIJN.......| 00000180: 00 CE 09 07 00 8F 20 4D 45 54 20 44 49 54 20 50 |...... MET DIT P| 00000190: 52 4F 47 52 41 4D 4D 41 20 4B 41 4E 20 4D 45 4E |ROGRAMMA KAN MEN| 000001A0: 20 44 45 20 46 52 45 51 55 45 4E 54 49 45 20 56 | DE FREQUENTIE V| 000001B0: 41 4E 20 45 45 4E 20 53 50 4F 45 4C 2D 43 4F 4E |AN EEN SPOEL-CON| 000001C0: 44 45 4E 53 41 54 4F 52 2D 4B 52 49 4E 47 00 1B |DENSATOR-KRING..| 000001D0: 0A 08 00 8F 20 42 45 52 45 4B 45 4E 45 4E 2C 20 |.... BEREKENEN, | 000001E0: 4D 41 41 52 20 4F 4F 4B 20 45 45 4E 20 4F 4E 42 |MAAR OOK EEN ONB| 000001F0: 45 4B 45 4E 44 45 20 5A 45 4C 46 49 4E 44 55 43 |EKENDE ZELFINDUC| 00000200: 54 49 45 20 4F 46 20 43 41 50 41 43 49 54 45 49 |TIE OF CAPACITEI| 00000210: 54 20 42 49 4A 20 52 45 45 44 53 00 4C 0A 09 00 |T BIJ REEDS.L...| 00000220: 8F 20 42 45 4B 45 4E 44 45 20 57 41 41 52 44 45 |. BEKENDE WAARDE| 00000230: 4E 20 56 41 4E 20 44 45 20 4F 56 45 52 49 47 45 |N VAN DE OVERIGE| 00000240: 20 47 52 4F 4F 54 48 45 44 45 4E 2E 00 94 0A 0A | GROOTHEDEN.....| 00000250: 00 99 3A 46 24 B2 22 48 45 52 54 5A 22 3A 46 46 |..:F$."HERTZ":FF| 00000260: B2 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.1 | 00000270: 20 20 20 20 3A 8F 20 56 52 41 41 47 20 45 45 4E | :. VRAAG EEN| 00000280: 48 45 49 44 20 56 41 4E 20 46 52 45 51 55 45 4E |HEID VAN FREQUEN| 00000290: 54 49 45 2E 00 C1 0A 0B 00 99 20 22 46 52 45 51 |TIE....... "FREQ| 000002A0: 55 45 4E 54 49 45 3B 20 48 45 52 54 5A 3D 48 5A |UENTIE; HERTZ=HZ| 000002B0: 3B 20 4B 49 4C 4F 48 45 52 54 5A 3D 4B 48 5A 3B |; KILOHERTZ=KHZ;| 000002C0: 22 00 E8 0A 0C 00 85 20 22 4D 45 47 41 48 45 52 |"...... "MEGAHER| 000002D0: 54 5A 3D 4D 48 5A 3B 20 4B 49 45 53 20 45 45 4E |TZ=MHZ; KIES EEN| 000002E0: 48 45 49 44 22 3B 45 24 00 FB 0A 0D 00 8B 20 45 |HEID";E$...... E| 000002F0: 24 B2 22 48 5A 22 20 20 A7 20 8E 00 23 0B 0E 00 |$."HZ" . ..#...| 00000300: 8B 20 45 24 B2 22 4B 48 5A 22 20 A7 20 46 46 B2 |. E$."KHZ" . FF.| 00000310: 31 30 30 30 3A 46 24 B2 22 4B 49 4C 4F 22 AA 46 |1000:F$."KILO".F| 00000320: 24 3A 8E 00 4E 0B 0F 00 8B 20 45 24 B2 22 4D 48 |$:..N.... E$."MH| 00000330: 5A 22 20 A7 20 46 46 B2 31 30 30 30 30 30 30 3A |Z" . FF.1000000:| 00000340: 46 24 B2 22 4D 45 47 41 22 AA 46 24 3A 8E 00 6B |F$."MEGA".F$:..k| 00000350: 0B 10 00 99 3A 99 20 22 45 45 4E 48 45 49 44 20 |....:. "EENHEID | 00000360: 46 4F 55 54 2E 22 3A 89 20 31 30 00 B5 0B 14 00 |FOUT.":. 10.....| 00000370: 99 3A 4C 24 B2 22 48 45 4E 52 59 22 3A 4C 46 B2 |.:L$."HENRY":LF.| 00000380: 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |1 | 00000390: 20 20 20 3A 8F 20 56 52 41 41 47 20 45 45 4E 48 | :. VRAAG EENH| 000003A0: 45 49 44 20 56 41 4E 20 5A 45 4C 46 49 4E 44 55 |EID VAN ZELFINDU| 000003B0: 43 54 49 45 2E 00 E3 0B 15 00 99 20 22 5A 45 4C |CTIE....... "ZEL| 000003C0: 46 49 4E 44 55 43 54 49 45 3B 20 48 45 4E 52 59 |FINDUCTIE; HENRY| 000003D0: 3D 48 3B 20 4D 49 4C 4C 49 48 45 4E 52 59 3D 4D |=H; MILLIHENRY=M| 000003E0: 48 3B 22 00 0A 0C 16 00 85 20 22 4D 49 43 52 4F |H;"...... "MICRO| 000003F0: 48 45 4E 52 59 3D 55 48 3B 20 4B 49 45 53 20 45 |HENRY=UH; KIES E| 00000400: 45 4E 48 45 49 44 22 3B 45 24 00 1C 0C 17 00 8B |ENHEID";E$......| 00000410: 20 45 24 B2 22 48 22 20 20 A7 20 8E 00 44 0C 18 | E$."H" . ..D..| 00000420: 00 8B 20 45 24 B2 22 4D 48 22 20 A7 20 4C 46 B2 |.. E$."MH" . LF.| 00000430: 31 30 30 30 3A 4C 24 B2 22 4D 49 4C 4C 49 22 AA |1000:L$."MILLI".| 00000440: 4C 24 3A 8E 00 6F 0C 19 00 8B 20 45 24 B2 22 55 |L$:..o.... E$."U| 00000450: 48 22 20 A7 20 4C 46 B2 31 30 30 30 30 30 30 3A |H" . LF.1000000:| 00000460: 4C 24 B2 22 4D 49 43 52 4F 22 AA 4C 24 3A 8E 00 |L$."MICRO".L$:..| 00000470: 8C 0C 1A 00 99 3A 99 20 22 45 45 4E 48 45 49 44 |.....:. "EENHEID| 00000480: 20 46 4F 55 54 2E 22 3A 89 20 32 30 00 CE 0C 1E | FOUT.":. 20....| 00000490: 00 99 3A 43 24 B2 22 46 41 52 41 44 22 3A 43 46 |..:C$."FARAD":CF| 000004A0: B2 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.1 | 000004B0: 20 20 20 20 3A 8F 20 45 45 4E 48 45 49 44 20 56 | :. EENHEID V| 000004C0: 41 4E 20 43 41 50 41 43 49 54 45 49 54 2E 00 FA |AN CAPACITEIT...| 000004D0: 0C 1F 00 99 20 22 43 41 50 41 43 49 54 45 49 54 |.... "CAPACITEIT| 000004E0: 3B 20 46 41 52 41 44 3D 46 3B 20 4D 49 4C 4C 49 |; FARAD=F; MILLI| 000004F0: 46 41 52 41 44 3D 4D 46 3B 22 00 1F 0D 20 00 99 |FARAD=MF;"... ..| 00000500: 20 22 4D 49 43 52 4F 46 41 52 41 44 3D 55 46 3B | "MICROFARAD=UF;| 00000510: 20 4E 41 4E 4F 46 41 52 41 44 3D 4E 46 3B 22 00 | NANOFARAD=NF;".| 00000520: 45 0D 21 00 85 20 22 50 49 43 4F 46 41 52 41 44 |E.!.. "PICOFARAD| 00000530: 3D 50 46 3B 20 4B 49 45 53 20 45 45 4E 48 45 49 |=PF; KIES EENHEI| 00000540: 44 22 3B 45 24 00 57 0D 22 00 8B 20 45 24 B2 22 |D";E$.W.".. E$."| 00000550: 46 22 20 20 A7 20 8E 00 7F 0D 23 00 8B 20 45 24 |F" . ....#.. E$| 00000560: B2 22 4D 46 22 20 A7 20 43 46 B2 31 30 30 30 3A |."MF" . CF.1000:| 00000570: 43 24 B2 22 4D 49 4C 4C 49 22 AA 43 24 3A 8E 00 |C$."MILLI".C$:..| 00000580: AA 0D 24 00 8B 20 45 24 B2 22 55 46 22 20 A7 20 |..$.. E$."UF" . | 00000590: 43 46 B2 31 30 30 30 30 30 30 3A 43 24 B2 22 4D |CF.1000000:C$."M| 000005A0: 49 43 52 4F 22 AA 43 24 3A 8E 00 D1 0D 25 00 8B |ICRO".C$:....%..| 000005B0: 20 45 24 B2 22 4E 46 22 20 A7 20 43 46 B2 31 30 | E$."NF" . CF.10| 000005C0: AE 39 3A 43 24 B2 22 4E 41 4E 4F 22 AA 43 24 3A |.9:C$."NANO".C$:| 000005D0: 8E 00 F9 0D 26 00 8B 20 45 24 B2 22 50 46 22 20 |....&.. E$."PF" | 000005E0: A7 20 43 46 B2 31 30 AE 31 32 3A 43 24 B2 22 50 |. CF.10.12:C$."P| 000005F0: 49 43 4F 22 AA 43 24 3A 8E 00 16 0E 27 00 99 3A |ICO".C$:....'..:| 00000600: 99 20 22 45 45 4E 48 45 49 44 20 46 4F 55 54 2E |. "EENHEID FOUT.| 00000610: 22 3A 89 20 33 30 00 48 0E 28 00 99 20 20 20 20 |":. 30.H.(.. | 00000620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.| 00000640: 20 57 41 41 52 44 45 2E 00 6F 0E 29 00 85 20 22 | WAARDE..o.).. "| 00000650: 57 41 41 52 44 45 20 56 41 4E 20 47 45 4B 4F 5A |WAARDE VAN GEKOZ| 00000660: 45 4E 20 47 52 4F 4F 54 48 45 49 44 22 3B 57 00 |EN GROOTHEID";W.| 00000670: 75 0E 2A 00 8E 00 B6 0E 32 00 45 24 B2 22 22 3A |u.*.....2.E$."":| 00000680: 57 B2 C5 28 49 24 29 3A 81 20 55 B2 C3 28 49 24 |W..(I$):. U..(I$| 00000690: 29 20 A4 20 31 20 A9 20 AB 31 20 20 20 20 20 3A |) . 1 . .1 :| 000006A0: 8F 20 53 50 4C 49 54 53 20 44 45 20 45 45 4E 48 |. SPLITS DE EENH| 000006B0: 45 49 44 20 41 46 00 FA 0E 33 00 4B 24 B2 CA 28 |EID AF...3.K$..(| 000006C0: 49 24 2C 55 2C 31 29 3A 8B 20 C6 28 4B 24 29 B3 |I$,U,1):. .(K$).| 000006D0: 36 35 20 A7 20 55 B2 30 3A 4B 24 B2 22 22 20 20 |65 . U.0:K$."" | 000006E0: 20 3A 8F 20 55 49 54 20 53 54 52 49 4E 47 20 49 | :. UIT STRING I| 000006F0: 24 20 4E 41 41 52 20 45 24 2E 00 38 0F 34 00 45 |$ NAAR E$..8.4.E| 00000700: 24 B2 4B 24 AA 45 24 3A 82 20 55 3A 8E 20 20 20 |$.K$.E$:. U:. | 00000710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000720: 20 20 20 20 20 20 3A 8F 20 44 45 20 57 41 41 52 | :. DE WAAR| 00000730: 44 45 20 49 4E 20 57 2E 00 77 0F 64 00 99 3A 46 |DE IN W..w.d..:F| 00000740: 24 B2 22 48 45 52 54 5A 22 3A 46 46 B2 31 20 20 |$."HERTZ":FF.1 | 00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000760: 3A 8F 20 56 52 41 41 47 20 44 45 20 46 52 45 51 |:. VRAAG DE FREQ| 00000770: 55 45 4E 54 49 45 2E 00 9B 0F 6E 00 99 20 22 46 |UENTIE....n.. "F| 00000780: 52 45 51 55 45 4E 54 49 45 3A 48 45 52 54 5A 20 |REQUENTIE:HERTZ | 00000790: 20 20 20 20 3D 20 20 48 5A 3B 22 00 BF 0F 6F 00 | = HZ;"...o.| 000007A0: 99 20 22 20 20 20 20 20 20 20 20 20 20 20 4B 49 |. " KI| 000007B0: 4C 4F 48 45 52 54 5A 20 3D 20 4B 48 5A 3B 22 00 |LOHERTZ = KHZ;".| 000007C0: E3 0F 70 00 99 20 22 20 20 20 20 20 20 20 20 20 |..p.. " | 000007D0: 20 20 4D 45 47 41 48 45 52 54 5A 20 3D 20 4D 48 | MEGAHERTZ = MH| 000007E0: 5A 2E 22 00 E9 0F 71 00 99 00 0C 10 78 00 85 20 |Z."...q.....x.. | 000007F0: 22 4B 49 45 53 20 57 41 41 52 44 45 20 4D 45 54 |"KIES WAARDE MET| 00000800: 20 45 45 4E 48 45 49 44 22 3B 49 24 00 19 10 82 | EENHEID";I$....| 00000810: 00 8D 20 35 30 3A 46 B2 57 00 2C 10 8C 00 8B 20 |.. 50:F.W.,.... | 00000820: 45 24 B2 22 48 5A 22 20 20 A7 20 8E 00 54 10 96 |E$."HZ" . ..T..| 00000830: 00 8B 20 45 24 B2 22 4B 48 5A 22 20 A7 20 46 46 |.. E$."KHZ" . FF| 00000840: B2 31 30 30 30 3A 46 24 B2 22 4B 49 4C 4F 22 AA |.1000:F$."KILO".| 00000850: 46 24 3A 8E 00 7F 10 A0 00 8B 20 45 24 B2 22 4D |F$:....... E$."M| 00000860: 48 5A 22 20 A7 20 46 46 B2 31 30 30 30 30 30 30 |HZ" . FF.1000000| 00000870: 3A 46 24 B2 22 4D 45 47 41 22 AA 46 24 3A 8E 00 |:F$."MEGA".F$:..| 00000880: 9D 10 AA 00 99 3A 99 20 22 45 45 4E 48 45 49 44 |.....:. "EENHEID| 00000890: 20 46 4F 55 54 2E 22 3A 89 20 31 32 30 00 DE 10 | FOUT.":. 120...| 000008A0: C8 00 99 3A 4C 24 B2 22 48 45 4E 52 59 22 3A 4C |...:L$."HENRY":L| 000008B0: 46 B2 31 20 20 20 20 20 20 20 20 20 20 20 20 20 |F.1 | 000008C0: 20 20 20 20 20 3A 8F 20 56 52 41 41 47 20 44 45 | :. VRAAG DE| 000008D0: 20 5A 45 4C 46 49 4E 44 55 43 54 49 45 2E 00 04 | ZELFINDUCTIE...| 000008E0: 11 D2 00 99 20 22 5A 45 4C 46 49 4E 44 55 43 54 |.... "ZELFINDUCT| 000008F0: 49 45 3A 48 45 4E 52 59 20 20 20 20 20 20 3D 20 |IE:HENRY = | 00000900: 20 48 3B 22 00 2A 11 D3 00 99 20 22 20 20 20 20 | H;".*.... " | 00000910: 20 20 20 20 20 20 20 20 20 4D 49 4C 4C 49 48 45 | MILLIHE| 00000920: 4E 52 59 20 3D 20 4D 48 3B 22 00 50 11 D4 00 99 |NRY = MH;".P....| 00000930: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 4D | " M| 00000940: 49 43 52 4F 48 45 4E 52 59 20 3D 20 55 48 2E 22 |ICROHENRY = UH."| 00000950: 00 56 11 D5 00 99 00 79 11 DC 00 85 20 22 4B 49 |.V.....y.... "KI| 00000960: 45 53 20 57 41 41 52 44 45 20 4D 45 54 20 45 45 |ES WAARDE MET EE| 00000970: 4E 48 45 49 44 22 3B 49 24 00 86 11 E6 00 8D 20 |NHEID";I$...... | 00000980: 35 30 3A 4C B2 57 00 98 11 F0 00 8B 20 45 24 B2 |50:L.W...... E$.| 00000990: 22 48 22 20 20 A7 20 8E 00 C0 11 FA 00 8B 20 45 |"H" . ....... E| 000009A0: 24 B2 22 4D 48 22 20 A7 20 4C 46 B2 31 30 30 30 |$."MH" . LF.1000| 000009B0: 3A 4C 24 B2 22 4D 49 4C 4C 49 22 AA 4C 24 3A 8E |:L$."MILLI".L$:.| 000009C0: 00 EB 11 04 01 8B 20 45 24 B2 22 55 48 22 20 A7 |...... E$."UH" .| 000009D0: 20 4C 46 B2 31 30 30 30 30 30 30 3A 4C 24 B2 22 | LF.1000000:L$."| 000009E0: 4D 49 43 52 4F 22 AA 4C 24 3A 8E 00 09 12 0E 01 |MICRO".L$:......| 000009F0: 99 3A 99 20 22 45 45 4E 48 45 49 44 20 46 4F 55 |.:. "EENHEID FOU| 00000A00: 54 2E 22 3A 89 20 32 32 30 00 48 12 2C 01 99 3A |T.":. 220.H.,..:| 00000A10: 43 24 B2 22 46 41 52 41 44 22 3A 43 46 B2 31 20 |C$."FARAD":CF.1 | 00000A20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A30: 20 3A 8F 20 56 52 41 41 47 20 44 45 20 43 41 50 | :. VRAAG DE CAP| 00000A40: 41 43 49 54 45 49 54 2E 00 6C 12 36 01 99 20 22 |ACITEIT..l.6.. "| 00000A50: 43 41 50 41 43 49 54 45 49 54 3A 46 41 52 41 44 |CAPACITEIT:FARAD| 00000A60: 20 20 20 20 20 20 3D 20 20 46 3B 22 00 90 12 37 | = F;"...7| 00000A70: 01 99 20 22 20 20 20 20 20 20 20 20 20 20 20 4D |.. " M| 00000A80: 49 4C 4C 49 46 41 52 41 44 20 3D 20 4D 46 3B 22 |ILLIFARAD = MF;"| 00000A90: 00 B4 12 38 01 99 20 22 20 20 20 20 20 20 20 20 |...8.. " | 00000AA0: 20 20 20 4D 49 43 52 4F 46 41 52 41 44 20 3D 20 | MICROFARAD = | 00000AB0: 55 46 3B 22 00 D8 12 39 01 99 20 22 20 20 20 20 |UF;"...9.. " | 00000AC0: 20 20 20 20 20 20 20 4E 41 4E 4F 46 41 52 41 44 | NANOFARAD| 00000AD0: 20 20 3D 20 4E 46 3B 22 00 FC 12 3A 01 99 20 22 | = NF;"...:.. "| 00000AE0: 20 20 20 20 20 20 20 20 20 20 20 50 49 43 4F 46 | PICOF| 00000AF0: 41 52 41 44 20 20 3D 20 50 46 2E 22 00 02 13 3B |ARAD = PF."...;| 00000B00: 01 99 00 25 13 40 01 85 20 22 4B 49 45 53 20 57 |...%.@.. "KIES W| 00000B10: 41 41 52 44 45 20 4D 45 54 20 45 45 4E 48 45 49 |AARDE MET EENHEI| 00000B20: 44 22 3B 49 24 00 32 13 4A 01 8D 20 35 30 3A 43 |D";I$.2.J.. 50:C| 00000B30: B2 57 00 44 13 54 01 8B 20 45 24 B2 22 46 22 20 |.W.D.T.. E$."F" | 00000B40: 20 A7 20 8E 00 6C 13 59 01 8B 20 45 24 B2 22 4D | . ..l.Y.. E$."M| 00000B50: 46 22 20 A7 20 43 46 B2 31 30 30 30 3A 43 24 B2 |F" . CF.1000:C$.| 00000B60: 22 4D 49 4C 4C 49 22 AA 43 24 3A 8E 00 97 13 5E |"MILLI".C$:....^| 00000B70: 01 8B 20 45 24 B2 22 55 46 22 20 A7 20 43 46 B2 |.. E$."UF" . CF.| 00000B80: 31 30 30 30 30 30 30 3A 43 24 B2 22 4D 49 43 52 |1000000:C$."MICR| 00000B90: 4F 22 AA 43 24 3A 8E 00 BE 13 63 01 8B 20 45 24 |O".C$:....c.. E$| 00000BA0: B2 22 4E 46 22 20 A7 20 43 46 B2 31 30 AE 39 3A |."NF" . CF.10.9:| 00000BB0: 43 24 B2 22 4E 41 4E 4F 22 AA 43 24 3A 8E 00 E6 |C$."NANO".C$:...| 00000BC0: 13 68 01 8B 20 45 24 B2 22 50 46 22 20 A7 20 43 |.h.. E$."PF" . C| 00000BD0: 46 B2 31 30 AE 31 32 3A 43 24 B2 22 50 49 43 4F |F.10.12:C$."PICO| 00000BE0: 22 AA 43 24 3A 8E 00 04 14 72 01 99 3A 99 20 22 |".C$:....r..:. "| 00000BF0: 45 45 4E 48 45 49 44 20 46 4F 55 54 2E 22 3A 89 |EENHEID FOUT.":.| 00000C00: 20 33 32 30 00 3C 14 E8 03 99 20 C7 28 31 34 37 | 320.<.... .(147| 00000C10: 29 3A 99 20 22 20 4E 41 20 45 4C 4B 45 20 49 4E |):. " NA ELKE IN| 00000C20: 54 4F 45 54 53 20 3C 52 45 54 55 52 4E 3E 20 49 |TOETS <RETURN> I| 00000C30: 4E 44 52 55 4B 4B 45 4E 2E 22 3A 99 00 77 14 F2 |NDRUKKEN.":..w..| 00000C40: 03 99 3A 46 53 24 B2 22 46 52 45 51 55 45 4E 54 |..:FS$."FREQUENT| 00000C50: 49 45 22 3A 4C 53 24 B2 22 5A 45 4C 46 49 4E 44 |IE":LS$."ZELFIND| 00000C60: 55 43 54 49 45 22 3A 43 53 24 B2 22 43 41 50 41 |UCTIE":CS$."CAPA| 00000C70: 43 49 54 45 49 54 22 00 90 14 FC 03 99 20 46 53 |CITEIT"...... FS| 00000C80: 24 22 3D 46 3B 20 22 4C 53 24 22 3D 4C 3B 20 22 |$"=F; "LS$"=L; "| 00000C90: 00 A7 14 06 04 99 20 43 53 24 22 3D 43 3B 20 45 |...... CS$"=C; E| 00000CA0: 49 4E 44 3D 45 2E 22 00 D4 14 10 04 85 20 22 4B |IND=E."...... "K| 00000CB0: 49 45 53 54 20 55 20 44 45 20 54 45 20 42 45 52 |IEST U DE TE BER| 00000CC0: 45 4B 45 4E 45 4E 20 47 52 4F 4F 54 48 45 49 44 |EKENEN GROOTHEID| 00000CD0: 22 3B 55 24 00 E8 14 1A 04 8B 20 55 24 B2 22 46 |";U$...... U$."F| 00000CE0: 22 20 A7 20 31 32 30 30 00 FC 14 24 04 8B 20 55 |" . 1200...$.. U| 00000CF0: 24 B2 22 4C 22 20 A7 20 31 33 30 30 00 10 15 2E |$."L" . 1300....| 00000D00: 04 8B 20 55 24 B2 22 43 22 20 A7 20 31 34 30 30 |.. U$."C" . 1400| 00000D10: 00 24 15 38 04 8B 20 55 24 B2 22 45 22 20 A7 20 |.$.8.. U$."E" . | 00000D20: 31 35 30 30 00 45 15 42 04 99 3A 99 20 22 47 52 |1500.E.B..:. "GR| 00000D30: 4F 4F 54 48 45 49 44 20 46 4F 55 54 2E 22 3A 89 |OOTHEID FOUT.":.| 00000D40: 20 31 30 31 30 00 82 15 B0 04 8D 20 32 30 30 20 | 1010...... 200 | 00000D50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000D60: 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 | :. | 00000D70: 46 52 45 51 55 45 4E 54 49 45 20 46 28 4C 2C 43 |FREQUENTIE F(L,C| 00000D80: 29 2E 00 9E 15 BA 04 99 20 4C 53 24 22 20 3D 22 |)....... LS$" ="| 00000D90: 4C 3B 4C 24 22 2E 22 3A 4C B2 4C AD 4C 46 00 A8 |L;L$".":L.L.LF..| 00000DA0: 15 C4 04 8D 20 33 30 30 00 C4 15 CE 04 99 20 43 |.... 300...... C| 00000DB0: 53 24 22 20 3D 22 43 3B 43 24 22 2E 22 3A 43 B2 |S$" ="C;C$".":C.| 00000DC0: 43 AD 43 46 00 E5 15 D8 04 8D 20 31 30 3A 46 B2 |C.CF...... 10:F.| 00000DD0: 2E 31 35 39 31 35 35 AD 28 46 46 AC BA 28 4C AC |.159155.(FF..(L.| 00000DE0: 43 29 29 3A 99 00 03 16 E2 04 99 20 46 53 24 22 |C)):....... FS$"| 00000DF0: 20 3D 22 46 3B 46 24 22 2E 22 3A 99 3A 89 20 31 | ="F;F$".":.:. 1| 00000E00: 30 31 30 00 42 16 14 05 8D 20 31 30 30 20 20 20 |010.B.... 100 | 00000E10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000E20: 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 5A 45 | :. ZE| 00000E30: 4C 46 49 4E 44 55 43 54 49 45 20 4C 28 46 2C 43 |LFINDUCTIE L(F,C| 00000E40: 29 2E 00 5E 16 1E 05 99 20 46 53 24 22 20 3D 22 |)..^.... FS$" ="| 00000E50: 46 3B 46 24 22 2E 22 3A 46 B2 46 AC 46 46 00 68 |F;F$".":F.F.FF.h| 00000E60: 16 28 05 8D 20 33 30 30 00 84 16 32 05 99 20 43 |.(.. 300...2.. C| 00000E70: 53 24 22 20 3D 22 43 3B 43 24 22 2E 22 3A 43 B2 |S$" ="C;C$".":C.| 00000E80: 43 AD 43 46 00 A3 16 3C 05 8D 20 32 30 3A 4C B2 |C.CF...<.. 20:L.| 00000E90: 4C 46 AC 2E 30 32 35 33 33 AD 28 46 AC 46 AC 43 |LF..02533.(F.F.C| 00000EA0: 29 3A 99 00 C1 16 46 05 99 20 4C 53 24 22 20 3D |):....F.. LS$" =| 00000EB0: 22 4C 3B 4C 24 22 2E 22 3A 99 3A 89 20 31 30 31 |"L;L$".":.:. 101| 00000EC0: 30 00 FE 16 78 05 8D 20 31 30 30 20 20 20 20 20 |0...x.. 100 | 00000ED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000EE0: 20 20 20 20 20 20 20 20 20 3A 8F 20 43 41 50 41 | :. CAPA| 00000EF0: 43 49 54 45 49 54 20 43 28 46 2C 4C 29 2E 00 1A |CITEIT C(F,L)...| 00000F00: 17 82 05 99 20 46 53 24 22 20 3D 22 46 3B 46 24 |.... FS$" ="F;F$| 00000F10: 22 2E 22 3A 46 B2 46 AC 46 46 00 24 17 8C 05 8D |".":F.F.FF.$....| 00000F20: 20 32 30 30 00 40 17 96 05 99 20 4C 53 24 22 20 | 200.@.... LS$" | 00000F30: 3D 22 4C 3B 4C 24 22 2E 22 3A 4C B2 4C AD 4C 46 |="L;L$".":L.L.LF| 00000F40: 00 5F 17 A0 05 8D 20 33 30 3A 43 B2 43 46 AC 2E |._.... 30:C.CF..| 00000F50: 30 32 35 33 33 AD 28 46 AC 46 AC 4C 29 3A 99 00 |02533.(F.F.L):..| 00000F60: 7D 17 AA 05 99 20 43 53 24 22 20 3D 22 43 3B 43 |}.... CS$" ="C;C| 00000F70: 24 22 2E 22 3A 99 3A 89 20 31 30 31 30 00 A9 17 |$".":.:. 1010...| 00000F80: DC 05 99 3A 99 20 22 45 49 4E 44 45 20 56 41 4E |...:. "EINDE VAN| 00000F90: 20 48 45 54 20 50 52 4F 47 52 41 4D 4D 41 2E 22 | HET PROGRAMMA."| 00000FA0: 3A 99 3A 89 20 32 30 33 35 00 CB 17 D0 07 94 20 |:.:. 2035...... | 00000FB0: 22 54 45 22 2C 38 3A 99 3A 99 20 22 47 45 52 45 |"TE",8:.:. "GERE| 00000FC0: 44 20 4E 41 41 52 20 54 45 2E 22 00 F0 17 D5 07 |D NAAR TE.".....| 00000FD0: 95 20 22 54 45 22 2C 38 3A 99 3A 99 20 22 54 45 |. "TE",8:.:. "TE| 00000FE0: 20 47 45 43 4F 4E 54 52 4F 4C 45 45 52 44 2E 22 | GECONTROLEERD."| 00000FF0: 00 0F 18 DA 07 9F 20 35 2C 38 2C 31 35 2C 22 53 |...... 5,8,15,"S| 00001000: 30 3A 52 45 53 4F 4E 41 2E 42 41 53 2F 4F 22 00 |0:RESONA.BAS/O".| 00001010: 39 18 DF 07 98 35 2C 20 20 20 20 22 52 30 3A 52 |9....5, "R0:R| 00001020: 45 53 4F 4E 41 2E 42 41 53 2F 4F 3D 30 3A 52 45 |ESONA.BAS/O=0:RE| 00001030: 53 4F 4E 41 2E 42 41 53 22 00 59 18 E4 07 98 35 |SONA.BAS".Y....5| 00001040: 2C 20 20 20 20 22 52 30 3A 52 45 53 4F 4E 41 2E |, "R0:RESONA.| 00001050: 42 41 53 3D 30 3A 54 45 22 00 61 18 E9 07 A0 20 |BAS=0:TE".a.... | 00001060: 35 00 87 18 EE 07 99 3A 99 20 22 56 45 52 53 49 |5......:. "VERSI| 00001070: 45 5A 45 54 20 52 45 53 4F 4E 41 2E 42 41 53 20 |EZET RESONA.BAS | 00001080: 4B 4C 41 41 52 2E 22 00 8D 18 F3 07 80 00 97 18 |KLAAR.".........| 00001090: B8 0B 8D 20 33 30 30 00 A8 18 C2 0B 99 20 22 46 |... 300...... "F| 000010A0: 41 43 54 4F 52 22 43 46 00 B3 18 CC 0B 99 20 43 |ACTOR"CF...... C| 000010B0: 3B 43 24 00 B9 18 D6 0B 80 00 00 00 |;C$......... |
..M.... 1000 :. DRAAIEN.
PROGRAMMA : RESONA.BAS ....
... 1000 :. DRAAIEN.
DISK : DEMO-1..Z.... 2000
:. VERSIEZET. TAA
L : BASIC..*....
DATUM
: 20 JUNI 1991..Z....
PROGRAMMEU
R : J.H.VAN RIJN........N.... MET DIT P
ROGRAMMA KAN MEN DE FREQUENTIE VAN EEN S
POEL-CONDENSATOR-KRING...... BEREKENEN,
MAAR OOK EEN ONBEKENDE ZELFINDUCTIE OF C
APACITEIT BIJ REEDS.L.... BEKENDE WAARDE
N VAN DE OVERIGE GROOTHEDEN.......:F$."H
ERTZ":FF.1 :. VRAAG EEN
HEID VAN FREQUENTIE..A.... "FREQUENTIE;
HERTZ=HZ; KILOHERTZ=KHZ;"...... "MEGAHER
TZ=MHZ; KIES EENHEID";E$...... E$."HZ"
. ..#.... E$."KHZ" . FF.1000:F$."KILO".F
$:..N.... E$."MHZ" . FF.1000000:F$."MEGA
".F$:..K....:. "EENHEID FOUT.":. 10.....
.:L$."HENRY":LF.1 :. VR
AAG EENHEID VAN ZELFINDUCTIE....... "ZEL
FINDUCTIE; HENRY=H; MILLIHENRY=MH;".....
. "MICROHENRY=UH; KIES EENHEID";E$......
E$."H" . ..D.... E$."MH" . LF.1000:L$.
"MILLI".L$:..O.... E$."UH" . LF.1000000:
L$."MICRO".L$:.......:. "EENHEID FOUT.":
. 20.N....:C$."FARAD":CF.1
:. EENHEID VAN CAPACITEIT....... "CA
PACITEIT; FARAD=F; MILLIFARAD=MF;"... ..
"MICROFARAD=UF; NANOFARAD=NF;".E.!.. "P
ICOFARAD=PF; KIES EENHEID";E$.W.".. E$."
F" . ...#.. E$."MF" . CF.1000:C$."MILL
I".C$:....$.. E$."UF" . CF.1000000:C$."M
ICRO".C$:..Q.%.. E$."NF" . CF.10.9:C$."N
ANO".C$:....&.. E$."PF" . CF.10.12:C$."P
ICO".C$:....'..:. "EENHEID FOUT.":. 30.H
.(.. :.
WAARDE..O.).. "WAARDE VAN GEKOZEN GROOT
HEID";W.U.*.....2.E$."":W.E(I$):. U.C(I$
) . 1 . .1 :. SPLITS DE EENHEID AF..
.3.K$.J(I$,U,1):. F(K$).65 . U.0:K$.""
:. UIT STRING I$ NAAR E$..8.4.E$.K$.E$:
. U:. :. DE WAAR
DE IN W..W.D..:F$."HERTZ":FF.1
:. VRAAG DE FREQUENTIE....N.. "F
REQUENTIE:HERTZ = HZ;"...O.. "
KILOHERTZ = KHZ;"...P.. "
MEGAHERTZ = MHZ."...Q.....X.. "KIES WA
ARDE MET EENHEID";I$...... 50:F.W.,....
E$."HZ" . ..T.... E$."KHZ" . FF.1000:F$
."KILO".F$:... .. E$."MHZ" . FF.1000000
:F$."MEGA".F$:.......:. "EENHEID FOUT.":
. 120...H..:L$."HENRY":LF.1
:. VRAAG DE ZELFINDUCTIE....R.. "ZE
LFINDUCTIE:HENRY = H;".*.S.. "
MILLIHENRY = MH;".P.T.. "
MICROHENRY = UH.".V.U...Y.... "KI
ES WAARDE MET EENHEID";I$...... 50:L.W..
.... E$."H" . ....... E$."MH" . LF.1000
:L$."MILLI".L$:....... E$."UH" . LF.1000
000:L$."MICRO".L$:.......:. "EENHEID FOU
T.":. 220.H.,..:C$."FARAD":CF.1
:. VRAAG DE CAPACITEIT..L.6.. "
CAPACITEIT:FARAD = F;"...7.. "
MILLIFARAD = MF;"...8.. "
MICROFARAD = UF;".X.9.. " N
ANOFARAD = NF;"...:.. " PICOF
ARAD = PF."...;...%.@.. "KIES WAARDE ME
T EENHEID";I$.2.J.. 50:C.W.D.T.. E$."F"
. ..L.Y.. E$."MF" . CF.1000:C$."MILLI".
C$:....^.. E$."UF" . CF.1000000:C$."MICR
O".C$:....C.. E$."NF" . CF.10.9:C$."NANO
".C$:....H.. E$."PF" . CF.10.12:C$."PICO
".C$:....R..:. "EENHEID FOUT.":. 320.<..
.. G(147):. " NA ELKE INTOETS <RETURN> I
NDRUKKEN.":..W....:FS$."FREQUENTIE":LS$.
"ZELFINDUCTIE":CS$."CAPACITEIT"...... FS
$"=F; "LS$"=L; "...... CS$"=C; EIND=E.".
T.... "KIEST U DE TE BEREKENEN GROOTHEID
";U$...... U$."F" . 1200...$.. U$."L" .
1300...... U$."C" . 1400.$.8.. U$."E" .
1500.E.B..:. "GROOTHEID FOUT.":. 1010...
... 200 :.
FREQUENTIE F(L,C)....... LS$" ="L;L$".":
L.L.LF...D.. 300.D.N.. CS$" ="C;C$".":C.
C.CF...X.. 10:F..159155.(FF..(L.C)):....
... FS$" ="F;F$".":.:. 1010.B.... 100
:. ZELFINDUCT
IE L(F,C)..^.... FS$" ="F;F$".":F.F.FF.H
.(.. 300...2.. CS$" ="C;C$".":C.C.CF...<
.. 20:L.LF..02533.(F.F.C):..A.F.. LS$" =
"L;L$".":.:. 1010...X.. 100
:. CAPACITEIT C(F,L)...
.... FS$" ="F;F$".":F.F.FF.$.... 200.@..
.. LS$" ="L;L$".":L.L.LF._. .. 30:C.CF..
02533.(F.F.L):..}.... CS$" ="C;C$".":.:.
1010......:. "EINDE VAN HET PROGRAMMA."
:.:. 2035.K.P.. "TE",8:.:. "GERED NAAR T
E."...U.. "TE",8:.:. "TE GECONTROLEERD."
...Z.. 5,8,15,"S0:RESONA.BAS/O".9....5,
"R0:RESONA.BAS/O=0:RESONA.BAS".Y....5
, "R0:RESONA.BAS=0:TE".A... 5......:
. "VERSIEZET RESONA.BAS KLAAR.".........
... 300...B.. "FACTOR"CF...L.. C;C$...V.
....
> CLICK IMAGE PREVIEW FOR FULL MODAL