mieki256's diary

• 株式会社オーム電機
• 型番 : LH-CT25A5
• 品番 : 08-1527
• MADE IN CHINA
• 電源 : リチウムポリマーバッテリー(3.7V, 200mAh内蔵。交換不可)
• 光源 : LED (交換不可)
• 定格入力 : DC 5V 0.7A (最大)
• 保護等級 : IPX3 (防雨形)
• 充電時間 : 約1.2時間 (満充電まで), 充放電 約500回まで可能
• 本体質量 : 約30g
• 外形寸法 : (約) 幅 45 x 高さ 61 x 奥行 21 mm
• 充電端子 : USB Type C
• マグネット付き。カラビナ付き。角度調整スタンド付き。
• USB Type-Cケーブルや三脚は別売。
• 満充電になると充電表示灯が赤色から緑色に変わる。
• スイッチを4回押すことで、明るさが順次変わる。
• 強(180ルーメン、1.5H) → 弱(65ルーメン、3.5H) → 点滅(0.5H) → OFF
• スイッチを長押しすることで、ブースターモード(250ルーメン、1H)になる。

◎ ついでにサンダルとスリッパも購入 :

• 目、鼻、口などの顔パーツの形状が本来のキャラデザから違ってしまっている場合。
• 目、鼻、口などの配置/バランスが本来のキャラデザから違ってしまっている場合。

◎ 試してみた :

◎ 「描いてくれ」では事故が起きそう :

◎ 2024/07/08追記 :

• controllerrc : マウスボタンの割り当てが設定されてる。
• gimprc : ブラシ、スクリプト、プラグインフォルダ等が設定されてる。GIMPインストールフォルダの記述部分を修正する必要有。
• menurc : ショートカットキー割り当てが設定されてる。
• sessionrc : 各ウインドウの位置その他が設定されてる。
• templaterc : テンプレート一覧が設定されてる。

• .gplファイル : GIMPのパレットファイル。テキストファイル。
• .acoファイル : Photoshopのスウォッチファイル(色見本ファイル)。バイナリファイル。

◎ Cyotek Color Palette Editorを試用。 :

◎ SwatchBookerを試用。 :

git clone https://github.com/olivierberten/SwatchBooker.git

sudo apt install python-pyqt5 python-pil liblcms-dev

$ python --version
Python 2.7.16

cd SwatchBooker
cd src
python swatchbooker.pyw

◎ gplファイルについて注意。 :

GIMP Palette
...
220	245	255
[EOF]

GIMP Palette
...
220	245	255[EOF]

◎ aco2gplがあるらしい。 :

> gcc --version
gcc (MinGW.org GCC Build-2) 9.2.0
Copyright (C) 2019 Free Software Foundation, Inc.
...

> make --version
GNU Make 3.81
Copyright (C) 2006  Free Software Foundation, Inc.
...
This program built for i686-pc-msys

git clone https://github.com/baskerville/aco2gpl.git
cd aco2gpl
make

aco2gpl.exe < db32.aco

> aco2gpl.exe < db32.aco
reading ACO stream version: 1 (photoshop < 7.0)
32 colors in this file
reading ACO stream version: 2 (photoshop >= 7.0)
32 colors in this file
Generating GPL...
GIMP Palette
Name: Untitled
Columns: 16
#
0 0 0 Black
34 32 52 Valhalla
69 40 60 Loulou
...

aco2gpl.exe < db32.aco > db32.gpl

◎ acoのフォーマット仕様について。 :

◎ gplのフォーマット仕様について。 :

◎ acoを書き出せるソフトについて。 :

• VirtualBox 6.0.12 -> 6.0.22
• Vagrant 2.2.5 -> 2.2.9

◎ Vagraant のプラグインもアップデート。 :

vagrant plugin repair
vagrant plugin expunge --reinstall
vagrant plugin update

> vagrant plugin list
vagrant-global-status (0.1.4, global) - Version Constraint: > 0
vagrant-hostmanager (1.8.9, global) - Version Constraint: > 0
vagrant-share (1.1.10, global) - Version Constraint: > 0
vagrant-vbguest (0.24.0, global) - Version Constraint: > 0

◎ 仮想環境削除。 :

cd /d X:\vmimg\vagrant\ubuntu1804\
vagrant destroy

