MENU1
FILE INFORMATION
FILENAME(S): MENU1
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 21:13:31
APPEARS ON: 1 disk(s)
FILE HASH
e75c6a8d67bfbe647c026139f8199db635240b8a96b2581038bebf6521c83b7b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ALGEMEEN 2 | MENU1 | PRG | DuncanTwain | 26 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 64 00 8F 20 20 20 20 20 20 20 20 20 |....d.. | 00000010: 20 2D 2D 2D 4D 45 4E 55 32 2E 31 2D 2D 2D 00 43 | ---MENU2.1---.C| 00000020: 08 6E 00 8F 20 20 2D 2D 2D 4D 4F 44 49 46 49 45 |.n.. ---MODIFIE| 00000030: 44 20 42 59 20 53 43 4F 54 54 20 42 52 55 4E 53 |D BY SCOTT BRUNS| 00000040: 2D 2D 2D 00 6A 08 78 00 8F 20 28 43 29 20 47 52 |---.j.x.. (C) GR| 00000050: 45 45 4E 20 56 41 4C 4C 45 59 20 50 55 42 4C 49 |EEN VALLEY PUBLI| 00000060: 53 48 49 4E 47 20 49 4E 43 2E 00 77 08 7D 00 97 |SHING INC..w.}..| 00000070: 38 30 38 2C 32 33 34 00 80 08 82 00 89 32 31 30 |808,234......210| 00000080: 00 8C 08 8C 00 4D B2 C3 28 42 24 29 00 AD 08 96 |.....M..(B$)....| 00000090: 00 8B 4D AD 32 B3 B1 B5 28 4D AD 32 29 A7 42 24 |..M.2...(M.2).B$| 000000A0: B2 42 24 AA 22 20 22 3A 4D B2 4D AA 31 00 BA 08 |.B$." ":M.M.1...| 000000B0: A0 00 81 4E B2 31 A4 4D AD 32 00 D3 08 AA 00 99 |...N.1.M.2......| 000000C0: C7 28 31 39 29 3B C8 28 43 55 52 24 2C 56 54 AB |.(19);.(CUR$,VT.| 000000D0: 31 29 3B 00 EF 08 B4 00 99 A6 32 31 AB 4E 29 C8 |1);.......21.N).| 000000E0: 28 42 24 2C 4E 29 3B C9 28 42 24 2C 4E 29 3B 00 |(B$,N);.(B$,N);.| 000000F0: F7 08 BE 00 82 20 4E 00 FD 08 C8 00 8E 00 03 09 |..... N.........| 00000100: D2 00 8F 00 19 09 DC 00 97 35 33 32 38 30 2C 30 |.........53280,0| 00000110: 3A 97 35 33 32 38 31 2C 30 00 30 09 E6 00 99 22 |:.53281,0.0...."| 00000120: 93 22 3A 99 C7 28 31 34 32 29 3A 99 C7 28 38 29 |.":..(142):..(8)| 00000130: 00 3A 09 EB 00 8D 32 30 30 30 00 5A 09 F0 00 41 |.:....2000.Z...A| 00000140: 45 24 B2 22 22 3A 41 4E B2 30 3A 41 30 B2 30 3A |E$."":AN.0:A0.0:| 00000150: 43 24 B2 22 22 3A 44 45 B2 30 00 80 09 FA 00 45 |C$."":DE.0.....E| 00000160: 52 B2 30 3A 46 24 B2 22 22 3A 46 4C B2 30 3A 49 |R.0:F$."":FL.0:I| 00000170: B2 30 3A 4A B2 30 3A 4D 4D B2 30 3A 4D 4E B2 30 |.0:J.0:MM.0:MN.0| 00000180: 00 88 09 04 01 43 B2 30 00 90 09 0E 01 57 B2 37 |.....C.0.....W.7| 00000190: 00 AD 09 18 01 43 4D B2 35 35 32 39 36 3A 57 44 |.....CM.55296:WD| 000001A0: B2 34 30 3A 56 49 43 B2 35 33 32 34 38 00 E7 09 |.40:VIC.53248...| 000001B0: 22 01 57 B2 57 AA 31 3A 42 4C 24 B2 22 12 20 20 |".W.W.1:BL$.". | 000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001E0: 20 20 20 20 20 92 22 00 09 0A 2C 01 97 56 49 43 | ."...,..VIC| 000001F0: AA 33 33 2C 30 3A 99 22 93 90 22 3B 3A 81 4E B2 |.33,0:."..";:.N.| 00000200: 31 A4 32 34 3A 99 42 4C 24 00 18 0A 36 01 82 3A |1.24:.BL$...6..:| 00000210: 99 20 42 4C 24 22 13 22 00 38 0A 40 01 81 20 58 |. BL$".".8.@.. X| 00000220: B2 31 A4 32 35 3A 43 55 52 24 B2 43 55 52 24 AA |.1.25:CUR$.CUR$.| 00000230: C7 28 31 37 29 3A 82 58 00 50 0A 4A 01 81 4E B2 |.(17):.X.P.J..N.| 00000240: 31 A4 35 3A 87 4E 24 28 4E 29 3A 82 3A 87 48 54 |1.5:.N$(N):.:.HT| 00000250: 00 6E 0A 54 01 4D 4D B2 39 3A 99 C7 28 31 34 37 |.n.T.MM.9:..(147| 00000260: 29 3A 8D 35 35 30 20 20 3A 99 22 11 11 22 00 A5 |):.550 :.".."..| 00000270: 0A 5E 01 56 54 B2 33 3A 42 24 B2 22 1C D5 C3 C3 |.^.VT.3:B$."....| 00000280: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000290: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 9A 22 |..............."| 000002A0: 3A 8D 31 34 30 00 DD 0A 68 01 56 54 B2 34 3A 42 |:.140...h.VT.4:B| 000002B0: 24 B2 22 1C C2 20 20 20 20 05 47 52 45 45 4E 20 |$.".. .GREEN | 000002C0: 56 41 4C 4C 45 59 20 50 55 42 4C 49 53 48 49 4E |VALLEY PUBLISHIN| 000002D0: 47 20 20 20 1C 20 C2 22 3A 8D 31 34 30 00 14 0B |G . .":.140...| 000002E0: 72 01 56 54 B2 35 3A 42 24 B2 22 1C CA C3 C3 C3 |r.VT.5:B$.".....| 000002F0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000300: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 05 22 3A |..............":| 00000310: 8D 31 34 30 00 2B 0B 7C 01 56 54 B2 37 3A 42 24 |.140.+.|.VT.7:B$| 00000320: B2 4E 24 28 31 29 3A 8D 31 34 30 00 42 0B 86 01 |.N$(1):.140.B...| 00000330: 56 54 B2 39 3A 42 24 B2 4E 24 28 32 29 3A 8D 31 |VT.9:B$.N$(2):.1| 00000340: 34 30 00 5A 0B 90 01 56 54 B2 31 30 3A 42 24 B2 |40.Z...VT.10:B$.| 00000350: 4E 24 28 33 29 3A 8D 31 34 30 00 6C 0B 9A 01 99 |N$(3):.140.l....| 00000360: 22 11 11 11 22 3A 81 49 B2 31 A4 31 00 91 0B A4 |"...":.I.1.1....| 00000370: 01 99 A3 48 54 29 22 12 05 22 C9 28 C4 28 49 29 |...HT)"..".(.(I)| 00000380: 2C 31 29 22 92 20 22 4E 24 28 49 AA 33 29 22 11 |,1)". "N$(I.3)".| 00000390: 22 00 A7 0B AE 01 82 3A 99 A3 48 54 29 22 12 51 |"......:..HT)".Q| 000003A0: 92 20 51 55 49 54 22 00 D5 0B B8 01 56 54 B2 32 |. QUIT".....VT.2| 000003B0: 31 3A 42 24 B2 22 9A 43 48 4F 4F 53 45 20 4F 4E |1:B$.".CHOOSE ON| 000003C0: 45 20 4F 46 20 54 48 45 20 41 42 4F 56 45 20 22 |E OF THE ABOVE "| 000003D0: 3A 8D 31 34 30 00 09 0C C2 01 56 54 B2 32 32 3A |:.140.....VT.22:| 000003E0: 42 24 B2 22 9A 50 4C 45 41 53 45 20 4C 45 41 56 |B$.".PLEASE LEAV| 000003F0: 45 20 44 49 53 4B 45 54 54 45 20 49 4E 20 44 52 |E DISKETTE IN DR| 00000400: 49 56 45 22 3A 8D 31 34 30 00 43 0C CC 01 56 54 |IVE":.140.C...VT| 00000410: B2 32 34 3A 42 24 B2 22 05 43 4F 50 59 52 49 47 |.24:B$.".COPYRIG| 00000420: 48 54 28 43 29 31 39 38 35 20 41 4C 4C 20 52 49 |HT(C)1985 ALL RI| 00000430: 47 48 54 53 20 52 45 53 45 52 56 45 44 22 3A 8D |GHTS RESERVED":.| 00000440: 31 34 30 00 58 0C D6 01 A1 43 24 3A 8B 20 43 24 |140.X....C$:. C$| 00000450: B2 22 22 A7 34 37 30 20 00 81 0C E0 01 8B 20 43 |."".470 ...... C| 00000460: 24 B2 C7 28 38 31 29 A7 43 24 B2 22 30 22 3A 4E |$..(81).C$."0":N| 00000470: 24 28 34 29 B2 22 45 58 49 54 2A 22 3A 89 35 30 |$(4)."EXIT*":.50| 00000480: 30 00 9A 0C EA 01 8B C5 28 43 24 29 B3 31 B0 C5 |0.......(C$).1..| 00000490: 28 43 24 29 B1 31 A7 34 37 30 00 C2 0C F4 01 99 |(C$).1.470......| 000004A0: 22 93 22 3B A3 31 34 29 22 9A 11 11 11 11 11 11 |".";.14)".......| 000004B0: 11 11 11 11 11 11 4C 4F 41 44 49 4E 47 2E 2E 2E |......LOADING...| 000004C0: 2E 22 00 EB 0C FE 01 99 22 13 90 4C 4F 41 44 22 |."......"..LOAD"| 000004D0: C7 28 33 34 29 4E 24 28 28 C5 28 43 24 29 AA 34 |.(34)N$((.(C$).4| 000004E0: 29 29 C7 28 33 34 29 22 2C 38 22 00 F6 0C 08 02 |)).(34)",8".....| 000004F0: 97 31 39 38 2C 36 00 10 0D 12 02 81 20 49 B2 31 |.198,6...... I.1| 00000500: A4 36 3A 87 58 3A 97 36 33 30 AA 49 2C 58 3A 82 |.6:.X:.630.I,X:.| 00000510: 00 1F 0D 1C 02 97 38 30 38 2C 32 33 37 3A A2 00 |......808,237:..| 00000520: 2D 0D 26 02 8F 20 4D 41 52 51 55 49 45 00 5D 0D |-.&.. MARQUIE.].| 00000530: 30 02 4B B2 31 3A 81 54 B2 31 30 32 34 A4 31 30 |0.K.1:.T.1024.10| 00000540: 36 33 3A 97 54 AA 35 34 32 37 33 2C 54 AB 31 30 |63:.T.54273,T.10| 00000550: 32 33 3A 97 54 2C 31 36 30 3A 82 20 54 00 8C 0D |23:.T,160:. T...| 00000560: 3A 02 81 54 B2 31 30 32 34 A4 32 30 32 34 AB 34 |:..T.1024.2024.4| 00000570: 30 A9 34 30 3A 4B B2 4B AA 31 3A 97 54 AA 35 34 |0.40:K.K.1:.T.54| 00000580: 32 37 32 2C 4B 3A 97 54 2C 31 36 30 00 A9 0D 44 |272,K:.T,160...D| 00000590: 02 97 54 AA 35 34 33 31 31 2C 4B 3A 97 54 AA 33 |..T.54311,K:.T.3| 000005A0: 39 2C 31 36 30 3A 82 20 54 00 D5 0D 4E 02 81 54 |9,160:. T...N..T| 000005B0: B2 31 39 38 34 A4 32 30 32 33 3A 97 54 AA 35 34 |.1984.2023:.T.54| 000005C0: 32 37 33 2C 54 AB 31 39 38 34 3A 97 54 2C 31 36 |273,T.1984:.T,16| 000005D0: 30 3A 82 20 54 00 DB 0D 58 02 8E 00 FA 0D 62 02 |0:. T...X.....b.| 000005E0: 83 22 57 45 4C 43 4F 4D 45 20 54 4F 20 46 41 4D |."WELCOME TO FAM| 000005F0: 49 4C 59 20 54 52 45 45 20 22 00 12 0E 6C 02 83 |ILY TREE "...l..| 00000600: 22 41 20 54 4F 4F 4C 20 54 4F 20 54 52 41 43 45 |"A TOOL TO TRACE| 00000610: 20 22 00 2E 0E 76 02 83 22 59 4F 55 52 20 46 41 | "...v.."YOUR FA| 00000620: 4D 49 4C 59 20 48 49 53 54 4F 52 59 20 22 00 41 |MILY HISTORY ".A| 00000630: 0E 80 02 83 22 46 41 4D 49 4C 59 20 54 52 45 45 |...."FAMILY TREE| 00000640: 22 00 54 0E 9E 02 83 22 46 41 4D 49 4C 59 20 54 |".T...."FAMILY T| 00000650: 52 45 45 22 00 5D 0E B2 02 83 20 31 33 00 75 0E |REE".].... 13.u.| 00000660: BC 02 83 20 31 39 2C 31 33 2C 38 32 2C 38 35 2C |... 19,13,82,85,| 00000670: 37 38 2C 31 33 00 A3 0E D0 07 99 22 93 05 11 11 |78,13......"....| 00000680: 11 11 20 20 20 20 20 20 20 20 20 57 45 20 53 54 |.. WE ST| 00000690: 52 4F 4E 47 4C 59 20 53 55 47 47 45 53 54 20 59 |RONGLY SUGGEST Y| 000006A0: 4F 55 22 00 CF 0E DA 07 99 22 11 11 20 20 20 20 |OU"......".. | 000006B0: 20 20 20 4D 41 4B 45 20 41 20 42 41 43 4B 2D 55 | MAKE A BACK-U| 000006C0: 50 20 43 4F 50 59 20 4F 46 20 54 48 49 53 22 00 |P COPY OF THIS".| 000006D0: FB 0E E4 07 99 22 11 11 20 20 20 20 20 20 20 20 |.....".. | 000006E0: 44 49 53 4B 45 54 54 45 20 46 4F 52 20 45 56 45 |DISKETTE FOR EVE| 000006F0: 52 59 44 41 59 20 55 53 45 2E 22 00 26 0F EE 07 |RYDAY USE.".&...| 00000700: 99 22 11 11 20 20 20 20 20 20 20 20 50 4C 45 41 |.".. PLEA| 00000710: 53 45 20 53 54 4F 52 45 20 54 48 45 20 4F 52 49 |SE STORE THE ORI| 00000720: 47 49 4E 41 4C 22 00 4D 0F F8 07 99 22 11 11 20 |GINAL".M....".. | 00000730: 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 20 41 | IN A| 00000740: 20 53 41 46 45 20 50 4C 41 43 45 2E 22 00 7A 0F | SAFE PLACE.".z.| 00000750: 02 08 99 22 11 11 20 20 20 20 20 20 47 52 45 45 |...".. GREE| 00000760: 4E 20 56 41 4C 4C 45 59 20 50 55 42 4C 49 53 48 |N VALLEY PUBLISH| 00000770: 49 4E 47 2C 20 49 4E 43 2E 22 00 BD 0F B8 0B 99 |ING, INC."......| 00000780: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............| 00000790: 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 |......... | 000007A0: 20 12 9E 50 52 45 53 53 20 41 4E 59 20 4B 45 59 | ..PRESS ANY KEY| 000007B0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 D1 0F | TO CONTINUE"...| 000007C0: C2 0B A1 58 24 3A 8B 58 24 B2 22 22 A7 33 30 31 |...X$:.X$."".301| 000007D0: 30 00 D7 0F CC 0B 8E 00 00 00 |0......... |
....D.. ---MENU2.1---.C.N.. --
-MODIFIED BY SCOTT BRUNS---.J.X.. (C) GR
EEN VALLEY PUBLISHING INC..W.}..808,234.
.....210.....M.C(B$)......M.2...(M.2).B$
.B$." ":M.M.1... ..N.1.M.2.S....G(19);H(
CUR$,VT.1);.......21.N)H(B$,N);I(B$,N);.
..... N...H.....R........53280,0:.53281,
0.0....".":.G(142):.G(8).:....2000.Z...A
E$."":AN.0:A0.0:C$."":DE.0.....ER.0:F$."
":FL.0:I.0:J.0:MM.0:MN.0.....C.0.....W.7
.....CM.55296:WD.40:VIC.53248...".W.W.1:
BL$.".
."...,..VIC.33,0:."..";:.N.1.24:.BL
$...6..:. BL$".".8.@.. X.1.25:CUR$.CUR$.
G(17):.X.P.J..N.1.5:.N$(N):.:.HT.N.T.MM.
9:.G(147):.550 :.".."...^.VT.3:B$.".UCC
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCI.":.140...
H.VT.4:B$.".B .GREEN VALLEY PUBLISHIN
G . B":.140...R.VT.5:B$.".JCCCCCCCCCCC
CCCCCCCCCCCCCCCCCCCCK.":.140.+.|.VT.7:B$
.N$(1):.140.B...VT.9:B$.N$(2):.140.Z...V
T.10:B$.N$(3):.140.L...."...":.I.1.1....
...HT)".."I(D(I),1)". "N$(I.3)"."......:
..HT)".Q. QUIT".U...VT.21:B$.".CHOOSE ON
E OF THE ABOVE ":.140...B.VT.22:B$.".PLE
ASE LEAVE DISKETTE IN DRIVE":.140.C.L.VT
.24:B$.".COPYRIGHT(C)1985 ALL RIGHTS RES
ERVED":.140.X.V..C$:. C$."".470 ...... C
$.G(81).C$."0":N$(4)."EXIT*":.500......E
(C$).1.E(C$).1.470.B....".";.14)".......
......LOADING...."......"..LOAD"G(34)N$(
(E(C$).4))G(34)",8"......198,6...... I.1
.6:.X:.630.I,X:.......808,237:..-.&.. MA
RQUIE.].0.K.1:.T.1024.1063:.T.54273,T.10
23:.T,160:. T...:..T.1024.2024.40.40:K.K
.1:.T.54272,K:.T,160...D..T.54311,K:.T.3
9,160:. T.U.N..T.1984.2023:.T.54273,T.19
84:.T,160:. T...X.....B.."WELCOME TO FAM
ILY TREE "...L.."A TOOL TO TRACE "...V..
"YOUR FAMILY HISTORY ".A...."FAMILY TREE
".T...."FAMILY TREE".].... 13.U.... 19,1
3,82,85,78,13...P.."...... WE ST
RONGLY SUGGEST YOU".O.Z..".. MAKE
A BACK-UP COPY OF THIS"......"..
DISKETTE FOR EVERYDAY USE.".&...."..
PLEASE STORE THE ORIGINAL".M...."..
IN A SAFE PLACE.".Z...."..
GREEN VALLEY PUBLISHING, INC."......
"........................ ..PRESS
ANY KEY TO CONTINUE".Q.B..X$:.X$."".301
0.W.L.....
> CLICK IMAGE PREVIEW FOR FULL MODAL