FARBCODE     128
FILE INFORMATION
FILENAME(S): FARBCODE     128
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-11-30 21:06:44
APPEARS ON: 1 disk(s)
FILE HASH
140693ed956aba449b69b3a8b055b621f1af8b34df5b728327e6fbd4e36b0766
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPEZIAL 128 DSK2 | FARBCODE     128 | PRG | DuncanTwain | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 24 1C 0A 00 8F 20 46 41 52 42 43 4F 44 45 |..$.... FARBCODE|
00000010: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===============|
00000020: 3D 31 32 38 00 47 1C 14 00 8F 20 28 50 29 20 43 |=128.G.... (P) C|
00000030: 4F 4D 4D 4F 44 4F 52 45 20 57 45 4C 54 20 54 45 |OMMODORE WELT TE|
00000040: 41 4D 20 20 20 3D 3D 00 6A 1C 1E 00 8F 20 3D 3D |AM ==.j.... ==|
00000050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000060: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 8D 1C 28 00 8F |==========...(..|
00000070: 20 28 43 29 20 42 59 20 20 20 20 20 20 20 20 20 | (C) BY |
00000080: 20 20 20 20 20 20 20 20 20 20 20 3D 3D 00 B0 1C | ==...|
00000090: 32 00 8F 20 56 4F 4C 4B 45 52 20 47 52 55 45 4E |2.. VOLKER GRUEN|
000000A0: 54 48 41 4C 45 52 20 20 20 20 20 20 20 20 3D 3D |THALER ==|
000000B0: 00 D3 1C 3C 00 8F 20 20 20 20 20 20 20 20 20 20 |...<.. |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000D0: 20 3D 3D 00 F6 1C 46 00 8F 20 56 45 52 53 49 4F | ==...F.. VERSIO|
000000E0: 4E 20 37 2E 30 20 20 34 30 20 5A 2F 41 53 43 49 |N 7.0 40 Z/ASCI|
000000F0: 49 20 20 20 3D 3D 00 19 1D 50 00 8F 20 31 32 38 |I ==...P.. 128|
00000100: 20 50 43 20 20 2B 20 20 31 35 34 31 2F 31 35 37 | PC + 1541/157|
00000110: 31 20 20 20 20 20 20 3D 3D 00 3C 1D 5A 00 8F 20 |1 ==.<.Z.. |
00000120: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000130: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 56 1D 64 |============.V.d|
00000140: 00 43 55 24 B2 C7 28 31 34 35 29 3A 43 4C 24 B2 |.CU$..(145):CL$.|
00000150: C7 28 31 35 37 29 00 65 1D 6E 00 43 52 24 B2 C7 |.(157).e.n.CR$..|
00000160: 28 30 32 39 29 00 6F 1D 78 00 D7 31 34 35 30 00 |(029).o.x..1450.|
00000170: 78 1D 82 00 E7 30 2C 31 00 81 1D 8C 00 E7 34 2C |x....0,1......4,|
00000180: 31 00 88 1D 96 00 FE 25 00 AD 1D A0 00 8F 20 56 |1......%...... V|
00000190: 41 52 49 41 42 4C 45 4E 20 45 49 4E 4C 45 53 45 |ARIABLEN EINLESE|
000001A0: 4E 20 55 4E 44 20 44 49 4D 45 4E 53 2E 00 C0 1D |N UND DIMENS....|
000001B0: AA 00 86 57 24 28 31 33 29 3A 86 54 24 28 35 29 |...W$(13):.T$(5)|
000001C0: 00 CC 1D B4 00 81 58 B2 30 A4 31 32 00 D7 1D BE |......X.0.12....|
000001D0: 00 87 57 24 28 58 29 00 DE 1D C8 00 82 58 00 E9 |..W$(X)......X..|
000001E0: 1D D2 00 81 49 B2 31 A4 35 00 F4 1D DC 00 87 54 |....I.1.5......T|
000001F0: 24 28 49 29 00 FB 1D E6 00 82 49 00 04 1E F0 00 |$(I)......I.....|
00000200: 89 33 30 30 00 24 1E FA 00 8F 20 55 4E 54 45 52 |.300.$.... UNTER|
00000210: 50 52 4F 47 52 41 4D 4D 20 46 55 45 52 20 5A 45 |PROGRAMM FUER ZE|
00000220: 49 4C 45 4E 00 30 1E 04 01 81 58 B2 31 A4 33 38 |ILEN.0....X.1.38|
00000230: 00 3A 1E 0E 01 99 22 2A 22 3B 00 41 1E 18 01 82 |.:...."*";.A....|
00000240: 58 00 47 1E 22 01 8E 00 53 1E 2C 01 8F 20 4D 45 |X.G."...S.,.. ME|
00000250: 4E 55 45 00 59 1E 36 01 E8 00 6E 1E 40 01 99 22 |NUE.Y.6...n.@.."|
00000260: 2A 22 3B 3A 8D 32 35 30 3A 99 22 2A 22 3B 00 9F |*";:.250:."*";..|
00000270: 1E 4A 01 99 22 2A 20 20 20 20 20 20 20 46 20 41 |.J.."* F A|
00000280: 20 52 20 42 20 43 20 4F 20 44 20 45 20 20 20 56 | R B C O D E V|
00000290: 2E 20 32 2E 30 20 20 20 20 20 20 20 2A 22 3B 00 |. 2.0 *";.|
000002A0: D0 1E 54 01 99 22 2A 20 20 20 20 20 20 20 20 20 |..T.."* |
000002B0: 20 20 20 20 20 28 43 29 20 31 39 38 36 20 20 42 | (C) 1986 B|
000002C0: 59 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 3B |Y *";|
000002D0: 00 01 1F 5E 01 99 22 2A 20 20 20 20 20 20 20 20 |...^.."* |
000002E0: 20 20 20 20 20 56 2E 20 47 52 55 45 4E 54 48 41 | V. GRUENTHA|
000002F0: 4C 45 52 20 20 20 20 20 20 20 20 20 20 20 2A 22 |LER *"|
00000300: 3B 00 16 1F 68 01 99 22 2A 22 3B 3A 8D 32 35 30 |;...h.."*";:.250|
00000310: 3A 99 22 2A 22 3B 00 2B 1F 72 01 99 22 2A 22 3B |:."*";.+.r.."*";|
00000320: 3A 8D 32 35 30 3A 99 22 2A 22 3B 00 37 1F 7C 01 |:.250:."*";.7.|.|
00000330: 81 58 B2 31 A4 31 37 00 49 1F 86 01 99 22 2A 22 |.X.1.17.I...."*"|
00000340: 3B A6 33 38 29 22 2A 22 3B 00 50 1F 90 01 82 58 |;.38)"*";.P....X|
00000350: 00 65 1F 9A 01 99 22 2A 22 3B 3A 8D 32 35 30 3A |.e...."*";:.250:|
00000360: 99 22 2A 22 3B 00 77 1F A4 01 FE 1A 32 2C 37 2C |."*";.w.....2,7,|
00000370: 33 38 2C 32 32 2C 31 00 7D 1F AE 01 E8 00 8E 1F |38,22,1.}.......|
00000380: B8 01 99 A3 31 36 29 22 4D 45 4E 55 45 22 00 9F |....16)"MENUE"..|
00000390: 1F C2 01 99 A3 31 36 29 22 3D 3D 3D 3D 3D 22 00 |.....16)"=====".|
000003A0: A7 1F CC 01 99 3A 99 00 C4 1F D6 01 99 22 20 20 |.....:......." |
000003B0: 31 20 2D 20 46 41 52 42 43 4F 44 45 20 2D 3E 20 |1 - FARBCODE -> |
000003C0: 4F 48 4D 22 00 CA 1F E0 01 99 00 E7 1F EA 01 99 |OHM"............|
000003D0: 22 20 20 32 20 2D 20 4F 48 4D 20 2D 3E 20 46 41 |" 2 - OHM -> FA|
000003E0: 52 42 43 4F 44 45 22 00 ED 1F F4 01 99 00 07 20 |RBCODE"........ |
000003F0: FE 01 99 22 20 20 33 20 2D 20 50 52 4F 47 52 41 |..." 3 - PROGRA|
00000400: 4D 4D 45 4E 44 45 22 00 1E 20 08 02 99 3A 99 3A |MMENDE".. ...:.:|
00000410: 99 22 49 48 52 45 20 57 41 48 4C 20 3F 22 00 25 |."IHRE WAHL ?".%|
00000420: 20 12 02 FE 26 00 32 20 1C 02 A1 F9 58 24 3A 99 | ...&.2 ....X$:.|
00000430: 58 24 00 4B 20 26 02 8B C5 28 58 24 29 B3 31 B0 |X$.K &...(X$).1.|
00000440: C5 28 58 24 29 B1 33 A7 35 34 30 00 63 20 30 02 |.(X$).3.540.c 0.|
00000450: 91 C5 28 58 24 29 89 35 37 30 2C 39 34 30 2C 31 |..(X$).570,940,1|
00000460: 32 39 30 00 77 20 3A 02 8F 20 46 41 52 42 43 2E |290.w :.. FARBC.|
00000470: 20 2D 3E 20 4F 48 4D 00 7D 20 44 02 E8 00 98 20 | -> OHM.} D.... |
00000480: 4E 02 99 A3 31 31 29 22 46 41 52 42 43 4F 44 45 |N...11)"FARBCODE|
00000490: 20 2D 3E 20 4F 48 4D 22 00 B3 20 58 02 99 A3 31 | -> OHM".. X...1|
000004A0: 31 29 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |1)"=============|
000004B0: 3D 3D 22 00 C5 20 62 02 99 22 46 41 52 42 43 4F |==".. b.."FARBCO|
000004C0: 44 45 53 3A 22 00 D7 20 6C 02 99 22 3D 3D 3D 3D |DES:".. l.."====|
000004D0: 3D 3D 3D 3D 3D 3D 22 00 00 21 76 02 99 22 30 20 |======"..!v.."0 |
000004E0: 2D 20 53 43 48 57 41 52 5A 20 20 31 20 2D 20 42 |- SCHWARZ 1 - B|
000004F0: 52 41 55 4E 20 20 20 20 32 20 2D 20 52 4F 54 22 |RAUN 2 - ROT"|
00000500: 00 2B 21 80 02 99 22 33 20 2D 20 4F 52 41 4E 47 |.+!..."3 - ORANG|
00000510: 45 20 20 20 34 20 2D 20 47 45 4C 42 20 20 20 20 |E 4 - GELB |
00000520: 20 35 20 2D 20 47 52 55 45 4E 22 00 55 21 8A 02 | 5 - GRUEN".U!..|
00000530: 99 22 36 20 2D 20 42 4C 41 55 20 20 20 20 20 37 |."6 - BLAU 7|
00000540: 20 2D 20 56 49 4F 4C 45 54 54 20 20 38 20 2D 20 | - VIOLETT 8 - |
00000550: 47 52 41 55 22 00 81 21 94 02 99 22 39 20 2D 20 |GRAU"..!..."9 - |
00000560: 57 45 49 53 53 20 20 20 31 30 20 2D 20 47 4F 4C |WEISS 10 - GOL|
00000570: 44 20 20 20 20 31 31 20 2D 20 53 49 4C 42 45 52 |D 11 - SILBER|
00000580: 22 00 A4 21 9E 02 99 22 20 20 20 20 20 20 20 20 |"..!..." |
00000590: 20 31 32 20 2D 20 4B 45 49 4E 20 46 41 52 42 52 | 12 - KEIN FARBR|
000005A0: 49 4E 47 22 00 B7 21 A8 02 99 3A 85 22 31 2E 20 |ING"..!...:."1. |
000005B0: 52 49 4E 47 22 3B 41 00 D2 21 B2 02 8B 41 B3 31 |RING";A..!...A.1|
000005C0: B0 41 B1 39 A7 99 43 55 24 43 55 24 3B 3A 89 36 |.A.9..CU$CU$;:.6|
000005D0: 38 30 00 E3 21 BC 02 85 22 32 2E 20 52 49 4E 47 |80..!..."2. RING|
000005E0: 22 3B 42 00 FB 21 C6 02 8B 42 B3 30 B0 42 B1 39 |";B..!...B.0.B.9|
000005F0: A7 99 43 55 24 3B 3A 89 37 30 30 00 0C 22 D0 02 |..CU$;:.700.."..|
00000600: 85 22 33 2E 20 52 49 4E 47 22 3B 43 00 2E 22 DA |."3. RING";C..".|
00000610: 02 8B 43 B3 30 B0 43 B1 36 AF 43 B3 31 30 B0 43 |..C.0.C.6.C.10.C|
00000620: B1 31 31 A7 99 43 55 24 3B 3A 89 37 32 30 00 36 |.11..CU$;:.720.6|
00000630: 22 E4 02 46 B2 43 00 47 22 EE 02 85 22 34 2E 20 |"..F.C.G"..."4. |
00000640: 52 49 4E 47 22 3B 44 00 69 22 F8 02 8B 44 B3 31 |RING";D.i"...D.1|
00000650: B0 44 B1 32 AF 44 B3 31 30 B0 44 B1 31 32 A7 99 |.D.2.D.10.D.12..|
00000660: 43 55 24 3B 3A 89 37 35 30 00 71 22 02 03 47 B2 |CU$;:.750.q"..G.|
00000670: 44 00 80 22 0C 03 8B 43 B2 31 30 A7 43 B2 AB 31 |D.."...C.10.C..1|
00000680: 00 8F 22 16 03 8B 43 B2 31 31 A7 43 B2 AB 32 00 |.."...C.11.C..2.|
00000690: 9D 22 20 03 8B 44 B2 31 30 A7 44 B2 33 00 AB 22 |." ..D.10.D.3.."|
000006A0: 2A 03 8B 44 B2 31 31 A7 44 B2 34 00 B9 22 34 03 |*..D.11.D.4.."4.|
000006B0: 8B 44 B2 31 32 A7 44 B2 35 00 CC 22 3E 03 45 B2 |.D.12.D.5..">.E.|
000006C0: C5 28 C4 28 41 29 AA C4 28 42 29 29 00 D2 22 48 |.(.(A)..(B)).."H|
000006D0: 03 E8 00 E4 22 52 03 99 22 46 41 52 42 43 4F 44 |...."R.."FARBCOD|
000006E0: 45 3A 22 3B 00 01 23 5C 03 99 57 24 28 41 29 3B |E:";..#\..W$(A);|
000006F0: 57 24 28 42 29 3B 57 24 28 46 29 3B 57 24 28 47 |W$(B);W$(F);W$(G|
00000700: 29 00 17 23 66 03 99 3A 99 22 57 49 44 45 52 53 |)..#f..:."WIDERS|
00000710: 54 41 4E 44 3A 22 3B 00 33 23 70 03 99 A6 31 29 |TAND:";.3#p...1)|
00000720: 45 3B 22 20 2A 31 30 5E 20 22 3B 43 3B 22 20 4F |E;" *10^ ";C;" O|
00000730: 48 4D 22 00 4D 23 7A 03 99 3A 99 22 54 4F 4C 45 |HM".M#z..:."TOLE|
00000740: 52 41 4E 5A 3A 20 22 3B 54 24 28 44 29 00 56 23 |RANZ: ";T$(D).V#|
00000750: 84 03 FE 0B 31 30 00 7C 23 8E 03 99 3A 99 22 4E |....10.|#...:."N|
00000760: 4F 43 48 20 45 49 4E 45 20 42 45 52 45 43 48 4E |OCH EINE BERECHN|
00000770: 55 4E 47 20 28 4A 2F 4E 29 20 3F 22 00 85 23 98 |UNG (J/N) ?"..#.|
00000780: 03 A1 F9 58 24 00 9A 23 A2 03 8B 58 24 B2 22 4A |...X$..#...X$."J|
00000790: 22 A7 35 37 30 3A D5 34 33 30 00 AE 23 AC 03 8F |".570:.430..#...|
000007A0: 20 4F 48 4D 20 2D 3E 20 46 41 52 42 43 2E 00 B4 | OHM -> FARBC...|
000007B0: 23 B6 03 E8 00 CF 23 C0 03 99 A3 31 31 29 22 4F |#.....#....11)"O|
000007C0: 48 4D 20 2D 3E 20 46 41 52 42 43 4F 44 45 22 00 |HM -> FARBCODE".|
000007D0: EA 23 CA 03 99 A3 31 31 29 22 3D 3D 3D 3D 3D 3D |.#....11)"======|
000007E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 F5 23 D4 03 81 |========="..#...|
000007F0: 58 B2 31 A4 35 00 0C 24 DE 03 99 A6 32 29 3B 58 |X.1.5..$....2);X|
00000800: 3B 22 20 2D 20 22 3B 54 24 28 58 29 00 13 24 E8 |;" - ";T$(X)..$.|
00000810: 03 82 58 00 2F 24 F2 03 99 3A 99 22 4F 48 4D 20 |..X./$...:."OHM |
00000820: 20 20 20 20 3A 20 58 20 2A 31 30 5E 20 59 22 00 | : X *10^ Y".|
00000830: 3C 24 FC 03 85 22 58 3A 20 22 3B 58 00 56 24 06 |<$..."X: ";X.V$.|
00000840: 04 8B 58 B3 31 B0 58 B1 39 39 A7 99 43 55 24 3B |..X.1.X.99..CU$;|
00000850: 3A 89 31 30 32 30 00 63 24 10 04 85 22 59 3A 20 |:.1020.c$..."Y: |
00000860: 22 3B 59 00 7D 24 1A 04 8B 59 B3 AB 32 B0 59 B1 |";Y.}$...Y..2.Y.|
00000870: 36 A7 99 43 55 24 3B 3A 89 31 30 34 30 00 85 24 |6..CU$;:.1040..$|
00000880: 24 04 5A B2 59 00 94 24 2E 04 8B 59 B2 AB 32 A7 |$.Z.Y..$...Y..2.|
00000890: 59 B2 31 31 00 A3 24 38 04 8B 59 B2 AB 31 A7 59 |Y.11..$8..Y..1.Y|
000008A0: B2 31 30 00 BC 24 42 04 99 3A 85 22 54 4F 4C 45 |.10..$B..:."TOLE|
000008B0: 52 41 4E 5A 3A 22 3B 54 3A 41 B2 54 00 D5 24 4C |RANZ:";T:A.T..$L|
000008C0: 04 8B 54 B3 31 B0 54 B1 35 A7 99 43 55 24 3B 3A |..T.1.T.5..CU$;:|
000008D0: 89 31 30 39 30 00 E3 24 56 04 8B 54 B2 33 A7 54 |.1090..$V..T.3.T|
000008E0: B2 31 30 00 F1 24 60 04 8B 54 B2 34 A7 54 B2 31 |.10..$`..T.4.T.1|
000008F0: 31 00 FF 24 6A 04 8B 54 B2 35 A7 54 B2 31 32 00 |1..$j..T.5.T.12.|
00000900: 0B 25 74 04 46 24 B2 C4 28 58 29 00 1F 25 7E 04 |.%t.F$..(X)..%~.|
00000910: 8B C3 28 46 24 29 AB 31 B3 B1 32 A7 39 34 30 00 |..(F$).1..2.940.|
00000920: 31 25 88 04 47 31 B2 C5 28 C8 28 46 24 2C 32 29 |1%..G1..(.(F$,2)|
00000930: 29 00 43 25 92 04 47 32 B2 C5 28 C9 28 46 24 2C |).C%..G2..(.(F$,|
00000940: 31 29 29 00 49 25 9C 04 E8 00 72 25 A6 04 99 22 |1)).I%....r%..."|
00000950: 44 45 52 20 46 41 52 42 43 4F 44 45 20 44 45 53 |DER FARBCODE DES|
00000960: 20 57 49 44 45 52 53 54 41 4E 44 53 20 4D 49 54 | WIDERSTANDS MIT|
00000970: 20 22 00 A8 25 B0 04 99 3A 99 43 4C 24 58 3B 22 | "..%...:.CL$X;"|
00000980: 20 2A 31 30 5E 20 22 3B 5A 3B 22 20 4F 48 4D 20 | *10^ ";Z;" OHM |
00000990: 55 4E 44 20 45 49 4E 45 52 20 54 4F 4C 45 52 41 |UND EINER TOLERA|
000009A0: 4E 5A 20 22 43 52 24 3B 00 C8 25 BA 04 99 3A 99 |NZ "CR$;..%...:.|
000009B0: 22 56 4F 4E 20 22 3B 54 24 28 41 29 3B 22 20 4C |"VON ";T$(A);" L|
000009C0: 41 55 54 45 54 3A 20 22 00 EC 25 C4 04 99 3A 99 |AUTET: "..%...:.|
000009D0: A6 35 29 57 24 28 47 31 29 3B 57 24 28 47 32 29 |.5)W$(G1);W$(G2)|
000009E0: 3B 57 24 28 59 29 3B 57 24 28 54 29 00 F5 25 CE |;W$(Y);W$(T)..%.|
000009F0: 04 FE 0B 31 30 00 FD 25 D8 04 99 3A 99 00 14 26 |...10..%...:...&|
00000A00: E2 04 8F 20 41 42 46 52 41 47 45 20 4E 4F 43 48 |... ABFRAGE NOCH|
00000A10: 4D 41 4C 3F 00 2D 26 EC 04 99 22 5A 55 4D 20 4D |MAL?.-&..."ZUM M|
00000A20: 45 4E 55 45 20 28 4A 2F 4E 29 20 3F 22 00 36 26 |ENUE (J/N) ?".6&|
00000A30: F6 04 A1 F9 58 24 00 4B 26 00 05 8B 58 24 B2 22 |....X$.K&...X$."|
00000A40: 4E 22 A7 39 34 30 3A D5 34 33 30 00 5E 26 0A 05 |N".940:.430.^&..|
00000A50: 8F 20 50 52 4F 47 52 41 4D 4D 45 4E 44 45 00 64 |. PROGRAMMENDE.d|
00000A60: 26 14 05 E8 00 7D 26 1E 05 99 22 53 49 4E 44 20 |&....}&..."SIND |
00000A70: 53 49 45 20 53 49 43 48 45 52 20 3F 22 00 86 26 |SIE SICHER ?"..&|
00000A80: 28 05 A1 F9 58 24 00 96 26 32 05 8B 58 24 B2 22 |(...X$..&2..X$."|
00000A90: 4E 22 A7 33 30 30 00 A6 26 3C 05 FE 1A 30 2C 30 |N".300..&<...0,0|
00000AA0: 2C 33 39 2C 32 34 00 B0 26 46 05 E7 34 2C 31 34 |,39,24..&F..4,14|
00000AB0: 00 BC 26 50 05 9E 34 AC 34 30 39 36 00 C2 26 5A |..&P..4.4096..&Z|
00000AC0: 05 80 00 CE 26 64 05 8F 20 44 41 54 41 53 00 EE |....&d.. DATAS..|
00000AD0: 26 6E 05 83 22 53 43 48 57 41 52 5A 20 22 2C 22 |&n.."SCHWARZ ","|
00000AE0: 42 52 41 55 4E 20 22 2C 22 52 4F 54 20 22 00 0E |BRAUN ","ROT "..|
00000AF0: 27 78 05 83 22 4F 52 41 4E 47 45 20 22 2C 22 47 |'x.."ORANGE ","G|
00000B00: 45 4C 42 20 22 2C 22 47 52 55 45 4E 20 22 00 2E |ELB ","GRUEN "..|
00000B10: 27 82 05 83 22 42 4C 41 55 20 22 2C 22 56 49 4F |'..."BLAU ","VIO|
00000B20: 4C 45 54 54 20 22 2C 22 47 52 41 55 20 22 00 4E |LETT ","GRAU ".N|
00000B30: 27 8C 05 83 22 57 45 49 53 53 20 22 2C 22 47 4F |'..."WEISS ","GO|
00000B40: 4C 44 20 22 2C 22 53 49 4C 42 45 52 20 22 00 69 |LD ","SILBER ".i|
00000B50: 27 96 05 83 22 2D 22 2C 22 2B 2F 2D 20 31 25 22 |'..."-","+/- 1%"|
00000B60: 2C 22 2B 2F 2D 20 32 25 22 00 89 27 A0 05 83 22 |,"+/- 2%"..'..."|
00000B70: 2B 2F 2D 20 35 25 22 2C 22 2B 2F 2D 31 30 25 22 |+/- 5%","+/-10%"|
00000B80: 2C 22 2B 2F 2D 32 30 25 22 00 A0 27 AA 05 8F 20 |,"+/-20%"..'... |
00000B90: 46 45 48 4C 45 52 42 45 48 41 4E 44 4C 55 4E 47 |FEHLERBEHANDLUNG|
00000BA0: 00 A7 27 B4 05 FE 26 00 C1 27 BE 05 99 D3 28 45 |..'...&..'....(E|
00000BB0: 52 29 22 20 45 52 52 4F 52 20 49 4E 20 22 45 4C |R)" ERROR IN "EL|
00000BC0: 3B 00 C7 27 C8 05 EA 00 E7 27 D2 05 99 3A 99 22 |;..'.....'...:."|
00000BD0: 27 57 27 45 49 54 45 52 20 4F 44 45 52 20 27 45 |'W'EITER ODER 'E|
00000BE0: 27 4E 44 45 20 3F 22 00 F0 27 DC 05 A1 F9 58 24 |'NDE ?"..'....X$|
00000BF0: 00 FE 27 E6 05 8B 58 24 B2 22 45 22 A7 80 00 0E |..'...X$."E"....|
00000C00: 28 F0 05 8B 58 24 B2 22 57 22 A7 D6 20 82 00 18 |(...X$."W".. ...|
00000C10: 28 FA 05 89 31 35 30 30 00 39 28 04 06 8F 20 46 |(...1500.9(... F|
00000C20: 41 52 42 43 4F 44 45 20 3D 3D 3D 3D 3D 3D 3D 3D |ARBCODE ========|
00000C30: 3D 3D 3D 3D 3D 3D 31 32 38 00 5A 28 0E 06 8F 20 |======128.Z(... |
00000C40: 31 32 32 33 36 35 20 42 59 54 45 53 20 4D 45 4D |122365 BYTES MEM|
00000C50: 4F 52 59 20 20 20 20 20 3D 3D 00 7B 28 18 06 8F |ORY ==.{(...|
00000C60: 20 30 30 33 33 39 39 20 42 59 54 45 53 20 50 52 | 003399 BYTES PR|
00000C70: 4F 47 52 41 4D 20 20 20 20 3D 3D 00 9C 28 22 06 |OGRAM ==..(".|
00000C80: 8F 20 30 30 30 30 31 34 20 42 59 54 45 53 20 56 |. 000014 BYTES V|
00000C90: 41 52 49 41 42 4C 45 53 20 20 3D 3D 00 BD 28 2C |ARIABLES ==..(,|
00000CA0: 06 8F 20 30 30 30 30 30 37 20 42 59 54 45 53 20 |.. 000007 BYTES |
00000CB0: 53 54 52 49 4E 47 53 20 20 20 20 3D 3D 00 DE 28 |STRINGS ==..(|
00000CC0: 36 06 8F 20 30 30 30 30 30 30 20 42 59 54 45 53 |6.. 000000 BYTES|
00000CD0: 20 41 52 52 41 59 53 20 20 20 20 20 3D 3D 00 FF | ARRAYS ==..|
00000CE0: 28 40 06 8F 20 30 35 34 37 31 37 20 42 59 54 45 |(@.. 054717 BYTE|
00000CF0: 53 20 46 52 45 45 20 28 30 29 20 20 20 3D 3D 00 |S FREE (0) ==.|
00000D00: 20 29 4A 06 8F 20 30 36 34 32 34 39 20 42 59 54 | )J.. 064249 BYT|
00000D10: 45 53 20 46 52 45 45 20 28 31 29 20 20 20 3D 3D |ES FREE (1) ==|
00000D20: 00 41 29 54 06 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D |.A)T.. =========|
00000D30: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D40: 3D 00 00 00 |=... |
..$.... FARBCODE ================128.G..
.. (P) COMMODORE WELT TEAM ==.J.... ==
==========================...(.. (C) BY
==...2.. VOLKER GRUEN
THALER ==.S.<..
==...F.. VERSION 7.0 40 Z/ASCI
I ==...P.. 128 PC + 1541/1571 =
=.<.Z.. ============================.V.D
.CU$.G(145):CL$.G(157).E.N.CR$.G(029).O.
X.W1450.X....0,1......4,1......%... .. V
ARIABLEN EINLESEN UND DIMENS.......W$(13
):.T$(5).L....X.0.12.W....W$(X)...H..X..
.R..I.1.5......T$(I)......I......300.$..
.. UNTERPROGRAMM FUER ZEILEN.0....X.1.38
.:...."*";.A....X.G."...S.,.. MENUE.Y.6.
..N.@.."*";:.250:."*";...J.."* F A
R B C O D E V. 2.0 *";.P.T.."*
(C) 1986 BY *";
...^.."* V. GRUENTHALER
*";...H.."*";:.250:."*";.+.R.."*";
:.250:."*";.7.|..X.1.17.I...."*";.38)"*"
;.P....X.E...."*";:.250:."*";.W.....2,7,
38,22,1.}...........16)"MENUE"...B...16)
"====="...L..:..D.V.." 1 - FARBCODE ->
OHM".J.........." 2 - OHM -> FARBCODE".
....... ..." 3 - PROGRAMMENDE".. ...:.:
."IHRE WAHL ?".% ...&.2 ....X$:.X$.K &..
E(X$).1.E(X$).3.540.C 0..E(X$).570,940,1
290.W :.. FARBC. -> OHM.} D.... N...11)"
FARBCODE -> OHM".. X...11)"=============
==".E B.."FARBCODES:".W L.."==========".
.!V.."0 - SCHWARZ 1 - BRAUN 2 - ROT"
.+!..."3 - ORANGE 4 - GELB 5 - GRU
EN".U!..."6 - BLAU 7 - VIOLETT 8 -
GRAU"..!..."9 - WEISS 10 - GOLD 11
- SILBER"..!..." 12 - KEIN FARBR
ING"..!...:."1. RING";A.R!...A.1.A.9..CU
$CU$;:.680..!..."2. RING";B..!F..B.0.B.9
..CU$;:.700.."P.."3. RING";C.."Z..C.0.C.
6.C.10.C.11..CU$;:.720.6"..F.C.G"..."4.
RING";D.I"...D.1.D.2.D.10.D.12..CU$;:.75
0.Q"..G.D.."...C.10.C..1.."...C.11.C..2.
." ..D.10.D.3.."*..D.11.D.4.."4..D.12.D.
5.L">.E.E(D(A).D(B)).R"H...."R.."FARBCOD
E:";..#\..W$(A);W$(B);W$(F);W$(G)..#F..:
."WIDERSTAND:";.3#P...1)E;" *10^ ";C;" O
HM".M#Z..:."TOLERANZ: ";T$(D).V#....10.|
#...:."NOCH EINE BERECHNUNG (J/N) ?"..#.
...X$..#...X$."J".570:U430..#... OHM ->
FARBC...#....O#....11)"OHM -> FARBCODE".
.#J...11)"==============="..#T..X.1.5..$
....2);X;" - ";T$(X)..$...X./$...:."OHM
: X *10^ Y".<$..."X: ";X.V$...X.1.X.
99..CU$;:.1020.C$..."Y: ";Y.}$...Y..2.Y.
6..CU$;:.1040..$$.Z.Y..$...Y..2.Y.11..$8
..Y..1.Y.10..$B..:."TOLERANZ:";T:A.T.U$L
..T.1.T.5..CU$;:.1090..$V..T.3.T.10..$`.
.T.4.T.11..$J..T.5.T.12..%T.F$.D(X)..%~.
.C(F$).1..2.940.1%..G1.E(H(F$,2)).C%..G2
.E(I(F$,1)).I%....R%..."DER FARBCODE DES
WIDERSTANDS MIT "..%...:.CL$X;" *10^ ";
Z;" OHM UND EINER TOLERANZ "CR$;.H%...:.
"VON ";T$(A);" LAUTET: "..%D..:..5)W$(G1
);W$(G2);W$(Y);W$(T)..%N...10..%X..:...&
... ABFRAGE NOCHMAL?.-&..."ZUM MENUE (J/
N) ?".6&....X$.K&...X$."N".940:U430.^&..
. PROGRAMMENDE.D&....}&..."SIND SIE SICH
ER ?"..&(...X$..&2..X$."N".300..&<...0,0
,39,24..&F..4,14..&P..4.4096.B&Z...N&D..
DATAS..&N.."SCHWARZ ","BRAUN ","ROT "..
'X.."ORANGE ","GELB ","GRUEN "..'..."BLA
U ","VIOLETT ","GRAU ".N'..."WEISS ","GO
LD ","SILBER ".I'..."-","+/- 1%","+/- 2%
"..' .."+/- 5%","+/-10%","+/-20%". '...
FEHLERBEHANDLUNG..'...&.A'...S(ER)" ERRO
R IN "EL;.G'H....'R..:."'W'EITER ODER 'E
'NDE ?"..'....X$..'...X$."E"....(...X$."
W".V ...(...1500.9(... FARBCODE ========
======128.Z(... 122365 BYTES MEMORY
==.{(... 003399 BYTES PROGRAM ==..(".
. 000014 BYTES VARIABLES ==..(,.. 00000
7 BYTES STRINGS ==..(6.. 000000 BYTES
ARRAYS ==..(@.. 054717 BYTES FREE (
0) ==. )J.. 064249 BYTES FREE (1) ==
.A)T.. ==========================...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL