<h3>リリカルなのは</h3>
<p>作画云々のアレで知ったのだけど、とらハなのか、あー。</p>
<p>関係ないけど、ぼかぁ個性が出てる方が好きです、ぇぇ。</p>
<h3>ギガ人</h3>
<p>いつも3ペインだけど本文が下ーの方に行っている WinIE@横幅800pxぐらい なんだけどみんな気にしないのかな。ギガ人見てるような geek な人は Firefox, もしくは横幅すげぇ広いディスプレイつかってて横長ーな表示で見てるとかなのかな。ちなみにディスプレイの横幅は今は1920です。</p>
<h3>あちー</h3>
<p>とけるよ。ガリガリ君（ソーダ）が食べたい。</p>
<h3>ホッテントリ・タイトルメーカー</h3>
<p>ホッテントリ（30 users 以上目安) のタイトルをぶっこぬいて形態素解析してそれっぽいタイトルにして出力する。次のダイアリー有料オプションの目玉機能。</p>
<p>*hot*</p>
<p>と見出しを書くことで利用できる。どうぞご利用ください。</p>
<h3>家だと</h3>
<p>メインマシンにぷろるらみんぐかんきょうが全くないため全く何もかもやる気が起こらないなぁ。。</p>
<h3>もちを</h3>
<p>たのしいなぁ。ぼくにはむつかしいけど＞＿＜ノ</p>
<h3>最近のマイブー</h3>
<p><a href="http://www1.kagome.co.jp/cgi-bin/products/search.cgi?A=3573">http://www1.kagome.co.jp/cgi-bin/products/search.cgi?A=3573</a></p>
<p>おにぎりにあう</p>
<h3>2nd life / 菅野よう子</h3>
<p>ジュナ！ジュナ！</p>
<h3>work</h3>
<blockquote>
<p>てかあれ仕事だったのか。</p>
</blockquote>
<p>昨日のまでは趣味です！</p>
<h3>DS</h3>
<p>リリース前に電池切れた。べつのひとのDSがあってよかった。</p>
<h3>Dance of Curse / 菅野よう子</h3>
<p>エスカ！フローネ！</p>
<h3>ImageMagick でネガ</h3>
<pre><code>convert -solarize 0% example.jpg example2.jpg
</code></pre>
<p>みたいな</p>
<h3>チンコパット</h3>
<p>デュアルディスプレイやミラーリング表示あたりの切り替えやるとよくハングアップする…。むーん。</p>
<h3>チャリ通勤10分チョイ</h3>
<p>の道のりがめどくなってきた。。徒歩1分ぐらいのところにあればいいのに。</p>

リリカルなのは作画云々のアレで知ったのだけど、とらハなのか、あー。関係ないけど、ぼかぁ個性が出てる方が好きです、ぇぇ。ギガ人いつも3ペインだけど本文が下ーの方に行っている WinIE@横幅800pxぐらい なんだけどみんな気にしないのかな。ギガ人見てるような geek な人は Firefox, もしくは横幅すげぇ広いディスプレイつかってて横長ーな表示で見てるとかなのかな。ちなみにディスプレイの横幅は今は1920です。あちーとけるよ。ガリガリ君（ソーダ）が食べたい。ホッテントリ・タイトルメーカーホッテントリ（30 users 以上目安) のタイトルをぶっこぬいて形態素解析してそれっぽいタイトルにして出力する。次のダイアリー有料オプションの目玉機能。*hot*と見出しを書くことで利用できる。どうぞご利用ください。家だとメインマシンにぷろるらみんぐかんきょうが全くないため全く何もかもやる気が起こ

リリカルなのは作画云々のアレで知ったのだけど、とらハなのか、あー。関係ないけど、ぼかぁ個性が出てる方が好きです、ぇぇ。ギガ人いつも3ペインだけど本文が下ーの方に行っている WinIE@横幅800pxぐらい なんだけどみんな気にしないのかな。ギガ人見てるような geek な人は Firefox, もしくは横幅すげぇ広いディスプレイつかってて横長ーな表示で見てるとかなのかな。ちなみにディスプレイの横幅は今は1920です。あちーとけるよ。ガリガリ君（ソーダ）が食べたい。ホッテントリ・タイトルメーカーホッテントリ（30 users 以上目安) のタイトルをぶっこぬいて形態素解析してそれっぽいタイトルにして出力する。次のダイアリー有料オプションの目玉機能。*hot*と見出しを書くことで利用できる。どうぞご利用ください。家だとメインマシンにぷろるらみんぐかんきょうが全くないため全く何もかもやる気が起こらないなぁ。。もちをたのしいなぁ。ぼくにはむつかしいけど＞＿＜ノ最近のマイブーhttp://www1.kagome.co.jp/cgi-bin/products/search.cgi?A=3573おにぎりにあう2nd life / 菅野よう子ジュナ！ジュナ！workてかあれ仕事だったのか。昨日のまでは趣味です！DSリリース前に電池切れた。べつのひとのDSがあってよかった。Dance of Curse / 菅野よう子エスカ！フローネ！ImageMagick でネガconvert -solarize 0% example.jpg example2.jpgみたいなチンコパットデュアルディスプレイやミラーリング表示あたりの切り替えやるとよくハングアップする…。むーん。チャリ通勤10分チョイの道のりがめどくなってきた。。徒歩1分ぐらいのところにあればいいのに。

2006-07-28

<h3>DSブラウザ</h3>
<p>秋田</p>
<h3>DSブラウザはつらいよ</h3>
<p>onClick などのイベント反応微妙。ていうか2画面モードだと onClick イベント発生しないよ？もーちｎ</p>
<h3>DSブラウザで Logging</h3>
<pre><code>var dsLog = function(str) {
  var url = '/dsLog/' + str;
  (new Image).src = url;
};

dsLog('message');
</code></pre>
<p>で accesslog から</p>
<pre><code>tail -f /var/log/httpd/access.log|ruby -pe '$_.gsub!(/.*GET\s\/dsLog\/(.*)\sHTTP\/1\.1.*/,"\\1")'
</code></pre>
<p>とかる。便利＞＜ノ</p>
<h3>DSブラウザの window オブジェクトのプロパティ</h3>
<p>たぶんこれで全部。</p>
<pre><code>Image
Option
addEventListener
alert
attachEvent
back
captureEvents
clearInterval
clearTimeout
closed
confirm
defaultStatus
detachEvent
disableExternalCapture
document
enableExternalCapture
event
forward
frameElement
frames
getComputedStyle
history
home
img
innerHeight
innerWidth
length
location
name
navigate
navigator
opener
opera
outerHeight
outerWidth
pageXOffset
pageYOffset
parent
print
prompt
releaseEvents
removeEventListener
screen
screenLeft
screenTop
screenX
screenY
self
setDocument
setInterval
setTimeout
status
stop
top
window
</code></pre>
<p>むーん。ちなみに Firefox だとこんなん。</p>
<pre><code>Components
GeckoActiveXObject
Packages
XPCNativeWrapper
addEventListener
alert
atob
back
blur
btoa
captureEvents
clearInterval
clearTimeout
close
closed
confirm
console
content
controllers
crypto
defaultStatus
directories
disableExternalCapture
dispatchEvent
document
dump
enableExternalCapture
find
focus
forward
frameElement
frames
fullScreen
getComputedStyle
getInterface
getSelection
history
home
innerHeight
innerWidth
java
length
location
locationbar
menubar
moveBy
moveTo
name
navigator
netscape
open
openDialog
opener
outerHeight
outerWidth
pageXOffset
pageYOffset
parent
personalbar
pkcs11
print
prompt
releaseEvents
removeEventListener
resizeBy
resizeTo
routeEvent
screen
screenX
screenY
scroll
scrollBy
scrollByLines
scrollByPages
scrollMaxX
scrollMaxY
scrollTo
scrollX
scrollY
scrollbars
self
setInterval
setResizable
setTimeout
sizeToContent
status
statusbar
stop
sun
toolbar
top
updateCommands
window
</code></pre>
<h3>ShebangExecute</h3>
<p>今までは適当な compiler が指定してなかった場合は execute '!' &#x26;ft ' %' で filetype なプログラムを実行してたんだけど、きちんと Shebang 見た方が便利な場面が多々出てきたので。下方互換性は考慮してないのでたぶんvim7以降じゃないと動きません。</p>
<p>つか ShenabngExecute という名前の割に filetype でも実行を試みる、という…。</p>
<pre><code>function! ShebangExecute()
  let m = matchlist(getline(1), '#!$.*$')
  if(len(m) > 2)
    execute '!'. m[1] . ' %'
  else
    execute '!' &#x26;ft ' %'
  endif
endfunction
</code></pre>
<p>で適当にオレオレ execute なキーバインドに設定。</p>
<pre><code>nmap ,e :call ShebangExecute()
</code></pre>
<p>というか、vim.org に shebang で実行する plugin とかありそうなんだけどなぁ。</p>
<h3>お花テーマに変更</h3>
<p>ステキだと思うんですよ！！！</p>
<h3>Rails二歳</h3>
<p>あー。</p>
<h3>的確な指摘</h3>
<blockquote>
<p>実ははまちや２さんは、はてな社員もしくは、いぬビームさんなんじゃないかとおもう</p>
</blockquote>
<h3>黒歴史++</h3>
<p>下痢のため渡米できない</p>

DSブラウザ秋田DSブラウザはつらいよonClick などのイベント反応微妙。ていうか2画面モードだと onClick イベント発生しないよ？もーちｎDSブラウザで Loggingvar dsLog = function(str) {
  var url = '/dsLog/' + str;
  (new Image).src = url;
};

dsLog('message');で accesslog からtail -f /var/log/httpd/access.log|ruby -pe '$_.gsub!(/.*GET\s\/dsLog\/(.*)\sHTTP\/1\.1.*/,"\\1")'とかる。便利＞＜ノDSブラウザの window オブジェクトのプロパティたぶんこれで全部。Image
Option
addEventListener
alert
attachEvent
bac

DSブラウザ秋田DSブラウザはつらいよonClick などのイベント反応微妙。ていうか2画面モードだと onClick イベント発生しないよ？もーちｎDSブラウザで Loggingvar dsLog = function(str) {
  var url = '/dsLog/' + str;
  (new Image).src = url;
};

dsLog('message');で accesslog からtail -f /var/log/httpd/access.log|ruby -pe '$_.gsub!(/.*GET\s\/dsLog\/(.*)\sHTTP\/1\.1.*/,"\\1")'とかる。便利＞＜ノDSブラウザの window オブジェクトのプロパティたぶんこれで全部。Image
Option
addEventListener
alert
attachEvent
back
captureEvents
clearInterval
clearTimeout
closed
confirm
defaultStatus
detachEvent
disableExternalCapture
document
enableExternalCapture
event
forward
frameElement
frames
getComputedStyle
history
home
img
innerHeight
innerWidth
length
location
name
navigate
navigator
opener
opera
outerHeight
outerWidth
pageXOffset
pageYOffset
parent
print
prompt
releaseEvents
removeEventListener
screen
screenLeft
screenTop
screenX
screenY
self
setDocument
setInterval
setTimeout
status
stop
top
windowむーん。ちなみに Firefox だとこんなん。Components
GeckoActiveXObject
Packages
XPCNativeWrapper
addEventListener
alert
atob
back
blur
btoa
captureEvents
clearInterval
clearTimeout
close
closed
confirm
console
content
controllers
crypto
defaultStatus
directories
disableExternalCapture
dispatchEvent
document
dump
enableExternalCapture
find
focus
forward
frameElement
frames
fullScreen
getComputedStyle
getInterface
getSelection
history
home
innerHeight
innerWidth
java
length
location
locationbar
menubar
moveBy
moveTo
name
navigator
netscape
open
openDialog
opener
outerHeight
outerWidth
pageXOffset
pageYOffset
parent
personalbar
pkcs11
print
prompt
releaseEvents
removeEventListener
resizeBy
resizeTo
routeEvent
screen
screenX
screenY
scroll
scrollBy
scrollByLines
scrollByPages
scrollMaxX
scrollMaxY
scrollTo
scrollX
scrollY
scrollbars
self
setInterval
setResizable
setTimeout
sizeToContent
status
statusbar
stop
sun
toolbar
top
updateCommands
windowShebangExecute今までは適当な compiler が指定してなかった場合は execute '!' &ft ' %' で filetype なプログラムを実行してたんだけど、きちんと Shebang 見た方が便利な場面が多々出てきたので。下方互換性は考慮してないのでたぶんvim7以降じゃないと動きません。つか ShenabngExecute という名前の割に filetype でも実行を試みる、という…。function! ShebangExecute()
  let m = matchlist(getline(1), '#!$.*$')
  if(len(m) > 2)
    execute '!'. m[1] . ' %'
  else
    execute '!' &ft ' %'
  endif
endfunctionで適当にオレオレ execute なキーバインドに設定。nmap ,e :call ShebangExecute()というか、vim.org に shebang で実行する plugin とかありそうなんだけどなぁ。お花テーマに変更ステキだと思うんですよ！！！Rails二歳あー。的確な指摘実ははまちや２さんは、はてな社員もしくは、いぬビームさんなんじゃないかとおもう黒歴史++下痢のため渡米できない

2006-07-27

<h3>唐突に、そういえば</h3>
<p>苺ましまろの五巻っていつ出るの？</p>
<h3>擬人化</h3>
<blockquote>
<p>はてなサーバ擬人化とかどうだろう。</p>
<p>病弱の美少女。</p>
</blockquote>
<p>数百数十人姉妹という設定。あなたが死んでも、代わりはいるもの。</p>
<h3>暑い</h3>
<p>あぢー</p>
<h3>ラーメン</h3>
<p>今日はいつもと違うラーメン屋で。大盛りとか替え玉しなかったよぅ＞＜このままじゃ <a href="http://subtech.g.hatena.ne.jp/precuredaisuki/">id:precuredaisuki</a> になっちゃうから＞＜</p>
<p>ただたんに病み上がりで食欲がないだけとも云う</p>
<h3>hasktags</h3>
<pre><code>hasktags -c `find /home/gorou/src/ghc6-6.4.2/libraries -type f -name '*.hs'|tr '\n' ' '`
</code></pre>
<p>で tags 作ってウハウハ！と思ってやってみたんだけど、組み込みの関数(というのか？)のおしりにM(mapMとか)がついていてダメポっぽー？</p>
<h3>日記システムでもないし</h3>
<p><a href="http://journal.mycom.co.jp/articles/2006/07/29/ror/">http://journal.mycom.co.jp/articles/2006/07/29/ror/</a></p>
<blockquote>
<p>まずWebブラウザから「<a href="http://0.0.0.0:3000/">http://0.0.0.0:3000/</a>」にアクセスしよう</p>
</blockquote>
<p>すげぇな。ぽっくんの windows マシンじゃアクセスできないよぅ＞＜ノ</p>
<blockquote>
<p>今後の課題は初期導入の容易性か</p>
</blockquote>
<p>今までに見たことのない発想＞＜</p>
<h3>vim の indent</h3>
<p>indentexpr にソレっぽい関数を渡してやればいいのね。んでそいつが一行前のラインを見て、今どんな風にインデントすべきかを結果として返すと。vim70aa の indent/ruby.vim が簡潔で解りやすかった。最新のは複雑になってムヅイ。</p>
<p>というわけで haskell の文法もよく解ってないけど indent ファイルを書き出した！完成すると良いな。例えば</p>
<pre><code>main = do cs &#x3C;- getContents
          |ここにインデントが来て欲しい
</code></pre>
<p>みたいなときには</p>
<pre><code>let col = strlen(matchstr(getline(lnum), '^.*\sdo\s*'))
  if col > 0
    let ind = col
  endif
</code></pre>
<p>のように書けばおｋ、と。</p>
<h3>vim の挿入モードでインデントを部分キャンセル</h3>
<p>ってできるんだっけ？</p>
<pre><code>main = do cs &#x3C;- getContents
          putStr cs
          |Enter だとインデントでここにカーソルが
</code></pre>
<p>となってキャンセルしたい場合いちいちCtrl-oCtrl-m とかしてるんだけどめどすぎる。</p>
<h3>はすけるのべんきょうをるするぞう</h3>
<p>というわけで runghc(インタプリタ)の方を使った vim の compiler から書き始める俺。回り道万歳！</p>
<p>~/.vim/compiler/haskell.vim</p>
<pre><code>if exists("current_compiler")
  finish
endif
let current_compiler = "haskell"

if exists(":CompilerSet") != 2    " older Vim always used :setlocal
  command -nargs=* CompilerSet setlocal 
endif

let s:cpo_save = &#x26;cpo
set cpo-=C

CompilerSet makeprg=runghc
" example errormsg| hello.hs:3:17: lexical error in string/character literal
" example errormsg| expand.hs:5:16:
"                      Couldn't match `Char' against `String'
"                        Expected type: Char -> Char
"                        Inferred type: Char -> String
"                      In the first argument of `map', namely `expandTab'
"                      In the definition of `expand': expand cs = map expandTab cs

CompilerSet errorformat=
    \%E%f:%l:%c:%m,
    \%+E%f:%l:%c:,%C%m,
    \%-G%.%#

let &#x26;cpo = s:cpo_save
unlet s:cpo_save
</code></pre>
<p>んでオレオレ呼び出しをかいとく</p>
<p>~/.vim/ftplugin/haskell.vim</p>
<pre><code>if (exists("b:did_ftplugin"))
  finish
endif
let b:did_ftplugin = 1

comp haskell
nmap ,e :make %
</code></pre>
<p>これで ,e でインタプリタから即実行ががが！エラー行数にも（たぶん）飛ぶよ！</p>
<h3>NDSもらった</h3>
<p>弊社n氏からもらった！やった！これで脳トレ英語で12歳の英語力並に！！！（なにそれ</p>
<p>とりあえずマリヲ買おう。</p>
<h3>きょうは</h3>
<p>かんすうがたをべんきょうしよう。</p>

唐突に、そういえば苺ましまろの五巻っていつ出るの？擬人化はてなサーバ擬人化とかどうだろう。病弱の美少女。数百数十人姉妹という設定。あなたが死んでも、代わりはいるもの。暑いあぢーラーメン今日はいつもと違うラーメン屋で。大盛りとか替え玉しなかったよぅ＞＜このままじゃ id:precuredaisuki になっちゃうから＞＜ただたんに病み上がりで食欲がないだけとも云うhasktagshasktags -c `find /home/gorou/src/ghc6-6.4.2/libraries -type f -name '*.hs'|tr '\n' ' '`で tags 作ってウハウハ！と思ってやってみたんだけど、組み込みの関数(というのか？)のおしりにM(mapMとか)がついていてダメポっぽー？日記システムでもないしhttp://journal.mycom.co.jp/articles/2006

唐突に、そういえば苺ましまろの五巻っていつ出るの？擬人化はてなサーバ擬人化とかどうだろう。病弱の美少女。数百数十人姉妹という設定。あなたが死んでも、代わりはいるもの。暑いあぢーラーメン今日はいつもと違うラーメン屋で。大盛りとか替え玉しなかったよぅ＞＜このままじゃ id:precuredaisuki になっちゃうから＞＜ただたんに病み上がりで食欲がないだけとも云うhasktagshasktags -c `find /home/gorou/src/ghc6-6.4.2/libraries -type f -name '*.hs'|tr '\n' ' '`で tags 作ってウハウハ！と思ってやってみたんだけど、組み込みの関数(というのか？)のおしりにM(mapMとか)がついていてダメポっぽー？日記システムでもないしhttp://journal.mycom.co.jp/articles/2006/07/29/ror/まずWebブラウザから「http://0.0.0.0:3000/」にアクセスしようすげぇな。ぽっくんの windows マシンじゃアクセスできないよぅ＞＜ノ今後の課題は初期導入の容易性か今までに見たことのない発想＞＜vim の indentindentexpr にソレっぽい関数を渡してやればいいのね。んでそいつが一行前のラインを見て、今どんな風にインデントすべきかを結果として返すと。vim70aa の indent/ruby.vim が簡潔で解りやすかった。最新のは複雑になってムヅイ。というわけで haskell の文法もよく解ってないけど indent ファイルを書き出した！完成すると良いな。例えばmain = do cs <- getContents
          |ここにインデントが来て欲しいみたいなときにはlet col = strlen(matchstr(getline(lnum), '^.*\sdo\s*'))
  if col > 0
    let ind = col
  endifのように書けばおｋ、と。vim の挿入モードでインデントを部分キャンセルってできるんだっけ？main = do cs <- getContents
          putStr cs
          |Enter だとインデントでここにカーソルがとなってキャンセルしたい場合いちいちCtrl-oCtrl-m とかしてるんだけどめどすぎる。はすけるのべんきょうをるするぞうというわけで runghc(インタプリタ)の方を使った vim の compiler から書き始める俺。回り道万歳！~/.vim/compiler/haskell.vimif exists("current_compiler")
  finish
endif
let current_compiler = "haskell"

if exists(":CompilerSet") != 2    " older Vim always used :setlocal
  command -nargs=* CompilerSet setlocal 
endif

let s:cpo_save = &cpo
set cpo-=C

CompilerSet makeprg=runghc
" example errormsg| hello.hs:3:17: lexical error in string/character literal
" example errormsg| expand.hs:5:16:
"                      Couldn't match `Char' against `String'
"                        Expected type: Char -> Char
"                        Inferred type: Char -> String
"                      In the first argument of `map', namely `expandTab'
"                      In the definition of `expand': expand cs = map expandTab cs

CompilerSet errorformat=
    \%E%f:%l:%c:%m,
    \%+E%f:%l:%c:,%C%m,
    \%-G%.%#

let &cpo = s:cpo_save
unlet s:cpo_saveんでオレオレ呼び出しをかいとく~/.vim/ftplugin/haskell.vimif (exists("b:did_ftplugin"))
  finish
endif
let b:did_ftplugin = 1

comp haskell
nmap ,e :make %これで ,e でインタプリタから即実行ががが！エラー行数にも（たぶん）飛ぶよ！NDSもらった弊社n氏からもらった！やった！これで脳トレ英語で12歳の英語力並に！！！（なにそれとりあえずマリヲ買おう。きょうはかんすうがたをべんきょうしよう。

A Day in the Life

2006-07-28

リリカルなのは

ギガ人

あちー

ホッテントリ・タイトルメーカー

家だと

もちを

最近のマイブー

2nd life / 菅野よう子

work

DS

Dance of Curse / 菅野よう子

ImageMagick でネガ

チンコパット

チャリ通勤10分チョイ

書いている人

おたよりを送る