スポンサーサイト

 --, -- --:--
上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

ソフトウェア - 棒読みちゃと喋りながらTSを処理するバッチプログラム

 21, 2013 22:53
いつもバッチの最後に EasyAlert で音を鳴らす処理を書いて完了通知をしていたんですが
音が単調で味気ないなーと感じまして、棒読みちゃんに喋らせたら面白いかもしれないと思い立ち、勢いで書きました。

① 対話形式で棒読みちゃんがわざわざ喋りかけてくれる
② 処理を一々ツイッターに書き込みに行く

それ以外は何の変哲もないコードですが、よかったら使ってください(^_^
TsSplitter で分離したあと、一番大きい HD の TS ファイル以外は勝手に Delete するコードがあるので、それだけ気をつけてください。
一応、ツイートは 19 行目の SET TWEET=0 フラグを 0/1 で切り替えられます。デフォルト OFF

尚、必要なツールは記事の一番下に一覧しました。開発者様に感謝。



@echo off
SETLOCAL ENABLEDELAYEDEXPANSION

REM "INIT RTN"
SET RemoteTalk="C:\encode\bin\BouyomiChan\RemoteTalk\RemoteTalk.exe"
SET Twitter="C:\encode\bin\TweetConsole\twtcnsl.exe"
SET TsSelect="C:\encode\bin\TsSelect.exe"
SET TsSplitter="C:\encode\bin\TsSplitter.exe"
SET ATC2="C:\encode\bin\ATC2\ATC2.exe"
SET MSG1="ようこそ。今から %~nx1 を処理します"
SET MSG2="全ての処理を完了しました。お疲れ様でした"
SET MSG3="実行します"
SET MSG4="SKIPします"
SET HEAD="自動ツイート"
SET QTN=か?
SET JOB1=Dropチェックをします
SET JOB2=HDデータを抽出します
SET JOB3=ATCを呼び出します
SET TWEET=0

REM "START RTN"
%RemoteTalk% /talk %MSG1% >NULL

REM "SELECT RTN"
SET JOB=%JOB1%
:L_SELECT
%RemoteTalk% /talk "%JOB%%QTN%" >NULL
SET /p INP="%JOB%%QTN%(y/n) >"
IF NOT %TWEET%==0 IF %TWEET%==1 IF %INP%==y %Twitter% /t "[%HEAD%] %JOB% (%~nx1)" >NULL

REM "SKIP RTN"
:L_BEGIN
IF NOT %INP%==y (
%RemoteTalk% /talk %MSG4% >NULL
GOTO L_SWITCH
) ELSE IF %INP%==y (
%RemoteTalk% /talk %MSG3% >NULL
)

REM "DROP CHECK RTN"
IF "%JOB%"=="%JOB1%" (
%TsSelect% "%~1" >"%~dpn1_CheckDrop.log"
%~dpn1_CheckDrop.log
)

REM "EXTRACTION RTN"
IF "%JOB%"=="%JOB2%" (
%TsSplitter% "%~1" -EIT -ECM -EMM -1SEG -SEP3 >NULL
SET /a SIZE=0
FOR %%A IN (%~dpn1_*.ts) DO (
SET AA=%%~zA
SET /a SEL=!AA:~0,-1!
IF !SIZE! LSS !SEL! (
SET SIZE=!SEL!
SET FILE=%%~A
)
)
FOR %%A IN (%~dpn1_*.ts) DO (
SET AA=%%~zA
SET /a SEL=!AA:~0,-1!
IF !SIZE! GTR !SEL! (
DEL %%~A
)
)
MOVE !FILE! %~1
)

REM "TEMPLATE RTN"
IF "%JOB%"=="%JOB3%" (
CALL %ATC2% %~1
)

REM "JOB SWITCH RTN"
:L_SWITCH
IF "%JOB%"=="%JOB3%" GOTO L_END
IF "%JOB%"=="%JOB2%" SET JOB=%JOB3%
IF "%JOB%"=="%JOB1%" SET JOB=%JOB2%
GOTO L_SELECT

REM "END RTN"
:L_END
%RemoteTalk% /talk %MSG2% >NULL
PAUSE
ENDLOCAL



※ コードの一部に誤りがあったので修正しました(2013/02/22)

・棒読みちゃん(http://chi.usamimi.info/Program/Application/BouyomiChan/
・TweetConsole(http://www.vector.co.jp/soft/win95/net/se483315.html
・TsSelect(http://karinto2.mine.nu/?FriioApp
・TsSplitter(http://www3.wazoku.net/2sen/dtvup/
・ATC2(http://potatosub.blog.fc2.com/?tag=ATC2


関連記事
ソフトウェア - EasyAlert (バッチ処理で音声を鳴らす)
ソフトウェア - EncLogEditor (バッチエンコ処理のログを集計する)

ダウンロード
TsInitProc.bat

スポンサーサイト

Tag:バッチ 棒読みちゃん Twitter TS

COMMENT - 0



WHAT'S NEW?

上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。