vagrant box list
vagrant box remove bento/ubuntu-18.04 --all

◎ 仮想環境を作成。 :

vagrant box add bento/ubuntu-20.04

VAGRANT_HOME=/Volumes/SSD/vagrant/Vagrant.d

cd /d X:\vmimg\vagrant
mkdir ubuntu2004
cd ubuntu2004

vagrant init bento/ubuntu-20.04
vagrant up

◎ GuestAdditionsのバージョンが合わない :

http://download.virtualbox.org/virtualbox/6.0.22/VBoxGuestAdditions_6.0.22.iso

vagrant ssh
wget http://download.virtualbox.org/virtualbox/6.0.22/VBoxGuestAdditions_6.0.22.iso
sudo mkdir /VBoxGuestAdditions
sudo mount -o loop,ro VBoxGuestAdditions_6.0.22.iso /VBoxGuestAdditions
sudo sh /VBoxGuestAdditions/VBoxLinuxAdditions.run
rm VBoxGuestAdditions_6.0.22.iso
sudo umount /VBoxGuestAdditions
sudo rmdir /VBoxGuestAdditions
exit
vagrant reload

sudo apt-get install linux-headers-$(uname -r) build-essential dkms

# VirtualBoxのGUI画面で、GuestAdditions CDを挿入。

sudo mount /dev/cdrom /media/cdrom
sudo sh /media/cdrom/VBoxLinuxAdditions.run
exit
vagrant reload

cd /d X:\vmimg\vagrant\ubuntu2004
vagrant up

user: vagrant
pass: vagrant

sudo apt update
sudo apt upgrade
sudo apt install aptitude

◎ タイムゾーン変更。 :

sudo timedatectl set-timezone Asia/Tokyo
or
sudo timedatectl set-timezone 'Asia/Tokyo'

◎ ユーザ追加。 :

sudo adduser HOGE
sudo gpasswd -a HOGE sudo

◎ 常用エディタを nano から vim に変更。 :

sudo apt install vim

sudo update-alternatives --config editor
or
sudo update-alternatives --set editor $(update-alternatives --list editor | grep 'vim.basic')

◎ sources.list内を日本サーバに変更。 :

# Japan main server にする場合

sudo perl -p -i.bak -e 's%https?://(?!security)[^ \t]+%http://jp.archive.ubuntu.com/ubuntu/%g' /etc/apt/sources.list

# JAIST にする場合

sudo perl -p -i.bak -e 's%https?://(?!security)[^ \t]+%http://ftp.jaist.ac.jp/pub/Linux/ubuntu/%g' /etc/apt/sources.list

# 理化学研究所 にする場合

sudo perl -p -i.bak -e 's%https?://(?!security)[^ \t]+%http://ftp.riken.jp/Linux/ubuntu/%g' /etc/apt/sources.list

◎ 日本語化。 :

# Ubuntu 20.04 LTSの場合:

wget -q https://www.ubuntulinux.jp/ubuntu-ja-archive-keyring.gpg -O- | sudo apt-key add -
wget -q https://www.ubuntulinux.jp/ubuntu-jp-ppa-keyring.gpg -O- | sudo apt-key add -
sudo wget https://www.ubuntulinux.jp/sources.list.d/focal.list -O /etc/apt/sources.list.d/ubuntu-ja.list
sudo apt update

# Ubuntu 18.04 LTSの場合:

wget -q https://www.ubuntulinux.jp/ubuntu-ja-archive-keyring.gpg -O- | sudo apt-key add -
wget -q https://www.ubuntulinux.jp/ubuntu-jp-ppa-keyring.gpg -O- | sudo apt-key add -
sudo wget https://www.ubuntulinux.jp/sources.list.d/bionic.list -O /etc/apt/sources.list.d/ubuntu-ja.list
sudo apt update

# Ubuntu 16.04 LTSの場合:

wget -q https://www.ubuntulinux.jp/ubuntu-ja-archive-keyring.gpg -O- | sudo apt-key add -
wget -q https://www.ubuntulinux.jp/ubuntu-jp-ppa-keyring.gpg -O- | sudo apt-key add -
sudo wget https://www.ubuntulinux.jp/sources.list.d/xenial.list -O /etc/apt/sources.list.d/ubuntu-ja.list
sudo apt update

sudo apt install -y language-pack-ja
sudo localectl set-locale 'LANG=ja_JP.utf8'

case "$TERM" in
    linux)
        export LANG=C
        ;;
    *)
        export LANG=ja_JP.UTF-8
        ;;
esac

◎ 参考ページ。 :

• CPU : AMD A8-3850 (Socket FM1, 2.9GHz, 4コア, L2 Cache 1MB x 4, TDP 100W, Radeon HD 6550D)
• M/B : GIGABYTE GA-A75M-UD2H (Socket FM1, MicroATX, AMD A75, DVD-D/HDMI/DisplayPort/D-SUB)

sudo apt install virtualbox

Virtualization -> Enabled

◎ Extension Pack をインストール。 :

sudo apt install virtualbox
sudo apt install virtualbox-ext-pack
sudo apt install virtualbox-guest-additions-iso

◎ Vagrantもインストールした。 :

sudo apt install ./vagrant_2.2.9_x86_64.deb

$ vagrant --version
Vagrant 2.2.9

vagrant box add bento/ubuntu-18.04
vagrant box list

mkdir ~/vm
cd ~/vm
mkdir ubuntu1804
cd ubuntu1804

vagrant init bento/ubuntu-18.04
vagrant up

◎ HFSを試用。 :

HFS とは何ぞや。httpを使ってファイルをやり取りするツールだそうで。

_HFS - HTTP File Server
_HFS (HTTP File Server) - windows - eightban's memo
_窓の杜 - 【REVIEW】Webブラウザーでアクセスできるファイルサーバーを手軽に構築「HFS」
_How to connect a folder in PCem to my own Computer? - PCem

試してみた。まずは PCem上で Windows98 を起動して、DOS窓を開いてIPアドレスを確認。

ipconfig

• IPアドレス : 10.0.2.15
• サブネットマスク : 255.255.255.0
• デフォルトゲートウェイ : 10.0.2.2

何故にそんなIPアドレスになるのだろう。

_VirtualBox 内のゲスト OS からホスト OS にアクセスしたい
_VirtualBox (3) - garbagetown

NATで接続する場合、ゲストOSは 10.0.2.0/24 のIPアドレスになって、ホストOSには 10.0.2.2 が割り振られる模様。つまり、PCem や 86Box は、NAT接続でネットに繋がっているらしい。

ホストOSの Windows10 x64 1909上で、HFS を起動。何かしらのファイルを入れた適当なフォルダを、左上のウインドウにD&Dして登録。

HFS上でフォルダのプロパティを開く。

Permissions の Access、Delete、Upload で、Anyone にチェックを入れて、誰でも読み書きできる状態にしておく。

ゲストOSの Windows98から、IEを使って、http://10.0.2.2:8080/ にアクセスしてみた。HFS が用意したページが表示されて、以下の作業ができるようになった。

• ゲストOS(Win98)が、ホストOS(Win10)内のファイルをダウンロードできる。
• ゲストOS(Win98)が、ホストOS(Win10)内のフォルダに対して、何かのファイルをアップロードできる。

これで、ゲストOSの Windows98 と、ホストOSの Windows10 の間で、ファイルのやり取りが一応できる状態になった。

ただし、以下のような状態なので、ゲストOS(Win98)からアクションを起こさないとファイルのやり取りはできない。

• ホストOS(Win10)からゲストOS(Win98)のIPアドレスは見えない。
• ゲストOS(Win98)からホストOS(Win10)のIPアドレスだけは見える。(10.0.2.2 に決め打ちされてる)

それと、転送速度が 80KB/sec前後しか出ないので、やり取りに時間がかかる…。

◎ ホストOSからゲストOSにファイルを持っていくならISOが使える。 :

• Celeron B820 というゴミみたいなCPUが載ってるし。
• メモリは少ない上に、メモリ増設作業をした人の知識が無かったのか、デュアルチャネルで動かせるはずのところを何故かシングルチャネルで動かしてるし。
• HDDだから遅いし。
• 富士通製だから要らないアプリがてんこもりで、バックグラウンドで謎のサービスが色々動いててますます遅いし。
• しかも、Windows8.1…。(一応、Windows8からアップグレードはしてある。)

sudo apt install mediatomb

sudo vi /etc/default/mediatomb

