Dr Brain wrote: |
I've been considering making a wav to wa2 converter. As an added bonus, I'd probably throw in bmp to bm2. |
Cerium wrote: |
Didnt you know? wa2 files are compressed, have superior sound quality, and cannot be read by the RIAA. These are the files of the future bak; MP3s are soon to be replaced.
Also, the source is so complicated I was forced to delete it as soon as I compiled the project, for fear it might fall into the wrong hands (like the RIAA). |
Cerium wrote: |
Heres a converter you can use to take those wav files and make wa2 files out of them... |
Code: Show/Hide @echo off
cls ::Author: Donkano ::E-Mail: god.donkano@gmail.com ::Domain: http://digital-vortech.ath.cx/ echo WARNING! echo Only press a button when prompted to. echo If you are prompted, this program will explain what it is asking for. echo. :start echo -- Options -- echo 1 = Wav to Wa2 echo 2 = Wa2 to Wav echo 3 = Bmp to Bm2 echo 4 = Bm2 to Bmp :: [Start] Get Converstion Method Option SETLOCAL SET action_vbs=%TEMP%\~tmp.VBS SET action_cmd=%TEMP%\~tmp.cmd ECHO Set oFS=CreateObject("Scripting.FileSystemObject")>%action_vbs% ECHO oFS.OpenTextFile("CON",2).Write "Input an operation integer: ">>%action_vbs% ECHO S=%1(Trim(oFS.OpenTextFile("CON",1).Readline))>>%action_vbs% ECHO oFS.CreateTextFile("%action_cmd%",2).Write "set action_input=">>%action_vbs% ECHO oFS.OpenTextFile("%action_cmd%",8).Write S>>%action_vbs% cscript.exe //nologo %action_vbs% CALL %action_cmd% DEL %action_vbs% DEL %action_cmd% SET action_input ENDLOCAL & SET action_input=%action_input% :: [End] Get Converstion Method Option echo. pause echo. echo Set "dir_input" as [directory] echo WITHOUT the filename. Make sure it has a trailing "\". echo Ex: C:\Program Files\Continuum\Edit\Convert\WB-Converter\ echo Ex: [C:\Program Files\Continuum\Edit\WB-Converter]\ echo Ex: C:\Program Files\Continuum\WB-Converter\ echo Ex: [C:\Program Files\Continuum\Convert\WB-Converter]\ :: [Start] Get Directory Name SETLOCAL SET dir_vbs=%TEMP%\~tmp.VBS SET dir_cmd=%TEMP%\~tmp.cmd ECHO Set oFS=CreateObject("Scripting.FileSystemObject")>%dir_vbs% ECHO oFS.OpenTextFile("CON",2).Write "Input directory of file: ">>%dir_vbs% ECHO S=%1(Trim(oFS.OpenTextFile("CON",1).Readline))>>%dir_vbs% ECHO oFS.CreateTextFile("%dir_cmd%",2).Write "set dir_input=">>%dir_vbs% ECHO oFS.OpenTextFile("%dir_cmd%",8).Write S>>%dir_vbs% cscript.exe //nologo %dir_vbs% CALL %dir_cmd% DEL %dir_vbs% DEL %dir_cmd% SET dir_input ENDLOCAL & SET dir_input=%dir_input% :: [End] Get Directory Name echo. pause echo. echo Do NOT include the extension of the file. :: [Start] Get Filename SETLOCAL SET file_vbs=%TEMP%\~tmp.VBS SET file_cmd=%TEMP%\~tmp.cmd ECHO Set oFS=CreateObject("Scripting.FileSystemObject")>%file_vbs% ECHO oFS.OpenTextFile("CON",2).Write "Input name of file to be converted: ">>%file_vbs% ECHO S=%1(Trim(oFS.OpenTextFile("CON",1).Readline))>>%file_vbs% ECHO oFS.CreateTextFile("%file_cmd%",2).Write "set file_input=">>%file_vbs% ECHO oFS.OpenTextFile("%file_cmd%",8).Write S>>%file_vbs% cscript.exe //nologo %file_vbs% CALL %file_cmd% DEL %file_vbs% DEL %file_cmd% SET file_input ENDLOCAL & SET file_input=%file_input% :: [End] Get Filename if %action_input%==4 (goto four) if %action_input%==3 (goto three) if %action_input%==2 (goto two) if %action_input%==1 (goto one) cls echo WARNING! echo Only press a button when prompted to. echo If you are prompted, this program will explain what it is asking for. echo. echo Error! echo You have input an unexpected value for "action_input". echo Program restarted. echo. goto start :one :: Wav to Wa2 if exist %dir_input%%dir_input%.Wav (ren "%dir_input%%file_input%.Wav" %file_input%.Wa2) else echo %dir_input%%file_input%.Wav is not a file. if exist %dir_input%%file_input%.Wa2 (echo File converted successfully.) else echo Program failed to convert %dir_input%%file_input%.Wav goto end :two :: Wa2 to Wav if exist %dir_input%%file_input%.Wa2 (ren "%dir_input%%file_input%.Wa2" %file_input%.Wav) else echo %dir_input%%file_input%.Wa2 is not a file. if exist %dir_input%%file_input%.Wav (echo File converted successfully.) else echo Program failed to convert %dir_input%%file_input%.Wa2 goto end :three :: Bmp to Bm2 if exist %dir_input%%file_input%.Bmp (ren "%dir_input%%file_input%.Bmp" %file_input%.Bm2) else echo %dir_input%%file_input%.Bmp is not a file. if exist %dir_input%%file_input%.Bm2 (echo File converted successfully.) else echo Program failed to convert %dir_input%%file_input%.Bmp goto end :four :: Bm2 to Bmp if exist %dir_input%%file_input%.Bm2 (ren "%dir_input%%file_input%.Bm2" %file_input%.Bmp) else echo %dir_input%%file_input%.Bm2 is not a file. if exist %dir_input%%file_input%.Bmp (echo File converted successfully.) else echo Program failed to convert %dir_input%%file_input%.Bm2 :end echo You have reached the end of the program. Press any key to exit. pause exit |
Cerium wrote: |
Didnt you know? wa2 files are compressed, have superior sound quality, and cannot be read by the RIAA. These are the files of the future bak; MP3s are soon to be replaced.
Also, the source is so complicated I was forced to delete it as soon as I compiled the project, for fear it might fall into the wrong hands (like the RIAA). |
Love.Dog. wrote: |
[..]
Ok wait.... If you are saying wa2's are better. That means: bm2 files are more compressed than bmp files and bm2s have more picture quality than bmp.s? |
Donkano wrote: |
Cyan~Fire, I am. |