Advertisement
Guest User

FF Tone Creator

a guest
Jan 3rd, 2021
135
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 3.92 KB | None | 0 0
  1. @ECHO OFF
  2. title FF Tone Creator 1.0
  3. mode con:cols=75 lines=16
  4. color 4f
  5. cls
  6.  
  7. setlocal enabledelayedexpansion
  8.  
  9. REM ========== user input to get video duration
  10. ECHO.
  11. ECHO.
  12. ECHO.
  13. ECHO Type in video duration:
  14. set /p duration="    
  15.  
  16. REM ========== User input to get tone number
  17.  
  18. :create_tone
  19.  
  20. cls
  21. title Tone select
  22. color 70
  23. ECHO.
  24. ECHO.
  25. echo             Choose the number tone you want to create                      
  26. echo (0) = Zero
  27. echo (1) = One             (4) = Four              (7) = Seven            
  28. echo (2) = Two             (5) = Five              (8) = Eight    
  29. echo (3) = Three           (6) = Six               (9) = Nine
  30. echo.
  31. set /p op=Type option:
  32. if "%op%"=="1" goto one
  33. if "%op%"=="2" goto two
  34. if "%op%"=="3" goto three
  35. if "%op%"=="4" goto four
  36. if "%op%"=="5" goto five
  37. if "%op%"=="6" goto six
  38. if "%op%"=="7" goto seven
  39. if "%op%"=="8" goto eight
  40. if "%op%"=="9" goto nine
  41. if "%op%"=="0" goto zero
  42.  
  43. :one
  44. set frequency1=697
  45. set frequency2=1209
  46. set number=1
  47. goto previewFreqChoice
  48.  
  49. :two
  50. set frequency1=697
  51. set frequency2=1336
  52. set number=2
  53. goto previewFreqChoice
  54.  
  55. :three
  56. set frequency1=697
  57. set frequency2=1447
  58. set number=3
  59. goto previewFreqChoice
  60.  
  61. :four
  62. set frequency1=770
  63. set frequency2=1209
  64. set number=4
  65. goto previewFreqChoice
  66.  
  67. :five
  68. set frequency1=770
  69. set frequency2=1336
  70. set number=5
  71. goto previewFreqChoice
  72.  
  73. :six
  74. set frequency1=770
  75. set frequency2=1447
  76. set number=6
  77. goto previewFreqChoice
  78.  
  79. :seven
  80. set frequency1=852
  81. set frequency2=1209
  82. set number=7
  83. goto previewFreqChoice
  84.  
  85. :eight
  86. set frequency1=852
  87. set frequency2=1336
  88. set number=8
  89. goto previewFreqChoice
  90.  
  91. :nine
  92. set frequency1=852
  93. set frequency2=1447
  94. set number=9
  95. goto previewFreqChoice
  96.  
  97. :zero
  98. set frequency1=941
  99. set frequency2=1336
  100. set number=0
  101. goto previewFreqChoice
  102.  
  103.  
  104. :previewFreqChoice
  105. cls
  106. title Verify Tone
  107. color 4f
  108. ECHO.
  109. ECHO.
  110. ECHO.
  111. SET choice=
  112. SET /p choice1=Is %number% the tone your trying to make?  [Y/N]:
  113. IF NOT '%choice1%'=='' SET choice1=%choice1:~0,1%
  114. IF '%choice1%'=='Y' GOTO render
  115. IF '%choice1%'=='y' GOTO render
  116. IF '%choice1%'=='N' GOTO create_tone
  117. IF '%choice1%'=='n' GOTO create_tone
  118. IF '%choice1%'=='' GOTO preview_choice_freq
  119. ECHO "%choice1%" is not valid
  120.  
  121.  
  122. :preview_choice_freq
  123. ECHO.
  124. ECHO You have to type Y or N if this is correct number for your tone
  125. GOTO previewFreqChoice
  126. ECHO.
  127.  
  128. GOTO previewFreqChoice
  129.  
  130. REM  =========== finally render video and tone
  131. :render
  132. cls
  133. title Video Rendering
  134. color 70
  135. ECHO.
  136. ECHO.
  137. ECHO    Creating your video now ....
  138. ECHO.
  139.  
  140. set video=%number%_tone_%duration%_seconds.ts
  141.  
  142. bin\ffmpeg -hide_banner -loglevel 0 -f lavfi -i "smptebars=duration=%duration%:size=1280x720:rate=60000/1001" -f lavfi -i "sine=frequency=%frequency1%:sample_rate=48000:duration=%duration%" -f lavfi -i "sine=frequency=%frequency2%:sample_rate=48000:duration=%duration%" -filter_complex amerge -vf drawtext="fontfile=/Windows/Fonts/arial.ttf:\ timecode='00\:00\:00\:00':rate=60000/1001:fontsize=64:fontcolor='white':\ boxcolor=0x00000088:box=1:boxborderw=5:x=20:y=20" -c:v libx264 -b:v 6000k -c:a aac -b:a 128k -y "%video%"
  143.  
  144. :previewChoice
  145. cls
  146. title Video Preview
  147. color 4f
  148. ECHO.
  149. ECHO.
  150. ECHO.
  151. SET choice=
  152. SET /p choice=Do you want to preview the video before exiting [Y/N]:
  153. IF NOT '%choice%'=='' SET choice=%choice:~0,1%
  154. IF '%choice%'=='Y' GOTO yes
  155. IF '%choice%'=='y' GOTO yes
  156. IF '%choice%'=='N' GOTO no
  157. IF '%choice%'=='n' GOTO no
  158. IF '%choice%'=='' GOTO preview_choice
  159. ECHO "%choice%" is not valid
  160.  
  161.  
  162. :preview_choice
  163. ECHO.
  164. ECHO You have to type Y or N to preview or not
  165. GOTO previewChoice
  166. ECHO.
  167.  
  168. GOTO previewChoice
  169.  
  170. :yes
  171. REM play the preview we made
  172. bin\ffplay -hide_banner -loglevel 0 -i "%video%" -window_title "FF Preview Player 1.0 - Viewer (powered by FFPlay)" -x 640 -y 480  -sync audio -autoexit -exitonmousedown -autorotate
  173.  
  174. :no
  175. ECHO.
  176. ECHO Thank you this will close window will close in 3 seconds
  177. ECHO Goodbye
  178. ping localhost -n 3 >nul
  179.  
  180. exit
  181.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement