はじめてのにき

2007-04-01

_ 僕と目覚まし

なんか明日はスキーらしいのでこう早く寝ようと思って、目覚ましをかけようと思ったら止まっていた。

困ったなーと思いながらケータイの目覚ましセットして洞窟やってたら結構時間が経ってたので、これはいけないと思ってコンビニに電池を買いに行った。

結果、肉まんとかアイスとか買ったけど電池を買い忘れた。

困ったなーと思いながら洞窟やってたらなんか洞窟の掲示板とかのレベルがアレな会話が楽しくて見入ったりして、これはいかんと思って買いに行こうかと思ってその前にと思って家探したら電池見つかって今。

6時起きなんだがなぁ。

(03:45)

_ アイレム

のサイトの謎を解いたら 17MB の動画が。

えーとみんなこれ落としてるから遅いってことでいいですか。

(04:04)

_ SKI

楽しかった。

なんか行きのバスがなんかえらい遅くなって、どうしたんだろうなーと思ったら安全地帯みたいなので止まってエンジン不良とか言って、なんか国道警備隊みたいなのが旗ふってたり発煙筒があったり色々面白かったのだけど、結論としては単に到着が遅れたとか。

スキーそのものは俺はこうかっこよくターンするとかジャンプするとかはまるっきりどうでもよくて、明らかに自分のキャパ越えした速度を出してそれを必死で制御しようとして吹っ飛びつつコケるとかが好きみたいでそういうアホさは死ぬまでこうなんだろうなぁと。スキーで生傷作るとは思わなんだ。

しかしまぁレジャースポーツは楽しいなぁと。

あとまぁプレゼンの締切が昨日だったと気付いてあー忘れてたなー(昨日ゲームばっかやってたのになー)と思ったのだけど、帰ってきてみると本当は今日なのであった。いずれにせよあと2時間かーという

(21:56)

[ツッコミを入れる]

2007-03-31

_ コードの行数

#\
i\
n\
c\
l\
u\
d\
e\
<\
s\
t\
d\
i\
o\
.\
h\
>
m\
a\
i\
n
(
)
{
p\
u\
t\
s
(
"\
H\
"
"\
e\
"
"\
l\
"
"\
l\
"
"\
o\
"
"\
!\
"
)
;
}

http://d.hatena.ne.jp/RiSK/20070331#1175310647

http://d.hatena.ne.jp/Ozy/20070331#p1

K&R P.288 A12.2 行の併合よりたぶん合法

(14:10)

_ emacs が落ちる件

円記号とかを入力すると落ちる。 ASCII に使うフォントを 7x14 じゃなくすれば落ちなくなる。

3点問題があって、

ペースト時にバックスラッシュが円記号になる(悲劇)
Emacs 文字が無いと落ちる
フォントが不十分

さてどうしたものか。適当に 7x14.bdf に円記号入れてみたつもりだけどうまくいかんかった。

(14:53)

_ Content-Encoding: DeFLaTe

http://cvs.m17n.org/~akr/diary/

なるほどなー。 Wanderlust とかがヘッダにヘンな文字混入させたりとかと同じノリかぁ。

見事に curl がダメぽってるわけだが。

あれでも Accept-Encoding 無いクライアントとか HTTP/1.0 に対しても Content-Encoding ってつけていいんだっけか。

(15:40)

_ 洞窟

洞窟物語ばっかやってた。

なんかとりあえず隠しステージみたいなのは出したがなかなか難しくて良い。

キーボードだとキツいかもしれないし、クリアできるかもしれない、ってかんじ

(23:42)

[ツッコミを入れる]

2007-03-30

_ iPhone

なんかジョブズのキーノートをだらだら見る。なんか結局これは全然いらない物体な気がした。

てかこれソフトウェアキーボードなんだよな。こうその時点で最近感じている Apple のキモさ全開だなー

(00:25)

_ bracket

勝てた。嬉しいね。シンプルな割に色々考えられて良い問題だったかなと思う。 Ruby&Perl は、要は正規表現を使うのを減らすっていう通常のゴルフと逆方面の方針がうまくハマるのが面白かった。最後に縮めるまでは、

