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

WOCHENTAG

FILE INFORMATION

FILENAME(S): WOCHENTAG

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-12-01 00:57:21

APPEARS ON: 1 disk(s)

FILE HASH

a7f73ba8e5ae21acad7c4d2148b474056b1314f8200e76c2303c418d88292c64

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
GH WOCHENTAG PRG hedning, Austria 22 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1E 08 0A 00 99 2C  22 57 4F 43 48 45 4E 54  |.......,"WOCHENT|
00000010: 41 47 20 45 52 4D 49 54  54 4C 55 4E 47 22 00 2A  |AG ERMITTLUNG".*|
00000020: 08 6E 00 99 C7 28 31 34  37 29 00 30 08 77 00 99  |.n...(147).0.w..|
00000030: 00 57 08 78 00 99 20 22  44 49 45 53 45 53 20 50  |.W.x.. "DIESES P|
00000040: 52 4F 47 52 41 4D 4D 20  45 52 4D 49 54 54 45 4C  |ROGRAMM ERMITTEL|
00000050: 54 20 44 45 4E 20 22 00  5D 08 79 00 99 00 84 08  |T DEN ".].y.....|
00000060: 7A 00 99 20 22 20 20 20  20 20 20 20 20 20 57 4F  |z.. "         WO|
00000070: 43 48 45 4E 54 41 47 20  20 20 20 20 20 20 20 20  |CHENTAG         |
00000080: 20 20 20 22 00 8A 08 7B  00 99 00 B1 08 7C 00 99  |   "...{.....|..|
00000090: 20 22 5A 55 20 45 49 4E  45 4D 20 45 49 4E 47 45  | "ZU EINEM EINGE|
000000A0: 47 45 42 45 4E 45 4E 20  44 41 54 55 4D 20 20 21  |GEBENEN DATUM  !|
000000B0: 22 00 B7 08 7D 00 99 00  D6 08 C8 00 99 20 A3 35  |"...}........ .5|
000000C0: 29 20 22 57 2D 54 41 53  54 45 20 44 52 55 45 43  |) "W-TASTE DRUEC|
000000D0: 4B 45 4E 20 21 22 00 F0  08 D2 00 A1 20 41 24 3A  |KEN !"...... A$:|
000000E0: 8B 20 41 24 20 B3 B1 20  22 57 22 20 A7 32 31 30  |. A$ .. "W" .210|
000000F0: 00 FE 08 FA 00 81 20 49  B2 31 20 A4 20 37 00 0B  |...... I.1 . 7..|
00000100: 09 04 01 87 20 57 54 24  28 49 29 00 13 09 0E 01  |.... WT$(I).....|
00000110: 82 20 49 00 1F 09 40 01  99 C7 28 31 34 37 29 00  |. I...@...(147).|
00000120: 3A 09 4A 01 99 2C 22 4E  41 43 48 20 4A 45 44 45  |:.J..,"NACH JEDE|
00000130: 52 20 45 49 4E 47 41 42  45 22 00 40 09 4B 01 99  |R EINGABE".@.K..|
00000140: 00 5A 09 54 01 99 2C 22  44 49 45 20 52 45 54 55  |.Z.T..,"DIE RETU|
00000150: 52 4E 2D 54 41 53 54 45  20 22 00 60 09 55 01 99  |RN-TASTE ".`.U..|
00000160: 00 73 09 5E 01 99 2C 22  44 52 55 45 43 4B 45 4E  |.s.^..,"DRUECKEN|
00000170: 20 21 22 00 7D 09 68 01  99 3A 99 3A 99 00 8C 09  | !".}.h..:.:....|
00000180: 72 01 85 20 22 54 41 47  22 3B 20 54 00 9D 09 73  |r.. "TAG"; T...s|
00000190: 01 8B 20 54 B1 33 31 20  A7 20 33 37 30 00 AD 09  |.. T.31 . 370...|
000001A0: 74 01 8B 20 54 B3 31 20  A7 20 33 37 30 00 B7 09  |t.. T.1 . 370...|
000001B0: 7C 01 99 3A 99 3A 99 00  C7 09 86 01 85 20 22 4D  ||..:.:....... "M|
000001C0: 4F 4E 41 54 22 3B 4D 00  D8 09 87 01 8B 20 4D B1  |ONAT";M...... M.|
000001D0: 31 32 20 A7 20 33 39 30  00 E8 09 88 01 8B 20 4D  |12 . 390...... M|
000001E0: B3 31 20 A7 20 33 39 30  00 F2 09 90 01 99 3A 99  |.1 . 390......:.|
000001F0: 3A 99 00 02 0A 9A 01 85  20 20 22 4A 41 48 52 22  |:.......  "JAHR"|
00000200: 3B 4A 00 15 0A 9B 01 8B  20 4A B1 31 39 38 33 20  |;J...... J.1983 |
00000210: A7 20 34 31 30 00 25 0A  9C 01 8B 20 4A B3 31 20  |. 410.%.... J.1 |
00000220: A7 20 34 31 30 00 38 0A  A4 01 8B 20 4A B1 31 37  |. 410.8.... J.17|
00000230: 35 32 20 A7 20 36 32 30  00 44 0A AE 01 99 C7 28  |52 . 620.D.....(|
00000240: 31 34 37 29 00 4A 0A B7  01 99 00 69 0A B8 01 99  |147).J.....i....|
00000250: 2C 22 44 49 45 20 4A 41  48 52 45 53 41 4E 47 41  |,"DIE JAHRESANGA|
00000260: 42 45 20 4D 55 53 53 20  22 00 6F 0A C2 01 99 00  |BE MUSS ".o.....|
00000270: 88 0A CC 01 99 2C 22 55  45 42 45 52 20 31 37 35  |.....,"UEBER 175|
00000280: 32 20 53 45 49 4E 2E 22  00 8E 0A D6 01 99 00 AA  |2 SEIN."........|
00000290: 0A E0 01 99 2C 22 47 52  55 4E 44 3A 20 57 45 43  |....,"GRUND: WEC|
000002A0: 48 53 45 4C 20 56 4F 4D  20 22 00 B0 0A EA 01 99  |HSEL VOM "......|
000002B0: 00 C9 0A F4 01 99 2C 22  4A 55 4C 49 41 4E 49 53  |......,"JULIANIS|
000002C0: 43 48 45 4E 20 5A 55 4D  22 00 CF 0A FE 01 99 00  |CHEN ZUM".......|
000002D0: F0 0A 08 02 99 2C 22 47  52 45 47 4F 52 49 41 4E  |.....,"GREGORIAN|
000002E0: 49 53 43 48 45 4E 20 4B  41 4C 45 4E 44 45 52 22  |ISCHEN KALENDER"|
000002F0: 00 F6 0A 09 02 99 00 0E  0B 0A 02 99 2C 22 49 4D  |............,"IM|
00000300: 20 4A 41 48 52 45 20 31  37 35 32 20 2E 22 00 14  | JAHRE 1752 ."..|
00000310: 0B 12 02 99 00 33 0B 1C  02 99 2C 22 45 49 4E 47  |.....3....,"EING|
00000320: 41 42 45 20 57 49 45 44  45 52 48 4F 4C 45 4E 20  |ABE WIEDERHOLEN |
00000330: 21 21 22 00 39 0B 26 02  99 00 43 0B 30 02 89 20  |!!".9.&...C.0.. |
00000340: 34 31 30 00 56 0B 6C 02  88 20 4B B2 B5 28 30 2E  |410.V.l.. K..(0.|
00000350: 36 AA 31 AD 4D 29 00 62  0B 76 02 88 20 4C B2 4A  |6.1.M).b.v.. L.J|
00000360: AB 4B 00 71 0B 80 02 88  20 4F B2 4D AA 31 32 AC  |.K.q.... O.M.12.|
00000370: 4B 00 7F 0B 8A 02 88 20  50 B2 4C AD 31 30 30 00  |K...... P.L.100.|
00000380: 8F 0B 94 02 88 20 5A 31  B2 B5 28 50 AD 34 29 00  |..... Z1..(P.4).|
00000390: 9D 0B 9E 02 88 20 5A 32  B2 B5 28 50 29 00 AF 0B  |..... Z2..(P)...|
000003A0: A8 02 88 20 5A 33 B2 B5  28 35 AC 4C AD 34 29 00  |... Z3..(5.L.4).|
000003B0: C6 0B B2 02 88 20 5A 34  B2 B5 28 31 33 AC 28 4F  |..... Z4..(13.(O|
000003C0: AA 31 29 AD 35 29 00 DE  0B BC 02 88 20 5A B2 5A  |.1).5)...... Z.Z|
000003D0: 34 AA 5A 33 AB 5A 32 AA  5A 31 AA 54 AB 31 00 F3  |4.Z3.Z2.Z1.T.1..|
000003E0: 0B C6 02 88 20 5A B2 5A  AB 37 AC B5 28 5A AD 37  |.... Z.Z.7..(Z.7|
000003F0: 29 AA 31 00 FF 0B 02 03  99 C7 28 31 34 37 29 00  |).1.......(147).|
00000400: 05 0C 03 03 99 00 11 0C  0C 03 99 2C 22 44 45 52  |...........,"DER|
00000410: 22 00 17 0C 16 03 99 00  2B 0C 20 03 99 2C 54 3B  |".......+. ..,T;|
00000420: 22 2E 22 3B 4D 3B 22 2E  22 3B 4A 00 31 0C 2A 03  |".";M;".";J.1.*.|
00000430: 99 00 41 0C 34 03 99 2C  22 57 41 52 20 45 49 4E  |..A.4..,"WAR EIN|
00000440: 22 00 47 0C 3E 03 99 00  58 0C 48 03 99 2C 57 54  |".G.>...X.H..,WT|
00000450: 24 28 5A 29 3B 22 2E 22  00 62 0C 52 03 99 3A 99  |$(Z);".".b.R..:.|
00000460: 3A 99 00 81 0C 5C 03 99  2C 22 57 55 45 4E 53 43  |:....\..,"WUENSC|
00000470: 48 45 4E 20 53 49 45 20  57 45 49 54 45 52 45 20  |HEN SIE WEITERE |
00000480: 22 00 87 0C 5D 03 99 00  9F 0C 5E 03 99 2C 22 20  |"...].....^..," |
00000490: 20 20 42 45 52 45 43 48  4E 55 4E 47 45 4E 22 00  |  BERECHNUNGEN".|
000004A0: A5 0C 66 03 99 00 BE 0C  70 03 99 2C 22 4A 28 3D  |..f.....p..,"J(=|
000004B0: 4A 41 29 20 20 4E 28 3D  4E 45 49 4E 29 22 00 C7  |JA)  N(=NEIN)"..|
000004C0: 0C 7A 03 A1 20 41 24 00  DB 0C 84 03 8B 20 41 24  |.z.. A$...... A$|
000004D0: B2 22 4E 22 20 A7 20 20  39 32 34 00 EF 0C 8E 03  |."N" .  924.....|
000004E0: 8B 20 41 24 B2 22 4A 22  20 A7 20 20 33 32 30 00  |. A$."J" .  320.|
000004F0: F9 0C 98 03 89 20 38 39  30 00 05 0D 9C 03 99 C7  |..... 890.......|
00000500: 28 31 34 37 29 00 30 0D  9D 03 99 20 22 45 4E 44  |(147).0.... "END|
00000510: 45 20 44 45 53 20 50 52  4F 47 52 41 4D 4D 53 20  |E DES PROGRAMMS |
00000520: 21 20 45 53 20 4B 41 4E  4E 20 55 45 42 45 52 22  |! ES KANN UEBER"|
00000530: 00 36 0D 9E 03 99 00 62  0D 9F 03 99 20 22 44 49  |.6.....b.... "DI|
00000540: 45 20 45 49 4E 47 41 42  45 20 27 52 55 4E 27 20  |E EINGABE 'RUN' |
00000550: 57 49 45 44 45 52 20 47  45 53 54 41 52 54 45 54  |WIEDER GESTARTET|
00000560: 20 22 00 68 0D A0 03 99  00 85 0D A1 03 99 2C 22  | ".h..........,"|
00000570: 20 20 20 20 20 20 20 20  20 20 20 20 57 45 52 44  |            WERD|
00000580: 45 4E 20 21 22 00 8B 0D  A2 03 80 00 99 0D E8 03  |EN !"...........|
00000590: 83 20 53 4F 4E 4E 54 41  47 00 A6 0D F2 03 83 20  |. SONNTAG...... |
000005A0: 4D 4F 4E 54 41 47 00 B5  0D FC 03 83 20 44 49 45  |MONTAG...... DIE|
000005B0: 4E 53 54 41 47 00 C4 0D  06 04 83 20 4D 49 54 54  |NSTAG...... MITT|
000005C0: 57 4F 43 48 00 D5 0D 10  04 83 20 44 4F 4E 4E 45  |WOCH...... DONNE|
000005D0: 52 53 54 41 47 00 E3 0D  1A 04 83 20 46 52 45 49  |RSTAG...... FREI|
000005E0: 54 41 47 00 F1 0D 24 04  83 20 53 41 4D 53 54 41  |TAG...$.. SAMSTA|
000005F0: 47 00 00 00 30 30 30 30  30 32 33 32 30 30 30 30  |G...000002320000|
00000600: 30 30 30 30 32 32 32 30  30 30 32 32 30 30 33 30  |0000222000220030|
00000610: 30 33 30 32 30 30 30 30  30 30 30 33 32 32 30 32  |0302000000032202|
00000620: 30 32 32 32 30 30 30 30  33 33 30 32 30 30 20 30  |02220000330200 0|
00000630: 30 30 30 30 30 32 32 30  32 30 32 32 32 30 33 30  |0000022020222030|
00000640: 30 30 33 33 30 30 33 33  30 30 32 30 30 33 32 32  |0033003300200322|
00000650: 30 32 32 32 30 32 30 30  30 33 32 30 30 30 30 30  |0222020003200000|
00000660: 30 30 30 30 30 30 32 32  32 30 32 32 32 30 32 30  |0000002220222020|
00000670: 33 30 30 32 30 30 30 33  30 30 30 30 30 30 30 30  |3002000300000000|
00000680: 32 32 32 32 32 30 32 20  30 30 30 30 30 30 30 30  |2222202 00000000|
00000690: 30 30 30 30 33 33 30 30  32 30 32 32 30 32 32 30  |0000330020220220|
000006A0: 30 30 30 33 33 30 30 30  30 30 30 30 30 30 33 32  |0003300000000032|
000006B0: 32 32 30 32 32 32 32 32  30 33 30 30 32 30 30 30  |2202222203002000|
000006C0: 33 30 30 20 30 30 33 33  32 32 30 32 32 32 30 32  |300 003322022202|
000006D0: 33 32 30 30 33 32 30 30  20 30 30 30 30 30 30 30  |32003200 0000000|
000006E0: 30 30 32 32 30 32 32 30  32 30 30 30 30 30 30 30  |0022022020000000|
000006F0: 30 30 33 32                                       |0032            |
.......,"WOCHENTAG ERMITTLUNG".*.N..G(14
7).0.W...W.X.. "DIESES PROGRAMM ERMITTEL
T DEN ".].Y.....Z.. "         WOCHENTAG 
           "...{.....|.. "ZU EINEM EINGE
