BIO-KALENDER
FILE INFORMATION
FILENAME(S): BIO-KALENDER
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 20:14:30
APPEARS ON: 1 disk(s)
FILE HASH
ede3a2803c1e6c198a74be2089c70a921a8dc443735dda0f373380c1c90404fc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SHADOWSOFT | BIO-KALENDER | PRG | Curtcool, LPN | 27 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 01 00 8F 2A 2A 2A 43 4F 50 59 52 49 |..'....***COPYRI| 00000010: 47 48 54 20 4A 55 53 54 20 52 2E 2D 44 41 54 41 |GHT JUST R.-DATA| 00000020: 20 41 50 53 2A 2A 2A 00 30 08 02 00 41 51 B2 31 | APS***.0...AQ.1| 00000030: 00 49 08 0F 00 86 4D 24 28 31 32 29 2C 44 28 31 |.I....M$(12),D(1| 00000040: 32 29 2C 4D 25 28 31 32 29 00 6F 08 14 00 97 35 |2),M%(12).o....5| 00000050: 33 32 38 30 2C 35 3A 97 35 33 32 38 31 2C 32 3A |3280,5:.53281,2:| 00000060: 99 C7 28 31 34 34 29 3A A0 39 3A 9F 39 2C 30 00 |..(144):.9:.9,0.| 00000070: AB 08 1E 00 4F 24 B2 22 93 11 12 20 20 20 92 20 |....O$."... . | 00000080: 42 49 4F 2F 4B 41 4C 45 4E 44 45 52 20 12 20 20 |BIO/KALENDER . | 00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000A0: 20 20 20 20 20 92 22 3A 99 4F 24 00 C2 08 23 00 | .":.O$...#.| 000000B0: 99 22 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............| 000000C0: D5 C9 00 F4 08 24 00 99 22 CA 52 20 43 4F 50 59 |.....$..".R COPY| 000000D0: 52 49 47 48 54 20 20 20 31 39 38 33 22 3A 99 22 |RIGHT 1983":."| 000000E0: 20 20 20 4A 55 53 54 20 52 2E 2D 44 41 54 41 20 | JUST R.-DATA | 000000F0: 41 50 53 22 00 0E 09 26 00 99 22 20 20 20 44 4B |APS"...&.." DK| 00000100: 20 20 38 37 30 30 20 48 4F 52 53 45 4E 53 00 20 | 8700 HORSENS. | 00000110: 09 28 00 A1 53 24 3A 8B 53 24 B2 22 22 A7 34 30 |.(..S$:.S$."".40| 00000120: 00 28 09 32 00 99 4F 24 00 45 09 3C 00 99 22 11 |.(.2..O$.E.<..".| 00000130: 12 20 31 20 92 20 4B 41 4C 45 4E 44 45 52 50 52 |. 1 . KALENDERPR| 00000140: 4F 47 52 41 4D 00 62 09 41 00 99 22 11 12 20 32 |OGRAM.b.A..".. 2| 00000150: 20 92 20 42 49 4F 52 59 54 4D 45 50 52 4F 47 52 | . BIORYTMEPROGR| 00000160: 41 4D 00 74 09 43 00 99 22 11 12 20 33 20 92 20 |AM.t.C..".. 3 . | 00000170: 53 4C 55 54 00 8E 09 46 00 99 22 11 12 20 20 20 |SLUT...F..".. | 00000180: 92 20 53 56 41 52 20 4D 45 44 20 54 41 4C 00 A0 |. SVAR MED TAL..| 00000190: 09 4B 00 A1 53 24 3A 8B 53 24 B2 22 22 A7 37 35 |.K..S$:.S$."".75| 000001A0: 00 B8 09 50 00 53 B2 C5 28 53 24 29 3A 8B 53 B3 |...P.S..(S$):.S.| 000001B0: 31 B0 53 B1 33 A7 37 35 00 C3 09 5A 00 8B 53 B2 |1.S.3.75...Z..S.| 000001C0: 33 A7 A2 00 EE 09 64 00 52 53 24 B2 22 91 20 20 |3.....d.RS$.". | 000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001E0: 20 20 20 20 20 20 20 20 20 20 20 91 91 22 00 18 | .."..| 000001F0: 0A 69 00 52 24 B2 22 91 20 20 20 20 20 20 20 20 |.i.R$.". | 00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000210: 20 20 20 20 20 91 91 22 00 2C 0A 6A 00 91 53 AC | ..".,.j..S.| 00000220: 41 51 89 31 31 30 2C 31 30 30 30 30 00 6B 0A 6E |AQ.110,10000.k.n| 00000230: 00 8C 3A 4F 24 B2 22 93 11 12 20 20 20 92 20 4B |..:O$."... . K| 00000240: 41 4C 45 4E 44 45 52 20 12 20 20 20 20 20 20 20 |ALENDER . | 00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000260: 20 20 20 20 92 11 22 3A 99 4F 24 00 90 0A 8C 00 | ..":.O$.....| 00000270: 81 49 B2 31 A4 31 32 3A 87 4D 24 28 49 29 3A 82 |.I.1.12:.M$(I):.| 00000280: 3A 81 49 B2 31 A4 31 32 3A 87 44 28 49 29 3A 82 |:.I.1.12:.D(I):.| 00000290: 00 A4 0A 96 00 81 49 B2 30 A4 36 3A 87 44 24 28 |......I.0.6:.D$(| 000002A0: 49 29 3A 82 00 BE 0A AA 00 99 4F 24 3A 97 35 33 |I):.......O$:.53| 000002B0: 32 38 30 2C 35 3A 97 35 33 32 38 31 2C 35 00 E5 |280,5:.53281,5..| 000002C0: 0A B4 00 99 22 11 12 20 31 20 92 20 55 47 45 44 |....".. 1 . UGED| 000002D0: 41 47 20 46 4F 52 20 54 49 4C 46 5B 4C 44 49 47 |AG FOR TILF[LDIG| 000002E0: 20 44 41 54 4F 00 1C 0B BE 00 99 22 11 12 20 32 | DATO......".. 2| 000002F0: 20 92 20 55 47 45 44 41 47 45 2D 46 4F 52 20 42 | . UGEDAGE-FOR B| 00000300: 45 53 54 45 4D 54 20 44 41 54 4F 2D 4D 45 4C 4C |ESTEMT DATO-MELL| 00000310: 45 4D 20 32 20 41 91 9D 2E 11 52 22 00 44 0B C8 |EM 2 A....R".D..| 00000320: 00 99 22 12 20 33 20 92 20 41 4E 54 41 4C 20 44 |..". 3 . ANTAL D| 00000330: 41 47 45 20 4D 45 4C 4C 45 4D 20 32 20 44 41 54 |AGE MELLEM 2 DAT| 00000340: 4F 45 52 22 00 6E 0B D2 00 99 22 11 12 20 34 20 |OER".n....".. 4 | 00000350: 92 20 55 44 53 4B 52 49 56 45 52 20 4D 41 91 9D |. UDSKRIVER MA..| 00000360: 2E 11 4E 45 44 53 4B 41 4C 45 4E 44 45 52 00 91 |..NEDSKALENDER..| 00000370: 0B D7 00 99 22 11 12 20 35 20 92 20 54 49 4C 42 |....".. 5 . TILB| 00000380: 41 47 45 20 54 49 4C 20 48 4F 56 45 44 4D 45 4E |AGE TIL HOVEDMEN| 00000390: 55 00 C1 0B DC 00 99 22 A4 A4 A4 A4 A4 A4 A4 A4 |U......"........| 000003A0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................| 000003B0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................| 000003C0: 22 00 EE 0B E6 00 99 22 20 28 46 4F 52 20 50 45 |"......" (FOR PE| 000003D0: 52 49 4F 44 45 4E 20 31 39 30 30 2E 30 33 2E 30 |RIODEN 1900.03.0| 000003E0: 31 2D 32 31 30 30 2E 30 32 2E 32 38 29 22 00 1E |1-2100.02.28)"..| 000003F0: 0C F0 00 99 22 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |...."...........| 00000400: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................| 00000410: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 22 00 3B |.............".;| 00000420: 0C FA 00 99 22 11 12 20 20 20 92 20 53 56 41 52 |....".. . SVAR| 00000430: 20 4D 45 44 20 54 41 4C 3A 20 22 00 4E 0C FF 00 | MED TAL: ".N...| 00000440: A1 53 24 3A 8B 53 24 B2 22 22 A7 32 35 35 00 74 |.S$:.S$."".255.t| 00000450: 0C 04 01 53 B2 C5 28 53 24 29 3A 8B 53 B3 31 B0 |...S..(S$):.S.1.| 00000460: 53 B1 35 B0 B5 28 53 29 B3 B1 53 A7 99 52 24 3A |S.5..(S)..S..R$:| 00000470: 89 32 35 30 00 8E 0C 0E 01 91 53 89 32 38 30 2C |.250......S.280,| 00000480: 36 32 30 2C 34 30 30 2C 37 37 30 2C 32 30 00 96 |620,400,770,20..| 00000490: 0C 18 01 99 4F 24 00 C4 0C 22 01 99 22 11 41 91 |....O$..."..".A.| 000004A0: 9D 2E 11 52 20 20 20 20 20 20 20 20 20 20 20 3A |...R :| 000004B0: 20 22 3B 3A 84 39 2C 53 24 3A 41 41 B2 C5 28 53 | ";:.9,S$:AA..(S| 000004C0: 24 29 3A 99 00 E2 0C 2C 01 8B 41 41 B3 31 39 30 |$):....,..AA.190| 000004D0: 30 B0 41 41 B1 32 31 30 31 A7 99 52 24 3A 89 32 |0.AA.2101..R$:.2| 000004E0: 39 30 00 0F 0D 36 01 99 22 11 4D 41 91 9D 2E 11 |90...6..".MA....| 000004F0: 4E 45 44 20 4E 55 4D 4D 45 52 20 3A 20 22 3B 3A |NED NUMMER : ";:| 00000500: 84 39 2C 53 24 3A 4D B2 C5 28 53 24 29 3A 99 00 |.9,S$:M..(S$):..| 00000510: 26 0D 40 01 8B 4D B3 31 B0 4D B1 31 32 A7 99 52 |&.@..M.1.M.12..R| 00000520: 24 3A 89 33 31 30 00 4F 0D 4A 01 99 22 11 44 41 |$:.310.O.J..".DA| 00000530: 47 20 20 20 20 20 20 20 20 20 20 3A 20 22 3B 3A |G : ";:| 00000540: 84 39 2C 53 24 3A 44 B2 C5 28 53 24 29 3A 99 00 |.9,S$:D..(S$):..| 00000550: 66 0D 54 01 8B 44 B3 31 B0 44 B1 33 31 A7 99 52 |f.T..D.1.D.31..R| 00000560: 24 3A 89 33 33 30 00 7F 0D 5E 01 8B 4D B3 33 A7 |$:.330...^..M.3.| 00000570: 59 4D B2 41 41 AB 31 3A 4D 4D B2 4D AA 31 33 00 |YM.AA.1:MM.M.13.| 00000580: 95 0D 68 01 8B 4D B1 32 A7 59 4D B2 41 41 3A 4D |..h..M.2.YM.AA:M| 00000590: 4D B2 4D AA 31 00 BC 0D 72 01 44 4E B2 B5 28 33 |M.M.1...r.DN..(3| 000005A0: 36 35 2E 32 35 AC 59 4D 29 AA B5 28 33 30 2E 36 |65.25.YM)..(30.6| 000005B0: 30 30 31 AC 4D 4D 29 AA 44 AC 41 51 00 EE 0D 7C |001.MM).D.AQ...|| 000005C0: 01 51 B2 28 44 4E AA 35 29 AD 37 3A 49 51 B2 B5 |.Q.(DN.5).7:IQ..| 000005D0: 28 51 29 3A 46 51 B2 51 AB 49 51 3A 55 44 B2 B5 |(Q):FQ.Q.IQ:UD..| 000005E0: 28 28 37 AC 46 51 29 AA 2E 35 29 AC 41 51 00 0F |((7.FQ)..5).AQ..| 000005F0: 0E 86 01 99 22 11 44 41 47 45 4E 20 45 52 20 45 |....".DAGEN ER E| 00000600: 4E 20 22 44 24 28 55 44 29 3A 89 31 30 30 30 00 |N "D$(UD):.1000.| 00000610: 17 0E 90 01 99 4F 24 00 27 0E 9A 01 99 22 11 31 |.....O$.'....".1| 00000620: 2E 44 41 54 4F 3A 22 00 4D 0E A4 01 99 22 11 41 |.DATO:".M....".A| 00000630: 91 9D 2E 11 52 20 20 20 3A 20 22 3B 3A 84 39 2C |....R : ";:.9,| 00000640: 53 24 3A 41 31 B2 C5 28 53 24 29 3A 99 00 6B 0E |S$:A1..(S$):..k.| 00000650: AE 01 8B 41 31 B3 31 39 30 30 B0 41 31 B1 32 31 |...A1.1900.A1.21| 00000660: 30 31 A7 99 52 24 3A 89 34 32 30 00 91 0E B8 01 |01..R$:.420.....| 00000670: 99 22 11 4D 41 91 9D 2E 11 4E 45 44 3A 20 22 3B |.".MA....NED: ";| 00000680: 3A 84 39 2C 53 24 3A 4D 31 B2 C5 28 53 24 29 3A |:.9,S$:M1..(S$):| 00000690: 99 00 AA 0E C2 01 8B 4D 31 B3 31 B0 4D 31 B1 31 |.......M1.1.M1.1| 000006A0: 32 A7 99 52 24 3A 89 34 34 30 00 CC 0E CC 01 99 |2..R$:.440......| 000006B0: 22 11 44 41 47 20 20 3A 20 22 3B 3A 84 39 2C 53 |".DAG : ";:.9,S| 000006C0: 24 3A 44 31 B2 C5 28 53 24 29 3A 99 00 E5 0E D1 |$:D1..(S$):.....| 000006D0: 01 8B 44 31 B3 31 B0 44 31 B1 33 31 A7 99 52 24 |..D1.1.D1.31..R$| 000006E0: 3A 89 34 36 30 00 FE 0E D2 01 8B 44 31 B1 32 39 |:.460......D1.29| 000006F0: AF 4D 31 B2 32 A7 99 52 24 3A 89 34 36 30 00 1E |.M1.2..R$:.460..| 00000700: 0F D6 01 8B 4D 31 B2 31 B0 4D 31 B2 32 A7 59 4D |....M1.1.M1.2.YM| 00000710: B2 41 31 AB 31 3A 4D 4D B2 4D 31 AA 31 33 00 36 |.A1.1:MM.M1.13.6| 00000720: 0F E0 01 8B 4D 31 B1 32 A7 59 4D B2 41 31 3A 4D |....M1.2.YM.A1:M| 00000730: 4D B2 4D 31 AA 31 00 63 0F EA 01 4A 44 B2 B5 28 |M.M1.1.c...JD..(| 00000740: 33 36 35 2E 32 35 AC 59 4D 29 AA B5 28 33 30 2E |365.25.YM)..(30.| 00000750: 36 30 30 31 AC 4D 4D 29 AA 44 31 AA 31 37 32 30 |6001.MM).D1.1720| 00000760: 39 38 32 00 74 0F F4 01 99 3A 99 22 32 2E 44 41 |982.t....:."2.DA| 00000770: 54 4F 3A 22 00 9A 0F FE 01 99 22 11 41 91 9D 2E |TO:"......".A...| 00000780: 11 52 20 20 20 3A 20 22 3B 3A 84 39 2C 53 24 3A |.R : ";:.9,S$:| 00000790: 41 32 B2 C5 28 53 24 29 3A 99 00 BD 0F 08 02 8B |A2..(S$):.......| 000007A0: 41 32 B3 31 39 30 30 B0 41 32 B1 32 31 30 31 B0 |A2.1900.A2.2101.| 000007B0: 41 51 B3 31 A7 99 52 24 3A 89 35 31 30 00 E3 0F |AQ.1..R$:.510...| 000007C0: 12 02 99 22 11 4D 41 91 9D 2E 11 4E 45 44 3A 20 |...".MA....NED: | 000007D0: 22 3B 3A 84 39 2C 53 24 3A 4D 32 B2 C5 28 53 24 |";:.9,S$:M2..(S$| 000007E0: 29 3A 99 00 FC 0F 1C 02 8B 4D 32 B3 31 B0 4D 32 |):.......M2.1.M2|
..'....***COPYRIGHT JUST R.-DATA APS***.
0...AQ.1.I....M$(12),D(12),M%(12).O....5
3280,5:.53281,2:.G(144): 9:.9,0.....O$."
... . BIO/KALENDER .
.":.O$.B.#.."..............UI...$..
"JR COPYRIGHT 1983":." JUST R.-DATA
APS"...&.." DK 8700 HORSENS. .(..S$:.
S$."".40.(.2..O$.E.<..".. 1 . KALENDERPR
OGRAM.B.A..".. 2 . BIORYTMEPROGRAM.T.C..
".. 3 . SLUT...F..".. . SVAR MED TAL.
.K..S$:.S$."".75...P.S.E(S$):.S.1.S.3.75
.C.Z..S.3.....D.RS$.".
.."...I.R$.".
..".,.J..S.AQ.110,10000.K.N
..:O$."... . KALENDER .
..":.O$......I.1.12:.M$(I):.
:.I.1.12:.D(I):.......I.0.6:.D$(I):.....
..O$:.53280,5:.53281,5......".. 1 . UGED
AG FOR TILF[LDIG DATO......".. 2 . UGEDA
GE-FOR BESTEMT DATO-MELLEM 2 A....R".D.H
..". 3 . ANTAL DAGE MELLEM 2 DATOER".N.R
..".. 4 . UDSKRIVER MA....NEDSKALENDER..
.W..".. 5 . TILBAGE TIL HOVEDMENU.A...."
........................................
"......" (FOR PERIODEN 1900.03.01-2100.0
2.28)"......"RRRRRRRRRRRRRRRRRRRRRRRRRRR
RRRRRRRRRRRRR".;....".. . SVAR MED TAL
: ".N....S$:.S$."".255.T...S.E(S$):.S.1.
S.5..(S)..S..R$:.250......S.280,620,400,
770,20......O$.D."..".A....R :
";:.9,S$:AA.E(S$):....,..AA.1900.AA.210
1..R$:.290...6..".MA....NED NUMMER : ";:
.9,S$:M.E(S$):..&.@..M.1.M.12..R$:.310.O
.J..".DAG : ";:.9,S$:D.E(S$):..
F.T..D.1.D.31..R$:.330..^..M.3.YM.AA.1:
MM.M.13...H..M.2.YM.AA:MM.M.1...R.DN..(3
65.25.YM)..(30.6001.MM).D.AQ...|.Q.(DN.5
).7:IQ..(Q):FQ.Q.IQ:UD..((7.FQ)..5).AQ..
....".DAGEN ER EN "D$(UD):.1000......O$.
'....".1.DATO:".M....".A....R : ";:.9,
S$:A1.E(S$):..K....A1.1900.A1.2101..R$:.
420......".MA....NED: ";:.9,S$:M1.E(S$):
....B..M1.1.M1.12..R$:.440.L.L..".DAG :
";:.9,S$:D1.E(S$):....Q..D1.1.D1.31..R$
:.460...R..D1.29.M1.2..R$:.460...V..M1.1
.M1.2.YM.A1.1:MM.M1.13.6....M1.2.YM.A1:M
M.M1.1.C...JD..(365.25.YM)..(30.6001.MM)
.D1.1720982.T....:."2.DATO:"......".A...
.R : ";:.9,S$:A2.E(S$):.......A2.1900.
A2.2101.AQ.1..R$:.510......".MA....NED:
";:.9,S$:M2.E(S$):.......M2.1.M2
> CLICK IMAGE PREVIEW FOR FULL MODAL