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

MAGIC CLOCK

FILE INFORMATION

FILENAME(S): MAGIC CLOCK

FILE TYPE(S): PRG

FILE SIZE: 3.9K

FIRST SEEN: 2025-11-02 16:57:19

APPEARS ON: 1 disk(s)

FILE HASH

164f73f20720a7da24faa70da010eb00e3e8ecc296384afb3f27502ecb22bad0

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOAD RUN 02 MAGIC CLOCK PRG Treasure Chest - Romfreak 16 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 28 08 0A 00 8F 20  52 55 42 49 43 53 20 43  |..(.... RUBICS C|
00000010: 4C 4F 43 4B 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |LOCK============|
00000020: 3D 3D 3D 3D 3D 3D 3D 3D  00 44 08 14 00 8F 20 42  |========.D.... B|
00000030: 59 20 41 4C 46 4F 4E 53  20 4D 49 54 54 45 4C 4D  |Y ALFONS MITTELM|
00000040: 45 59 45 52 00 4A 08 1E  00 8F 00 68 08 28 00 8F  |EYER.J.....h.(..|
00000050: 20 46 55 45 52 20 43 4F  4D 4D 4F 44 4F 52 45 20  | FUER COMMODORE |
00000060: 43 4F 4D 50 55 54 45 52  00 83 08 32 00 8F 20 43  |COMPUTER...2.. C|
00000070: 31 31 36 2F 43 31 36 2F  50 34 2F 43 36 34 2F 43  |116/C16/P4/C64/C|
00000080: 31 32 38 00 89 08 3C 00  8F 00 A3 08 46 00 8F 20  |128...<.....F.. |
00000090: 42 45 49 53 50 49 45 4C  20 46 55 45 52 20 47 55  |BEISPIEL FUER GU|
000000A0: 54 45 4E 00 B9 08 50 00  8F 20 50 52 4F 47 52 41  |TEN...P.. PROGRA|
000000B0: 4D 4D 49 45 52 53 54 49  4C 00 E0 08 5A 00 8F 20  |MMIERSTIL...Z.. |
000000C0: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
000000D0: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
000000E0: 00 F7 08 64 00 8F 20 52  45 43 48 4E 45 52 41 4E  |...d.. RECHNERAN|
000000F0: 50 41 53 53 55 4E 47 00  04 09 6E 00 50 B2 C2 28  |PASSUNG...n.P..(|
00000100: 37 37 32 29 00 2C 09 78  00 52 58 B2 37 38 31 AC  |772).,.x.RX.781.|
00000110: 28 50 B2 31 32 34 29 AA  32 30 33 35 AC 28 50 B2  |(P.124).2035.(P.|
00000120: 38 36 29 AA 37 AC 28 50  B2 31 33 29 00 45 09 82  |86).7.(P.13).E..|
00000130: 00 52 58 B2 AB 52 58 3A  52 59 B2 52 58 AA 31 3A  |.RX..RX:RY.RX.1:|
00000140: 89 31 38 36 30 00 4B 09  8C 00 3A 00 73 09 96 00  |.1860.K...:.s...|
00000150: 8F 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 20 49 4E  |. ----------- IN|
00000160: 49 54 49 41 4C 49 53 49  45 52 55 4E 47 20 2D 2D  |ITIALISIERUNG --|
00000170: 2D 2D 2D 00 7E 09 A0 00  8F 20 49 4E 49 54 00 87  |---.~.... INIT..|
00000180: 09 AA 00 89 32 30 30 00  8D 09 B4 00 3A 00 9F 09  |....200.....:...|
00000190: BE 00 8F 20 41 55 53 47  41 42 45 49 4E 49 54 00  |... AUSGABEINIT.|
000001A0: BE 09 C8 00 59 4B B2 33  3A 58 4B B2 39 3A 8F 20  |....YK.3:XK.9:. |
000001B0: 52 41 48 4D 45 4E 50 4F  53 49 54 49 4F 4E 00 DF  |RAHMENPOSITION..|
000001C0: 09 D2 00 4C 52 24 B2 22  20 22 3A 5A 52 24 B2 C7  |...LR$." ":ZR$..|
000001D0: 28 31 38 29 AA 22 20 22  AA C7 28 31 34 36 29 00  |(18)." "..(146).|
000001E0: F8 09 DC 00 4C 46 24 B2  C7 28 31 37 29 3A 42 53  |....LF$..(17):BS|
000001F0: 24 B2 C7 28 31 35 37 29  00 28 0A E6 00 57 41 24  |$..(157).(...WA$|
00000200: B2 C7 28 31 39 35 29 3A  53 45 24 B2 C7 28 31 39  |..(195):SE$..(19|
00000210: 34 29 3A 4C 4F 24 B2 C7  28 31 37 36 29 3A 52 4F  |4):LO$..(176):RO|
00000220: 24 B2 C7 28 31 37 34 29  00 58 0A F0 00 4C 55 24  |$..(174).X...LU$|
00000230: B2 C7 28 31 37 33 29 3A  52 55 24 B2 C7 28 31 38  |..(173):RU$..(18|
00000240: 39 29 3A 53 49 24 B2 C7  28 31 32 32 29 3A 53 4F  |9):SI$..(122):SO|
00000250: 24 B2 C7 28 31 31 33 29  00 5E 0A FA 00 3A 00 6C  |$..(113).^...:.l|
00000260: 0A 04 01 8F 20 56 41 52  49 4E 49 54 00 78 0A 0E  |.... VARINIT.x..|
00000270: 01 86 20 46 28 34 33 29  00 92 0A 18 01 56 4F B2  |.. F(43).....VO.|
00000280: 30 3A 48 49 B2 32 32 3A  5A 45 B2 31 33 3A 53 43  |0:HI.22:ZE.13:SC|
00000290: B2 30 00 B1 0A 22 01 53  43 B2 30 3A 52 47 B2 34  |.0...".SC.0:RG.4|
000002A0: 3A 5A 45 B2 31 33 3A 56  4F B2 30 3A 48 49 B2 32  |:ZE.13:VO.0:HI.2|
000002B0: 32 00 D5 0A 2C 01 45 43  28 30 29 B2 30 3A 45 43  |2...,.EC(0).0:EC|
000002C0: 28 31 29 B2 32 3A 45 43  28 32 29 B2 36 3A 45 43  |(1).2:EC(2).6:EC|
000002D0: 28 33 29 B2 38 00 DB 0A  36 01 3A 00 EC 0A 40 01  |(3).8...6.:...@.|
000002E0: 8F 20 46 55 4E 4B 54 49  4F 4E 45 4E 00 08 0B 4A  |. FUNKTIONEN...J|
000002F0: 01 96 20 A5 20 59 50 28  4E 29 B2 B5 28 4E AD 33  |.. . YP(N)..(N.3|
00000300: 29 AC 36 AA 59 4B AA 33  00 2A 0B 54 01 96 20 A5  |).6.YK.3.*.T.. .|
00000310: 20 58 50 28 4E 29 B2 28  4E AB B5 28 4E AD 33 29  | XP(N).(N..(N.3)|
00000320: AC 33 29 AC 37 AA 58 4B  AA 33 00 40 0B 5E 01 96  |.3).7.XK.3.@.^..|
00000330: 20 A5 20 45 49 28 49 29  B2 46 28 49 AA 56 4F 29  | . EI(I).F(I.VO)|
00000340: 00 5E 0B 68 01 96 20 A5  20 5A 57 28 42 29 B2 28  |.^.h.. . ZW(B).(|
00000350: 45 43 28 41 29 AA 45 43  28 42 29 29 AD 32 00 83  |EC(A).EC(B)).2..|
00000360: 0B 72 01 96 20 A5 20 4B  4F 28 4E 29 B2 B6 28 4E  |.r.. . KO(N)..(N|
00000370: AA 31 32 AC 28 28 4E B2  30 29 B0 28 4E B2 31 33  |.12.((N.0).(N.13|
00000380: 29 29 29 00 A7 0B 7C 01  96 20 A5 20 45 58 28 4E  |)))...|.. . EX(N|
00000390: 29 B2 28 28 49 20 AF 20  A8 20 4E 29 B0 28 A8 20  |).((I . . N).(. |
000003A0: 49 20 AF 20 4E 29 29 00  CD 0B 86 01 96 20 A5 20  |I . N))...... . |
000003B0: 57 54 28 49 29 B2 CE 08  28 CE 08 28 A5 45 49 28  |WT(I)...(..(.EI(|
000003C0: 58 29 2C A5 45 49 28 49  29 29 2C 31 29 00 D3 0B  |X),.EI(I)),1)...|
000003D0: 90 01 3A 00 E2 0B 9A 01  8F 20 5A 45 49 54 49 4E  |..:...... ZEITIN|
000003E0: 49 54 00 EF 0B A4 01 58  B2 BB 28 AB 54 49 29 00  |IT.....X..(.TI).|
000003F0: 1A 0C AE 01 41 B2 5A 45  AA 56 4F 3A 81 49 B2 41  |....A.ZE.VO:.I.A|
00000400: 20 A4 20 41 AA 38 3A 46  28 49 29 B2 B5 28 BB 28  | . A.8:F(I)..(.(|
00000410: 31 29 AC 31 32 AA 31 29  3A 82 00 45 0C B8 01 41  |1).12.1):..E...A|
00000420: B2 5A 45 AA 48 49 3A 81  49 B2 41 20 A4 20 41 AA  |.ZE.HI:.I.A . A.|
00000430: 38 3A 46 28 49 29 B2 B5  28 BB 28 31 29 AC 31 32  |8:F(I)..(.(1).12|
00000440: AA 31 29 3A 82 00 7D 0C  C2 01 81 20 49 B2 30 20  |.1):..}.... I.0 |
00000450: A4 20 33 3A 46 28 5A 45  AA 48 49 AA 45 43 28 A5  |. 3:F(ZE.HI.EC(.|
00000460: 45 58 28 31 29 29 29 B2  A5 4B 4F 28 31 32 AB 46  |EX(1)))..KO(12.F|
00000470: 28 45 43 28 49 29 AA 5A  45 29 29 3A 82 00 83 0C  |(EC(I).ZE)):....|
00000480: CC 01 3A 00 94 0C D6 01  8F 20 53 43 48 41 4C 54  |..:...... SCHALT|
00000490: 49 4E 49 54 00 B4 0C E0  01 41 B2 53 43 AA 56 4F  |INIT.....A.SC.VO|
000004A0: 3A 81 49 B2 41 20 A4 20  41 AA 33 3A 46 28 49 29  |:.I.A . A.3:F(I)|
000004B0: B2 30 3A 82 00 D4 0C EA  01 41 B2 53 43 AA 48 49  |.0:......A.SC.HI|
000004C0: 3A 81 49 B2 41 20 A4 20  41 AA 33 3A 46 28 49 29  |:.I.A . A.3:F(I)|
000004D0: B2 31 3A 82 00 DF 0C F4  01 52 41 B2 30 3A 8E 00  |.1:......RA.0:..|
000004E0: E5 0C FE 01 3A 00 0C 0D  08 02 8F 20 2D 2D 2D 2D  |....:...... ----|
000004F0: 2D 2D 2D 2D 2D 2D 20 41  55 53 47 41 42 45 52 4F  |------ AUSGABERO|
00000500: 55 54 49 4E 45 4E 20 2D  2D 2D 2D 2D 00 17 0D 12  |UTINEN -----....|
00000510: 02 8F 20 50 4C 4F 54 00  30 0D 1C 02 97 52 58 2C  |.. PLOT.0....RX,|
00000520: 59 3A 97 52 59 2C 58 3A  9E 36 35 35 32 30 3A 8E  |Y:.RY,X:.65520:.|
00000530: 00 36 0D 26 02 3A 00 64  0D 30 02 8F 20 52 41 48  |.6.&.:.d.0.. RAH|
00000540: 4D 45 4E 28 59 4F 2C 58  4C 2C 59 55 2C 58 52 29  |MEN(YO,XL,YU,XR)|
00000550: 20 56 41 52 20 48 2C 56  2C 49 2C 58 2C 59 2C 41  | VAR H,V,I,X,Y,A|
00000560: 24 2C 42 24 00 7C 0D 3A  02 48 B2 58 52 AB 58 4C  |$,B$.|.:.H.XR.XL|
00000570: AB 31 3A 56 B2 59 55 AB  59 4F AB 31 00 A7 0D 44  |.1:V.YU.YO.1...D|
00000580: 02 59 B2 59 4F 3A 58 B2  58 4C 3A 41 24 B2 4C 4F  |.Y.YO:X.XL:A$.LO|
00000590: 24 3A 42 24 B2 52 4F 24  3A 8D 36 32 30 3A 58 B2  |$:B$.RO$:.620:X.|
000005A0: 58 52 3A 8D 36 33 30 00  CD 0D 4E 02 58 B2 58 4C  |XR:.630...N.X.XL|
000005B0: 3A 8D 36 33 30 3A 59 B2  59 55 3A 41 24 B2 4C 55  |:.630:Y.YU:A$.LU|
000005C0: 24 3A 42 24 B2 52 55 24  3A 89 36 32 30 00 D3 0D  |$:B$.RU$:.620...|
000005D0: 58 02 3A 00 F6 0D 62 02  8F 20 52 41 48 4D 48 28  |X.:...b.. RAHMH(|
000005E0: 59 2C 58 2C 41 24 2C 42  24 29 2C 20 52 41 48 4D  |Y,X,A$,B$), RAHM|
000005F0: 56 28 59 2C 58 29 00 20  0E 6C 02 8D 35 34 30 3A  |V(Y,X). .l..540:|
00000600: 20 99 41 24 3B 3A 20 81  49 B2 31 20 A4 20 48 3A  | .A$;: .I.1 . H:|
00000610: 20 99 57 41 24 3B 3A 82  3A 20 99 42 24 3A 20 8E  | .WA$;:.: .B$: .|
00000620: 00 47 0E 76 02 8D 35 34  30 3A 20 81 20 49 B2 31  |.G.v..540: . I.1|
00000630: 20 A4 20 56 3A 20 99 4C  46 24 53 45 24 42 53 24  | . V: .LF$SE$BS$|
00000640: 3B 3A 20 82 3A 20 8E 00  4D 0E 80 02 3A 00 5D 0E  |;: .: ..M...:.].|
00000650: 8A 02 8F 20 55 48 52 52  41 48 4D 45 4E 00 84 0E  |... UHRRAHMEN...|
00000660: 94 02 59 4F B2 59 4B 3A  59 55 B2 59 4B AA 31 38  |..YO.YK:YU.YK.18|
00000670: 3A 58 4C B2 58 4B 3A 58  52 B2 58 4B AA 32 31 3A  |:XL.XK:XR.XK.21:|
00000680: 8D 35 37 30 00 A6 0E 9E  02 81 20 4A B2 30 20 A4  |.570...... J.0 .|
00000690: 20 38 3A 59 4F B2 A5 59  50 28 4A 29 AB 31 3A 59  | 8:YO..YP(J).1:Y|
000006A0: 55 B2 59 4F AA 32 00 C7  0E A8 02 58 4C B2 A5 58  |U.YO.2.....XL..X|
000006B0: 50 28 4A 29 AB 31 3A 58  52 B2 58 4C AA 33 3A 8D  |P(J).1:XR.XL.3:.|
000006C0: 35 37 30 3A 82 3A 8E 00  CD 0E B2 02 3A 00 E2 0E  |570:.:......:...|
000006D0: BC 02 8F 20 53 43 48 41  4C 54 50 4C 41 54 5A 28  |... SCHALTPLATZ(|
000006E0: 49 29 00 0C 0F C6 02 58  B2 58 4B AA 37 AA 28 49  |I).....X.XK.7.(I|
000006F0: 20 AF 20 31 29 AC 37 3A  59 B2 59 4B AA 36 AA B5  | . 1).7:Y.YK.6..|
00000700: 28 49 AD 32 29 AC 36 3A  89 35 34 30 00 12 0F D0  |(I.2).6:.540....|
00000710: 02 3A 00 27 0F DA 02 8F  20 53 43 48 41 4C 54 53  |.:.'.... SCHALTS|
00000720: 54 45 4C 4C 55 4E 47 00  4A 0F E4 02 41 24 B2 53  |TELLUNG.J...A$.S|
00000730: 49 24 3A 8B 20 46 28 49  AA 56 4F AA 53 43 29 B2  |I$:. F(I.VO.SC).|
00000740: 30 20 A7 20 41 24 B2 53  4F 24 00 55 0F EE 02 99  |0 . A$.SO$.U....|
00000750: 41 24 3B 3A 8E 00 5B 0F  F8 02 3A 00 71 0F 02 03  |A$;:..[...:.q...|
00000760: 8F 20 5A 45 49 47 53 43  48 41 4C 54 45 52 28 49  |. ZEIGSCHALTER(I|
00000770: 29 00 7F 0F 0C 03 8D 37  31 30 3A 89 37 34 30 00  |)......710:.740.|
00000780: 85 0F 16 03 3A 00 96 0F  20 03 8F 20 53 43 48 41  |....:... .. SCHA|
00000790: 4C 54 42 49 4C 44 00 AE  0F 2A 03 81 20 49 B2 30  |LTBILD...*.. I.0|
000007A0: 20 A4 20 33 3A 20 8D 37  38 30 3A 82 3A 8E 00 B4  | . 3: .780:.:...|
000007B0: 0F 34 03 3A 00 C3 0F 3E  03 8F 20 5A 45 49 47 5A  |.4.:...>.. ZEIGZ|
000007C0: 45 49 54 00 01 10 48 03  81 20 49 B2 30 20 A4 20  |EIT...H.. I.0 . |
000007D0: 38 3A 58 B2 A5 58 50 28  49 29 3A 59 B2 A5 59 50  |8:X..XP(I):Y..YP|
000007E0: 28 49 29 3A 8D 35 34 30  3A 99 C9 28 22 20 22 AA  |(I):.540:..(" ".|
000007F0: C4 28 46 28 49 AA 5A 45  AA 56 4F 29 29 2C 32 29  |.(F(I.ZE.VO)),2)|
00000800: 3B 00 09 10 52 03 82 3A  8E 00 0F 10 5C 03 3A 00  |;...R..:....\.:.|
00000810: 21 10 66 03 8F 20 5A 45  49 47 52 41 44 28 52 41  |!.f.. ZEIGRAD(RA|
00000820: 29 00 32 10 70 03 8D 39  34 30 3A 99 5A 52 24 3B  |).2.p..940:.ZR$;|
00000830: 3A 8E 00 38 10 7A 03 3A  00 4C 10 84 03 8F 20 4C  |:..8.z.:.L.... L|
00000840: 4F 45 53 43 48 52 41 44  28 52 41 29 00 5D 10 8E  |OESCHRAD(RA).]..|
00000850: 03 8D 39 34 30 3A 99 4C  52 24 3B 3A 8E 00 63 10  |..940:.LR$;:..c.|
00000860: 98 03 3A 00 75 10 A2 03  8F 20 52 41 44 50 4C 41  |..:.u.... RADPLA|
00000870: 54 5A 28 49 29 00 A3 10  AC 03 58 B2 58 4B AB 31  |TZ(I).....X.XK.1|
00000880: AA 28 52 41 20 AF 20 31  29 AC 32 33 3A 59 B2 59  |.(RA . 1).23:Y.Y|
00000890: 4B AB 31 AA B5 28 52 41  AD 32 29 AC 32 30 3A 89  |K.1..(RA.2).20:.|
000008A0: 35 34 30 00 A9 10 B6 03  3A 00 D0 10 C0 03 8F 20  |540.....:...... |
000008B0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 20 52 49 45 47  |----------- RIEG|
000008C0: 45 4C 2D 4C 4F 47 49 4B  20 2D 2D 2D 2D 2D 2D 2D  |EL-LOGIK -------|
000008D0: 00 E3 10 CA 03 8F 20 45  49 4E 53 55 4D 4D 45 28  |...... EINSUMME(|
000008E0: 2F 4E 29 00 0C 11 D4 03  4E B2 30 3A 41 B2 53 43  |/N).....N.0:A.SC|
000008F0: AA 56 4F 3A 81 20 49 B2  41 20 A4 20 41 AA 33 3A  |.VO:. I.A . A.3:|
00000900: 4E B2 4E AA 46 28 49 29  3A 82 3A 8E 00 12 11 DE  |N.N.F(I):.:.....|
00000910: 03 3A 00 23 11 E8 03 8F  20 45 43 4B 52 49 45 47  |.:.#.... ECKRIEG|
00000920: 45 4C 4E 00 48 11 F2 03  81 20 41 B2 30 20 A4 20  |ELN.H.... A.0 . |
00000930: 33 3A 49 B2 A5 45 49 28  41 29 3A 49 B2 A5 45 58  |3:I..EI(A):I..EX|
00000940: 28 A5 45 49 28 58 29 29  00 66 11 FC 03 46 28 56  |(.EI(X)).f...F(V|
00000950: 4F AA 52 47 AA 45 43 28  41 29 29 B2 A5 45 58 28  |O.RG.EC(A))..EX(|
00000960: 31 29 3A 82 3A 8E 00 6C  11 06 04 3A 00 7E 11 10  |1):.:..l...:.~..|
00000970: 04 8F 20 54 45 49 4C 52  49 45 47 45 4C 4E 00 9A  |.. TEILRIEGELN..|
00000980: 11 1A 04 8D 39 38 30 3A  8B 20 46 28 58 AA 56 4F  |....980:. F(X.VO|
00000990: 29 B2 30 20 A7 20 31 31  31 30 00 A0 11 24 04 3A  |).0 . 1110...$.:|
000009A0: 00 AE 11 2E 04 8F 20 55  4E 54 46 41 4C 4C 00 CC  |...... UNTFALL..|
000009B0: 11 38 04 91 20 4E 20 89  20 31 32 36 30 2C 31 32  |.8.. N . 1260,12|
000009C0: 30 30 2C 31 32 30 30 2C  31 32 30 30 00 D2 11 42  |00,1200,1200...B|
000009D0: 04 3A 00 DF 11 4C 04 8F  20 4F 42 46 41 4C 4C 00  |.:...L.. OBFALL.|
000009E0: FF 11 56 04 91 20 4E AA  31 20 89 20 31 32 33 30  |..V.. N.1 . 1230|
000009F0: 2C 31 32 33 30 2C 31 33  37 30 2C 31 32 30 30 00  |,1230,1370,1200.|
00000A00: 05 12 60 04 3A 00 14 12  6A 04 8F 20 41 4C 4C 45  |..`.:...j.. ALLE|
00000A10: 53 28 57 29 00 3A 12 74  04 41 44 B2 52 47 AA 56  |S(W).:.t.AD.RG.V|
00000A20: 4F 3A 81 20 49 B2 41 44  20 A4 20 41 44 AA 38 3A  |O:. I.AD . AD.8:|
00000A30: 46 28 49 29 B2 57 3A 82  3A 8E 00 40 12 7E 04 3A  |F(I).W:.:..@.~.:|
00000A40: 00 4E 12 88 04 8F 20 52  49 45 47 45 4C 4E 00 7C  |.N.... RIEGELN.||
00000A50: 12 92 04 58 B2 52 41 3A  8D 31 30 35 30 3A 8D 31  |...X.RA:.1050:.1|
00000A60: 35 32 30 3A 49 B2 58 3A  58 B2 A5 45 58 28 31 29  |520:I.X:X..EX(1)|
00000A70: 3A 8D 31 30 35 30 3A 89  31 35 32 30 00 82 12 9C  |:.1050:.1520....|
00000A80: 04 3A 00 93 12 A6 04 8F  20 56 45 52 52 49 45 47  |.:...... VERRIEG|
00000A90: 45 4C 4E 00 A7 12 B0 04  57 B2 30 3A 8D 31 31 34  |ELN.....W.0:.114|
00000AA0: 30 3A 89 31 30 31 30 00  AD 12 BA 04 3A 00 BE 12  |0:.1010.....:...|
00000AB0: C4 04 8F 20 45 4E 54 52  49 45 47 45 4C 4E 00 D2  |... ENTRIEGELN..|
00000AC0: 12 CE 04 57 B2 31 3A 8D  31 31 34 30 3A 89 31 30  |...W.1:.1140:.10|
00000AD0: 31 30 00 D8 12 D8 04 3A  00 EC 12 E2 04 8F 20 45  |10.....:...... E|
00000AE0: 49 4E 4B 4E 4F 50 46 55  4E 54 45 4E 00 07 13 EC  |INKNOPFUNTEN....|
00000AF0: 04 8D 31 32 33 30 3A 49  B2 58 3A 49 B2 A5 45 58  |..1230:I.X:I..EX|
00000B00: 28 33 29 3A 41 B2 49 00  22 13 F6 04 46 28 56 4F  |(3):A.I."...F(VO|
00000B10: AA 52 47 AA A5 5A 57 28  A5 45 58 28 31 29 29 29  |.RG..ZW(.EX(1)))|
00000B20: B2 30 00 3D 13 00 05 46  28 56 4F AA 52 47 AA A5  |.0.=...F(VO.RG..|
00000B30: 5A 57 28 A5 45 58 28 32  29 29 29 B2 30 00 43 13  |ZW(.EX(2))).0.C.|
00000B40: 0A 05 8E 00 49 13 14 05  3A 00 56 13 1E 05 8F 20  |....I...:.V.... |
00000B50: 57 45 4C 43 48 45 00 64  13 28 05 81 20 49 B2 30  |WELCHE.d.(.. I.0|
00000B60: 20 A4 20 33 00 7D 13 32  05 8B 20 A5 45 49 28 49  | . 3.}.2.. .EI(I|
00000B70: 29 B2 31 20 A7 20 42 B2  41 3A 41 B2 49 00 8E 13  |).1 . B.A:A.I...|
00000B80: 3C 05 82 3A 41 B2 A5 5A  57 28 42 29 3A 8E 00 94  |<..:A..ZW(B):...|
00000B90: 13 46 05 3A 00 A8 13 50  05 8F 20 5A 57 45 49 4B  |.F.:...P.. ZWEIK|
00000BA0: 4E 4F 50 46 4F 42 45 4E  00 B6 13 5A 05 8D 31 32  |NOPFOBEN...Z..12|
00000BB0: 33 30 3A 49 B2 58 00 E3  13 64 05 8B 20 A5 45 49  |30:I.X...d.. .EI|
00000BC0: 28 58 29 B3 B1 A5 45 49  28 A5 45 58 28 33 29 29  |(X)...EI(.EX(3))|
00000BD0: A7 8D 31 33 32 30 3A 46  28 52 47 AA 56 4F AA 41  |..1320:F(RG.VO.A|
00000BE0: 29 B2 30 00 E9 13 6E 05  8E 00 EF 13 78 05 3A 00  |).0...n.....x.:.|
00000BF0: 15 14 82 05 8F 20 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |..... ----------|
00000C00: 2D 2D 2D 20 54 45 49 4C  50 52 4F 47 52 41 4D 4D  |--- TEILPROGRAMM|
00000C10: 45 20 2D 2D 2D 00 22 14  8C 05 8F 20 4E 55 4D 4D  |E ---.".... NUMM|
00000C20: 45 52 00 36 14 96 05 58  B2 28 C6 28 43 24 29 AB  |ER.6...X.(.(C$).|
00000C30: 31 29 AF 33 3A 8E 00 3C  14 A0 05 3A 00 4B 14 AA  |1).3:..<...:.K..|
00000C40: 05 8F 20 53 43 48 41 4C  54 45 4E 00 5B 14 B4 05  |.. SCHALTEN.[...|
00000C50: 8D 31 34 39 30 3A 89 31  34 39 30 00 61 14 BE 05  |.1490:.1490.a...|
00000C60: 3A 00 77 14 C8 05 8F 20  54 45 49 4C 53 43 48 41  |:.w.... TEILSCHA|
00000C70: 4C 54 45 4E 28 58 29 00  AD 14 D2 05 41 B2 58 AA  |LTEN(X).....A.X.|
00000C80: 53 43 AA 56 4F 3A 49 B2  46 28 41 29 3A 46 28 41  |SC.VO:I.F(A):F(A|
00000C90: 29 B2 A5 45 58 28 31 29  3A 8D 31 35 32 30 3A 49  |)..EX(1):.1520:I|
00000CA0: B2 58 3A 58 B2 A5 45 58  28 31 29 3A 8E 00 B3 14  |.X:X..EX(1):....|
00000CB0: DC 05 3A 00 C0 14 E6 05  8F 20 57 45 4E 44 45 4E  |..:...... WENDEN|
00000CC0: 00 D6 14 F0 05 41 B2 56  4F 3A 56 4F B2 48 49 3A  |.....A.VO:VO.HI:|
00000CD0: 48 49 B2 41 3A 8E 00 DC  14 FA 05 3A 00 EC 14 04  |HI.A:......:....|
00000CE0: 06 8F 20 53 43 48 41 4C  54 55 4E 47 00 0B 15 0E  |.. SCHALTUNG....|
00000CF0: 06 8D 31 34 33 30 3A 8D  31 34 36 30 3A 49 B2 58  |..1430:.1460:I.X|
00000D00: 3A 8D 37 38 30 3A 89 31  31 37 30 00 11 15 18 06  |:.780:.1170.....|
00000D10: 3A 00 1F 15 22 06 8F 20  57 45 4E 44 55 4E 47 00  |:...".. WENDUNG.|
00000D20: 3C 15 2C 06 8D 39 31 30  3A 49 B2 52 41 3A 52 41  |<.,..910:I.RA:RA|
00000D30: B2 A5 45 58 28 31 29 3A  8D 38 38 30 00 50 15 36  |..EX(1):.880.P.6|
00000D40: 06 8D 31 35 32 30 3A 8D  38 31 30 3A 89 38 34 30  |..1520:.810:.840|
00000D50: 00 56 15 40 06 3A 00 63  15 4A 06 8F 20 44 52 45  |.V.@.:.c.J.. DRE|
00000D60: 48 45 4E 00 78 15 54 06  8D 31 36 35 30 3A 58 B2  |HEN.x.T..1650:X.|
00000D70: AB 58 3A 89 31 36 35 30  00 7E 15 5E 06 3A 00 8D  |.X:.1650.~.^.:..|
00000D80: 15 68 06 54 45 49 4C 44  52 45 48 45 4E 00 A8 15  |.h.TEILDREHEN...|
00000D90: 72 06 41 44 B2 52 47 AA  56 4F 3A 81 20 49 B2 41  |r.AD.RG.VO:. I.A|
00000DA0: 44 20 A4 20 41 44 AA 38  00 CC 15 7C 06 8B 20 46  |D . AD.8...|.. F|
00000DB0: 28 49 29 B2 31 20 A7 20  46 28 49 AA 39 29 B2 A5  |(I).1 . F(I.9)..|
00000DC0: 4B 4F 28 46 28 49 AA 39  29 AA 58 29 00 D8 15 86  |KO(F(I.9).X)....|
00000DD0: 06 82 3A 89 31 35 32 30  00 DE 15 90 06 3A 00 EC  |..:.1520.....:..|
00000DE0: 15 9A 06 8F 20 44 52 45  48 55 4E 47 00 04 16 A4  |.... DREHUNG....|
00000DF0: 06 58 B2 31 3A 8B 20 43  24 B2 22 2D 22 20 A7 20  |.X.1:. C$."-" . |
00000E00: 58 B2 AB 31 00 13 16 AE  06 8D 31 36 32 30 3A 89  |X..1......1620:.|
00000E10: 38 34 30 00 19 16 B8 06  3A 00 27 16 C2 06 8F 20  |840.....:.'.... |
00000E20: 52 41 44 57 41 48 4C 00  4C 16 CC 06 8D 39 31 30  |RADWAHL.L....910|
00000E30: 3A 8D 31 39 30 30 3A 8D  31 34 33 30 3A 52 41 B2  |:.1900:.1430:RA.|
00000E40: 58 3A 8D 38 38 30 3A 89  31 31 37 30 00 52 16 D6  |X:.880:.1170.R..|
00000E50: 06 3A 00 78 16 E0 06 8F  20 2D 2D 2D 2D 2D 2D 2D  |.:.x.... -------|
00000E60: 2D 2D 2D 2D 2D 2D 20 48  41 55 50 54 50 52 4F 47  |------ HAUPTPROG|
00000E70: 52 41 4D 4D 20 2D 2D 2D  00 85 16 EA 06 8F 20 41  |RAMM ---...... A|
00000E80: 4E 46 41 4E 47 00 B0 16  F4 06 99 C7 28 31 34 37  |NFANG.......(147|
00000E90: 29 3A 8D 31 37 30 3A 8D  36 36 30 3A 8D 38 31 30  |):.170:.660:.810|
00000EA0: 3A 8D 38 34 30 3A 8D 38  38 30 3A 89 31 31 37 30  |:.840:.880:.1170|
00000EB0: 00 B6 16 FE 06 3A 00 C8  16 08 07 8F 20 54 41 53  |.....:...... TAS|
00000EC0: 54 57 45 52 54 55 4E 47  00 F7 16 12 07 4E B2 30  |TWERTUNG.....N.0|
00000ED0: 3A 81 49 B2 31 A4 38 3A  8B 43 24 B2 CA 28 22 31  |:.I.1.8:.C$..("1|
00000EE0: 32 33 34 2E 2B 2D 30 22  2C 49 2C 31 29 20 A7 20  |234.+-0",I,1) . |
00000EF0: 4E B2 49 3A 49 B2 38 00  2B 17 1C 07 82 3A 91 20  |N.I:I.8.+....:. |
00000F00: 4E 20 89 20 31 35 35 30  2C 31 35 35 30 2C 31 35  |N . 1550,1550,15|
00000F10: 35 30 2C 31 35 35 30 2C  31 37 34 30 2C 31 37 30  |50,1550,1740,170|
00000F20: 30 2C 31 37 30 30 2C 31  35 38 30 00 31 17 26 07  |0,1700,1580.1.&.|
00000F30: 8E 00 37 17 30 07 3A 00  4B 17 3A 07 8F 20 48 41  |..7.0.:.K.:.. HA|
00000F40: 55 50 54 53 43 48 4C 45  49 46 45 00 55 17 44 07  |UPTSCHLEIFE.U.D.|
00000F50: 8D 31 37 38 30 00 6B 17  4E 07 8D 31 39 30 30 3A  |.1780.k.N..1900:|
00000F60: 8D 31 38 31 30 3A 89 31  38 37 30 00 71 17 58 07  |.1810:.1870.q.X.|
00000F70: 3A 00 7F 17 62 07 8F 20  45 49 4E 47 41 42 45 00  |:...b.. EINGABE.|
00000F80: 97 17 6C 07 A1 20 43 24  3A 8B 20 43 24 B2 22 22  |..l.. C$:. C$.""|
00000F90: 20 A7 20 31 39 30 30 00  9D 17 76 07 8E 00 A3 17  | . 1900...v.....|
00000FA0: 80 07 3A 00 C9 17 8A 07  8F 20 3D 3D 3D 3D 3D 3D  |..:...... ======|
00000FB0: 3D 3D 3D 3D 3D 20 45 20  4E 20 44 20 45 20 3D 3D  |===== E N D E ==|
00000FC0: 3D 3D 3D 3D 3D 3D 3D 3D  3D 00 00 00              |=========...    |
..(.... RUBICS CLOCK====================
.D.... BY ALFONS MITTELMEYER.J.....H.(..
 FUER COMMODORE COMPUTER...2.. C116/C16/
P4/C64/C128...<.....F.. BEISPIEL FUER GU
TEN...P.. PROGRAMMIERSTIL...Z.. ========
========================...D.. RECHNERAN
PASSUNG...N.P.B(772).,.X.RX.781.(P.124).
2035.(P.86).7.(P.13).E...RX..RX:RY.RX.1:
.1860.K...:.S.... ----------- INITIALISI
ERUNG -----.~. .. INIT......200.....:...
... AUSGABEINIT...H.YK.3:XK.9:. RAHMENPO
SITION...R.LR$." ":ZR$.G(18)." ".G(146).
....LF$.G(17):BS$.G(157).(...WA$.G(195):
SE$.G(194):LO$.G(176):RO$.G(174).X...LU$
.G(173):RU$.G(189):SI$.G(122):SO$.G(113)
.^...:.L.... VARINIT.X.... F(43).....VO.
0:HI.22:ZE.13:SC.0...".SC.0:RG.4:ZE.13:V
O.0:HI.22.U.,.EC(0).0:EC(1).2:EC(2).6:EC
(3).8...6.:...@.. FUNKTIONEN...J.. . YP(
N)..(N.3).6.YK.3.*.T.. . XP(N).(N..(N.3)
.3).7.XK.3.@.^.. . EI(I).F(I.VO).^.H.. .
 ZW(B).(EC(A).EC(B)).2...R.. . KO(N)..(N
.12.((N.0).(N.13)))...|.. . EX(N).((I . 
. N).(. I . N)).M.... . WT(I).N.(N.(.EI(
X),.EI(I)),1).S...:...... ZEITINIT.....X
..(.TI).....A.ZE.VO:.I.A . A.8:F(I)..(.(
1).12.1):..E...A.ZE.HI:.I.A . A.8:F(I)..
(.(1).12.1):..}.B.. I.0 . 3:F(ZE.HI.EC(.
EX(1)))..KO(12.F(EC(I).ZE)):....L.:...V.
. SCHALTINIT.....A.SC.VO:.I.A . A.3:F(I)
.0:..T...A.SC.HI:.I.A . A.3:F(I).1:.....
.RA.0:......:...... ---------- AUSGABERO
UTINEN -----...... PLOT.0....RX,Y:.RY,X:
.65520:..6.&.:.D.0.. RAHMEN(YO,XL,YU,XR)
 VAR H,V,I,X,Y,A$,B$.|.:.H.XR.XL.1:V.YU.
YO.1...D.Y.YO:X.XL:A$.LO$:B$.RO$:.620:X.
XR:.630.M.N.X.XL:.630:Y.YU:A$.LU$:B$.RU$
:.620.S.X.:...B.. RAHMH(Y,X,A$,B$), RAHM
V(Y,X). .L..540: .A$;: .I.1 . H: .WA$;:.
: .B$: ..G.V..540: . I.1 . V: .LF$SE$BS$
;: .: ..M...:.].... UHRRAHMEN.....YO.YK:
YU.YK.18:XL.XK:XR.XK.21:.570...... J.0 .
 8:YO..YP(J).1:YU.YO.2.G...XL..XP(J).1:X
R.XL.3:.570:.:..M...:...... SCHALTPLATZ(
I)...F.X.XK.7.(I . 1).7:Y.YK.6..(I.2).6:
.540...P.:.'.Z.. SCHALTSTELLUNG.J...A$.S
I$:. F(I.VO.SC).0 . A$.SO$.U....A$;:..[.
..:.Q.... ZEIGSCHALTER(I).....710:.740.
....:... .. SCHALTBILD...*.. I.0 . 3: .7
80:.:....4.:.C.>.. ZEIGZEIT...H.. I.0 . 
8:X..XP(I):Y..YP(I):.540:.I(" ".D(F(I.ZE
.VO)),2);...R..:....\.:.!.F.. ZEIGRAD(RA
).2.P..940:.ZR$;:..8.Z.:.L.... LOESCHRAD
(RA).]....940:.LR$;:..C...:.U.... RADPLA
TZ(I).....X.XK.1.(RA . 1).23:Y.YK.1..(RA
.2).20:.540.....:.P.... ----------- RIEG
EL-LOGIK -------...J.. EINSUMME(/N)...T.
N.0:A.SC.VO:. I.A . A.3:N.N.F(I):.:.....
.:.#.... ECKRIEGELN.H.... A.0 . 3:I..EI(
A):I..EX(.EI(X)).F...F(VO.RG.EC(A))..EX(
1):.:..L...:.~.... TEILRIEGELN......980:
. F(X.VO).0 . 1110. .$.:...... UNTFALL.L
.8.. N . 1260,1200,1200,1200.R.B.:...L..
 OBFALL...V.. N.1 . 1230,1230,1370,1200.
..`.:...J.. ALLES(W).:.T.AD.RG.VO:. I.AD
 . AD.8:F(I).W:.:..@.~.:.N.... RIEGELN.|
...X.RA:.1050:.1520:I.X:X..EX(1):.1050:.
1520.....:...... VERRIEGELN.....W.0:.114
0:.1010.....:...D.. ENTRIEGELN.R.N.W.1:.
1140:.1010.X.X.:...... EINKNOPFUNTEN....
..1230:I.X:I..EX(3):A.I."...F(VO.RG..ZW(
.EX(1))).0.=...F(VO.RG..ZW(.EX(2))).0.C.
....I...:.V.... WELCHE.D.(.. I.0 . 3.}.2
.. .EI(I).1 . B.A:A.I...<..:A..ZW(B):...
.F.:...P.. ZWEIKNOPFOBEN...Z..1230:I.X..
.D.. .EI(X)...EI(.EX(3))..1320:F(RG.VO.A
).0...N.....X.:...... ------------- TEIL
PROGRAMME ---.".... NUMMER.6...X.(F(C$).
1).3:..<. .:.K.... SCHALTEN.[....1490:.1
490.A...:.W.H.. TEILSCHALTEN(X)...R.A.X.
SC.VO:I.F(A):F(A)..EX(1):.1520:I.X:X..EX
(1):......:...... WENDEN.V...A.VO:VO.HI:
HI.A:......:...... SCHALTUNG......1430:.
1460:I.X:.780:.1170.....:...".. WENDUNG.
<.,..910:I.RA:RA..EX(1):.880.P.6..1520:.
810:.840.V.@.:.C.J.. DREHEN.X.T..1650:X.
.X:.1650.~.^.:...H.TEILDREHEN...R.AD.RG.
VO:. I.AD . AD.8.L.|.. F(I).1 . F(I.9)..
KO(F(I.9).X).X....:.1520.....:...... DRE
HUNG.....X.1:. C$."-" . X..1......1620:.
840.....:.'.B.. RADWAHL.L.L..910:.1900:.
1430:RA.X:.880:.1170.R.V.:.X.... -------
------ HAUPTPROGRAMM ---...... ANFANG...
...G(147):.170:.660:.810:.840:.880:.1170
.....:.H.... TASTWERTUNG.....N.0:.I.1.8:
.C$.J("1234.+-0",I,1) . N.I:I.8.+....:. 
N . 1550,1550,1550,1550,1740,1700,1700,1
580.1.&...7.0.:.K.:.. HAUPTSCHLEIFE.U.D.
.1780.K.N..1900:.1810:.1870.Q.X.:..B.. 
EINGABE...L.. C$:. C$."" . 1900...V.....
..:.I.... =========== E N D E ==========
=...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL