WOCHENTAGBERECH

FILE INFORMATION

FILENAME(S): WOCHENTAGBERECH

FILE TYPE(S): PRG

FILE SIZE: 1K

FIRST SEEN: 2025-11-30 01:07:53

APPEARS ON: 2 disk(s)

FILE HASH

705a6796e1eb53729dc72c034a878afe446dc97267e66bfb0bf346a0507628c0

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
L EHRNEN	WOCHENTAGBERECH	PRG	Treasure Chest - Wolfgang Rauprich	4	3	DOWNLOAD FILE
FREESOFT DISK NR	WOCHENTAGBERECH	PRG	Treasure Chest - Wolfgang Rauprich	4	3	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 3D 08 0A 00 8F 20  2A 42 45 53 54 49 4D 4D  |..=.... *BESTIMM|
00000010: 55 4E 47 20 44 45 53 20  57 4F 43 48 45 4E 54 41  |UNG DES WOCHENTA|
00000020: 47 53 2A 20 45 49 4E 46  41 43 48 45 53 20 45 49  |GS* EINFACHES EI|
00000030: 47 45 4E 50 52 4F 47 52  41 4D 4D 20 2A 00 47 08  |GENPROGRAMM *.G.|
00000040: 6E 00 99 22 93 11 22 00  78 08 78 00 99 22 1C 44  |n.."..".x.x..".D|
00000050: 49 45 53 45 53 20 50 52  4F 47 52 41 4D 4D 20 45  |IESES PROGRAMM E|
00000060: 52 4D 49 54 54 45 4C 54  20 44 45 4E 20 57 4F 43  |RMITTELT DEN WOC|
00000070: 48 45 4E 54 41 47 20 22  00 7E 08 82 00 99 00 A9  |HENTAG ".~......|
00000080: 08 8C 00 99 A3 36 29 22  5A 55 20 45 49 4E 45 4D  |.....6)"ZU EINEM|
00000090: 20 45 49 4E 5A 55 47 45  42 45 4E 44 45 4E 20 44  | EINZUGEBENDEN D|
000000A0: 41 54 55 4D 22 3A 99 3A  99 00 D1 08 96 00 99 22  |ATUM":.:......."|
000000B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 05  |               .|
000000C0: 46 52 45 45 53 4F 46 54  57 41 52 45 20 31 39 38  |FREESOFTWARE 198|
000000D0: 35 00 F0 08 DC 00 8F 20  5A 55 4F 52 44 4E 55 4E  |5...... ZUORDNUN|
000000E0: 47 20 44 45 52 20 57 4F  43 48 45 4E 54 41 47 45  |G DER WOCHENTAGE|
000000F0: 00 FB 08 FA 00 81 49 B2  31 A4 37 00 07 09 04 01  |......I.1.7.....|
00000100: 87 57 54 24 28 49 29 00  0E 09 0E 01 82 49 00 27  |.WT$(I)......I.'|
00000110: 09 18 01 8F 20 45 49 4E  47 41 42 45 20 44 45 53  |.... EINGABE DES|
00000120: 20 44 41 54 55 4D 53 00  36 09 68 01 99 3A 99 3A  | DATUMS.6.h..:.:|
00000130: 99 A3 31 34 29 3B 00 45  09 72 01 85 22 54 41 47  |..14);.E.r.."TAG|
00000140: 20 20 22 3B 54 00 52 09  7C 01 99 3A 99 A3 31 34  |  ";T.R.|..:..14|
00000150: 29 3B 00 61 09 86 01 85  22 4D 4F 4E 41 54 22 3B  |);.a...."MONAT";|
00000160: 4D 00 6D 09 90 01 99 3A  99 A3 31 34 29 00 7C 09  |M.m....:..14).|.|
00000170: 9A 01 85 22 4A 41 48 52  20 22 3B 4A 00 8C 09 A4  |..."JAHR ";J....|
00000180: 01 8B 4A B1 31 37 35 32  A7 35 37 30 00 95 09 AE  |..J.1752.570....|
00000190: 01 99 22 93 22 00 C2 09  B8 01 99 22 20 20 20 4A  |.."."......"   J|
000001A0: 41 48 52 45 53 41 4E 47  41 42 45 20 4D 55 53 53  |AHRESANGABE MUSS|
000001B0: 20 55 45 42 45 52 20 31  37 35 32 20 53 45 49 4E  | UEBER 1752 SEIN|
000001C0: 2E 22 00 C8 09 D6 01 99  00 F8 09 E0 01 99 22 28  |."............"(|
000001D0: 47 52 55 4E 44 3A 57 45  43 48 53 45 4C 20 56 4F  |GRUND:WECHSEL VO|
000001E0: 4D 20 4A 55 4C 49 41 4E  49 53 43 48 57 4E 20 5A  |M JULIANISCHWN Z|
000001F0: 55 4D 20 47 52 45 2D 22  00 27 0A 08 02 99 22 47  |UM GRE-".'...."G|
00000200: 4F 52 49 41 4E 49 53 43  48 45 4E 20 4B 41 4C 2E  |ORIANISCHEN KAL.|
00000210: 29 20 45 49 4E 47 41 42  45 20 57 49 45 44 45 52  |) EINGABE WIEDER|
00000220: 48 4F 4C 45 4E 21 22 00  30 0A 30 02 89 33 36 30  |HOLEN!".0.0..360|
00000230: 00 50 0A 3A 02 8F 20 42  45 52 45 43 48 4E 55 4E  |.P.:.. BERECHNUN|
00000240: 47 20 44 45 53 20 57 4F  43 48 45 4E 54 41 47 53  |G DES WOCHENTAGS|
00000250: 00 61 0A 6C 02 4B B2 B5  28 30 2E 36 AA 31 AD 4D  |.a.l.K..(0.6.1.M|
00000260: 29 00 6B 0A 76 02 4C B2  4A AB 4B 00 78 0A 80 02  |).k.v.L.J.K.x...|
00000270: 4F B2 4D AA 31 32 AC 4B  00 84 0A 8A 02 50 B2 4C  |O.M.12.K.....P.L|
00000280: AD 31 30 30 00 92 0A 94  02 5A 31 B2 B5 28 50 AD  |.100.....Z1..(P.|
00000290: 34 29 00 9E 0A 9E 02 5A  32 B2 B5 28 50 29 00 AE  |4).....Z2..(P)..|
000002A0: 0A A8 02 5A 33 B2 B5 28  35 AC 4C AD 34 29 00 C3  |...Z3..(5.L.4)..|
000002B0: 0A B2 02 5A 34 B2 B5 28  31 33 AC 28 4F AA 31 29  |...Z4..(13.(O.1)|
000002C0: AD 35 29 00 D9 0A BC 02  5A B2 5A 34 AA 5A 33 AB  |.5).....Z.Z4.Z3.|
000002D0: 5A 32 AA 5A 31 AA 54 AB  31 00 EC 0A C6 02 5A B2  |Z2.Z1.T.1.....Z.|
000002E0: 5A AB 37 AC B5 28 5A AD  37 29 AA 31 00 09 0B D0  |Z.7..(Z.7).1....|
000002F0: 02 8F 20 41 55 53 47 41  42 45 20 44 45 53 20 57  |.. AUSGABE DES W|
00000300: 4F 43 48 45 4E 54 41 47  53 00 13 0B 16 03 99 3A  |OCHENTAGS......:|
00000310: 99 3A 99 00 39 0B 20 03  99 A3 37 29 22 44 45 52  |.:..9. ...7)"DER|
00000320: 22 3B 54 3B 22 2E 22 3B  4D 3B 22 2E 22 3B 4A 3B  |";T;".";M;".";J;|
00000330: 22 57 41 52 20 45 49 4E  22 00 4F 0B 2A 03 54 41  |"WAR EIN".O.*.TA|
00000340: B2 32 30 AB C3 28 57 54  24 28 5A 29 29 AD 32 00  |.20..(WT$(Z)).2.|
00000350: 57 0B 3E 03 99 3A 99 00  67 0B 48 03 99 A3 54 41  |W.>..:..g.H...TA|
00000360: 29 57 54 24 28 5A 29 00  71 0B 52 03 99 3A 99 3A  |)WT$(Z).q.R..:.:|
00000370: 99 00 97 0B 5C 03 99 A3  36 29 22 57 45 49 54 45  |....\...6)"WEITE|
00000380: 52 45 20 42 45 52 45 43  48 4E 55 4E 47 45 4E 3F  |RE BERECHNUNGEN?|
00000390: 20 28 4A 2F 4E 29 22 00  9F 0B 7A 03 A1 41 24 00  | (J/N)"...z..A$.|
000003A0: AF 0B 84 03 8B 41 24 B2  22 4E 22 A7 39 33 30 00  |.....A$."N".930.|
000003B0: C6 0B 8E 03 8B 41 24 B2  22 4A 22 A7 99 22 93 11  |.....A$."J".."..|
000003C0: 22 3A 89 32 38 30 00 CF  0B 98 03 89 38 39 30 00  |":.280......890.|
000003D0: DA 0B A2 03 99 22 93 22  3A 80 00 1B 0C E8 03 83  |.....".":.......|
000003E0: 53 4F 4E 4E 54 41 47 2C  4D 4F 4E 54 41 47 2C 44  |SONNTAG,MONTAG,D|
000003F0: 49 45 4E 53 54 41 47 2C  4D 49 54 54 57 4F 43 48  |IENSTAG,MITTWOCH|
00000400: 2C 44 4F 4E 4E 45 52 53  54 41 47 2C 46 52 45 49  |,DONNERSTAG,FREI|
00000410: 54 41 47 2C 53 41 4D 53  54 41 47 00 00 00        |TAG,SAMSTAG...  |

