SPULEN
FILE INFORMATION
FILENAME(S): SPULEN
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-10-20 14:29:54
APPEARS ON: 2 disk(s)
FILE HASH
a21e3bf728d79a6d3b265560db274f32e18601e65663fcfe72adf80f9d05a6dd
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD LERN | SPULEN | PRG | Treasure Chest - Klaus Der Suhler | 32 | 8 | DOWNLOAD FILE |
| 145 | SPULEN | PRG | Treasure Chest - Plattfuss | 32 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..(....*********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 14 00 8F 2A 20 |********.O....* | 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 00000050: 76 08 1E 00 8F 2A 20 20 20 20 20 20 20 53 50 55 |v....* SPU| 00000060: 4C 45 4E 42 45 52 45 43 48 4E 55 4E 47 20 20 20 |LENBERECHNUNG | 00000070: 20 20 20 20 20 2A 00 9D 08 28 00 8F 2A 20 20 20 | *...(..* | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000090: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 C4 08 | *...| 000000A0: 32 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |2..*************| 000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000C0: 2A 2A 2A 2A 00 E5 08 3C 00 97 35 33 32 38 30 2C |****...<..53280,| 000000D0: 31 35 3A 97 35 33 32 38 31 2C 31 35 3A 97 36 35 |15:.53281,15:.65| 000000E0: 37 2C 31 32 38 00 FF 08 46 00 8D 31 35 30 3A 8F |7,128...F..150:.| 000000F0: 20 55 4E 54 45 52 50 52 4F 47 52 41 4D 4D 45 00 | UNTERPROGRAMME.| 00000100: 17 09 50 00 8D 32 32 30 3A 8F 20 45 52 4C 41 45 |..P..220:. ERLAE| 00000110: 55 54 45 52 55 4E 47 00 2A 09 5A 00 8D 34 39 30 |UTERUNG.*.Z..490| 00000120: 3A 8F 20 41 55 53 57 41 48 4C 00 4C 09 64 00 91 |:. AUSWAHL.L.d..| 00000130: 58 8D 36 30 30 2C 37 35 30 2C 39 30 30 3A 8F 20 |X.600,750,900:. | 00000140: 42 45 52 45 43 48 4E 55 4E 47 45 4E 00 58 09 6E |BERECHNUNGEN.X.n| 00000150: 00 8B 58 B2 30 A7 39 30 00 75 09 78 00 8D 31 30 |..X.0.90.u.x..10| 00000160: 36 30 3A 8F 20 57 45 49 54 45 52 45 20 42 45 52 |60:. WEITERE BER| 00000170: 2E 2F 45 4E 44 00 7D 09 82 00 89 39 30 00 83 09 |./END.}....90...| 00000180: 8C 00 3A 00 A8 09 96 00 8F 20 2A 20 2A 20 2A 20 |..:...... * * * | 00000190: 2A 20 55 4E 54 45 52 50 52 4F 47 52 41 4D 4D 45 |* UNTERPROGRAMME| 000001A0: 20 2A 20 2A 20 2A 20 2A 00 AE 09 A0 00 3A 00 CE | * * * *.....:..| 000001B0: 09 AA 00 96 A5 4B 28 44 4C 29 B2 BA 28 52 AC 52 |.....K(DL)..(R.R| 000001C0: AB 28 44 4C AB 58 30 29 AE 32 29 AA 59 30 00 DB |.(DL.X0).2).Y0..| 000001D0: 09 B4 00 4C 47 B2 BC 28 31 30 29 00 13 0A BE 00 |...LG..(10).....| 000001E0: 96 A5 45 52 28 58 29 B2 B5 28 58 AD 31 30 AE 28 |..ER(X)..(X.10.(| 000001F0: B5 28 BC 28 58 29 AD 4C 47 AB 32 29 29 AA 2E 35 |.(.(X).LG.2))..5| 00000200: 29 AC 31 30 AE 28 B5 28 BC 28 58 29 AD 4C 47 AB |).10.(.(.(X).LG.| 00000210: 32 29 29 00 19 0A C8 00 8E 00 1F 0A D2 00 3A 00 |2))...........:.| 00000220: 42 0A DC 00 8F 20 2A 20 2A 20 2A 20 2A 20 45 52 |B.... * * * * ER| 00000230: 4C 41 45 55 54 45 52 55 4E 47 20 2A 20 2A 20 2A |LAEUTERUNG * * *| 00000240: 20 2A 00 48 0A E6 00 3A 00 6C 0A F0 00 49 B2 31 | *.H...:.l...I.1| 00000250: 32 3A 99 22 93 22 3B A6 49 29 3B 22 1F 12 20 20 |2:.".";.I);".. | 00000260: 20 20 20 20 20 20 20 20 20 20 92 22 00 86 0A FA | ."....| 00000270: 00 99 A6 49 29 3B 22 12 20 4C 55 46 54 53 50 55 |...I);". LUFTSPU| 00000280: 4C 45 4E 20 92 22 00 A6 0A 04 01 99 A6 49 29 3B |LEN .".......I);| 00000290: 22 12 20 20 20 20 20 20 20 20 20 20 20 20 92 22 |". ."| 000002A0: 3A 99 3A 99 3A 99 00 D8 0A 0E 01 99 22 81 44 49 |:.:.:.......".DI| 000002B0: 45 20 48 45 52 53 54 45 4C 4C 55 4E 47 20 56 4F |E HERSTELLUNG VO| 000002C0: 4E 20 49 4E 44 55 4B 54 49 56 49 54 41 45 54 45 |N INDUKTIVITAETE| 000002D0: 4E 20 49 53 54 22 3A 99 00 09 0B 18 01 99 22 49 |N IST":......."I| 000002E0: 4E 20 44 45 52 20 48 4F 43 48 46 52 45 51 55 45 |N DER HOCHFREQUE| 000002F0: 4E 5A 54 45 43 48 4E 49 4B 20 45 42 45 4E 53 4F |NZTECHNIK EBENSO| 00000300: 20 48 41 45 55 2D 22 3A 99 00 27 0B 22 01 99 22 | HAEU-":..'.".."| 00000310: 46 49 47 20 57 49 45 20 53 43 48 57 49 45 52 49 |FIG WIE SCHWIERI| 00000320: 47 2E 22 3A 99 3A 99 00 5A 0B 2C 01 99 22 4D 49 |G.":.:..Z.,.."MI| 00000330: 54 20 20 44 49 45 53 45 4D 20 97 20 42 41 53 49 |T DIESEM . BASI| 00000340: 43 20 2D 20 4C 55 46 54 53 50 55 4C 45 4E 50 52 |C - LUFTSPULENPR| 00000350: 4F 47 52 41 4D 4D 81 22 3A 99 00 8C 0B 36 01 99 |OGRAMM.":....6..| 00000360: 22 4B 4F 45 4E 4E 45 4E 20 53 49 45 20 20 56 4F |"KOENNEN SIE VO| 00000370: 4E 20 97 45 49 4E 4C 41 47 49 47 45 4E 20 20 5A |N .EINLAGIGEN Z| 00000380: 59 4C 49 4E 44 45 52 20 2D 22 3A 99 00 BF 0B 40 |YLINDER -":....@| 00000390: 01 99 22 53 50 55 4C 45 4E 20 4F 48 4E 45 20 4B |.."SPULEN OHNE K| 000003A0: 45 52 4E 81 20 57 41 48 4C 57 45 49 53 45 20 44 |ERN. WAHLWEISE D| 000003B0: 45 52 45 4E 20 97 49 4E 44 55 4B 2D 22 3A 99 00 |EREN .INDUK-":..| 000003C0: F4 0B 4A 01 99 22 54 49 56 49 54 41 45 54 81 2C |..J.."TIVITAET.,| 000003D0: 97 20 57 49 4E 44 55 4E 47 53 5A 41 48 4C 81 20 |. WINDUNGSZAHL. | 000003E0: 4F 44 45 52 20 44 49 45 20 97 53 50 55 4C 45 4E |ODER DIE .SPULEN| 000003F0: 2D 22 3A 99 00 0E 0C 54 01 99 22 4C 41 45 4E 47 |-":....T.."LAENG| 00000400: 45 81 20 42 45 52 45 43 48 4E 45 4E 2E 22 00 18 |E. BERECHNEN."..| 00000410: 0C 5E 01 8D 31 31 37 30 00 50 0C 68 01 99 22 93 |.^..1170.P.h..".| 00000420: 1F A4 A4 A4 A4 A4 A4 A4 A4 22 3A 99 22 12 48 49 |.........":.".HI| 00000430: 4E 57 45 49 53 3A 92 20 20 20 20 20 20 20 20 20 |NWEIS:. | 00000440: 20 20 20 9C 57 49 43 48 54 49 47 A0 21 20 20 22 | .WICHTIG.! "| 00000450: 00 67 0C 72 01 99 A3 32 30 29 22 1F C5 C5 C5 C5 |.g.r...20)".....| 00000460: C5 C5 C5 C5 C5 11 22 00 99 0C 7C 01 99 22 81 44 |......"...|..".D| 00000470: 45 52 20 20 53 50 55 4C 45 4E 44 55 52 43 48 4D |ER SPULENDURCHM| 00000480: 45 53 53 45 52 20 20 53 4F 4C 4C 20 4D 49 4E 44 |ESSER SOLL MIND| 00000490: 45 53 54 45 4E 53 22 3A 99 00 CE 0C 86 01 99 22 |ESTENS":......."| 000004A0: 44 45 4E 20 95 46 55 45 4E 46 46 41 43 48 45 4E |DEN .FUENFFACHEN| 000004B0: 81 20 44 52 41 48 54 44 55 52 43 48 4D 45 53 53 |. DRAHTDURCHMESS| 000004C0: 45 52 20 48 41 42 45 4E 2E 22 3A 99 3A 99 00 01 |ER HABEN.":.:...| 000004D0: 0D 90 01 99 22 44 41 53 20 20 56 45 52 48 41 45 |...."DAS VERHAE| 000004E0: 4C 54 4E 49 53 20 20 95 53 50 55 4C 45 4E 44 55 |LTNIS .SPULENDU| 000004F0: 52 43 48 4D 45 53 53 45 52 20 20 81 5A 55 22 3A |RCHMESSER .ZU":| 00000500: 99 00 34 0D 9A 01 99 22 95 53 50 55 4C 45 4E 4C |..4....".SPULENL| 00000510: 41 45 4E 47 45 81 20 20 20 53 4F 4C 4C 54 45 20 |AENGE. SOLLTE | 00000520: 20 46 55 45 52 20 20 55 4B 57 2D 53 50 55 4C 45 | FUER UKW-SPULE| 00000530: 4E 22 3A 99 00 69 0D A4 01 99 22 5A 57 49 53 43 |N":..i...."ZWISC| 00000540: 48 45 4E 95 20 20 30 2E 37 81 20 55 4E 44 95 20 |HEN. 0.7. UND. | 00000550: 20 31 2E 35 2C 81 20 20 46 55 45 52 20 4B 57 2D | 1.5,. FUER KW-| 00000560: 53 50 55 4C 45 4E 22 3A 99 00 93 0D AE 01 99 22 |SPULEN":......."| 00000570: 5A 57 49 53 43 48 45 4E 95 20 30 2E 35 81 20 55 |ZWISCHEN. 0.5. U| 00000580: 4E 44 95 20 31 81 20 4C 49 45 47 45 4E 2E 22 3A |ND. 1. LIEGEN.":| 00000590: 99 3A 99 00 C5 0D B8 01 99 22 42 45 49 20 55 4B |.:......."BEI UK| 000005A0: 57 2D 53 50 55 4C 45 4E 20 53 4F 4C 4C 20 44 45 |W-SPULEN SOLL DE| 000005B0: 52 20 95 57 49 4E 44 55 4E 47 53 41 42 53 54 41 |R .WINDUNGSABSTA| 000005C0: 4E 44 22 3A 99 00 F1 0D C2 01 99 22 47 4C 45 49 |ND":......."GLEI| 000005D0: 43 48 20 44 45 4D 20 44 52 41 48 54 44 55 52 43 |CH DEM DRAHTDURC| 000005E0: 48 4D 45 53 53 45 52 81 20 53 45 49 4E 2E 22 3A |HMESSER. SEIN.":| 000005F0: 99 00 FB 0D CC 01 8D 31 31 37 30 00 01 0E D6 01 |.......1170.....| 00000600: 8E 00 07 0E E0 01 3A 00 2D 0E EA 01 8F 20 2A 20 |......:.-.... * | 00000610: 2A 20 2A 20 2A 20 2A 20 2A 20 41 55 53 57 41 48 |* * * * * AUSWAH| 00000620: 4C 20 2A 20 2A 20 2A 20 2A 20 2A 20 2A 00 33 0E |L * * * * * *.3.| 00000630: F4 01 3A 00 5C 0E FE 01 99 22 93 11 11 11 11 11 |..:.\...."......| 00000640: 1F 53 49 45 20 4B 4F 45 4E 4E 45 4E 20 42 45 52 |.SIE KOENNEN BER| 00000650: 45 43 48 4E 45 4E 3A 22 3A 99 3A 99 00 86 0E 08 |ECHNEN:":.:.....| 00000660: 02 99 22 1E 20 20 20 20 20 20 49 4E 44 55 4B 54 |..". INDUKT| 00000670: 49 56 49 54 41 45 54 20 20 20 3D 20 20 20 12 20 |IVITAET = . | 00000680: 31 20 92 22 3A 99 00 B0 0E 12 02 99 22 1E 20 20 |1 .":.......". | 00000690: 20 20 20 20 57 49 4E 44 55 4E 47 53 5A 41 48 4C | WINDUNGSZAHL| 000006A0: 20 20 20 20 3D 20 20 20 12 20 32 20 92 22 3A 99 | = . 2 .":.| 000006B0: 00 DC 0E 1C 02 99 22 1E 20 20 20 20 20 20 53 50 |......". SP| 000006C0: 55 4C 45 4E 4C 41 45 4E 47 45 20 20 20 20 3D 20 |ULENLAENGE = | 000006D0: 20 20 12 20 33 20 92 22 3A 99 3A 99 00 06 0F 26 | . 3 .":.:....&| 000006E0: 02 99 22 1F 57 45 4C 43 48 45 20 4D 4F 45 47 4C |..".WELCHE MOEGL| 000006F0: 49 43 48 4B 45 49 54 20 57 41 45 48 4C 45 4E 20 |ICHKEIT WAEHLEN | 00000700: 53 49 45 20 3F 22 00 19 0F 30 02 A1 58 24 3A 8B |SIE ?"...0..X$:.| 00000710: 58 24 B2 22 22 A7 35 36 30 00 32 0F 3A 02 58 B2 |X$."".560.2.:.X.| 00000720: C5 28 58 24 29 3A 8B 58 B3 31 B0 58 B1 33 A7 58 |.(X$):.X.1.X.3.X| 00000730: B2 30 00 38 0F 44 02 8E 00 3E 0F 4E 02 3A 00 64 |.0.8.D...>.N.:.d| 00000740: 0F 58 02 8F 2A 2A 2A 20 42 45 52 45 43 48 4E 55 |.X..*** BERECHNU| 00000750: 4E 47 20 49 4E 44 55 4B 54 49 56 49 54 41 45 54 |NG INDUKTIVITAET| 00000760: 20 2A 2A 2A 00 6A 0F 62 02 3A 00 84 0F 6C 02 99 | ***.j.b.:...l..| 00000770: 22 93 1F 47 45 42 45 4E 20 53 49 45 20 45 49 4E |"..GEBEN SIE EIN| 00000780: 3A 22 3A 99 00 AD 0F 76 02 85 22 1E 57 49 4E 44 |:":....v..".WIND| 00000790: 55 4E 47 53 5A 41 48 4C 20 20 5B 57 49 4E 44 55 |UNGSZAHL [WINDU| 000007A0: 4E 47 45 4E 5D 3A 81 20 22 3B 57 3A 99 00 D7 0F |NGEN]:. ";W:....| 000007B0: 80 02 85 22 1E 53 50 55 4C 45 4E 4C 41 45 4E 47 |...".SPULENLAENG| 000007C0: 45 20 20 20 20 20 20 20 5B 20 43 4D 20 5D 3A 81 |E [ CM ]:.| 000007D0: 20 22 3B 53 4C 3A 99 00 03 10 8A 02 85 22 1E 53 | ";SL:.......".S| 000007E0: 50 55 4C 45 4E 44 55 52 43 48 4D 45 53 53 45 52 |PULENDURCHMESSER| 000007F0: 20 20 5B 20 43 4D 20 5D 3A 81 20 22 3B 53 44 3A | [ CM ]:. ";SD:| 00000800: 99 3A 99 00 10 10 94 02 44 4C B2 53 44 AD 53 4C |.:......DL.SD.SL| 00000810: 00 28 10 9E 02 8B 44 4C B1 B2 2E 30 31 AF 44 4C |.(....DL...01.DL| 00000820: B3 B2 31 30 A7 36 39 30 00 37 10 A8 02 8D 31 31 |..10.690.7....11| 00000830: 33 30 3A 89 36 30 30 00 67 10 B2 02 8B 44 4C B1 |30:.600.g....DL.| 00000840: B2 2E 30 31 AF 44 4C B3 B2 31 A7 52 B2 35 36 2E |..01.DL..1.R.56.| 00000850: 31 30 32 3A 58 30 B2 35 35 2E 38 37 32 3A 59 30 |102:X0.55.872:Y0| 00000860: B2 AB 35 2E 30 38 33 00 94 10 BC 02 8B 44 4C B1 |..5.083......DL.| 00000870: 31 AF 44 4C B3 B2 31 30 A7 52 B2 32 30 2E 37 31 |1.DL..10.R.20.71| 00000880: 33 3A 58 30 B2 32 31 2E 33 33 36 3A 59 30 B2 32 |3:X0.21.336:Y0.2| 00000890: 2E 36 36 34 00 B2 10 C6 02 4C B2 A5 45 52 28 A5 |.664.....L..ER(.| 000008A0: 4B 28 44 4C 29 AC 57 AC 57 AC 53 44 AC 31 45 AB |K(DL).W.W.SD.1E.| 000008B0: 39 29 00 D6 10 D0 02 99 22 90 49 4E 44 55 4B 54 |9)......".INDUKT| 000008C0: 49 56 49 54 41 45 54 3A 81 20 22 3B 4C 3B 22 90 |IVITAET:. ";L;".| 000008D0: 48 22 3A 99 3A 99 00 DC 10 DA 02 8E 00 E2 10 E4 |H":.:...........| 000008E0: 02 3A 00 08 11 EE 02 8F 20 2A 2A 2A 20 42 45 52 |.:...... *** BER| 000008F0: 45 43 48 4E 55 4E 47 20 57 49 4E 44 55 4E 47 53 |ECHNUNG WINDUNGS| 00000900: 5A 41 48 4C 20 2A 2A 2A 00 0E 11 F8 02 3A 00 28 |ZAHL ***.....:.(| 00000910: 11 02 03 99 22 93 1F 47 45 42 45 4E 20 53 49 45 |...."..GEBEN SIE| 00000920: 20 45 49 4E 3A 22 3A 99 00 59 11 0C 03 85 22 1E | EIN:":..Y....".| 00000930: 49 4E 44 55 4B 54 49 56 49 54 41 45 54 20 20 20 |INDUKTIVITAET | 00000940: 20 20 20 5B 20 48 20 5D 3A 81 20 20 22 3B 4C 3A | [ H ]:. ";L:| 00000950: 4C B2 4C AC 31 45 39 3A 99 00 83 11 16 03 85 22 |L.L.1E9:......."| 00000960: 1E 53 50 55 4C 45 4E 4C 41 45 4E 47 45 20 20 20 |.SPULENLAENGE | 00000970: 20 20 20 20 5B 20 43 4D 20 5D 3A 81 20 22 3B 53 | [ CM ]:. ";S| 00000980: 4C 3A 99 00 AF 11 20 03 85 22 1E 53 50 55 4C 45 |L:.... ..".SPULE| 00000990: 4E 44 55 52 43 48 4D 45 53 53 45 52 20 20 5B 20 |NDURCHMESSER [ | 000009A0: 43 4D 20 5D 3A 81 20 22 3B 53 44 3A 99 3A 99 00 |CM ]:. ";SD:.:..| 000009B0: BC 11 2A 03 44 4C B2 53 44 AD 53 4C 00 D4 11 34 |..*.DL.SD.SL...4| 000009C0: 03 8B 44 4C B1 B2 2E 30 31 AF 44 4C B3 B2 31 30 |..DL...01.DL..10| 000009D0: A7 38 34 30 00 E3 11 3E 03 8D 31 31 33 30 3A 89 |.840...>..1130:.| 000009E0: 37 35 30 00 13 12 48 03 8B 44 4C B1 B2 2E 30 31 |750...H..DL...01| 000009F0: AF 44 4C B3 B2 31 A7 52 B2 35 36 2E 31 30 32 3A |.DL..1.R.56.102:| 00000A00: 58 30 B2 35 35 2E 38 37 32 3A 59 30 B2 AB 35 2E |X0.55.872:Y0..5.| 00000A10: 30 38 33 00 40 12 52 03 8B 44 4C B1 31 AF 44 4C |083.@.R..DL.1.DL| 00000A20: B3 B2 31 30 A7 52 B2 32 30 2E 37 31 33 3A 58 30 |..10.R.20.713:X0| 00000A30: B2 32 31 2E 33 33 36 3A 59 30 B2 32 2E 36 36 34 |.21.336:Y0.2.664| 00000A40: 00 5C 12 5C 03 57 B2 A5 45 52 28 BA 28 4C AD 28 |.\.\.W..ER(.(L.(| 00000A50: A5 4B 28 44 4C 29 AC 53 44 29 29 29 00 81 12 66 |.K(DL).SD)))...f| 00000A60: 03 99 22 90 57 49 4E 44 55 4E 47 53 5A 41 48 4C |..".WINDUNGSZAHL| 00000A70: 3A 81 20 22 3B 57 3B 22 90 57 44 47 22 3A 99 3A |:. ";W;".WDG":.:| 00000A80: 99 00 87 12 70 03 8E 00 8D 12 7A 03 3A 00 B3 12 |....p.....z.:...| 00000A90: 84 03 8F 20 2A 2A 2A 20 42 45 52 45 43 48 4E 55 |... *** BERECHNU| 00000AA0: 4E 47 20 53 50 55 4C 45 4E 4C 41 45 4E 47 45 20 |NG SPULENLAENGE | 00000AB0: 2A 2A 2A 00 B9 12 8E 03 3A 00 D3 12 98 03 99 22 |***.....:......"| 00000AC0: 93 1F 47 45 42 45 4E 20 53 49 45 20 45 49 4E 3A |..GEBEN SIE EIN:| 00000AD0: 22 3A 99 00 04 13 A2 03 85 22 1E 49 4E 44 55 4B |":.......".INDUK| 00000AE0: 54 49 56 49 54 41 45 54 20 20 20 20 20 20 20 5B |TIVITAET [| 00000AF0: 20 48 20 5D 3A 81 20 22 3B 4C 3A 4C B2 4C AC 31 | H ]:. ";L:L.L.1| 00000B00: 45 39 3A 99 00 2D 13 AC 03 85 22 1E 57 49 4E 44 |E9:..-....".WIND| 00000B10: 55 4E 47 53 5A 41 48 4C 20 20 5B 57 49 4E 44 55 |UNGSZAHL [WINDU| 00000B20: 4E 47 45 4E 5D 3A 81 20 22 3B 57 3A 99 00 59 13 |NGEN]:. ";W:..Y.| 00000B30: B6 03 85 22 1E 53 50 55 4C 45 4E 44 55 52 43 48 |...".SPULENDURCH| 00000B40: 4D 45 53 53 45 52 20 20 5B 20 43 4D 20 5D 3A 81 |MESSER [ CM ]:.| 00000B50: 20 22 3B 53 44 3A 99 3A 99 00 6A 13 C0 03 4B B2 | ";SD:.:..j...K.| 00000B60: 4C AD 28 57 AC 57 AC 53 44 29 00 80 13 CA 03 8B |L.(W.W.SD)......| 00000B70: 4B B1 B2 2E 31 AF 4B B3 B2 32 30 A7 31 30 30 30 |K...1.K..20.1000| 00000B80: 00 B2 13 D4 03 99 22 1F 12 20 44 49 45 20 57 45 |......".. DIE WE| 00000B90: 52 54 45 2C 20 44 49 45 20 53 49 45 20 41 4E 47 |RTE, DIE SIE ANG| 00000BA0: 45 47 45 42 45 4E 20 48 41 42 45 4E 2C 4C 49 45 |EGEBEN HABEN,LIE| 00000BB0: 2D 22 00 C1 13 DE 03 8D 31 31 35 30 3A 89 39 30 |-"......1150:.90| 00000BC0: 30 00 F0 13 E8 03 8B 4B B1 B2 2E 31 AF 4B B3 B2 |0......K...1.K..| 00000BD0: 36 2E 35 A7 52 B2 35 36 2E 31 30 32 3A 58 30 B2 |6.5.R.56.102:X0.| 00000BE0: 35 35 2E 38 37 32 3A 59 30 B2 AB 35 2E 30 38 33 |55.872:Y0..5.083| 00000BF0: 00 1D 14 F2 03 8B 4B B1 36 2E 35 AF 4B B3 B2 32 |......K.6.5.K..2| 00000C00: 30 A7 52 B2 32 30 2E 37 31 33 3A 58 30 B2 32 31 |0.R.20.713:X0.21| 00000C10: 2E 33 33 36 3A 59 30 B2 32 2E 36 36 34 00 41 14 |.336:Y0.2.664.A.| 00000C20: FC 03 53 4C B2 A5 45 52 28 53 44 AD 28 58 30 AB |..SL..ER(SD.(X0.| 00000C30: BA 28 52 AC 52 AB 28 4B AB 59 30 29 AE 32 29 29 |.(R.R.(K.Y0).2))| 00000C40: 29 00 65 14 06 04 99 22 1F 53 50 55 4C 45 4E 4C |).e....".SPULENL| 00000C50: 41 45 4E 47 45 3A 81 20 22 3B 53 4C 3B 22 43 4D |AENGE:. ";SL;"CM| 00000C60: 22 3A 99 3A 99 00 6B 14 10 04 8E 00 71 14 1A 04 |":.:..k.....q...| 00000C70: 3A 00 97 14 24 04 8F 2A 20 2A 20 2A 20 2A 20 57 |:...$..* * * * W| 00000C80: 45 49 54 45 52 45 20 42 45 52 2E 2F 45 4E 44 20 |EITERE BER./END | 00000C90: 2A 20 2A 20 2A 20 2A 00 9D 14 2E 04 3A 00 C2 14 |* * * *.....:...| 00000CA0: 38 04 99 22 1E 57 45 49 54 45 52 45 20 42 45 52 |8..".WEITERE BER| 00000CB0: 45 43 48 4E 55 4E 47 45 4E 3F 20 20 28 4A 2F 4E |ECHNUNGEN? (J/N| 00000CC0: 29 22 00 D6 14 42 04 A1 58 24 3A 8B 58 24 B2 22 |)"...B..X$:.X$."| 00000CD0: 22 A7 31 30 39 30 00 E4 14 4C 04 8B 58 24 B2 22 |".1090...L..X$."| 00000CE0: 4A 22 A7 8E 00 F4 14 56 04 8B 58 24 B2 22 4E 22 |J".....V..X$."N"| 00000CF0: A7 9C 3A 80 00 FE 14 60 04 89 31 30 39 30 00 31 |..:....`..1090.1| 00000D00: 15 6A 04 99 22 1F 12 20 44 49 45 20 57 45 52 54 |.j..".. DIE WERT| 00000D10: 45 2C 20 44 49 45 20 53 49 45 20 20 46 55 45 52 |E, DIE SIE FUER| 00000D20: 20 20 53 50 55 4C 45 4E 4C 41 45 4E 47 45 22 3A | SPULENLAENGE":| 00000D30: 99 00 63 15 74 04 99 22 12 55 4E 44 20 2D 44 55 |..c.t..".UND -DU| 00000D40: 52 43 48 4D 45 53 53 45 52 20 20 41 4E 47 45 47 |RCHMESSER ANGEG| 00000D50: 45 42 45 4E 20 48 41 42 45 4E 2C 20 4C 49 45 2D |EBEN HABEN, LIE-| 00000D60: 22 3A 99 00 91 15 7E 04 99 22 12 46 45 52 4E 20 |":....~..".FERN | 00000D70: 4B 45 49 4E 45 20 53 49 4E 4E 56 4F 4C 4C 45 4E |KEINE SINNVOLLEN| 00000D80: 20 45 52 47 45 42 4E 49 53 53 45 21 20 92 22 3A | ERGEBNISSE! .":| 00000D90: 99 00 B5 15 88 04 99 22 11 11 9C 42 49 54 54 45 |......."...BITTE| 00000DA0: 20 4E 45 55 45 49 4E 47 41 42 45 21 22 3A 8D 31 | NEUEINGABE!":.1| 00000DB0: 31 37 30 3A 8E 00 DF 15 92 04 99 A3 33 31 29 3B |170:........31);| 00000DC0: 22 1E 20 A4 A4 A4 A4 A4 A4 20 22 3A 99 A3 33 31 |". ...... ":..31| 00000DD0: 29 3B 22 1E 3C 12 52 45 54 55 52 4E 92 3E 22 00 |);".<.RETURN.>".| 00000DE0: F3 15 9C 04 A1 58 24 3A 8B 58 24 B2 22 22 A7 31 |.....X$:.X$."".1| 00000DF0: 31 38 30 00 07 16 A6 04 8B C6 28 58 24 29 B3 B1 |180.......(X$)..| 00000E00: 31 33 A7 31 31 38 30 00 0D 16 B0 04 8E 00 32 16 |13.1180.......2.| 00000E10: BA 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************| 00000E20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000E30: 2A 2A 00 57 16 C4 04 8F 2A 20 20 20 20 20 20 20 |**.W....* | 00000E40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000E50: 20 20 20 20 20 20 2A 00 7C 16 CE 04 8F 2A 20 20 | *.|....* | 00000E60: 50 52 4F 47 52 41 4D 4D 4C 41 45 4E 47 45 20 33 |PROGRAMMLAENGE 3| 00000E70: 37 38 31 20 42 59 54 45 53 20 20 2A 00 A1 16 D8 |781 BYTES *....| 00000E80: 04 8F 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |..* | 00000E90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000EA0: 2A 00 C6 16 E2 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*......*********| 00000EB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000EC0: 2A 2A 2A 2A 2A 2A 00 00 00 00 |******.... |
..(....*********************************
.O....* *.
V....* SPULENBERECHNUNG *..
.(..* *.D.
2..*********************************...<
..53280,15:.53281,15:.657,128...F..150:.
UNTERPROGRAMME...P..220:. ERLAEUTERUNG.
*.Z..490:. AUSWAHL.L.D..X.600,750,900:.
BERECHNUNGEN.X.N..X.0.90.U.X..1060:. WEI
TERE BER./END.}....90.....:...... * * *
* UNTERPROGRAMME * * * *... .:.N.....K(D
L)..(R.R.(DL.X0).2).Y0.....LG..(10).....
..ER(X)..(X.10.(.(.(X).LG.2))..5).10.(.(
.(X).LG.2))...H.....R.:.B.... * * * * ER
LAEUTERUNG * * * *.H...:.L...I.12:.".";.
I);".. .".......I);". LUFTSPU
LEN .".......I);". .":.:.:..X
....".DIE HERSTELLUNG VON INDUKTIVITAETE
N IST":......."IN DER HOCHFREQUENZTECHNI
K EBENSO HAEU-":..'.".."FIG WIE SCHWIERI
G.":.:..Z.,.."MIT DIESEM . BASIC - LUFT
SPULENPROGRAMM.":....6.."KOENNEN SIE VO
N .EINLAGIGEN ZYLINDER -":....@.."SPULE
N OHNE KERN. WAHLWEISE DEREN .INDUK-":..
..J.."TIVITAET.,. WINDUNGSZAHL. ODER DIE
.SPULEN-":....T.."LAENGE. BERECHNEN."..
.^..1170.P.H.."..........":.".HINWEIS:.
.WICHTIG ! ".G.R...20)".EEEE
EEEEE."...|..".DER SPULENDURCHMESSER S
OLL MINDESTENS":..N...."DEN .FUENFFACHEN
. DRAHTDURCHMESSER HABEN.":.:......."DAS
VERHAELTNIS .SPULENDURCHMESSER .ZU":
..4....".SPULENLAENGE. SOLLTE FUER U
KW-SPULEN":..I...."ZWISCHEN. 0.7. UND.
1.5,. FUER KW-SPULEN":......."ZWISCHEN
. 0.5. UND. 1. LIEGEN.":.:..E...."BEI UK
W-SPULEN SOLL DER .WINDUNGSABSTAND":....
B.."GLEICH DEM DRAHTDURCHMESSER. SEIN.":
....L..1170...V.......:.-.... * * * * *
* AUSWAHL * * * * * *.3...:.\...."......
.SIE KOENNEN BERECHNEN:":.:.......".
INDUKTIVITAET = . 1 .":.......".
WINDUNGSZAHL = . 2 .":.......".
SPULENLAENGE = . 3 .":.:....&
..".WELCHE MOEGLICHKEIT WAEHLEN SIE ?"..
.0..X$:.X$."".560.2.:.X.E(X$):.X.1.X.3.X
.0.8.D...>.N.:.D.X..*** BERECHNUNG INDUK
TIVITAET ***.J.B.:...L.."..GEBEN SIE EIN
:":....V..".WINDUNGSZAHL [WINDUNGEN]:.
";W:..W....".SPULENLAENGE [ CM ]:.
";SL:.......".SPULENDURCHMESSER [ CM ]
:. ";SD:.:......DL.SD.SL.(....DL...01.DL
..10.690.7....1130:.600.G....DL...01.DL.
.1.R.56.102:X0.55.872:Y0..5.083......DL.
1.DL..10.R.20.713:X0.21.336:Y0.2.664...F
.L..ER(.K(DL).W.W.SD.1E.9).V.P..".INDUKT
IVITAET:. ";L;".H":.:....Z.......:......
*** BERECHNUNG WINDUNGSZAHL ***.....:.(
...."..GEBEN SIE EIN:":..Y....".INDUKTIV
ITAET [ H ]:. ";L:L.L.1E9:......."
.SPULENLAENGE [ CM ]:. ";SL:.... .
.".SPULENDURCHMESSER [ CM ]:. ";SD:.:..
..*.DL.SD.SL.T.4..DL...01.DL..10.840...>
..1130:.750...H..DL...01.DL..1.R.56.102:
X0.55.872:Y0..5.083.@.R..DL.1.DL..10.R.2
0.713:X0.21.336:Y0.2.664.\.\.W..ER(.(L.(
.K(DL).SD)))...F..".WINDUNGSZAHL:. ";W;"
.WDG":.:....P.....Z.:...... *** BERECHNU
NG SPULENLAENGE ***.....:.S...."..GEBEN
SIE EIN:":.......".INDUKTIVITAET [
H ]:. ";L:L.L.1E9:..-....".WINDUNGSZAHL
[WINDUNGEN]:. ";W:..Y....".SPULENDURCH
MESSER [ CM ]:. ";SD:.:..J...K.L.(W.W.S
D)...J..K...1.K..20.1000...T..".. DIE WE
RTE, DIE SIE ANGEGEBEN HABEN,LIE-".A....
1150:.900......K...1.K..6.5.R.56.102:X0.
55.872:Y0..5.083......K.6.5.K..20.R.20.7
13:X0.21.336:Y0.2.664.A...SL..ER(SD.(X0.
.(R.R.(K.Y0).2))).E....".SPULENLAENGE:.
";SL;"CM":.:..K.....Q...:...$..* * * * W
EITERE BER./END * * * *.....:.B.8..".WEI
TERE BERECHNUNGEN? (J/N)".V.B..X$:.X$."
".1090...L..X$."J".....V..X$."N"..:....`
..1090.1.J..".. DIE WERTE, DIE SIE FUER
SPULENLAENGE":..C.T..".UND -DURCHMESSE
R ANGEGEBEN HABEN, LIE-":....~..".FERN
KEINE SINNVOLLEN ERGEBNISSE! .":......."
...BITTE NEUEINGABE!":.1170:........31);
". ...... ":..31);".<.RETURN.>"......X$:
.X$."".1180......F(X$)..13.1180.......2.
...*******************************.W.D..
* *.|.N..*
PROGRAMMLAENGE 3781 BYTES *...X..*
*.F....*********
**********************....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL