xboxscene.org forums

Author Topic: Game Copy Script  (Read 304 times)

jcupp114

  • Archived User
  • Full Member
  • *
  • Posts: 237
Game Copy Script
« on: September 20, 2005, 09:28:00 PM »

Here is a script I have been playing with... Needs someone to pick at it to get it to function. The Idea is to let users place games within directories to organize it better. Help the code to be complete if you will. I will post my menu.xml file as well that will help this to be very nice. Thank you for your time.
CODE

  
     SET Edir "E:\\Games"
     SET Fdir "F:\\Games"
     SET Gdir "G:\\Games"
     Delay 1

     SET fight "\\Fighter\\"
     SET kid "\\Family\\"
     SET race "\\Racing\\"
     SET role "\\RPG\\"
     SET fire "\\Shooter\\"
     SET ball "\\Sports\\"
     Delay 1

     SET SomeVar "- $DVDType$"
     TrayClose
     Delay 9
   
     If %SomeVar% == "game disc" GOTO Launch
     If %SomeVar% == "game disc" GOTO begin

     :begin
     TrayOpen
     BeginDraw UseCurrent
     MessageBox "Choose to insert a Game to Copy$eol$Press A to Continue$eol$Press B to Cancel"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO APRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :APRESSED
     Trayclose
     Delay 9
     GOTO GameNote
   
     :BPRESSED
     TrayClose
     QUIT

     :GameNote
     BeginDraw UseCurrent
     MessageBox "Select the correct E: F: G: ..\Games\$eol$directory or game copy will fail$eol$Select correct drive\directory next..$eol$Press A to goto next..."
     EndDraw

     Input
     If %_GP_A% == "1" GOTO GameDir
     Quit

     :GameDir
     BeginDraw UseCurrent
     MessageBox "Press A to use E:\Games directory$eol$Press X to use F:\Games directory$eol$Press Y to use G:\Games directory$eol$Press B to Cancel"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO D1OPT
     If %_GP_B% == "1" GOTO BPRESSED
     If %_GP_X% == "1" GOTO D2OPT
     If %_GP_Y% == "1" GOTO D3OPT
     QUIT

     :D1OPT
     %Edir%
     GOTO GameType1
     
     :D2OPT
     %Fdir%
     GOTO GameType1

     :D3OPT
     %Gdir%
     GOTO GameType1     

     :GameType1
     BeginDraw UseCurrent
     MessageBox "Select a game type directory$eol$To organize you game copies into$eol$\fighter\family\race\rpg\shooter\sports$eol$Press A to goto next..."
     EndDraw
   
     Input
     If %_GP_A% == "1" GOTO GameType2
     Quit

     :GameType2
     BeginDraw UseCurrent
     MessageBox "Press A to copy to \Fighter\$eol$Press X to copy to \Family\$eol$Press Y to copy to \Racing\$eol$Press B to goto more choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO G1USED
     If %_GP_B% == "1" GOTO GameType3
     If %_GP_X% == "1" GOTO G2USED
     If %_GP_Y% == "1" GOTO G3USED
     QUIT

     :G1USED
     %fight%
     GOTO Launch

     :G1USED
     %kid%
     GOTO Launch

     :G1USED
     %race%
     GOTO Launch

     :GameType3
     BeginDraw UseCurrent
     MessageBox "Press A to copy to \RPG\$eol$Press X to copy to \Shooter\$eol$Press Y to copy to \Sports\$eol$Press B to goback to past choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO G4USED
     If %_GP_B% == "1" GOTO GameType2
     If %_GP_X% == "1" GOTO G5USED
     If %_GP_Y% == "1" GOTO G6USED
     QUIT

     :G4USED
     %role%
     GOTO WriteConfig

     :G5USED
     %fire%
     GOTO WriteConfig

     :G6USED
     %ball%
     GOTO WriteConfig

This is where I have stopped and got confused.... Anyone want to finish this up??? Post back your thoughts or code!!!

     :Launch
                     SETFUNC DVDTitle XBETITLE D:\default.xbe
     SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe
    
     BeginDraw UseCurrent
     MessageBox "Press A to copy to E:\Games\fighting\%DVDTitle%$eol$Press X to copy to E:\Games\kids\%DVDTitle%$eol$Press Y to copy to E:\Games\racing\%DVDTitle%$eol$Press B to Cancel"
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO A3PRESSED
     If %_GP_B% == "1" GOTO A4PRESSED
     If %_GP_X% == "1" GOTO A5PRESSED
     If %_GP_Y% == "1" GOTO BPRESSED
     QUIT

     :A3PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to E:\Games\%DVDTitle%"
     EndDraw

     MKDIR E:\Games\%DVDTITLE%
     Copy D:\ E:\Games\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO A6PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :A4PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to F:\Games\%DVDTitle%"
     EndDraw
     MKDIR F:\Games\%DVDTITLE%
     Copy D:\ F:\Games\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto F:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A6PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :A5PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to G:\Games\%DVDTitle%"
     EndDraw
     MKDIR G:\Games\%DVDTITLE%
     Copy D:\ G:\Games\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto G:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw
   
     Input
     If %_GP_A% == "1" GOTO A6PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT
  
     :A6PRESSED
     Trayclose
     Reboot
     QUIT
  



jcupp114
Logged

jcupp114

  • Archived User
  • Full Member
  • *
  • Posts: 237
Game Copy Script
« Reply #1 on: September 25, 2005, 12:54:00 AM »

Does anyone have any thoughts on this??
Take care
jcupp114
Logged

jcupp114

  • Archived User
  • Full Member
  • *
  • Posts: 237
Game Copy Script
« Reply #2 on: September 28, 2005, 03:56:00 PM »