NO_START="no"
# MT_INTERFACE="lo"
MT_INTERFACE="eth0"

sudo vi /etc/mediatomb/config.xml

sudo systemctl start mediatomb
sudo systemctl stop mediatomb
sudo systemctl restart mediatomb

◎ 動作確認。 :

◎ 参考ページ :

◎ REGZAからは見えなかった。 :

◎ 工具と作業場所の問題。 :

◎ 説明書の問題。 :

◎ 何故か引っ掛かる問題。 :

◎ 強敵です。 :

◎ 一応画像をメモ。 :

せっかく苦労したので写真を撮ってみた。一応、組み立てる時の注意点もメモ。もちろん、この通りのギヤの組み合わせじゃなくてもいいのだけど。

写真を見ていて気がついたけど、軸受けの中、ギヤ大からギヤ中に伝達するところで、大きいギヤを小さいギヤへと噛み合わせてるあたりが自分の希望とは合ってないな…。低回転で力を増すような回し方にしたかったのだけど、これでは真逆。

しかし、軸受け部分の穴の位置と、タイヤシャフトの固定部分からして、この組み合わせしかできないよな…。

• 軸受け部分の前後を逆にすれば低回転で力は増すけど、軸受け部分とタイヤシャフト固定部分がぶつかって、タイヤシャフトにギヤが届かなくなるし。
• ギヤだけ前後を入れ替えると、大きいギヤが底面とこすれて、そもそも回らない。

なかなか厳しい。

• TV回転台は、ダイソーで購入…したような…。たしかそのはず…。
• 10x10cmのMDF板や、コーナー用の金具も、ダイソーで購入。

• 力が足りなくてそもそも動かない…。指で軽く押してやるとようやく動き始める始末。
• タイヤの回転が早過ぎる。一瞬で1回転して、上に乗せた電池ボックスが遠心力で振り落とされる始末。
• とにかくウルサイ。まあ、実際に使うとしたらどうせ屋外で動かすだろうから問題にならないだろうけど。

激しい痛みが突然起きたとしても、その痛みが断続的である場合、もしくは最初は弱い痛みで次第に強くなっていく場合はくも膜下出血ではありません。

【医師が監修】後頭部が痛む頭痛の種類と注意したい病気 | ヘルスケア大学 より

#!ruby -Ks
# -*- mode: ruby; encoding: sjis -*-
# Last updated: <2013/07/06 22:00:15 +0900>
#
# ビットマップフォント描画用クラス
# 美咲フォント、k12x10フォント、5x5フォントなどをDXRubyで使用してみる
#
# 8×8ドット日本語フォント「美咲フォント」
# http://www.geocities.jp/littlimi/misaki.htm
#
# k12x10 font
# http://z.apps.atjp.jp/k12x10/
#
# 5x5フォント - 2006-08-14 - 兼雑記
# http://d.hatena.ne.jp/shinichiro_h/20060814#1155567183
#
# M+ FONTS
# http://mplus-fonts.sourceforge.jp/
#
# 東雲フォント
# http://openlab.ring.gr.jp/efont/shinonome/
#
# bdf2bmp
# http://hp.vector.co.jp/authors/VA013241/font/bdf2bmp.html

require 'dxruby'
require 'benchmark'

