1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55
| #
# DOS/Linux Boot Disks
#
menu:
set textColor = color[white on cyan]
clear
set textColor = color[yellow on blue]
print " ULTIMATE BOOT CD VER 3.4 "
print " "
set textColor = color[white on red]
print " [DOS/Linux Boot Disks] "
set textColor = color[white on cyan]
print " "
set textColor = color[yellow on cyan]
print " DOS Boot Disks "
set textColor = color[white on cyan]
print " [F1] FreeDOS Boot Disk V3.35 [F3] NwDsk: NetWare Boot Disk V3.35 "
print " [F2] OpenDOS Boot Disk V3.35 [F4] MSRRC: Bart's N/W Disk Clone V3.35 "
print " "
set textColor = color[yellow on cyan]
print " Linux Boot Disks "
set textColor = color[white on cyan]
print " [F5] Boot Disk V2.0.103 [F7] Recovery Is Possible (RIP) V3.1 "
print " [F6] BasicLinux V3.3 [F8] Trinux V0.89 "
print " "
print " "
print " "
print " "
print " "
print " "
print " "
print " "
print " "
print " "
print " "
set textColor = color[white on blue]
print " $(x$expert) Please select an item (ESC returns to main menu) "
set textColor = color[white on black]
#
# Actions
#
getkey
clear
if ($lastKey == key[f1]); then set method = "memdisk"; then set image = "fdubcd"; then script launch.scn
if ($lastKey == key[f2]); then set method = "memdisk"; then set image = "drubcd"; then script launch.scn
if ($lastKey == key[f3]); then set method = "memdisk"; then set image = "fdmsrrc"; then script launch.scn
if ($lastKey == key[f4]); then set method = "memdisk"; then set image = "fdnwd288"; then script launch.scn
if ($lastKey == key[f5]); then set method = "memdisk"; then set image = "tomsrtbt"; then script launch.scn
if ($lastKey == key[f6]); then set method = "memdisk"; then set image = "basiclin"; then script launch.scn
if ($lastKey == key[f7]); then set method = "bcdw"; then set image = "rip"; then script launch.scn # Won't boot using memdisk/diskemu
if ($lastKey == key[f8]); then set method = "memdisk"; then set image = "trinux"; then script launch.scn
if ($lastKey == key[ins]); then set expert = ($expert + 1) % 2;
if ($lastKey == key[esc]); then script main.scn
goto menu |
Partager