API tools faq
paste
Advertisement
WannaGet

GETPap

WannaGet
Aug 10th, 2015
247
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 59.94 KB | None | 0 0
raw download clone embed print report
  1. ::(x): checks version string in bat "C:\Program Files Portable\get_iplayer\GET-IPLAYER - x86+64.bat". Offers to overwrite if different.
  2. ::(w): remove empty subfolders in Get-Iplayer folder on desktop & "C:\downloads\media"
  3. ::(v): removed some issue here. No issues.
  4. ::(u): skip catagory as this no longer works.
  5. ::(t): installation adds shortcut to 'GET-IPLAYER - x86+64.bat' on desktop with icon & maximised window. Adds the choice to add too.
  6. ::(s): added %hide% to download string. Now only matches not in recording history will attempt to download by default.
  7. ::(r): added --whitespace to download string. Underscores on downloaded files now replaced by spaces.
  8. ::(q): history off by default
  9. ::(p): remove empty Get-Iplayer folder on desktop.
  10. ::(o): using forced downloading when a download fails saves your choices & skips questions. For example; what you wanna watch, download folder etc.
  11. ::(P): history can be switched on & off.
  12. ::(n): reverted (m). MOVE failed when destination folder exists.
  13. ::(m): reverted mistake. Using MOVE to usb (R:\) as it failed. Only use MOVE to desktop.
  14. ::(l): Resize window to 50 lines when downloading only (if NOT "!dip!"=="--fields=pid"). Leaves window large for matching PID downloads.
  15. ::(k): set more lines when %Pap% not empty, as some programs have many results.
  16. ::(j): use MOVE instead of Robocopy when downloading to desktop.
  17. ::(i): trimmed some bits around deleting partial downloads before & after streaming.
  18. ::(h): remove '&' when choosing catagory with if NOT "!tttt!"=="" set tttt=%tttt:&=%
  19. ::(g): removed two echo commands left in by mistake.
  20. ::(f): fixed blank entry at start not working using: if NOT "!Pap!"=="" set Pap=%Pap:"=%
  21. ::(e): fixed download folder input not working at start using: set Pap=%Pap:"=%
  22. ::(d): trim leading & trailing whitespace from all user input using CALL to subroutine.
  23. ::(c): trim leading & trailing whitespace from user input at start (Pap) & download (earh).
  24. ::(b): wrap quotes around earh if words only. Eg. No quotes for PID or NUMBERS. Avoids downloading all programs matching each word. Only the string of words is matched & downloaded.
  25. ::(a): set lines to 9999 for full list search.
  26. ::TO DO  : set window size according to resolution.
  27. ::TO DO  : checks ffmepg.exe process - if running skips rtmpdump.exe process check. Caused issues when tried.
  28. ::TO DO  : checks rtmpdump.exe process & waits to download.
  29. ::TO DO  : Fix failure [unexpected truth at this time] when forced re-downloading of multiple worded title after a failed download. PID's & codes work.
  30. ::TO DO  : Add PVR commands. Unfinished/barely started. Ideally set pvr & create task in task scheduler. Perhaps ask user when task to be run & be able to change time run & delete task etc.
  31. ::TO DO  : Forced downloading should set history on as you only need force a previously downloaded program.
  32. ::TO DO  : if more than one instance of get-iplayer.bat running check rtmpdump process, if running wait to stream. therefore programs could be queued.
  33. ::TO DO  : Maybe use config file to set default settings or use start of [GET-IPLAYER - x86+64.bat] so an extra file not needed.
  34. ::TO DO  : Use of PID codes from the start.
  35. ::TO DO  : Deal with ampersands inputted.
  36. ::TO DO  : Add option to open text file of tv, radio or podcast cache when searching full list - Maybe use list to search results
  37. ::TO DO  : Add question: if destination folder (R:/Video) not exist ask for path of folder then check answered folder if exist set the variable to answer. Else repeat.
  38. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  39. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  40. :::::::::::::::::::======================================================::::::::::::::::::::::::::
  41. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  42. :::::::::::::::::::    This Batch File Is To Be Used With Get-IPlayer    ::::::::::::::::::::::::::
  43. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  44. :::::::::::::::::::Get-IPlayer Downloads Streams From The IPlayer Website::::::::::::::::::::::::::
  45. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  46. :::::::::::::::::::======================================================::::::::::::::::::::::::::
  47. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  48. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  49. @echo off
  50. setlocal enabledelayedexpansion
  51. ::(x):S
  52. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::batup
  53. ::::::::::::Overwrite "C:\Program Files Portable\get_iplayer\GET-IPLAYER - x86+64.bat":::::::::::::
  54. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  55. if not exist "C:\Program Files Portable\get_iplayer\GET-IPLAYER - x86+64.bat" goto :noneed
  56. findstr /m "04Px" "C:\Program Files Portable\get_iplayer\GET-IPLAYER - x86+64.bat">nul
  57. if %errorlevel%==0 goto :noneed
  58. :batup
  59. echo.&echo.&echo.
  60. set batup=
  61. set /p batup=: Would You Like To Update The GET-IPLAYER - x86+64.bat Y or N?
  62. set whitespace=%batup%
  63. setlocal enabledelayedexpansion
  64. call :whitespac
  65. set batup=%whitespace%
  66. if /i "%batup%"=="" GOTO :batup
  67. if /i "%batup:~0,1%"=="Y" xcopy /y "GET-IPLAYER - x86+64.bat" "C:\Program Files Portable\get_iplayer\GET-IPLAYER - x86+64.bat"
  68. if /i "%batup:~0,1%"=="N" OK
  69. echo.&echo.&echo.
  70. set batup=
  71. :noneed
  72. ::(x):E
  73. echo.&echo.&echo Please Wait..
  74. set type=TV
  75. set hide=--hide
  76. ::(w):S
  77. pushd "%userprofile%\Desktop\Get-IPlayer" & for /f "usebackq delims=" %%d in (`"dir /ad/b/s | sort /R"`) do rd "%%d" >NUL 2>NUL
  78. pushd "C:\downloads\media" & for /f "usebackq delims=" %%d in (`"dir /ad/b/s | sort /R"`) do rd "%%d" >NUL 2>NUL
  79. pushd "%~dp0"
  80. ::(w):E
  81. @IF EXIST "%userprofile%\desktop\iPlayer Recordings" for /F %%N in ('dir /S/B "%userprofile%\Desktop\iPlayer Recordings" ^| find /V /C "::"') do (if %%N EQU 0 rd "%userprofile%\Desktop\iPlayer Recordings")
  82. @IF EXIST "%userprofile%\desktop\Get-IPlayer" for /F %%N in ('dir /S/B "%userprofile%\Desktop\Get-IPlayer" ^| find /V /C "::"') do (if %%N EQU 0 rd "%userprofile%\Desktop\Get-IPlayer")
  83. COLOR 0e
  84. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  85. :::::::::::::::::::::::::::::::::Determine Whether 32bit or 64bit::::::::::::::::::::::::::::::::::
  86. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  87. if exist "C:\Program Files (x86)" SET TBIT= (x86)
  88. :startA
  89. if not exist "C:\Program Files%TBIT%\get_iplayer\Uninst.exe" mode con cols=140&mode con lines=60&goto :DOWNLOADGET
  90. if exist "R:\GET-IPLAYER.txt" ATTRIB +H "R:\GET-IPLAYER.txt"
  91. :raddypodcst
  92. if not "%TBIT%"==" (x86)" goto :start
  93. echo.&echo.&echo.
  94. @Echo                              %DATE%
  95. if "%TBIT%"==" (x86)" goto :skipp
  96. GOTO :DOWNLOADGET
  97. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::START
  98. :START
  99. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  100. title Get-iPlayer
  101. mode con cols=140
  102. mode con lines=60
  103. COLOR 0E
  104. echo.|command /C date|find /i "current" >%temp%\dow.txt
  105. for /f "tokens=1-4 delims=/ " %%i in (%temp%\dow.txt) do set DOW=%%l
  106. echo.&echo.&echo.&echo                                            %TIME%&echo.
  107. IF "%DOW%" == "Sun" echo                                        %DATE% Sunday
  108. IF "%DOW%" == "Mon" echo                                         %DATE% Monday
  109. IF "%DOW%" == "Tue" echo                                        %DATE% Tuesday
  110. IF "%DOW%" == "Wed" echo                                       %DATE% Wednesday
  111. IF "%DOW%" == "Thu" echo                                       %DATE% Thursday
  112. IF "%DOW%" == "Fri" echo                                         %DATE% Friday
  113. IF "%DOW%" == "Sat" echo                                       %DATE% Saturday
  114.  
  115. GOTO :skippy
  116. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::skipp
  117. :skipp
  118. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  119. COLOR 0e
  120. mode con cols=140
  121. mode con lines=999
  122. echo.
  123. echo.
  124. echo.
  125.                             @Echo                              %DATE%
  126. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::skippy
  127. :skippy
  128. echo.&echo.&echo.
  129.                              echo  :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  130.     if "%forced%"=="--force" echo  :::::::::::::::::                     FORCED DOWNLOADING                     ::::::::::::::::::
  131.                              echo  :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  132.                              echo  :::::::::::::::::                                                            ::::::::::::::::::
  133.         if /i "%type%"=="tv" echo  :::::::04Px::::::                       - TELEVISION -                       ::::::::::::::::::
  134.      if /i "%type%"=="RADIO" echo  :::::::::::::::::                          - RADIO -                         ::::::::::::::::::
  135.    if /i "%type%"=="PODCAST" echo  :::::::::::::::::                         - PODCAST -                        ::::::::::::::::::
  136.                              ECHO  :::::::::::::::::                                                            ::::::::::::::::::
  137.                              echo  :::::::::::::::::   Leave blank, press enter to view the full program list   ::::::::::::::::::
  138. if not "%forced%"=="--force" echo  :::::::::::::::::                                                            ::::::::::::::::::
  139.                              echo  :::::::::::::::::     Maximise the window                                    ::::::::::::::::::
  140.                              echo  :::::::::::::::::     Use the scrollbar/mouse wheel to navigate the list     ::::::::::::::::::
  141.      if /i "%proggy%"=="rad" echo  :::::::::::::::::                                                            ::::::::::::::::::
  142.      if /i "%proggy%"=="pod" echo  :::::::::::::::::                                                            ::::::::::::::::::
  143.     if /i NOT "%type%"=="tv" echo  :::::::::::::::::                         - WARNING -                        ::::::::::::::::::
  144.      if /i "%proggy%"=="rad" echo  :::::::::::::::::                                                            ::::::::::::::::::
  145.      if /i "%proggy%"=="pod" echo  :::::::::::::::::                                                            ::::::::::::::::::
  146.      if /i "%proggy%"=="rad" echo  :::::::::::::::::                 RADIO HAS OVER 3000 PROGRAMS               ::::::::::::::::::
  147.      if /i "%proggy%"=="pod" echo  :::::::::::::::::                THERE ARE OVER 17,000 PODCASTS              ::::::::::::::::::
  148.      if /i "%proggy%"=="rad" echo  :::::::::::::::::         LEAVING THE ANSWER BLANK WILL TAKE SOME TIME       ::::::::::::::::::
  149.      if /i "%proggy%"=="pod" echo  :::::::::::::::::           LEAVING THE ANSWER BLANK WILL TAKE AN AGE        ::::::::::::::::::
  150.      if /i "%proggy%"=="rad" echo  :::::::::::::::::           ALSO THE FULL LIST WILL NOT BE VIEWABLE          ::::::::::::::::::
  151.      if /i "%proggy%"=="pod" echo  :::::::::::::::::            ALSO THE FULL LIST WILL NOT BE VIEWABLE         ::::::::::::::::::
  152.      if /i "%proggy%"=="rad" echo  :::::::::::::::::              SEARCH A CHANNEL IN THE NEXT STEP             ::::::::::::::::::
  153.      if /i "%proggy%"=="pod" echo  :::::::::::::::::               SEARCH A CHANNEL IN THE NEXT STEP            ::::::::::::::::::
  154.                              echo  :::::::::::::::::                                                            ::::::::::::::::::
  155.                             echo  :::::::::::::::::--- --- --- --- --- --- ---^> OR ^<--- --- --- --- --- --- ---::::::::::::::::::
  156.                              echo  :::::::::::::::::                                                            ::::::::::::::::::
  157.                              echo  :::::::::::::::::  1.Enter the title, part of the title or url               ::::::::::::::::::
  158.                            if "%Pap%"=="R" SET thistype=Enter P to search podcasts                              ::::::::::::::::::
  159.                            if "%Pap%"=="P" SET thistype=Enter R to search radio content                         ::::::::::::::::::
  160.     if /i NOT "%type%"=="tv" echo  :::::::::::::::::  2.%thistype%
  161.     if /i NOT "%type%"=="tv" echo  :::::::::::::::::  3.Enter T to search tv                                    ::::::::::::::::::
  162.         if /i "%type%"=="tv" echo  :::::::::::::::::  2.Enter R to search radio                                 ::::::::::::::::::
  163.         if /i "%type%"=="tv" echo  :::::::::::::::::  3.Enter P to search podcasts                              ::::::::::::::::::
  164.              if "%Pap%"=="A" ECHO  :::::::::::::::::  4.Enter PVR to search ^& set pvr recordings                ::::::::::::::::::
  165.              if "%Pap%"=="A" echo  :::::::::::::::::____________________________________________________________::::::::::::::::::
  166.              if "%Pap%"=="A" echo  :::::::::::::::::                                                            ::::::::::::::::::
  167.              if "%Pap%"=="A" ECHO  :::::::::::::::::  5.uSWF to update the SWF url                              ::::::::::::::::::
  168.              if "%Pap%"=="A" ECHO  :::::::::::::::::  6.GetD downloads ^& installs the latest version            ::::::::::::::::::
  169.              if "%Pap%"=="A" echo  :::::::::::::::::  7.GetU updates Get-Iplayer ^(needs admin^)                  ::::::::::::::::::
  170.              if "%Pap%"=="A" echo  :::::::::::::::::  8.Drag folder or enter its path to set download location  ::::::::::::::::::
  171.              if "%Pap%"=="A" echo  :::::::::::::::::  9.GetS adds shortcut to desktop for this batch file       ::::::::::::::::::
  172.                              echo  :::::::::::::::::                                                            ::::::::::::::::::
  173.                              echo  :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  174.          if NOT "%Pap%"=="A" ECHO  :::::::::::::::::  4.Enter A for more options                                ::::::::::::::::::
  175.                              echo  :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  176.          if NOT "%Pap%"=="A" echo  :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  177. echo.&echo.&echo.
  178. if "!NewPlace:~1,2!"==":\" ECHO                  Download folder: !NewPlace!
  179. echo.&echo.
  180. if "%forced%"=="--force" set agi= again
  181. if NOT "%forced%"=="--force" set agi=
  182. if /i "%type%"=="tv" SET show=What you wanna watch%agi% on the bbc
  183. if /i "%type%"=="RADIO" SET wma=,wma&set show=Which radio program do you want to search%agi%
  184. if /i "%type%"=="PODCAST" SET show=Which podcast would you like to search%agi%
  185. set Pap=
  186. ECHO                 %show% %USERNAME%?
  187. ECHO.
  188. set /p Pap=:                 
  189. if NOT "!Pap!"=="" set Pap=%Pap:"=%
  190. set whitespace=%Pap%
  191. setlocal enabledelayedexpansion
  192. call :whitespac
  193. set Pap=%whitespace%
  194. goto :whitespaceGONE
  195. :::::::::::::::Remove leading & trailing whitespace:::::::::::::dS
  196. :whitespac
  197. for /f "tokens=* delims= " %%a in ("%whitespace%") do set whitespace=%%a
  198. for /l %%a in (1,1,40) do if "!whitespace:~-1!"==" " set whitespace=!whitespace:~0,-1!
  199. goto :eof
  200. :::::::::::::::Remove leading & trailing whitespace:::::::::::::dE
  201. :whitespaceGONE
  202. if "!Pap!"=="" mode con lines=9999 cols=201&TITLE Full List Search&goto :hghg
  203. ::if "!Pap!"=="piD" SET dip=--fields=pid&goto :raddypodcst
  204. if "!Pap:~0,4!"=="http" SET DPLACE=from url&SET http=!Pap!&GOTO :HTTPPn
  205. SET Pap=%Pap:"=%
  206. if "!Pap!"=="PVR" echo                      %Pap% IS UNFINISHED&timeout /T 9 >nul&goto :raddypodcst
  207. if "!Pap!"=="R" SET type=RADIO&SET proggy=rad&goto :raddypodcst
  208. if "!Pap!"=="P" SET type=PODCAST&SET proggy=pod&goto :raddypodcst
  209. if "!Pap!"=="T" SET type=TV&SET proggy=&goto :raddypodcst
  210. if "!Pap!"=="A" SET A=NIMDA&goto :raddypodcst
  211. if /i "!Pap!"=="UsWF" GOTO :UPDATEGETSWF
  212. if /i "!Pap!"=="GetU" GOTO :UPDATEGET
  213. if /i "!Pap!"=="GetD" GOTO :DOWNLOADGET
  214. if /i "!Pap!"=="GetS" GOTO :install
  215. if exist "!Pap!" (2>nul pushd "!Pap!" && (popd&SET "NewPlace=!Pap!"&SET "!Pap!= "&GOTO :raddypodcst) || SET "!Pap!= "&GOTO :raddypodcst) else TITLE Will search for "!Pap!"
  216. if /i "!NewPlace:~1,2!"==":\" goto :herelass
  217. goto :hghg
  218. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::HTTPPn
  219. :HTTPPn
  220. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::gatahtt
  221. :gatahtt
  222. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  223. @if not exist "R:\GET-IPLAYER.txt" GOTO :HTTPP
  224. @echo.&echo.
  225. set FPLACE=
  226. set /p FPLACE=:                 Do you want it on PC or USB?
  227. set whitespace=%FPLACE%
  228. setlocal enabledelayedexpansion
  229. call :whitespac
  230. set FPLACE=%whitespace%
  231. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  232. ::::::::::::::::Asks If You Want To Download To USB If R:/GET-IPLAYER.txt Exists::::::::::::::::::::
  233. ::::::::::::::::                                                                ::::::::::::::::::::
  234. ::::::::::::::::  Assign a USB drive the letter R and create a text file named  ::::::::::::::::::::
  235. ::::::::::::::::         GET-IPLAYER in the ROOT Folder For This To Work        ::::::::::::::::::::
  236. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  237. echo.
  238. cls
  239. echo.
  240. echo.
  241. if /i "%FPLACE%"=="" goto :gatahtt
  242. if /i "%FPLACE:~0,1%"=="p" SET FPLACE=pc&goto :HTTPP
  243. if /i "%FPLACE:~0,1%"=="u" SET FPLACE=usb&goto :HTTPP
  244. if /i not "%FPLACE:~0,1%"=="p" goto :gatahtt
  245. if /i not "%FPLACE:~0,1%"=="u" goto :gatahtt
  246. goto :HTTPP
  247. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::herelass
  248. :herelass
  249. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::hghg
  250. :hghg
  251. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  252. if /i NOT "!Pap!"=="" GOTO :excatB
  253. TITLE Full List Search - Search Channel?
  254. echo.&echo.&echo.
  255. set onlycha=
  256. set /p onlycha=:               Would You like to search a channel? Y/N
  257. set whitespace=%onlycha%
  258. setlocal enabledelayedexpansion
  259. call :whitespac
  260. set onlycha=%whitespace%
  261. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  262. ::::::::::::::::Leave The Above "What You Wanna Search" Blank & This Question Occurs:::::::::::::::
  263. ::::::::::::::::                                                                    :::::::::::::::
  264. ::::::::::::::::  Asks You if You Want To Search Just One Channel Then Lists Them   :::::::::::::::
  265. ::::::::::::::::                                                                    :::::::::::::::
  266. ::::::::::::::::           Leave Blank & Press Enter To Skip This Step              :::::::::::::::
  267. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  268. if /i NOT "%onlycha%"=="Y" goto :inCh
  269. C: & cd "\Program Files%TBIT%\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer --list=channel --type=%type%
  270. echo.&echo.&echo.
  271. set /p chch=:                    Which Channel?
  272. if /i "%chch%"=="" SET chch=
  273. set whitespace=%chch%
  274. setlocal enabledelayedexpansion
  275. call :whitespac
  276. set chch=%whitespace%
  277. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::inCh
  278. :inCh
  279. :::::::::::::::(u):::::::::::::::S
  280. goto :excatB
  281. :::::::::::::::(u):::::::::::::::E
  282. cls
  283. TITLE Full List Search - Include Catagory?
  284. echo.&echo.&echo.
  285. set onlycat=
  286. set /p onlycat=:               Would You like to search a catagory? Y/N
  287. set whitespace=%onlycat%
  288. setlocal enabledelayedexpansion
  289. call :whitespac
  290. set onlycat=%whitespace%
  291. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  292. ::::::::::::::::Leave The Above "What You Wanna Search" Blank & This Question Occurs:::::::::::::::
  293. ::::::::::::::::                                                                    :::::::::::::::
  294. ::::::::::::::::  Asks You if You Want To Search Just One Catagory Then Lists Them  :::::::::::::::
  295. ::::::::::::::::                                                                    :::::::::::::::
  296. ::::::::::::::::           Leave Blank & Press Enter To Skip This Step              :::::::::::::::
  297. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  298. if /i NOT "%onlycat%"=="Y" goto :excatC
  299. SET kkkk=--category
  300. C: & cd "\Program Files%TBIT%\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer --list=categories --type=%type%
  301. echo.&echo.&echo.
  302. set /p tttt=:                    Which Catagory?
  303. if NOT "!tttt!"=="" set tttt=%tttt:&=%
  304. set whitespace=%tttt%
  305. setlocal enabledelayedexpansion
  306. call :whitespac
  307. set tttt=%whitespace%
  308. if /i "%tttt%"=="" SET tttt=
  309. if /i "%tttt%"=="" SET nnnn=
  310. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::excatC
  311. :excatC
  312. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  313. cls
  314. TITLE Full List Search - Exclude Catagory?
  315. echo.&echo.&echo.
  316. if /i "!Pap!"=="" set /p excat=:                     Exclude Catagory From Listing? Y/N
  317. set whitespace=%excat%
  318. setlocal enabledelayedexpansion
  319. call :whitespac
  320. set excat=%whitespace%
  321. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  322. :::::::::::::Leave The Above "What You Wanna Search" Blank & This Question Occurs Too::::::::::::::
  323. :::::::::::::                                                                        ::::::::::::::
  324. :::::::::::::     Asks You if You Want To Exclude Just One Catagory From The List    ::::::::::::::
  325. :::::::::::::                                                                        ::::::::::::::
  326. :::::::::::::              Leave Blank & Press Enter To Skip This Step               ::::::::::::::
  327. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  328. if /i NOT "%excat%"=="Y" goto :excatB
  329. SET nnnn=--exclude-category
  330. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::excatBAB
  331. :excatBAB
  332. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  333. C: & cd "\Program Files%TBIT%\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer --list=categories --type=%type%
  334. echo.&echo.&echo.
  335. set /p excatchoice=:                     Which Catagory?
  336. if NOT "!excatchoice!"=="" set excatchoice=%excatchoice:&=%
  337. set whitespace=%excatchoice%
  338. setlocal enabledelayedexpansion
  339. call :whitespac
  340. set excatchoice=%whitespace%
  341. if /i "%excatchoice%"=="" SET excatchoice=
  342. if /i "%excatchoice%"=="" SET nnnn=
  343. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::excatB
  344. :excatB
  345. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  346. cls
  347. echo.
  348. echo.
  349. echo.
  350. TITLE Name Download Folder
  351. ::if /i "!Pap!"=="" goto :flchoice
  352. echo                      What Do You Want To Name The Download Folder?
  353. echo.
  354. set DPLACE=
  355. set /p DPLACE=:          
  356.  
  357. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::--------------------
  358. if NOT "!DPLACE!"=="" set DPLACE=%DPLACE:&=%
  359. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::--------------------
  360.  
  361. set whitespace=%DPLACE%
  362. setlocal enabledelayedexpansion
  363. call :whitespac
  364. set DPLACE=%whitespace%
  365. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  366. :::::::::::::::::::::::Asks You What You Want To Name The Download Directory:::::::::::::::::::::::
  367. ::::::::::::::::::::::                                                       ::::::::::::::::::::::
  368. ::::::::::::::::::::::  LEAVE BLANK & PRESS ENTER. IT WILL USE 1 OF 3 NAMES  ::::::::::::::::::::::
  369. ::::::::::::::::::::::                                                       ::::::::::::::::::::::
  370. ::::::::::::::::::::::1.Program title searched                               ::::::::::::::::::::::
  371. ::::::::::::::::::::::2.Program list number(s)                               ::::::::::::::::::::::
  372. ::::::::::::::::::::::3.Program pid code(s)                                  ::::::::::::::::::::::
  373. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::flchoice
  374. :flchoice
  375. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  376. echo.
  377. echo                                            ....
  378. echo                                        ____________
  379. echo                                    ____________________
  380. echo                                        ____________
  381. echo                                            ....
  382. echo.
  383. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::gataht
  384. :gataht
  385. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  386. @if not exist "R:\GET-IPLAYER.txt" GOTO :herelas
  387. set FPLACE=
  388. set /p FPLACE=:                 Do You Want It On PC or USB?
  389. set whitespace=%FPLACE%
  390. setlocal enabledelayedexpansion
  391. call :whitespac
  392. set FPLACE=%whitespace%
  393. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  394. ::::::::::::::::Asks If You Want To Download To USB If R:/GET-IPLAYER.txt Exists::::::::::::::::::::
  395. ::::::::::::::::                                                                ::::::::::::::::::::
  396. ::::::::::::::::  Assign a USB drive the letter R and create a text file named  ::::::::::::::::::::
  397. ::::::::::::::::         GET-IPLAYER in the ROOT Folder For This To Work        ::::::::::::::::::::
  398. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  399. Secho.
  400. cls
  401. echo.
  402. echo.
  403. if /i "%FPLACE%"=="" goto :gataht
  404. if /i "%FPLACE:~0,1%"=="p" SET FPLACE=pc&goto :herelas
  405. if /i "%FPLACE:~0,1%"=="u" SET FPLACE=usb&goto :herelas
  406. if /i not "%FPLACE:~0,1%"=="p" goto :gataht
  407. if /i not "%FPLACE:~0,1%"=="u" goto :gataht
  408. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::herelas
  409. :herelas
  410. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  411. echo                                            ....
  412. echo                                        ____________
  413. echo                                    ____________________
  414. echo                                        ____________
  415. echo                                            ....
  416. echo.
  417. @if not exist "R:\GET-IPLAYER.txt" echo    "!Pap!" Will Be Downloaded To "C:\downloads\media\%DPLACE%" Then Moved To "%userprofile%\desktop\Get-IPlayer\%Type%\%DPLACE%"
  418. @if not exist "R:\GET-IPLAYER.txt" goto :gooo
  419. @if /i "%FPLACE%"=="pc" echo    "!Pap!" Will Be Downloaded To "C:\downloads\media\%DPLACE%" Then Moved To "%userprofile%\desktop\Get-IPlayer\%Type%\%DPLACE%"
  420. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::gooo
  421. :gooo
  422. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  423. @if "%FPLACE%"=="usb" echo                "!Pap!" Will Be Downloaded To "C:\downloads\media\%DPLACE%" Then Moved To "R:\%Type%\%DPLACE%"
  424. timeout /T 1 >nul
  425. echo.
  426. echo                                            ....
  427. echo                                        ____________
  428. echo                                    ____________________
  429. echo                                        ____________
  430. echo                                            ....
  431. echo                                            ....
  432. echo                                        ____________
  433. echo                                    ____________________
  434. echo                                        ____________
  435. echo                                            ....
  436. echo.
  437. echo                       Searching "!Pap!"
  438. echo.
  439. echo                                            ....
  440. echo                                        ____________
  441. echo                                    ____________________
  442. echo                                        ____________
  443. echo                                            ....
  444. echo.
  445. :inputrefresh
  446. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  447. if /i "!Pap!"=="" CLS
  448. title Searching "!Pap!"
  449. set wanted=
  450. if /i "%onlycat%"=="Y" set wanted=INCLUDING %tttt%
  451. set notwanted=
  452. if /i "%excat%"=="Y" set notwanted=EXCLUDING %excatchoice%
  453. set thischan=
  454. set onon=
  455. if /i "%onlycha%"=="Y" set onon=ON CHANNEL &set thischan=--CHANNEL="%chch%"
  456. if /i "!Pap!"=="" TITLE FULL LIST OF %type% PROGRAMS %wanted% %notwanted% %onon%%chch%
  457. if "%earh%"=="Rget" TITLE REFRESHING THE FULL LIST OF %type% PROGRAMS %wanted% %notwanted%%onon%%chch%
  458. if "!dip!"=="--fields=pid" TITLE REFRESHING %type% PROGRAMS %wanted% %notwanted%%onon%%chch% WITH PID, NAME, SERIES ^& EPISODE
  459. if /i "!Pap!"=="" color 06
  460. :::::::::::::::(k):::::::::::::::S
  461. if /i not "%Pap%"=="" mode con lines=260
  462. :::::::::::::::(k):::::::::::::::E
  463. if "%type%"=="TV" mode con lines=9999 cols=201
  464. if "%type%"=="RADIO" mode con lines=9999 cols=201
  465. if "%type%"=="PODCAST" mode con lines=9999 cols=201
  466. :inputrefreshB
  467. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  468. if "!dip!"=="--fields=pid" C: & cd "\Program Files%TBIT%\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer --listformat="<pid>: <name>-<episode>" %thischan% %kkkk%=%tttt% %nnnn%=%excatchoice% --refresh %hide% --type=%type% "!Pap!" &goto :nopiD
  469. C: & cd "\Program Files%TBIT%\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer %thischan% %kkkk%=%tttt% %nnnn%=%excatchoice% --refresh %hide% --type=%type% "!Pap!"
  470. :nopiD
  471. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  472. ::::::::::::::::::::Sets The Catagories You May Have Chosen To Include/Exclude:::::::::::::::::::::
  473. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  474. if "!Pap!"=="" (TITLE Finished Updating %type% Index %onon%%chch%) ELSE (TITLE Finished Searching "!Pap!")
  475. echo.&echo.
  476. ECHO                     TO RESTART LEAVE BLANK ^& PRESS "ENTER"
  477. ::(P)S
  478. if "!hide!"=="--hide"    set adviceC= history is off enter Hget to switch on
  479. if "!hide!"==""    set adviceC= history is on enter Hgot to switch off
  480. ::(P)E
  481. echo                             %adviceC%
  482. echo.
  483. @if "%FORCED%"=="--force" COLOR 4e
  484. @if "%FORCED%"=="--force" ECHO         _______________________________________________________________________________
  485. @if "%FORCED%"=="--force" ECHO     ************** REMEMBER YOU HAVE SET TO FORCE THE DOWNLOAD! **************
  486. @if "%FORCED%"=="--force" ECHO     USE THE PROGRAMS "CODE" UNLESS YOU WISH TO DOWNLOAD EVERY MATCHING RESULT!
  487. @if "%FORCED%"=="--force" ECHO         _______________________________________________________________________________
  488. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  489. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  490. :::::::::::::::::::: When Forcing A Download The Above Message Will Appear To :::::::::::::::::::::
  491. :::::::::::::::::::: Remind You That Anything Matching What You Enter Will Be :::::::::::::::::::::
  492. ::::::::::::::::::::Downloaded Regardless Of It Being In The Recording History:::::::::::::::::::::
  493. ::::::::::::::::::::                                                          :::::::::::::::::::::
  494. ::::::::::::::::::::         Using The Programs Code Is Recommended           :::::::::::::::::::::
  495. ::::::::::::::::::::                                                          :::::::::::::::::::::
  496. ::::::::::::::::::::    Get-IPlayers Recording History Stops Programs From    :::::::::::::::::::::
  497. ::::::::::::::::::::           Being Accidentially Downloaded Again           :::::::::::::::::::::
  498. :::::::::::::::::::: Try To Download A Program Downloaded Before It Will Fail :::::::::::::::::::::
  499. ::::::::::::::::::::      Then Ask You If You Want To Force The Download      :::::::::::::::::::::
  500. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  501. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  502. SET advice=Use spaces between codes&SET adviceB=465 768 969 12 7 970 989&echo.&if not "!dip!"=="--fields=pid" echo                                    DOWNLOADING MANY PROGRAMS^?&echo                                       Enter piD for codes&echo.
  503. if "!dip!"=="--fields=pid" SET advice= use space between PIDS&echo.&echo                                    ENTER nuM TO REVERT BACK&SET adviceB=^?^?^?^?bk6t ^?^?^?^?bhq3&SET !earh!="!earh!"
  504. echo.
  505. echo                                    %advice%
  506. echo                                    %adviceB%
  507. echo.
  508. echo.&echo.
  509. if not "!dip!"=="--fields=pid" echo                                     ENTER CODE(S) OR TITLE&echo.
  510. set earh=
  511. set /p earh=:                                
  512. :::::::::::::::Remove leading & trailing whitespace:::::::::::::dS
  513. set whitespace=%earh%
  514. setlocal enabledelayedexpansion
  515. call :whitespac
  516. set earh=%whitespace%
  517. :::::::::::::::Remove leading & trailing whitespace:::::::::::::dE
  518. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  519. :::::::::::::::::::Asks You Which Program You Want To Download From The Results::::::::::::::::::::
  520. :::::::::::::::::::                                                            ::::::::::::::::::::
  521. :::::::::::::::::::1.Leave Blank To Go Back To Start                           ::::::::::::::::::::
  522. :::::::::::::::::::2.Enter Program Code To Download Just One Match             ::::::::::::::::::::
  523. :::::::::::::::::::3.Use A Space Between Each Programs code                    ::::::::::::::::::::
  524. :::::::::::::::::::4.Enter Program Title To Download All Matches               ::::::::::::::::::::
  525. :::::::::::::::::::5.Enter "Rget" to refresh the list                          ::::::::::::::::::::
  526. :::::::::::::::::::6.Enter "piD" to refresh the list with PID codes            ::::::::::::::::::::
  527. :::::::::::::::::::7.Enter "nuM" to revert from PID back to numbers list       ::::::::::::::::::::
  528. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  529. if /i "!earh!"=="" goto :beforestart
  530. if "!earh!"=="uSb"SET FPLACE=uSb&goto :inputrefresh
  531. if "!earh!"=="pC" SET FPLACE=pc&goto :inputrefresh
  532. ::(P) S
  533. if "!earh!"=="Hget" CLS&SET hide=&goto :inputrefresh
  534. if "!earh!"=="Hgot" CLS&SET hide=--hide&goto :inputrefresh
  535. ::(P) E
  536. if "!earh!"=="Rget" CLS&goto :inputrefresh
  537. if "!earh!"=="piD" CLS&SET dip=--fields=pid&goto :inputrefresh
  538. if "!earh!"=="nuM" CLS&SET dip=&SET "!earh!"=!earh!&goto :inputrefresh
  539. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  540. :::::::::::::::::::Delete the character string ' ' from %earh% so can determine if only numbers::::
  541. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  542. SET NOspaces=%earh: =%
  543. echo %NOspaces%|findstr /r "[^0-9]" > nul
  544. if errorlevel 1 set tttt=\%tttt%&goto :passnumcheck
  545. if "!dip!"=="--fields=pid" goto :passnumcheck
  546. if not errorlevel 1 SET earh="%earh%"&set tttt=
  547. :passnumcheck
  548. if /i "%tttt%"=="\" SET tttt=
  549. color 0e
  550. echo.&echo.
  551. echo.
  552. if /i NOT "!DPLACE!"=="" GOTO :afternotpap
  553. if "!DPLACE!"=="" SET DPLACE=%earh:"=%
  554. if /i NOT "!Pap!"=="" SET DPLACE=%Pap:"=%
  555. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::afternotpap
  556. :afternotpap
  557. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  558. title Downloading Program: %earh%
  559. echo.&echo.
  560. echo                                 Downloading Program %earh%
  561. echo                                   ......................
  562. echo                                      ................
  563. echo                                         ..........
  564. echo                                            ....
  565. echo                                             ..
  566. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::HTTPP
  567. :HTTPP
  568. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  569. :::::::::::::::(i):::::::::::::::S
  570. @if exist "C:\downloads\media\%type%%tttt%\%DPLACE%\*.partial.*" del "C:\downloads\media\%type%%tttt%\%DPLACE%\*.partial.*"
  571. :::::::::::::::(i):::::::::::::::E
  572. @if exist "C:\downloads\media\%type%%tttt%\%DPLACE%\*.flv*"      del "C:\downloads\media\%type%%tttt%\%DPLACE%\*.flv*"
  573. echo                                            ....
  574. echo.                                        _________
  575. echo                                      _______________
  576. echo                                         _________
  577. echo                                            ____
  578. echo                                             ..
  579. echo                                             ..
  580. :dodown
  581. :::::::::::::::(l):::::::::::::::S
  582. if NOT "!dip!"=="--fields=pid" mode con lines=50
  583. :::::::::::::::(l):::::::::::::::E
  584. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::                                    :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  585. :::::::::::::::::OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO:::::::::::::::::::
  586. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::                                    :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  587. C: & cd "\Program Files%TBIT%\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer %http% %hide% --type=%type% %dip% %earh% %FORCED% --get --mode=best%wma% --whitespace --output="\downloads\media\%type%%tttt%\%DPLACE%"
  588. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::                                    :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  589. :::::::::::::::::OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO:::::::::::::::::::
  590. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::                                    :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  591. :yeshitp
  592. ::(v):
  593. if /i not "%type%"=="tv" timeout /T 2 >nul
  594. @IF EXIST "C:\downloads\media\%type%%tttt%\%DPLACE%" for /F %%N in ('dir /S/B "C:\downloads\media\%type%%tttt%\%DPLACE%" ^| find /V /C "::"') do (if %%N EQU 0 rd "C:\downloads\media\%type%%tttt%\%DPLACE%")
  595. @IF EXIST "C:\downloads\media\%type%%tttt%" for /F %%N in ('dir /S/B "C:\downloads\media\%type%%tttt%" ^| find /V /C "::"') do (if %%N EQU 0 rd "C:\downloads\media\%type%%tttt%")
  596. @IF EXIST "C:\downloads\media\%type%" for /F %%N in ('dir /S/B "C:\downloads\media\%type%" ^| find /V /C "::"') do (if %%N EQU 0 rd "C:\downloads\media\%type%")
  597. @if NOT exist "C:\downloads\media\%type%%tttt%\%DPLACE%" GOTO :PANTS
  598. echo                                             ..
  599. echo                                             ..
  600. @if NOT exist "C:\downloads\media\%type%%tttt%\%DPLACE%\*.partial.*" SET skipSD=
  601. :::::::::::::::(i):::::::::::::::S
  602.     @if exist "C:\downloads\media\%type%%tttt%\%DPLACE%\*.partial.*" SET skipSD=dontdown&del "C:\downloads\media\%type%%tttt%\%DPLACE%\*.partial.*"&goto :dodown
  603. :::::::::::::::(i):::::::::::::::E
  604.     @if exist "C:\downloads\media\%type%%tttt%\%DPLACE%\*.flv*"      SET skipSD=dontdown&del "C:\downloads\media\%type%%tttt%\%DPLACE%\*.flv*"     &goto :dodown
  605. echo                                             ..
  606. echo                                             ..
  607. echo                                             ..
  608. if /i "%FPLACE%"=="usb" goto :instood
  609. if not exist "!NewPlace!" goto :nonewplace
  610. if /i "!NewPlace:~1,2!"==":\" %SystemRoot%\System32\robocopy "C:\downloads\media\%type%%tttt%\%DPLACE%" "!NewPlace!\%type%%tttt%\%DPLACE%" /MOVE /V /R:5 /W:10 /ETA & GOTO :instaed
  611. :nonewplace
  612. @IF NOT EXIST "%userprofile%\desktop\Get-IPlayer" MD "%userprofile%\desktop\Get-IPlayer\%type%%tttt%\%DPLACE%"
  613. :::::::::::::::(j):::::::::::::::S
  614. if exist "C:\downloads\media\%type%%tttt%\%DPLACE%" %SystemRoot%\System32\robocopy "C:\downloads\media\%type%%tttt%\%DPLACE%" "%userprofile%\desktop\Get-IPlayer\%type%%tttt%\%DPLACE%" /MOVE /V /R:5 /W:10 /ETA
  615. :::::::::::::::(j):::::::::::::::E
  616. if /i NOT "%FPLACE%"=="usb" goto :instaed
  617. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::instood
  618. :instood
  619. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  620. if exist "C:\downloads\media\%type%%tttt%\%DPLACE%" %SystemRoot%\System32\robocopy "C:\downloads\media\%type%%tttt%\%DPLACE%" "R:\%type%%tttt%\%DPLACE%" /MOVE /V /R:5 /W:10 /ETA
  621. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::instaed
  622. :instaed
  623. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  624. echo                                             ..
  625. if "%skipSD%"=="dontdown" goto :dodown
  626. @IF EXIST "C:\downloads\media\%type%%tttt%" for /F %%N in ('dir /S/B "C:\downloads\media\%type%%tttt%" ^| find /V /C "::"') do (if %%N EQU 0 rd "C:\downloads\media\%type%%tttt%")
  627. @IF EXIST "C:\downloads\media\%type%" for /F %%N in ('dir /S/B "C:\downloads\media\%type%" ^| find /V /C "::"') do (if %%N EQU 0 rd "C:\downloads\media\%type%")
  628. mode con cols=37
  629. mode con lines=8
  630. @color 0a
  631. echo.&echo.&echo.
  632. echo           "!Pap!" Downloaded
  633. echo.&echo.&echo.
  634. mode con cols=70
  635. mode con lines=8
  636. @color 0e
  637. goto :here9
  638. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::again
  639. :again
  640. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  641. @color 0c
  642. cls
  643. echo.&echo.&echo.
  644. echo                         Invalid Choice!
  645. timeout /T 1 >nul
  646. cls
  647. @color 0e
  648. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::here9
  649. :here9
  650. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  651. CLS
  652. TITLE Finished Downloading !pap!
  653. echo.&echo.&echo.
  654. set doyou=
  655. set /p doyou=%username% would you like to download something else?
  656. set whitespace=%doyou%
  657. setlocal enabledelayedexpansion
  658. call :whitespac
  659. set doyou=%whitespace%
  660. if /i "%doyou%"=="" goto :beforestart
  661. if /i "%doyou:~0,1%"=="y" goto :beforestart
  662. if /i "%doyou:~0,1%"=="n" goto :noagain
  663. if /i not "%doyou:~0,1%"=="y" goto :again
  664. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::noagain
  665. :noagain
  666. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  667. cls
  668. echo.&echo.&echo.
  669. echo                               FIN!
  670. timeout /T 3 >nul
  671. DEL "%temp%\dow.txt" /q
  672. ::(w):S
  673. pushd "%userprofile%\Desktop\Get-IPlayer" & for /f "usebackq delims=" %%d in (`"dir /ad/b/s | sort /R"`) do rd "%%d" >NUL 2>NUL
  674. pushd "C:\downloads\media" & for /f "usebackq delims=" %%d in (`"dir /ad/b/s | sort /R"`) do rd "%%d" >NUL 2>NUL
  675. ::(w):E
  676. endlocal
  677. exit
  678. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::PANTS
  679. :PANTS
  680. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  681. :::::::::::::::::           Asks If You Want To Force The Download           ::::::::::::::::::::::
  682. :::::::::::::::::                                                            ::::::::::::::::::::::
  683. :::::::::::::::::Type Quit, Exit or End To Close The Get-IPlayer Batch Window::::::::::::::::::::::
  684. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  685. @color 0c
  686. :wrongentry
  687. mode con cols=140
  688. mode con lines=20
  689. title DOWNLOAD FAILED!
  690. echo.&echo.&echo.
  691. echo                                 Failed To Download "%earh:"=%"
  692. echo.&echo.
  693. echo                            You Will Need To Force Download "%earh:"=%"
  694. echo.
  695. echo                            n=continue
  696. echo                            y=force download
  697. ::(P): S
  698. if "%hide%"=="" echo                            h=hide recording history
  699. if "%hide%"=="--hide" echo                              s=show recording history
  700. ::(P): E
  701. echo                            e=exit
  702. set doyouneed=
  703. set /p doyouneed=:                             
  704. set whitespace=%doyouneed%
  705. setlocal enabledelayedexpansion
  706. call :whitespac
  707. set doyouneed=%whitespace%
  708. if /i "%doyouneed%"=="" GOTO wrongentry
  709. if /i "%doyouneed:~0,1%"=="n" SET FORCED=
  710. if /i "%doyouneed:~0,1%"=="n" IF EXIST "%userprofile%\desktop\Get-IPlayer" for /F %%N in ('dir /S/B "%userprofile%\desktop\Get-IPlayer" ^| find /V /C "::"') do (if %%N EQU 0 rd "%userprofile%\desktop\Get-IPlayer")
  711. ::(P): S
  712. if /i "%doyouneed:~0,1%"=="h" set hide=--hide&GOTO :wrongentry
  713. if /i "%doyouneed:~0,1%"=="s" set hide=&GOTO :wrongentry
  714. ::(P): E
  715. if /i "%doyouneed:~0,1%"=="E" GOTO :CLEANUP
  716. if /i "%doyouneed:~0,1%"=="Y" SET FORCED=--force
  717. echo.&echo.
  718. GOTO NOcleanup
  719. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::CLEANUP
  720. :CLEANUP
  721. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  722. ::(w):S
  723. pushd "%userprofile%\Desktop\Get-IPlayer" & for /f "usebackq delims=" %%d in (`"dir /ad/b/s | sort /R"`) do rd "%%d" >NUL 2>NUL
  724. pushd "C:\downloads\media" & for /f "usebackq delims=" %%d in (`"dir /ad/b/s | sort /R"`) do rd "%%d" >NUL 2>NUL
  725. pushd "%~dp0"
  726. ::(w):E
  727. @IF EXIST "%userprofile%\desktop\Get-IPlayer" for /F %%N in ('dir /S/B "%userprofile%\desktop\Get-IPlayer" ^| find /V /C "::"') do (if %%N EQU 0 rd "%userprofile%\desktop\Get-IPlayer")
  728. @IF EXIST "R:\%type%\%DPLACE%\" RD "R:\%type%\%DPLACE%\"
  729. @IF EXIST "R:\%type%\%DPLACE%\" RD "R:\%type%\%DPLACE%\"
  730. DEL "%temp%\dow.txt" /q
  731. EXIT
  732. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::NOcleanup
  733. :NOcleanup
  734. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  735. ::timeout /T 1 >nul
  736. @color 0e
  737. mode con cols=37
  738. mode con lines=8
  739. @if "%FORCED%"=="--force" mode con lines=10
  740. title RETRY
  741. @if "%FORCED%"=="--force" TITLE FORCED RETRY
  742. echo.&echo.&echo.
  743. echo              RESTARTING
  744. @if "%FORCED%"=="--force" ECHO.
  745. ::(o): S
  746. @if "%FORCED%"=="--force" ECHO            IN FORCED MODE&GOTO :inputrefresh
  747. ::(o): E
  748. SET DPLACE=
  749. SET earh=
  750. SET nnnn=
  751. SET excatchoice=
  752. SET notwanted=
  753. SET onlycat=
  754. SET excat=
  755. SET tttt=
  756. SET kkkk=
  757. set chch=
  758. set onon=
  759. set thischan=
  760. set type=TV
  761. SET proggy=
  762. SET dip=
  763. echo.&echo.&echo.
  764. timeout /T 2 >nul
  765. if "%TBIT%"==" (x86)" goto :skipp
  766. GOTO :START
  767. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::beforestart
  768. :beforestart
  769. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  770. @if not "%FORCED%"=="--force" goto :NOcleanup
  771. mode con cols=70
  772. mode con lines=8
  773. @color 0e
  774. echo.&echo.&echo.
  775. @if "%FORCED%"=="--force" TITLE TURN FORCED DOWNLOADING OFF?&set /p doyouneedAGAIN=TURN FORCED DOWNLOADING OFF Y/N?
  776. set whitespace=%doyouneedAGAIN%
  777. setlocal enabledelayedexpansion
  778. call :whitespac
  779. set doyouneedAGAIN=%whitespace%
  780.     if /i "%doyouneedAGAIN%"=="" GOTO :beforestart
  781.     if /i "%doyouneedAGAIN:~0,1%"=="n" GOTO :NOcleanup
  782.     if /i "%doyouneedAGAIN:~0,1%"=="y" SET FORCED=
  783.     if /i "%doyouneedAGAIN:~0,1%"=="y" GOTO :NOcleanup
  784. if /i not "%doyouneedAGAIN:~0,1%"=="y" goto :beforestart
  785. if /i not "%doyouneedAGAIN:~0,1%"=="n" goto :beforestart
  786. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  787. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  788. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  789. :::::::::::::::::::======================================================::::::::::::::::::::::::::
  790. :::::::::::::::::::    This Batch File Is To Be Used With Get-IPlayer    ::::::::::::::::::::::::::
  791. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  792. :::::::::::::::::::                  By Terence Hamill                   ::::::::::::::::::::::::::
  793. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  794. :::::::::::::::::::Get-IPlayer Downloads Streams From The IPlayer Website::::::::::::::::::::::::::
  795. :::::::::::::::::::======================================================::::::::::::::::::::::::::
  796. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  797. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  798. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  799. :::::::::::::::::::======================================================::::::::::::::::::::::::::
  800. :::::::::::::::::::        Get-IPlayer Was Written By Phil Lewis         ::::::::::::::::::::::::::
  801. :::::::::::::::::::======================================================::::::::::::::::::::::::::
  802. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  803. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  804. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  805. :::::::::::::::::::       Get-IPlayer Has Much More Functionality        ::::::::::::::::::::::::::
  806. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  807. :::::::::::::::::::   Select Get-IPlayer From Programs To Learn More     ::::::::::::::::::::::::::
  808. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  809. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  810. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  811. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  812. :::::::::::::::::::         I Wrote This Batch File For A Friend         ::::::::::::::::::::::::::
  813. :::::::::::::::::::          Who Was Not Up For Editing Scripts          ::::::::::::::::::::::::::
  814. :::::::::::::::::::           Some Is Copy Pasted So Could Be            ::::::::::::::::::::::::::
  815. :::::::::::::::::::               Cleaned Up A Great Deal                ::::::::::::::::::::::::::
  816. :::::::::::::::::::                                                      ::::::::::::::::::::::::::
  817. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  818. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  819. :::::::::::::::::::   A nice ghetto batch file I've written for You to   ::::::::::::::::::::::::::
  820. :::::::::::::::::::       make use of and the first bit of Batch         ::::::::::::::::::::::::::
  821. :::::::::::::::::::      I have written besides Robocopy commands        ::::::::::::::::::::::::::
  822. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  823. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::DOWNLOADGET
  824. :DOWNLOADGET
  825. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  826. :::::::::::::::Asks You if You Want To Download get-iplayer.exe From Infradead.org            :::::
  827. :::::::::::::::                                                                               :::::
  828. :::::::::::::::1.Download The exe                                                             :::::
  829. :::::::::::::::2.Install get-iplayer                                                          :::::
  830. :::::::::::::::3.Now This Batch File Can Be Used To Download Programs From The IPlayer Website:::::
  831. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  832. CLS
  833. echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.
  834. set IPlay=
  835. set /p IPlay=:                 Would You Like To Download ^& Install Get-IPlayer %username% Y or N?
  836. set whitespace=%IPlay%
  837. setlocal enabledelayedexpansion
  838. call :whitespac
  839. set IPlay=%whitespace%
  840. if /i "%IPlay%"=="" GOTO :DOWNfailLOADGET
  841. if exist "%userprofile%\Desktop\GET-IPLAYER.txt" echo.&echo.&echo.&echo.&echo              Please read GET-IPLAYER.txt file in&echo.&echo              %CD%
  842. echo.&echo.&echo.&echo.
  843. if /i "%IPlay:~0,1%"=="Y" echo                 Press any key to continue get-iplayer download
  844. if /i "%IPlay:~0,1%"=="Y" pause>nul&if not exist "C:\Program Files%TBIT%\get_iplayer\Uninst.exe" echo You can have files downloaded to a usb device when completed>GET-IPLAYER.txt&ECHO Put this file in the root folder of usb drive (R:)>>GET-IPLAYER.txt&echo Enables GET-IPLAYER.bat to check if the usb drive is plugged in.>>GET-IPLAYER.txt&ECHO.>>GET-IPLAYER.txt&echo.>>GET-IPLAYER.txt&ECHO You can go on ^& install get-iplayer now :)>>GET-IPLAYER.txt
  845. if /i "%IPlay:~0,1%"=="Y" TITLE DOWNLOADING GET-IPLAYER&bitsadmin.exe /transfer "Downloading" http://www.infradead.org/get_iplayer_win/get_iplayer_setup_latest.exe %userprofile%\Desktop\get_iplayer_setup_latest.exe
  846. echo.&echo.&echo.
  847. if /i "%IPlay:~0,1%"=="Y" ECHO:                Installing get_iplayer_setup_latest.exe
  848. echo.&echo.&echo.
  849. if /i "%IPlay:~0,1%"=="N" if exist "%userprofile%\desktop\get_iplayer_setup_latest.exe" del "%userprofile%\desktop\get_iplayer_setup_latest.exe"&goto start
  850. if /i "%IPlay:~0,1%"=="N" if not exist "C:\Program Files%TBIT%\get_iplayer\Uninst.exe" EXIT
  851. if /i "%IPlay:~0,1%"=="N" if exist "C:\Program Files%TBIT%\get_iplayer\Uninst.exe" goto start                   pause
  852. if /i "%IPlay:~0,1%"=="Y" goto install
  853. :DOWNfailLOADGET
  854. cls
  855. echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.
  856. if /i not "%IPlay:~0,1%"=="N" echo                                                Invalid Choice!
  857. timeout /T 2 >nul
  858. @color 0c
  859. timeout /T 1 >nul
  860. cls
  861. @color 0e
  862. if /i "%IPlay%"=="" GOTO :DOWNLOADGET
  863. if /i not "%IPlay%"=="N" goto :DOWNLOADGET
  864. :install
  865. ::(t): S
  866. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  867. :::::::::::::::                      Add Shortcut To Desktop                        :::::::::::::::
  868. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  869. set   SCRIPT="%TEMP%\%RANDOM%-%RANDOM%.vbs"
  870.    echo Set oWS = WScript.CreateObject("WScript.Shell") >> %SCRIPT%
  871. echo sLinkFile = "%USERPROFILE%\Desktop\%~n0.lnk" >> %SCRIPT%
  872. ::echo sLinkFile = "%userprofile%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\get_iplayer\%~n0.lnk" >> %SCRIPT%
  873.          echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT%
  874.         echo oLink.TargetPath = "%CD%\%~n0.bat" >> %SCRIPT%
  875.                              echo oLink.WindowStyle = 3 >> %SCRIPT%
  876. if exist "%CD%\getiplayer.ico"                                  echo oLink.IconLocation = "%CD%\getiplayer.ico"                                  >> %SCRIPT% &goto :iconDone
  877. if exist "C:\Program Files Portable\get_iplayer\getiplayer.ico" echo oLink.IconLocation = "C:\Program Files Portable\get_iplayer\getiplayer.ico" >> %SCRIPT% &goto :iconDone
  878. if exist "C:\Program Files Portable\icons\large01BBC.ico"       echo oLink.IconLocation = "C:\Program Files Portable\icons\large01BBC.ico"       >> %SCRIPT% &goto :iconDone
  879. if exist "C:\Program Files\get_iplayer\iplayer_logo.ico"        echo oLink.IconLocation = "C:\Program Files\get_iplayer\iplayer_logo.ico"        >> %SCRIPT%
  880. :iconDone
  881. echo oLink.Save >> %SCRIPT%
  882. cscript /nologo %SCRIPT%
  883. del %SCRIPT%
  884. if /i "!Pap!"=="GetS" GOTO :raddypodcst
  885. ::(t): E
  886. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  887. if exist "%userprofile%\desktop\get_iplayer_setup_latest.exe" mode con cols=37&mode con cols=50&mode con lines=12&color F0&TITLE INSTALLING GET-IPLAYER&ECHO.&ECHO.&ECHO.&ECHO                      WAITING&ECHO.&ECHO.&if exist "GET-IPLAYER.txt" ECHO        Please read GET-IPLAYER.txt file in&echo.&echo %CD%
  888. if exist "%userprofile%\desktop\get_iplayer_setup_latest.exe" start /WAIT %userprofile%\desktop\get_iplayer_setup_latest.exe& del get_iplayer_setup_latest.exe&goto start
  889. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::UPDATEGET
  890. :UPDATEGET
  891. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  892. :::::::::::::::               Asks You if You Want To Update get-iplayer.exe                  :::::
  893. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  894. CLS
  895. echo.&echo.&echo.
  896. set UPDATEGET=
  897. set /p UPDATEGET=:                 Would You Like To Update Get-IPlayer %username% Y or N?
  898. set whitespace=%UPDATEGET%
  899. setlocal enabledelayedexpansion
  900. call :whitespac
  901. set UPDATEGET=%whitespace%
  902. if /i "%UPDATEGET%"=="" GOTO :UPDATEGET
  903. echo.&echo.&echo.
  904. if /i "%UPDATEGET:~0,1%"=="Y" TITLE UPDATING GET-IPLAYER&ECHO:                 Updating get-iplayer&C: & cd "\Program Files\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer --update
  905. echo.&echo.&echo.
  906. pause
  907. if /i "%UPDATEGET:~0,1%"=="Y" GOTO START
  908. if /i "%UPDATEGET:~0,1%"=="N" GOTO START
  909. cls
  910. echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.
  911. if /i not "%UPDATEGET:~0,1%"=="N" GOTO START
  912. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::UPDATEGETSWF
  913. :UPDATEGETSWF
  914. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  915. :::::::::::::::               Asks You if You Want To Update get-iplayer SWF URL              :::::
  916. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  917. CLS
  918. echo.&echo.&echo.
  919. set UPDATEGETSWF=
  920. set /p UPDATEGETSWF=:              Would You Like To Update The SWF URL %username% Y or N?
  921. set whitespace=%UPDATEGETSWF%
  922. setlocal enabledelayedexpansion
  923. call :whitespac
  924. set UPDATEGETSWF=%whitespace%
  925. if /i "%UPDATEGETSWF%"=="" GOTO :UPDATEGETSWF
  926. if /i "%UPDATEGETSWF:~0,1%"=="N" GOTO START
  927. echo.&echo.&echo.
  928. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::UPDATEURLSWF
  929. :UPDATEURLSWF
  930. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  931. CLS
  932. echo.&echo.&echo.
  933. if /i "%UPDATEGETSWF:~0,1%"=="Y" set /p UPDATEURLSWF=Enter The New SWF URL:  
  934. set whitespace=%UPDATEURLSWF%
  935. setlocal enabledelayedexpansion
  936. call :whitespac
  937. set UPDATEURLSWF=%whitespace%
  938. if /i "%UPDATEURLSWF%"=="" GOTO :UPDATEGETSWF
  939. if /i NOT "%UPDATEURLSWF:~0,4%"=="http" GOTO :UPDATEGETSWF
  940. if /i "%UPDATEURLSWF:~0,4%"=="http" SET httpSWF=UPDATEURLSWF
  941. echo.&echo.&echo.
  942. if /i "%UPDATEGETSWF:~0,1%"=="Y" TITLE DELETING GET-IPLAYER PREFERENCES&ECHO:              Deleting Prefernces&C: & cd "\Program Files%TBIT%\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer --prefs-del --rtmp-tv-opts="X" --rtmp-radio-opts="X"  --rtmp-livetv-opts="X" --rtmp-liveradio-opts="X"
  943. echo.&echo.&echo.
  944. if /i "%UPDATEGETSWF:~0,1%"=="Y" TITLE UPDATING SWF File URL&ECHO:                 Updating SWF File URL&C: & cd "\Program Files\get_iplayer\" & "%Windir%\system32\cmd.exe" /c get_iplayer --prefs-add --rtmp-tv-opts="--swfVfy %httpSWF%"
  945. echo.&echo.&echo.
  946. pause
  947. GOTO START
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!