GEBENEN DATUM  !"...}...V.H.. .5) "W-TAS
TE DRUECKEN !"...R.. A$:. A$ .. "W" .210
...... I.1 . 7...... WT$(I)...... I...@.
.G(147).:.J..,"NACH JEDER EINGABE".@.K..
.Z.T..,"DIE RETURN-TASTE ".`.U...S.^..,"
DRUECKEN !".}.H..:.:....R.. "TAG"; T...S
.. T.31 . 370...T.. T.1 . 370...|..:.:..
G.... "MONAT";M.X.... M.12 . 390...... M
.1 . 390......:.:.......  "JAHR";J......
 J.1983 . 410.%.... J.1 . 410.8.... J.17
52 . 620.D....G(147).J.....I....,"DIE JA
HRESANGABE MUSS ".O.B.....L..,"UEBER 175
2 SEIN."...V........,"GRUND: WECHSEL VOM
 ".......I....,"JULIANISCHEN ZUM".O.....
.....,"GREGORIANISCHEN KALENDER"........
....,"IM JAHRE 1752 .".......3....,"EING
ABE WIEDERHOLEN !!".9.&...C.0.. 410.V.L.
. K..(0.6.1.M).B.V.. L.J.K.Q.... O.M.12.
K..... P.L.100...... Z1..(P.4)...... Z2
..(P)...... Z3..(5.L.4).F.... Z4..(13.(O
.1).5)...... Z.Z4.Z3.Z2.Z1.T.1...F.. Z.Z
.7..(Z.7).1......G(147)............,"DER
".......+. ..,T;".";M;".";J.1.*...A.4..,
"WAR EIN".G.>...X.H..,WT$(Z);".".B.R..:.
:....\..,"WUENSCHEN SIE WEITERE "...]...
..^..,"   BERECHNUNGEN"...F.....P..,"J(=
JA)  N(=NEIN)".G.Z.. A$...... A$."N" .  
924...... A$."J" .  320...... 890......G
(147).0.... "ENDE DES PROGRAMMS ! ES KAN
N UEBER".6.....B.... "DIE EINGABE 'RUN' 
WIEDER GESTARTET ".H. ........,"        
    WERDEN !"............ SONNTAG...... 
MONTAG...... DIENSTAG.D.... MITTWOCH.U..
.. DONNERSTAG...... FREITAG...$.. SAMSTA
G...000002320000000022200022003003020000
0003220202220000330200 00000022020222030
0033003300200322022202000320000000000022
2022202030020003000000002222202 00000000
0000330020220220000330000000003222022222
03002000300 00332202220232003200 0000000
00220220200000000032
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL