CODE
<ActionScript name="MXMCopy">
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
</ActionScript>
jcupp114