薬切れ

ほとんどの人にはわからない
スーパーマニアック日記はじまるよー＼（＾O＾）／

BDSV3の設定ファイルは、
ワケありでUTF-8で保存しようかなと思ったんですが
HSPではShift-JISが基本コードであるため
そのままでは使えません。
しかし、かろうじでUnicode（UTF-16）も扱えるので
一旦UTF-8をUnicodeに変換しておけば
たとえShift-JISで出せない文字が入っていても（ハートなど）
読み取ることができるわけです。

スクリプトはこんな感じ↓

#uselib "user32"
#func DrawText "DrawTextW" int,wptr,int,int,int
#uselib "kernel32"
#define CP_UTF8         65001   ; UTF-8
#func MultiByteToWideChar "MultiByteToWideChar" sptr,sptr,sptr,sptr,sptr,sptr

//----Unicode(UTF-16)
    sdim h16,64     ;確保
    lpoke h16,0,38<<24|97<<16|254<<8|255    ;Unicodeでハート（255 254 97 38）
                                            ;↓これと同等の処理
    ;poke h16,0,255 : poke h16,1,254 : poke h16,2,97 : poke h16,3,38
    pos 50,50:sysfont 17
    mes "Unicodeの文字を描画"
    font msgothic,150,16
    rect=ginfo_cx, ginfo_cy, ginfo_winx, ginfo_winy     ;文字の描画領域
    DrawText hdc,varptr(h16),-1,varptr(rect),0
    redraw  ;必須

//----UTF-8
;最終的にはUnicodeに変換しないといけない
    sdim h8,64      ;確保
    poke h8,0,239
    poke h8,1,187
    poke h8,2,191
    poke h8,3,226
    poke h8,4,153
    poke h8,5,161   ;UTF-8でのハート（でかすぎﾌｲﾀｗ 6byte）
    
    pos 200,50:sysfont 17
    mes "UTF-8の文字をUnicodeと同じように描画"
    font msgothic,150,16
    rect=ginfo_cx, ginfo_cy, ginfo_winx, ginfo_winy     ;文字の描画領域
    DrawText hdc,varptr(h8),-1,varptr(rect),0
    pos 200,250:sysfont 17
    mes "ですよねー。\n\nと言うわけで変換して描画"

    sdim h8to16,64  ;変換後の変数
    MultiByteToWideChar CP_UTF8, 0, varptr( h8 ), -1, varptr( h8to16 ), 255

    font msgothic,150,16
    rect=ginfo_cx, ginfo_cy, ginfo_winx, ginfo_winy     ;文字の描画領域
    DrawText hdc,varptr(h8to16),-1,varptr(rect),0
    redraw  ;必須
    stop



※追記：
　ここででかすぎ6バイトといっていたが調べてみると
　メモ帳などでUTF-8のテキストと判断するための
　フラグが先頭3バイトを占領していることが判明、
　つまり実質UTF-8でのハートの文字は3バイト

※さらに追記：
　Unicodeの方も先頭2バイトは判別フラグみたいです。
　つまりUnicodeのハートは2バイト

これを実行するとこんな感じ。


とまあこんな感じでUTF-8の文字を描画することができました。
しかしここで問題が、
読み込むときはそれで良いですが、
保存する時はどうすれば良いのか・・・！？

変換部分のここ

    MultiByteToWideChar CP_UTF8, 0, varptr( h8 ), -1, varptr( h8to16 ), 255

ここの第１パラメーターのCP_UTF8の部分を
Unicodeに該当する定数にすれば良いのかなと思いきや

MultiByteToWideChar 関数 - MSDN
文字列をワイド文字列（Unicode）にマップします

定数	意味
CP_ACP	ANSI コードページ
CP_MACCP	Macintosh コードページ
CP_OEMCP	OEM コードページ
CP_SYMBOL	シンボルコードページ（42）
CP_THREAD_ACP	現在のスレッドの ANSI コードページ
CP_UTF7	UTF-7 を使った変換
CP_UTF8	UTF-8 を使った変換

あれ、無い。

これはもう他の方法を探すしかないなと思い
とりあえずMultiByteToWideCharでググっていると

ん？

「WideCharToMultiByte」？

WideCharToMultiByte 関数 - MSDN
ワイド文字列を新しい文字列にマップします

逆版があるだと！？

#uselib "user32"
#func DrawText "DrawTextW" int,wptr,int,int,int
#uselib "kernel32"
#define CP_UTF8         65001   ; UTF-8
#func MultiByteToWideChar "MultiByteToWideChar" sptr,sptr,sptr,sptr,sptr,sptr
#func WideCharToMultiByte "WideCharToMultiByte" sptr,sptr,sptr,sptr,sptr,sptr,sptr,sptr

//----UTF-8
;最終的にはUnicodeに変換しないといけない
    sdim h8,64      ;確保
    poke h8,0,239
    poke h8,1,187
    poke h8,2,191
    poke h8,3,226
    poke h8,4,153
    poke h8,5,161   ;UTF-8でのハート（でかすぎﾌｲﾀｗ 6byte）
    
    pos 50,30:sysfont 17
    mes "UTF-8の文字をUnicodeと同じように描画"
    font msgothic,100,16
    rect=ginfo_cx, ginfo_cy, ginfo_winx, ginfo_winy     ;文字の描画領域
    DrawText hdc,varptr(h8),-1,varptr(rect),0
    pos 50,170:sysfont 17
    mes "ですよねー。\n\nと言うわけで変換して描画"

    sdim h8to16,64  ;変換後の変数
    MultiByteToWideChar CP_UTF8, 0, varptr( h8 ), -1, varptr( h8to16 ), 255

    font msgothic,100,16
    rect=ginfo_cx, ginfo_cy, ginfo_winx, ginfo_winy     ;文字の描画領域
    DrawText hdc,varptr(h8to16),-1,varptr(rect),0

    pos 50,300:sysfont 17
    mes "無事描画成功！じゃあ今度は戻してみよう！"

    sdim h16to8,64  ;変換後の変数
    WideCharToMultiByte CP_UTF8, 0, varptr( h8to16 ), -1, varptr( h16to8 ), 255, 0, 0

    font msgothic,100,16
    rect=ginfo_cx, ginfo_cy, ginfo_winx, ginfo_winy     ;文字の描画領域
    DrawText hdc,varptr(h16to8),-1,varptr(rect),0

    redraw  ;必須



　　　　　　　　 ,,x-ｰ:: ":::::
　　　　　　　　,x '"::::::::::::::::::::
　　　　　　,､'":::::::::::::,, x-‐ ｧ:
　　　 ,,x '"::::::,,､- '"　 　 　|:::
　　　 `"i`ｰ'"　　　　　　　 ヾ
　 　 　　!　 ､　､,,,,,,,,,;;;;;;;;;彡ﾐ
　 　　　|,,,,ﾉi `ｰヾ;; '"----､
　　　　 ヾ::ヽ　　　　　-┴'~
　 　 　　~|:/　' ' ' `ー ' "'"
　　　　　 /_
　　　　　l　　　　'' )　　　　i
　　　　　 ヽ,,､'~`　　　　　 U
　　　　　　 ﾞ, __ ,-､_,ノ`
　|／ 　 　 　ﾞ,　`'" ,,y
　|／　　彡　 ﾞ､`-'"
　　 /|/　　　　 i
　　 / 　 　 　　 !　　　　,, -'"
　　　　|　　　　　`ー '"|::
　　　　|　　　　　　／|||ヽ
　　　　　　　　　 /|||||／心
　　　　　　　　　 |ヾ/ ／`ｰ

というわけで無事にUTF-8が扱えそうです＾ｑ＾

---

Web拍手レス
なるほど、早速やってみようと思います。
DDR Xはリミックス解禁したんですねー。
結局最後までクリアできませんでしたが。
○の中には⑨が入ると思いますｗ（らのっちぇさん）
改めてみるとセイバーリミ鬼の途中50連近くの部分が
人間業じゃない気がしますねーｗ
今日やりに行こうかなと思いましたけど
風邪治らないしインフルで外出控えるよう言われてるし雨だしで
多分無理な予感ｗ

雑談劇場の「背景の謎１」見てたんですけど、
やっぱりH500ってトムさんが「HELP!」って言おうとして
最初の部分を言いにくくて、「h...h.h....（ｒｙ」
って500回も言ったんですよね？（D.J.Sin さん）
CATASTROPHEの文字のとおり大惨事に見舞われた
トムさんが必死になって言ったわけですよっ！

[日記マンガ] [HSP]

日記更新するけど

さて、今年も粽完成。
ちょっと白が笹にへばりついて食べにくい印象。
でもおいしい（´∀｀　）

よし、ゴールデンウイーク向けにゲームを
作ろうと思っていたらいつの間にかGWが始まっていた
な、何を言っているのか（ｒｙ
2日でできるゲームネタありますかねー。

今日はRiderとゲーセン行ったりヨドバシカメラ行ったりしていました。
ちなみに上の写真の左上部分のドラは今日の戦利品

～今日のDDR～
SABER WING激　まさかのAA
Horatio激　ﾑﾘｽ（まぁ、地団太部分（2ステップ目）まで行けたから良いけどｗ）
グルーブレーダー　Freezeが199になりました（200無理すぎるｗ）

～今日のスリルドライブ2～
久しぶりに夜間コースを完走しました。
途中まで視点変更機能の存在忘れてたｗ

～今日の弐寺～
Riderに勧められて挑戦。
やっぱり鍵盤の間隔広くてやりにくいです＾ｑ＾
慣れしかないんだよね（´・ω・｀）

～今日のヨドバシ～
500GBのHDD購入～
ただ今外付けのHDDにある重要データ移動中。
最近外付けのほうが認識しにくくなってるから今のうちに。
ついでに100GBほど分割してWindows 7βいれてみた。

いろいろ気になった点
・ペイントでJPG保存した時の画質落ちがマシになった。
左がVistaで保存、右が7で保存

不具合～の文字周りを見るとブロックノイズの量が減っている

・管理者権限関連のあのボタン画像の色変更

あのボタン画像が青と黄色のみに。
ちなみにVistaだと＋赤と緑の4色


Win7＜「Vista（あなた）とは違うんです。」

でもウインドウ幅が短いとタイトルバー文字の後ろの
白ぼかしが不自然な切れ方してます。

・ところで

VistaってLZH形式のアイコンありましたっけ？

・マウスオーバー時のタスクバー発光色


アイコンの中央の色で決めている？

・タスクバーのサムネイルにマウスを重ねると


　　　　　　　　　　　↓


そのウインドウ以外は透明になる

・WMPコンポーネントの初期化が早い
ただ単にWMP11が遅いだけかとｗ
でもWMP12はデザインが崩れやすい。
最大化→元に戻すにしても大きさはほぼ画面いっぱいのまま。
通常サイズ時でも何故かウインドウの影がない。

・フォントがわかりやすくなった

これは良いね。すごくわかりやすくなった。
しかもある程度のまとまり（同名フォントの太字や斜体版など）は
フォルダのようにダブルクリックでさらに展開できる。
気になったのはフォルダ仕様と
通常フォントの見分けがほとんど付かないこと。
一応透明度が違うっぽい？
ところで、メイリオとは別にMeiryo UIというのがあるんだがこれは一体…！


[日記] [日記マンガ]