Easy Batch Generate/Merge COBRA ISO's Tool (Including OFW 4.55/4.60 ISO's + Swap Disc)

Discussion in 'Homebrew & Tools' started by SDeath, Nov 16, 2013.

  1. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    This tool can be used to:
    - Easily batch create game ISO's from other ISO's or rip folders, with IRD support for both.
    - Easily batch generate the Bypass ISO's and Bypass SwapDisc. That you can then burn to a BD-R disc.
    - Easily batch merge game ISO's either dumped using the COBRA Manager, or split with genps3iso.

    Make sure you read all the tips and instructions and make sure you understand them.

    Tips:
    - DON'T PUT ANY EBOOTS FROM GAMES OR FROM THE VAULT INTO THE SWAP FOLDER, THESE FILES ARE GENERATED FROM THE SOURCE ISO'S AND ARE NOT THE SAME AS NORMAL EBOOTS!!
    - DON'T CLOSE THE CMD WINDOW, IT STAYS BLACK BUT IS STILL RUNNING, OUTPUT IS DIVERTED TO THE TXT FILE!!
    - MAKE SURE THERE IS ENOUGH DISK SPACE FOR THE SOURCE AND ALSO THE CONVERTED ISO'S, DO THEM IN MULTIPLE BATCHES IF YOU DON'T HAVE ENOUGH SPACE.
    - For ISO to OFW 4.55/4.60 Bypass ISO make sure you enter the correct Game ID of the original disc you use as bootdisc in the PS3, for example: BLES01060.
    - The Full version contains all IRD and SWAP files released by the COBRA Team in the 2.2 update and the ones from my own game collection and DarkKitarist's.
    The light version contains none but if you downloaded the 2.2 bypass package from the COBRA Website they should be included so just copy them to their respective folders.
    - You will only need to burn the SWAP.ISO when the tool informs you in the end of the process, if the message doesn't appear you don't have to burn it again.
    - When merging see the screenshots below, make sure all split files for each game are in a separate folder (don't use spaces in file or folder names), the folder name will be used for the output iso.

    Instructions:
    - Download my Full package (recommended) or Light package and copy it in a location on the drive with enough disk space for the source files/ISO's and the resulting ISO's.

    ISO-TO-ISO
    - Download Daemon Tools Lite, and install it (use the green Download button below the table).
    - Setup Daemon tools and note down the drive letter assigned to the virtual drive.
    - Copy ISO files to the ISO folder.
    - If you want to use a IRD file to verify the ISO then make sure it has the exact same name as the ISO itself but with the ird extension and it is in the same folder as the ISO's. (the script will use IRD verification if the .ird file is found if not it will use normal ISO generation).
    - Run the Generate.exe.
    - Select option 1.
    - Enter the drive letter of Daemon tools, just the letter, i.e.: m
    - Enter y if you want to ONLY CHECK the ISO with the IRD no new ISO will be made, this is just to check possible errors with the ISO, enter n if you want to create a ISO.
    - Enter if you want to split the final ISO, for FAT32 select y for NTFS select n.
    - The tool will now convert all ISO's to new ISO's, see the txt files in the Converted folder for possible errors, if none remove them.
    DON'T CLOSE THE CMD WINDOW, IT STAYS BLACK BUT IS STILL RUNNING, OUTPUT IS DIVERTED TO THE TXT FILE!!
    - Copy the converted iso's to your HDD.

    FOLDER-TO-ISO
    - Copy the source folders to the Folders directory.
    - If you want to use a IRD file to verify the game folder then make sure it has the exact same name as the folder itself but with the ird extension and it is in the same folder as the folders not in the game folder itself but in the root of the Folder directory. (the script will use IRD verification if the .ird file is found if not it will use normal ISO generation).
    - Run the Generate.exe.
    - Select option 2.
    - Enter y if you want to ONLY CHECK the ISO with the IRD no new ISO will be made, this is just to check possible errors with the ISO, enter n if you want to create a ISO.
    - Enter if you want to split the final ISO, for FAT32 select y for NTFS select n.
    - The tool will now convert all ISO's to new ISO's, see the txt files in the Converted folder for possible errors, if none remove them.
    DON'T CLOSE THE CMD WINDOW, IT STAYS BLACK BUT IS STILL RUNNING, OUTPUT IS DIVERTED TO THE TXT FILE!!
    - Copy the converted iso's to your HDD.

    EXTRACT SWAP FILES AND CREATE SWAP DISC
    - If you downloaded the light version of this tool you need to make sure you copy the SWAP and the IRD's from the COBRA release in their respective folder in the TOOLS directory.
    - Run the Generate.exe.
    - Select option 3.
    - Select the PS3_GAMES folder on your external HDD or any other folder that will hold all your games.
    - If it's the first time you run this tool it will create the first Swap Disc for you, if new swap files are added from your games it will create a new Swap Disc and overwrite the other, the tool will let you know if you need to burn a new one. It will ask you for the game ID of the original supported bootdisc you will use, enter the correct game ID, i.e. BLES01060.
    - Follow the instructions if the tool created a new Swap Disc.
    - Run the tool again and now choose option 4, see the steps below.

    ISO TO OFW 4.55/4.60 BYPASS ISO
    - Copy ISO files to the ISO folder.
    - Run the Generate.exe.
    - Select option 4.
    - If you didn't create a first Swap Disc in the previous step then the tool will quit and ask you to run again with option 3.
    - If you created Swap Disc before the tool will start converting the ISO's to 4.55/4.60 Bypass ISO's, see the txt files in the Converted folder for possible errors, if none remove them.
    DON'T CLOSE THE CMD WINDOW, IT STAYS BLACK BUT IS STILL RUNNING, OUTPUT IS DIVERTED TO THE TXT FILE!!
    - Copy the converted iso's to your HDD and remove the old ones.

    MERGE ISO'S
    - Create a new subfolder (without spaces!!) in the folder SPLIT_ISO.
    - In the folder you just created cop the split iso files.
    - Run the Generate.exe.
    - Select option 5.
    - The tool will now convert all split ISO's to new full ISO's, see the txt files in the Converted folder for possible errors, if none remove them.
    DON'T CLOSE THE CMD WINDOW, IT STAYS BLACK BUT IS STILL RUNNING, OUTPUT IS DIVERTED TO THE TXT FILE!!
    - Copy the converted iso's to your HDD.

    Know issues:
    None

    Merge folder structure screenshot:
    [​IMG]
    Merged games screenshot:
    [​IMG]

    Instruction Video (OFW 4.55 Bypass not included but is self explanatory):
    http://youtu.be/8s7Wyv_YnjM

    Changelog:
    v2.2.1 21-08-2014 (dd-mm-yyyy):
    - Changed the naming convention to the same the COBRA Team uses for the swap converted iso's.

    v2.2 20-08-2014 (dd-mm-yyyy):
    - Updated to the latest version v2.2 firmware, v1.3 bypass files and genps3iso v2.5, released today by the COBRA Team.
    - Full Package includes 1574 IRD files and 7914 swap files.

    v2.0 28-02-2014 (dd-mm-yyyy):
    - Updated to latest version support files released today by the COBRA Team.
    - Added support for OFW 4.55 Bypass batch ISO creation.
    - Added support to generate the OFW 4.55 Bypass SwapDisc.
    - Added support to batch merge game ISO's either dumped using the new 1.6 COBRA Manager, or split with genps3iso.
    - Added Check to see if source folders are empty.
    - Generated a exe from the script.

    15-01-2014 (dd-mm-yyyy):
    - Updated to latest version support files released today by the COBRA Team.
    - Added support for dry run genps3ISO to check rip against IRD file.
    - Several improvements.
    - Output is now redirected to a txt file that will be created for each game so you can check the status in those files in the converted folder. You can delete these after that.

    17-11-2013 (dd-mm-yyyy):
    - Added folder-to-ISO support
    - waitTime removed, the script now waits until the ISO is mounted and then continues immediately.

    16-11-2013 (dd-mm-yyyy):
    - Initial release ISO-to-ISO

    Code:
    '--------------------------------------------------------------------------------------------------
    'Easy Batch Generate ISO's
    '--------------------------------------------------------------------------------------------------
    
    Dim arrFileLines()
    
    Sub Run(ByVal sFile)
        Dim shell
        Set shell = CreateObject("WScript.Shell")
        shell.Run Chr(34) & sFile & Chr(34), 1, true
        Set shell = Nothing
    End Sub
    
    Sub Merge(ByVal sFolder)
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	strFolder = ".\SPLIT_ISO\" & sFolder
    	Set objFolder = objFSO.GetFolder(strFolder)
    	If objFolder.Files.Count = 0 Then
    		MsgBox "No Split Game ISO's found in SPLIT_ISO\" & sFolder &" directory, program will proceed with next game or quit!",,"Nothing found"
    		Exit Sub
    	End If
    
    	Dim shell
    	Set shell = CreateObject("WScript.Shell")
    	shell.Run "cmd /c dir .\SPLIT_ISO\" & sFolder & " /b > files.txt", 1, true
    	Set shell = Nothing
    
    	i = 0
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	Set objFile = objFSO.OpenTextFile("./files.txt", 1)
    	Do Until objFile.AtEndOfStream
         	Redim Preserve arrFileLines(i)
         	arrFileLines(i) = objFile.ReadLine
         	i = i + 1
    	Loop
    	objFile.Close
    	objFSO.DeleteFile "./files.txt"
    
    	l = 0
    	input = ".\SPLIT_ISO\" & sFolder & "\" & arrFileLines(l)
    	For l = 1 to Ubound(arrFileLines) Step 1
    		input = input & "+" & ".\SPLIT_ISO\" & sFolder & "\" & arrFileLines(l)
    	Next
    
    	output = ".\CONVERTED\" & sFolder & ".iso"
    	status = " > "& Chr(34) & ".\Converted\" & sFolder & ".txt" & Chr(34)
    	strCmd = "cmd /c copy /b " & input & " " & output & status
    	'MsgBox "This is the command: " & strCmd
    	Set shell = CreateObject("WScript.Shell")
    	shell.Run strCmd, 1, true
    	Set shell = Nothing
    End Sub
    
    Function SelectFolder( myStartFolder )
         Dim objFolder, objItem, objShell
         
         On Error Resume Next
         SelectFolder = vbNull
    
         Set objShell  = CreateObject( "Shell.Application" )
         Set objFolder = objShell.BrowseForFolder( 0, "Select Game Folder", 0, myStartFolder )
         If IsObject( objfolder ) Then SelectFolder = objFolder.Self.Path
    
         Set objFolder = Nothing
         Set objshell  = Nothing
         On Error Goto 0
    End Function
    
    Choice = InputBox("Enter one of the four options below (1, 2, 3, 4 or 5)" & chr(10) & chr(10) & "1 - ISO to ISO" & chr(10) & "2 - Folder to ISO" & chr(10) & "3 - Extract Swap files and Create Swap Disc" & chr(10) & "4 - ISO to 4.55/4.60 Bypass ISO" & chr(10) & "5 - Merge ISO's","Enter 1, 2, 3, 4 or 5")
    Select Case Choice
    Case 1
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	strFolder = ".\ISO\"
    	Set objFolder = objFSO.GetFolder(strFolder)
    	If objFolder.Files.Count = 0 Then
    		MsgBox "No Game ISO's found in ISO directory, program will quit!",,"Nothing found"
    		WScript.Quit
    	End If
    
    	Dim shell
    	Set shell = CreateObject("WScript.Shell")
    	shell.Run "cmd /c dir .\ISO /b > files.txt", 1, true
    	Set shell = Nothing
    
    	i = 0
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	Set objFile = objFSO.OpenTextFile("./files.txt", 1)
    	Do Until objFile.AtEndOfStream
    	     Redim Preserve arrFileLines(i)
    	     arrFileLines(i) = objFile.ReadLine
    	     i = i + 1
    	Loop
    	objFile.Close
    	objFSO.DeleteFile "./files.txt"
    	drive = InputBox("Please enter Daemon tools drive letter" & chr(10) & "(just the letter) :","Input virtual drive letter")
    	If drive = "" then WScript.Quit
    	drive = drive & ":\ "
    
    	answer = InputBox("Only check the files against IRD" & chr(10) & "(No iso will be made, check .txt file for result)" & chr(10) & "(y or n) :","Check against IRD?")
    	If answer = "y" Then
    	    dryRun = " -d "
    	ElseIf answer = "n" Then
    	    dryRun = " "
    	Else
    	    dryRun = " "
    	End If
    
    	If dryRun = " -d " Then
    		isoSplit = " "
    		MsgBox "DON'T CLOSE THE BLACK COMMANDLINE WINDOWS, CLICK OK TO CONFIRM YOU READ THIS",,"DON'T CLOSE"
    		For l = LBound(arrFileLines) to Ubound(arrFileLines) Step 1
    		If objFSO.GetExtensionName(arrFileLines(l)) = "iso" Then
    		    ird = LEFT(arrFileLines(l), (LEN(arrFileLines(l))-4))
    		    status = " > "& Chr(34) & ".\Converted\" & ird & ".txt" & Chr(34)
    		    ird = ".\ISO\" & ird & ".ird"
    		    Run ".\ISO\" & arrFileLines(l)
    		    path = ird
    		    If objFSO.FileExists(path) Then
    		    	output = Chr(34) & ".\Converted\" & arrFileLines(l) & " (IRD)" & Chr(34)
    		        ird = " " & Chr(34) & ird & Chr(34)
    		        strCmd = "cmd /c .\TOOLS\genps3iso.exe" & dryRun & isoSplit & drive & output & ird & status
    		    Else
    		        strCmd = "cmd /c echo No IRD Present For This Game >>" & Chr(34) & ".\Converted\" & arrFileLines(l) & ".txt" & Chr(34)
    		    End If
    		    Set shell = CreateObject("WScript.Shell")
    		    shell.Run strCmd, 1, true
    		    Set shell = Nothing	 	    
    		Else
    		End If
    		Next
    	Else
    		answer = InputBox("Split iso? (y or n) :","Split ISO?")
    		If answer = "y" Then
    			isoSplit = " -s "
    		ElseIf answer = "n" Then
    			isoSplit = " "
    		Else
    			isoSplit = " "
    		End If
    		MsgBox "DON'T CLOSE THE BLACK COMMANDLINE WINDOWS, CLICK OK TO CONFIRM YOU READ THIS",,"DON'T CLOSE"
    		For l = LBound(arrFileLines) to Ubound(arrFileLines) Step 1
    		If objFSO.GetExtensionName(arrFileLines(l)) = "iso" Then
    		    ird = LEFT(arrFileLines(l), (LEN(arrFileLines(l))-4))
    		    status = " > "& Chr(34) & ".\Converted\" & ird & ".txt" & Chr(34)
    		    ird = ".\ISO\" & ird & ".ird"
    		    Run ".\ISO\" & arrFileLines(l)
    		    path = ird
    		    If objFSO.FileExists(path) Then
    		    	output = Chr(34) & ".\Converted\" & arrFileLines(l) & " (IRD)" & Chr(34)
    		        ird = " " & Chr(34) & ird & Chr(34)
    		        strCmd = "cmd /c .\TOOLS\genps3iso.exe" & dryRun & isoSplit & drive & output & ird & status
    		    Else
    			output = Chr(34) & ".\Converted\" & arrFileLines(l) & Chr(34)
    		        strCmd = "cmd /c .\TOOLS\genps3iso.exe" & dryRun & isoSplit & drive & output & status
    		    End If
    	 	    Set shell = CreateObject("WScript.Shell")
    		    shell.Run strCmd, 1, true
    		    Set shell = Nothing
    		Else
    		End If
    		Next
    	End If
    	MsgBox "All conversions have been completed, see the CONVERTED folder.",,"Done"
    Case 2
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	strFolder = ".\FOLDERS\"
    	Set objFolder = objFSO.GetFolder(strFolder)
    	If objFolder.Subfolders.Count = 0 Then
    		MsgBox "No Game Folders found in FOLDERS directory, program will quit!",,"Nothing found"
    		WScript.Quit
    	End If
    	
    	Set shell = CreateObject("WScript.Shell")
    	shell.Run "cmd /c dir .\Folders /ad /b > folders.txt", 1, true
    	Set shell = Nothing
    
    	i = 0
    	Set objFile = objFSO.OpenTextFile("./folders.txt", 1)
    	Do Until objFile.AtEndOfStream
    	     Redim Preserve arrFileLines(i)
    	     arrFileLines(i) = objFile.ReadLine
    	     i = i + 1
    	Loop
    	objFile.Close
    	objFSO.DeleteFile "./folders.txt"
    
    	answer = InputBox("Only check the files against IRD" & chr(10) & "(No iso will be made, check .txt file for result)" & chr(10) & "(y or n) :","Check against IRD?")
    	If answer = "y" Then
    	    dryRun = " -d "
    	ElseIf answer = "n" Then
    	    dryRun = " "
    	Else
    	    dryRun = " "
    	End If
    
    	If dryRun = " -d " Then
    		isoSplit = " "
    		MsgBox "DON'T CLOSE THE BLACK COMMANDLINE WINDOWS, CLICK OK TO CONFIRM YOU READ THIS",,"DON'T CLOSE"
    		For l = LBound(arrFileLines) to Ubound(arrFileLines) Step 1
    		    input = Chr(34) & ".\Folders\" & arrFileLines(l) & Chr(34) & " "
    		    output = Chr(34) & ".\Converted\" & arrFileLines(l) & ".iso" & Chr(34)
    		    ird = ".\Folders\" & arrFileLines(l) & ".ird"
    		    status = " > "& Chr(34) & ".\Converted\" & arrFileLines(l) & ".txt" & Chr(34)
    		    path = ird
    		    If objFSO.FileExists(path) Then
    		        ird = " " & Chr(34) & ird & Chr(34)
    		    	output = Chr(34) & ".\Converted\" & arrFileLines(l) & " (IRD)" & ".iso" & Chr(34)
    		        strCmd = "cmd /c .\TOOLS\genps3iso.exe" & dryRun & isoSplit & input & output & ird & status
    		    Else
    		        strCmd = "cmd /c echo No IRD Present For This Game >>" & Chr(34) & ".\Converted\" & arrFileLines(l) & ".txt" & Chr(34)
    		    End If
    		    Set shell = CreateObject("WScript.Shell")
    		    shell.Run strCmd, 1, true
    		    Set shell = Nothing
    		Next
    	Else
    		answer = InputBox("Split iso? (y or n) :","Split ISO?")
    		If answer = "y" Then
    			isoSplit = " -s "
    		ElseIf answer = "n" Then
    			isoSplit = " "
    		Else
    			isoSplit = " "
    		End If
    		MsgBox "DON'T CLOSE THE BLACK COMMANDLINE WINDOWS, CLICK OK TO CONFIRM YOU READ THIS",,"DON'T CLOSE"
    		For l = LBound(arrFileLines) to Ubound(arrFileLines) Step 1
    		    input = Chr(34) & ".\Folders\" & arrFileLines(l) & Chr(34) & " "
    		    output = Chr(34) & ".\Converted\" & arrFileLines(l) & ".iso" & Chr(34)
    		    ird = ".\Folders\" & arrFileLines(l) & ".ird"
    		    status = " > "& Chr(34) & ".\Converted\" & arrFileLines(l) & ".txt" & Chr(34)
    		    path = ird
    		    If objFSO.FileExists(path) Then
    		        ird = " " & Chr(34) & ird & Chr(34)
    		    	output = Chr(34) & ".\Converted\" & arrFileLines(l) & " (IRD)" & ".iso" & Chr(34)
    		        strCmd = "cmd /c .\TOOLS\genps3iso.exe" & dryRun & isoSplit & input & output & ird & status
    		    Else
    			output = Chr(34) & ".\Converted\" & arrFileLines(l) & ".iso" & Chr(34)
    		        strCmd = "cmd /c .\TOOLS\genps3iso.exe" & dryRun & isoSplit & input & output & status
    		    End If
    		    Set shell = CreateObject("WScript.Shell")
    		    shell.Run strCmd, 1, true
    		    Set shell = Nothing
    		Next
    	End If
    	MsgBox "All conversions have been completed, see the CONVERTED folder.",,"Done"
    Case 3
    	Dim strPath
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	NewSwap = 0
    
     	strPath = SelectFolder( "" )
     	If strPath = vbNull Then
         		WScript.Echo "Cancelled."
    		WScript.Quit
     	End If
    	
    	If Len(strPath) > 3 Then
    		strPath = Chr(34) & strPath & Chr(34)
    	End If
    	Set DataFolder = objFSO.GetFolder(".\TOOLS\SWAP\") 
     	Set DataFiles = DataFolder.Files 
     	NumberOfFilesBefore = DataFiles.Count
    	status = " > "& Chr(34) & ".\TOOLS\extractps3eboots.txt" & Chr(34)
    	'strCmd = "cmd /c .\TOOLS\extractps3swapfiles.exe " & strPath & " .\TOOLS\SWAP\" & status
    	strCmd = "cmd /c .\TOOLS\extractps3swapfiles.exe " & strPath & " .\TOOLS\SWAP\"
    	Set shell = CreateObject("WScript.Shell")
    	shell.Run strCmd, 1, true
    	Set shell = Nothing
     	NumberOfFilesAfter = DataFiles.Count
    	
    	SwapDiscPath = ".\TOOLS\SWAP_DISC\SWAP.ISO"
    	If NumberOfFilesBefore <> NumberOfFilesAfter Then
    		NewSwap = 1
    	ElseIf Not objFSO.FileExists(SwapDiscPath) Then
    		NewSwap = 1
    	End If
    	If NewSwap = 1 Then
    		Do Until GameID <> ""
    			GameID = InputBox("Enter the Game ID of the original disc it's important they match (example: BLES01060):","Input GameID")
    		Loop
    		GameID = Replace(GameID,"-","")
    		GameID = Replace(GameID," ","")
    		ird = ".\TOOLS\IRD\" & GameID & ".ird"
    		If objFSO.FileExists(ird) Then
    			status = " > "& Chr(34) & ".\TOOLS\genps3swapdisc.txt" & Chr(34)
    			'strCmd = "cmd /c .\TOOLS\genps3swapdisc.exe .\TOOLS\SWAP\ .\TOOLS\SWAP_DISC\SWAP.ISO .\TOOLS\IRD\" & GameID & ".ird" & status
    			strCmd = "cmd /c .\TOOLS\genps3swapdisc.exe .\TOOLS\SWAP\ .\TOOLS\SWAP_DISC\SWAP.ISO .\TOOLS\IRD\" & GameID & ".ird"
    			Set shell = CreateObject("WScript.Shell")
    			shell.Run strCmd, 1, true
    			Set shell = Nothing
    		Else
    			MsgBox "No IRD found for this original Disc, you cannot use this disc as Bootdisc, try another.",,"No IRD found"
    			WScript.Quit
    		End If
    	End If
    	If NewSwap = 1 Then
    		MsgBox "Burn the SWAP.ISO in folder \TOOLS\SWAP_DISC\ with ImgBurn as image-to-disc to a Single Layer BD-R disc." & chr(10) & "Now follow the instructions in the Anti-ODE Security Bypass Manual to the letter."& chr(10) & "Run the program again and use option 4 to convert the game iso's.",,"Burn SWAP.ISO"
    	Else
    		MsgBox "No new Swap disc has been created, run the program again and use option 4 to convert the game iso's.",,"No new swap disc"
    	End if
    case 4
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	SwapDiscPath = ".\TOOLS\SWAP_DISC\SWAP.ISO"
    	If Not objFSO.FileExists(SwapDiscPath) Then
    		MsgBox "Swap disc not found in path: .\TOOLS\SWAP_DISC\SWAP.ISO, run option 3 first, the program will now end!",,"Nothing found"
    		WScript.Quit
    	End If
    
    	strFolder = ".\ISO\"
    	Set objFolder = objFSO.GetFolder(strFolder)
    	If objFolder.Files.Count = 0 Then
    		MsgBox "No Game ISO's found in ISO directory, program will quit!",,"Nothing found"
    		WScript.Quit
    	End If
    
    	Set shell = CreateObject("WScript.Shell")
    	shell.Run "cmd /c dir .\ISO /b > files.txt", 1, true
    	Set shell = Nothing
    	i = 0
    	Set objFile = objFSO.OpenTextFile("./files.txt", 1)
    	Do Until objFile.AtEndOfStream
    	     Redim Preserve arrFileLines(i)
    	     arrFileLines(i) = objFile.ReadLine
    	     i = i + 1
    	Loop
    	objFile.Close
    	objFSO.DeleteFile "./files.txt"
    
    	MsgBox "DON'T CLOSE THE BLACK COMMANDLINE WINDOWS, CLICK OK TO CONFIRM YOU READ THIS",,"DON'T CLOSE"
    	For l = LBound(arrFileLines) to Ubound(arrFileLines) Step 1
    	If objFSO.GetExtensionName(arrFileLines(l)) = "iso" Then
    		input = Chr(34) & ".\ISO\" & arrFileLines(l) & Chr(34) & " "
    		output = LEFT(arrFileLines(l), (LEN(arrFileLines(l))-4))
    		status = " > "& Chr(34) & ".\Converted\" & output & ".swap" & ".txt" & Chr(34)
    		If arrFileLines(l) = "manager.iso" Then
    			status = " > "& Chr(34) & ".\Converted\" & output & ".txt" & Chr(34)
    		End If
    		output = Chr(34) & ".\Converted\" & output & ".swap" & ".iso" & Chr(34) & " "
    		If arrFileLines(l) = "manager.iso" Then
    			output = Chr(34) & ".\Converted\" & output & ".iso" & Chr(34) & " "
    		End If
    		swap = ".\TOOLS\SWAP_DISC\SWAP.ISO"
    		strCmd = "cmd /c .\TOOLS\convertps3iso.exe " & input & output & swap & status
    		Set shell = CreateObject("WScript.Shell")
    		shell.Run strCmd, 1, true
    		Set shell = Nothing
    	Else
    	End If
    	Next
    	MsgBox "All conversions have been completed, see the CONVERTED folder.",,"Done"
    Case 5
    	Set objFSO = CreateObject("Scripting.FileSystemObject")
    	strFolder = ".\SPLIT_ISO\"
    	Set objFolder = objFSO.GetFolder(strFolder)
    	If objFolder.Subfolders.Count = 0 Then
    		MsgBox "No Game Folders found in SPLIT_ISO directory, program will quit!",,"Nothing found"
    		WScript.Quit
    	End If
    	
    	Set shell = CreateObject("WScript.Shell")
    	shell.Run "cmd /c dir .\SPLIT_ISO /ad /b > folders.txt", 1, true
    	Set shell = Nothing
    
    	i = 0
    	Set objFile = objFSO.OpenTextFile("./folders.txt", 1)
    	Do Until objFile.AtEndOfStream
    		Redim Preserve arrFolderLines(i)
    		arrFolderLines(i) = objFile.ReadLine
    		i = i + 1
    	Loop
    	objFile.Close
    	objFSO.DeleteFile "./folders.txt"
    
    	MsgBox "DON'T CLOSE THE BLACK COMMANDLINE WINDOWS, CLICK OK TO CONFIRM YOU READ THIS",,"DON'T CLOSE"
    	For j = Lbound(arrFolderLines) to Ubound(arrFolderLines) Step 1
    		Merge arrFolderLines(j)
    	Next
    
    	MsgBox "All merges have been completed, see the CONVERTED folder.",,"Done"
    Case else
    	WScript.Quit
    End Select
     
    Last edited by a moderator: Dec 30, 2014
    Sunny020, Dolle, shaunbonnr and 11 others like this.
  2. 22
    0
    0
    Olivier Et Erica

    Olivier Et Erica New Member Loyal Member

    Joined:
    Oct 7, 2013
    You are good man. I was going to request a tutorial on how to make smooth runing 1:1 original iso.
    I spent 2 hours last night trying to figure out how to ird check iso without success.
    Btw cobra-ode.Com took off v2.3 and mcu 1.7. All you can get is the GenPS3iso v2.1
     
  3. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    My tutorial is more meant for going from iso's to iso's So from non IRD to IRD or the other way around.
    IRD iso's have quite a hit on performance and will cause lack and stutter on some games.
    I use IRD to verify all files and replace the ones that fail IRD verificaition. After that you can use my script and get them all back to non IRD iso's. But not at least you are sure the files are original.
    I'm sure you can modify the script to get it to run to create iso's too, but the source will always be different and you need to make sure the folder structure is correct.
    It's easier to create them initially manually using genps3iso and IRD verification.

    On the cobra-ode.com website you can now download MCU 1.8 that I have tested for the team after the initial 1.7 problems.
    And has been running fine.
    genps3iso 2.3 I have also been using for the last couple of days, but there is still 1 bug I think, see my initial post.

    I wil be working on the option to batch generate from folder to iso too soon.

    Hi guys I added game folder support as well to the package so you can now also use it for creating iso's from the source folders.
    It's now a complete iso batch creation package.
    waitTime removed, the script now waits until the iso is mounted and then continues immediately.

    Instruction video added to the first post.

    Have fun with it.
    Let me know if you run into any issues with the script itself.
     
  4. 37
    1
    0
    yomen9

    yomen9 New Member Loyal Member

    Joined:
    Nov 1, 2013
    Hi SDeath,
    When i'm searching an specific ird file for a game in ps3boot.com, for example a ird for this game : BLES01705-[BioShock Infinite]
    I find many result, but I don't know wich one is the good, because they got number at end that are messing me up, this is what I find :
    BLES01705.ird
    BLES01705_327.ird
    BLES01705_1074.ird
    BLES01705_1215.ird

    I don't know wich one is the one that I need to download, that why I'm really confused, some help would be appreciated.
    Also, sorry for my bad English, I hope you understood
     
  5. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    Download them all and see if the filesize is the same if so just choose one it doesn't matter probably.
    If there are differences it's basically the same choose one and if it fails try another.
     
  6. 37
    1
    0
    yomen9

    yomen9 New Member Loyal Member

    Joined:
    Nov 1, 2013
    I tried them all and genps3.iso tell me that the filesize was not okey for all the file exept one, and the one it didn't tell me that, it tell me that it was an invalid ird and something like an input error... Do you have any idear?
     
  7. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    And for which file did it say the size was not correct? I'm pretty sure that file is not original and needs to be replace for a original file.
    The results genps3iso gives are files inside the game that are modified and not original or missing.
     
  8. 94
    4
    0
    ivota

    ivota New Member Loyal Member

    Joined:
    Sep 27, 2013
    Thank you SDeath
     
  9. 26
    0
    0
    Hellgun

    Hellgun New Member Loyal Member

    Joined:
    Oct 14, 2013
    SDeath, How important is it to IRD verify the .ISOs?

    and your script, after verify a .ISO file it generates another one without IRD?
     
  10. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    Well it depends how paranoid you are. Freddy is gaming online and before release dates with ird unverified iso's without a ban for months. If you want to be sure all files are there and original ird verify and then rebuild the iso without ird for max performance. Ird has it's uses to check all files are present in the rip. That's my main reason I use it.
    Best thing to do is create the iso wirh ird and after that copy the iso's from the converted filder to the iso folder and remove any ird files. Then run the script again and you are done. The iso is ird verfified but build without for best performance.

    My script will generate any iso for the COBRA ODE, folder to iso, iso to iso and with or without ird. If the ird is there it will create a ird build iso if not it will create a ird unverified iso. Easy as that.
    You will have to use my script twice if you want ird verified but build without for max performance. So first with ird then without.
     
  11. 7
    0
    0
    Ankarali

    Ankarali New Member Loyal Member

    Joined:
    Nov 11, 2013
    Sdeath, can you contact me please?
    I cant send you a pm.
     
  12. 26
    0
    0
    Hellgun

    Hellgun New Member Loyal Member

    Joined:
    Oct 14, 2013
    i will try to use your script. let's see if i understood everything.
     
  13. 38
    0
    0
    enzo729

    enzo729 New Member Loyal Member

    Joined:
    Nov 16, 2013
    Well this would explain why all the video cutscenes in MGS HD collection were stuttering.

    I'll look into this, so basically I find a copy of the IRD File for my game, run the script. Check and see if everything verifies and without errors. Then remove the IRD file and run it again to make an ISO without the IRD files. This makes sure that all game files are present but removes the encryption removing any performance hits like stuttering.

    Is this all pretty much correct?
     
  14. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    Spot on.
    You can also use isotools to verify the files without building but requires more time and knowledge of the software.
     
  15. 38
    0
    0
    enzo729

    enzo729 New Member Loyal Member

    Joined:
    Nov 16, 2013
    PS3
    |
    ||MGS HD COLLECTION
    ||
    |||BLUS-XXXX

    Which one of these folders would I put the IRD file into?
     
  16. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    If you download my package you will have 3 folders: iso, folders and converted.
    Games that are in iso format you place in iso and name the ird the same as the iso but only with the ird extension.
    Games that you have as folders you place in the folders directory and name the ird the same as the game folder with ird extension and place it in the folders directory alongside the game folder. See the instruction video to make things clear both ways are shown.
     
  17. 38
    0
    0
    enzo729

    enzo729 New Member Loyal Member

    Joined:
    Nov 16, 2013
    Cool, will do. When I get home tonight I'll try it out. *Digital High Five*
     
  18. 4,823
    863
    0
    SDeath

    SDeath Maxconsole Forum Moderator Staff Member Clean-Up Crew

    Joined:
    Jul 2, 2013
    ;-)
    Bedtime here. Bye!
     
  19. 38
    0
    0
    enzo729

    enzo729 New Member Loyal Member

    Joined:
    Nov 16, 2013
    So it turns out I don't have an IRD file for my MGS HD collection, the video cutscenes are still stuttering though. How should I go about fixing that?
     
  20. 17
    0
    0
    Trevor Lazar

    Trevor Lazar New Member Loyal Member

    Joined:
    Nov 16, 2013
    so im using your package and im creating an ISO of COD Black ops 2 with ird. i ran it and got a bunch of modification warnings. does this matter when i try to play the game? the folder im trying to convert is a direct dump from my disc btw.
     

Share This Page