Jump to content

JohnSteven

Member
  • Posts

    21
  • Joined

  • Last visited

  • Donations

    0.00 USD 
  • Country

    United States

Everything posted by JohnSteven

  1. I use Access Manager. You can try out the free version without any expiration, although the Pro version has some nice features. Requires dot net and runs as a stand-alone application from a USB key.
  2. Hi byte.chaser, Here's the syntax I'm using; if $lastKey == key[5]; then memdisk /4320.IMA Go to post #41 and download his image file and give it a go.
  3. Hi qzmicro, Yes it works. Do a search in the forums. Don't know exactly where I found the answer myself, but it's in the forum somewhere. Sorry I can't do better than that. Here's a copy of my cdshell.ini file for your reference: boot: cls print "\n" print "Press Enter to boot from DVD... \n" getkey 15 boot 0x80 if $lastKey == key[enter]; then goto time # When no key found... goto boot # Function to display time of day time: set hour = $timeHour set ampm = "am" if $timeHour > 12; then set hour = $timeHour - 12 if $timeHour > 12; then set ampm = "pm" set time = "$hour:$timeMinute $ampm" # Function to display date date: set month = "n/a" if $dateMonth == 1; then set month = "Jan." if $dateMonth == 2; then set month = "Feb." if $dateMonth == 3; then set month = "Mar." if $dateMonth == 4; then set month = "Apr." if $dateMonth == 5; then set month = "May." if $dateMonth == 6; then set month = "Jun." if $dateMonth == 7; then set month = "Jul." if $dateMonth == 8; then set month = "Aug." if $dateMonth == 9; then set month = "Sep." if $dateMonth == 10; then set month = "Oct." if $dateMonth == 11; then set month = "Nov." if $dateMonth == 12; then set month = "Dec." set date = "$month $dateDay, $dateYear" # Printing the Interface menu: cls set textColor= color[brightblue on black] set boldColor= color[red on black] print c "\n\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print c "\cXX<\c0B$time ÄÄÄÄ $date\cXX> \n\n" print c "\cXXMy \cXXMulti-Boot\cxx DVD v1.7\n\n" print l "\cXXPress \c0BF1 \cxxfor Help \n\n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print "\n" print "1) Windows XP Professional SP1 Corporate \n" print "2) Windows 2000 \n" print "3) Windows 98 SE \n" print "4) Bart's PE \n" print "5) Knoppix \n" print "\n" print "S) Serials \n" print "Q) Quit to Command Prompt \n" print "R) Reboot \n" print "ESC) Boot 1st Harddisk \n" print c "\n" MainKey: getkey 20 boot 0x80 if $lastKey == key[1]; then chain /PRO1.DAT if $lastKey == key[2]; then chain /2PRO.DAT if $lastKey == key[3]; then memdisk /98SE.IMA if $lastKey == key[4]; then chain /BPE1.DAT if $lastKey == key[5]; then memdisk /4320.IMA if $lastKey == key[s]; then goto SerialNumbers if $lastKey == key[q]; then end if $lastKey == key[r]; then reboot if $lastKey == key[F1]; then goto Help if $lastKey == key[esc]; then boot 0x80 getkey goto menu end SerialNumbers: cls print c "\n\cXXSerial Numbers\n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print "\n" print " ********** Windows 98 ------- \c0Bxxxxx-xxxxx-xxxxx-xxxxx-xxxxx\cxx********** \n" print "\n" print " ********** Windows 2000 Pro - \c0Bxxxxx-xxxxx-xxxxx-xxxxx-xxxxx\cxx********** \n" print "\n" print " ********** Windows XP Pro --- \c0Bxxxxx-xxxxx-xxxxx-xxxxx-xxxxx\cxx********** \n" print "\n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print c "\n\n" print c"\c0BPress any key to return to main menu... \n" getkey goto menu Help: cls print c "\n\c0BMulti-Boot DVD - Main Menu\cxx Help \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "Pressing the \cXXKEY\cxx of your choice in the main menu will \cXXinitiate\cxx: \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "Key = \cXX1\cxx - \c0BWindows 98\cxx or\cxx \n" print "Key = \cXX2\cxx - \c0BWindows 2000\cxx or\cxx \n" print "Key = \cXX3\cxx - \c0BWindows XP Pro \n" print " \cXXOperating System setup with the normal prompts.\cxx \n" print "\n" print "Key = \cXX4\cxx - \c0BBart's PE\cxx - \CXXA Pre-installed XP OS with many utilities\cxx \n" print "\cXX that is run entirely from the DVD.\cxx \n" print "\n" print "Key = \cXX5\cxx - \c0BKnoppix\cxx - \cXXA Linux distribution that can be run entirely\cxx \n" print "\cXX from the DVD or installed to the HDD.\cxx \n" print "\n" print "Key = \cXXS\cxx - \c0BSERIAL NUMBERS \cxx - \cXXFor the listed Operating Systems\cxx \n" print "\n" print "Key = \cXXQ\cxx - \c0BCOMMAND PROMPT\cxx \n" print "\n" print "Key = \cXXESC\cxx - \c0BREBOOT\cxx \cXXto the system HDD\cxx \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "\n" print c"\c0BPress any key to return to main menu...\cxx \n" getkey goto menu end
  4. Resolved the problem with Nero. After selecting to make a boot DVD and selecting the boot file, I would click on the "New" button and a dual pane file manager would open. If I close the right file manager pane, I can then right click the left and add files from my home LAN. If I leave the right file manager pane open, my home LAN is not displayed. I know this sounds strange, but it is now functional. Thanks again for the help and ideas............
  5. Hi firefoxthebomb, Thanks for the reply. I tried putting Roxio V6.0 on my machine, but it said I had to uninstall v5.x.x first. OK, so I did the uninstall, rebooted, then when I opened Explorer, both of my DVD drives were missing. Device manager couldn't update the drivers either (code 31). I ended up doing a restore with Acronis and all was well again. Tried another uninstall and same scenario, had to restore the image again. Is there somethingabout Roxio that I should know???
  6. While attempting to make a bootable rescue DVD with my Acronis files (5 - 635mb files), I came to the realization that Nero could not see the Acronis files on my home LAN (using my destop to create bootable DVD for my laptop). Does anyone know of a DVD burning application, that would allow me to use my own boot files and burn files from another computer on my LAN?
  7. Found my answer in the Custom Installation Wizard - duh......... ;-)
  8. Could someone inform me where the file is that determines what is to be installed in Office 2000 by default. Would like to create a custom install for certain machines (i.e. - some machines get Access and Powerpoint and some get only Word and Excel). All the machines have different hardware configurations, but depending on the department, there are variables in the installed applications. Thanks for your help.
  9. I think you'd be hard pressed to find a password management tool better than Access Manager. It is built on .net and can be carried with you via USB key and used on any computer that has .net installed. The free version is good, but the Pro version is even better (plus it's a great value at $19.95 US for the Pro version). Hope this helps............
  10. LiquidSage In regards to your post of Jun 20 2004: I followed your instruction to the letter in regards to loading Acronis products and come up with an "Invalid BCDW command. Any ideas on why?? Thanks.........
  11. Take a look at this post for the folder structure I use. With the exception of an $OEM$ folder, this boots and all works (have installed all OS's on test machine without any snags). Next project - $OEM$ folder (I hope) Hope this helps........
  12. Finally found the post where I got the instructions from. Go here and read this post and it should answer your questions. Remember, you may have to modify a few things here and there to get it to work for you. Hope this helps........
  13. Hi Blyenth, I just got my Knoppix distro up-n-running on my Multi-DVD. Found the info I needed on this site and on 911CD site and by searching and reading. Here's what worked fro me: ***************I believe the credit goes to Godzilla.*************** This worked for Knoppix, I don't see why it wouldn't work for BBC also with some modifications. You'll need a few tools like WinISO and a Hex editor to get the job done.
  14. I don't see why this can't be done, providing you point cdshell to the appropriate boot folder. Just edit the setupldr.bin, txtsetup.sif, and boot sector (PRO1.dat) files accordingly - e.g. PRO1E (English), PRO1G (Greek), or to your liking. Also, go to this site, click on useful links, then go to Multi-boot DVD. Lots of knowledge can be gathered from there.
  15. Any ideas on how this can be implemented?? I've done a search and couldn't find anything in plain English... Thanks JohnSteven
  16. Hi MCT, After playing with this for some time, finally got most of this multi-boot thing figured out (I'm sure someone will correct me if I make a mistake). Here's a shot of what my AIODVD folder looks like. Here's a copy of an .ini file for CDShell I got from flyakite's site and I modified it to suit my likings. boot: cls print "\n" print "Press Enter to boot from DVD... \n" getkey 5 boot 0x80 if $lastKey == key[enter]; then goto time # When no key found... goto boot # Function to display time of day time: set hour = $timeHour set ampm = "am" if $timeHour > 12; then set hour = $timeHour - 12 if $timeHour > 12; then set ampm = "pm" set time = "$hour:$timeMinute$ampm" # Function to display date date: set month = "n/a" if $dateMonth == 1; then set month = "Jan." if $dateMonth == 2; then set month = "Feb." if $dateMonth == 3; then set month = "Mar." if $dateMonth == 4; then set month = "Apr." if $dateMonth == 5; then set month = "May." if $dateMonth == 6; then set month = "Jun." if $dateMonth == 7; then set month = "Jul." if $dateMonth == 8; then set month = "Aug." if $dateMonth == 9; then set month = "Sep." if $dateMonth == 10; then set month = "Oct." if $dateMonth == 11; then set month = "Nov." if $dateMonth == 12; then set month = "Dec." set date = "$month$dateDay,$dateYear" # Printing the Interface menu: set textColor= color[grey on black] set boldColor= color[cyan on black] cls print c "\n\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ<\c0B$time $date\cXX>ÄÄ \n\n" print c "\cXXAdvanced Multi-Boot DVD v1.7\n\n" print l "\cXXPress \c0BF1 \cXXfor Help"; print r "\c0Bckite@portraitofakite.com \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print "1) Windows XP Professional SP1 Corporate \n" print "2) Windows XP Home SP1 Retail \n" print "3) Windows Server 2003 Corporate \n" print "4) Windows 2000 \n" print "5) Windows 98 SE \n" print "6) Windows ME \n" print "7) Windows NT 4.0 Server \n" print "8) ERD Commander 2003 \n" print "9) ERD Commander 2003 /inram \n" print "\n" print "X) More Options... \n\n" print "Q) Quit to Command Prompt \n" print "R) Reboot \n" print "ESC) Boot 1st Harddisk \n" print c "\n" MainKey: getkey 20 boot 0x80 if $lastKey == key[1]; then goto XP_Pro if $lastKey == key[2]; then goto XP_Home if $lastKey == key[3]; then goto Server2003 if $lastKey == key[4]; then goto 2000 if $lastKey == key[5]; then memdisk /98SE.IMA if $lastKey == key[6]; then memdisk /ME.IMA if $lastKey == key[7]; then chain /NT4S.DAT if $lastKey == key[8]; then chain /ERD1.DAT if $lastKey == key[9]; then chain /ERD2.DAT if $lastKey == key[q]; then end if $lastKey == key[r]; then reboot if $lastKey == key[x]; then goto MoreOptions if $lastKey == key[F1]; then goto Help if $lastKey == key[esc]; then boot 0x80 MoreOptions: cls print r "\n\cXXPress \c0BF1 \cXXfor Help \n" print c "\n\cXXMore Options \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "1) Read/Copy Files From NTFS Volumes To FAT32/16 Drives \n" print "2) Partition Magic 8.0 \n" print "3) Norton Ghost \n" print "4) View Serial Numbers \n" print c "\n\n" print "Press any key to return to main menu... \n" MoreOptions_Key: getkey 20 goto menu if $lastKey == key[1]; then memdisk /NTFS.IMA if $lastKey == key[2]; then memdisk /PM8.IMG if $lastKey == key[3]; then memdisk /GHOST.IMA if $lastKey == key[4]; then goto SerialNumbers goto menu SerialNumbers: cls print r "\n\cXXPress \c0BF1 \cXXfor Help \n" print c "\n\cXXSerial Numbers\n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ" type /Serial~1.txt print c "\n\n" print "Press any key to return to main menu... \n" getkey goto menu XP_Pro: cls print r "\n\cXXPress \c0BF1 \cXXfor Help \n" print c "\n\cXXMicrosoft Windows XP Professional SP1 Corporate \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "1) Regular \n" print "2) Unattended \n" print "3) OEMPreinstall \n" print c "\n\n" print "Press any key to return to main menu... \n" XP_Pro_Key: getkey 20 goto menu if $lastKey == key[1]; then chain /PRO1.DAT if $lastKey == key[2]; then chain /PRO2.DAT if $lastKey == key[3]; then chain /PRO3.DAT if $lastKey == key[F1]; then goto Help goto menu XP_Home: cls print r "\n\cXXPress \c0BF1 \cXXfor Help \n" print c "\n\cXXMicrosoft Windows XP Home SP1 Retail \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "1) Regular \n" print "2) Unattended \n" print c "\n\n" print "Press any key to return to main menu... \n" XP_Home_Key: getkey 20 goto menu if $lastKey == key[1]; then chain /HOM1.DAT if $lastKey == key[2]; then chain /HOM2.DAT if $lastKey == key[F1]; then goto Help goto menu Server2003: cls print r "\n\cXXPress \c0BF1 \cXXfor Help \n" print c "\n\cXXMicrosoft Windows Server 2003 Corporate \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "1) Enterprise \n" print "2) Standard \n" print "3) Web \n" print "4) Datacenter \n" print c "\n\n" print "Press any key to return to main menu... \n" Server2003_Key: getkey 20 goto menu if $lastKey == key[1]; then chain /3ENT.DAT if $lastKey == key[2]; then chain /3STD.DAT if $lastKey == key[3]; then chain /3WEB.DAT if $lastKey == key[4]; then chain /3DCT.DAT if $lastKey == key[F1]; then goto Help goto menu 2000: cls print r "\n\cXXPress \c0BF1 \cXXfor Help \n" print c "\n\cXXMicrosoft Windows 2000 \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "1) Professional \n" print "2) Server \n" print "3) Advanced Server \n" print c "\n\n" print "Press any key to return to main menu... \n" 2000_Key: getkey 20 goto menu if $lastKey == key[1]; then chain /2PRO.DAT if $lastKey == key[2]; then chain /2SRV.DAT if $lastKey == key[3]; then chain /2ADV.DAT if $lastKey == key[F1]; then goto Help goto menu Help: cls print c "\n\cXXMulti-Boot DVD Help \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "\n" print "Hit the key of your choice in the main menu -> \n" print "\n" print "\n" print "Install Types \n" print "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "Regular - Install will prompt you for all information during setup. \n" print "Unattended - Install with no user prompts. \n" print "OEMPreinstall - Install Windows and additional programs with no user prompts. \n" print "\n" print "\n" print "Press any key to return to main menu... \n" getkey goto menu end Here's a copy of my .ini file after some tweaking: boot: cls print "\n" print "Press Enter to boot from DVD... \n" getkey 15 boot 0x80 if $lastKey == key[enter]; then goto time # When no key found... goto boot # Function to display time of day time: set hour = $timeHour set ampm = "am" if $timeHour > 12; then set hour = $timeHour - 12 if $timeHour > 12; then set ampm = "pm" set time = "$hour:$timeMinute $ampm" # Function to display date date: set month = "n/a" if $dateMonth == 1; then set month = "Jan." if $dateMonth == 2; then set month = "Feb." if $dateMonth == 3; then set month = "Mar." if $dateMonth == 4; then set month = "Apr." if $dateMonth == 5; then set month = "May." if $dateMonth == 6; then set month = "Jun." if $dateMonth == 7; then set month = "Jul." if $dateMonth == 8; then set month = "Aug." if $dateMonth == 9; then set month = "Sep." if $dateMonth == 10; then set month = "Oct." if $dateMonth == 11; then set month = "Nov." if $dateMonth == 12; then set month = "Dec." set date = "$month $dateDay, $dateYear" # Printing the Interface menu: cls set textColor= color[brightblue on black] set boldColor= color[red on black] print c "\n\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print c "\cXX<\c0B$time ÄÄÄÄ $date\cXX> \n\n" print c "\cXXMy \cXXMulti-Boot\cxx DVD v1.7\n\n" print l "\cXXPress \c0BF1 \cxxfor Help \n\n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print "\n" print "1) Windows XP Professional SP1 Corporate \n" print "2) Windows 2000 \n" print "3) Windows 98 SE \n" print "4) Bart's PE \n" print "5) Knoppix \n" print "\n" print "S) Serials \n" print "Q) Quit to Command Prompt \n" print "R) Reboot \n" print "ESC) Boot 1st Harddisk \n" print c "\n" MainKey: getkey 20 boot 0x80 if $lastKey == key[1]; then chain /PRO1.DAT if $lastKey == key[2]; then chain /2PRO.DAT if $lastKey == key[3]; then memdisk /98SE.IMA if $lastKey == key[4]; then chain /BPE1.DAT if $lastKey == key[5]; then memdisk /4320.IMA if $lastKey == key[s]; then goto SerialNumbers if $lastKey == key[q]; then end if $lastKey == key[r]; then reboot if $lastKey == key[F1]; then goto Help if $lastKey == key[esc]; then boot 0x80 getkey goto menu end SerialNumbers: cls print c "\n\cXXSerial Numbers\n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print "\n" print " ********** Windows 98 ------- \c0BXXXXX-XXXXX-XXXXX-XXXXX-XXXXX\cxx********** \n" print "\n" print " ********** Windows 2000 Pro - \c0BXXXXX-XXXXX-XXXXX-XXXXX-XXXXX\cxx********** \n" print "\n" print " ********** Windows XP Pro --- \c0BXXXXX-XXXXX-XXXXX-XXXXX-XXXXX\cxx********** \n" print "\n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n\n" print c "\n\n" print c"\c0BPress any key to return to main menu... \n" getkey goto menu Help: cls print c "\n\c0BMulti-Boot DVD - Main Menu\cxx Help \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "Pressing the \cXXKEY\cxx of your choice in the main menu will \cXXinitiate\cxx: \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "Key = \cXX1\cxx - \c0BWindows 98\cxx or\cxx \n" print "Key = \cXX2\cxx - \c0BWindows 2000\cxx or\cxx \n" print "Key = \cXX3\cxx - \c0BWindows XP Pro \n" print " \cXXOperating System setup with the normal prompts.\cxx \n" print "\n" print "Key = \cXX4\cxx - \c0BBart's PE\cxx - \CXXA Pre-installed XP OS with many utilities\cxx \n" print "\cXX that is run entirely from the DVD.\cxx \n" print "\n" print "Key = \cXX5\cxx - \c0BKnoppix\cxx - \cXXA Linux distribution that can be run entirely\cxx \n" print "\cXX from the DVD or installed to the HDD.\cxx \n" print "\n" print "Key = \cXXS\cxx - \c0BSERIAL NUMBERS \cxx - \cXXFor the listed Operating Systems\cxx \n" print "\n" print "Key = \cXXQ\cxx - \c0BCOMMAND PROMPT\cxx \n" print "\n" print "Key = \cXXESC\cxx - \c0BREBOOT\cxx \cXXto the system HDD\cxx \n" print c "\cXXÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ \n" print "\n" print c"\c0BPress any key to return to main menu...\cxx \n" getkey goto menu end I'm still trying to figure out the $OEM$ folders and how to implement them. Once I figure out how to take a screenshot of how it looks while booting, I'll post it for you. Oh, BTW, the files for CDShell go into the "boot" folder. Hope this helps......... JohnSteven
  17. I've been attempting to implement a password into my cdshell.ini file and am at another brain freeze. I found the following on one of the sites for building the AIODVD and put it together with my cdshell.ini file, but it just keep looping and won't go to my boot menu. # # script file for: # CDSHELL system / www.cdshell.org # run cdshw.com and type script password.cdshell # # If you are interesting in contact with me, # then write to pawelwabno@klub.chip.pl # REMEMBER - CDSHELL THINGS ONLY!!!!! # # # # THANK YOU, MY LORD!!! # Updated on June 18, 2004 to use MD5 hash function by # Mike Ter Louw. Great script Paul! One of my favs. :D # # MAIN MENU # set gen_pass = 0 set position=1 start: show console cls set y="textCursorY" set x="textCursorX" call main_screen if $position==1;then goto item_1 if $position==2;then goto item_2 if $position==3;then goto item_3 if $position==4;then goto item_4 item_1: set $x=0 set $y=3 print " \c6f \cf1 generate password \c64 \n" goto loop item_2: set $x=0 set $y=4 print " \c6f \cf1 check password \c64 \n" goto loop item_3: set $x=0 set $y=5 print " \c6f \cf1 $$MD5 and $$lastChar\c64 \n" goto loop item_4: set $x=0 set $y=6 print " \c6f \cf1 about \c64 \n" goto loop loop: getkey if $lastKey==key[esc];then clear;then end if $lastKey==key[down];then goto go_down if $lastKey==key[up];then goto go_up if $lastKey==key[enter];then goto execute_$position goto loop go_down: call main_screen if compare["$position" "4"] then set position=1 else set position = $position + 1 goto item_$position go_up: call main_screen if compare["$position" "1"] then set position=4 else set position = $position - 1 goto item_$position main_screen: set $x=0 set $y=2 print " \c6f \n" print " \c6f generate password \n" print " \c6f check password \n" print " \c6f $$MD5 and $$lastChar \n" print " \c6f about \n" print " \c6f \n" return # # END OF MAIN MENU # execute_1: # # GENERATE PASSWORD # set $y=9 print " \c1f \n" print " \c1f Maximum password lenght is 24 characters, confirm end of typing \n" print " \c1f with ENTER. You can use any keys variations (such as: SHIFT/ALT/CTRL \n" print " \c1f + a, esc, F1, home, cursor down, etc.) but only printable \n" print " \c1f characters (a...z, A...Z, 0...9, !@$#...) will be shown, any other \n" print " \c1f will be displayed as sign \c1a*\c1f. \n" print " \c1f Of course password will be generated correctly! \n" print " \c1f \n" print " \c1f Password is: \n" print " \c1f \n" print " \c1f \n" print " \c1f \n" print " \c1f \n" set gen_pass = "" set gen_count = 1 set show_count = 1 loop_get_pass: getkey if $lastKey==key[enter];then goto calculate_hash set gen_pass = "$(gen_pass)$lastChar" set letter= "unknown" call lastkey_to_sign set $y=17;set $x=18 + $show_count if compare["$letter" "unknown"];then print "\c1a*";else print "\c1e$letter" if compare["$gen_count" "25"];then goto too_many_letters set gen_count = $gen_count + 1 set show_count = $show_count + 1 goto loop_get_pass calculate_hash: set MD5 = "$gen_pass" set gen_pass = "$MD5" show_decimal: set $y=18;set $x=6;print "\c1fMD5 value is: \c1e$gen_pass" set $y=20;set $x=6;print "\c1fPress ENTER to type again or ESC to return to main menu...\n" show_decimal_loop: getkey if $lastKey==key[esc]; then goto start if $lastKey==key[enter]; then goto execute_1 goto show_decimal_loop too_many_letters: set $y=19;set $x=6;print "\c1fAre you afraid that 24 characters password is not enough?\n" set $y=20;set $x=6;print "\c1fPress ENTER to type again or ESC to return to main menu...\n" too_many_letters_loop: getkey if $lastKey==key[esc]; then goto start if $lastKey==key[enter]; then goto execute_1 goto too_many_letters_loop # # END OF GENERATE PASSWORD # execute_2: # # CHECK PASSWORD # if !compare["$gen_pass" ""];then goto can_check_password set $y=9;set $x=0 print "\ac\c1f " print "\ac\c1f Generate password, please! " print "\ac\c1f " # # LITTLE SOMETHIN' # set five_sec=5 set lastKey=0 five_sec_loop: set $y=10;set $x=52;print "\c17[$five_sec]" getkey 1 if !compare["$lastKey" "0"];then goto five_sec_exit if compare["$five_sec" "1"];then goto five_sec_exit set five_sec = $five_sec - 1 goto five_sec_loop five_sec_exit: set position=1 goto start # # END OF LITTLE SOMETHIN' # can_check_password: set pass_x=35 set pass_y=10 set pass_lenght=25 set try=1 loop_try: call text_enter_password set pass_word= ""; set count=1 loop_count: getkey if $lastKey==key[enter]; then goto pass_entered set pass_word = "$(pass_word)$lastChar" set pass_position= $pass_x + $count;set $x = $pass_position;set $y = $pass_y;print "\c1f*" if compare["$count" "$pass_lenght"];then goto next_try set count = $count + 1 goto loop_count pass_entered: set MD5 = "$pass_word" set pass_word = "$MD5" if compare["$pass_word" "$gen_pass"];then goto access_granted next_try: if compare["$try" "3"]; then goto access_denied set try = $try + 1 if compare["$try" "2"];then set text_try_again="try again..." if compare["$try" "3"];then set text_try_again="last chance!" call text_try_next getkey goto loop_try text_enter_password: set $y=9;set $x=0 print "\ac\c1f " print "\ac\c1f Enter password: " print "\ac\c1f " set $y=12;set $x=0;print "\ac ";return text_try_next: set $y=9;set $x=0 print "\ac\c1f " print "\ac\c1c Wrong password, $text_try_again " print "\ac\c1f " return access_denied: set $y=9;set $x=0 print "\ac\c4f " print "\ac\c4f A C C E S S D E N I E D " print "\ac\c4f " goto check_password_end access_granted: set $y=9;set $x=0 print "\ac\c2f " print "\ac\c2f A C C E S S G R A N T E D " print "\ac\c2f " check_password_end: set $y=13;set $x=0;print "\acPress ENTER to try again or ESC to return to main menu..." getkey if $lastKey==key[enter];then goto execute_2 if $lastKey==key[esc];then goto start goto check_password_end # # END OF CHECK PASSWORD # execute_3: # # $lastKey # set $y=9 print "\ac\c1f " print "\ac\c1f This script uses the $$lastChar and $$MD5 variables to apply a one-way " print "\ac\c1f encryption to passwords. This enables you to use the encoded form " print "\ac\c1f in your script, and nobody will know the original password but you! " print "\ac\c1f " print "\ac\c1f Passwords are generated by looping over two key commands: " print "\ac\c1e getkey$; set password = $$(password)$$lastChar " print "\ac\c1f " print "\ac\c1f Then you encode the password by writing to the $$MD5 variable: " print "\ac\c1e set MD5 = \"$$password\" " print "\ac\c1f " print "\ac\c1f Finally, you can obtain the encoded password by reading back from " print "\ac\c1f the $$MD5 variable: \c1eprint \"The encrypted form is: $$MD5\" " print "\ac\c1f " getkey; goto start # # END OF $lastKey # execute_4: # # ABOUT # set $y=9 print " \c1b \n" print " \c1b This script is a simple demonstration of CDSHELL possibilities, \n" print " \c1b and please, don't take it as a serious protection of your work! :-) \n" print " \c1b (if you need that then better think how to disallow access to file \n" print " \c1b cdshell.ini) \n" print " \c1b Maybe next time a little text editor? Just kidding... \n" print " \c1b \n" print " \c1b I must say thank you for \c1fMichael K Ter Louw\c1b for CDShell, \n" print " \c1b also for \c1fGary Tong\c1b and \c1fBart Lagerweij\c1b for DiskEmu!!! \n" print " \c1b \n" print " \c1b \c1fPaul Wabno \n" print " \c1b \n" getkey;goto start # # END OF ABOUT # # # ADDITIONAL PROCEDURES # lastkey_to_sign: # # a...z # if compare["$lastKey" "97"];then set letter = "a" if compare["$lastKey" "98"];then set letter = "b" if compare["$lastKey" "99"];then set letter = "c" if compare["$lastKey" "100"];then set letter = "d" if compare["$lastKey" "101"];then set letter = "e" if compare["$lastKey" "102"];then set letter = "f" if compare["$lastKey" "103"];then set letter = "g" if compare["$lastKey" "104"];then set letter = "h" if compare["$lastKey" "105"];then set letter = "i" if compare["$lastKey" "106"];then set letter = "j" if compare["$lastKey" "107"];then set letter = "k" if compare["$lastKey" "108"];then set letter = "l" if compare["$lastKey" "109"];then set letter = "m" if compare["$lastKey" "110"];then set letter = "n" if compare["$lastKey" "111"];then set letter = "o" if compare["$lastKey" "112"];then set letter = "p" if compare["$lastKey" "113"];then set letter = "q" if compare["$lastKey" "114"];then set letter = "r" if compare["$lastKey" "115"];then set letter = "s" if compare["$lastKey" "116"];then set letter = "t" if compare["$lastKey" "117"];then set letter = "u" if compare["$lastKey" "118"];then set letter = "v" if compare["$lastKey" "119"];then set letter = "w" if compare["$lastKey" "120"];then set letter = "x" if compare["$lastKey" "121"];then set letter = "y" if compare["$lastKey" "122"];then set letter = "z" # # A...Z # if compare["$lastKey" "65"];then set letter = "A" if compare["$lastKey" "66"];then set letter = "B" if compare["$lastKey" "67"];then set letter = "C" if compare["$lastKey" "68"];then set letter = "D" if compare["$lastKey" "69"];then set letter = "E" if compare["$lastKey" "70"];then set letter = "F" if compare["$lastKey" "71"];then set letter = "G" if compare["$lastKey" "72"];then set letter = "H" if compare["$lastKey" "73"];then set letter = "I" if compare["$lastKey" "74"];then set letter = "J" if compare["$lastKey" "75"];then set letter = "K" if compare["$lastKey" "76"];then set letter = "L" if compare["$lastKey" "77"];then set letter = "M" if compare["$lastKey" "78"];then set letter = "N" if compare["$lastKey" "79"];then set letter = "O" if compare["$lastKey" "80"];then set letter = "P" if compare["$lastKey" "81"];then set letter = "Q" if compare["$lastKey" "82"];then set letter = "R" if compare["$lastKey" "83"];then set letter = "S" if compare["$lastKey" "84"];then set letter = "T" if compare["$lastKey" "85"];then set letter = "U" if compare["$lastKey" "86"];then set letter = "V" if compare["$lastKey" "87"];then set letter = "W" if compare["$lastKey" "88"];then set letter = "X" if compare["$lastKey" "89"];then set letter = "Y" if compare["$lastKey" "90"];then set letter = "Z" # # 0...9 # if compare["$lastKey" "48"];then set letter = "0" if compare["$lastKey" "49"];then set letter = "1" if compare["$lastKey" "50"];then set letter = "2" if compare["$lastKey" "51"];then set letter = "3" if compare["$lastKey" "52"];then set letter = "4" if compare["$lastKey" "53"];then set letter = "5" if compare["$lastKey" "54"];then set letter = "6" if compare["$lastKey" "55"];then set letter = "7" if compare["$lastKey" "56"];then set letter = "8" if compare["$lastKey" "57"];then set letter = "9" # # other characters # if compare["$lastKey" "96"];then set letter = "`" if compare["$lastKey" "126"];then set letter = "~" if compare["$lastKey" "33"];then set letter = "!" if compare["$lastKey" "64"];then set letter = "@" if compare["$lastKey" "35"];then set letter = "$#" if compare["$lastKey" "36"];then set letter = "$$" if compare["$lastKey" "37"];then set letter = "%" if compare["$lastKey" "94"];then set letter = "^" if compare["$lastKey" "38"];then set letter = "&" if compare["$lastKey" "42"];then set letter = "*" if compare["$lastKey" "40"];then set letter = "(" if compare["$lastKey" "41"];then set letter = ")" if compare["$lastKey" "45"];then set letter = "-" if compare["$lastKey" "95"];then set letter = "_" if compare["$lastKey" "61"];then set letter = "+" if compare["$lastKey" "43"];then set letter = "=" if compare["$lastKey" "91"];then set letter = "[" if compare["$lastKey" "123"];then set letter = "{" if compare["$lastKey" "125"];then set letter = "}" if compare["$lastKey" "124"];then set letter = "|" if compare["$lastKey" "59"];then set letter = "$;" if compare["$lastKey" "58"];then set letter = ":" if compare["$lastKey" "39"];then set letter = "'" if compare["$lastKey" "44"];then set letter = "," if compare["$lastKey" "46"];then set letter = "." if compare["$lastKey" "60"];then set letter = "<" if compare["$lastKey" "62"];then set letter = ">" if compare["$lastKey" "47"];then set letter = "/" if compare["$lastKey" "63"];then set letter = "?" return other_keys_to_sign: if compare["$lastKey" "15104"];then set letter = "F1" if compare["$lastKey" "15360"];then set letter = "F2" if compare["$lastKey" "15616"];then set letter = "F3" if compare["$lastKey" "15872"];then set letter = "F4" if compare["$lastKey" "16128"];then set letter = "F5" if compare["$lastKey" "16384"];then set letter = "F6" if compare["$lastKey" "16640"];then set letter = "F7" if compare["$lastKey" "16896"];then set letter = "F8" if compare["$lastKey" "17152"];then set letter = "F9" if compare["$lastKey" "17408"];then set letter = "F10" if compare["$lastKey" "34048"];then set letter = "F11" if compare["$lastKey" "34304"];then set letter = "F12" if compare["$lastKey" "32"];then set letter = "space bar" if compare["$lastKey" "8"];then set letter = "backspace" if compare["$lastKey" "9"];then set letter = "tab" if compare["$lastKey" "13"];then set letter = "enter" if compare["$lastKey" "20992"];then set letter = "insert" if compare["$lastKey" "21248"];then set letter = "delete" if compare["$lastKey" "18176"];then set letter = "home" if compare["$lastKey" "20224"];then set letter = "end" if compare["$lastKey" "18688"];then set letter = "page up" if compare["$lastKey" "20736"];then set letter = "page down" if compare["$lastKey" "18432"];then set letter = "up arrow" if compare["$lastKey" "20480"];then set letter = "down arrow" if compare["$lastKey" "19200"];then set letter = "left arrow" if compare["$lastKey" "19712"];then set letter = "right arrow" return # # EOF # Any ideas on how I can get this working with set password???? I plan on hiding the files from prying eyes (at least I hope to - LOL) Thanks in advance......... JohnSteven
  18. Hi Whampoom, Thanks for the reply. I'll give that a try this evening and post back. I also came up with a solution by just putting a space between each format. I can't seem to find any tutorials on writing this type of script. Can you or someone else here point me towards some??? Thanks again...... JohnSteven
  19. C'mon folks. Is there anybody out there that can tell me what's wrong with this cdshell.ini file??? The date and time seem to be screwed up and I've tried fiddling with it for a while but am running up against a brick wall. Here is the first 39 lines of the file: boot: cls print "\n" print "Press Enter to boot from DVD... \n" getkey 5 boot 0x80 if $lastKey == key[enter]; then goto time # When no key found... goto boot # Function to display time of day time: set hour = $timeHour set ampm = "am" if $timeHour > 12; then set hour = $timeHour - 12 if $timeHour > 12; then set ampm = "pm" set time = "$hour:$timeMinute$ampm" # Function to display date date: set month = "n/a" if $dateMonth == 1; then set month = "Jan." if $dateMonth == 2; then set month = "Feb." if $dateMonth == 3; then set month = "Mar." if $dateMonth == 4; then set month = "Apr." if $dateMonth == 5; then set month = "May." if $dateMonth == 6; then set month = "Jun." if $dateMonth == 7; then set month = "Jul." if $dateMonth == 8; then set month = "Aug." if $dateMonth == 9; then set month = "Sep." if $dateMonth == 10; then set month = "Oct." if $dateMonth == 11; then set month = "Nov." if $dateMonth == 12; then set month = "Dec." set date = "$month$dateDay,$dateYear" # Printing the Interface menu: set textColor= color[grey on black] set boldColor= color[cyan on black] cls Any help would be appreciated. This may seem simple to some, but to a newb it's frustrating......... BTW, everything else works great, just the time/date screwup.......
  20. Hi all, Got my multi-boot DVD going and all works well with the exception of the time display on the graphical menu. My time shows up as: 9:$timeminutepm $month1 My date shows up as: 5-2004>- Other than that all works well. BTW, are there instructions on creating some of those nice looking boot menus with CDSHELL? If so, could someone post some links??? Thanks in advance......
×
×
  • Create New...