..=.... *BESTIMMUNG DES WOCHENTAGS* EINF
ACHES EIGENPROGRAMM *.G.N.."..".X.X..".D
IESES PROGRAMM ERMITTELT DEN WOCHENTAG "
.~...........6)"ZU EINEM EINZUGEBENDEN D
ATUM":.:..Q...."               .FREESOFT
WARE 1985...... ZUORDNUNG DER WOCHENTAGE
......I.1.7......WT$(I)......I.'.... EIN
GABE DES DATUMS.6.H..:.:..14);.E.R.."TAG
  ";T.R.|..:..14);.A...."MONAT";M.M....:
..14).|...."JAHR ";J......J.1752.570....
..".".B...."   JAHRESANGABE MUSS UEBER 1
752 SEIN.".H.V........"(GRUND:WECHSEL VO
M JULIANISCHWN ZUM GRE-".'...."GORIANISC
HEN KAL.) EINGABE WIEDERHOLEN!".0.0..360
.P.:.. BERECHNUNG DES WOCHENTAGS.A.L.K..
(0.6.1.M).K.V.L.J.K.X...O.M.12.K.....P.L
.100.....Z1..(P.4).....Z2..(P).....Z3..(
5.L.4).C...Z4..(13.(O.1).5).Y...Z.Z4.Z3.
Z2.Z1.T.1...F.Z.Z.7..(Z.7).1...P.. AUSGA
BE DES WOCHENTAGS......:.:..9. ...7)"DER
";T;".";M;".";J;"WAR EIN".O.*.TA.20.C(WT
$(Z)).2.W.>..:..G.H...TA)WT$(Z).Q.R..:.:
....\...6)"WEITERE BERECHNUNGEN? (J/N)".
..Z..A$......A$."N".930.F....A$."J".."..
":.280.O....890.Z....".":.......SONNTAG,
MONTAG,DIENSTAG,MITTWOCH,DONNERSTAG,FREI
TAG,SAMSTAG...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL