おっかしいなぁ。Youtube動画ダウンロードスクリプト。

dev

クリップボードから取得したYoutubeの閲覧ページアドレスを、FLV所在アドレスに変換して、ダウンロードするスクリプトをMortScriptで作ったらさ、こんな短いことになって凹んだｗま、例外に対する処理をしていないからってのもあるけどさ。
意外と簡単なんだよね、こういうのって。
さすがMortScriptさまさまです。


saveto="\"

oriadd=ClipText()
id=SubStr(oriadd,Find(oriadd,"watch?v=")+8,11)
Download("http://cache.googlevideo.com/get_video?video_id="&id , saveto \ "Youtube_" & id & ".flv")