I revamped the code yet it still gives me an error message. Can anyone work this out?
CODE

  
     SET SomeVar "- $DVDType$"
     TrayClose
     Delay 10
   
     If %SomeVar% == "game disc" GOTO Launch
     If %SomeVar% == "game disc" GOTO begin

     :begin
     TrayOpen
     BeginDraw UseCurrent
     MessageBox "Choose to insert a Game to Copy$eol$Press A to Continue$eol$Press B to Cancel"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO APRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :APRESSED
     Trayclose
     Delay 10
     GOTO Launch
   
     :BPRESSED
     TrayClose
     QUIT

     :Launch
     BeginDraw UseCurrent
     MessageBox "Press A to use E:\Games directory$eol$Press X to use F:\Games directory$eol$Press Y to use G:\Games directory$eol$Press B to Cancel"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO GameType2
     If %_GP_B% == "1" GOTO BPRESSED
     If %_GP_X% == "1" GOTO GameType4
     If %_GP_Y% == "1" GOTO GameType6
     QUIT

     :GameType2
                  SETFUNC DVDTitle XBETITLE D:\default.xbe
     SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

     BeginDraw UseCurrent
     MessageBox "Press A to copy to E:\Games\Fighter\%DVDTitle%$eol$Press X to copy to E:\Games\Family\%DVDTitle%$eol$Press Y to copy to E:\Games\Racing\%DVDTitle%$eol$Press B to goto more choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO A3PRESSED
     If %_GP_B% == "1" GOTO GameType3
     If %_GP_X% == "1" GOTO A4PRESSED
     If %_GP_Y% == "1" GOTO A5PRESSED
     QUIT

     :A3PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to E:\Games\fighter\%DVDTitle%"
     EndDraw
     MKDIR E:\Games\Fighter\%DVDTITLE%
     Copy D:\ E:\Games\Fighter\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :A4PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to E:\Games\Family\%DVDTitle%"
     EndDraw
     MKDIR E:\Games\Family\%DVDTITLE%
     Copy D:\ E:\Games\Family\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :A5PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to E:\Games\Racing\%DVDTitle%"
     EndDraw
     MKDIR E:\Games\Racing\%DVDTITLE%
     Copy D:\ E:\Games\Racing\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw
   
     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT
  
     :GameType3
                  SETFUNC DVDTitle XBETITLE D:\default.xbe
     SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

     BeginDraw UseCurrent
     MessageBox "Press A to copy to E:\Games\RPG\%DVDTitle%$eol$Press X to copy to E:\Games\Shooter\%DVDTitle%$eol$Press Y to copy to E:\Games\Sports\%DVDTitle%$eol$Press B to goback to past choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO A6PRESSED
     If %_GP_B% == "1" GOTO GameType2
     If %_GP_X% == "1" GOTO A7PRESSED
     If %_GP_Y% == "1" GOTO A8PRESSED
     QUIT


     :A6PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to E:\Games\RPG\%DVDTitle%"
     EndDraw
     MKDIR E:\Games\RPG\%DVDTITLE%
     Copy D:\ E:\Games\RPG\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :A7PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to E:\Games\Shooter\%DVDTitle%"
     EndDraw
     MKDIR E:\Games\Shooter\%DVDTITLE%
     Copy D:\ E:\Games\Shooter\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :A8PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to E:\Games\Sports\%DVDTitle%"
     EndDraw
     MKDIR E:\Games\Sports\%DVDTITLE%
     Copy D:\ E:\Games\Sports\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :GameType4
                  SETFUNC DVDTitle XBETITLE D:\default.xbe
     SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

     BeginDraw UseCurrent
     MessageBox "Press A to copy to F:\Games\Fighter\%DVDTitle%$eol$Press X to copy to F:\Games\Family\%DVDTitle%$eol$Press Y to copy to F:\Games\Racing\%DVDTitle%$eol$Press B to goto more choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO B3PRESSED
     If %_GP_B% == "1" GOTO GameType5
     If %_GP_X% == "1" GOTO B4PRESSED
     If %_GP_Y% == "1" GOTO B5PRESSED
     QUIT

     :B3PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to F:\Games\Fighter\%DVDTitle%"
     EndDraw

     MKDIR F:\Games\Fighter\%DVDTITLE%
     Copy D:\ F:\Games\Fighter\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto F:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :B4PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to F:\Games\Family\%DVDTitle%"
     EndDraw
     MKDIR F:\Games\Family\%DVDTITLE%
     Copy D:\ F:\Games\Family\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto F:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :B5PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to F:\Games\Racing\%DVDTitle%"
     EndDraw
     MKDIR F:\Games\Racing\%DVDTITLE%
     Copy D:\ F:\Games\Racing\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto F:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw
   
     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT
  
     :GameType5
                  SETFUNC DVDTitle XBETITLE D:\default.xbe
     SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

     BeginDraw UseCurrent
     MessageBox "Press A to copy to F:\Games\RPG\%DVDTitle%$eol$Press X to copy to F:\Games\Shooter\%DVDTitle%$eol$Press Y to copy to F:\Games\Sports\%DVDTitle%$eol$Press B to goback to past choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO B6PRESSED
     If %_GP_B% == "1" GOTO GameType4
     If %_GP_X% == "1" GOTO A7PRESSED
     If %_GP_Y% == "1" GOTO A8PRESSED
     QUIT


     :B6PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to F:\Games\RPG\%DVDTitle%"
     EndDraw
     MKDIR F:\Games\RPG\%DVDTITLE%
     Copy D:\ F:\Games\RPG\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto F:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :B7PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to F:\Games\Shooter\%DVDTitle%"
     EndDraw
     MKDIR F:\Games\Shooter\%DVDTITLE%
     Copy D:\ F:\Games\Shooter\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto F:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :B8PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to F:\Games\Sports\%DVDTitle%"
     EndDraw
     MKDIR F:\Games\Sports\%DVDTITLE%
     Copy D:\ F:\Games\Sports\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto F:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :GameType6
                  SETFUNC DVDTitle XBETITLE D:\default.xbe
     SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

     BeginDraw UseCurrent
     MessageBox "Press A to copy to G:\Games\Fighter\%DVDTitle%$eol$Press X to copy to G:\Games\Family\%DVDTitle%$eol$Press Y to copy to G:\Games\Racing\%DVDTitle%$eol$Press B to goto more choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO C3PRESSED
     If %_GP_B% == "1" GOTO GameType7
     If %_GP_X% == "1" GOTO C4PRESSED
     If %_GP_Y% == "1" GOTO C5PRESSED
     QUIT

     :C3PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to G:\Games\Fighter\%DVDTitle%"
     EndDraw

     MKDIR G:\Games\Fighter\%DVDTITLE%
     Copy D:\ G:\Games\Fighter\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto G:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :C4PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to G:\Games\Family\%DVDTitle%"
     EndDraw
     MKDIR G:\Games\Family\%DVDTITLE%
     Copy D:\ G:\Games\Family\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto G:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :C5PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to G:\Games\Racing\%DVDTitle%"
     EndDraw
     MKDIR G:\Games\Racing\%DVDTITLE%
     Copy D:\ G:\Games\Racing\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto G:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw
   
     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT
  
     :GameType7
                  SETFUNC DVDTitle XBETITLE D:\default.xbe
     SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

     BeginDraw UseCurrent
     MessageBox "Press A to copy to G:\Games\RPG\%DVDTitle%$eol$Press X to copy to G:\Games\Shooter\%DVDTitle%$eol$Press Y to copy to G:\Games\Sports\%DVDTitle%$eol$Press B to goback to past choices..."
     EndDraw
     
     Input
     If %_GP_A% == "1" GOTO B6PRESSED
     If %_GP_B% == "1" GOTO GameType6
     If %_GP_X% == "1" GOTO A7PRESSED
     If %_GP_Y% == "1" GOTO A8PRESSED
     QUIT


     :C6PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to G:\Games\RPG\%DVDTitle%"
     EndDraw
     MKDIR G:\Games\RPG\%DVDTITLE%
     Copy D:\ G:\Games\RPG\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto G:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :C7PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to G:\Games\Shooter\%DVDTitle%"
     EndDraw
     MKDIR G:\Games\Shooter\%DVDTITLE%
     Copy D:\ G:\Games\Shooter\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto G:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :C8PRESSED
     BeginDraw UseCurrent
     MessageBox "Dvd/Game is Copying$eol$to G:\Games\Sports\%DVDTitle%"
     EndDraw
     MKDIR G:\Games\Sports\%DVDTITLE%
     Copy D:\ G:\Games\Sports\%DVDTITLE%
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto G:\Games to launch$eol$Will now reset MenuCache"
     EndDraw
     TrayOpen
     Delay 7
     ResetMenuCache
  
     BeginDraw UseCurrent
     MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press B to Reboot later"
     EndDraw   

     Input
     If %_GP_A% == "1" GOTO A9PRESSED
     If %_GP_B% == "1" GOTO BPRESSED
     QUIT

     :A9PRESSED
     Trayclose
     Reboot
     QUIT
  



