vallog: 2012/10

2012/10/27

読んだ。

こんなぶっ飛んだ内容を事細かに想像して読者に映像を思い浮かばせつつかつ破綻せず筋の通る理由まで考えて、しかも面白いなんて天才と書いてマジキチだわ。お陰様で読むのがとても楽しかった。

とJ.P.ホーガンのSFを読んできて、今回ライフメーカーシリーズを読んだ。どれも面白かったけど、あえて選ぶと「星を継ぐもの」と「未来の二つの顔」が特に好き。次に創世記機械かなあ。

ホーガン作品は手元にあと2冊ある。

どちらから読もうか。

2012/10/22

2012/10/19

Scheme to x86コンパイラ : lisp_ja

てすと

アプリあるんやね。

無題

galaxy s2にcyanogenmod9入れた話とか、需要ないけど便利だと思って使ってるアプリのこと書いときたい。あと最近買った本と読んだ本。

最近なんでブログ書く頻度が落ちたのか考えてみた。

忙しかった
携帯でFacebook, Twitter, Tumblr, その他携帯アプリばっかり見てる、もしくはTumblrばっかり見てる
チャリ乗ったり筋トレしたりする時間が増えた
Emacsを使う頻度が下がって思いついたことを即座にメモる習慣がなくなった

かな。携帯って閲覧しやすいけど入力しづらいよな。

雑なリマインダ

「客先のfooさんにhogeの件で電話をかける」などのタスクはGoogle CalendarやGoogle Tasksで管理している。でも実際電話したら不在だったので「30分後にもう一度電話する」というタスクを忘れてしまう。ということで、こんな雑なリマインダを使ってる。

reminder — Gist

	@ECHO --------------------------------------------
	@ECHO 指定秒後にメッセージを表示します
	@ECHO --------------------------------------------

	@SET /p MESSAGE_TEXT="メッセージを入力して下さい > "
	@SET /p SLEEP_SECONDS="待機秒数を指定して下さい > "

	@TIMEOUT /T %SLEEP_SECONDS% /NOBREAK
	@MSG console %MESSAGE_TEXT%

view raw reminder.bat hosted with ❤ by GitHub

リマインダが欲しいけど、そのためにソフトを常駐させるのも嫌なので、こんなの使ってる。

そういえば以前こんなの作ってた。console版のプログレスバー付きタイマーといったところ。notify-sendと組み合わせればリマインダになるな。

progress-timer.scm

	#!/usr/local/bin/gosh

	(use srfi-13)
	(use text.progress)
	(use gauche.parseopt)

	(define (usage)
	(print "Usage: progress-timer [options ...] message")
	(print " - t\|title : default empty")
	(print " - s\|sleep : 3m = 3 minutes")
	(print " 3s = 3 seconds")
	(print " 3 = 3 milliseconds")
	(print " defualt 0")
	(print " - h\|help : usage")
	(exit 2))

	(define (num-format cur max)
	(format "~3d%" (round->exact (/. (* cur 100) max))))

	(define (decompose-unit unit)
	(let1 len (string-length unit)
	(rxmatch-if (#/[0-9]+$/ unit)
	(num)
	(values (x->integer num) 'default)
	(values (x->integer (string-take unit (- len 1)))
	(string->symbol (string-drop unit (- len 1)))))))

	(define (unit->millisecond unit)
	(receive (num suffix)
	(decompose-unit unit)
	(* num (case suffix
	((s) 1000)
	((m)(* 1000 60))
	(else 1)))))

	(define (main args)
	(let-args (cdr args)
	((title "t\|title=s" "timer")
	(n "s\|sleep=s" "0")
	(h "h\|help" => usage)
	. rest)
	(let ((p (make-text-progress-bar :header title
	:header-width (+ (string-length title) 1)
	:num-format num-format
	:num-width 5
	:max-value 100
	:port (current-error-port)))
	(interval (/ (unit->millisecond n) 100))
	(message (and (not (null? rest))
	(car rest))))
	(dotimes (i 100)
	(p 'inc 1)
	(sys-nanosleep (* interval 1000000)))
	(p 'finish)
	(when message
	(print message)))))

view raw progress-timer.scm hosted with ❤ by GitHub

と、思ったら、こんなの作ってた。

vallog: notify-sendでラーメンタイマーというかリマインダ（ubuntuおまけでcygwin+growl for windows）

複数のPCで一つのモニタを共用してるけど今操作しているPCの本体がわからないとき

CD/DVDドライブを開けるとわかる。WindowsであればマイコンピュータのCD/DVDドライブを右クリックして取り出し。

間違って印刷してしまった時は

用紙トレイを引き出す、が正解。キャンセルしてもとまんねーし、プリンタの電源を切ると用紙が詰まるし。（上司に教えてもらった）

無題

ちなみに日記は2012/05/18から毎日書いてる。

OhLife helps you remember what's happened in your life

日記が続いたことのない人にオススメ。あと懸垂も平日毎日続いてる。普通の懸垂を11回、バックビハインドを5回。あと気が向いたら帰ってから腕立て腹筋スクワット。去年の11月に筋トレ始めたので、もうすぐ一年。よく続いてて関心する。

近況

しごと

7〜9月は出張ラッシュで、長崎、鹿児島、横浜、大阪、香川と忙しかった。横浜出張が多くて、昨日一昨日も横浜出張だった。8月は半分くらい横浜にいた。来週はまた香川（小豆島）。

じてんしゃ

7月にロードバイク買って通勤で乗ってる。半袖半ズボンにSPDペダルで通勤してる。にわかなので月に200kmくらいしか乗ってない。上司は月600kmくらい乗ってるけど、ガチの人からすればそれでもまだまだらしい・・・。休みの日はたまにチャリで山を登るなど。

チャリはこれ

ロードバイク、マウンテンバイク(MTB)、FUJI track(フジトラック)/ピストバイク｜FUJI BIKE [フジ自転車],株式会社アキボウ

必要なものがいろいろあって結構金がかかった。5月に結婚披露宴をやったばっかりで、お金がなくてなかなかしんどい。

Rakuten: TNI high pressure floor pump- Shopping Japanese products from Japan

残るはgarminがあればひと通りOKか？諸事情で携帯のGPSが死んでしまい、Endomondoが使えずツライ。

ガーミン | 製品 | Into Sports | edge_500

無題

ブログ書いてなさすぎ。書きたいことはたくさんある。しばらくブログを書いていなかったら、書く習慣が消え去ってしまったらしい。ちょっと前はたくさん書いていたのに。習慣って怖い。書く習慣を復活させたい第一弾終わり。

vallog

2012/10/27

2012/10/27

2012/10/26

2012/10/26

ライフメーカー

2012/10/22

2012/10/22

2012/10/19

2012/10/19

てすと

無題

雑なリマインダ

複数のPCで一つのモニタを共用してるけど今操作しているPCの本体がわからないとき

間違って印刷してしまった時は

無題

近況

しごと

じてんしゃ

無題

2012/10/15

2012/10/15

2012/10/11

2012/10/11

2012/10/09

2012/10/09

2012/10/03

2012/10/03

2012/10/01

2012/10/01