#!perl -pl
1while s/^([[{(<]*)(\[]|\(\)|{}|<>)/\1/;
$_.=s/[[{(<]+/failed at: /?!$'&&EOL:yes

と

#!ruby -pl
sub$1,''while/^[[{(<]*(\[]|\(\)|\{}|<>)/
$_=/[[{(<]+(.+)?/?"failed at: #{$1||:EOL}":'yes'

とかで、 sed とだいたい似たことやってる感じだった。

ySasさんのコードはいつも読めないので後で読むことになってるのだけどなんか今回は読んで見ると簡単だった。超綺麗だなあ。とりあえず redo という関数を知った。あと \G は明らかにこの問題にはマッチしてないけどこいう使い方できるんなら他の問題でうまく使えそうだなと。

http://golf.shinh.org/reveal.rb?Bracket+Matching/ySas/1175170873

僕のコードは、

$+^$&^'3'|0

という部分が

8>ord($+^$&)

よりは短いしいいか…というものなのだけど、もうちょい縮みそうな気がヒシヒシとする。特に ($+^$&)&x とかしてやるとマッチしてる場合はヌル文字になるのだけど、ヌル文字は Perl では true なのであった…! というどうでもいいことに気付いたとかそんな。

ちなみに僕のコードは何してるかというと、括弧がマッチしている時は $+^$& が 1 か 2 か 6 になるので、 '3' と xor 取ったらなんかちょうど 1 2 6 の時は 0以外の数値になって、そうでない時は文字列になってるみたいだったので、なんでもいいから |0 とかすることによって数値にしてやると 0 と非ゼロにわけられる、と。

あと

http://www.nmt.ne.jp/~ysas/diary/?200703c&to=200703291#200703291

を見て、 ySas さんも苦労して考えてらっしゃるのだなぁと少し安心というか。

(02:19)

_ はずかしいコード

でも修正したくなるような間違いをするだけコードを書くってのもそれはそれで大変という

http://d.hatena.ne.jp/w_o/20070329#p1

適当に書くとすると

mian(){puts("Hello, world!");}

ううむ別に修正したくならない。

まぁそれ以前に3000行とか書けましぇん。

あ、 5000行くらい生成したことなら。

(02:25)

_ shinichiro-hamaji でぐぐった

ら

http://shinichiro.hamaji.googlepages.com/

こんなのでてきた。作った覚えないという。

http://shinh.skr.jp/m/?date=20060828#p08

でも俺が作ったらしい。ああそうですか。

あと、そういえば今日あまり記憶に無いことを日記に書いていたとかほげほげ。

http://shinh.skr.jp/m/?date=20070217#p12

なるほど。

これはつまり目覚ましと勘違いしたせいでゴルフサバ長時間止まるというそういう。

ところが今だと朝起きたらまくぶくが何故かフォーカスあたってるウィンドウ内の文章を読み上げる機能がオンになってるとかそのくらいの被害ですむので非常によろしい。

(02:57)

_ いや

比較的軽微な被害ではあるけど、朝起きたら誰かがブツブツ喋ってるってのは怖いんだよ!!

(03:01)

_ 3000-10000

なるほどここか

http://d.hatena.ne.jp/softether/20070324#p1

すごいなー。

1日10000行って10時間で書いたとすると1分16行とかいうペースかぁ。

1分で1バイト削れたらいいのだが。

(12:22)

_ カルディ

なんかコーヒーが半額でかつレジで10%引きとかやってた (つまりたぶん55%引きなんだろう) ので嬉しくて二つ買ったんだけど、俺アメリカ行くんじゃないのかーという

(21:14)

本日のツッコミ(全3件) [ツッコミを入れる]

_ ySas [いつも頭絞ってるつもりですが、狂気の神様が降りてくるのは稀ですね。ところでbracket matchingですが、前..]

_ shinh [おおおこれはすごい。この部分絶対縮むよなーとは思ってたのですが自分ではできなかったです。せっかくですし、もし良ければ..]

_ あろは [むしろ僕のような趣味グラマーがなんかソフトを書きはじめる場合，良さげなライブラリ見つける ↓ これを使えば，これ..]

2007-03-29

_ 洞窟物語

クリアした。非常に面白かった。

ジョイパッド使えるようにするのがめんどかったのでキーボードだけになったけど、まぁちょうどいいくらいの縛りだったような

(03:03)

_ 調べた感じ

隠しダンジョンとか行くにはもう一周しないといけなさげだなめどいな

(03:12)

_ L system

http://jarp.does.notwork.org/diary/200703c.html#200703281

なるほどこれはうまいですねぇ。

ただループはこれで縮みます。

n,$_,*h=$<.read.split
'0'.upto(n){puts$_
  gsub(/./){Hash[*h][$&]||$&}}

(03:29)

_ あと1B

gets$9
n,$_,*h=split
'0'.upto(n){puts$_
  gsub(/./){Hash[*h][$&]||$&}}

(03:37)

_ FizzBuzz.out

http://golf.shinh.org/p.rb?FizzBuzz#x86

なかなかチャレンジしがいがありそうです。でも本気でやるのは相当大変だよなー。

とりあえずエルフヘッダは

db 0x7F, "ELFizz", 10, "Buzz", 10, "01", 10

とかそんな感じで埋めろってことですよねこれは! いやー F で終わっててホント良かったです

(15:46)

_ 普通に考えて

fzbz: db "Fizz"
buzz: db "Buzz", 10

とか埋めるだろーと思った。

(15:58)

本日のツッコミ(全1件) [ツッコミを入れる]

_ Kxgqfcio [この間も俊太郎の詩をお http://www.stlouisbusinesslist.com/business/5..]

2007-03-28

_ w3mimg とえみるたん

ttp://www.math.cas.cz/~jerabek/

の人が

と見えてたので女性に見えた

(20:16)

[ツッコミを入れる]

2007-03-27

_ Befunge

http://www.nmt.ne.jp/~ysas/diary/?200703c&to=200703261#200703261

1秒です。 bracketに関してはRubyも割とギリギリだったりするのでにんともかんともという感が。

全体的にもうちょい timeout 長くしてもいいですかねぇ… というか問題作る時に設定可能にするのが正解かしらん。

irori さんが #mazop で unlambda の遅さをボヤいておられるのをみかけるたびになんとかしたいもんだとは思うのだけど

(02:57)

_ roman.pl

そういえば大幅に縮められたのであった。うまくやれたかなとは思うものの、そこまですばらしいものではないので、なんというか Ruby のベタ移植で作った Perl コードは Ruby 由来な部分をもっと疑った方がいいなぁというか。

(03:00)

_ む

bdaikanyama.hatena.ne.jp とかのリファラが。

フツーに社内サーバかな

(15:06)

_ 神保町

今日は大学行く日だなーと思ってたのだけど、気がついたらNIIの前だった

(16:17)

_ でまあ

逆方面乗った

(16:18)

_ でまた

逆方面乗った

(23:29)

本日のツッコミ(全2件) [ツッコミを入れる]

_ irori [Unlambdaはインタプリタ替えていただいたお陰でとても快適になりました。ありがとうございます]

_ shinh [えみるたん萌え!!]

2007-03-26

_ niku

irb(main):008:0> Socket.gethostbyname('a.b.c.d.niku.2ch.net')
'SocketError: getaddrinfo: No address associated with nodename
        from (irb):8:in `gethostbyname'
        from (irb):8
irb(main):009:0> Socket.gethostbyname('s.p.a.m.niku.2ch.net')
=> ...

なるほどなー

(06:42)

_ すすごい

http://www.warewaredan.com/blog/2007/02/31.html

どんなメンツやねんこれ

(16:31)

_ 山本夜羽音

http://d.hatena.ne.jp/johanne/

あとマンガはなんか活動再開みたいな感じなんだろうか

http://d.hatena.ne.jp/keyword/%BB%B3%CB%DC%CC%EB%B1%A9%B2%BB

下二つだけごく最近

(16:40)

_ ふむり

http://wtl.rdy.jp/w/

なんか四国は速いらしい。さすが DB 嫌いの拙者でござるよというか

http://wtl.rdy.jp/d/wtl/2_0.htm

(16:51)

_ 人狼物語

http://asbntby.sakura.ne.jp/sow/

なんか色々増えてるんだなぁ

(16:59)

_ あ

なんか村いっこ消すんだった

(17:02)

_ epr

http://hp.vector.co.jp/authors/VA011700/physics/trivial.htm#epr

ベルとかはどうでもいいらしい。

(18:31)

_ C#

なんか微妙に C# ゴルフやってる人がいるみたい。

で、なんかこちらの

http://d.hatena.ne.jp/siokoshou/20070325#p1

「問題をいろんな面から～」のあたりにとても共感したのでちょっと C# で遊んでみた。 hello と invert でとりあえず同点首位に。

でも invert の statistics が全然違うのは老後の課題でしょうか…

(19:11)

_ 単独首位に

http://golf.shinh.org/p.rb?invert+case#C#

わいわい。でもこの #C# って URL はいかにも RFC 的にらめええな気が

(19:13)

_ dio

ttp://pixelwr.ath.cx/dio/

似たような

http://d.hatena.ne.jp/shinichiro_h/20041001#1097681359

(23:57)

本日のツッコミ(全3件) [ツッコミを入れる]

_ siokoshou [C#のテニス214って…]

_ shinh [あああすいません214Bはほとんどまんまパクリでして、ホントは適当にパディングしてsubmitしてチェックしようとし..]

_ siokoshou [あ～、なるほど！しかし、下の例は凶悪ですねｗ]

2007-03-24

_ まかーになりました

http://jijixi.azito.com/cgi-bin/diary/index.rb?date=20070323#p01

えええええ。僕に関してはまさにその通りの意味で自嘲を込めて言っていまする。まぁ普通に考えて僕は別に無害な部類のMacユーザーではあるんだろうけど、昔の僕が今の僕を見れば間違いなくウザいと侮蔑するだろうし…というようなそんな

(00:38)

_ ううん

なんかつまり、「まかー」になることが耐えがたい屈辱だっていうことだってだけなのだけどなぁと

(02:54)

_ kskさんすごいなぁ

テトリス。

ゆっくり考えるとなんとかなる範囲だったなぁという感じ。

2点見落としがあったみたいなので適当に post-mortem で指摘みたいな

(12:36)

_ にはさんが

来たのでゴルフ合宿の様相を

それでいいのだろうか

(23:19)

_ goruby

def method_missing(s)
  s.to_s
end
def Object.const_missing(s)
  s.to_s
end

if __FILE__ == $0
  puts yes
  puts EOL
end

Bareword サポート

(23:51)

本日のツッコミ(全1件) [ツッコミを入れる]

_ niha [p2sやp3でputsが呼べたら幸せだよなーと思ってコード書いたけどだるいので消しました。ほとんどのメソッドが3B以..]

2007-03-23

_ おお

面白い

http://cvs.m17n.org/~akr/diary/2007-03.html#a2007_03_12_2

via http://alohakun.blog7.fc2.com/blog-entry-707.html

まぁ lightning もそんな感じだったりはする。

/* N byte NOPs */
#define NOPi(N)         (((  (N)    >= 8) ? (_jit_B(0x8d),_jit_B(0xb4),_jit_B(0x26),_jit_L(0x00),_jit_B(0x90)) : (void) 0), \
                         (( ((N)&7) == 7) ? (_jit_B(0x8d),_jit_B(0xb4),_jit_B(0x26),_jit_L(0x00)) : \
                          ( ((N)&7) == 6) ? (_jit_B(0x8d),_jit_B(0xb6),_jit_L(0x00)) : \
                          ( ((N)&7) == 5) ? (_jit_B(0x90),_jit_B(0x8d),_jit_B(0x74),_jit_B(0x26),_jit_B(0x00)) : \
/* leal 0(,%esi), %esi */ ( ((N)&7) == 4) ? (_jit_B(0x8d),_jit_B(0x74),_jit_B(0x26),_jit_B(0x00)) : \
/* leal (,%esi), %esi */  ( ((N)&7) == 3) ? (_jit_B(0x8d),_jit_B(0x76),_jit_B(0x00)) : \
/* movl %esi, %esi */     ( ((N)&7) == 2) ? (_jit_B(0x89),_jit_B(0xf6)) : \
                          ( ((N)&7) == 1) ? (_jit_B(0x90)) : \
                          ( ((N)&7) == 0) ? 0 : \
                          JITFAIL(".align argument too large")))

http://mkosaki.blog46.fc2.com/blog-entry-104.html

の関係で教えてもらった時に調べた

http://shinh.skr.jp/m/?date=20070214#p05

での linux での数字と一致してるにゃん☆

(00:09)