Take care Jcupp114
Logged

jcupp114

  • Archived User
  • Full Member
  • *
  • Posts: 237
Game Copy Script
« Reply #3 on: September 29, 2005, 10:11:00 PM »

Well noone has looked into this i guess yet I will post back.
Here is a script for game copy into a catagory:
[CODE]
      <ActionScript name="MXMCopy">
         SET SomeVar $DVDType$
         TrayClose
         Delay 10
   
         If %SomeVar% == "game disc" GOTO Launch
         If %SomeVar% == "game disc" GOTO begin

         :begin
         TrayOpen
         BeginDraw UseCurrent
         MessageBox "Choose to insert a Game to Copy$eol$Press A to Continue$eol$Press BACK to Cancel"
         EndDraw

         Input
           If %_GP_A% == "1" GOTO APRESSED
           If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :APRESSED
         Trayclose
         Delay 10
         GOTO Launch
   
         :BPRESSED
         TrayClose
         QUIT

         :Launch
                     SETFUNC DVDTitle XBETITLE D:\DEFAULT.XBE
         SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

         BeginDraw UseCurrent
           MessageBox "A_copies to\\Family\\ | X_copies to\\Fighter\\$eol$Y_copies to\\Racing\\ | B_copies to\\RolePlay\\$eol$White_copies to\\Shooter\\ | Black_copies to\\Sports\\$eol$Press BACK to exit."
         EndDraw
         
         Input
         If %_GP_A% == "1" GOTO A1PRESSED
         If %_GP_X% == "1" GOTO A2PRESSED
         If %_GP_Y% == "1" GOTO A3PRESSED
         If %_GP_B% == "1" GOTO A4PRESSED
         If %_GP_WHITE% == "1" GOTO A5PRESSED
         If %_GP_BLACK% == "1" GOTO A6PRESSED
         If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :A1PRESSED
         BeginDraw UseCurrent
           MessageBox "Dvd/Game is Copying$eol$to E:\Games\Family\%DVDTitle%"
         EndDraw
         MKDIR E:\Games\Family
         Copy D:\ E:\Games\Family\%DVDTITLE%
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
         EndDraw
         TrayOpen
         Delay 7
         ResetMenuCache
      
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press BACK to Reboot later"
         EndDraw   

         Input
         If %_GP_A% == "1" GOTO A7PRESSED
         If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :A2PRESSED
         BeginDraw UseCurrent
           MessageBox "Dvd/Game is Copying to$eol$E:\Games\Fighter\%DVDTitle%"
         EndDraw
         MKDIR E:\Games\Fighter
         Copy D:\ E:\Games\Fighter\%DVDTITLE%
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
         EndDraw
         TrayOpen
         Delay 7
         ResetMenuCache
      
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press BACK to Reboot later"
         EndDraw

         Input
         If %_GP_A% == "1" GOTO A7PRESSED
         If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :A3PRESSED
         BeginDraw UseCurrent
           MessageBox "Dvd/Game is Copying to$eol$E:\\Games\\Racing\\%DVDTitle%"
         EndDraw
         MKDIR E:\Games\Racing
         Copy D:\ E:\Games\Racing\%DVDTITLE%
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
         EndDraw
         TrayOpen
         Delay 7
         ResetMenuCache
      
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press BACK to Reboot later"
         EndDraw
   
         Input
         If %_GP_A% == "1" GOTO A7PRESSED
         If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :A4PRESSED
         BeginDraw UseCurrent
           MessageBox "Dvd/Game is Copying$eol$to E:\Games\Roleplay\%DVDTitle%"
         EndDraw
         MKDIR E:\Games\RolePlay
         Copy D:\ E:\Games\RolePlay\%DVDTITLE%
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
         EndDraw
         TrayOpen
         Delay 7
         ResetMenuCache
      
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press BACK to Reboot later"
         EndDraw   

         Input
         If %_GP_A% == "1" GOTO A7PRESSED
         If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :A5PRESSED
         BeginDraw UseCurrent
           MessageBox "Dvd/Game is Copying$eol$to E:\Games\Shooter\%DVDTitle%"
         EndDraw
         MKDIR E:\Games\Shooter
         Copy D:\ E:\Games\Shooter\%DVDTITLE%
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
         EndDraw
         TrayOpen
         Delay 7
         ResetMenuCache
      
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press BACK to Reboot later"
         EndDraw   

         Input
         If %_GP_A% == "1" GOTO A7PRESSED
         If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :A6PRESSED
         BeginDraw UseCurrent
           MessageBox "Dvd/Game is Copying$eol$to E:\Games\Sports\%DVDTitle%"
         EndDraw
         MKDIR E:\Games\Sports
         Copy D:\ E:\Games\Sports\%DVDTITLE%
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% has:%DVDSIZE%MBs$eol$Goto E:\Games to launch$eol$Will now reset MenuCache"
         EndDraw
         TrayOpen
         Delay 7
         ResetMenuCache
      
         BeginDraw UseCurrent
           MessageBox "%DVDTitle% is finished$eol$Press A to Reboot$eol$Press BACK to Reboot later"
         EndDraw   

         Input
         If %_GP_A% == "1" GOTO A7PRESSED
         If %_GP_BACK% == "1" GOTO BPRESSED
         QUIT

         :A7PRESSED
         Trayclose
         Reboot
         QUIT
      </ActionScript>
[CODE]
hope you like it.
the B gives me a fit so if someone wants to look into that.
Notice this is for the E: drive.
I will post more as they come
Take care
Jcupp114
Logged

chilin_dude

  • Archived User
  • Hero Member
  • *
  • Posts: 3068
Game Copy Script
« Reply #4 on: September 30, 2005, 09:47:00 AM »

Hi,
good to see you got it working - I'm sorry I couldn't help - I'm not very good at scripting or anything, I tried to reply to your PM but the site went for 'maintenence!'
Logged

jcupp114

  • Archived User
  • Full Member
  • *
  • Posts: 237
Game Copy Script
« Reply #5 on: September 30, 2005, 04:32:00 PM »

Its cool.
Mmmm has anyone else though or have scripts that they would like to share?
Take care
jcupp114
Logged