tputでterminalサイズいっぱいにランダムに背景色を設定し続けるサンプル。わさおがKPFのLTでちらっと見せてくれたのを思い出して真似してみた。あれはコレ↓を使ったやつなんだろうけども。
tput colsとlinesでterminalのサイズを取得し、ランダムな座標にランダムな背景色を指定し続ける。
こんな感じ。
スクリプトはGauche。tputの実行はgauche.processモジュールのrun-process、tputの実行結果取得はprocess-output->stringで。
下のはtput colsでterminalの幅を取得してランダムな背景色を指定しつつ行末まで行ったらreturnして行頭に戻ってループ。
まあ、両方ともあんまり意味はない。ヒマだったんだ。
0 件のコメント:
コメントを投稿