カテゴリ:すみません、取り乱しました。( 171 )
 
Raspbian ウブンツでAIFFもFLACもランダム再生-2
f0021035_23170298.png
あまりに便利すぎる VLC なので、aplay.plを少し修正して機能を制限してみた。Linux (ubuntu,raspbian)で mp3 wave aiff aac wma flac alac をランダム再生する。 splay.pl とする。


2017−10−8 一部修正しました




#!/usr/bin/perl

## -def オプションで再生したいフォルダー。ほぼ必須。
#$defaulturl = "/media/pi"; #Raspbian(外部メディア)の場合
$defaulturl = "";

## 追加フォルダー。ここに書き込んだフォルダー内の該当音楽ファイルは必ず再生されます。
#$defaulturls = "";

$max = 0; #再生曲数 0で無制限

$dir = "./";
$udir = "0";
$list = 0;
$alist = 0;
$noran = 0;
$down = 0;
$vlc = 0;
$vlcs = " ";


if ($ARGV[0]){
foreach $_ (@ARGV){

if($_ =~ /\-dir\=/i){
$_ =~ s/\-dir\=//; $dir = $_;
$udir = 8;
}

if($_ =~ /\-max\=/i){$_ =~ s/\-max\=//; $max = $_;}

if($_ =~ /\-def/i){$dir = "$defaulturl"; $udir = 88;}

if($_ =~ /\-list/i){$list = 8;}
if($_ =~ /\-alist/i){$alist = 8;}
if($_ =~ /\-noran/i){$noran = 8;}
if($_ =~ /\-down/i){$down = 8;}
if($_ =~ /\-vlc/i){$vlc = 8;}
}
}
else{
$dir = "./";
print "オプションがないい場合は、同じフォルダ内を演奏しています。\n";
}

@type = (".mp3",".wav",".wave",".aif",".aiff",".wave",".aac",".wma",".flac",".m4a","alac");

&getlist($dir);
if($defaulturls ne ""){&getlist($defaulturls);}


print "\n********************************************\n";
print "splay.pl は aplay(WAVE) / mpg321(MP3) / cvlc(AIFF 他) でのランダム演奏用です。\n";
print "(フォーマット=WAVE.AIFF.MP3.AAC.WMA.FLAC.ALAC)\n";
print "ex: perl aplay.pl -list -def\n";
print "------------------------------------------------\n";
print "-vlc (全てVLCで再生)\n";
print "-def (設定したデフォルト\"" . $defaulturl . "\"を再生)\n";
print "-alist (再生一覧リストを表示)\n";
print "-list (再生リストを表示)\n";
print "-noran (ランダム再生しない)\n";
print "-down (逆順に再生)\n";
print "-dir=URL (URLのフォルダー内を演奏)\n";
print "-max=数字 (最大演奏回数、無指定で無制限)\n";
print "演奏中 次の局 Ctrl + C\n";
print "演奏中 中止 Ctrl + Z\n\n";


if($noran){@new = @files; print "\**NORANDOM**\n\n";}
elsif($down){@new = sort {$b cmp $a} @files; print "\**DOWN**\n\n";}
else{
foreach (@files){
my $r = rand @new+1;
push(@new, $new[$r]);
$new[$r] = $_;
}
print "\**RANDOM**\n\n";
}

if($alist){
$listii = 0; print "再生予定リスト\n------------------------------------------------\n";

foreach (@new){
$listii ++;
$wlists = $_;
$wlists =~ s/$defaulturl//g;
$wlists =~ s/$defaulturls//g;
$wlists =~ s/\.mp3//ig;
$wlists =~ s/\.wa.+//ig;
$wlists =~ s/\.ai.+//ig;
print "$listii*$wlists\n";
if($listii == $max){last;}}

print "------------------------------------------------\n\n\n";
}

$listi = 0;
foreach (@new){
$listi ++;

$lists = " \"$_\"";

if($list){
$wlists = $_;
$wlists =~ s/$defaulturl\//\($listi\)/g;
$wlists =~ s/$defaulturls\//\($listi\)/g;
$wlists =~ s/\.mp3//ig;
$wlists =~ s/\.wa.+//ig;
$wlists =~ s/\.ai.+//ig;
}

if($list){print "------------------------------------------------\n\n";}
if($vlc){
if($list){print "NowPlay$listii*$wlists\n";}
if($lists){system("cvlc -q $lists --play-and-exit");}
else{print "--NoFile--\n\n";}
}

else{
if($lists =~ /\.mp3/ig){
if($lists){system("mpg321 -q $lists");}
else{print "--NoFile--\n\n";}
}
elsif($lists =~ /\.wa.+/ig){
if($list){print "NowPlay$listii*$wlists\n";}
if($lists){system("aplay -q $lists");}
else{print "--NoFile--\n\n";}
}
else{
if($list){print "NowPlay$listii*$wlists\n";}
if($lists){system("cvlc -q $lists --play-and-exit");}
else{print "--NoFile--\n\n";}
}
if($listi == $max){last;}
}
}

if($vlc){system("cvlc $vlcs --play-and-exit");}

exit;
#-----------------------------------------------------------------------

sub getlist{
my $ndir = $_[0];
my @get;

#opendir(IN,$ndir) or die "opendir $dir エラー : $!";
opendir(IN,$ndir) or return;
@get = readdir IN;
closedir(IN);

foreach $files (@get){
next if $files =~ /^\.\.$/;
next if $files =~ /^\.$/;


foreach (@type) {
if($files =~ /$_$/i){
if($ndir =~ /^\.\/.+/i){push @files, "$ndir" . "/$files";}
elsif($udir){$ndir =~ s/\/$//i; push @files, "$ndir" . "/$files";}
else{push @files, "$files";}
}
}


if($ndir =~ /^\.\/.+/i){$nndir = $ndir . "/$files";}
elsif($udir){$ndir =~ s/\/$//i; $nndir = "$ndir" . "/$files";}
else{$nndir = $ndir . "$files";}

#print "$nndir\n";#TEST用
if(-d $nndir){&getlist($nndir);}
}

}

################################################# ここまで

-vlc オプションで全てvlcで再生する。多少音質が違うようである。小生は好みだが、好き嫌いもあるだろう。

必要なアプリもインストールする。

sudo apt-get install mpg321

sudo apt-get install vlc

[PR]
by digressive | 2017-09-10 23:30 | すみません、取り乱しました。 | Comments(0)
 
index.html
f0021035_10012608.png
まあ、ちょっとエキサイト迷惑な話だが、ブラウザーを立ち上げると、大抵は上の方やトップ画面の検索窓で検索するところから始めるだろう。ブックマークを使う人も多いだろう。よく使うサイトの一覧が表示されるブラウザも増えた。いろいろやるのが面倒なので、自分用のインデックスを作り、デスクトップに置いておけば、その書類を開くだけでルーチンが始められる…と考え、飾りにイメージを一つくらいと思うが、そのイメージをどこに置くか?デスクトップは嫌だし。フォルダには入れたくないし……エキサイトブログにアップしてそこにリンクしちゃったのである。いいんだろうか?
f0021035_10065888.png

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html lang="ja">
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8">
<title>Graphic & Web Design MORI</title>
<style type="text/css">
<!--
body {
background-color: #ffffff;
color: #555555;
}

a { color: #224488; text-decoration: none; }
a:link { color: #224488; }
a:visited { color: #224488; text-decoration: none; }
a:hover { color: #224488; text-decoration: none; }
a:active { color: #224488; text-decoration: none; }

.butt{
font-size: 1.4em;
font-weight: bold;
padding: 10px 30px;
background-color: #224488;
color: #ffffff;
border-style: none;
}
-->
</style>
</head>
<body>
<!-- Google -->
<center>
<FORM method="GET" action="http://www.google.co.jp/search">
<TABLE bgcolor="#FFFFFF" cellpadding="8" cellspacing="0">
<tr>
<td align="center">
<img src="http://pds.exblog.jp/pds/1/201706/15/35/f0021035_10012608.png" width="100" height="207" alt="tube"></td>
</tr>
<tr>
<td align="center" bgcolor="#fafad2">
<p><A HREF="http://www.google.co.jp/"><IMG SRC="http://www.google.com/logos/Logo_40wht.gif" border="0" ALT="Google" align="absmiddle"></A></p>
<INPUT type="text" name="q" size=50 maxlength=255 value="" style="font-size:20px;">
<p><INPUT type="submit" name="btnG" value="Google 検索" class="butt"></p>
<INPUT type="hidden" name="hl" value="ja">
<INPUT type="hidden" name="ie" value="utf-8">
<INPUT type="hidden" name="oe" value="utf-8">
</td>
</tr>
<tr>
<td align="center">
<h2><a href="#">TEST</a></h2>
</td>
</tr>
</TABLE>
</FORM>
</center>
<!-- Google -->

</body>
</html>

[PR]
by digressive | 2017-06-15 10:10 | すみません、取り乱しました。 | Comments(6)
 
危機一髪
f0021035_19181490.png
4月13日夕刻、家事の最中にいきなりバランスが取れなくなり左半身が動かなくなった。カミサンから電話があってもうまくしゃべれない。横になったままいろいろと考えていたら、カミサンが帰ってきてすぐに119番したので九死に一生を得た。2週間ほど入院した。もろもろの原因で危ないところが詰まったらしい。心当たりはふんだんにある。幸いに後遺症はなかったが、ググって見ると十人に一人くらい再発するそうなので今後は清く正しく愚行に励もうと思う。

[PR]
by digressive | 2017-04-26 19:24 | すみません、取り乱しました。 | Comments(0)
 
そして、国宝 彦根城
f0021035_14304602.jpg
1月5日は朝7時に実家を出て、JR三宮駅から新快速で彦根駅まで行き、彦根城に行ってみた。外堀からほぼ当時の姿で残っている。近隣の城からパーツを持ってきて利用している、エコな城である。長浜城、佐和山城、大津城など、大河ドラマ真田丸によく登城した城の部分も見られて実に嬉しい。琵琶湖の湖畔で絶景である。保存も良く、当時の雰囲気が良く味わえる。
帰りは米原からヒカリで東京まで帰った。ついでに、秋葉原で途中下車してみたら、ラズベリーパイがブームのようであった!!
f0021035_14305246.jpg
f0021035_14305027.jpg
f0021035_14304909.jpg
f0021035_14304795.jpg

[PR]
by digressive | 2017-01-07 16:23 | すみません、取り乱しました。 | Comments(0)
 
そして神戸 2017
f0021035_14241420.jpg
f0021035_14241640.jpg
2日から5日まで、ほとんど欠勤扱いの有給休暇を取って、神戸に帰った。暖かかった。神戸は震災以降、観光客に優しい、ちょっといい街になった。旧友と会い、帰りは寄り道した。
[PR]
by digressive | 2017-01-07 14:28 | すみません、取り乱しました。 | Comments(0)
 
今年もよろしく!
はっぴ〜 にゅう いやぁ〜 はや…

f0021035_11593370.png
祝 2017

といっても、なにやらダメおやじには生きにくい世の中になってきたような気がするように感じるのじゃないかな〜と思う昨今です。このブログは、元来、突然に職を失って途方に暮れたダメおやじが、世の中への不平不満を書き連ねようという、くだらない動機で始めたのですが、不平をぶつけるにも値しない、あまりの世の中の体たらくに、負けじとさらにくだらないプアオーディオ関連工作などばかりの記事になってしまっております。
天皇陛下の生前退位のお話にしても、面倒だからと、とりあえずの特例でなんとかしたらという、法律など都合が悪ければ無視すればいいという、現政権の体質がモロ見えの結末になりそうです。これにより皇室典範は有名無実となります。いづれ憲法もそうしたいのでしょう。きちんと時代の変化や国民や当事者のことなど考えて法と真摯に向き合う気配すらありません。
まあ、小生には現政権の悪口などいくら言っても詮ない事と感じられます。それを選ぶ大多数(なんでしょうね???)の国民に対して、ただただ深い失望を感じるのみであります。そういうふうに教育やシステムや報道で誘導されているにしても、この情報化社会で、なぜ平和を考えること、得難い民主主義を放棄するのでしょう。
とかいいながら、小さなウーファーって、矛盾かな…とかばかり考えています。

[PR]
by digressive | 2016-12-29 19:59 | すみません、取り乱しました。 | Comments(0)
 
radiko タイムフリー が便利な件

タクシー乗務中、お客様の乗っていない時には、よくラジオを聴いている。面白くなってくると、お客様が乗ってくるのが常である。どうしても聞き逃した感が強い時には、後日ポッドキャストとかで聴けないかとやってみるが、なぜか聞きたいコーナーに限ってポッドキャストがなかったりすることが多い。まあ、そんなもんかと思っていたが、radikoの「タイムフリー」というのが始まった。1週間以内なら、聞き逃したラジオ番組がいつでも再生できる。早速、今日は家で掃除をしながら、radikoがタイムフリーの宣伝に作った宇多田ヒカルが新しいアルバムの曲を自分で紹介しながらかけまくるというアンビリーバボーな昨日の番組を、radikoの思惑通りにタイムフリーで検索して聴いていた。これはなかなかグーである。一部、タイムフリーでの再生を拒否している音楽の人もいるらしいが、まあ、宇多田ヒカルが自分で率先して新しいアルバムを1週間聞き放題にしたのだから、気にするほどの事ではなさそうである。これはいい。

追記

聞き放題などと喜んでいたが、3時間という制限があった。しょっぺ〜なぁ〜

[PR]
by digressive | 2016-10-13 00:01 | すみません、取り乱しました。 | Comments(0)
 
raspberry pi 3 + USBメモリ型キーホルダー!
f0021035_18460864.jpg
ラズベリーパイでWAVEの音楽データのランダム再生を目指したわけだが、やはりメディアの問題がある。ここはUSBメモリがスマートであろう。容量的に問題が?と思ったら、
キーホルダータイプの 512GB USBメモリ である! ヤフオクで2,000円弱で購入した!!
512GB である!
夢のようである!!がしかし、小生は キーホルダー型の512GB大容量USBメモリだと思って、喜んで購入したわけだが、実際は

512GBのUSBメモリータイプキーホルダーであった。

さらに分かりやすく言うと、キーホルダーの形をしたゴミである。まあ、そんなもんだろう。
計画を WAVE から MP3 に変更するとして、USBメモリの正規品となると、32GBか64GBがコスパ的によかろうか、ということで、上記のキーホルダーよりも少しお安い64GBを購入した。キーホルダーと格闘したあとなので、本物のUSBメモリって、こんなに便利なのかと驚愕した!なんとも、我ながら、わかりやすいアホである。
f0021035_18460655.jpg
ドングルにしか見えないが、データがサクサクと読み書きできる・・・・あたりまえか!?

教訓-普通に使用目的のあるメディアはちゃんと買え・・・・・・・あたりまえか?

[PR]
by digressive | 2016-09-15 19:01 | すみません、取り乱しました。 | Comments(0)
 
UCC さすが!
f0021035_14534931.jpg
反省した様子は皆無だが、さすがにカンネンはしたようである。小生としては最後っ屁で解散までいってくれるとオモシロイと思ったのだが、さすがに阻止されたようである。まあ、彼にしてみれば、みんな時速100キロでぶっ飛ばしている環八で、65キロで走っていた自分だけスピード違反の切符を切られたようなモノだろうから、納得はいかんだろう。週刊誌も微妙なところを攻めるものである。まあ、都税を千何百億円もドブに捨てた話よりも、こっちの姑息な話の方が読者の意識に訴えるものは大きいのかもしれない。そもそもインテリイメージのタレント議員を引っ張り出して都知事にした与党もずいぶんと都民を馬鹿にしたものだが、予想通りに投票する都民が本当に馬鹿ばかりだからどうにもならない話である。

そんなくだらないコトはいいとして、UCCである。
f0021035_15194704.png
もう20年ほども前になろうか、最初にこいつを見つけて飲んだ時には驚いたものである。缶でコーヒーというのはあきらめていたのだが、こいつはコーヒーの味がした。しばらくは毎朝飲んでいたものである。昨今は類似の商品がいろいろと販売されて、UCCの独壇場ではなくなってきていたが、さて、いまだに加糖で飲める缶コーヒーというのはなかった。超微糖でも砂糖水である。甘すぎて気分が悪くなる。が、しかし、甘くても飲めるアイスコーヒーを発見した!またもやUCCである。さすがである。
f0021035_14534300.jpg
f0021035_14534184.jpg
UCC BEANS & ROASTERS COLD BREW
こいつは程よい甘みで、スッキリした味で飲める。各メーカー、頑張って真似してほしい。

[PR]
by digressive | 2016-06-15 15:30 | すみません、取り乱しました。 | Comments(0)
 
天皇陛下に手を振った件
f0021035_12320779.jpg
昨日、タクシー乗務中、十字路の赤信号の先頭で止まったら、さっぱり信号機が赤から変わらない!?こりゃ故障かと思っていたら、天皇陛下の乗った大きな黒い車が前を通り過ぎていった。一般愚集のDNAか、思わず手を振ってしまった。天皇陛下は窓を全開にしてニコニコと手を振っておられた。防弾ガラスの意味なくないかと、ちょっと思った。
[PR]
by digressive | 2016-06-01 12:52 | すみません、取り乱しました。 | Comments(0)
 



人間は、考える足である。
by ラーメン
S M T W T F S
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30 31
カテゴリ
リンク

おやつ会

人との交流が人を育てます。


ホームページ作成
WEBデザイン(Perl PHP MySQL)
グラフィックデザイン
CI 各種印刷物 広告 SP
はじめました。

■□■□■□






RandomReading《読書記録》
通勤電車が私の書斎さ。
■□■□■□






WEBカラーネーム

WEBカラーチャート

「もう一つの日本」
どう展開するのか、見えませんが楽しみです。

放射NO! 防御プロジェクト
フェイスブック発、自分の身は自分で守ろう

植草一秀の『知られざる真実』
頑張れミラーマン

世に倦む日々
無料版です

奥の横道(写真)
携帯で写真を撮りだすとクセになる。

マニア・マニア
何が彼らをそこまで駆り立てるのか?

天木直人.com
多少偏向していそうだが、
文春よりは参考になる


きっこのブログ
謎のブログ、リンクしていいのかな?

とりまきメモ
ブログというより、日記帳ですね。

LINK MEMO
小生の勝手なリンク集


小金井市の地域SNSです
WEB デザイン モリ のページもあります。

アメブロもよろしく。

pixiv

twitterフォロー ミー

上のボタンが好きな背景色で作れます


青空文庫


お気に入りブログ
ライフログ
以前の記事
2017年 10月
2017年 09月
2017年 08月
2017年 07月
2017年 06月
2017年 05月
2017年 04月
2017年 03月
2017年 02月
2017年 01月
2016年 12月
2016年 10月
2016年 09月
2016年 08月
2016年 06月
2016年 04月
2016年 03月
2016年 02月
2016年 01月
2015年 12月
2015年 11月
2015年 10月
2015年 09月
2015年 08月
2015年 07月
2015年 06月
2015年 05月
2015年 04月
2015年 03月
2015年 02月
2015年 01月
2014年 12月
2014年 11月
2014年 10月
2014年 09月
2014年 08月
2014年 07月
2014年 06月
2014年 05月
2014年 04月
2014年 03月
2014年 02月
2014年 01月
2013年 12月
2013年 11月
2013年 10月
2013年 09月
2013年 08月
2013年 07月
2013年 06月
2013年 05月
2013年 04月
2013年 02月
2013年 01月
2012年 12月
2012年 11月
2012年 10月
2012年 09月
2012年 08月
2012年 07月
2012年 06月
2012年 05月
2012年 04月
2012年 03月
2012年 02月
2012年 01月
2011年 12月
2011年 11月
2011年 10月
2011年 09月
2011年 08月
2011年 07月
2011年 06月
2011年 05月
2011年 04月
2011年 03月
2011年 02月
2011年 01月
2010年 12月
2010年 11月
2010年 10月
2010年 08月
2010年 07月
2010年 06月
2010年 05月
2010年 04月
2010年 03月
2010年 02月
2010年 01月
2009年 12月
2009年 11月
2009年 10月
2009年 09月
2009年 08月
2009年 07月
2009年 06月
2009年 05月
2009年 04月
2009年 03月
2009年 02月
2009年 01月
2008年 12月
2008年 11月
2008年 10月
2008年 09月
2008年 08月
2008年 06月
2008年 05月
2008年 04月
2008年 03月
2008年 02月
2008年 01月
2007年 12月
2007年 11月
2007年 10月
2007年 09月
2007年 08月
2007年 07月
2007年 06月
2007年 05月
2007年 04月
2007年 03月
2007年 02月
2007年 01月
2006年 12月
2006年 11月
2006年 10月
2006年 09月
2006年 08月
最新のコメント
GoogleのAPIで叩..
by かえる at 16:27
たいていのブログに準備さ..
by digressive at 22:48
つまり、グーグル(全体の..
by かえる at 10:39
ワードからgoogleの..
by digressive at 19:06
googleの検索フォー..
by digressive at 18:59
これは...グーグル指定..
by かえる at 11:14
仕事でやらされたこともあ..
by digressive at 22:52
もしや、スカイプやってま..
by かえる at 15:19
プア派としては、100均..
by digressive at 22:11
ことしの夏には、グーグル..
by かえる at 11:20
最新のトラックバック
Macの音楽をオーディオ..
from ちょっとOldなMacの話
グランベリーモール町田
from アウトレットモール・パーク【..
「セオリー」アウトレット
from 町田アウトレット【グランベリ..
アロワナ
from アロワナ
進行中の環境問題
from バナナペーパー!?環境問題を..
バナナが地球を救う。
from バナナが紙に!?そんなバナナ..
インクジェットプリンター..
from ネット専用商社 特選館
【携帯】 アップルの「i..
from 【究極の宗教】Physica..
お得なえびの高原温泉に関..
from 宮崎エリアnavi
TOEIC勉強法
from TOEIC勉強法
検索
その他のジャンル
ファン
記事ランキング
ブログジャンル
画像一覧