43 lines
1.0 KiB
Batchfile
43 lines
1.0 KiB
Batchfile
|
@echo Tap2Shc is running...
|
||
|
|
@rem open console, change to directory
|
||
|
|
@rem and start batch with "Tap2shc FILENAM" (without .wav)
|
||
|
|
@rem FileToOpen needed: http://www.horstmuc.de/win/wfile.zip
|
||
|
|
@echo off
|
||
|
|
if not exist GetFName.cmd (
|
||
|
|
%~d0
|
||
|
|
cd %~dp0
|
||
|
|
)
|
||
|
|
call SHARPSET
|
||
|
|
set fnamex=.tap
|
||
|
|
set fnamedp=%TAPDIR%\
|
||
|
|
set fnamen=%1
|
||
|
|
set fnamef=%fnamedp%%fnamen%%fnamex%
|
||
|
|
|
||
|
|
Rem Note: Filenames with 1-7 characters are recommended!
|
||
|
|
if not exist %fnamef% call GetFName %fnamedp% "*%fnamex%" "%1"
|
||
|
|
if not exist %fnamef% (
|
||
|
|
echo Error: File %fnamef% does not exist! - Ctrl+C
|
||
|
|
goto end
|
||
|
|
)
|
||
|
|
|
||
|
|
if errorlevel 1 goto end
|
||
|
|
rem pause
|
||
|
|
echo.
|
||
|
|
|
||
|
|
rem @echo on
|
||
|
|
wav2bin --type=shc --tap --pc=%SHARPC% %fnamef% %BASDIR%\%fnamen%.SHC -l 0x40 %2 %3
|
||
|
|
@echo off
|
||
|
|
rem -l 0x840 -l 0xC0 -l 0x2001 -l 0x0400 --type=rsv
|
||
|
|
if errorlevel 9 goto skip1
|
||
|
|
if errorlevel 1 goto end
|
||
|
|
:skip1
|
||
|
|
echo ---------------------------------------------
|
||
|
|
echo.
|
||
|
|
echo Please read the messages above!
|
||
|
|
pause
|
||
|
|
|
||
|
|
start %HEDITOR% %BASDIR%\%fnamen%.SHC
|
||
|
|
goto :EOF
|
||
|
|
:end
|
||
|
|
pause
|