RESONANTIE 1
FILE INFORMATION
FILENAME(S): RESONANTIE 1
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-11-02 16:30:49
APPEARS ON: 1 disk(s)
FILE HASH
d1135fc2e97b2c21af8b8a421788025b4e4362f72915aed614a4a06a09c59fe6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK 18 | RESONANTIE 1 | PRG | Treasure Chest - OzzyC64 | 21 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 0A 00 8F 20 2A 2A 2A 53 45 52 49 45 |....... ***SERIE| 00000010: 4B 52 49 4E 47 2A 2A 2A 00 29 08 14 00 8F 20 2A |KRING***.).... *| 00000020: 2A 49 4E 56 4F 45 52 2A 2A 00 33 08 1E 00 8D 20 |*INVOER**.3.... | 00000030: 37 32 30 00 42 08 28 00 8F 20 2A 2A 4D 45 4E 55 |720.B.(.. **MENU| 00000040: 2A 2A 00 4C 08 32 00 8D 20 33 35 30 00 65 08 3C |**.L.2.. 350.e.<| 00000050: 00 91 20 4B 20 89 20 37 30 2C 31 30 30 2C 31 33 |.. K . 70,100,13| 00000060: 30 2C 31 36 30 00 8C 08 46 00 8F 20 2A 2A 56 45 |0,160...F.. **VE| 00000070: 52 41 4E 44 45 52 45 4E 20 4B 4F 4D 50 4F 4E 45 |RANDEREN KOMPONE| 00000080: 4E 54 57 41 41 52 44 45 4E 20 2A 2A 00 A1 08 50 |NTWAARDEN **...P| 00000090: 00 8D 20 37 32 30 20 3A 20 8F 20 49 4E 56 4F 45 |.. 720 : . INVOE| 000000A0: 52 00 AA 08 5A 00 89 20 34 30 00 D3 08 64 00 8F |R...Z.. 40...d..| 000000B0: 20 2A 2A 20 42 45 50 41 4C 49 4E 47 20 52 45 53 | ** BEPALING RES| 000000C0: 4F 4E 41 4E 54 49 45 46 52 45 51 55 45 4E 54 49 |ONANTIEFREQUENTI| 000000D0: 45 2A 2A 00 DD 08 6E 00 8D 20 37 37 30 00 E6 08 |E**...n.. 770...| 000000E0: 78 00 89 20 34 30 00 05 09 82 00 8F 20 2A 2A 20 |x.. 40...... ** | 000000F0: 42 45 50 41 4C 49 4E 47 20 49 4D 50 45 44 41 4E |BEPALING IMPEDAN| 00000100: 54 49 45 2A 2A 00 0F 09 8C 00 8D 20 38 32 30 00 |TIE**...... 820.| 00000110: 18 09 96 00 89 20 34 30 00 1E 09 A0 00 80 00 2C |..... 40.......,| 00000120: 09 AA 00 8F 20 2A 2A 4B 4F 50 2A 2A 00 4D 09 B4 |.... **KOP**.M..| 00000130: 00 99 22 93 11 11 20 20 20 20 20 20 2A 2A 2A 53 |.."... ***S| 00000140: 45 52 49 45 4B 52 49 4E 47 2A 2A 2A 22 00 53 09 |ERIEKRING***".S.| 00000150: BE 00 8E 00 71 09 C8 00 8F 20 2A 2A 54 45 4B 45 |....q.... **TEKE| 00000160: 4E 49 4E 47 20 53 43 48 41 4B 45 4C 49 4E 47 2A |NING SCHAKELING*| 00000170: 2A 00 93 09 D2 00 99 22 11 11 20 20 20 20 D7 C3 |*......".. ..| 00000180: C3 C3 C3 C3 C3 12 20 20 20 20 92 C3 C3 C3 C3 C3 |...... ......| 00000190: C3 AE 22 00 B1 09 DC 00 99 22 20 20 20 20 20 20 |.."......" | 000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 | .| 000001B0: 22 00 CF 09 E6 00 99 22 20 20 20 20 20 20 20 20 |"......" | 000001C0: 20 20 20 20 20 52 20 20 20 20 20 20 20 C2 22 00 | R .".| 000001D0: F0 09 F0 00 99 22 20 20 20 20 20 20 20 20 20 20 |....." | 000001E0: 20 20 20 20 20 20 20 20 20 20 C3 B1 C3 20 43 22 | ... C"| 000001F0: 00 0F 0A FA 00 99 22 20 20 20 20 20 20 20 20 20 |......" | 00000200: 20 20 20 20 20 20 20 20 20 20 20 C3 B2 C3 22 00 | ...".| 00000210: 2D 0A 04 01 99 22 20 20 20 20 20 20 20 20 20 20 |-...." | 00000220: 20 20 20 4C 20 20 20 20 20 20 20 C2 22 00 4B 0A | L .".K.| 00000230: 0E 01 99 22 20 20 20 20 D7 C3 C3 C3 C3 C3 C3 A6 |..." ........| 00000240: A6 A6 A6 C3 C3 C3 C3 C3 C3 BD 22 00 51 0A 18 01 |..........".Q...| 00000250: 8E 00 74 0A 22 01 8F 20 2A 2A 20 49 4E 56 4F 45 |..t.".. ** INVOE| 00000260: 52 20 4B 4F 4D 50 4F 4E 45 4E 54 57 41 41 52 44 |R KOMPONENTWAARD| 00000270: 45 4E 2A 2A 00 8F 0A 36 01 85 20 22 11 11 20 52 |EN**...6.. ".. R| 00000280: 20 28 49 4E 20 4F 48 4D 29 20 3A 20 22 3B 52 00 | (IN OHM) : ";R.| 00000290: A9 0A 40 01 85 22 20 43 20 28 49 4E 20 46 41 52 |..@.." C (IN FAR| 000002A0: 41 44 29 20 3A 20 22 3B 43 00 C3 0A 4A 01 85 22 |AD) : ";C...J.."| 000002B0: 20 4C 20 28 49 4E 20 48 45 4E 52 59 29 20 3A 20 | L (IN HENRY) : | 000002C0: 22 3B 4C 00 C9 0A 54 01 8E 00 D9 0A 5E 01 8F 20 |";L...T.....^.. | 000002D0: 2A 2A 20 4D 45 4E 55 2A 2A 00 EF 0A 68 01 8D 20 |** MENU**...h.. | 000002E0: 31 37 30 20 3A 20 8F 20 2A 2A 4B 4F 50 2A 2A 00 |170 : . **KOP**.| 000002F0: 09 0B 72 01 99 22 11 11 20 4D 4F 47 45 4C 49 4A |..r..".. MOGELIJ| 00000300: 4B 48 45 44 45 4E 20 3A 22 00 34 0B 7C 01 99 22 |KHEDEN :".4.|.."| 00000310: 11 20 31 20 3A 20 56 45 52 41 4E 44 45 52 49 4E |. 1 : VERANDERIN| 00000320: 47 20 4B 4F 4D 50 4F 4E 45 4E 54 57 41 41 52 44 |G KOMPONENTWAARD| 00000330: 45 4E 2C 22 00 60 0B 86 01 99 22 11 20 32 20 3A |EN,".`....". 2 :| 00000340: 20 42 45 50 41 4C 49 4E 47 20 52 45 53 4F 4E 41 | BEPALING RESONA| 00000350: 4E 54 49 45 46 52 45 4B 57 45 4E 54 49 45 2C 22 |NTIEFREKWENTIE,"| 00000360: 00 82 0B 90 01 99 22 11 20 33 20 3A 20 42 45 50 |......". 3 : BEP| 00000370: 41 4C 49 4E 47 20 49 4D 50 45 44 41 4E 54 49 45 |ALING IMPEDANTIE| 00000380: 2C 22 00 A0 0B 9A 01 99 22 11 20 34 20 3A 20 45 |,"......". 4 : E| 00000390: 49 4E 44 45 20 50 52 4F 47 52 41 4D 4D 41 2E 22 |INDE PROGRAMMA."| 000003A0: 00 B4 0B A4 01 85 22 11 20 4B 45 55 5A 45 20 3A |......". KEUZE :| 000003B0: 20 22 3B 4B 00 CC 0B AE 01 8B 20 28 4B B1 30 29 | ";K...... (K.0)| 000003C0: AF 28 4B B3 35 29 20 A7 20 34 36 30 00 EA 0B B8 |.(K.5) . 460....| 000003D0: 01 99 22 11 11 20 20 20 56 45 52 4B 45 45 52 44 |..".. VERKEERD| 000003E0: 45 20 49 4E 56 4F 45 52 21 22 00 F4 0B C2 01 89 |E INVOER!"......| 000003F0: 20 34 32 30 00 FA 0B CC 01 8E 00 19 0C D6 01 8F | 420............| 00000400: 20 2A 2A 20 42 45 50 41 4C 49 4E 47 20 49 4D 50 | ** BEPALING IMP| 00000410: 45 44 41 4E 54 49 45 2A 2A 00 33 0C E0 01 58 B2 |EDANTIE**.3...X.| 00000420: 32 AC FF AC 46 AC 4C AB 31 AD 28 32 AC FF AC 46 |2...F.L.1.(2...F| 00000430: AC 43 29 00 44 0C F4 01 5A 31 B2 28 52 AE 32 29 |.C).D...Z1.(R.2)| 00000440: AA 58 AC 58 00 50 0C 08 02 5A B2 BA 28 5A 31 29 |.X.X.P...Z..(Z1)| 00000450: 00 73 0C 12 02 41 52 47 B2 31 38 30 AC C1 28 58 |.s...ARG.180..(X| 00000460: AD 52 29 AD FF 3A 20 8F 2A 49 4E 20 47 52 41 44 |.R)..: .*IN GRAD| 00000470: 45 4E 2A 00 79 0C 1C 02 8E 00 8B 0C 26 02 8F 20 |EN*.y.......&.. | 00000480: 2A 2A 55 49 54 56 4F 45 52 2A 2A 00 A1 0C 30 02 |**UITVOER**...0.| 00000490: 8D 20 31 37 30 20 3A 20 8F 20 2A 2A 4B 4F 50 2A |. 170 : . **KOP*| 000004A0: 2A 00 C6 0C 3A 02 8D 20 32 30 30 20 3A 20 8F 20 |*...:.. 200 : . | 000004B0: 2A 2A 20 54 45 4B 45 4E 20 53 43 48 41 4B 45 4C |** TEKEN SCHAKEL| 000004C0: 49 4E 47 20 2A 2A 00 D6 0C 44 02 99 22 11 11 20 |ING **...D..".. | 000004D0: 52 20 3D 22 3B 52 00 E3 0C 4E 02 43 31 B2 43 AC |R =";R...N.C1.C.| 000004E0: 31 45 36 00 06 0D 58 02 99 22 20 43 20 3D 22 3B |1E6...X.." C =";| 000004F0: 43 31 3B 22 55 46 22 2C 22 1D 1D 4C 20 3D 22 3B |C1;"UF","..L =";| 00000500: 4C 3B 22 48 11 22 00 11 0D 6C 02 99 22 20 46 22 |L;"H."...l.." F"| 00000510: 3B 00 22 0D 76 02 99 22 20 3D 22 3B 46 3B 22 48 |;.".v.." =";F;"H| 00000520: 5A 22 00 3B 0D 80 02 5A B2 B5 28 31 30 30 30 AC |Z".;...Z..(1000.| 00000530: 5A AA 30 2E 35 29 AD 31 30 30 30 00 63 0D 8A 02 |Z.0.5).1000.c...| 00000540: 99 22 11 20 49 4D 50 45 44 41 4E 54 49 45 20 3A |.". IMPEDANTIE :| 00000550: 20 4D 4F 44 55 4C 55 53 20 3D 22 3B 5A 3B 22 4F | MODULUS =";Z;"O| 00000560: 48 4D 22 00 80 0D 94 02 41 52 47 B2 B5 28 31 30 |HM".....ARG..(10| 00000570: 30 30 AC 41 52 47 AA 30 2E 35 29 AD 31 30 30 30 |00.ARG.0.5).1000| 00000580: 00 AC 0D 9E 02 99 22 20 20 20 20 20 20 20 20 20 |......" | 00000590: 20 20 20 20 41 52 47 55 4D 45 4E 54 20 3D 22 3B | ARGUMENT =";| 000005A0: 41 52 47 3B 22 47 52 41 44 45 4E 22 00 CA 0D A8 |ARG;"GRADEN"....| 000005B0: 02 99 22 11 11 20 47 45 45 46 20 3C 43 3E 20 56 |..".. GEEF <C> V| 000005C0: 4F 4F 52 20 4D 45 4E 55 2E 22 00 D3 0D B2 02 A1 |OOR MENU."......| 000005D0: 20 41 24 00 E6 0D BC 02 8B 20 41 24 B2 22 22 20 | A$...... A$."" | 000005E0: 20 A7 20 36 39 30 00 EC 0D C6 02 8E 00 FD 0D D0 | . 690..........| 000005F0: 02 8F 20 2A 2A 49 4E 56 4F 45 52 2A 2A 00 07 0E |.. **INVOER**...| 00000600: DA 02 8D 20 31 37 30 00 11 0E E4 02 8D 20 32 30 |... 170...... 20| 00000610: 30 00 1B 0E EE 02 8D 20 32 39 30 00 21 0E F8 02 |0...... 290.!...| 00000620: 8E 00 49 0E 02 03 8F 20 2A 2A 42 45 50 41 4C 49 |..I.... **BEPALI| 00000630: 4E 47 20 52 45 53 4F 4E 41 4E 54 49 45 46 52 45 |NG RESONANTIEFRE| 00000640: 4B 57 45 4E 54 49 45 2A 2A 00 5E 0E 0C 03 46 B2 |KWENTIE**.^...F.| 00000650: 31 AD 28 32 AC FF AC BA 28 4C AC 43 29 29 00 68 |1.(2....(L.C)).h| 00000660: 0E 16 03 8D 20 34 37 30 00 72 0E 20 03 8D 20 35 |.... 470.r. .. 5| 00000670: 35 30 00 78 0E 2A 03 8E 00 96 0E 34 03 8F 20 2A |50.x.*.....4.. *| 00000680: 2A 42 45 50 41 4C 49 4E 47 20 49 4D 50 45 44 41 |*BEPALING IMPEDA| 00000690: 4E 54 49 45 2A 2A 00 BF 0E 3E 03 85 22 11 11 20 |NTIE**...>..".. | 000006A0: 42 49 4A 20 57 45 4C 4B 45 20 46 52 45 4B 57 45 |BIJ WELKE FREKWE| 000006B0: 4E 54 49 45 20 28 48 5A 29 20 3A 20 22 3B 46 00 |NTIE (HZ) : ";F.| 000006C0: C9 0E 48 03 8D 20 34 37 30 00 D3 0E 52 03 8D 20 |..H.. 470...R.. | 000006D0: 35 35 30 00 D9 0E 5C 03 8E 00 00 00 |550...\..... |
....... ***SERIEKRING***.).... **INVOER*
*.3.... 720.B.(.. **MENU**.L.2.. 350.E.<
.. K . 70,100,130,160...F.. **VERANDEREN
KOMPONENTWAARDEN **...P.. 720 : . INVOE
R...Z.. 40.S.D.. ** BEPALING RESONANTIEF
REQUENTIE**...N.. 770...X.. 40...... **
BEPALING IMPEDANTIE**...... 820...... 40
... ...,.... **KOP**.M...."... ***S
ERIEKRING***".S.....Q.H.. **TEKENING SCH
AKELING**...R..".. WCCCCCC. .CCCCC
C."......" B".O...."
R B"......"
C.C C"......"
C.C".-...." L B".K.
..." WCCCCCC....CCCCCC.".Q.....T."..
** INVOER KOMPONENTWAARDEN**...6.. ".. R
(IN OHM) : ";R...@.." C (IN FARAD) : ";
C.C.J.." L (IN HENRY) : ";L.I.T...Y.^..
** MENU**...H.. 170 : . **KOP**...R.."..
MOGELIJKHEDEN :".4.|..". 1 : VERANDERIN
G KOMPONENTWAARDEN,".`....". 2 : BEPALIN
G RESONANTIEFREKWENTIE,"......". 3 : BEP
ALING IMPEDANTIE,". ....". 4 : EINDE PRO
GRAMMA."......". KEUZE : ";K.L.... (K.0)
.(K.5) . 460......".. VERKEERDE INVOER
!"...B.. 420...L.....V.. ** BEPALING IMP
EDANTIE**.3...X.2...F.L.1.(2...F.C).D...
Z1.(R.2).X.X.P...Z..(Z1).S...ARG.180.A(X
.R)..: .*IN GRADEN*.Y.......&.. **UITVOE
R**...0.. 170 : . **KOP**.F.:.. 200 : .
** TEKEN SCHAKELING **.V.D..".. R =";R..
.N.C1.C.1E6...X.." C =";C1;"UF","..L =";
L;"H."...L.." F";.".V.." =";F;"HZ".;...Z
..(1000.Z.0.5).1000.C....". IMPEDANTIE :
MODULUS =";Z;"OHM".....ARG..(1000.ARG.0
.5).1000......" ARGUMENT =";
ARG;"GRADEN".J....".. GEEF <C> VOOR MENU
.".S.... A$...... A$."" . 690...F.....P
.. **INVOER**...Z.. 170...... 200......
290.!.....I.... **BEPALING RESONANTIEFRE
KWENTIE**.^...F.1.(2....(L.C)).H.... 470
.R. .. 550.X.*.....4.. **BEPALING IMPEDA
NTIE**...>..".. BIJ WELKE FREKWENTIE (HZ
) : ";F.I.H.. 470.S.R.. 550.Y.\.....
> CLICK IMAGE PREVIEW FOR FULL MODAL