class BitmapFont
  # ビットマップフォントの画像種類を定義
  FONT_IMG_LIST = [
                   # ASCII/kanji=0/1 , filename, width, height, font-width, font-height
                   
                   # kind 0 - 5x5フォント
                   [0, 'res/5x5_ascii.png', 96, 96, 6, 6],
                   [1, '', 96, 96, 6, 6],

                   # kind 1 - 美咲フォント
                   [0, 'res/misaki_4x8_jisx0201.png', 64, 128, 4, 8],
                   [1, 'res/misaki_gothic.png', 752, 752, 8, 8],
                   
                   # kind 2 - k12x10フォント
                   [0, 'res/k12x10_ascii.png', 96, 160, 6, 10],
                   [1, 'res/k12x10_kanji.png', 1128, 940, 12, 10],
                   
                   # kind 3 - M+フォント
                   [0, 'res/mplus_f10r_6x13.png', 96, 182, 6, 13],
                   [1, 'res/mplus_j10r_10x11.png', 940, 1034, 10, 11],

                   # kind 4 - 東雲フォント 12x12
                   [0, 'res/shnm6x12r.png', 96, 192, 6, 12],
                   [1, 'res/shnmk12_12x12.png', 1128, 1128, 12, 12],
                  ]
  
  def initialize
    @ascii_imgs = Array.new
    @kanji_imgs = Array.new
    FONT_IMG_LIST.each do |dt|
      kind, fn, iw, ih, w, h = dt
      if fn != ''
        su = iw / w # 分割数を取得
        sv = ih / h
        imgs = Image.loadTiles(fn, su, sv) # 画像を分割してロード
        if kind == 0
          # ASCII
          @ascii_imgs.push(imgs)
        else
          # 漢字
          @kanji_imgs.push(imgs)
        end
      else
        if kind == 0
          @ascii_imgs.push(nil)
        else
          @kanji_imgs.push(nil)
        end
      end
    end
  end

  # Imageに文字列を描画する
  def drawFont(x, y, img, str, fontkind)
    str.split("").each do |s|
      code = s.bytes.to_a[0]
      if (0x81 <= code and code <= 0x9f) or (0xe0 <= code and 0xfc)
        # SJIS漢字
        code_l = s.bytes.to_a[1]
        seq = ((code <= 0x9f)? (code - 0x81) : (code - 0xc1)) * 0xbc
        seq += ((code_l <= 0x7e)? (code_l - 0x40) : (code_l - 0x41))
        # ku = seq / 94
        # ten = seq % 94
        fontimg = @kanji_imgs[fontkind]
        if fontimg
          img.draw(x, y, fontimg[seq])
          x += fontimg[seq].width
        end
      else
        # ASCII
        fontimg = @ascii_imgs[fontkind]
        if fontimg
          img.draw(x, y, fontimg[code])
          x += fontimg[code].width
        end
      end
    end
  end

  # フォントの横幅を取得
  def get_font_width(fontkind)
    return @ascii_imgs[fontkind][0x20].width
  end
  
  # フォントの縦幅を取得
  def get_font_height(fontkind)
    return @ascii_imgs[fontkind][0x20].height
  end

  # フォント画像に境界線を1ドット追加する
  # 引数は、フォント種類, フォントのドット色([a,r,g,b]), 境界線色([a,r,g,b])
  #
  # ※ めちゃくちゃ処理時間がかかる・待たされるので注意
  #
  def add_border(fontkind, fgcol, bdcol)
    aimgs = @ascii_imgs[fontkind]
    add_border_one2(aimgs, fgcol, bdcol) if aimgs != nil
    
    kimgs = @kanji_imgs[fontkind]
    add_border_one2(kimgs, fgcol, bdcol) if kimgs != nil
  end

  # フォント画像に対して境界線を追加する(1ドットずつ調べてつけていく方法)
  def add_border_one(imgs, fgcol, bdcol)
    a = [[-1, 0], [1, 0], [0, -1], [0, 1]]
    imgs.each do |img|
      imgw = img.width
      imgh = img.height
      imgh.times do |y|
        imgw.times do |x|
          if img.compare(x, y, fgcol)
            # ドットがある
            a.each do |v|
              tx = x + v[0]
              next if (tx < 0 or imgw <= tx)
              ty = y + v[1]
              next if (ty < 0 or imgh <= ty)
              img[tx, ty] = bdcol unless img.compare(tx, ty, fgcol)
            end
          end
        end
      end
    end
  end
  
  # フォント画像に対して境界線を追加する(上下左右にずらして何度か描画する方法)
  def add_border_one2(imgs, fgcol, bdcol)
    # a = [[-1, 0], [1, 0], [0, -1], [0, 1], [-1, -1], [1, -1], [-1, 1], [1, 1]]
    a = [[-1, 0], [1, 0], [0, -1], [0, 1]]
    imgs.each do |img|
      imgw = img.width
      imgh = img.height
      timg = Image.new(imgw, imgh)
      bimg = img.clone
      
      # 境界線色で描かれたフォント画像を生成
      imgh.times do |y|
        imgw.times do |x|
          bimg[x, y] = bdcol if bimg.compare(x, y, fgcol)
        end
      end
      
      # 位置をずらして描画
      a.each do |v|
        timg.draw(v[0], v[1], bimg)
      end
      timg.draw(0, 0, img)

      # 上書き
      img.draw(0, 0, timg)
    end
  end
  
