Mitsukiの魔法実験室

• perl から任意の C ライブラリを呼び出す方法 - id:kazuhookuのメモ置き場
• Perl で Win32::API プログラミング入門 - TAKESAKOのはてな出張所
• TAKESAKO @ Yet another Cybozu Labs: Pure Perl で Acme::x86::CPUID を作りました

　Ruby でもやってみました。1.9 系でしか動かないはず（1.8 系は DL クラスが別物なので）。動作確認は Cygwin 上の 1.9.1 のみ。
　CPUID を取得して、Windows のメッセージボックスで表示してます。
　機械語は竹迫さんのをまるぱくり。

#!/usr/bin/env ruby

require 'dl'

cpu = "\0" * 48
bin = "S\xbf#{ [cpu].pack('p') }\xb8\x02\x00\x00\x80" <<
      "P\x0f\xa2\x89\x07\x89_\x04\x89O\x08\x89W\x0c\x8d\x7f\x10X\x8d\@\x01" * 3 <<
      "[\xc3"
DL::CFunc.new([bin].pack('p').unpack('L!')[0], DL::TYPE_VOID).call []

DL::CFunc.new(DL::dlopen('user32')['MessageBoxA'], DL::TYPE_LONG, 'MessageBox', :stdcall).
    call [0, cpu.gsub(/\0/, '').gsub(/\s+/, ' '), "CPUID", 0].pack('L!ppL!').unpack('L!*')

　ぶくまコメントにもちらっと書いたけど、ベーマガの投稿プログラム（POKE 文でメモリに機械語セットして呼び出す奴）を思い出して笑ったのは、わたしだけではないはずだ（多分）。

* 12:15 新PC組んだ
　超久しぶりに組んだ。最後に組んだのが現メインマシンの mishio （Athron Thunderbird 1.2GHz）で、2001年4月頃だから、新規で組んだのは8年ぶりか……ビデオ交換したり（Matrox G400→ATI Radeon 9000）メモリ増やしたり（256MB→640MB）はしてるけど。
　きっかけは、PC 屋で AMD 780G なマザーが安売りしてたのと、そろそろメモリが値上がり気配だったのと、Windows7 Betaを試してみたかったのと、面白い名前の CPU が出てたから（←おい）。
　というわけで、構成パーツはこんな感じ：

CPU：AMD Athron X2 7750BE

　開発コードネーム"KUMA"。くまーーー。選んだ理由の半分は本当に名前だ（←駄目すぎる）。
　一応、L3キャッシュが乗ってるとか、Phenom I 系の割りにクロック高めとか、値段が 9000 円くらいでお手ごろ(?)とか、まじめな理由もなくもないけど……やはりメインはネタで。TDP は気にしない、といいつつ 5050e あたりとも迷ったけどね、安かったし（7000 円くらいだったか）。Black Edition の癖にリテールファンが付いてるのも半端^H^H 面倒がなくていい（一般的には捨てるんだろーけどね）。

マザーボード：MSI K9A2GM-FIH

　AMD 780G 搭載の AM2+ マザー。発売された時もちょっと気になってたんだけど、丁度セール品になってたので。検索しても評判悪くなさそうだったし、KUMA の動作報告もあったし。

メモリ：DDR2-800 4GB

　Transend のモジュール。4000 円ちょっと。

HDD：日立 型番忘れた 500GB（SATA、7200rpm、キャッシュ16MB）

　丁度 Seagate 祭やってたので日立に、というわけではなく、一応 IBM 時代からお馴染みなので（mishio のは Maxtor だけど）。

DVD-R：ASUS 型番忘れ

　mishio で使ってた安物を流用。読み書きできれば十分。

ケース：素性不明

　mishio の前のメインマシン、sakura から流用。記録によると 1998年9月 に買った奴らしい。鉄製の ATX なので今でも使えるけど、電源はさすがに流用できなさそうだったので新調。

電源：玄人志向 KRPW-V500W（ATX2.2、500W）

　2ch の電源スレで、値段の割りには悪くなさそうだったので。中身は Enhance らしい。外箱には記載なかったのに本体には 80PLUS(Standard) のシールが貼ってあったのは何故なんだぜ。

OS：Windows7 64bit Beta

　旬だし。64bit版なのは、なぜか RO が 64bit 版でしか動かないらしいので。軽く使ってみたけど、フォルダ構成が（Vistaで）かわってたり、システム深層に絡むアプリの動作が怪しかったりで、細かい部分に微妙なところはあるけど、凝った使い方をしない分には普通に使えるなーという印象。Vista はまともに使ったことがないので、どう改善されたかは知らない。

　試しに FF ベンチかけてみたら、低解像度で 8000 弱、高解像度で 4000 ちょっとだった。mishio が低解像度で 2000 くらい、しかもポリゴン欠ける始末だったので、大分世界が変わる感じ。
　RO は元々それほどストレスはなかったのでそこまでの向上はないけど、大魔法のダメージエフェクトとかは明らかにスムーズになったし、マップ移動もかなり速くなったりで、地味に快適度は増してる。とりあえず RO は新 PC に移行確定。
　他にヘビーなゲームはしないので、別にビデオカードを積む必要はないかな。

　他の感想はそのうち。

* 22:35 あけましておめでとうございます
　生きてます＞＜　元気です＞＜　あいかわらず RO 三昧です＞＜

　それにしても、元々筆無精なのにくわえて、一時期あった記録癖もすっかり抜けてしまったので、今年も引き続きこんな感じかなあ。
　日頃の動向は、はてなブックマークか twitter あたり見れば分かるかも。コメントあれば、メールかここのコメント欄あたりならそのうち気づくでしょう……たぶん。
　そんな今日この頃です。

* 20:35 【ActiveScript】RubyをWindowsで使うスレ【GUI】

480 ：デフォルトの名無しさん：2008/09/22(月) 00:30:53
Win32OLEの1.8と1.9の違い(その1)
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole18_ffbb.html
Win32OLEの1.8と1.9の違い(その2)
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole18_9fb9.html
Win32OLEの1.8と1.9の違い(その3)
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole18_c298_1.html
Win32OLEの1.8と1.9の違い(その4)
ttp://suke.cocolog-nifty.com/blog/2008/08/ruby_win32ole18_5f71.html

WIN32OLE_EVENT
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_e_1.html
InternetExplorer.Application から DWebBrowserEvents2 を導く方法
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_internetex_022f.html
WIN32OLE_EVENTの第2引数の省略
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_e_b8c0.html
WIN32OLE_EVENT#on_event_with_outargs
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_e_3.html
WIN32OLE_EVENT#on_event_with_outargs (その2)
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_e_4ba1.html
WIN32OLE_EVENT#on_event_with_outargs (その3)
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_e_d617.html
WIN32OLE::VARIANTモジュールとWIN32OLE_VARIANT
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32oleva_81c9.html
Win32OLE 今、実装してみようかと考えているもの
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_90a0.html
Win32OLE 対応できるんだったら対応したいもの
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_2ac7.html
WIN32OLE_EVENT
ttp://suke.cocolog-nifty.com/blog/2008/07/ruby_win32ole_e_2.html

* 21:40 秋葉通り魔事件
　週末はネットもTVもほとんど見ないので今頃知った。旧日通本社そばの交差点かな？　場所が場所だけに知人が巻き込まれてないといいんだけど。