home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2006 September / PCpro_2006_09.ISO / boot / menus / launch.scn < prev    next >
Encoding:
Text File  |  2005-09-30  |  4.2 KB  |  76 lines

  1. if !defined[target]; then set target = ""
  2. if $expert == 0; then goto execute
  3.  
  4. menu:
  5. set textColor = color[white on cyan]
  6. clear
  7. set textColor = color[yellow on blue]
  8. print "                            ULTIMATE BOOT CD VER 3.4                            "
  9. print "                         http://www.ultimatebootcd.com/                         "
  10. print "                                                                                "
  11. set textColor = color[white on red]
  12. print "                                 [Expert Menu]                                  "
  13. set textColor = color[white on cyan]
  14. print "                                                                                "
  15. print "                                                                                "
  16. print "                                                                                "
  17. set textColor = color[yellow on cyan]
  18. print "                                Method > $method\n"
  19. print "                                 Image > $image\n"
  20. print "                                Target > $target\n"
  21. set textColor = color[white on cyan]
  22. print "                                                                                "
  23. print "                                [F1] Use memdisk                                "
  24. if compare["$target" ""]; else set textColor = color[brightgrey on cyan]
  25. print "                                [F2] Use diskemu                                "
  26. set textColor = color[white on cyan]
  27. print "                                [F3] Use bcdw                                   "
  28. print "                                                                                "
  29. print "                                [F4] Use FreeDOS                                "
  30. if file[\images\drubcd.img]; else set textColor = color[brightgrey on cyan]
  31. print "                                [F5] Use OpenDOS                                "
  32. set textColor = color[white on cyan]
  33. if file[\images\msubcd.img]; else set textColor = color[brightgrey on cyan]
  34. print "                                [F6] Use MSDOS                                  "
  35. set textColor = color[white on cyan]
  36. print "                                                                                "
  37. print "                               [F10] Execute command                            "
  38. print "                                                                                "
  39. print "                                                                                "
  40. print "                                                                                "
  41. set textColor = color[white on blue]
  42. print " $(x$expert)              Please select an item (ESC returns to main menu)                "
  43. set textColor = color[white on black]
  44.  
  45. #
  46. # Actions
  47. #
  48. getkey
  49. clear
  50. if ($lastKey == key[ins]); then set expert = ($expert + 1) % 2;
  51. if ($lastKey == key[f1]); then set method = "memdisk"
  52. if !compare["$target" ""]; then if ($lastKey == key[f2]); then set method = "diskemu"
  53. if ($lastKey == key[f3]); then set method = "bcdw"
  54. if ($lastKey == key[f4]); then set image = "fdubcd"
  55. if file[\images\drubcd.img]; then if ($lastKey == key[f5]); then set image = "drubcd"
  56. if file[\images\msubcd.img]; then if ($lastKey == key[f6]); then set image = "msubcd"
  57. if ($lastKey == key[f10]); then goto execute
  58. if ($lastKey == key[esc]); then set target = ""; then script main.scn
  59. goto menu
  60.  
  61. #
  62. # Execute command
  63. #
  64. execute:
  65. if file[\images\$(image).igz]; then set image = "$(image).igz";
  66. if file[\images\$(image).img]; then set image = "$(image).img";
  67. if file[\images\$(image).ima]; then set image = "$(image).ima";
  68. if file[\images\$(image).iso]; then set image = "$(image).iso";
  69. if (compare["$target" ""] && compare["$method" "memdisk"]); then memdisk /images/$image
  70. if (compare["$target" ""] && compare["$method" "diskemu"]); then diskemu /images/$image
  71. if (compare["$target" ""] && compare["$method" "bcdw"]); then bcdw boot /images/$image
  72. if compare["$method" "memdisk"]; then isolinux memdisk initrd=/images/$image ubcdcmd=$target
  73. if compare["$method" "diskemu"]; then diskemu /images/$image $target
  74. if compare["$method" "bcdw"]; then bcdw boot /images/$image $target
  75.  
  76.