end

# 動作テスト用
if $0 == __FILE__
  sw, sh = 640, 360
  Window.resize(sw, sh)
  Window.bgcolor = [0, 220, 128]
  
  img = Image.new(sw -  32, sh - 32, [64, 0, 0, 0])
  
  t = BitmapFont.new
  
  puts Benchmark::CAPTION
  puts Benchmark.measure {
    # 境界線の追加テスト
    t.add_border(4, [255, 255, 255, 255], [255, 0, 0, 0])
  }
    
  strlist = [
             "01234567890-^\\ qwertyuiop QWERTYUIOP@[",
             "asdfghjkl ASDFGHJKL;:] zxcvbnm ZXCVBNM,./",
             "ZOOM UP  PAN DOWN  PAN UP  FIX  LOG DEL  RETRY",
             "記録消去 やり直し あいうえお 新しい朝が来た 希望の朝だ",
             ""
            ]
  x = 0
  y = 0
  5.times do |fontkind|
    h = t.get_font_height(fontkind)
    strlist.each do |s|
      t.drawFont(x, y, img, s, fontkind)
      y += h
    end
  end
  
  Window.loop do
    break if Input.keyPush?(K_ESCAPE)
    Window.draw(16, 16, img)
  end
end

#!ruby -Ks
# -*- mode: ruby; encoding: sjis -*-
# Last updated: <2013/07/06 20:51:44 +0900>
#
# キーボード画像生成用クラス

require 'dxruby'
require_relative 'bitmapfont'

