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

WEERSTANDBER.

FILE INFORMATION

FILENAME(S): WEERSTANDBER.

FILE TYPE(S): PRG

FILE SIZE: 2.8K

FIRST SEEN: 2025-11-30 21:09:29

APPEARS ON: 1 disk(s)

FILE HASH

d029a0c7421713055e9a10fa58e4716e78bd0665a6ed0de87213cc7acf682c81

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
HULPPROGRAM WEERSTANDBER. PRG DuncanTwain 4 11 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 07 08 01 00 99 00  24 08 02 00 99 22 57 49  |........$...."WI|
00000010: 44 45 52 53 54 41 4E 44  53 42 45 52 45 43 48 4E  |DERSTANDSBERECHN|
00000020: 55 4E 47 22 00 2A 08 03  00 99 00 4A 08 04 00 99  |UNG".*.....J....|
00000030: 22 44 52 55 45 43 4B 45  27 31 27 46 55 45 52 20  |"DRUECKE'1'FUER |
00000040: 46 41 52 42 45 3D 4F 48  4D 22 00 50 08 05 00 99  |FARBE=OHM".P....|
00000050: 00 70 08 06 00 99 22 44  52 55 45 43 4B 45 27 32  |.p...."DRUECKE'2|
00000060: 27 46 55 45 52 20 4F 48  4D 3D 46 41 52 42 45 22  |'FUER OHM=FARBE"|
00000070: 00 77 08 07 00 85 4C 00  83 08 08 00 8B 4C B2 31  |.w....L......L.1|
00000080: A7 31 30 00 91 08 09 00  8B 4C B2 32 A7 31 31 39  |.10......L.2.119|
00000090: 30 00 9A 08 0A 00 99 22  93 22 00 A0 08 0B 00 99  |0......"."......|
000000A0: 00 C1 08 0D 00 8F 20 46  41 52 42 43 4F 44 45 20  |...... FARBCODE |
000000B0: 46 55 45 52 20 57 49 44  45 52 53 54 41 45 4E 44  |FUER WIDERSTAEND|
000000C0: 45 00 EC 08 14 00 8F 20  44 49 45 53 45 53 20 50  |E...... DIESES P|
000000D0: 52 4F 47 52 41 4D 4D 20  42 45 52 45 43 48 4E 45  |ROGRAMM BERECHNE|
000000E0: 54 20 41 4E 48 41 4E 44  20 44 45 52 00 12 09 1E  |T ANHAND DER....|
000000F0: 00 8F 20 46 41 52 42 45  49 4E 47 41 42 45 20 44  |.. FARBEINGABE D|
00000100: 45 4E 20 57 49 44 45 52  53 54 41 4E 44 53 57 45  |EN WIDERSTANDSWE|
00000110: 52 54 00 18 09 C8 00 99  00 1E 09 D2 00 99 00 49  |RT.............I|
00000120: 09 DC 00 99 22 44 49 45  53 45 53 20 50 52 4F 47  |...."DIESES PROG|
00000130: 52 41 4D 4D 20 42 45 52  45 43 48 4E 45 54 20 41  |RAMM BERECHNET A|
00000140: 4E 48 41 4E 44 20 44 45  52 00 71 09 E6 00 99 22  |NHAND DER.q...."|
00000150: 46 41 52 42 45 49 4E 47  41 42 45 20 44 45 4E 20  |FARBEINGABE DEN |
00000160: 57 49 44 45 52 53 54 41  4E 44 53 57 45 52 54 2E  |WIDERSTANDSWERT.|
00000170: 22 00 77 09 7C 01 99 00  7D 09 86 01 99 00 AC 09  |".w.|...}.......|
00000180: 90 01 99 22 45 49 4E 47  41 42 45 20 44 45 53 20  |..."EINGABE DES |
00000190: 46 41 52 42 43 4F 44 45  53 2E 54 52 45 4E 4E 45  |FARBCODES.TRENNE|
000001A0: 20 4A 45 44 45 20 46 41  52 42 2D 22 00 C7 09 9A  | JEDE FARB-"....|
000001B0: 01 99 22 45 49 4E 47 41  42 45 20 44 55 52 43 48  |.."EINGABE DURCH|
000001C0: 20 4B 4F 4D 4D 41 2E 00  CD 09 9F 01 99 00 FC 09  | KOMMA..........|
000001D0: A4 01 99 22 49 53 54 20  4B 45 49 4E 45 20 54 4F  |..."IST KEINE TO|
000001E0: 4C 45 52 41 4E 5A 41 4E  47 41 42 45 20 56 4F 52  |LERANZANGABE VOR|
000001F0: 48 41 4E 44 45 4E 2C 47  45 42 45 22 00 0E 0A AE  |HANDEN,GEBE"....|
00000200: 01 99 22 27 4E 45 49 4E  27 45 49 4E 2E 22 00 14  |.."'NEIN'EIN."..|
00000210: 0A B3 01 99 00 25 0A B8  01 85 41 24 2C 42 24 2C  |.....%....A$,B$,|
00000220: 43 24 2C 44 24 00 2F 0A  C2 01 58 24 B2 41 24 00  |C$,D$./...X$.A$.|
00000230: 38 0A CC 01 8D 35 34 31  00 40 0A D6 01 41 B2 58  |8....541.@...A.X|
00000240: 00 4A 0A E0 01 58 24 B2  42 24 00 53 0A EA 01 8D  |.J...X$.B$.S....|
00000250: 35 34 31 00 5B 0A F4 01  42 B2 58 00 65 0A FE 01  |541.[...B.X.e...|
00000260: 58 24 B2 43 24 00 6E 0A  08 02 8D 35 34 31 00 76  |X$.C$.n....541.v|
00000270: 0A 12 02 43 B2 58 00 7C  0A 17 02 99 00 85 0A 1C  |...C.X.|........|
00000280: 02 89 38 37 30 00 9A 0A  1D 02 8B 58 24 B2 22 53  |..870......X$."S|
00000290: 49 4C 42 45 52 22 A7 36  36 31 00 AD 0A 1E 02 8B  |ILBER".661......|
000002A0: 58 24 B2 22 47 4F 4C 44  22 A7 36 36 33 00 C3 0A  |X$."GOLD".663...|
000002B0: 26 02 8B 58 24 B2 22 53  43 48 57 41 52 5A 22 A7  |&..X$."SCHWARZ".|
000002C0: 36 37 30 00 D7 0A 30 02  8B 58 24 B2 22 42 52 41  |670...0..X$."BRA|
000002D0: 55 4E 22 A7 36 39 30 00  E9 0A 3A 02 8B 58 24 B2  |UN".690...:..X$.|
000002E0: 22 52 4F 54 22 A7 37 31  30 00 FE 0A 44 02 8B 58  |"ROT".710...D..X|
000002F0: 24 B2 22 4F 52 41 4E 47  45 22 A7 37 33 30 00 11  |$."ORANGE".730..|
00000300: 0B 4E 02 8B 58 24 B2 22  47 45 4C 42 22 A7 37 35  |.N..X$."GELB".75|
00000310: 30 00 25 0B 58 02 8B 58  24 B2 22 47 52 55 45 4E  |0.%.X..X$."GRUEN|
00000320: 22 A7 37 37 30 00 38 0B  62 02 8B 58 24 B2 22 42  |".770.8.b..X$."B|
00000330: 4C 41 55 22 A7 37 39 30  00 4E 0B 6C 02 8B 58 24  |LAU".790.N.l..X$|
00000340: B2 22 56 49 4F 4C 45 54  54 22 A7 38 31 30 00 61  |."VIOLETT".810.a|
00000350: 0B 76 02 8B 58 24 B2 22  47 52 41 55 22 A7 38 33  |.v..X$."GRAU".83|
00000360: 30 00 75 0B 80 02 8B 58  24 B2 22 57 45 49 53 53  |0.u....X$."WEISS|
00000370: 22 A7 38 35 30 00 7B 0B  85 02 99 00 96 0B 8A 02  |".850.{.........|
00000380: 99 22 55 4E 47 45 45 49  47 4E 45 54 45 20 45 49  |."UNGEEIGNETE EI|
00000390: 4E 47 41 42 45 22 00 9C  0B 94 02 90 00 A5 0B 95  |NGABE"..........|
000003A0: 02 58 B2 AB 32 00 AE 0B  96 02 89 38 36 30 00 B7  |.X..2......860..|
000003B0: 0B 97 02 58 B2 AB 31 00  C0 0B 98 02 89 38 36 30  |...X..1......860|
000003C0: 00 C8 0B 9E 02 58 B2 30  00 D1 0B A8 02 89 38 36  |.....X.0......86|
000003D0: 30 00 D9 0B B2 02 58 B2  31 00 E2 0B BC 02 89 38  |0.....X.1......8|
000003E0: 36 30 00 EA 0B C6 02 58  B2 32 00 F3 0B D0 02 89  |60.....X.2......|
000003F0: 38 36 30 00 FB 0B DA 02  58 B2 33 00 04 0C E4 02  |860.....X.3.....|
00000400: 89 38 36 30 00 0C 0C EE  02 58 B2 34 00 15 0C F8  |.860.....X.4....|
00000410: 02 89 38 36 30 00 1D 0C  02 03 58 B2 35 00 26 0C  |..860.....X.5.&.|
00000420: 0C 03 89 38 36 30 00 2E  0C 16 03 58 B2 36 00 37  |...860.....X.6.7|
00000430: 0C 20 03 89 38 36 30 00  3F 0C 2A 03 58 B2 37 00  |. ..860.?.*.X.7.|
00000440: 48 0C 34 03 89 38 36 30  00 50 0C 3E 03 58 B2 38  |H.4..860.P.>.X.8|
00000450: 00 59 0C 48 03 89 38 36  30 00 61 0C 52 03 58 B2  |.Y.H..860.a.R.X.|
00000460: 39 00 67 0C 5C 03 8E 00  73 0C 66 03 4A 24 B2 C4  |9.g.\...s.f.J$..|
00000470: 28 41 29 00 7F 0C 70 03  4B 24 B2 C4 28 42 29 00  |(A)...p.K$..(B).|
00000480: 8E 0C 84 03 4A B2 C5 28  4A 24 AA 4B 24 29 00 9B  |....J..(J$.K$)..|
00000490: 0C 8E 03 4A B2 4A AC 31  30 AE 43 00 A1 0C 93 03  |...J.J.10.C.....|
000004A0: 99 00 B6 0C 98 03 8B 44  24 B2 22 53 49 4C 42 45  |.......D$."SILBE|
000004B0: 52 22 A7 39 37 30 00 C9  0C A2 03 8B 44 24 B2 22  |R".970......D$."|
000004C0: 47 4F 4C 44 22 A7 39 39  30 00 DC 0C A7 03 8B 44  |GOLD".990......D|
000004D0: 24 B2 22 52 4F 54 22 A7  31 30 30 35 00 F0 0C AC  |$."ROT".1005....|
000004E0: 03 8B 44 24 B2 22 4E 45  49 4E 22 A7 31 30 31 30  |..D$."NEIN".1010|
000004F0: 00 F6 0C B1 03 99 00 11  0D B6 03 99 22 55 4E 47  |............"UNG|
00000500: 45 45 49 47 4E 45 54 45  20 45 49 4E 47 41 42 45  |EEIGNETE EINGABE|
00000510: 22 00 17 0D BB 03 99 00  1D 0D C0 03 90 00 23 0D  |".............#.|
00000520: C5 03 99 00 38 0D CA 03  99 4A 22 31 30 25 20 54  |....8....J"10% T|
00000530: 4F 4C 45 52 41 4E 5A 22  00 3E 0D CF 03 99 00 48  |OLERANZ".>.....H|
00000540: 0D D4 03 89 31 30 32 30  00 4E 0D D9 03 99 00 62  |....1020.N.....b|
00000550: 0D DE 03 99 4A 22 35 25  20 54 4F 4C 45 52 41 4E  |....J"5% TOLERAN|
00000560: 5A 22 00 68 0D E3 03 99  00 72 0D E8 03 89 31 30  |Z".h.....r....10|
00000570: 32 30 00 78 0D EA 03 99  00 8C 0D ED 03 99 4A 22  |20.x..........J"|
00000580: 32 25 20 54 4F 4C 45 52  41 4E 5A 22 00 92 0D EE  |2% TOLERANZ"....|
00000590: 03 99 00 9C 0D EF 03 89  31 30 32 30 00 A2 0D F0  |........1020....|
000005A0: 03 99 00 B7 0D F2 03 99  4A 22 32 30 25 20 54 4F  |........J"20% TO|
000005B0: 4C 45 52 41 4E 5A 22 00  BD 0D F3 03 99 00 C3 0D  |LERANZ".........|
000005C0: F4 03 99 00 C9 0D F5 03  99 00 F8 0D FC 03 99 22  |..............."|
000005D0: 47 45 42 45 27 31 27 46  55 45 52 20 45 49 4E 45  |GEBE'1'FUER EINE|
000005E0: 20 45 52 4E 45 55 54 45  20 42 45 52 45 43 48 4E  | ERNEUTE BERECHN|
000005F0: 55 4E 47 20 45 49 4E 22  00 FE 0D FD 03 99 00 2D  |UNG EIN".......-|
00000600: 0E FE 03 99 22 47 45 42  45 27 32 27 46 55 45 52  |...."GEBE'2'FUER|
00000610: 20 45 52 52 45 43 48 4E  45 4E 20 56 4F 4E 20 4F  | ERRECHNEN VON O|
00000620: 48 4D 3D 46 41 52 42 45  20 45 49 4E 22 00 33 0E  |HM=FARBE EIN".3.|
00000630: FF 03 99 00 57 0E 00 04  99 22 47 45 42 45 27 30  |....W...."GEBE'0|
00000640: 27 46 55 45 52 20 50 52  4F 47 52 41 4D 4D 45 4E  |'FUER PROGRAMMEN|
00000650: 44 45 20 45 49 4E 22 00  5E 0E 01 04 85 4C 00 6A  |DE EIN".^....L.j|
00000660: 0E 02 04 8B 4C B2 31 A7  31 30 00 78 0E 03 04 8B  |....L.1.10.x....|
00000670: 4C B2 32 A7 31 31 39 30  00 86 0E 04 04 8B 4C B2  |L.2.1190......L.|
00000680: 30 A7 31 30 35 30 00 8C  0E 1A 04 80 00 95 0E A6  |0.1050..........|
00000690: 04 99 22 93 22 00 C1 0E  AB 04 99 22 44 49 45 53  |.."."......"DIES|
000006A0: 45 53 20 50 52 4F 47 52  41 4D 4D 20 45 52 52 45  |ES PROGRAMM ERRE|
000006B0: 43 48 4E 45 54 20 41 4E  48 41 4E 44 20 44 45 53  |CHNET ANHAND DES|
000006C0: 22 00 EC 0E AC 04 99 22  57 49 44 45 52 53 54 41  |"......"WIDERSTA|
000006D0: 4E 44 53 57 45 52 54 45  53 20 44 49 45 20 46 41  |NDSWERTES DIE FA|
000006E0: 52 42 43 4F 44 49 45 52  55 4E 47 22 00 F2 0E AD  |RBCODIERUNG"....|
000006F0: 04 99 00 13 0F B0 04 8F  20 46 41 52 42 43 4F 44  |........ FARBCOD|
00000700: 45 20 46 55 45 52 20 57  49 44 45 52 53 54 41 45  |E FUER WIDERSTAE|
00000710: 4E 44 45 00 3E 0F B1 04  8F 20 44 49 45 53 45 53  |NDE.>.... DIESES|
00000720: 20 50 52 4F 47 52 41 4D  4D 20 45 52 52 45 43 48  | PROGRAMM ERRECH|
00000730: 4E 45 54 20 41 4E 48 41  4E 44 20 44 45 53 00 68  |NET ANHAND DES.h|
00000740: 0F B5 04 8F 20 57 49 44  45 52 53 54 41 4E 44 53  |.... WIDERSTANDS|
00000750: 57 45 52 54 45 53 20 44  49 45 20 46 41 52 42 43  |WERTES DIE FARBC|
00000760: 4F 44 49 45 52 55 4E 47  00 96 0F B6 04 8F 20 45  |ODIERUNG...... E|
00000770: 53 20 4C 41 53 53 45 4E  20 53 49 43 48 20 4E 55  |S LASSEN SICH NU|
00000780: 52 20 57 49 44 45 52 53  54 41 4E 44 53 57 45 52  |R WIDERSTANDSWER|
00000790: 54 45 20 56 4F 4E 00 B3  0F B9 04 8F 20 31 30 20  |TE VON...... 10 |
000007A0: 4F 48 4D 20 41 42 20 46  41 52 42 43 4F 44 49 45  |OHM AB FARBCODIE|
000007B0: 52 45 4E 00 B9 0F BA 04  99 00 BF 0F BB 04 99 00  |REN.............|
000007C0: E9 0F BF 04 99 22 55 4D  52 45 43 48 4E 55 4E 47  |....."UMRECHNUNG|
000007D0: 20 56 4F 4E 20 57 49 44  45 52 53 54 41 4E 44 53  | VON WIDERSTANDS|
000007E0: 57 45 52 54 20 41 55 46  22 00 F9 0F C4 04 99 22  |WERT AUF"......"|
000007F0: 46 41 52 42 43 4F 44 45  22 00 FF 0F C9 04 99 00  |FARBCODE".......|
00000800: 24 10 CE 04 99 22 45 49  4E 47 41 42 45 20 44 45  |$...."EINGABE DE|
00000810: 53 20 57 49 44 45 52 53  54 41 4E 44 53 57 45 52  |S WIDERSTANDSWER|
00000820: 54 45 53 22 00 2A 10 D0  04 99 00 50 10 D3 04 99  |TES".*.....P....|
00000830: 22 42 45 44 49 4E 47 55  4E 47 3A 20 47 52 4F 45  |"BEDINGUNG: GROE|
00000840: 53 53 45 52 20 41 4C 53  20 31 30 20 4F 48 4D 22  |SSER ALS 10 OHM"|
00000850: 00 56 10 D5 04 99 00 5D  10 D8 04 85 56 00 6B 10  |.V.....]....V.k.|
00000860: E2 04 56 B2 B5 28 B6 28  56 29 29 00 77 10 EC 04  |..V..(.(V)).w...|
00000870: 56 24 B2 C4 28 56 29 00  83 10 F6 04 4C B2 C3 28  |V$..(V).....L..(|
00000880: 56 24 29 00 92 10 00 05  45 24 B2 C8 28 56 24 2C  |V$).....E$..(V$,|
00000890: 32 29 00 A1 10 0A 05 46  24 B2 C8 28 56 24 2C 33  |2).....F$..(V$,3|
000008A0: 29 00 AD 10 0B 05 41 B2  C5 28 45 24 29 00 B9 10  |).....A..(E$)...|
000008B0: 0C 05 42 B2 C5 28 46 24  29 00 C6 10 0D 05 44 B2  |..B..(F$).....D.|
000008C0: 42 AB 31 30 AC 41 00 D4  10 0E 05 46 24 B2 C4 28  |B.10.A.....F$..(|
000008D0: 44 AA 31 29 00 E2 10 0F  05 45 24 B2 C4 28 41 AA  |D.1).....E$..(A.|
000008E0: 31 29 00 EC 10 11 05 49  B2 4C AB 32 00 F2 10 14  |1).....I.L.2....|
000008F0: 05 8C 00 01 11 1E 05 81  4A B2 31 A4 C5 28 45 24  |........J.1..(E$|
00000900: 29 00 09 11 28 05 87 4B  24 00 10 11 32 05 82 4A  |)...(..K$...2..J|
00000910: 00 1A 11 3C 05 45 24 B2  4B 24 00 20 11 46 05 8C  |...<.E$.K$. .F..|
00000920: 00 2F 11 50 05 81 4A B2  31 A4 C5 28 46 24 29 00  |./.P..J.1..(F$).|
00000930: 37 11 5A 05 87 4B 24 00  3E 11 64 05 82 4A 00 48  |7.Z..K$.>.d..J.H|
00000940: 11 6E 05 46 24 B2 4B 24  00 4E 11 78 05 8C 00 5D  |.n.F$.K$.N.x...]|
00000950: 11 82 05 4A 24 B2 CA 28  56 24 2C 33 29 00 69 11  |...J$..(V$,3).i.|
00000960: 8C 05 4A B2 C3 28 4A 24  29 00 74 11 96 05 81 48  |..J..(J$).t....H|
00000970: B2 31 A4 4A 00 7D 11 A0  05 87 20 4B 24 00 84 11  |.1.J.}.... K$...|
00000980: A5 05 82 48 00 8E 11 AA  05 4A 24 B2 4B 24 00 94  |...H.....J$.K$..|
00000990: 11 AF 05 99 00 BC 11 B4  05 99 22 57 49 44 45 52  |.........."WIDER|
000009A0: 53 54 41 4E 44 53 46 41  52 42 43 4F 44 45 20 46  |STANDSFARBCODE F|
000009B0: 55 45 52 22 3B 56 3B 22  4F 48 4D 22 00 C2 11 B9  |UER";V;"OHM"....|
000009C0: 05 99 00 EE 11 BE 05 99  45 24 3B 22 20 22 3B 46  |........E$;" ";F|
000009D0: 24 3B 22 20 22 3B 4A 24  3B 22 20 22 3B 22 20 20  |$;" ";J$;" ";"  |
000009E0: 32 4F 25 20 20 54 4F 4C  45 52 41 4E 5A 22 00 F4  |2O%  TOLERANZ"..|
000009F0: 11 BF 05 99 00 FA 11 C0  05 99 00 00 12 C1 05 99  |................|
00000A00: 00 06 12 C2 05 99 00 0C  12 C3 05 99 00 30 12 C4  |.............0..|
00000A10: 05 83 20 53 43 48 57 41  52 5A 2C 42 52 41 55 4E  |.. SCHWARZ,BRAUN|
00000A20: 2C 52 4F 54 2C 4F 52 41  4E 47 45 2C 47 45 4C 42  |,ROT,ORANGE,GELB|
00000A30: 00 54 12 C6 05 83 20 47  52 55 45 4E 2C 42 4C 41  |.T.... GRUEN,BLA|
00000A40: 55 2C 56 49 4F 4C 45 54  54 2C 47 52 41 55 2C 57  |U,VIOLETT,GRAU,W|
00000A50: 45 49 53 53 00 83 12 CA  05 99 22 47 45 42 45 27  |EISS......"GEBE'|
00000A60: 31 27 46 55 45 52 20 45  49 4E 45 20 45 52 4E 45  |1'FUER EINE ERNE|
00000A70: 55 54 45 20 42 45 52 45  43 48 4E 55 4E 47 20 45  |UTE BERECHNUNG E|
00000A80: 49 4E 22 00 89 12 CB 05  99 00 B5 12 CC 05 99 22  |IN"............"|
00000A90: 47 45 42 45 27 32 27 46  55 45 52 20 42 45 52 45  |GEBE'2'FUER BERE|
00000AA0: 43 48 4E 55 4E 47 20 46  41 52 42 45 3D 4F 48 4D  |CHNUNG FARBE=OHM|
00000AB0: 20 45 49 4E 22 00 BB 12  CD 05 99 00 DF 12 CE 05  | EIN"...........|
00000AC0: 99 22 47 45 42 45 27 30  27 46 55 45 52 20 50 52  |."GEBE'0'FUER PR|
00000AD0: 4F 47 52 41 4D 4D 45 4E  44 45 20 45 49 4E 22 00  |OGRAMMENDE EIN".|
00000AE0: E6 12 D3 05 85 57 00 F4  12 D4 05 8B 57 B2 31 A7  |.....W......W.1.|
00000AF0: 31 31 39 30 00 00 13 D5  05 8B 57 B2 32 A7 31 30  |1190......W.2.10|
00000B00: 00 0E 13 D6 05 8B 57 B2  30 A7 31 34 39 35 00 14  |......W.0.1495..|
00000B10: 13 D7 05 80 00 00 00 58  3B 22                    |.......X;"      |
........$...."WIDERSTANDSBERECHNUNG".*..
...J...."DRUECKE'1'FUER FARBE=OHM".P....
.P...."DRUECKE'2'FUER OHM=FARBE".W....L.
.....L.1.10......L.2.1190......".". ....
.A.... FARBCODE FUER WIDERSTAENDE...... 
DIESES PROGRAMM BERECHNET ANHAND DER....
.. FARBEINGABE DEN WIDERSTANDSWERT...H..
...R...I...."DIESES PROGRAMM BERECHNET A
NHAND DER.Q...."FARBEINGABE DEN WIDERSTA
NDSWERT.".W.|...}.........."EINGABE DES 
FARBCODES.TRENNE JEDE FARB-".G...."EINGA
BE DURCH KOMMA..M.........."IST KEINE TO
LERANZANGABE VORHANDEN,GEBE"......"'NEIN
'EIN.".......%....A$,B$,C$,D$./.B.X$.A$.
8.L..541.@.V.A.X.J...X$.B$.S....541.[...
B.X.E...X$.C$.N....541.V...C.X.|........
..870......X$."SILBER".661......X$."GOLD
".663.C.&..X$."SCHWARZ".670.W.0..X$."BRA
UN".690...:..X$."ROT".710...D..X$."ORANG
E".730...N..X$."GELB".750.%.X..X$."GRUEN
".770.8.B..X$."BLAU".790.N.L..X$."VIOLET
T".810.A.V..X$."GRAU".830.U....X$."WEISS
".850.{.........."UNGEEIGNETE EINGABE"..
.........X..2......860.....X..1......860
.H...X.0.Q....860.Y...X.1......860...F.X
.2...P..860...Z.X.3......860.....X.4....
..860.....X.5.&....860.....X.6.7. ..860.
?.*.X.7.H.4..860.P.>.X.8.Y.H..860.A.R.X.
9.G.\...S.F.J$.D(A)..P.K$.D(B).....J.E(
J$.K$).....J.J.10.C............D$."SILBE
R".970.I....D$."GOLD".990......D$."ROT".
1005......D$."NEIN".1010............"UNG
EEIGNETE EINGABE".............#.E...8.J.
.J"10% TOLERANZ".>.O...H.T..1020.N.Y...B
....J"5% TOLERANZ".H.....R....1020.X....
......J"2% TOLERANZ"............1020....
........J"20% TOLERANZ".......C.....I...
......."GEBE'1'FUER EINE ERNEUTE BERECHN
UNG EIN".......-...."GEBE'2'FUER ERRECHN
EN VON OHM=FARBE EIN".3.....W...."GEBE'0
'FUER PROGRAMMENDE EIN".^....L.J....L.1.
10.X....L.2.1190......L.0.1050..........
..".".A...."DIESES PROGRAMM ERRECHNET AN
HAND DES"......"WIDERSTANDSWERTES DIE FA
RBCODIERUNG"............ FARBCODE FUER W
IDERSTAENDE.>.... DIESES PROGRAMM ERRECH
NET ANHAND DES.H.... WIDERSTANDSWERTES D
IE FARBCODIERUNG...... ES LASSEN SICH NU
R WIDERSTANDSWERTE VON...... 10 OHM AB F
ARBCODIEREN.................."UMRECHNUNG
 VON WIDERSTANDSWERT AUF"...D.."FARBCODE
"...I...$.N.."EINGABE DES WIDERSTANDSWER
TES".*.P...P.S.."BEDINGUNG: GROESSER ALS
 10 OHM".V.U...].X..V.K...V..(.(V)).W...
V$.D(V).....L.C(V$).....E$.H(V$,2).....F
$.H(V$,3).....A.E(E$).....B.E(F$).F...D.
B.10.A.T...F$.D(D.1).....E$.D(A.1).....I
.L.2............J.1.E(E$)...(..K$...2..J
...<.E$.K$. .F.../.P..J.1.E(F$).7.Z..K$.
>.D..J.H.N.F$.K$.N.X...]...J$.J(V$,3).I.
..J.C(J$).T....H.1.J.}. .. K$......H....
.J$.K$............"WIDERSTANDSFARBCODE F
UER";V;"OHM".B..........E$;" ";F$;" ";J$
;" ";"  2O%  TOLERANZ"...............A..
...B.....C...0.D.. SCHWARZ,BRAUN,ROT,ORA
NGE,GELB.T.F.. GRUEN,BLAU,VIOLETT,GRAU,W
EISS...J.."GEBE'1'FUER EINE ERNEUTE BERE
CHNUNG EIN"...K.....L.."GEBE'2'FUER BERE
CHNUNG FARBE=OHM EIN"...M.....N.."GEBE'0
'FUER PROGRAMMENDE EIN"...S..W...T..W.1.
1190...U..W.2.10...V..W.0.1495...W.....X
;"
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL