PHSの行方

更新再開

「ドコモのPHSサービス、7日で終了 - ケータイWatch」
「NTTドコモのPHSサービスが終了 - INTERNET Watch」

　同社の2007年12月末現在のPHSサービス契約者数は約15万5,000人。
8日以降は同社のPHSサービスの提供が終了し、端末の販売も終了する。
PHSの解約と同時にドコモの携帯電話を契約する際、端末購入代金が無料になるといった変更特典については、7日まで受け付ける。PHSサービスが終了した8日以降、これらの特典は受けられない。
なお、PHSサービスの終了時刻は7日の24時。

終わるPHS、これから始まるPHS・・・


「ドコモのiチャネル、1,500万契約を突破 - ケータイWatch」

2005年9月にサービスを開始して以来、2006年1月に100万契約、2006年3月に200万契約、2006年8月に500万契約、2007年3月に1,000万契約を突破していた。

ちょっと鈍ってる？

「ウィルコム、「nico+」のカラーバリエーションを発売 - ケータイWatch」

　各色の発売日は、ピーチピンクとレモンイエローが1月10日、セサミグレーが1月17日。
ウィルコムストアでの価格は、W-VALUE SELECTの一括購入で22,080円。
24カ月のW-VALUE割引を適用した最終的な実質負担額は4,800円となっている。

「ウィルコム、「Advanced/W-ZERO3［es］」値下げ期間を延長 - ケータイWatch」

　ウィルコムは、「年末特別企画」として2007年12月31日まで実施していたキャンペーンの名称を「新春特別企画」に変更し、1月31日まで延長する。

いろいろやることあると思うんだけど・・・、噂ではもうすぐW-ZERO3[es]タイプの発表があるとかないとか

「ソニー・エリクソン、海外向けの新型ウォークマンケータイ - ケータイWatch」
日本でも出せばいいと思うんだけど

「Windows Mobile 7「流出」スクリーンショット：画像認識＆マルチタッチ搭載？ - Engadget Japanese」

新入力方式のひとつはiPhone / iPod touch的な......というよりマイクロソフトが以前からデモしている「Surface」的なマルチタッチ入力。
加えてデバイス本体を傾けたり振ったりするモーションセンサー入力、さらにカメラでジェスチャーを認識する画像入力といったものまで。

またスクリーンショットから読み取れるのは、(あまりこうした言い方はしたくないものの) iPhoneに似た新ソフトウェアキーボード、Xbox 360やZuneのようなTwistインターフェースを採用した新メディアプレーヤ画面など。

iPhoneのパク(ry・・・、やっぱり時代はマルチタッチか


「マイクロソフト、1月の月例パッチは“緊急”1件、“重要”1件 - INTERNET Watch」
「ジャストシステムの多数製品にまた新たな脆弱性、修正モジュールが公開 - INTERNET Watch」
「最新版のRealPlayer 11に危険度の高い脆弱性 - INTERNET Watch」
またジャストシステムか

「AOL、「Netscape」ブランドのWebブラウザのサポートを2月1日に終了 - INTERNET Watch」

　AOLではNetscape公式ブログにおいて、NetscapeブランドのWebブラウザのサポートを2月1日で終了すると発表。今後、NetscapeブランドのWebブラウザは新規にリリースせず、2月1日以降は過去のブラウザに対するセキュリティ修正パッチなども提供しない。このため、Netscapeのユーザーに対してはFirefoxに移行を呼びかけており、Netscapeのユーザーインターフェイスを今後も利用したいという要望に対しては、Firefox用のNetscapeスキンやNetscape拡張の利用を推奨している。

「Netscape.com」のサイトはポータルとして継続していくが、Webブラウザについては開発を終了する時期が来たため、その役割を完全にMozillaに手渡すことにしたとしている。

全てはIEのせい・・・

「「Google Docs」に新機能、プレゼンのページ埋め込みや階層フォルダなど - INTERNET Watch」
本当にWordがいらない世界が来るかも・・・でもやっぱりネットだと安心できないような

「米Amazon.com、ソフトウェアのダウンロード販売サービスを開始 - INTERNET Watch」

　Amazon.comでソフトウェアをダウンロード購入するためには、「Amazon Software Downloader」と呼ばれる専用ソフトをあらかじめインストールしておく必要がある。
この専用ソフトはWindows Vista/XPに対応しているが、Mac OS版も現在開発中だと説明している。
ソフトウェアの購入手続きを済ませた後、Amazon Software Downloaderでファイルをダウンロードすることによって、新しいソフトウェアをインストールできるようになる。

　購入したソフトウェアは、ライセンス条項に違反しない限りバックアップを取ることが勧められているが、
基本的にダウンロードしたソフトウェアは、Amazon.comのWebサイト内に設けられている「Your Media Library」にコピーが保管され、
必要な場合、再ダウンロードできるようにもなっている。

最近Amazonがいろいろな事に挑戦してる


「ソニー Mylo (2) 正式発表 - Engadget Japanese」
「ソニー 新 mylo COM-2 実機インプレッション - Engadget Japanese」

• 3.5インチ800 x 480 タッチスクリーン
  
• 内蔵1GB ストレージ、ミニUSBポート
  
• 1.3メガピクセルカメラ
  
• 802.11b/g無線LAN
  
• 再生できるメディアはWMA (DRM対応), MP3, AAC, ATRAC、 MPEG-4
  
• Flash Lite 3 (YouTubeにも対応)
  
• ブラウザはNetfrontベース
  
• Skype / AIM / Google Talk / Yahoo IM
  
• RSSリーダー、Podcast対応。
  
• GoogleやYouTube、FacebookほかWeb 2.0なサイトにアクセスできる拡張可能なウィジェットパネル
  
• 交換可能なフェイスプレート ($20)、クレードル ($30)
  
• (米国の)マクドナルドでやっているWayport WiFiへの無料アクセス権 (2010年12月末まで)
  
• サイズは5.1 x 2.5 x 0.8インチ、約129 x 63.5 x 20mm。

価格は$300で今月発売。
あいかわらずユーザーが自分でアプリケーションを追加することはできませんが、320 x 240から一気に800 x 480になったディスプレイでFlash対応はかなり強力なアップデートです。

あのMyloが返ってきた、名前は同じ

「新型PSPでSkypeが利用可能に - INTERNET Watch」
「Skype for PSP正式発表、今月のアップデートで提供 - Engadget Japanese」

• 一月後半のシステムソフトウェアップデートで提供
  
• XMBの「ネットワーク」にSkypeアイコンが追加される
  
• PCやほかデバイスのSkypeとおなじくSkype 同士の無料通話、および有料で一般電話にかけられるSkype Out、受けられるSkype Inにも対応
  
• フレンドリストの表示やプレゼンス(ステータス表示)に対応
  
• PSPからSkypeアカウントの取得が可能

やや残念なことに、ワンセグとおなじくPSP-2000(新PSP)のみ対応となります。
マイクやハードウェア側で制限があるのか、あるいはPSP-2000で増えたメモリを使う等の理由で本当に新PSPでなければ動かないのかは不明。

また新型だけか・・・別売りのマイクが必要

「ギャラリー：インテルMID / Menlowプラットフォーム - Engadget Japanese」

CES 2008より、インテルの超低消費電力プラットフォーム「Menlow」関連のギャラリーをご紹介します。今年登場するUMPCやMIDで使い物になるバッテリー寿命とパフォーマンスを両立させてくれる(はずの) MenlowはCPU 「Silverthorne」、チップセット「Poulsbo」で構成されるプラットフォーム。

ハードはあまり分からないけど凄そうなことは確かだ

「Alienwareからゲーマー向け超ワイド曲面ディスプレイ、解像度2880 x 900 - Engadget Japanese」

ディスプレイとしては液晶ではなくDLP (リアプロ)を採用しており多少の厚みがあるものの、ゲーマーにとって重要な応答速度はエイリアンウェアのスタッフいわく「0.02ms以下」。

こんな画面でゲームしてみたい

「iriver "a Player" ヘッドホン端子より薄いポータブルプレーヤ - Engadget Japanese」

こちらはヘッドホンジャック部分だけが膨らんでいる、すなわちヘッドホン端子の大きさからくる物理的制約を超えた薄さ。USBコネクタも端子だけのタイプがスライド展開するようになっています。

ヘッドホン端子より薄い、折れないんだろうか

Mac Touch発売！？

本当に出たら欲しい

「アップルMac Touch、MacBook Touch「流出」ギャラリー - Engadget Japanese」

ジョブズキーノートで明らかになる(とされている)のはSSD搭載の13インチウルトラポータブル「MacBook Nano」、
デュアルスクリーン・マルチタッチタブレット「MacTouch」、
Mac miniをさらに半分の大きさにした「Mac Nano」、
PenrynベースになったMac Pro + BDドライブ、黒アルミボディのPenryn MacBook Proなどなど。
登場しておかしくないもの「も」含まれてはいますが、まあなんというか恒例のアレです。

最後の行に注目・・・


「ロジクール diNovo Mini パームサイズBluetoothキーボード - Engadget Japanese」

幅15cm・奥行き9cm・厚さ2.6cmで173gと小型の本体にQWERTYキー、
音量や再生・停止といったメディアナビゲーションキーや各種ホットキー、2種類の使い方ができる「革新的なクリックパッド」を搭載します

対応OSおよびプラットフォームはWindows XP , Windows Vista, プレイステーション3。
発売予定は2008年3月、ロジクールオンラインストア価格は1万8800円。なお、ロジクールから販売されるのもキーは英字配列とのこと。

・・・Bluetoothなのは惹かれるけど値段が・・・

「Logitech Harmony One ユニバーサルリモコン - Engadget Japanese」
普通にゲームで使えそうだ

「E-Lead Noahpad 「クリッカブルタッチパネル」搭載UMPC - Engadget Japanese」

また画面を完全にひっくり返した(ディスプレイとキーボードが外側になるように畳んだ)背面入力状態では「クリッカブルキーボード」が見えなくなってしまいますが、
これは背中側にあるキーボードが透けて見えるようなバーチャルキーボードをディスプレイ側に表示することで解決。
7インチ画面にしては高精細な1024x768解像度も売りのようです。
具体的な価格は発表されていないものの、メーカーによれば「Asus Eee PCと同等の範囲」。

なるほどというか・・・

「アンビエントから野球スコアボードデバイスScoreCast - Engadget Japanese」

天気予報を表示するWeather Wizardや市況のMarket Mavenとおなじくアンビエント独自の無線ネットワークInfoCastを利用しており、
無線・有線LANや携帯データ通信といったインターネット接続不要でどこにいても半イニングごとの最新情報を表示します。
電源は単三電池 x 4本を使用。

価格は$124.99。InfoCastはいまのところ米国の人口比90%をカバーしていますが、日本はもちろん圏外です。

ネットで見るのも面倒くさい人向け(アメリカで)


「WowWeeから女性型ヒューマノイドFemisapien、ほか新作ロボ大量発表 - Engadget Japanese」
女性型って結構珍しい

「USB MSNミサイルランチャー 遠隔発射対応でカメラ付き - Engadget Japanese」

おなじみ有線版のUSBミサイルランチャーにウェブカメラが載っており、MSN経由でチャット相手にミサイルを発射できます。
リンク先Brando.com.hkでの価格は$49.00、１月18日発射予定。

チャット相手？

再度テンプレート変更

結局Blogger標準ので

標準テンプレートのThisaway Blueを選択
これだと色・フォント変更も楽になる

決め手
・青系統
・コードと普通の文の区別が分かりやすい
・引用が分かりやすい
・Blogger標準のテンプレートだから色・フォント変更が楽になる

デザインとか分からないので当分これで
このページだけタイトル・説明の下に線が入る、なんでだ？


「63Music」の方でamazonアフィを貼ってみた
次の更新は多分「沿志奏逢2」の発売日

MiniPlayer.ahk

やっとアートワークもやり方が分かった

;MiniPlayer.ahk
;2008/01/06作成
;iTunesのちょっとした操作+曲情報・歌詞・アートワークの表示

;仕様
;・スクリプトのあるフォルダにArtwork.(拡張子)で保存(それを読み込んでいるため)

;todo
;・曲情報と歌詞のタブで切り替え
;・効率が悪すぎると思うのでそこらへんの改善

#NoTrayIcon
#Include CoHelper.ahk

CoInitialize()

iTunesApp := ActiveXObject("iTunes.Application")
;現在の曲の情報を取得する
Current := Invoke(iTunesApp, "CurrentTrack")
;名前取得
Name := Invoke(Current, "Name")
;アルバム名取得
Album := Invoke(Current, "Album")
;アーティスト取得
Artist := Invoke(Current, "Artist")
;アートワーク情報取得
ArtWork := Invoke(Current, "Artwork")
;(複数設定できるから)アートワークの1番目を取得
Item := Invoke(ArtWork, "Item", 1)
;画像の形式取得
FormatNum := Invoke(Item, "Format")
;画像形式がjpgの時
If FormatNum = 1
{
  Format = .jpg
}
;画像形式がpngの時
else If FormatNum = 2
{
  Format = .png
}
;画像形式がbmpの時
else
{
  Format = .bmp
}
Path = %A_ScriptDir%\Artwork%Format%
;Msgbox, %ArtWork%, %Item%, %FormatNum%, %Format%, %Path%
Invoke(Item, "SaveArtworkToFile", Path)
;イベント作成
ConnectObject(iTunesApp, "IiTunesEvents_")

;GUI作成
;前の曲
Gui, Add, Button, x6 y7 w30 h20 gBack, <<
;曲の初めから
Gui, Add, Button, x46 y7 w30 h20 gBackTrack, <
;再生・一時停止
Gui, Add, Button, x86 y7 w30 h20 gPlay, ||>
;次の曲
Gui, Add, Button, x126 y7 w30 h20 gNext, >>
;未定
Gui, Add, Button, x166 y7 w30 h20 gSongInfo, 情報
;歌詞表示
Gui, Add, Button, x206 y7 w30 h20 gLyric, 歌詞
;アートワーク表示
Gui, Add, Picture, x326 y47 w60 h60 vPicture, Artwork%Format%
;グループ化
Gui, Add, GroupBox, x6 y37 w310 h80 , 曲情報
;曲名
Gui, Add, Text, x16 y57 w290 h13 vCurrentName, 曲名:%Name%
;アルバム名
Gui, Add, Text, x16 y77 w290 h13 vCurrentAlbum, アルバム:%Album%
;アーティスト名
Gui, Add, Text, x16 y97 w290 h13 vCurrentArtist, アーティスト:%Artist%
; Generated using SmartGUI Creator 4.0
Gui, Show, , %Name%
Return

GuiClose:
  ;全解放
  Release(Item)
  Release(ArtWork)
  Release(Current)
  Release(iTunesApp)
  CoUninitialize()
ExitApp

Back:
  Invoke(iTunesApp, "BackTrack")
Return

BackTrack:
  Invoke(iTunesApp, "BackTrack")
Return

Play:
  Invoke(iTunesApp, "PlayPause")
Return

Next:
  Invoke(iTunesApp, "NextTrack")
Return

Lyric:
  iTunesApp := ActiveXObject("iTunes.Application")
  ;現在の曲の情報を取得する
  Current := Invoke(iTunesApp, "CurrentTrack")
  ;歌詞取得
  CurLyric := Invoke(Current, "Lyrics")
  Msgbox, %CurLyric%
Return

SongInfo:
  Msgbox, Hello
Return

;曲が変わった時
IiTunesEvents_OnPlayerPlayingTrackChangedEvent()
{
  ;Msgbox, Hello
  NewArtWork()
  NewSong()
  Return
}

;曲が再生された時
IiTunesEvents_OnPlayerPlayEvent()
{
  ;Msgbox, test
  NewArtWork()
  NewSong()
  Return
}

;曲情報更新
NewSong()
{
  iTunesApp := ActiveXObject("iTunes.Application")
  ;現在の曲の情報を取得する
  Current := Invoke(iTunesApp, "CurrentTrack")
  ;名前取得
  Name := Invoke(Current, "Name")
  ;アルバム名取得
  Album := Invoke(Current, "Album")
  ;アーティスト取得
  Artist := Invoke(Current, "Artist")
  ;Gui再設定
  GuiControl, , CurrentName, 曲名:%Name%
  GuiControl, , CurrentAlbum, アルバム:%Album%
  GuiControl, , CurrentArtist, アーティスト:%Artist%
  Gui, Show, , %Name%
  Return
}

;アートワーク再設定
NewArtWork()
{
  ;ファイル削除
  ;FileDelete, %Path%
  
  iTunesApp := ActiveXObject("iTunes.Application")
  ;現在の曲の情報を取得する
  Current := Invoke(iTunesApp, "CurrentTrack")
  ;アートワーク情報取得
  ArtWork := Invoke(Current, "Artwork")
  ;(複数設定できるから)アートワークの1番目を取得
  Item := Invoke(ArtWork, "Item", 1)
  ;画像の形式取得
  FormatNum := Invoke(Item, "Format")
  ;画像形式がjpgの時
  If FormatNum = 1
  {
    Format = .jpg
  }
  ;画像形式がpngの時
  else If FormatNum = 2
  {
    Format = .png
  }
  ;画像形式がbmpの時
  else
  {
    Format = .bmp
  }
  ;パス作成
  Path = %A_ScriptDir%\Artwork%Format%
  ;画像取得
  Invoke(Item, "SaveArtworkToFile", Path)
  GuiControl, , Picture, %Path%
  Return
}

効率が悪すぎると思う

検索していたら「Autohotkey for Pocket PCs (DEMO) - AutoHotKey Community」を発見した
さっそくW-ZERO3[es]にダウンロードしてみた
.ahkに関連づけてもAutoHotKeyCE6.exeと同じフォルダにあるAutoHotKey.ahkしか認識されない
とりあえずAutoHotKey.ahkに

#NoTrayIcon

Msgbox, Hello
Return

と書いたらちゃんとメッセージボックスが出てきた
他の.ahkにも対応できたらかなり使えるんじゃないか？

まあ「MortScript」の方が適してるんだけど

年内にもアメリカのサンフランシスコ全体でWi-Fiが無料で使えるらしい

いいよな

「サンフランシスコの次世代無料Wi-Fi網、年内に構築へ - ITmedia News」

　Merakiは住居の屋根やベランダ、窓などにリピータ機能を持つ低出力の無線LANルータを数多く設置し、それらから発信される信号を組み合わせる形で無線ネットワークを構築している。
各ルータはMerakiの中央サーバと交信することで自動的に速度やパフォーマンスを最適化するため、ユーザがメンテナンスする必要はないという。
サンフランシスコでは当初2平方マイルをカバーするネットワークでスタートし、1Mbpsの通信速度を実現したとしている。

　サンフランシスコの基幹回線は、太陽電池式のルータ数百個を住居の屋根に設置することで構築する。Merakiは同市のネットワーク拡大のため、今後も住民に無料でルータを配布、住宅の屋根などへの設置を推奨していく。

日本でもどこかの企業がやって・・・無理だな
そう考えると「FON」はいいかもしれない


「Logitech diNovo Mini ワイヤレスキーボード ＆ Z Cinemaスピーカー - Engadget Japanese」

見た目どおりクラムシェル型ミニPCか大型スマートフォンのような大きさで、両手でもって親指打ちで入力できる製品です。

リンク先によればdiNovo Miniは￡99で今月発売。diNovo Miniの上半分は別にディスプレイではなく半透明のカバーとなっているようです。

あくまでもキーボードが目的

「デル Crystalディスプレイ 正式発表＆ギャラリー - Engadget Japanese」

仕様はディスプレイ部が22型ワイド、1680 x 1050、輝度270 cm/m^2、色域98% (CIE1976(98.3%) / CIE1931(92%))、ダイナミックコントラスト比 2000:1、視野角水平・垂直160°、応答速度 2ms (GtG)。
ディスプレイのベゼル上側に2メガピクセルウェブカメラ＋マイク、入出力ポート類はHDMI / HDCP対応DVI、DisplayPort、サブウーファー出力、カメラとスピーカー接続用にUSB。
デザイナーを雇ったのみならずちゃんと支払っているらしく、価格は$1199から。

裏側どうなってるんだろう

SuicaとPASMOをどっちか1枚で使える日が来る？

連絡定期のせいで複数or未だに磁気の人も多いと思う(自分もその1人)

「3月よりPASMO・Suicaの利用エリアが拡大、3線連絡定期券も発行可能に - ITmedia News」

　PASMO協議会と東日本旅客鉄道（JR東日本）は12月21日、IC乗車券「PASMO」「Suica」が利用できるエリアの拡大について発表した。また、交通事業者系クレジットカードのユーザーが利用できる「PASMOオートチャージサービス」もサービスを拡充する。エリア拡大とサービス拡充は、いずれも3月から。

　また、JRと私鉄・地下鉄の連絡定期券の発売範囲も拡大する。詳細は2月中旬以降発表されるが、現在は原則対応していない3線連絡定期券の発行（参照記事）が始まる見込みだ。

関東はいいな
近鉄(PiTaPa)とJR(ICOCA)を使うので未だに磁気の定期券を使ってる、今見てみたらこっちのニュースは何もなかった・・・


「工人舎のコンパクトモバイルノートに新モデル - Engadget Japanese」

一方のLシリーズは現行SAシリーズを置き換えるもので、AMD Geodeはそのままタッチスクリーンディスプレイの解像度を1024 x 600にアップグレード、キーボードに改良を加えたモデル。
もう一方のVは韓国で販売されているKシリーズ(国内のSH6 / SH8に相当)とおなじ仕様のままGPSを加えたモデルとされています。

日本はどうなる？

「デル、「Crystal」ディスプレイをフライング掲載 - Engadget Japanese」
また凄いデザインだ、ガラス板使ってるのが自分好みだけど・・・

「Belkinから音楽共有・ミックス機能搭載の5ポートオーディオハブ「RockStar」 - Engadget Japanese」

六芒星形をした5+1ポートのヘッドホンスプリッタのようなもので、1ポートをiPodそのほかに接続すれば最大5人までがヘッドホンをつっこんで一緒に聴ける、という製品。

おもしろいのは5ポートが入力・出力の切り替えスイッチをそなえていること。音楽プレーヤのヘッドホン出力に接続すれば入力ポートとしても使うことができ、複数のソースがその場ミックスされて聞こえます。

スピーカーが無い時掌曲げてアンテナ？がわりに聞いてたけど・・・ミックスはおもしろいかも

超薄型Mac

これは薄い

「「超薄型MacBook」の流出画像？ - Engadget Japanese」
奥のがそれ、タッチパッドが大きい


「背面タッチ入力UMPC Noahpad - Engadget Japanese」

イラストをよく見ると画面を背中側までひっくり返して写真立てのように自立させたり、キッチンでハンガーにかけていたり、さらに両手持ちして裏返った状態のキーボードを背面入力していたりとただならぬ事態が進行しています。

仕様は7インチディスプレイ、VIA Eden C7 1GHz CPU、512MB RAM、30GB 1.8インチHDD、OSにUbuntu 7.10、無線・有線LANやカメラ、マイク・スピーカーなどを搭載して重さ0.78kgなど。

裏のキーボード見ないで操作できるんだろうか？

AutoHotKeyでesExt5(未完成)

ずっとやってみたかった物

;esExt5.ahk
;2008/01/03作成
;esExt5のiniを読み込んでメニュー作成
;=AutoHotKeyでesExt5を作ってみた

;=また作る必要のない物を作ってみた

;仕様
;・このスクリプトのIniFileにesExt5.iniのパスを書いておく
;・引数がないとメッセージ出して終了
;・未完成

;問題点
;・フォルダ内にまたフォルダがあった場合おかしくなる
;・[folder]の実装未定
;・オプションの実装未定
;・(まずサブメニュー作らないといけないからいろいろ面倒)

;todo
;・問題点の改善
;・完成させる

#NoTrayIcon

;esExt5.iniの場所
IniFile = C:\Program Files\tool\.S\esExt\esExt5.ini
;DropFile = C:\Program Files\tool\AutoHotkey\scripts\Menu\test.txt
;存在フラグ
ExistFlag = 0
;フォルダフラグ
FolderFlag = 0
Line = 0
Count = 0
X = 0

;引数があった場合
If 0 <> 0
{
  DropFile = %1%
}
;引数がなかった場合
else
{
  Msgbox, 引数がありませんでした
  return
}

;Msgbox, %DropFile%
SplitPath, DropFile, , , Ext
SearchWord = [.%Ext%]
;Msgbox, %SearchWord%
;esExt5.ini読み込み
Loop, Read, %IniFile%
{
  Line++
  ;まだ発見できてない場合
  If ExistFlag = 0
  {
    ;[拡張子]のメニューだった場合
    IfInString, A_LoopReadLine, %SearchWord%
    {
      ;Msgbox, %A_LoopReadLine%
      ;存在フラグを立てる
      ExistFlag = 1
    }
    ;[all]のメニューだった場合
    IfInString, A_LoopReadLine, [all]
    {
      ;Msgbox, %A_LoopReadLine%
      ;存在フラグを立てる
      ExistFlag = 1
    }
  }
  ;発見できた場合
  else
  {
    ;%endだった場合
    IfInString, A_LoopReadLine, `%end
    {
      ;存在フラグを戻す
      ExistFlag = 0
      ;次の行へ
      Continue
    }
    ;+だった場合
    else IfInString, A_LoopReadLine, +
    {
      ;区切り線挿入
      Menu, esExtMenu, Add
      ;区切り線もカウントされるため+1
      Count++
      ;次の行へ
      Continue
    }
    ;サブメニュー化だった場合
    else IfInString, A_LoopReadLine, {
    {
      ;サブメニューの名前取得
      StringSplit, Folder, A_LoopReadLine, {
      ;サブメニューフラグを立てる
      FolderFlag = 1
      ;Msgbox, フォルダ開始, %Folder2%
    }
    else IfInString, A_LoopReadLine, }
    {
      ;サブメニューの元を作成
      Menu, esExtMenu, Add, %Folder2%, :%Folder2%
      ;フォルダフラグを戻す
      FolderFlag = 0
      ;Msgbox, フォルダ終わり
    }
    ;オプションだった場合
    else IfInString, A_LoopReadLine, >
    {
      ;Msgbox, オプション
      Loop
      {
        ;Msgbox, %Line%
        SearchLine := Line - A_Index
        FileReadLine, SearchWord, %IniFile%, %SearchLine%
        IfNotInString, SearchWord, >
        {
          ;オプションのタブ削除
          StringReplace, OptionPath, A_LoopReadLine, %A_Tab%
          ;パスと名前に分割用
          StringReplace, OptionPath, OptionPath, %A_Space%|%A_Space%, `,
          ;パスと名前に分割
          StringSplit, OptionArray, OptionPath, `,
          ;オプションの元になるアプリのタブ削除
          StringReplace, Path, SearchWord, %A_Tab%
          ;パスと名前に分割用
          StringReplace, Path, Path, %A_Space%|%A_Space%, `,
          ;パスと名前に分割
          StringSplit, Array, Path, `,
          ;パス、名前、オプションパス、オプション名
          Msgbox, %Array1%, %Array2%, %OptionArray1%, %OptionArray2%
          ;Menu, %Array2%, Add, %OptionArray2%, OptionCmd
          Break
        }
      }
    }
    else
    {
      ;後でフルパスを取得するためにカウント+1
      Count++
      ;名前がない時用
      Array2 =
      ;パスと名前に分割用
      StringReplace, Path, A_LoopReadLine, %A_Space%|%A_Space%, `,
      ;パスと名前に分割
      StringSplit, Array, Path, `,
      ;名前がない時
      If Array2 = 
      {
        ;アプリの名前で代用
        SplitPath, Array1, , , , Array2
        ;Msgbox, %Array0%, %Array1%, %Array2%
      }
      ;フォルダ内の時
      If FolderFlag = 1
      {
        Menu, %Folder2%, Add, %Array2%, FolderCmd
        ;オプションのタブ削除
        StringReplace, Array1, Array1, %A_Tab%
        X++
        ;パス確保
        FolderArray%X% := Array1
        ;名前確保
        FolderNameArray%X% := Array2
        Continue
      }
      ;それ以外
      Menu, esExtMenu, Add, %Array2%, MenuCmd
      ;パス確保
      PathArray%Count% := Array1
      ;Msgbox, %Array1%, %Array2%, %Count%
    }
  }
}
Menu, esExtMenu, Show
return

;メニュー用コマンド
MenuCmd:
;テスト用
OptionCmd:
  ;パス確保
  Name := PathArray%A_ThisMenuItemPos%
  ;関連づけが.ahkの場合
  IfInString, Name, .ahk
  {
    Run, %A_AhkPath% "%Name%" "%DropFile%"
  }
  ;その他
  else
  {
    Run, %Name% "%DropFile%"
  }
return

;フォルダ用コマンド
FolderCmd:
  ;Msgbox, a:%X%, %A_ThisMenuItem%
  ;パス確保用番号取得ループ
  Loop, %X%
  {
    ;検索する名前作成
    SearchArray := FolderNameArray%A_Index%
    ;Msgbox, b:%SearchArray%
    ;
    IfInString, SearchArray, %A_ThisMenuItem%
    {
      ;パスのある番号取得
      Pos = %A_Index%
      break
    }
  }
  ;Msgbox, c:%Pos%
  ;パス確保
  Name := FolderArray%Pos%
  ;関連づけが.ahkの場合
  IfInString, Name, .ahk
  {
    Run, %A_AhkPath% "%Name%" "%DropFile%"
  }
  ;その他
  else
  {
    Run, %Name% "%DropFile%"
  }
return

サブメニュー先に作っておかないといけないからいろいろ面倒
自分にはまだ早かった

iPhone version1.1.3の内容

Google Mapがめくれるのはいい感じ

「iPhone v1.1.3 ビデオツアー - Engadget Japanese」

「続きを読む」に載せた動画で実演されているのはホーム画面のアイコンをドラッグして再配置、携帯基地局ベースの位置情報取得やハイブリッドビューが加わったGoogle Maps, 微妙に強化されたSMSなど。

動画の人のiPhone凄いな

「Macworld予報：Macサブノート・外付け光学ドライブ・マルチタッチトラックパッド - Engadget Japanese」

今年のMacworld SFでのお披露目という予測そのものは他のアップル系うわさサイトでも報じられているものの、今回は 1. 本体に光学ドライブを備えず(既報)、2. 代わりに外付けの記録型DVDドライブも発表される、と微かに具体的になっています。

そのほかMac Rumorsが「確認」したのは少なくとももう1機種のノートブックが発表されること、うち少なくとも1機種にはマルチタッチ・トラックパッドが採用されること。

いよいよ今月15日、楽しみだ

「Macタブレット Modbook、本当に出荷開始 - Engadget Japanese」

Modbookは2.0GHz または2.2GHz Core 2 DuoのMacBookを素材にワコムのデジタイザを追加、キーボードなしのタブレットとして使えるようにカスタマイズされた製品。
iSightや光学ドライブ、GPSも内蔵します。米国・カナダ向けに$2290にて販売中。

タイトルに「本当に」って付けてる時点であまり信用されてなかったのか

PlaylistInfo.ahk

頼まれて作った

;PlaylistInfo.ahk
;2008/01/02作成
;現在再生中？のプレイリストの曲情報一覧をファイルに書き出し
;スクリプトのあるフォルダにプレイリスト名.txtで作成
;.txtを.csvに変えればExcelでも見やすいようにした

#NoTrayIcon
#Include CoHelper.ahk

CoInitialize()

iTunesApp := ActiveXObject("iTunes.Application")
;現在のプレイリスト取得
CurrentPlaylist := Invoke(iTunesApp, "CurrentPlaylist")
;プレイリストの名前取得
PlaylistName := Invoke(CurrentPlaylist, "Name")
;プレイリストの時間取得
PlaylistTime := Invoke(CurrentPlaylist, "Time")
;プレイリストの曲取得
Tracks := Invoke(CurrentPlaylist, "Tracks")
;プレイリストの曲数取得
Count := Invoke(Tracks, "Count")
;属性取得
FileGetAttrib, Attrib, %PlaylistName%.txt
;ファイルが既に存在していたら
If Attrib <> 
{
  ;削除確認
  Msgbox, %PlaylistName%.txtを削除します
  ;ファイル削除
  FileDelete, %PlaylistName%.txt
}
;プレイリスト名と総再生時間を1行目に
FileAppend, プレイリスト名=%PlaylistName%`,総再生時間=%PlaylistTime%`n, %PlaylistName%.txt
;.csv用に見やすく
FileAppend, 名前`,アーティスト`,アルバム`,時間`,再生回数`n, %PlaylistName%.txt
;開始の確認
Msgbox, プレイリスト:%PlaylistName%の情報を書き出します
;曲数分ループ
Loop, %Count%
{
  ;曲情報取得
  Current := Invoke(Tracks, "Item", A_Index)
  ;名前取得
  Name := Invoke(Current, "Name")
  ;アーティスト名取得
  Artist := Invoke(Current, "Artist")
  ;アルバム名取得
  Album := Invoke(Current, "Album")
  ;再生時間取得
  Time := Invoke(Current, "Time")
  ;再生回数取得
  PlayedCount := Invoke(Current, "PlayedCount")
  ;ファイルに追加
  FileAppend, %Name%`,%Artist%`,%Album%`,%Time%`,%PlayedCount%`n, %PlaylistName%.txt
  ;Msgbox, %Current%, %Album%
}
Msgbox, 書き出し完了
Release(Current)
Release(Tracks)
Release(CurrentPlaylist)
Release(iTunesApp)
CoUninitialize()
return

初プレイリスト関係だけどまあまあ簡単にできた、30分で一応完成、総完成に1時間ほど
ListViewにでも表示させてみようか

iTunesのMiniPlayer途中経過

ずっとイベントが分からなかった


ちなみにイベントのやり方は

iTunesApp := ActiveXObject("iTunes.Application")
;イベント作成
ConnectObject(iTunesApp, "IiTunesEvents_")

IiTunesEvents_OnPlayerPlayEvent()
{
  Msgbox, test
  Return
}

ConnectObjectで作った適当な名前(IiTunesEvents_)+本来のイベント名(OnPlayerPlayEvent)これだけという・・・
明日にでもタブボタンでも付けて歌詞表示しようかと考え中
ウィンドウ伸ばさないといけないな


今のところiTunes使えばいいだけで全く役に立たない物だ・・・
文字が長すぎてもぶち切りだし

画像を踏むとHDDがクラッシュ

洒落にならない、ネタないから久しぶりにITpro見た

「画像ファイルに偽装した，HDDをフォーマットしようとするトロイの木馬がネットで話題に - ITpro」

　ネットに投稿された情報などによると，画像ファイルのURLを開くと多数のウインドウを開いてユーザーの操作を妨げる，いわゆるブラウザクラッシャーとして動作するほか，メール・クライアントを起動したり，ユーザーにHDDディスクをフォーマットする実行ファイルをダウンロードさせたりしようとするという。

Internet Explorerだけでなく，SleipnirやLunascapeなど，Internet Explorerのエンジンを利用しているブラウザやアプリケーションで上記のようなトロイの木馬が実行される可能性がある

IE系のブラウザの人は要注意


「AutoHotKey」のGUIを作ってくれるソフトを発見した
「:: SmartGUI Creator :: - AutoHotkey Community」
「:: SmartGUI Creator ::」
GUI苦手な人(自分とか)にはかなり役立ちそう、簡易iTunesミニプレイヤーでも作ってみようかな

「Script Listing - AutoHotKey Wiki」から発見したんだけど他にも便利そうなツール、スクリプトがたくさんある
「AutoHotkey Community」も役立つしとてもありがたい

iPod touchで電話

ソフトは今日公開予定らしい


「iPod touchから一般電話に発信・通話するデモ - Engadget Japanese」

内容はVoIPアプリ相手ではなく、SIPプロバイダを介してiPod touchから一般の電話に発信・通話するもの。

ソフトウェアそのものは(現地)1月1日にも一般公開されるため脱獄済みiPod touchユーザーなら誰でも試せますが、touchから話すにはドックコネクタ用マイクかなにかが必要です。

そのマイクが肝心
ちょっとおかしいけどiPhone/iPod touch関係はiPhone、他のiPod関係はiPodタグで


「Yahoo! JAPAN」
トップページがリニューアルされてる


「Gui,Add,TreeView - AutoHotkeyを流行らせるページ」
一番下にあるExample(s)を参考にしてProgram Filesからやってみたら相当時間がかかる
「Paper Plane xUI」とかとは全然違う
やっぱりスクリプトだから？
いろいろ検討中

関係ないけどモバイルクルーザーが壊れた
USBさしても充電できなくなった・・・新年早々ついてない

今年最後の通常更新

結構続いてるもんだ

「ネットワーク対応ケータイが600機種突破--これまでの「名機」を振り返る - CNET Japan」

内訳はNTTドコモが237機種、auが176機種（2005年11月にウェブ接続サービスが終了した13機種を除く）、ツーカーが32機種、ソフトバンクモバイルが140機種、ウィルコムが16機種となる。

この画像は生で見てみたい


「［年末特集：2007］iPod touch発売に沸く--下半期の注目記事（前編） - CNET Japan」
「［年末特集：2007］ミクシィの新オフィスがすごかった--下半期の注目記事（後編） - CNET Japan」
分解記事が多い

「海外ラウンドアップ2007：アップルが踏み出した新たな一歩--「iPhone」登場 - CNET Japan」
今年はアップルの年って言っても間違いじゃないと思う


「「SNES CD/ プレイステーション」コントローラ 出品中 - Engadget Japanese」
任天堂とソニーが手を取って作った？コントローラー
十字キーじゃないのか

見てるのに気付かない

本当こういう時に2ちゃんねるは役に立つ

ちょっと改造してみた

;test3.ahk
;2007/12/30作成
;簡易エクスプローラー(ファイルなら実行、フォルダなら潜る+上のフォルダに戻る)
;起動時に最後に\なしのフォルダパスを渡せばそこから起動(空白ある場合は""で囲む)
;なければスクリプトのあるフォルダを開く

;変更点
;2007/12/30
;・フォルダとファイルを判別しやすいように拡張子も表示するようにした
;・フォルダ移動したらタイトルを変更できるようにした
;・FileGetAttribを使ってパスに.が入ってても大丈夫なようにした

;問題点
;・ファイル、フォルダが多いと読み込みに時間がかかる
;・起動時に最後に\ありのパスを引数にして起動してもスクリプトのあるフォルダから起動する

;todo
;・エラーの修正
;・その他バグ？修正

#NoTrayIcon
;引数があったら
If 0 <> 0
{
  ;引数分割
  SplitPath, 1, Name, Dir
  ;属性取得
  FileGetAttrib, Attrib, %1%
  ;Msgbox, %Attrib%
  ;引数がフォルダだった場合
  IfInString, Attrib, D
  {
    Path = %Dir%\%Name%
  }
  ;引数がファイルだった場合
  Else
  {
    Path = %Dir%
  }
  SetWorkingDir, %Path%
}

;Msgbox, %A_WorkingDir%

;ListView1作成
Gui, Add,ListView, R10 w400 gLV vListView1, 名前|拡張子|フルパス
;関数呼び出し
ViewAdd()
;表示
Gui, Show, , %A_WorkingDir%
return

;サブルーチン

LV:
  ;ダブルクリック以外は無視
  if A_GuiEvent = DoubleClick
  {
    ;フルパス取得
    LV_GetText(FullPath, A_EventInfo, 3)
    ;フォルダ判定用+フォルダだった場合に使う
    SplitPath, FullPath, Name, Dir
    ;属性取得
    FileGetAttrib, Attrib, %FullPath%
    ;Msgbox, %Fullpath%, %Attrib%
    ;項目がフォルダだった場合
    IfInString, Attrib, D
    {
      ;MsgBox, %Ext%
      ;上のフォルダに戻る場合
      If LV_GetNext() = 1
      {
        SplitPath, A_WorkingDir, , Dir
        Path = %Dir%
      }
      ;フォルダだった場合
      Else
      {
        ;パス改造
        Path = %Dir%\%Name%
      }
      ;%A_WorkingDir変更
      SetWorkingDir, %Path%
      ;関数呼び出し
      ViewAdd()
    }
    ;ファイルだった場合
    Else
    {
      ;MsgBox, %Ext%
      ;実行
      Run, %FullPath%
    }
  }
return

GuiClose:
ExitApp

;ビューに追加関数
;引数、戻り値共になし
ViewAdd()
{
  ;再描画停止
  GuiControl, -Redraw, ListView1
  ;ビュー全削除
  LV_Delete()
  ;上のフォルダに戻る用ビュー作成
  Lv_Add("","..", "", A_WorkingDir)
  ;A_WorkingDir読み込み
  Loop, %A_WorkingDir%\*.*, 1
  {
    ;拡張子取得
    SplitPath, A_LoopFileLongPath, , , Ext
    ;属性取得
    FileGetAttrib, Attrib, %A_LoopFileLongPath%
    ;Msgbox, %A_LoopFileName%, %Attrib%
    ;フォルダだった場合
    IfInString, Attrib, D
    {
      Lv_Add("",A_LoopFileName, "", A_LoopFileLongPath)
    }
    ;ファイルだった場合
    else
    {
      Lv_Add("",A_LoopFileName, Ext, A_LoopFileLongPath)
    }
  }
  ;幅調整
  LV_ModifyCol(1)
  ;タイトル変更
  GUI, Show, , %A_WorkingDir%
  ;再描画
  GuiControl, +Redraw, ListView1
}

検索してたらAutoHotkey スレッド part4 - ソフトウェア板にヒットした
まだまだ改造していく予定

iTunes再生中の曲に埋め込んである歌詞を表示

埋め込みの歌詞があること忘れてた・・・

#NoTrayIcon
#Include CoHelper.ahk

CoInitialize()

iTunesApp := ActiveXObject("iTunes.Application")
;現在のタイトルの情報を取得する
Current := Invoke(iTunesApp, "CurrentTrack")
;歌詞取得
Name := Invoke(Current, "Lyrics")

;表示
Msgbox, %Name%

Release(Current)
Release(iTunesApp)
CoUninitialize()
return

「iTunes COM for Windows SDK 」から探してるんだけどなんでIITTrackからLyricsが取得できるか分からない
オブジェクト指向型ちゃんと勉強しないといけないな

再生中の曲の歌詞を表示

まあ簡単にできた

#NoTrayIcon
#Include CoHelper.ahk

CoInitialize() 

iTunesApp := ActiveXObject("iTunes.Application")
;現在のタイトルの情報を取得する
Current := Invoke(iTunesApp, "CurrentTrack")
;タイトル取得
Name := Invoke(Current, "Name")
;Msgbox, %Name%

;歌詞.txtがあるフォルダ名
Path = C:\Program Files\Multimedia\MUSIC\lyric
;パス作成
FilePath = %Path%\%Name%.txt
;ファイル読み込み
FileRead, test, %FilePath%

;表示
Msgbox, %test%

Release(Current) 
Release(iTunesApp) 
CoUninitialize()
return

本当は歌詞のあるフォルダをC:\Program Files\マルチメディア\MUSIC\lyricに入れてたんだけど「チ」で文字化け・・・
やっぱり日本語パスは使うものじゃない

もっと簡単にAutoHotKeyでiTunesを操作する

もっと簡単な方法あるじゃん・・・

「iTunes Ratings - AutoHotKey Community」をちょっと改変

#NoTrayIcon
#Include CoHelper.ahk

CoInitialize() 

iTunesApp := ActiveXObject("iTunes.Application")
;再生・一時停止する
Invoke(iTunesApp, "PlayPause")
;現在のタイトルの情報を取得する
Current := Invoke(iTunesApp, "CurrentTrack")
;タイトル取得
Name := Invoke(Current, "Name")
;アーティスト名取得
Artist := Invoke(Current, "Artist")
;アルバム名取得
Album := Invoke(Current, "Album")
;表示
Msgbox, %Name%`n%Artist%`n%Album%

Release(Current) 
Release(iTunesApp) 
CoUninitialize()
return

これだけで再生・一時停止+曲名、アーティスト名、アルバム名が取得できた
自分はtxt形式の歌詞を曲名で保存してるからこのスクリプトを活用すれば歌詞表示までできるかもしれない

iPhone/iPod touchのファームウェア1.1.3がもうすぐでるかも

なにやら流失した模様

「iPhone ファームウェア v1.1.3 流出？ - Engadget Japanese」

新バージョンで追加されるのはスプリングボード(ホーム画面)のアイコン並び替えや複数ページ化、
ウェブブックマークをアイコンとして配置できる機能、
Google Mapsアプリでハイブリッドビューの追加、
携帯ネットワークを使った位置情報システムの実装、
SMSの複数受信者への送信など。

自作ソフトでもうできてる分もあるけどいろいろ楽しみな内容だ


「Optimus Tactus タッチディスプレイ キーボード - Engadget Japanese」

Optimus Tactusはキーボードを名乗りながらメカニカルな鍵を持たず、一枚のフラットなタッチスクリーンディスプレイにキーを表示するいわば「ハードウェア・ソフトウェアキーボード」のようなもの。

自分はキーボードにはクリック感がないと駄目だな

「Wiiのクラック成功、ネイティブアプリが起動可能に - Engadget Japanese」

これにより内蔵無線LANやUSB、Bluetoothといったハードウェアを含むWii本来の能力にアクセスできることになります。

とりあえず新しいゲーム、家電があるとハックと分解する人はでてくるなー

AutoHotKeyだけでiTunesを操作する

検索してたらちょうどいいページを発見した

「COM Helper - AutoHotKey Community」からCoHelper.ahkをダウンロードする
↓
使い方は「COM Helper - AutoHotKey Community」より

#Include CoHelper.ahk 

CoInitialize() 

CLSID_iTunesApp := "{DC0C2640-1415-4644-875C-6F4D769839BA}" 
 IID_IiTunes    := "{9DD6680B-3EDC-40DB-A771-E6FE4832E34A}" 

piT := CreateObject(CLSID_iTunesApp, IID_IiTunes) 

DllCall(VTable(piT,11), "Uint", piT)         ; Play 
DllCall(VTable(piT, 9), "Uint", piT)         ; NextTrack 

Release(piT) 

CoUninitialize()

こんな感じで書くと再生→次の曲ができるようになった
操作はできたけど曲名とか取得できるんだろうか、模索中


これよりjavascriptの方が簡単だけど・・・あくまで「AutoHotKey」でやることが目的なので気にしない