class KeyboardImage
  # キーの描画位置
  KEY_LINE = 40
  KEY_POS_LIST2 = [
                   [0, "1234567890-^", 0, 0], # 文字列を1文字ずつ分割して描画
                   [1, "bs", 365 + 16, 0], # 1文字ずつ個別に描画
                   [1, "del", 398 + 16, 0],
                   [0, "qwertyuiop@[", 8, KEY_LINE * 1],
                   [0, "asdfghjkl;:]", 16, KEY_LINE * 2],
                   [1, "up", 426 - 28, KEY_LINE * 2],
                   [0, "zxcvbnm,./", 24, KEY_LINE * 3],
                   [1, "left", 398 - 28, KEY_LINE * 3],
                   [1, "down", 426 - 28, KEY_LINE * 3],
                   [1, "right", 454 - 28, KEY_LINE * 3],
                  ]

  # テスト用：有効なキーの一覧
  TEST_KEY_LIST = [['z',     'ZOOM UP', K_Z        ],
                   ['x',     'FADEOUT', K_X        ],
                   ['f',     'FADEOUT', K_F        ],
                   ['c',     'FIX',     K_C        ],
                   ['b',     'ZOOM BK', K_B        ],
                   ['w',     'PAN D',   K_W        ],
                   ['a',     'PAN R',   K_A        ],
                   ['s',     'PAN U',   K_S        ],
                   ['d',     'PAN L',   K_D        ],
                   ['up',    'PAN D',   K_UP       ],
                   ['left',  'PAN R',   K_LEFT     ],
                   ['down',  'PAN U',   K_DOWN     ],
                   ['right', 'PAN L',   K_RIGHT    ],
                   ['bs',    'RETRY',   K_BACKSPACE],
                   ['del',   'LOG DEL', K_DELETE   ],
                  ]

  #
  # キーマップ画像を生成するメソッド
  #
  # _key_list_ :: 有効なキーの一覧を文字列の配列で渡す.
  # _about_list_ :: 各キーに対する説明文字列をハッシュで渡す.
  #
  # 返り値:: 生成した Image , 各キーの中心座標を記憶したハッシュ
  #
  def KeyboardImage.make_image(key_list, about_list)
    img = Image.new(640, 480, [64, 0, 0, 0])
    pos_dic = Hash.new
    about_atari = Struct.new("About", :x, :y, :w, :h)
    atari = Array.new
    
    # キー内を描画するフォントを指定
    fnt_key = Font.new(16, 'ＭＳ ゴシック')

    # ビットマップフォントを用意
    bmpfnt = BitmapFont.new
    fontkind = 0
    afw = bmpfnt.get_font_width(fontkind)
    afh = bmpfnt.get_font_height(fontkind)

    # 描画位置と描画文字列を配列にまとめる
    pos_list = []
    w = 28
    KEY_POS_LIST2.each do |dt|
      datakind, str, x, y = dt
      if datakind == 0
        # まとめて登録
        str.split(//).each do |ch|
          pos_list.push([ch, x, y])
          x += w
        end
      else
        # 1キーずつ登録
        pos_list.push([str, x, y])
      end
    end

    xmax = 0
    ymax = 0

    # 描画色の定義
    fgcol_enable = [255, 255, 255]
    fgcol_disable = [96, 96, 96]
    fgcol_gray = [160, 160, 160]
    fgcol_gray2 = [128, 128, 128]
    bdcol = [64, 64, 64]

    line_down_fg = false
    rep_str = {
      'left' => '←',
      'right' => '→',
      'up' => '↑',
      'down' => '↓'
    }

    # Imageに描画していく
    pos_list.each_with_index do |dt, i|
      str, x, y = dt
      key_use = key_list.include?(str)
      
      strlen = str.length
      draw_str = str
      if rep_str.has_key?(str)
        draw_str = rep_str[str]
        strlen = draw_str.length * 2
      end
      fwidth = strlen * 8

      x += 8
      y += 4
      
      # キーの枠の座標を決定
      bw = fwidth + 7
      bh = 20
      x1 = x + bw
      y1 = y + bh
      xmax = (x1 + 1) if xmax < (x1 + 1)
      ymax = (y1 + 1) if ymax < (y1 + 1)

      # キーの中心位置を記憶
      cx = x + (bw / 2) + 1
      cy = y + (bh / 2) + 1
      pos_dic[str] = [cx, cy]

      # キーの文字を描画
      fx = x + 4
      fy = y + 3
      if key_use
        # 有効なキーとして描画
        img.box(x - 1, y - 1, x1 + 1, y1 + 1, bdcol)
        img.box(x, y, x1, y1, fgcol_gray)
        
        img.drawFontEx(fx, fy, draw_str.upcase, fnt_key,
                       :color => fgcol_enable, :edge => true,
                       :edge_width => 1, :edge_color => bdcol,
                       :edge_level => 4)
      else
        # 無効なキーとして描画
        img.box(x, y, x1, y1, fgcol_gray2)
        img.drawFontEx(fx, fy, draw_str.upcase, fnt_key,
                       :color => fgcol_disable, :edge => false)
      end

      if about_list.has_key?(str)
        # 説明文字列が存在するので描画
        about_str = about_list[str]
        w = about_str.length * afw
        h = afh
        x = ((x + x1) / 2) - (w/2)
        y = y1 + 2
        
        # 他の説明文字列と重なってないか調べる
        fg = false
        atari.each do |dt|
          next if dt.x + dt.w < x
          next if dt.y + dt.h < y
          next if x + w < dt.x
          next if y + h < dt.y
          fg = true
        end
        y += (afh + 1) if fg
        bmpfnt.drawFont(x, y, img, about_str, fontkind)
        atari.push(about_atari.new(x, y, w + 4, h))
        
        x2 = x + w
        y2 = y + h
        xmax = x2 if x2 > xmax
        ymax = y2 if y2 > ymax
        
        line_down_fg = !line_down_fg
      end
    end

    return img.slice(0, 0, xmax + 8, ymax + 8), pos_dic
  end

  # テスト用：有効なキーの一覧を配列で返す
  # ["z", "x", "c"] といった形。
  def KeyboardImage.get_enable_list
    lst = Array.new
    TEST_KEY_LIST.each { |dt| lst.push(dt[0]) }
    return lst
  end

  # テスト用：キーの説明文字列一覧をハッシュで返す
  # {"z" => "zoom", "x" => "fix"} といった形。
  def KeyboardImage.get_about_dic
    a = Hash.new
    TEST_KEY_LIST.each { |dt| a[dt[0]] = dt[1] }
    return a
  end

  # テスト用：キー入力用のハッシュを返す
  # {K_Z => "z", K_DELETE => "delete"} といった形。
  def KeyboardImage.get_input_dic
    a = Hash.new
    TEST_KEY_LIST.each { |dt| a[dt[2]] = dt[0] }
    return a
  end

end

# 動作テスト用
if $0 == __FILE__
  sw,sh = 640, 360
  Window.resize(sw, sh)

  # 美咲ゴシックフォントを一時インストール
  Font.install("res/misaki_gothic_emb.ttf")
  fnt_mini = Font.new(8, '美咲ゴシック')

  # キーボード画像作成
  enables = KeyboardImage.get_enable_list
  abouts = KeyboardImage.get_about_dic
  img, pos_dic = KeyboardImage.make_image(enables, abouts)

  inp = KeyboardImage.get_input_dic

  # キーを押した際の表示マークを作成
  onimg = Image.new(20, 20).circleFill(10,10,10,[255,0,0])
  
  test_str = ["abcdefg hijklmn",
              "opqrstu vwxyz",
              "ABCDEFG HIJKLMN",
              "OPQRSTU VWXYZ",
              "新しい朝が来た 希望の朝だ"
             ]

  test_bgcol = [
                [0,0,0],
                [0,0,255],
                [255,0,0],
                [255,0,255],
                [0,255,0],
                [0,255,255],
                [255,255,0],
                [255,255,255]
               ]
  
  alpha = 0
  mx, my = 0
  bgcol_num = 1

  # メインループ
  Window.loop do
    Window.bgcolor = test_bgcol[bgcol_num]
    break if Input.keyPush?(K_ESCAPE)

    # MISAKIフォント(ビットマップ埋め込みタイプ)でテスト描画
    # 注意点：
    # Window.drawFont() では描画できるが、
    # Image.drawFont() では描画できない。
    x = 16
    y = 16
    test_str.each do |s|
      Window.drawFont(x, y, s, fnt_mini)
      y += 8
    end

    # キーボードイメージを描画
    x = sw - img.width - 16
    y = sh - img.height - 16
    bx = x
    by = y
    Window.draw(x, y, img)

    # キーが押されたかチェック
    inp.each_key do |key|
      if Input.keyPush?(key)
        keykind = inp[key]
        mx, my = pos_dic[keykind]
        mx += bx - (onimg.width / 2)
        my += by - (onimg.height / 2)
        alpha = 255
      end
    end

    # 押されたキーの位置にマークを描画
    if alpha > 0
      Window.drawAlpha(mx, my, onimg, alpha)
      alpha -= 8
    end

    if Input.keyPush?(K_C)
      bgcol_num = (bgcol_num + 1) % test_bgcol.length
    end
  end
end

◎ フォントに枠をつける処理も書いてはみたものの。 :

• サウンド種類の割合数分、サウンド種類が綺麗に並んだリストを作成。
• 乱数を使って、ある回数、リストの順番を入れ替え。
• 入れ替えたリストの頭から順に呼び出し。
• 最後まで読んだらリストを作り直し。

◎ 電器店も回ってきた。 :

◎ 地上波デジタルが見れるノートPCが気になったり。 :

• オーケストラの指揮棒に使う。…カニさんデザインが厳しい。
• 2本を組み合わせて箸にする。…長さが違うのが厳しい。
• 背中をかく。…衛生面に関して厳しい。
• 髪の毛を留める。…自分、スポーツ刈りだから厳しい。
• PCのケーブルをまとめる。…断線しちゃって厳しい。

◎ 蚊の仕様はおかしい。 :

Googleに頼る。

→ 「検索単語 site:blawat2015.no-ip.com」みたいな。試してみたけど今一つの反映具合。考えてみれば、即座に反映もされないしで、無いよりはマシ、ぐらいの話だよなぁ。

掲示板に検索機能をつける。

→ 日記本文と掲示板で別々に検索しなきゃいけないのが面倒な予感。

掲示板の各項を hnf に付加させる。

→ hns 自体に大掛かりな修正を加えないといけない予感。ローカルの hnf と、サーバ上の hnf とで不整合も出てきそうだし。

◎ _白色LEDライト :

◎ 脚本が會川昇氏でビックリ :

◎ 光の国は悪の国で :

◎ 白の人は冷たいな :

◎ _フォントサイズ指定関係の関連記事・参考リンク :

◎ そういえば :

◎ _Sleipnirスクリプト - CSSの有効無効の切り替え :

◎ 卵が先か鶏が先か :

◎ 2004/07/20追記 :

◎ なんだか :

◎ ていうか :

◎ なんにせよ :

◎ スケッチブック :