KALENDER 2300
FILE INFORMATION
FILENAME(S): KALENDER 2300
FILE TYPE(S): PRG
FILE SIZE: 11.2K
FIRST SEEN: 2025-11-02 16:39:14
APPEARS ON: 1 disk(s)
FILE HASH
16ec01d6f08cb17d16920b5d09696994a809fe49551a48c7eed9428fc54ed912
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMMODORE DISC50 | KALENDER 2300 | PRG | Treasure Chest - Plattfuss | 6 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 23 1C 0A 00 8F 20 4B 41 4C 45 4E 44 45 52 |..#.... KALENDER|
00000010: 3D 32 33 30 30 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 43 |=2300==========C|
00000020: 31 32 38 00 41 1C 14 00 8F 20 28 50 29 20 43 4F |128.A.... (P) CO|
00000030: 4D 4D 4F 44 4F 52 45 20 44 49 53 43 20 54 45 41 |MMODORE DISC TEA|
00000040: 4D 00 63 1C 1E 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |M.c.... ========|
00000050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000060: 3D 3D 3D 00 85 1C 28 00 8F 20 28 43 29 20 42 59 |===...(.. (C) BY|
00000070: 20 46 57 4B 20 20 20 20 20 20 20 20 20 20 20 20 | FWK |
00000080: 20 56 33 2E 35 00 9B 1C 32 00 8F 20 20 20 20 20 | V3.5...2.. |
00000090: 20 20 20 57 49 45 53 4C 4F 43 48 00 A1 1C 3C 00 | WIESLOCH...<.|
000000A0: 8F 00 C3 1C 46 00 8F 20 28 56 29 20 41 2E 4D 2E |....F.. (V) A.M.|
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 | V|
000000C0: 32 2E 30 00 E5 1C 50 00 8F 20 28 56 29 20 4A 2E |2.0...P.. (V) J.|
000000D0: 20 48 45 55 42 4C 20 20 20 20 20 20 20 20 20 20 | HEUBL |
000000E0: 20 56 37 2E 30 00 EB 1C 5A 00 8F 00 0B 1D 64 00 | V7.0...Z.....d.|
000000F0: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |. ==============|
00000100: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 21 1D 68 00 |===========.!.h.|
00000110: E8 3A D7 33 37 33 30 3A E7 30 2C 31 3A E7 34 2C |.:.3730:.0,1:.4,|
00000120: 31 00 35 1D 69 00 8B 20 CE 09 28 32 29 B2 38 30 |1.5.i.. ..(2).80|
00000130: 20 A7 20 FE 18 00 4E 1D 6A 00 3A E7 36 2C 31 3A | . ...N.j.:.6,1:|
00000140: FE 1A 32 30 2C 30 2C 35 39 2C 32 34 2C 31 00 55 |..20,0,59,24,1.U|
00000150: 1D 6B 00 FE 19 00 5F 1D 6E 00 8D 34 33 32 30 00 |.k...._.n..4320.|
00000160: 7C 1D 78 00 E0 2C 31 33 2C 31 31 2C 22 42 49 54 ||.x..,13,11,"BIT|
00000170: 54 45 20 57 41 52 54 45 4E 20 21 22 00 9D 1D 82 |TE WARTEN !"....|
00000180: 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.. =============|
00000190: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 BB 1D |=============...|
000001A0: 8C 00 8F 20 56 41 52 49 41 42 4C 45 20 44 49 4D |... VARIABLE DIM|
000001B0: 45 4E 53 49 4F 4E 49 45 52 45 4E 00 DC 1D 96 00 |ENSIONIEREN.....|
000001C0: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |. ==============|
000001D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 14 1E A0 |============....|
000001E0: 00 86 20 4D 4F 24 28 31 32 29 2C 54 41 24 28 37 |.. MO$(12),TA$(7|
000001F0: 29 2C 4D 43 28 31 33 29 2C 53 42 28 32 38 29 2C |),MC(13),SB(28),|
00000200: 47 4A 28 37 29 2C 5A 53 28 37 29 2C 4F 47 28 37 |GJ(7),ZS(7),OG(7|
00000210: 2C 31 39 29 00 3E 1E AA 00 86 20 46 31 24 28 33 |,19).>.... F1$(3|
00000220: 32 29 2C 46 31 28 33 32 29 2C 46 32 28 33 32 29 |2),F1(32),F2(32)|
00000230: 2C 46 33 28 33 32 29 2C 56 32 28 33 32 29 00 5F |,F3(32),V2(32)._|
00000240: 1E B4 00 86 20 48 31 24 28 31 36 29 2C 48 31 28 |.... H1$(16),H1(|
00000250: 31 36 29 2C 48 33 28 31 36 29 3A 89 39 32 30 00 |16),H3(16):.920.|
00000260: 80 1E BE 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |..... ==========|
00000270: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000280: 00 91 1E C8 00 8F 20 44 41 54 41 5A 45 49 4C 45 |...... DATAZEILE|
00000290: 4E 00 B2 1E D2 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |N...... ========|
000002A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000002B0: 3D 3D 00 CF 1E DC 00 8F 20 4D 4F 4E 41 54 53 4E |==...... MONATSN|
000002C0: 41 4D 45 4E 20 20 3D 20 4D 4F 24 28 31 32 29 00 |AMEN = MO$(12).|
000002D0: F0 1E E6 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |..... ==========|
000002E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000002F0: 00 1A 1F F0 00 83 20 4A 41 4E 55 41 52 2C 46 45 |...... JANUAR,FE|
00000300: 42 52 55 41 52 2C 4D 41 45 52 5A 2C 41 50 52 49 |BRUAR,MAERZ,APRI|
00000310: 4C 2C 4D 41 49 2C 4A 55 4E 49 00 50 1F FA 00 83 |L,MAI,JUNI.P....|
00000320: 20 4A 55 4C 49 2C 41 55 47 55 53 54 2C 53 45 50 | JULI,AUGUST,SEP|
00000330: 54 45 4D 42 45 52 2C 4F 4B 54 4F 42 45 52 2C 4E |TEMBER,OKTOBER,N|
00000340: 4F 56 45 4D 42 45 52 2C 44 45 5A 45 4D 42 45 52 |OVEMBER,DEZEMBER|
00000350: 00 71 1F 04 01 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D |.q.... =========|
00000360: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000370: 3D 00 8C 1F 0E 01 8F 20 54 41 47 45 53 4E 41 4D |=...... TAGESNAM|
00000380: 45 4E 20 20 3D 20 54 41 24 28 37 29 00 AD 1F 18 |EN = TA$(7)....|
00000390: 01 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.. =============|
000003A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 D3 1F |=============...|
000003B0: 22 01 83 53 4F 4E 4E 54 41 47 2C 4D 4F 4E 54 41 |"..SONNTAG,MONTA|
000003C0: 47 2C 44 49 45 4E 53 54 41 47 2C 4D 49 54 54 57 |G,DIENSTAG,MITTW|
000003D0: 4F 43 48 00 F4 1F 2C 01 83 20 44 4F 4E 4E 45 52 |OCH...,.. DONNER|
000003E0: 53 54 41 47 2C 46 52 45 49 54 41 47 2C 53 41 4D |STAG,FREITAG,SAM|
000003F0: 53 54 41 47 00 15 20 36 01 8F 20 3D 3D 3D 3D 3D |STAG.. 6.. =====|
00000400: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000410: 3D 3D 3D 3D 3D 00 35 20 40 01 8F 20 4D 4F 4E 41 |=====.5 @.. MONA|
00000420: 54 53 4B 4F 4E 53 54 41 4E 54 45 20 20 3D 20 4D |TSKONSTANTE = M|
00000430: 43 28 31 33 29 00 56 20 4A 01 8F 20 3D 3D 3D 3D |C(13).V J.. ====|
00000440: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000450: 3D 3D 3D 3D 3D 3D 00 73 20 54 01 83 20 30 2C 33 |======.s T.. 0,3|
00000460: 31 2C 35 39 2C 39 30 2C 31 32 30 2C 31 35 31 2C |1,59,90,120,151,|
00000470: 31 38 31 00 91 20 5E 01 83 20 32 31 32 2C 32 34 |181.. ^.. 212,24|
00000480: 33 2C 32 37 33 2C 33 30 34 2C 33 33 34 2C 33 36 |3,273,304,334,36|
00000490: 35 00 B2 20 68 01 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |5.. h.. ========|
000004A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000004B0: 3D 3D 00 D8 20 72 01 8F 20 53 4F 4E 4E 54 41 47 |==.. r.. SONNTAG|
000004C0: 53 20 27 42 55 43 48 53 54 41 42 45 4E 27 20 20 |S 'BUCHSTABEN' |
000004D0: 3D 20 53 42 28 32 38 29 00 F9 20 7C 01 8F 20 3D |= SB(28).. |.. =|
000004E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000004F0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 1F 21 86 01 83 20 |=========..!... |
00000500: 37 36 2C 35 2C 34 2C 33 2C 32 31 2C 37 2C 36 2C |76,5,4,3,21,7,6,|
00000510: 35 2C 34 33 2C 32 2C 31 2C 37 2C 36 35 2C 34 00 |5,43,2,1,7,65,4.|
00000520: 44 21 90 01 83 20 33 2C 32 2C 31 37 2C 36 2C 35 |D!... 3,2,17,6,5|
00000530: 2C 34 2C 33 32 2C 31 2C 37 2C 36 2C 35 34 2C 33 |,4,32,1,7,6,54,3|
00000540: 2C 32 2C 31 00 65 21 9A 01 8F 20 3D 3D 3D 3D 3D |,2,1.e!... =====|
00000550: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000560: 3D 3D 3D 3D 3D 00 8C 21 A4 01 8F 20 46 45 53 54 |=====..!... FEST|
00000570: 45 20 53 4F 4E 4E 54 41 47 53 42 55 43 48 53 54 |E SONNTAGSBUCHST|
00000580: 41 42 45 4E 20 3D 20 46 42 28 35 29 00 AD 21 AE |ABEN = FB(5)..!.|
00000590: 01 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.. =============|
000005A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 BD 21 |=============..!|
000005B0: B8 01 83 20 33 2C 35 2C 37 2C 33 2C 35 00 DE 21 |... 3,5,7,3,5..!|
000005C0: C2 01 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |... ============|
000005D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 F8 |==============..|
000005E0: 21 CC 01 8F 20 47 52 45 4E 5A 4A 41 48 52 45 20 |!... GRENZJAHRE |
000005F0: 20 3D 20 47 4A 28 37 29 00 19 22 D6 01 8F 20 3D | = GJ(7).."... =|
00000600: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000610: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 5A 22 E0 01 83 20 |=========.Z"... |
00000620: 31 35 38 32 31 30 30 34 2C 31 37 30 30 30 31 30 |15821004,1700010|
00000630: 31 2C 31 38 30 30 30 31 30 31 2C 31 39 30 30 30 |1,18000101,19000|
00000640: 31 30 31 2C 32 31 30 30 30 31 30 31 2C 32 32 30 |101,21000101,220|
00000650: 30 30 31 30 31 2C 31 45 32 30 00 7B 22 EA 01 8F |00101,1E20.{"...|
00000660: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===============|
00000670: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 96 22 F4 01 |===========.."..|
00000680: 8F 20 5A 59 4B 4C 55 53 53 54 41 52 54 20 20 3D |. ZYKLUSSTART =|
00000690: 20 5A 53 28 37 29 00 B7 22 FE 01 8F 20 3D 3D 3D | ZS(7).."... ===|
000006A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000006B0: 3D 3D 3D 3D 3D 3D 3D 00 DD 22 08 02 83 2D 39 2C |=======.."...-9,|
000006C0: 31 35 36 37 2C 31 36 39 31 2C 31 37 38 37 2C 31 |1567,1691,1787,1|
000006D0: 38 38 33 2C 32 30 39 31 2C 32 31 38 37 00 FE 22 |883,2091,2187.."|
000006E0: 12 02 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |... ============|
000006F0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 1D |==============..|
00000700: 23 1C 02 8F 20 4F 53 54 45 52 47 52 45 4E 5A 45 |#... OSTERGRENZE|
00000710: 4E 20 20 3D 20 4F 47 28 37 2C 31 39 29 00 3E 23 |N = OG(7,19).>#|
00000720: 26 02 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |&.. ============|
00000730: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 4A |==============.J|
00000740: 23 30 02 8F 20 4F 47 28 31 29 00 6B 23 3A 02 8F |#0.. OG(1).k#:..|
00000750: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===============|
00000760: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 8B 23 44 02 |===========..#D.|
00000770: 83 20 31 35 2C 34 2C 32 33 2C 31 32 2C 31 2C 32 |. 15,4,23,12,1,2|
00000780: 30 2C 39 2C 32 38 2C 31 37 2C 36 00 A9 23 4E 02 |0,9,28,17,6..#N.|
00000790: 83 20 32 35 2C 31 34 2C 33 2C 32 32 2C 31 31 2C |. 25,14,3,22,11,|
000007A0: 30 2C 31 39 2C 38 2C 32 37 00 CA 23 58 02 8F 20 |0,19,8,27..#X.. |
000007B0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000007C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 D6 23 62 02 8F |==========..#b..|
000007D0: 20 4F 47 28 32 29 00 F7 23 6C 02 8F 20 3D 3D 3D | OG(2)..#l.. ===|
000007E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000007F0: 3D 3D 3D 3D 3D 3D 3D 00 18 24 76 02 83 20 32 32 |=======..$v.. 22|
00000800: 2C 31 31 2C 30 2C 31 39 2C 38 2C 32 37 2C 31 36 |,11,0,19,8,27,16|
00000810: 2C 35 2C 32 34 2C 31 33 00 36 24 80 02 83 20 32 |,5,24,13.6$... 2|
00000820: 2C 32 31 2C 31 30 2C 32 38 2C 31 38 2C 37 2C 32 |,21,10,28,18,7,2|
00000830: 36 2C 31 35 2C 34 00 57 24 8A 02 8F 20 3D 3D 3D |6,15,4.W$... ===|
00000840: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000850: 3D 3D 3D 3D 3D 3D 3D 00 65 24 94 02 8F 20 4F 47 |=======.e$... OG|
00000860: 28 33 2B 34 29 00 86 24 9E 02 8F 20 3D 3D 3D 3D |(3+4)..$... ====|
00000870: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000880: 3D 3D 3D 3D 3D 3D 00 A7 24 A8 02 83 20 32 33 2C |======..$... 23,|
00000890: 31 32 2C 31 2C 32 30 2C 39 2C 32 38 2C 31 37 2C |12,1,20,9,28,17,|
000008A0: 36 2C 32 35 2C 31 34 00 C4 24 B2 02 83 20 33 2C |6,25,14..$... 3,|
000008B0: 32 32 2C 31 31 2C 30 2C 31 39 2C 38 2C 32 37 2C |22,11,0,19,8,27,|
000008C0: 31 36 2C 35 00 E5 24 BC 02 8F 20 3D 3D 3D 3D 3D |16,5..$... =====|
000008D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000008E0: 3D 3D 3D 3D 3D 00 F3 24 C6 02 8F 20 4F 47 28 35 |=====..$... OG(5|
000008F0: 2B 36 29 00 14 25 D0 02 8F 20 3D 3D 3D 3D 3D 3D |+6)..%... ======|
00000900: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000910: 3D 3D 3D 3D 00 36 25 DA 02 83 20 32 34 2C 31 33 |====.6%... 24,13|
00000920: 2C 32 2C 32 31 2C 31 30 2C 32 38 2C 31 38 2C 37 |,2,21,10,28,18,7|
00000930: 2C 32 36 2C 31 35 00 53 25 E4 02 83 20 34 2C 32 |,26,15.S%... 4,2|
00000940: 33 2C 31 32 2C 31 2C 32 30 2C 39 2C 32 37 2C 31 |3,12,1,20,9,27,1|
00000950: 37 2C 36 00 74 25 EE 02 8F 20 3D 3D 3D 3D 3D 3D |7,6.t%... ======|
00000960: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000970: 3D 3D 3D 3D 00 80 25 F8 02 8F 20 4F 47 28 37 29 |====..%... OG(7)|
00000980: 00 A1 25 02 03 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D |..%... =========|
00000990: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000009A0: 3D 00 C2 25 0C 03 83 20 32 35 2C 31 34 2C 33 2C |=..%... 25,14,3,|
000009B0: 32 32 2C 31 31 2C 30 2C 31 39 2C 38 2C 32 37 2C |22,11,0,19,8,27,|
000009C0: 31 36 00 E0 25 16 03 83 20 35 2C 32 34 2C 31 33 |16..%... 5,24,13|
000009D0: 2C 32 2C 32 31 2C 31 30 2C 32 38 2C 31 38 2C 37 |,2,21,10,28,18,7|
000009E0: 00 01 26 20 03 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D |..& .. =========|
000009F0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000A00: 3D 00 1A 26 2A 03 8F 20 44 41 54 45 4E 20 44 45 |=..&*.. DATEN DE|
00000A10: 52 20 46 45 53 54 54 41 47 45 00 3B 26 34 03 8F |R FESTTAGE.;&4..|
00000A20: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===============|
00000A30: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 6D 26 3E 03 |===========.m&>.|
00000A40: 83 20 4F 53 54 45 52 4E 2C 30 2C 31 2C 33 2C 4F |. OSTERN,0,1,3,O|
00000A50: 53 54 45 52 4E 2C 31 2C 32 2C 33 2C 4B 41 52 46 |STERN,1,2,3,KARF|
00000A60: 52 45 49 54 41 47 2C 2D 33 2C 36 2C 33 00 9C 26 |REITAG,-3,6,3..&|
00000A70: 48 03 83 20 43 48 52 49 53 54 49 20 48 49 4D 4D |H.. CHRISTI HIMM|
00000A80: 45 4C 46 2E 2C 34 31 2C 35 2C 35 2C 50 46 49 4E |ELF.,41,5,5,PFIN|
00000A90: 47 53 54 45 4E 2C 31 30 2C 31 2C 35 00 C6 26 52 |GSTEN,10,1,5..&R|
00000AA0: 03 83 20 50 46 49 4E 47 53 54 45 4E 2C 31 2C 32 |.. PFINGSTEN,1,2|
00000AB0: 2C 35 2C 46 52 4F 4E 4C 45 49 43 48 4E 41 4D 2C |,5,FRONLEICHNAM,|
00000AC0: 31 30 2C 35 2C 35 00 FF 26 5C 03 83 20 31 2C 31 |10,5,5..&\.. 1,1|
00000AD0: 2C 4E 45 55 4A 41 48 52 2C 36 2C 31 2C 48 4C 2E |,NEUJAHR,6,1,HL.|
00000AE0: 44 52 45 49 20 4B 4F 45 4E 49 47 45 2C 31 2C 35 |DREI KOENIGE,1,5|
00000AF0: 2C 54 41 47 20 44 45 52 20 41 52 42 45 49 54 00 |,TAG DER ARBEIT.|
00000B00: 2F 27 66 03 83 20 31 35 2C 38 2C 4D 41 52 49 41 |/'f.. 15,8,MARIA|
00000B10: 45 20 48 49 4D 4D 45 4C 46 2E 2C 33 2C 31 30 2C |E HIMMELF.,3,10,|
00000B20: 54 2E 44 2E 44 54 53 43 48 2E 45 49 4E 48 2E 00 |T.D.DTSCH.EINH..|
00000B30: 7C 27 70 03 83 20 31 2C 31 31 2C 41 4C 4C 45 52 ||'p.. 1,11,ALLER|
00000B40: 48 45 49 4C 49 47 45 4E 2C 32 35 2C 31 32 2C 57 |HEILIGEN,25,12,W|
00000B50: 45 49 48 4E 41 43 48 54 45 4E 2C 32 36 2C 31 32 |EIHNACHTEN,26,12|
00000B60: 2C 57 45 49 48 4E 41 43 48 54 45 4E 2C 42 55 53 |,WEIHNACHTEN,BUS|
00000B70: 53 20 55 4E 44 20 42 45 54 54 41 47 00 9D 27 7A |S UND BETTAG..'z|
00000B80: 03 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.. =============|
00000B90: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 AE 27 |=============..'|
00000BA0: 84 03 8F 20 44 41 54 41 20 4C 45 53 45 4E 00 CF |... DATA LESEN..|
00000BB0: 27 8E 03 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |'... ===========|
00000BC0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 |===============.|
00000BD0: ED 27 98 03 81 20 58 B2 31 20 A4 20 31 32 3A 20 |.'... X.1 . 12: |
00000BE0: 87 20 4D 4F 24 28 58 29 3A 20 82 20 58 00 0F 28 |. MO$(X): . X..(|
00000BF0: A2 03 8C 20 32 36 30 3A 81 20 58 B2 31 20 A4 20 |... 260:. X.1 . |
00000C00: 37 3A 20 87 20 54 41 24 28 58 29 3A 82 20 58 00 |7: . TA$(X):. X.|
00000C10: 2C 28 AC 03 81 20 58 B2 31 20 A4 20 31 33 3A 20 |,(... X.1 . 13: |
00000C20: 87 20 4D 43 28 58 29 3A 20 82 20 58 00 4E 28 B6 |. MC(X): . X.N(.|
00000C30: 03 8C 20 33 39 30 3A 81 20 58 B2 31 20 A4 20 32 |.. 390:. X.1 . 2|
00000C40: 38 3A 20 87 20 53 42 28 58 29 3A 82 20 58 00 6A |8: . SB(X):. X.j|
00000C50: 28 C0 03 81 20 58 B2 32 20 A4 20 36 3A 20 87 20 |(... X.2 . 6: . |
00000C60: 46 42 28 58 29 3A 20 82 20 58 00 86 28 CA 03 81 |FB(X): . X..(...|
00000C70: 20 58 B2 31 20 A4 20 37 3A 20 87 20 47 4A 28 58 | X.1 . 7: . GJ(X|
00000C80: 29 3A 20 82 20 58 00 A2 28 D4 03 81 20 58 B2 31 |): . X..(... X.1|
00000C90: 20 A4 20 37 3A 20 87 20 5A 53 28 58 29 3A 20 82 | . 7: . ZS(X): .|
00000CA0: 20 58 00 B0 28 DE 03 81 20 58 B2 31 20 A4 20 37 | X..(... X.1 . 7|
00000CB0: 00 C0 28 E8 03 8B 20 58 B2 34 20 A7 8C 35 38 30 |..(... X.4 ..580|
00000CC0: 00 D0 28 F2 03 8B 20 58 B2 36 20 A7 8C 37 33 30 |..(... X.6 ..730|
00000CD0: 00 F4 28 FC 03 8C 35 33 30 3A 81 20 59 B2 31 20 |..(...530:. Y.1 |
00000CE0: A4 20 31 39 3A 20 87 20 4F 47 28 58 2C 59 29 3A |. 19: . OG(X,Y):|
00000CF0: 20 82 20 59 00 FC 28 06 04 82 20 58 00 1C 29 10 | . Y..(... X..).|
00000D00: 04 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.. =============|
00000D10: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 2E 29 1A |============..).|
00000D20: 04 8F 20 54 45 58 54 53 54 52 49 4E 47 53 00 4E |.. TEXTSTRINGS.N|
00000D30: 29 24 04 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |)$.. ===========|
00000D40: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 82 |==============..|
00000D50: 29 2E 04 54 31 24 B2 42 34 24 AA 42 34 24 AA 22 |)..T1$.B4$.B4$."|
00000D60: 2A 2A 2A 20 50 52 4F 47 52 41 4D 4D 20 4B 41 4C |*** PROGRAMM KAL|
00000D70: 45 4E 44 45 52 20 2A 2A 2A 22 AA 42 34 24 AA 42 |ENDER ***".B4$.B|
00000D80: 33 24 00 AD 29 38 04 54 32 24 B2 42 36 24 AA 22 |3$..)8.T2$.B6$."|
00000D90: 2A 2A 20 57 45 49 54 45 52 20 4D 49 54 20 3C 53 |** WEITER MIT <S|
00000DA0: 50 41 43 45 3E 20 2A 2A 22 AA 42 36 24 00 C6 29 |PACE> **".B6$..)|
00000DB0: 42 04 54 33 24 B2 C7 28 31 38 29 AA 54 32 24 AA |B.T3$..(18).T2$.|
00000DC0: C7 28 31 34 36 29 00 F0 29 4C 04 54 34 24 B2 42 |.(146)..)L.T4$.B|
00000DD0: 32 24 AA 22 46 45 53 54 54 41 47 53 4B 41 4C 45 |2$."FESTTAGSKALE|
00000DE0: 4E 44 45 52 20 44 45 53 20 4A 41 48 52 45 53 22 |NDER DES JAHRES"|
00000DF0: 00 0F 2A 56 04 54 35 24 B2 22 4E 52 2E 20 44 2E |..*V.T5$."NR. D.|
00000E00: 20 57 4F 43 48 45 4E 54 41 47 45 53 20 3D 22 00 | WOCHENTAGES =".|
00000E10: 30 2A 60 04 54 36 24 B2 22 54 41 47 45 53 44 41 |0*`.T6$."TAGESDA|
00000E20: 54 55 4D 22 AA 42 35 24 AA 42 34 24 AA 22 3D 22 |TUM".B5$.B4$."="|
00000E30: 00 50 2A 6A 04 54 37 24 B2 22 4E 52 2E 20 44 2E |.P*j.T7$."NR. D.|
00000E40: 20 4D 4F 4E 41 54 53 22 AA 42 36 24 AA 22 3D 22 | MONATS".B6$."="|
00000E50: 00 6A 2A 74 04 54 38 24 B2 22 4A 41 48 52 22 AA |.j*t.T8$."JAHR".|
00000E60: 42 24 AA 42 35 24 AA 22 3D 22 00 83 2A 7E 04 54 |B$.B5$."="..*~.T|
00000E70: 39 24 B2 22 5A 55 53 41 54 5A 45 49 4E 47 41 42 |9$."ZUSATZEINGAB|
00000E80: 45 4E 22 00 92 2A 88 04 54 30 24 B2 C7 28 31 34 |EN"..*..T0$..(14|
00000E90: 35 29 00 BB 2A 92 04 4C 31 24 B2 22 22 3A 20 81 |5)..*..L1$."": .|
00000EA0: 20 58 B2 31 20 A4 20 34 30 3A 20 4C 31 24 B2 4C | X.1 . 40: L1$.L|
00000EB0: 31 24 AA 22 2D 22 3A 20 82 20 58 00 E4 2A 9C 04 |1$."-": . X..*..|
00000EC0: 4C 32 24 B2 22 22 3A 20 81 20 58 B2 31 20 A4 20 |L2$."": . X.1 . |
00000ED0: 34 36 3A 20 4C 32 24 B2 4C 32 24 AA 22 2A 22 3A |46: L2$.L2$."*":|
00000EE0: 20 82 20 58 00 04 2B A6 04 8F 20 3D 3D 3D 3D 3D | . X..+... =====|
00000EF0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F00: 3D 3D 3D 3D 00 18 2B B0 04 8F 20 57 49 4E 44 4F |====..+... WINDO|
00000F10: 57 53 54 52 49 4E 47 53 00 38 2B BA 04 8F 20 3D |WSTRINGS.8+... =|
00000F20: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F30: 3D 3D 3D 3D 3D 3D 3D 3D 00 51 2B C4 04 57 31 24 |========.Q+..W1$|
00000F40: B2 C7 28 31 38 29 AA 54 31 24 AA C7 28 31 34 36 |..(18).T1$..(146|
00000F50: 29 00 60 2B CE 04 57 32 24 B2 C7 28 31 34 37 29 |).`+..W2$..(147)|
00000F60: 00 6B 2B D8 04 57 33 24 B2 22 22 00 80 2B E2 04 |.k+..W3$.""..+..|
00000F70: 57 34 24 B2 22 22 3A 57 35 24 B2 C7 28 31 38 29 |W4$."":W5$..(18)|
00000F80: 00 C6 2B EC 04 57 35 24 B2 57 35 24 AA 22 42 45 |..+..W5$.W5$."BE|
00000F90: 5A 45 49 43 48 4E 55 4E 47 28 4D 41 58 2E 31 36 |ZEICHNUNG(MAX.16|
00000FA0: 29 20 3A 22 AA 42 32 24 AA 22 54 41 47 22 AA 42 |) :".B2$."TAG".B|
00000FB0: 34 24 AA 22 4D 4F 4E 41 54 20 5B 4E 52 5D 22 AA |4$."MONAT [NR]".|
00000FC0: C7 28 31 34 36 29 00 E6 2B FA 05 8F 20 3D 3D 3D |.(146)..+... ===|
00000FD0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000FE0: 3D 3D 3D 3D 3D 3D 00 F2 2B 04 06 8F 20 4D 45 4E |======..+... MEN|
00000FF0: 55 45 00 12 2C 0E 06 8F 20 3D 3D 3D 3D 3D 3D 3D |UE..,... =======|
00001000: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001010: 3D 3D 00 28 2C 18 06 99 57 32 24 57 31 24 3A E0 |==.(,...W2$W1$:.|
00001020: 2C 35 2C 33 2C 57 33 24 00 4C 2C 22 06 58 B2 30 |,5,3,W3$.L,".X.0|
00001030: 3A 20 59 B2 30 3A 20 46 B2 30 3A 20 58 31 B2 30 |: Y.0: F.0: X1.0|
00001040: 3A 20 58 32 B2 30 3A 20 58 35 B2 30 00 79 2C 2C |: X2.0: X5.0.y,,|
00001050: 06 99 20 22 42 49 54 54 45 20 47 45 42 45 4E 20 |.. "BITTE GEBEN |
00001060: 53 49 45 20 44 49 45 20 4E 55 4D 4D 45 52 20 44 |SIE DIE NUMMER D|
00001070: 45 53 22 3A E0 2C 35 2C 34 00 A8 2C 36 06 99 20 |ES":.,5,4..,6.. |
00001080: 22 47 45 57 55 45 4E 53 43 48 54 45 4E 20 55 4E |"GEWUENSCHTEN UN|
00001090: 54 45 52 50 52 4F 47 52 41 4D 4D 53 20 45 49 4E |TERPROGRAMMS EIN|
000010A0: 3A 22 3A E0 2C 35 2C 36 00 C4 2C 40 06 99 20 22 |:":.,5,6..,@.. "|
000010B0: 57 4F 43 48 45 4E 54 41 47 20 3D 20 31 22 3A E0 |WOCHENTAG = 1":.|
000010C0: 2C 35 2C 38 00 E1 2C 4A 06 99 20 22 54 41 47 45 |,5,8..,J.. "TAGE|
000010D0: 53 44 41 54 55 4D 3D 20 32 22 3A E0 2C 35 2C 31 |SDATUM= 2":.,5,1|
000010E0: 30 00 FE 2C 54 06 99 20 22 4D 4F 4E 41 54 22 42 |0..,T.. "MONAT"B|
000010F0: 35 24 22 3D 20 33 22 3A E0 2C 35 2C 31 32 00 1E |5$"= 3":.,5,12..|
00001100: 2D 5E 06 99 20 22 46 45 53 54 54 41 47 45 22 42 |-^.. "FESTTAGE"B|
00001110: 32 24 22 3D 20 34 22 3A E0 2C 35 2C 31 34 00 33 |2$"= 4":.,5,14.3|
00001120: 2D 68 06 99 20 22 45 4E 44 22 42 36 24 22 20 3D |-h.. "END"B6$" =|
00001130: 20 35 22 00 47 2D 7C 06 A1 58 24 3A 8B 58 24 B2 | 5".G-|..X$:.X$.|
00001140: 22 22 A7 31 36 36 30 00 6E 2D 81 06 91 C6 28 58 |"".1660.n-....(X|
00001150: 24 29 AF 37 8D 20 31 37 32 30 2C 31 39 31 30 2C |$).7. 1720,1910,|
00001160: 32 32 32 30 2C 32 35 35 30 2C 31 36 38 30 00 79 |2220,2550,1680.y|
00001170: 2D 86 06 89 20 31 35 36 30 00 86 2D 90 06 99 20 |-... 1560..-... |
00001180: 57 32 24 3A 20 80 00 A6 2D 9A 06 8F 20 3D 3D 3D |W2$: ...-... ===|
00001190: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000011A0: 3D 3D 3D 3D 3D 3D 00 C9 2D A4 06 8F 20 55 4E 54 |======..-... UNT|
000011B0: 45 52 50 52 4F 47 52 41 4D 4D 20 57 4F 43 48 45 |ERPROGRAMM WOCHE|
000011C0: 4E 54 41 47 53 55 43 48 45 00 E9 2D AE 06 8F 20 |NTAGSUCHE..-... |
000011D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000011E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 00 2E B8 06 99 57 |=========......W|
000011F0: 32 24 57 31 24 3B 3A E0 2C 38 2C 33 2C 57 33 24 |2$W1$;:.,8,3,W3$|
00001200: 00 1F 2E C2 06 99 20 22 47 45 53 55 43 48 54 3A |...... "GESUCHT:|
00001210: 20 44 45 52 20 57 4F 43 48 45 4E 54 41 47 22 00 | DER WOCHENTAG".|
00001220: 2D 2E CC 06 E0 2C 38 2C 35 2C 57 33 24 00 4B 2E |-....,8,5,W3$.K.|
00001230: D6 06 99 20 54 36 24 3A E0 2C 38 2C 37 2C 54 37 |... T6$:.,8,7,T7|
00001240: 24 3A E0 2C 38 2C 39 2C 54 38 24 00 5A 2E E0 06 |$:.,8,9,T8$.Z...|
00001250: E0 2C 33 30 2C 35 2C 57 33 24 00 78 2E EA 06 85 |.,30,5,W3$.x....|
00001260: 20 54 3A E0 2C 33 30 2C 37 3A 85 20 4D 3A E0 2C | T:.,30,7:. M:.,|
00001270: 33 30 2C 39 3A 85 20 41 00 93 2E F4 06 8D 20 33 |30,9:. A...... 3|
00001280: 38 32 30 3A 20 8B 20 46 B1 30 20 A7 20 89 20 33 |820: . F.0 . . 3|
00001290: 39 35 30 00 9E 2E FE 06 8D 20 34 30 38 30 00 AD |950...... 4080..|
000012A0: 2E 08 07 54 54 B2 4D 43 28 4D 29 AA 54 00 B8 2E |...TT.MC(M).T...|
000012B0: 12 07 8D 20 34 32 36 30 00 C7 2E 1C 07 8B 20 58 |... 4260...... X|
000012C0: 35 B2 31 20 A7 20 8E 00 D6 2E 26 07 E0 2C 38 2C |5.1 . ....&..,8,|
000012D0: 31 32 2C 57 33 24 00 EF 2E 30 07 99 20 22 45 52 |12,W3$...0.. "ER|
000012E0: 47 45 42 4E 49 53 3A 22 3A E0 2C 38 2C 31 34 00 |GEBNIS:":.,8,14.|
000012F0: 1B 2F 3A 07 99 20 54 41 24 28 57 5A 29 3B 22 2C |./:.. TA$(WZ);",|
00001300: 22 3B A3 31 39 29 20 54 3B A3 32 33 29 20 4D 4F |";.19) T;.23) MO|
00001310: 24 28 4D 29 3B A3 33 32 29 20 41 00 30 2F 44 07 |$(M);.32) A.0/D.|
00001320: E0 2C 32 2C 32 34 2C 54 33 24 3A 8D 34 33 35 32 |.,2,24,T3$:.4352|
00001330: 00 36 2F 4E 07 8E 00 56 2F 58 07 8F 20 3D 3D 3D |.6/N...V/X.. ===|
00001340: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001350: 3D 3D 3D 3D 3D 3D 00 75 2F 62 07 8F 20 55 4E 54 |======.u/b.. UNT|
00001360: 45 52 50 52 4F 47 52 41 4D 4D 20 54 41 47 45 53 |ERPROGRAMM TAGES|
00001370: 44 41 54 55 4D 00 95 2F 6C 07 8F 20 3D 3D 3D 3D |DATUM../l.. ====|
00001380: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001390: 3D 3D 3D 3D 3D 00 AB 2F 76 07 99 57 32 24 57 31 |=====../v..W2$W1|
000013A0: 24 3A E0 2C 30 2C 33 2C 57 33 24 00 D6 2F 80 07 |$:.,0,3,W3$../..|
000013B0: 81 20 58 B2 31 20 A4 20 37 3A 20 99 20 C8 28 54 |. X.1 . 7: . .(T|
000013C0: 41 24 28 58 29 2C 32 29 3B 22 3D 22 3B 58 3A 20 |A$(X),2);"=";X: |
000013D0: 99 3A 20 82 20 58 00 E4 2F 8A 07 E0 2C 38 2C 33 |.: . X../...,8,3|
000013E0: 2C 57 33 24 00 04 30 94 07 99 20 22 47 45 53 55 |,W3$..0... "GESU|
000013F0: 43 48 54 3A 20 44 41 53 20 54 41 47 45 53 44 41 |CHT: DAS TAGESDA|
00001400: 54 55 4D 22 00 12 30 9E 07 E0 2C 38 2C 35 2C 57 |TUM"..0...,8,5,W|
00001410: 33 24 00 30 30 A8 07 99 20 54 35 24 3A E0 2C 38 |3$.00... T5$:.,8|
00001420: 2C 37 2C 54 37 24 3A E0 2C 38 2C 39 2C 54 38 24 |,7,T7$:.,8,9,T8$|
00001430: 00 3F 30 B2 07 E0 2C 33 30 2C 35 2C 57 33 24 00 |.?0...,30,5,W3$.|
00001440: 63 30 BC 07 85 20 57 5A 3A E0 2C 33 30 2C 37 3A |c0... WZ:.,30,7:|
00001450: 85 4D 3A E0 2C 33 30 2C 39 3A 20 85 20 41 3A 20 |.M:.,30,9: . A: |
00001460: 54 B2 31 00 7E 30 C6 07 8D 20 33 38 32 30 3A 20 |T.1.~0... 3820: |
00001470: 8B 20 46 B1 30 20 A7 20 89 20 33 39 35 30 00 89 |. F.0 . . 3950..|
00001480: 30 D0 07 8D 20 34 30 38 30 00 AA 30 DA 07 54 5A |0... 4080..0..TZ|
00001490: B2 57 5A AA 53 5A AB 31 3A 20 8B 20 54 5A B1 37 |.WZ.SZ.1: . TZ.7|
000014A0: 20 A7 20 54 5A B2 54 5A AB 37 00 D9 30 E4 07 54 | . TZ.TZ.7..0..T|
000014B0: 48 B2 4D 43 28 4D 29 AA 31 3A 20 54 48 B2 54 48 |H.MC(M).1: TH.TH|
000014C0: AB B5 28 54 48 AD 37 29 AC 37 3A 20 8B 20 54 48 |..(TH.7).7: . TH|
000014D0: B2 30 20 A7 20 54 48 B2 37 00 EF 30 EE 07 8B 20 |.0 . TH.7..0... |
000014E0: 54 5A B3 54 48 20 A7 20 54 5A B2 54 5A AA 37 00 |TZ.TH . TZ.TZ.7.|
000014F0: 16 31 F8 07 54 48 B2 54 5A AB 54 48 AA 31 3A 58 |.1..TH.TZ.TH.1:X|
00001500: 33 B2 31 3A 54 44 28 58 33 29 B2 54 48 3A 58 48 |3.1:TD(X3).TH:XH|
00001510: B2 4D 43 28 33 29 00 31 31 02 08 8B 20 58 31 B2 |.MC(3).11... X1.|
00001520: 32 20 A7 20 4D 43 28 33 29 B2 4D 43 28 33 29 AA |2 . MC(3).MC(3).|
00001530: 31 00 53 31 0C 08 8B 4D 43 28 4D 29 AA 54 44 28 |1.S1...MC(M).TD(|
00001540: 58 33 29 AA 36 B1 B2 4D 43 28 4D AA 31 29 A7 32 |X3).6..MC(M.1).2|
00001550: 30 39 30 00 72 31 16 08 58 33 B2 58 33 AA 31 3A |090.r1..X3.X3.1:|
00001560: 20 54 44 28 58 33 29 B2 54 44 28 58 33 AB 31 29 | TD(X3).TD(X3.1)|
00001570: AA 37 00 7C 31 20 08 89 32 30 36 30 00 89 31 2A |.7.|1 ..2060..1*|
00001580: 08 4D 43 28 33 29 B2 58 48 00 98 31 34 08 E0 2C |.MC(3).XH..14..,|
00001590: 38 2C 31 32 2C 57 33 24 00 AD 31 3E 08 99 20 22 |8,12,W3$..1>.. "|
000015A0: 45 52 47 45 42 4E 49 53 3A 22 3A 20 99 00 B5 31 |ERGEBNIS:": ...1|
000015B0: 48 08 5A B2 31 00 CC 31 52 08 81 49 49 B2 5A A4 |H.Z.1..1R..II.Z.|
000015C0: 58 33 3A E0 2C 38 2C 31 33 AA 49 49 00 FF 31 5C |X3:.,8,13.II..1\|
000015D0: 08 99 20 54 41 24 28 57 5A 29 3B 22 2C 22 3B A3 |.. TA$(WZ);",";.|
000015E0: 31 39 29 20 54 44 28 49 49 29 3B A3 32 33 29 20 |19) TD(II);.23) |
000015F0: 4D 4F 24 28 4D 29 3B A3 33 32 29 20 41 3A 82 00 |MO$(M);.32) A:..|
00001600: 08 32 66 08 5A B2 49 49 00 1D 32 7A 08 E0 2C 32 |.2f.Z.II..2z..,2|
00001610: 2C 32 34 2C 54 33 24 3A 89 34 33 35 32 00 3D 32 |,24,T3$:.4352.=2|
00001620: 8E 08 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |... ============|
00001630: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 57 32 |=============.W2|
00001640: 98 08 8F 20 55 4E 54 45 52 50 52 4F 47 52 41 4D |... UNTERPROGRAM|
00001650: 4D 20 4D 4F 4E 41 54 00 77 32 A2 08 8F 20 3D 3D |M MONAT.w2... ==|
00001660: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001670: 3D 3D 3D 3D 3D 3D 3D 00 8D 32 AC 08 99 57 32 24 |=======..2...W2$|
00001680: 57 31 24 3A E0 2C 30 2C 33 2C 57 33 24 00 B8 32 |W1$:.,0,3,W3$..2|
00001690: B6 08 81 20 58 B2 31 20 A4 20 37 3A 20 99 20 C8 |... X.1 . 7: . .|
000016A0: 28 54 41 24 28 58 29 2C 32 29 3B 22 3D 22 3B 58 |(TA$(X),2);"=";X|
000016B0: 3A 20 99 3A 20 82 20 58 00 C6 32 C0 08 E0 2C 38 |: .: . X..2...,8|
000016C0: 2C 33 2C 57 33 24 00 E1 32 CA 08 99 20 22 47 45 |,3,W3$..2... "GE|
000016D0: 53 55 43 48 54 3A 20 44 45 52 20 4D 4F 4E 41 54 |SUCHT: DER MONAT|
000016E0: 22 00 EF 32 D4 08 E0 2C 38 2C 35 2C 57 33 24 00 |"..2...,8,5,W3$.|
000016F0: 0D 33 DE 08 99 20 54 35 24 3A E0 2C 38 2C 37 2C |.3... T5$:.,8,7,|
00001700: 54 36 24 3A E0 2C 38 2C 39 2C 54 38 24 00 1C 33 |T6$:.,8,9,T8$..3|
00001710: E8 08 E0 2C 33 30 2C 35 2C 57 33 24 00 3D 33 F2 |...,30,5,W3$.=3.|
00001720: 08 85 20 57 5A 3A E0 2C 33 30 2C 37 3A 85 54 3A |.. WZ:.,30,7:.T:|
00001730: E0 2C 33 30 2C 39 3A 85 41 3A 4D B2 31 00 58 33 |.,30,9:.A:M.1.X3|
00001740: FC 08 8D 20 33 38 32 30 3A 20 8B 20 46 B1 30 20 |... 3820: . F.0 |
00001750: A7 20 89 20 33 39 35 30 00 63 33 06 09 8D 20 34 |. . 3950.c3... 4|
00001760: 30 38 30 00 6C 33 10 09 58 33 B2 30 00 7B 33 1A |080.l3..X3.0.{3.|
00001770: 09 81 20 4D B2 31 20 A4 20 31 32 00 AC 33 24 09 |.. M.1 . 12..3$.|
00001780: 8B 20 C3 28 C4 28 58 32 29 29 B1 32 20 AF 20 4D |. .(.(X2)).2 . M|
00001790: B2 32 20 A7 20 58 48 B2 4D 43 28 33 29 3A 20 4D |.2 . XH.MC(3): M|
000017A0: 43 28 33 29 B2 4D 43 28 33 29 AA 31 00 E2 33 2E |C(3).MC(3).1..3.|
000017B0: 09 8B 20 C3 28 C4 28 58 32 29 29 B1 32 20 AF 20 |.. .(.(X2)).2 . |
000017C0: 4D B2 33 20 A7 20 53 5A B2 C5 28 CA 28 C4 28 58 |M.3 . SZ..(.(.(X|
000017D0: 32 29 2C 33 2C 31 29 29 3A 20 4D 43 28 33 29 B2 |2),3,1)): MC(3).|
000017E0: 58 48 00 03 34 38 09 54 5A B2 57 5A AA 53 5A AB |XH..48.TZ.WZ.SZ.|
000017F0: 31 3A 20 8B 20 54 5A B1 37 20 A7 20 54 5A B2 54 |1: . TZ.7 . TZ.T|
00001800: 5A AB 37 00 29 34 42 09 54 48 B2 4D 43 28 4D 29 |Z.7.)4B.TH.MC(M)|
00001810: AA 54 3A 20 8B 20 54 48 B1 4D 43 28 4D AA 31 29 |.T: . TH.MC(M.1)|
00001820: 20 A7 20 89 20 32 34 30 30 00 4B 34 4C 09 54 48 | . . 2400.K4L.TH|
00001830: B2 54 48 AB B5 28 54 48 AD 37 29 AC 37 3A 8B 20 |.TH..(TH.7).7:. |
00001840: 54 48 B2 30 20 A7 20 54 48 B2 37 00 6B 34 56 09 |TH.0 . TH.7.k4V.|
00001850: 8B 20 54 48 B2 54 5A 20 A7 20 58 33 B2 58 33 AA |. TH.TZ . X3.X3.|
00001860: 31 3A 20 4D 48 28 58 33 29 B2 4D 00 73 34 60 09 |1: MH(X3).M.s4`.|
00001870: 82 20 4D 00 82 34 6A 09 E0 2C 38 2C 31 32 2C 57 |. M..4j..,8,12,W|
00001880: 33 24 00 97 34 74 09 99 20 22 45 52 47 45 42 4E |3$..4t.. "ERGEBN|
00001890: 49 53 3A 22 3A 20 99 00 AC 34 7E 09 8B 20 58 33 |IS:": ...4~.. X3|
000018A0: B3 B1 30 20 A7 20 89 20 32 34 36 30 00 DE 34 88 |..0 . . 2460..4.|
000018B0: 09 E0 2C 38 2C 31 34 2C 22 49 4D 20 4A 41 48 52 |..,8,14,"IM JAHR|
000018C0: 22 AA C4 28 41 29 AA 22 47 49 42 54 20 45 53 20 |"..(A)."GIBT ES |
000018D0: 4B 45 49 4E 45 4E 22 3A E0 2C 38 2C 31 35 00 02 |KEINEN":.,8,15..|
000018E0: 35 92 09 99 20 54 41 24 28 57 5A 29 3B 22 2C 20 |5... TA$(WZ);", |
000018F0: 44 45 4E 22 3B 54 3B 22 2E 22 3A 20 89 20 32 34 |DEN";T;".": . 24|
00001900: 39 30 00 1A 35 9C 09 81 20 5A B2 31 20 A4 20 58 |90..5... Z.1 . X|
00001910: 33 3A E0 2C 38 2C 31 33 AA 5A 00 4A 35 A6 09 99 |3:.,8,13.Z.J5...|
00001920: 20 54 41 24 28 57 5A 29 3B 22 2C 22 3B A3 31 39 | TA$(WZ);",";.19|
00001930: 29 20 54 3B A3 32 33 29 20 4D 4F 24 28 4D 48 28 |) T;.23) MO$(MH(|
00001940: 5A 29 29 3B A3 33 32 29 20 41 00 52 35 B0 09 82 |Z));.32) A.R5...|
00001950: 20 5A 00 67 35 BA 09 E0 2C 32 2C 32 34 2C 54 33 | Z.g5...,2,24,T3|
00001960: 24 3A 8D 34 33 35 32 00 6D 35 C4 09 8E 00 8D 35 |$:.4352.m5.....5|
00001970: CE 09 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |... ============|
00001980: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 AE 35 |=============..5|
00001990: D8 09 8F 20 55 4E 54 45 52 50 52 4F 47 52 41 4D |... UNTERPROGRAM|
000019A0: 4D 20 46 45 53 54 4B 41 4C 45 4E 44 45 52 00 D2 |M FESTKALENDER..|
000019B0: 35 E2 09 8F 20 47 45 53 45 54 5A 4C 49 43 48 45 |5... GESETZLICHE|
000019C0: 20 46 45 49 45 52 54 41 47 45 20 44 45 52 20 42 | FEIERTAGE DER B|
000019D0: 52 44 00 F2 35 EC 09 8F 20 3D 3D 3D 3D 3D 3D 3D |RD..5... =======|
000019E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000019F0: 3D 3D 00 08 36 F6 09 99 57 32 24 57 31 24 3A E0 |==..6...W2$W1$:.|
00001A00: 2C 38 2C 33 2C 57 33 24 00 2C 36 00 0A 99 20 22 |,8,3,W3$.,6... "|
00001A10: 47 45 53 55 43 48 54 3A 20 46 45 53 54 4B 41 4C |GESUCHT: FESTKAL|
00001A20: 45 4E 44 45 52 22 3A E0 2C 38 2C 35 00 4D 36 0A |ENDER":.,8,5.M6.|
00001A30: 0A 99 20 22 52 45 43 48 45 4E 5A 45 49 54 20 43 |.. "RECHENZEIT C|
00001A40: 41 2E 20 31 30 2D 34 35 20 53 45 43 22 00 5B 36 |A. 10-45 SEC".[6|
00001A50: 14 0A E0 2C 38 2C 37 2C 57 33 24 00 6E 36 1E 0A |...,8,7,W3$.n6..|
00001A60: 99 20 54 38 24 3B A6 32 29 3B 3A 85 20 41 00 91 |. T8$;.2);:. A..|
00001A70: 36 28 0A E0 2C 38 2C 39 2C 22 5A 55 53 41 54 5A |6(..,8,9,"ZUSATZ|
00001A80: 45 49 4E 47 41 42 45 4E 20 28 4A 2F 4E 29 20 3F |EINGABEN (J/N) ?|
00001A90: 22 00 B8 36 29 0A A1 20 F9 20 5A 31 24 3A 8B 20 |"..6).. . Z1$:. |
00001AA0: 5A 31 24 B2 22 4A 22 20 B0 20 5A 31 24 B2 22 4E |Z1$."J" . Z1$."N|
00001AB0: 22 20 A7 20 32 36 31 30 00 C3 36 2A 0A 89 20 32 |" . 2610..6*.. 2|
00001AC0: 36 30 31 00 F0 36 32 0A E0 2C 38 2C 31 31 2C 22 |601..62..,8,11,"|
00001AD0: 44 52 55 43 4B 45 52 20 4F 44 45 52 20 42 49 4C |DRUCKER ODER BIL|
00001AE0: 44 53 43 48 49 52 4D 20 28 44 2F 42 29 20 3F 22 |DSCHIRM (D/B) ?"|
00001AF0: 00 17 37 3C 0A A1 20 F9 20 5A 32 24 3A 8B 20 5A |..7<.. . Z2$:. Z|
00001B00: 32 24 B2 22 44 22 20 B0 20 5A 32 24 B2 22 42 22 |2$."D" . Z2$."B"|
00001B10: 20 A7 20 32 36 33 30 00 22 37 41 0A 89 20 32 36 | . 2630."7A.. 26|
00001B20: 32 30 00 2F 37 46 0A 54 B2 31 3A 20 4D B2 31 00 |20./7F.T.1: M.1.|
00001B30: 4A 37 50 0A 8D 20 33 38 32 30 3A 20 8B 20 46 B1 |J7P.. 3820: . F.|
00001B40: 30 20 A7 20 89 20 33 39 35 30 00 58 37 5A 0A 58 |0 . . 3950.X7Z.X|
00001B50: 35 B2 31 3A 20 58 B2 30 00 6F 37 64 0A 8B 20 5A |5.1: X.0.o7d.. Z|
00001B60: 31 24 B2 22 4E 22 20 A7 20 89 20 32 38 34 30 00 |1$."N" . . 2840.|
00001B70: 77 37 6E 0A 8F 20 3A 00 8C 37 78 0A 8F 20 5A 55 |w7n.. :..7x.. ZU|
00001B80: 53 41 54 5A 45 49 4E 47 41 42 45 4E 00 94 37 82 |SATZEINGABEN..7.|
00001B90: 0A 8F 20 3A 00 9E 37 87 0A 99 57 32 24 3B 00 B4 |.. :..7...W2$;..|
00001BA0: 37 8C 0A 99 20 57 31 24 3B 54 39 24 3B 41 3A 99 |7... W1$;T9$;A:.|
00001BB0: 20 57 35 24 00 BE 37 96 0A 58 B2 58 AA 31 00 D0 | W5$..7..X.X.1..|
00001BC0: 37 A0 0A 99 22 20 22 3B 3A 85 48 31 24 28 58 29 |7..." ";:.H1$(X)|
00001BD0: 00 E5 37 AA 0A 99 20 54 30 24 2C 2C 3A 20 85 20 |..7... T0$,,: . |
00001BE0: 48 31 28 58 29 00 FB 37 B4 0A 99 20 54 30 24 2C |H1(X)..7... T0$,|
00001BF0: 2C 2C 3A 20 85 20 48 33 28 58 29 00 13 38 BE 0A |,,: . H3(X)..8..|
00001C00: 48 31 24 28 58 29 B2 C8 28 48 31 24 28 58 29 2C |H1$(X)..(H1$(X),|
00001C10: 31 36 29 00 30 38 C8 0A 54 B2 48 31 28 58 29 3A |16).08..T.H1(X):|
00001C20: 20 4D B2 48 33 28 58 29 3A 20 8D 20 33 38 32 30 | M.H3(X): . 3820|
00001C30: 00 43 38 D2 0A 8B 20 46 B1 30 20 A7 20 8D 20 33 |.C8... F.0 . . 3|
00001C40: 39 35 30 00 53 38 DC 0A 8B 58 B3 B1 31 36 A7 32 |950.S8...X..16.2|
00001C50: 37 39 30 00 92 38 DD 0A 99 22 4B 45 49 4E 45 20 |790..8..."KEINE |
00001C60: 57 45 49 54 45 52 45 4E 20 45 49 4E 47 41 42 45 |WEITEREN EINGABE|
00001C70: 4E 20 4D 4F 45 47 4C 49 43 48 22 3A E0 2C 32 2C |N MOEGLICH":.,2,|
00001C80: 32 34 2C 54 33 24 3A 8D 34 33 35 32 3A 89 32 38 |24,T3$:.4352:.28|
00001C90: 33 30 00 B4 38 E6 0A 99 20 22 57 45 49 54 45 52 |30..8... "WEITER|
00001CA0: 45 20 45 49 4E 47 41 42 45 4E 20 28 4A 2F 4E 29 |E EINGABEN (J/N)|
00001CB0: 20 3F 91 22 00 D1 38 E7 0A A1 20 F9 20 5A 33 24 | ?."..8... . Z3$|
00001CC0: 3A 8B 20 5A 33 24 B2 22 4A 22 20 A7 20 32 38 31 |:. Z3$."J" . 281|
00001CD0: 30 00 E5 38 F0 0A 8B 20 5A 33 24 B2 22 4E 22 20 |0..8... Z3$."N" |
00001CE0: A7 32 38 33 30 00 F0 38 F5 0A 89 20 32 37 39 31 |.2830..8... 2791|
00001CF0: 00 FA 38 FA 0A 99 20 4C 31 24 00 04 39 04 0B 89 |..8... L1$..9...|
00001D00: 32 37 31 30 00 10 39 0E 0B 5A 36 B2 58 AA 31 36 |2710..9..Z6.X.16|
00001D10: 00 46 39 18 0B FE 1A 30 2C 31 2C C2 28 32 33 38 |.F9....0,1,.(238|
00001D20: 29 2C 32 34 2C 31 3A 99 22 13 13 22 3A 8B 20 CE |),24,1:."..":. .|
00001D30: 09 28 32 29 B2 38 30 20 A7 20 FE 1A 32 30 2C 30 |.(2).80 . ..20,0|
00001D40: 2C 35 39 2C 32 34 00 63 39 1D 0B E0 2C 31 33 2C |,59,24.c9...,13,|
00001D50: 31 31 2C 22 42 49 54 54 45 20 57 41 52 54 45 4E |11,"BITTE WARTEN|
00001D60: 20 21 22 00 77 39 1E 0B 8F 20 50 4F 4B 45 20 36 | !".w9... POKE 6|
00001D70: 35 32 38 36 2C 31 31 00 87 39 22 0B 81 20 58 B2 |5286,11..9".. X.|
00001D80: 31 37 20 A4 20 5A 36 00 BC 39 2C 0B 46 31 24 28 |17 . Z6..9,.F1$(|
00001D90: 58 29 B2 48 31 24 28 58 AB 31 36 29 3A 20 46 31 |X).H1$(X.16): F1|
00001DA0: 28 58 29 B2 48 31 28 58 AB 31 36 29 3A 20 46 33 |(X).H1(X.16): F3|
00001DB0: 28 58 29 B2 48 33 28 58 AB 31 36 29 00 D9 39 36 |(X).H3(X.16)..96|
00001DC0: 0B 54 B2 46 31 28 58 29 3A 20 4D B2 46 33 28 58 |.T.F1(X): M.F3(X|
00001DD0: 29 3A 20 8D 20 33 38 32 30 00 0D 3A 40 0B 8B 20 |): . 3820..:@.. |
00001DE0: 46 B2 35 20 A7 20 46 31 28 58 29 B2 31 3A 20 46 |F.5 . F1(X).1: F|
00001DF0: 33 28 58 29 B2 33 3A 20 46 B2 30 3A 20 54 B2 46 |3(X).3: F.0: T.F|
00001E00: 31 28 58 29 3A 20 4D B2 46 33 28 58 29 00 18 3A |1(X): M.F3(X)..:|
00001E10: 4A 0B 8D 20 31 37 39 30 00 25 3A 54 0B 46 32 28 |J.. 1790.%:T.F2(|
00001E20: 58 29 B2 57 5A 00 2D 3A 5E 0B 82 20 58 00 35 3A |X).WZ.-:^.. X.5:|
00001E30: 68 0B 8F 20 3A 00 4C 3A 72 0B 8F 20 42 45 57 45 |h.. :.L:r.. BEWE|
00001E40: 47 4C 49 43 48 45 20 46 45 53 54 45 00 54 3A 7C |GLICHE FESTE.T:||
00001E50: 0B 8F 20 3A 00 6B 3A 86 0B 8C 20 38 33 30 3A 20 |.. :.k:... 830: |
00001E60: 4D B2 33 3A 20 8D 20 34 30 38 30 00 87 3A 90 0B |M.3: . 4080..:..|
00001E70: 47 5A B2 28 41 AA 31 29 AB B5 28 28 41 AA 31 29 |GZ.(A.1)..((A.1)|
00001E80: AD 31 39 29 AC 31 39 00 A1 3A 9A 0B 54 54 B2 4D |.19).19..:..TT.M|
00001E90: 43 28 33 29 AA 32 31 AA 4F 47 28 58 34 2C 47 5A |C(3).21.OG(X4,GZ|
00001EA0: 29 00 AC 3A A4 0B 8D 20 34 32 36 30 00 BB 3A AE |)..:... 4260..:.|
00001EB0: 0B 81 20 58 36 B2 31 20 A4 20 37 00 D5 3A B8 0B |.. X6.1 . 7..:..|
00001EC0: 87 20 46 31 24 28 58 36 29 2C 59 2C 46 32 28 58 |. F1$(X6),Y,F2(X|
00001ED0: 36 29 2C 59 31 00 F4 3A C2 0B 54 54 B2 54 54 AA |6),Y1..:..TT.TT.|
00001EE0: 59 3A 20 54 B2 54 54 AB 4D 43 28 59 31 29 3A 20 |Y: T.TT.MC(Y1): |
00001EF0: 4D B2 59 31 00 0A 3B CC 0B 8B 20 58 36 B2 31 20 |M.Y1..;... X6.1 |
00001F00: A7 20 54 B2 38 AB 57 5A AA 54 00 42 3B D6 0B 8B |. T.8.WZ.T.B;...|
00001F10: 20 54 AA 4D 43 28 59 31 29 B1 4D 43 28 59 31 AA | T.MC(Y1).MC(Y1.|
00001F20: 31 29 20 A7 20 4D B2 59 31 AA 31 3A 20 54 B2 54 |1) . M.Y1.1: T.T|
00001F30: AB 28 4D 43 28 59 31 AA 31 29 AB 4D 43 28 59 31 |.(MC(Y1.1).MC(Y1|
00001F40: 29 29 00 5A 3B E0 0B 8B 20 58 36 B2 31 20 A7 20 |)).Z;... X6.1 . |
00001F50: 54 54 B2 54 AA 4D 43 28 4D 29 00 71 3B EA 0B 46 |TT.T.MC(M).q;..F|
00001F60: 33 28 58 36 29 B2 4D 3A 20 46 31 28 58 36 29 B2 |3(X6).M: F1(X6).|
00001F70: 54 00 7A 3B F4 0B 82 20 58 36 00 82 3B FE 0B 8F |T.z;... X6..;...|
00001F80: 20 3A 00 98 3B 08 0C 8F 20 46 45 53 54 45 20 46 | :..;... FESTE F|
00001F90: 45 49 45 52 54 41 47 45 00 A0 3B 12 0C 8F 20 3A |EIERTAGE..;... :|
00001FA0: 00 B0 3B 1C 0C 81 20 58 36 B2 38 20 A4 20 31 35 |..;... X6.8 . 15|
00001FB0: 00 C2 3B 26 0C 87 20 54 2C 4D 2C 46 31 24 28 58 |..;&.. T,M,F1$(X|
00001FC0: 36 29 00 D9 3B 30 0C 46 31 28 58 36 29 B2 54 3A |6)..;0.F1(X6).T:|
00001FD0: 20 46 33 28 58 36 29 B2 4D 00 E4 3B 3A 0C 8D 20 | F3(X6).M..;:.. |
00001FE0: 31 37 39 30 00 F2 3B 44 0C 46 32 28 58 36 29 B2 |1790..;D.F2(X6).|
00001FF0: 57 5A 00 FB 3B 4E 0C 82 20 58 36 00 03 3C 58 0C |WZ..;N.. X6..<X.|
00002000: 8F 20 3A 00 19 3C 62 0C 8F 20 42 55 53 53 20 55 |. :..<b.. BUSS U|
00002010: 4E 44 20 42 45 54 54 41 47 00 21 3C 6C 0C 8F 20 |ND BETTAG.!<l.. |
00002020: 3A 00 41 3C 76 0C 58 36 B2 31 36 3A 20 54 54 B2 |:.A<v.X6.16: TT.|
00002030: 4D 43 28 31 32 29 AA 32 35 3A 20 8D 20 34 32 36 |MC(12).25: . 426|
00002040: 30 00 53 3C 80 0C 8B 20 57 5A B2 31 20 A7 20 57 |0.S<... WZ.1 . W|
00002050: 5A B2 38 00 70 3C 8A 0C 54 54 B2 54 54 AB 57 5A |Z.8.p<..TT.TT.WZ|
00002060: AB 33 31 3A 20 54 B2 54 54 AB 4D 43 28 31 31 29 |.31: T.TT.MC(11)|
00002070: 00 9D 3C 94 0C 87 20 46 31 24 28 58 36 29 3A 20 |..<... F1$(X6): |
00002080: 46 31 28 58 36 29 B2 54 3A 20 46 32 28 58 36 29 |F1(X6).T: F2(X6)|
00002090: B2 34 3A 20 46 33 28 58 36 29 B2 31 31 00 A5 3C |.4: F3(X6).11..<|
000020A0: 9E 0C 8F 20 3A 00 B5 3C A8 0C 8F 20 53 4F 52 54 |... :..<... SORT|
000020B0: 49 45 52 45 4E 00 BD 3C B2 0C 8F 20 3A 00 D1 3C |IEREN..<... :..<|
000020C0: BC 0C 8B 20 5A 36 B3 58 36 20 A7 20 5A 36 B2 58 |... Z6.X6 . Z6.X|
000020D0: 36 00 E0 3C C6 0C 81 20 58 B2 31 20 A4 20 5A 36 |6..<... X.1 . Z6|
000020E0: 00 08 3D D0 0C 4D 4D 24 B2 C4 28 46 33 28 58 29 |..=..MM$..(F3(X)|
000020F0: 29 3A 20 54 54 24 B2 22 30 22 AA CA 28 C4 28 46 |): TT$."0"..(.(F|
00002100: 31 28 58 29 29 2C 32 29 00 26 3D DA 0C 54 54 24 |1(X)),2).&=..TT$|
00002110: B2 C9 28 54 54 24 2C 32 29 3A 20 56 32 24 B2 4D |..(TT$,2): V2$.M|
00002120: 4D 24 AA 54 54 24 00 37 3D E4 0C 56 32 28 58 29 |M$.TT$.7=..V2(X)|
00002130: B2 C5 28 56 32 24 29 00 3F 3D EE 0C 82 20 58 00 |..(V2$).?=... X.|
00002140: 47 3D F8 0C 59 B2 30 00 5A 3D 02 0D 81 20 58 B2 |G=..Y.0.Z=... X.|
00002150: 31 20 A4 20 28 5A 36 AB 31 29 00 78 3D 0C 0D 8B |1 . (Z6.1).x=...|
00002160: 20 56 32 28 58 AA 31 29 B1 B2 56 32 28 58 29 20 | V2(X.1)..V2(X) |
00002170: A7 20 89 20 33 34 31 30 00 9E 3D 16 0D 43 B2 46 |. . 3410..=..C.F|
00002180: 31 28 58 29 3A 20 46 31 28 58 29 B2 46 31 28 58 |1(X): F1(X).F1(X|
00002190: AA 31 29 3A 20 46 31 28 58 AA 31 29 B2 43 00 C4 |.1): F1(X.1).C..|
000021A0: 3D 20 0D 43 B2 46 32 28 58 29 3A 20 46 32 28 58 |= .C.F2(X): F2(X|
000021B0: 29 B2 46 32 28 58 AA 31 29 3A 20 46 32 28 58 AA |).F2(X.1): F2(X.|
000021C0: 31 29 B2 43 00 EA 3D 2A 0D 43 B2 46 33 28 58 29 |1).C..=*.C.F3(X)|
000021D0: 3A 20 46 33 28 58 29 B2 46 33 28 58 AA 31 29 3A |: F3(X).F3(X.1):|
000021E0: 20 46 33 28 58 AA 31 29 B2 43 00 16 3E 34 0D 43 | F3(X.1).C..>4.C|
000021F0: 24 B2 46 31 24 28 58 29 3A 20 46 31 24 28 58 29 |$.F1$(X): F1$(X)|
00002200: B2 46 31 24 28 58 AA 31 29 3A 20 46 31 24 28 58 |.F1$(X.1): F1$(X|
00002210: AA 31 29 B2 43 24 00 3C 3E 3E 0D 43 B2 56 32 28 |.1).C$.<>>.C.V2(|
00002220: 58 29 3A 20 56 32 28 58 29 B2 56 32 28 58 AA 31 |X): V2(X).V2(X.1|
00002230: 29 3A 20 56 32 28 58 AA 31 29 B2 43 00 44 3E 48 |): V2(X.1).C.D>H|
00002240: 0D 59 B2 31 00 4C 3E 52 0D 82 20 58 00 5F 3E 5C |.Y.1.L>R.. X._>\|
00002250: 0D 8B 20 59 B1 30 20 A7 20 89 20 33 33 32 30 00 |.. Y.0 . . 3320.|
00002260: 73 3E 66 0D 8F 20 50 4F 4B 45 20 36 35 32 38 36 |s>f.. POKE 65286|
00002270: 2C 32 37 00 8A 3E 70 0D 8B 20 5A 32 24 B2 22 44 |,27..>p.. Z2$."D|
00002280: 22 20 A7 20 89 20 33 36 31 30 00 92 3E 7A 0D 8F |" . . 3610..>z..|
00002290: 20 3A 00 AB 3E 84 0D 8F 20 41 55 53 47 41 42 45 | :..>... AUSGABE|
000022A0: 20 42 49 4C 44 53 43 48 49 52 4D 00 B3 3E 8E 0D | BILDSCHIRM..>..|
000022B0: 8F 20 3A 00 CD 3E 98 0D 99 20 57 32 24 3B 57 31 |. :..>... W2$;W1|
000022C0: 24 3A 20 99 20 54 34 24 3B 41 3A 20 99 00 DC 3E |$: . T4$;A: ...>|
000022D0: A2 0D 81 20 58 B2 31 20 A4 20 5A 36 00 FF 3E AC |... X.1 . Z6..>.|
000022E0: 0D 46 33 24 B2 4D 4F 24 28 46 33 28 58 29 29 3A |.F3$.MO$(F3(X)):|
000022F0: 20 46 32 24 B2 54 41 24 28 46 32 28 58 29 29 00 | F2$.TA$(F2(X)).|
00002300: 1E 3F B6 0D 8B 20 46 31 24 28 58 29 B2 46 31 24 |.?... F1$(X).F1$|
00002310: 28 58 AB 31 29 20 A7 20 89 20 33 35 33 30 00 2C |(X.1) . . 3530.,|
00002320: 3F C0 0D 99 20 46 31 24 28 58 29 3B 00 4B 3F CA |?... F1$(X);.K?.|
00002330: 0D 99 A3 31 36 29 46 31 28 58 29 3B A3 32 30 29 |...16)F1(X);.20)|
00002340: 46 33 24 3B A3 32 39 29 46 32 24 00 63 3F D4 0D |F3$;.29)F2$.c?..|
00002350: 8B A8 28 58 B2 31 36 AF 5A 36 B1 31 36 29 A7 33 |..(X.16.Z6.16).3|
00002360: 35 35 30 00 88 3F D5 0D E0 2C 32 2C 32 34 2C 54 |550..?...,2,24,T|
00002370: 33 24 3A 8D 34 33 35 32 3A 99 57 32 24 57 31 24 |3$:.4352:.W2$W1$|
00002380: 3A 99 54 34 24 41 3A 99 00 90 3F DE 0D 82 20 58 |:.T4$A:...?... X|
00002390: 00 A5 3F E8 0D E0 2C 32 2C 32 34 2C 54 33 24 3A |..?...,2,24,T3$:|
000023A0: 8D 34 33 35 32 00 AB 3F F2 0D 8E 00 B3 3F FC 0D |.4352..?.....?..|
000023B0: 8F 20 3A 00 C9 3F 06 0E 8F 20 41 55 53 47 41 42 |. :..?... AUSGAB|
000023C0: 45 20 44 52 55 43 4B 45 52 00 D1 3F 10 0E 8F 20 |E DRUCKER..?... |
000023D0: 3A 00 E0 3F 1A 0E 9F 31 2C 34 2C 30 3A 20 9D 31 |:..?...1,4,0: .1|
000023E0: 00 EB 3F 24 0E 8D 20 33 37 31 35 00 18 40 2E 0E |..?$.. 3715..@..|
000023F0: 99 20 C7 28 31 34 29 3B A6 37 29 3B 22 46 45 53 |. .(14);.7);"FES|
00002400: 54 54 41 47 53 4B 41 4C 45 4E 44 45 52 20 22 3B |TTAGSKALENDER ";|
00002410: 41 3A 8D 20 33 37 31 35 00 27 40 38 0E 81 20 58 |A:. 3715.'@8.. X|
00002420: B2 31 20 A4 20 5A 36 00 49 40 42 0E 46 33 24 B2 |.1 . Z6.I@B.F3$.|
00002430: 4D 4F 24 28 46 33 28 58 29 29 3A 46 32 24 B2 54 |MO$(F3(X)):F2$.T|
00002440: 41 24 28 46 32 28 58 29 29 00 84 40 51 0E 46 31 |A$(F2(X))..@Q.F1|
00002450: 24 28 58 29 B2 46 31 24 28 58 29 AA 22 20 20 20 |$(X).F1$(X)." |
00002460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002470: 3A 46 31 24 28 58 29 B2 C8 28 46 31 24 28 58 29 |:F1$(X)..(F1$(X)|
00002480: 2C 32 30 29 00 96 40 56 0E 99 A6 31 34 29 3B 46 |,20)..@V...14);F|
00002490: 31 24 28 58 29 3B 00 BC 40 60 0E 46 33 24 B2 46 |1$(X);..@`.F3$.F|
000024A0: 33 24 AA 22 20 20 20 20 20 20 20 20 20 22 3A 46 |3$." ":F|
000024B0: 33 24 B2 C8 28 46 33 24 2C 31 30 29 00 E2 40 61 |3$..(F3$,10)..@a|
000024C0: 0E 46 32 24 B2 46 32 24 AA 22 20 20 20 20 20 20 |.F2$.F2$." |
000024D0: 20 20 20 22 3A 46 32 24 B2 C8 28 46 32 24 2C 31 | ":F2$..(F2$,1|
000024E0: 30 29 00 02 41 65 0E 99 FB 22 23 23 23 22 3B 46 |0)..Ae..."###";F|
000024F0: 31 28 58 29 3B 3A 99 A6 32 29 3B 46 33 24 3B 46 |1(X);:..2);F3$;F|
00002500: 32 24 00 0A 41 6A 0E 82 20 58 00 14 41 74 0E 8D |2$..Aj.. X..At..|
00002510: 33 37 31 35 00 21 41 7E 0E 99 3A 98 31 3A 20 A0 |3715.!A~..:.1: .|
00002520: 31 00 27 41 7F 0E 8E 00 43 41 83 0E 99 3A 20 99 |1.'A....CA...: .|
00002530: A6 34 29 3B 4C 32 24 3B C8 28 4C 32 24 2C 32 30 |.4);L2$;.(L2$,20|
00002540: 29 3A 99 00 49 41 88 0E 8E 00 69 41 92 0E 8F 20 |):..IA....iA... |
00002550: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00002560: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 86 41 9C 0E 8F 20 |=========..A... |
00002570: 53 55 42 52 4F 55 54 49 4E 45 20 54 52 41 50 2D |SUBROUTINE TRAP-|
00002580: 52 45 53 55 4D 45 00 A6 41 A6 0E 8F 20 3D 3D 3D |RESUME..A... ===|
00002590: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000025A0: 3D 3D 3D 3D 3D 3D 00 B8 41 B0 0E E0 2C 36 2C 31 |======..A...,6,1|
000025B0: 34 2C 57 33 24 3A A0 31 00 E1 41 BA 0E 99 20 22 |4,W3$:.1..A... "|
000025C0: 53 49 45 20 48 41 42 45 4E 20 45 49 4E 45 4E 20 |SIE HABEN EINEN |
000025D0: 46 45 48 4C 45 52 20 47 45 4D 41 43 48 54 21 11 |FEHLER GEMACHT!.|
000025E0: 22 00 F3 41 BF 0E 99 A3 36 29 3B D3 28 45 52 29 |"..A....6);.(ER)|
000025F0: 3B 45 4C 00 08 42 C4 0E E0 2C 32 2C 32 34 2C 54 |;EL..B...,2,24,T|
00002600: 33 24 3A 8D 34 33 35 32 00 1C 42 C5 0E 8B 20 45 |3$:.4352..B... E|
00002610: 52 B2 35 20 A7 20 D6 20 33 36 30 30 00 27 42 C6 |R.5 . . 3600.'B.|
00002620: 0E D6 20 31 35 36 30 00 47 42 CE 0E 8F 20 3D 3D |.. 1560.GB... ==|
00002630: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00002640: 3D 3D 3D 3D 3D 3D 3D 00 67 42 D8 0E 8F 20 53 55 |=======.gB... SU|
00002650: 42 52 4F 55 54 49 4E 45 20 44 41 54 55 4D 53 50 |BROUTINE DATUMSP|
00002660: 52 55 45 46 55 4E 47 00 87 42 E2 0E 8F 20 3D 3D |RUEFUNG..B... ==|
00002670: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00002680: 3D 3D 3D 3D 3D 3D 3D 00 97 42 EC 0E 8B 20 41 B2 |=======..B... A.|
00002690: 30 20 A7 20 46 B2 31 00 B0 42 F6 0E 8B 20 41 B3 |0 . F.1..B... A.|
000026A0: 30 20 B0 20 41 B1 32 32 39 39 20 A7 20 46 B2 32 |0 . A.2299 . F.2|
000026B0: 00 C8 42 00 0F 8B 20 54 B3 B2 30 20 B0 20 54 B1 |..B... T..0 . T.|
000026C0: 33 31 20 A7 20 46 B2 33 00 E8 42 0A 0F 8B 20 4D |31 . F.3..B... M|
000026D0: B3 B2 30 20 B0 20 4D B1 31 32 20 A7 20 46 B2 35 |..0 . M.12 . F.5|
000026E0: 3A 20 89 20 33 39 31 30 00 27 43 14 0F 8B 20 41 |: . 3910.'C... A|
000026F0: B1 B2 31 36 30 30 20 AF 20 C9 28 C4 28 41 29 2C |..1600 . .(.(A),|
00002700: 32 29 B2 22 30 30 22 20 AF 20 41 AD 34 30 30 B2 |2)."00" . A.400.|
00002710: B5 28 41 AD 34 30 30 29 20 AF 20 4D B2 32 20 A7 |.(A.400) . M.2 .|
00002720: 20 89 20 33 38 39 30 00 59 43 1E 0F 8B 20 C9 28 | . 3890.YC... .(|
00002730: C4 28 41 29 2C 32 29 B3 B1 22 30 30 22 20 AF 20 |.(A),2).."00" . |
00002740: 41 AD 34 B2 B5 28 41 AD 34 29 20 AF 20 4D B2 32 |A.4..(A.4) . M.2|
00002750: 20 A7 20 89 20 33 38 39 30 00 75 43 28 0F 8B 20 | . . 3890.uC(.. |
00002760: 54 B1 4D 43 28 4D AA 31 29 AB 4D 43 28 4D 29 20 |T.MC(M.1).MC(M) |
00002770: A7 20 46 B2 35 00 95 43 32 0F 8B 20 54 B1 28 4D |. F.5..C2.. T.(M|
00002780: 43 28 4D AA 31 29 AB 4D 43 28 4D 29 AA 31 29 20 |C(M.1).MC(M).1) |
00002790: A7 20 46 B2 33 00 BC 43 3C 0F 8B 20 41 B2 31 35 |. F.3..C<.. A.15|
000027A0: 38 32 20 AF 20 4D B2 31 30 20 AF 20 54 B1 34 20 |82 . M.10 . T.4 |
000027B0: AF 20 54 B3 31 35 20 A7 20 46 B2 34 00 C2 43 46 |. T.15 . F.4..CF|
000027C0: 0F 8E 00 E2 43 50 0F 8F 20 3D 3D 3D 3D 3D 3D 3D |....CP.. =======|
000027D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000027E0: 3D 3D 00 00 44 5A 0F 8F 20 53 55 42 52 4F 55 54 |==..DZ.. SUBROUT|
000027F0: 49 4E 45 20 46 45 48 4C 45 52 41 4E 47 41 42 45 |INE FEHLERANGABE|
00002800: 00 20 44 64 0F 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D |. Dd.. =========|
00002810: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00002820: 00 2F 44 6E 0F E0 2C 38 2C 31 34 2C 57 33 24 00 |./Dn..,8,14,W3$.|
00002830: 52 44 78 0F 91 20 46 20 89 20 33 39 37 30 2C 33 |RDx.. F . 3970,3|
00002840: 39 38 30 2C 33 39 39 30 2C 34 30 30 30 2C 33 39 |980,3990,4000,39|
00002850: 39 30 00 81 44 82 0F 99 20 22 44 41 53 20 4A 41 |90..D... "DAS JA|
00002860: 48 52 20 27 4E 55 4C 4C 27 20 47 49 42 54 20 45 |HR 'NULL' GIBT E|
00002870: 53 20 4E 49 43 48 54 21 22 3A 20 89 20 34 30 32 |S NICHT!": . 402|
00002880: 30 00 B1 44 8C 0F 99 20 22 44 41 54 55 4D 20 4E |0..D... "DATUM N|
00002890: 49 43 48 54 20 49 4D 20 50 52 4F 47 52 41 4D 4D |ICHT IM PROGRAMM|
000028A0: 42 45 52 45 49 43 48 21 22 3A 20 89 20 34 30 32 |BEREICH!": . 402|
000028B0: 30 00 DD 44 96 0F 99 20 22 44 49 45 53 45 53 20 |0..D... "DIESES |
000028C0: 44 41 54 55 4D 20 47 49 42 54 20 45 53 20 4E 49 |DATUM GIBT ES NI|
000028D0: 43 48 54 21 22 3A 20 89 20 34 30 32 30 00 FD 44 |CHT!": . 4020..D|
000028E0: A0 0F 99 20 22 4B 41 4C 45 4E 44 45 52 55 4D 53 |... "KALENDERUMS|
000028F0: 54 45 4C 4C 55 4E 47 20 2D 22 3A 20 99 00 21 45 |TELLUNG -": ..!E|
00002900: AA 0F 99 20 22 44 49 45 53 45 53 20 44 41 54 55 |... "DIESES DATU|
00002910: 4D 20 47 49 42 54 20 45 53 20 4E 49 43 48 54 21 |M GIBT ES NICHT!|
00002920: 22 00 3B 45 B4 0F E0 2C 32 2C 32 34 2C 54 33 24 |".;E...,2,24,T3$|
00002930: 3A 8D 34 33 35 32 3A 20 46 B2 30 00 6A 45 BE 0F |:.4352: F.0.jE..|
00002940: 8B 20 58 35 B2 31 20 A7 20 99 57 32 24 3B 57 31 |. X5.1 . .W2$;W1|
00002950: 24 3B 54 39 24 3B 41 3A 99 57 35 24 3A 58 B2 58 |$;T9$;A:.W5$:X.X|
00002960: AB 31 3A 20 46 B2 30 3A 20 8E 00 75 45 C8 0F 89 |.1: F.0: ..uE...|
00002970: 20 31 35 36 30 00 95 45 D2 0F 8F 20 3D 3D 3D 3D | 1560..E... ====|
00002980: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00002990: 3D 3D 3D 3D 3D 00 BA 45 DC 0F 8F 20 53 55 42 52 |=====..E... SUBR|
000029A0: 4F 55 54 49 4E 45 20 53 4F 4E 4E 54 41 47 53 27 |OUTINE SONNTAGS'|
000029B0: 42 55 43 48 53 54 41 42 45 27 00 DA 45 E6 0F 8F |BUCHSTABE'..E...|
000029C0: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===============|
000029D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 F0 45 F0 0F 4D |==========..E..M|
000029E0: 4D 24 B2 22 30 22 AA CA 28 C4 28 4D 29 2C 32 29 |M$."0"..(.(M),2)|
000029F0: 00 06 46 FA 0F 54 54 24 B2 22 30 22 AA CA 28 C4 |..F..TT$."0"..(.|
00002A00: 28 54 29 2C 32 29 00 25 46 04 10 56 31 24 B2 C4 |(T),2).%F..V1$..|
00002A10: 28 41 29 AA C9 28 4D 4D 24 2C 32 29 AA C9 28 54 |(A)..(MM$,2)..(T|
00002A20: 54 24 2C 32 29 00 2E 46 0E 10 58 34 B2 30 00 3A |T$,2)..F..X4.0.:|
00002A30: 46 18 10 58 34 B2 58 34 AA 31 00 54 46 22 10 8B |F..X4.X4.1.TF"..|
00002A40: 20 C5 28 56 31 24 29 B3 47 4A 28 58 34 29 20 A7 | .(V1$).GJ(X4) .|
00002A50: 34 31 36 30 00 8D 46 2C 10 8B 20 41 B3 B1 31 35 |4160..F,.. A..15|
00002A60: 38 32 20 AF 20 41 B2 C5 28 C8 28 C4 28 47 4A 28 |82 . A..(.(.(GJ(|
00002A70: 58 34 29 29 2C 35 29 29 A7 20 53 5A B2 46 42 28 |X4)),5)). SZ.FB(|
00002A80: 58 34 29 3A 58 34 B2 58 34 AA 31 3A 8E 00 97 46 |X4):X4.X4.1:...F|
00002A90: 36 10 89 34 31 32 30 00 A6 46 40 10 52 B2 41 AB |6..4120..F@.R.A.|
00002AA0: 5A 53 28 58 34 29 00 BA 46 4A 10 53 5A B2 52 AB |ZS(X4)..FJ.SZ.R.|
00002AB0: B5 28 52 AD 32 38 29 AC 32 38 00 CD 46 54 10 8B |.(R.28).28..FT..|
00002AC0: 20 53 5A B2 30 20 A7 20 53 5A B2 32 38 00 FA 46 | SZ.0 . SZ.28..F|
00002AD0: 5E 10 53 5A B2 53 42 28 53 5A 29 3A 20 58 32 B2 |^.SZ.SB(SZ): X2.|
00002AE0: 53 5A 3A 20 8B 20 C3 28 C4 28 53 5A 29 29 B3 B2 |SZ: . .(.(SZ))..|
00002AF0: 32 20 A7 20 89 20 34 32 32 30 00 0D 47 68 10 58 |2 . . 4220..Gh.X|
00002B00: 31 B2 33 3A 8B 4D B3 33 A7 58 31 B2 32 00 25 47 |1.3:.M.3.X1.2.%G|
00002B10: 72 10 53 5A B2 C5 28 CA 28 C4 28 53 5A 29 2C 58 |r.SZ..(.(.(SZ),X|
00002B20: 31 2C 31 29 29 00 2B 47 7C 10 8E 00 4B 47 86 10 |1,1)).+G|...KG..|
00002B30: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |. ==============|
00002B40: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 6D 47 90 10 |===========.mG..|
00002B50: 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 54 41 47 |. SUBROUTINE TAG|
00002B60: 45 53 27 42 55 43 48 53 54 41 42 45 27 00 8D 47 |ES'BUCHSTABE'..G|
00002B70: 9A 10 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |... ============|
00002B80: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 A1 47 |=============..G|
00002B90: A4 10 54 5A B2 54 54 AB B5 28 54 54 AD 37 29 AC |..TZ.TT..(TT.7).|
00002BA0: 37 00 B3 47 AE 10 8B 20 54 5A B2 30 20 A7 20 54 |7..G... TZ.0 . T|
00002BB0: 5A B2 37 00 CF 47 B8 10 57 5A B2 54 5A 3A 8B 20 |Z.7..G..WZ.TZ:. |
00002BC0: 54 5A B3 53 5A 20 A7 20 57 5A B2 54 5A AA 37 00 |TZ.SZ . WZ.TZ.7.|
00002BD0: DE 47 C2 10 57 5A B2 57 5A AB 53 5A AA 31 00 E4 |.G..WZ.WZ.SZ.1..|
00002BE0: 47 CC 10 8E 00 04 48 D6 10 8F 20 4E 41 43 48 53 |G.....H... NACHS|
00002BF0: 50 41 4E 4E 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |PANN============|
00002C00: 3D 3D 3D 3D 00 1B 48 E0 10 42 24 B2 C7 28 33 32 |====..H..B$..(32|
00002C10: 29 3A 42 32 24 B2 42 24 AA 42 24 00 35 48 EA 10 |):B2$.B$.B$.5H..|
00002C20: 42 33 24 B2 42 32 24 AA 42 24 3A 42 34 24 B2 42 |B3$.B2$.B$:B4$.B|
00002C30: 33 24 AA 42 24 00 4F 48 F4 10 42 35 24 B2 42 34 |3$.B$.OH..B5$.B4|
00002C40: 24 AA 42 24 3A 42 36 24 B2 42 35 24 AA 42 24 00 |$.B$:B6$.B5$.B$.|
00002C50: 60 48 FE 10 42 24 B2 42 35 24 AA 42 35 24 3A 8E |`H..B$.B5$.B5$:.|
00002C60: 00 71 48 FF 10 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |.qH... ---------|
00002C70: 2D 00 85 48 00 11 A1 58 24 3A 8B 58 24 B2 22 22 |-..H...X$:.X$.""|
00002C80: A7 34 33 35 32 00 8B 48 01 11 8E 00 AB 48 08 11 |.4352..H.....H..|
00002C90: 8F 20 4B 41 4C 45 4E 44 45 52 20 32 33 30 30 20 |. KALENDER 2300 |
00002CA0: 3D 3D 3D 3D 3D 3D 3D 45 4E 44 45 00 CB 48 12 11 |=======ENDE..H..|
00002CB0: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |. ==============|
00002CC0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 00 00 |===========... |
..#.... KALENDER=2300==========C128.A...
. (P) COMMODORE DISC TEAM.C.... ========
===================...(.. (C) BY FWK
V3.5...2.. WIESLOCH...<.
..C.F.. (V) A.M. V2.0...P.
. (V) J. HEUBL V7.0...Z.....D.
. =========================.!.H..:W3730:
.0,1:.4,1.5.I.. N.(2).80 . ...N.J.:.6,1:
..20,0,59,24,1.U.K...._.N..4320.|.X..,13
,11,"BITTE WARTEN !"...... =============
=============...... VARIABLE DIMENSIONIE
REN...... ==========================...
.. MO$(12),TA$(7),MC(13),SB(28),GJ(7),ZS
(7),OG(7,19).>.... F1$(32),F1(32),F2(32)
,F3(32),V2(32)._.... H1$(16),H1(16),H3(1
6):.920...... ==========================
...H.. DATAZEILEN...R.. ================
==========.O.... MONATSNAMEN = MO$(12).
..... ==========================...... J
ANUAR,FEBRUAR,MAERZ,APRIL,MAI,JUNI.P....
JULI,AUGUST,SEPTEMBER,OKTOBER,NOVEMBER,
DEZEMBER.Q.... =========================
=...... TAGESNAMEN = TA$(7)...... =====
=====================.S."..SONNTAG,MONTA
G,DIENSTAG,MITTWOCH...,.. DONNERSTAG,FRE
ITAG,SAMSTAG.. 6.. =====================
=====.5 @.. MONATSKONSTANTE = MC(13).V
J.. ==========================.S T.. 0,3
1,59,90,120,151,181.. ^.. 212,243,273,30
4,334,365.. H.. ========================
==.X R.. SONNTAGS 'BUCHSTABEN' = SB(28)
.. |.. ==========================..!...
76,5,4,3,21,7,6,5,43,2,1,7,65,4.D!... 3,
2,17,6,5,4,32,1,7,6,54,3,2,1.E!... =====
=====================..!... FESTE SONNTA
GSBUCHSTABEN = FB(5)..!... =============
=============..!... 3,5,7,3,5..!B.. ====
======================..!L.. GRENZJAHRE
= GJ(7).."V.. =========================
=.Z"... 15821004,17000101,18000101,19000
101,21000101,22000101,1E20.{"... =======
===================.."... ZYKLUSSTART =
ZS(7).."... ==========================.
."...-9,1567,1691,1787,1883,2091,2187.."
... ==========================..#... OST
ERGRENZEN = OG(7,19).>#&.. ============
==============.J#0.. OG(1).K#:.. =======
===================..#D.. 15,4,23,12,1,2
0,9,28,17,6..#N.. 25,14,3,22,11,0,19,8,2
7.J#X.. ==========================.V#B..
OG(2)..#L.. ==========================.
.$V.. 22,11,0,19,8,27,16,5,24,13.6$... 2
,21,10,28,18,7,26,15,4.W$... ===========
===============.E$... OG(3+4)..$... ====
======================..$... 23,12,1,20,
9,28,17,6,25,14.D$... 3,22,11,0,19,8,27,
16,5..$... ==========================..$
F.. OG(5+6)..%P.. ======================
====.6%Z.. 24,13,2,21,10,28,18,7,26,15.S
%... 4,23,12,1,20,9,27,17,6.T%... ======
====================..%... OG(7)..%... =
=========================.B%... 25,14,3,
22,11,0,19,8,27,16..%... 5,24,13,2,21,10
,28,18,7..& .. =========================
=..&*.. DATEN DER FESTTAGE.;&4.. =======
===================.M&>.. OSTERN,0,1,3,O
STERN,1,2,3,KARFREITAG,-3,6,3..&H.. CHRI
STI HIMMELF.,41,5,5,PFINGSTEN,10,1,5.F&R
.. PFINGSTEN,1,2,5,FRONLEICHNAM,10,5,5..
&\.. 1,1,NEUJAHR,6,1,HL.DREI KOENIGE,1,5
,TAG DER ARBEIT./'F.. 15,8,MARIAE HIMMEL
F.,3,10,T.D.DTSCH.EINH..|'P.. 1,11,ALLER
HEILIGEN,25,12,WEIHNACHTEN,26,12,WEIHNAC
HTEN,BUSS UND BETTAG..'Z.. =============
=============..'... DATA LESEN.O'... ===
=======================..'... X.1 . 12:
. MO$(X): . X..(... 260:. X.1 . 7: . TA$
(X):. X.,(... X.1 . 13: . MC(X): . X.N(.
.. 390:. X.1 . 28: . SB(X):. X.J(... X.2
. 6: . FB(X): . X..(J.. X.1 . 7: . GJ(X
): . X..(T.. X.1 . 7: . ZS(X): . X..(...
X.1 . 7..(... X.4 ..580.P(... X.6 ..730
..(...530:. Y.1 . 19: . OG(X,Y): . Y..(.
.. X..)... =========================..).
.. TEXTSTRINGS.N)$.. ===================
======..)..T1$.B4$.B4$."*** PROGRAMM KAL
ENDER ***".B4$.B3$..)8.T2$.B6$."** WEITE
R MIT <SPACE> **".B6$.F)B.T3$.G(18).T2$.
G(146)..)L.T4$.B2$."FESTTAGSKALENDER DES
JAHRES"..*V.T5$."NR. D. WOCHENTAGES =".
0*`.T6$."TAGESDATUM".B5$.B4$."=".P*J.T7$
."NR. D. MONATS".B6$."=".J*T.T8$."JAHR".
B$.B5$."="..*~.T9$."ZUSATZEINGABEN"..*..
T0$.G(145)..*..L1$."": . X.1 . 40: L1$.L
1$."-": . X..*..L2$."": . X.1 . 46: L2$.
L2$."*": . X..+... =====================
====..+... WINDOWSTRINGS.8+... =========
================.Q+D.W1$.G(18).T1$.G(146
).`+N.W2$.G(147).K+X.W3$.""..+..W4$."":W
5$.G(18).F+..W5$.W5$."BEZEICHNUNG(MAX.16
) :".B2$."TAG".B4$."MONAT [NR]".G(146)..
+... =========================..+... MEN
UE..,... =========================.(,...
W2$W1$:.,5,3,W3$.L,".X.0: Y.0: F.0: X1.0
: X2.0: X5.0.Y,,.. "BITTE GEBEN SIE DIE
NUMMER DES":.,5,4..,6.. "GEWUENSCHTEN UN
TERPROGRAMMS EIN:":.,5,6.D,@.. "WOCHENTA
G = 1":.,5,8..,J.. "TAGESDATUM= 2":.,5,1
0..,T.. "MONAT"B5$"= 3":.,5,12..-^.. "FE
STTAGE"B2$"= 4":.,5,14.3-H.. "END"B6$" =
5".G-|..X$:.X$."".1660.N-...F(X$).7. 17
20,1910,2220,2550,1680.Y-... 1560..-...
W2$: ...-... =========================.I
-... UNTERPROGRAMM WOCHENTAGSUCHE..-...
=========================......W2$W1$;:.
,8,3,W3$...B.. "GESUCHT: DER WOCHENTAG".
-.L..,8,5,W3$.K.V.. T6$:.,8,7,T7$:.,8,9,
T8$.Z....,30,5,W3$.X.... T:.,30,7:. M:.,
30,9:. A...... 3820: . F.0 . . 3950.....
. 4080.....TT.MC(M).T...... 4260.G.... X
5.1 . ..V.&..,8,12,W3$...0.. "ERGEBNIS:"
:.,8,14../:.. TA$(WZ);",";.19) T;.23) MO
$(M);.32) A.0/D..,2,24,T3$:.4352.6/N...V
/X.. =========================.U/B.. UNT
ERPROGRAMM TAGESDATUM../L.. ============
=============../V..W2$W1$:.,0,3,W3$.V/..
. X.1 . 7: . H(TA$(X),2);"=";X: .: . X..
/...,8,3,W3$..0... "GESUCHT: DAS TAGESDA
TUM"..0...,8,5,W3$.00... T5$:.,8,7,T7$:.
,8,9,T8$.?0...,30,5,W3$.C0... WZ:.,30,7:
.M:.,30,9: . A: T.1.~0F.. 3820: . F.0 .
. 3950..0P.. 4080..0Z.TZ.WZ.SZ.1: . TZ.7
. TZ.TZ.7.Y0..TH.MC(M).1: TH.TH..(TH.7)
.7: . TH.0 . TH.7..0... TZ.TH . TZ.TZ.7.
.1..TH.TZ.TH.1:X3.1:TD(X3).TH:XH.MC(3).1
1... X1.2 . MC(3).MC(3).1.S1...MC(M).TD(
X3).6..MC(M.1).2090.R1..X3.X3.1: TD(X3).
TD(X3.1).7.|1 ..2060..1*.MC(3).XH..14..,
8,12,W3$..1>.. "ERGEBNIS:": ...1H.Z.1.L1
R..II.Z.X3:.,8,13.II..1\.. TA$(WZ);",";.
19) TD(II);.23) MO$(M);.32) A:...2F.Z.II
..2Z..,2,24,T3$:.4352.=2... ============
=============.W2... UNTERPROGRAMM MONAT.
W2... =========================..2...W2$
W1$:.,0,3,W3$..2... X.1 . 7: . H(TA$(X),
2);"=";X: .: . X.F2...,8,3,W3$..2J.. "GE
SUCHT: DER MONAT"..2T..,8,5,W3$..3... T5
$:.,8,7,T6$:.,8,9,T8$..3...,30,5,W3$.=3.
.. WZ:.,30,7:.T:.,30,9:.A:M.1.X3... 3820
: . F.0 . . 3950.C3... 4080.L3..X3.0.{3.
.. M.1 . 12..3$.. C(D(X2)).2 . M.2 . XH.
MC(3): MC(3).MC(3).1..3... C(D(X2)).2 .
M.3 . SZ.E(J(D(X2),3,1)): MC(3).XH..48.T
Z.WZ.SZ.1: . TZ.7 . TZ.TZ.7.)4B.TH.MC(M)
.T: . TH.MC(M.1) . . 2400.K4L.TH.TH..(TH
.7).7:. TH.0 . TH.7.K4V.. TH.TZ . X3.X3.
1: MH(X3).M.S4`.. M..4J..,8,12,W3$..4T..
"ERGEBNIS:": ...4~.. X3..0 . . 2460..4.
..,8,14,"IM JAHR".D(A)."GIBT ES KEINEN":
.,8,15..5... TA$(WZ);", DEN";T;".": . 24
90..5... Z.1 . X3:.,8,13.Z.J5... TA$(WZ)
;",";.19) T;.23) MO$(MH(Z));.32) A.R5...
Z.G5...,2,24,T3$:.4352.M5D....5N.. ====
=====================..5X.. UNTERPROGRAM
M FESTKALENDER.R5... GESETZLICHE FEIERTA
GE DER BRD..5... =======================
==..6...W2$W1$:.,8,3,W3$.,6... "GESUCHT:
FESTKALENDER":.,8,5.M6... "RECHENZEIT C
A. 10-45 SEC".[6...,8,7,W3$.N6... T8$;.2
);:. A..6(..,8,9,"ZUSATZEINGABEN (J/N) ?
"..6).. . Z1$:. Z1$."J" . Z1$."N" . 2610
.C6*.. 2601..62..,8,11,"DRUCKER ODER BIL
DSCHIRM (D/B) ?"..7<.. . Z2$:. Z2$."D" .
Z2$."B" . 2630."7A.. 2620./7F.T.1: M.1.
J7P.. 3820: . F.0 . . 3950.X7Z.X5.1: X.0
.O7D.. Z1$."N" . . 2840.W7N.. :..7X.. ZU
SATZEINGABEN..7... :..7...W2$;..7... W1$
;T9$;A:. W5$..7..X.X.1.P7 .." ";:.H1$(X)
..7... T0$,,: . H1(X)..7... T0$,,,: . H3
(X)..8..H1$(X).H(H1$(X),16).08H.T.H1(X):
M.H3(X): . 3820.C8R.. F.0 . . 3950.S8..
.X..16.2790..8..."KEINE WEITEREN EINGABE
N MOEGLICH":.,2,24,T3$:.4352:.2830..8...
"WEITERE EINGABEN (J/N) ?.".Q8... . Z3$
:. Z3$."J" . 2810..8... Z3$."N" .2830..8
... 2791..8... L1$..9...2710..9..Z6.X.16
.F9....0,1,B(238),24,1:."..":. N.(2).80
. ..20,0,59,24.C9...,13,11,"BITTE WARTEN
!".W9... POKE 65286,11..9".. X.17 . Z6.
.9,.F1$(X).H1$(X.16): F1(X).H1(X.16): F3
(X).H3(X.16).Y96.T.F1(X): M.F3(X): . 382
0..:@.. F.5 . F1(X).1: F3(X).3: F.0: T.F
1(X): M.F3(X)..:J.. 1790.%:T.F2(X).WZ.-:
^.. X.5:H.. :.L:R.. BEWEGLICHE FESTE.T:|
.. :.K:... 830: M.3: . 4080..:..GZ.(A.1)
..((A.1).19).19..:..TT.MC(3).21.OG(X4,GZ
)..:... 4260..:... X6.1 . 7.U:... F1$(X6
),Y,F2(X6),Y1..:B.TT.TT.Y: T.TT.MC(Y1):
M.Y1..;L.. X6.1 . T.8.WZ.T.B;V.. T.MC(Y1
).MC(Y1.1) . M.Y1.1: T.T.(MC(Y1.1).MC(Y1
)).Z;... X6.1 . TT.T.MC(M).Q;..F3(X6).M:
F1(X6).T.Z;... X6..;... :..;... FESTE F
EIERTAGE. ;... :..;... X6.8 . 15.B;&.. T
,M,F1$(X6).Y;0.F1(X6).T: F3(X6).M..;:..
1790..;D.F2(X6).WZ..;N.. X6..<X.. :..<B.
. BUSS UND BETTAG.!<L.. :.A<V.X6.16: TT.
MC(12).25: . 4260.S<... WZ.1 . WZ.8.P<..
TT.TT.WZ.31: T.TT.MC(11)..<... F1$(X6):
F1(X6).T: F2(X6).4: F3(X6).11..<... :..<
... SORTIEREN..<... :.Q<... Z6.X6 . Z6.X
6..<F.. X.1 . Z6..=P.MM$.D(F3(X)): TT$."
0".J(D(F1(X)),2).&=Z.TT$.I(TT$,2): V2$.M
M$.TT$.7=..V2(X).E(V2$).?=... X.G=..Y.0.
Z=... X.1 . (Z6.1).X=... V2(X.1)..V2(X)
. . 3410..=..C.F1(X): F1(X).F1(X.1): F1(
X.1).C.D= .C.F2(X): F2(X).F2(X.1): F2(X.
1).C..=*.C.F3(X): F3(X).F3(X.1): F3(X.1)
.C..>4.C$.F1$(X): F1$(X).F1$(X.1): F1$(X
.1).C$.<>>.C.V2(X): V2(X).V2(X.1): V2(X.
1).C.D>H.Y.1.L>R.. X._>\.. Y.0 . . 3320.
S>F.. POKE 65286,27..>P.. Z2$."D" . . 36
10..>Z.. :..>... AUSGABE BILDSCHIRM..>..
. :.M>... W2$;W1$: . T4$;A: ...>... X.1
. Z6..>..F3$.MO$(F3(X)): F2$.TA$(F2(X)).
.?... F1$(X).F1$(X.1) . . 3530.,?... F1$
(X);.K?J...16)F1(X);.20)F3$;.29)F2$.C?T.
..(X.16.Z6.16).3550..?U..,2,24,T3$:.4352
:.W2$W1$:.T4$A:...?... X..?...,2,24,T3$:
.4352..?.....?... :.I?... AUSGABE DRUCKE
R.Q?... :..?...1,4,0: .1..?$.. 3715..@..
. G(14);.7);"FESTTAGSKALENDER ";A:. 3715
.'@8.. X.1 . Z6.I@B.F3$.MO$(F3(X)):F2$.T
A$(F2(X))..@Q.F1$(X).F1$(X)."
":F1$(X).H(F1$(X),20)..@V...14);F
1$(X);..@`.F3$.F3$." ":F3$.H(F3$
,10)..@A.F2$.F2$." ":F2$.H(F2$,1
0)..AE..."###";F1(X);:..2);F3$;F2$..AJ..
X..AT..3715.!A~..:.1: 1.'A...CA...: .
.4);L2$;H(L2$,20):..IA....IA... ========
=================..A... SUBROUTINE TRAP-
RESUME..A... =========================..
A...,6,14,W3$: 1..A... "SIE HABEN EINEN
FEHLER GEMACHT!."..A....6);S(ER);EL..BD.
.,2,24,T3$:.4352..BE.. ER.5 . V 3600.'BF
.V 1560.GBN.. =========================.
GBX.. SUBROUTINE DATUMSPRUEFUNG..B... ==
=======================..B... A.0 . F.1.
.B... A.0 . A.2299 . F.2.HB... T..0 . T.
31 . F.3..B... M..0 . M.12 . F.5: . 3910
.'C... A..1600 . I(D(A),2)."00" . A.400.
.(A.400) . M.2 . . 3890.YC... I(D(A),2).
."00" . A.4..(A.4) . M.2 . . 3890.UC(..
T.MC(M.1).MC(M) . F.5..C2.. T.(MC(M.1).M
C(M).1) . F.3..C<.. A.1582 . M.10 . T.4
. T.15 . F.4.BCF....CP.. ===============
==========..DZ.. SUBROUTINE FEHLERANGABE
. DD.. =========================./DN..,8
,14,W3$.RDX.. F . 3970,3980,3990,4000,39
90..D... "DAS JAHR 'NULL' GIBT ES NICHT!
": . 4020..D... "DATUM NICHT IM PROGRAMM
BEREICH!": . 4020..D... "DIESES DATUM GI
BT ES NICHT!": . 4020..D .. "KALENDERUMS
TELLUNG -": ..!E... "DIESES DATUM GIBT E
S NICHT!".;E...,2,24,T3$:.4352: F.0.JE..
. X5.1 . .W2$;W1$;T9$;A:.W5$:X.X.1: F.0:
..UEH.. 1560..ER.. ====================
=====..E... SUBROUTINE SONNTAGS'BUCHSTAB
E'.ZE... =========================..E..M
M$."0".J(D(M),2)..F..TT$."0".J(D(T),2).%
F..V1$.D(A).I(MM$,2).I(TT$,2)..F..X4.0.:
F..X4.X4.1.TF".. E(V1$).GJ(X4) .4160..F,
.. A..1582 . A.E(H(D(GJ(X4)),5)). SZ.FB(
X4):X4.X4.1:...F6..4120..F@.R.A.ZS(X4)..
FJ.SZ.R..(R.28).28.MFT.. SZ.0 . SZ.28..F
^.SZ.SB(SZ): X2.SZ: . C(D(SZ))..2 . . 42
20..GH.X1.3:.M.3.X1.2.%GR.SZ.E(J(D(SZ),X
1,1)).+G|...KG... ======================
===.MG... SUBROUTINE TAGES'BUCHSTABE'..G
... =========================..G..TZ.TT.
.(TT.7).7..G... TZ.0 . TZ.7.OG..WZ.TZ:.
TZ.SZ . WZ.TZ.7..GB.WZ.WZ.SZ.1..GL....HV
.. NACHSPANN================..H..B$.G(32
):B2$.B$.B$.5H..B3$.B2$.B$:B4$.B3$.B$.OH
..B5$.B4$.B$:B6$.B5$.B$.`H..B$.B5$.B5$:.
.QH... ----------..H...X$:.X$."".4352..H
.....H... KALENDER 2300 =======ENDE.KH..
. =========================...
> CLICK IMAGE PREVIEW FOR FULL MODAL