mieki256's diary

◎ xyzzyで試す :

◎ サクラエディタで試す :

◎ Notepad++で試す :

◎ 余談。普段使ってる電卓アプリについて :

{
    "Title": {
        "path": "imgs/img01.png",
        "start": 1,
        "area": [{
                "link": "Hall",
                "type": "rect",
                "pos": [561, 399, 718, 582]
            }
        ]
    },
    "Hall": {
        "path": "imgs/img02.png",
        "area": [{
                "link": "RoomYellow",
                "type": "poly",
                "pos": [80, 201, 310, 355, 308, 594, 84, 706]
            }, {
                "link": "RoomGreen",
                "type": "rect",
                "pos": [471, 378, 673, 564]
            }, {
                "link": "RoomBrown",
                "type": "poly",
                "pos": [1059, 337, 1231, 194, 1225, 706, 1059, 587]
            }
        ]
    },
    "RoomYellow": {
...(以下略)...

• "Title", "Hall" がシーン名。
• "path" で、そのシーンで表示する画像ファイル名を指定。
• "area"でマウスクリックできる領域を指定。
• "link" は、移行先のシーン名を指定。
• クリック領域は、"rect"(矩形), "poly"(ポリゴン) の2種類を選べる。
• "pos" に、領域の座標値を列挙する。
• "rect" の場合の "pos" は、矩形の左上x,y座標、右下x,y座標を列挙。
• "poly" の場合の "pos" は、ポリゴンの頂点x,y座標を時計回りで列挙。

◎ 課題。 :

◎ 妄想。 :

◎ そういうソフトがあった記憶も。 :

◎ 2019/07/07追記。 :

• 上の3つが、基準点を指定しないで描画した場合。
• 下の3つが、基準点を指定して描画した場合。

◎ ソースと画像。 :

-- Draw Origin test 01

function love.load()
  img = love.graphics.newImage("box01_64x64.png")
  bgimg = love.graphics.newImage("gridbg.png")
  rotation = 0
  scale = 1.0
  scale_rot = 0
end

function love.update(dt)
  rotation = (rotation + 180 * dt) % 360
  scale_rot = (scale_rot + 180 * dt) % 360
  scale = 1.0 + 0.5 * math.cos(math.rad(scale_rot))
end

function love.draw()
  love.graphics.clear(0, 0, 0, 1.0)
  love.graphics.setColor(1.0, 1.0, 1.0, 1.0)
  love.graphics.draw(bgimg, 0, 0)

  local x = 64
  local y = 64 * 2
  local rot = math.rad(rotation)
  love.graphics.draw(img, x, y)

  x = x + 64 * 3
  love.graphics.draw(img, x, y, rot)

  x = x + 64 * 3
  local rot = math.rad(rotation)
  love.graphics.draw(img, x, y, 0, scale, scale)

  x = 64
  y = y + 64 * 3
  local ox, oy = img:getWidth() / 2, img:getHeight() / 2
  love.graphics.draw(img, x, y, 0, 1, 1, ox, oy)

  x = x + 64 * 3
  love.graphics.draw(img, x, y, rot, 1, 1, ox, oy)

  x = x + 64 * 3
  love.graphics.draw(img, x, y, 0, scale, scale, ox, oy)

  love.graphics.print(tostring(love.timer.getFPS()).." FPS", 10, 10)
end

function love.keypressed(key, isrepeat)
  if key == "escape" then
    -- ESC to exit
    love.event.quit()
  end
end

function love.conf(t)
  t.window.width = 640
  t.window.height = 480
  t.window.title = "Draw Origin 01"
  t.window.vsync = 1

  -- t.window.fullscreen = false
  -- t.window.fullscreen = true
  -- t.window.fullscreentype = "exclusive"
end

love フォルダ名

• .NET Framework は、1.0、1.1、2.0/3/0/3.5 がそれぞれ別物。上位互換性は無い。
• .NET Framework 1.1 は、Windows8/10 ではもうサポートされてないし、インストールもできない。
• Windows8/10 の場合、.NET Framework は 2.0/3.0/3.5ならまだどうにか動かせなくもないけど…。1.0 や 1.1 は Microsoft的に「もう使うんじゃねえ」「使えないようにしといたから」てな扱い。

◎ 代替アプリが見つからない。 :

◎ 一部をWindows10のメールで置き換えた。 :

MagicSend.exe 00-1f-d0-cf-6c-96
MagicSend.exe 00-1F-D0-CF-6C-96

◎ _ WWOL(Windows WOL) :

wol.exe 192.168.1.255 00-1F-D0-CF-6C-96

◎ _MagicPacket.zip (MagicPacket.exe) :

MagicPacket.exe 00-1F-D0-CF-6C-96 192.168.1.255

◎ _wol (RubyGems) :

wol -i 192.168.1.255 00:1F:D0:CF:6C:96

◎ _WOL Util :

MagicPacket.exe 001FD0CF6C96
MagicPacket.exe 00-1F-D0-CF-6C-96
MagicPacket.exe 00:1F:D0:CF:6C:96
MagicPacket.exe 001fd0cf6c96
MagicPacket.exe 00-1f-d0-cf-6c-96
MagicPacket.exe 00:1f:d0:cf:6c:96

◎ そんなわけで原因は分からないけど。 :

' PT1機にMagic Packetを送信してからTVTestを起動する

Option Explicit

' Const wol_exec = "MagicSend\MagicSend.exe 00-25-22-18-9E-51"
Const wol_exec = "wwol\wol.exe 192.168.1.255 00-25-22-18-9E-51"

Const hostip = "192.168.1.28"
Const tvtest = "TVTest.exe"

Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")

Dim res
If fncPing(hostip) = False Then
    if MsgBox("チューナー機は起動していません。" & vbCr & "起動しますか？", _
              vbYesNo + vbQuestion) = vbYes then
        wsh.Run wol_exec, 2, True
        res = wsh.Popup("チューナー機を起動しました。" _
                        & vbCr & "5秒ほどお待ちください。", 4)
        If res = vbOK Then
            WScript.Sleep(5000)
        End If
    end If
Else
    res = wsh.Popup("チューナー機は既に起動しています。", 2)
End If

If fncPing(hostip) = False Then
    res = wsh.Popup("チューナー機が起動できませんでした。" _
                    & vbCr & "スクリプトを終了します。", 3)
    Set wsh = Nothing
    WScript.quit
End If

If MsgBox("TVTest を起動しますか？", vbYesNo + vbQuestion) = vbYes Then
    wsh.Run tvtest, , False
End If

Set wsh = Nothing
WScript.quit

' ping送信をする関数。
' 以下のページ内容をそのまま使わせてもらいました。
' Systemメモメモ: VBScriptでPing
' http://happy44s.blogspot.jp/2012/03/vbscriptping.html
Function fncPing(host)
Dim objWMI
Dim colItems
Dim objItem
Set objWMI = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMI.ExecQuery("select * from Win32_PingStatus where address ='" _
                                & host & "'")
For Each objItem In colItems
    If objItem.StatusCode = 0 Then
        fncPing = True
    Else
        fncPing = False
    End If
Next
Set objItem = Nothing
Set colItems = Nothing
Set objWMI = Nothing
End Function

◎ K8MM-Vについて調べ直し。 :

# -*- mode: python; Encoding: utf-8; coding: utf-8 -*-

"""
画像ファイルをドラッグアンドドロップしてダブルバッファで表示してみるテスト

Windows7 x64 + Python 2.7.10 + wxPython 3.0.2.0 で確認。
"""

import wx

USE_BUFFERED_DC = True


class MyFileDropTarget(wx.FileDropTarget):

    """ドラッグアンドドロップ担当クラス"""

    def __init__(self, obj):
        """コンストラクタ"""
        wx.FileDropTarget.__init__(self)
        self.obj = obj  # ファイルのドロップ対象を覚えておく

    def OnDropFiles(self, x, y, filenames):
        """ファイルをドロップした時の処理"""
        self.obj.LoadImage(filenames)  # 親？の画像読み込みメソッドを呼ぶ


class MyFrame(wx.Frame):

    """ダブルバッファで表示するFrame"""

    def __init__(self, parent=None, title=""):
        """コンストラクタ"""

        wx.Frame.__init__(self, parent=parent, title=title, size=(800, 600))

        # PAINTイベント、SIZEイベントで呼ばれるメソッドを割り当てる
        self.Bind(wx.EVT_PAINT, self.OnPaint)
        self.Bind(wx.EVT_SIZE, self.OnSize)

        # 画像格納用リストを初期化
        self.imgs = []

        # 描画用バッファ初期化のために一度 OnSize() を呼ぶ
        self.OnSize()

        # ファイルドロップの対象をフレーム全体に
        self.droptarget = MyFileDropTarget(self)

        # ファイルドロップ受け入れを設定
        self.SetDropTarget(self.droptarget)

    def LoadImage(self, files):
        """D&Dされた画像をロードして描画"""
        for filepath in files:
            b = wx.Bitmap(filepath)
            self.imgs.append(b)

        self.UpdateDrawing()  # 描画更新

    def OnSize(self, event=None):
        """ウインドウサイズが変更された時に呼ばれる処理"""
        size = self.ClientSize  # クライアントのウインドウサイズを取得

        # ウインドウサイズで、空の描画用バッファ(bitmap)を作成
        self._buffer = wx.EmptyBitmap(*size)

        self.UpdateDrawing()  # 描画更新

    def UpdateDrawing(self):
        """描画更新"""
        dc = wx.MemoryDC()
        dc.SelectObject(self._buffer)

        self.Draw(dc)  # 描画

        del dc  # Update()が呼ばれる前に MemoryDC を削除しておく必要がある
        self.Refresh()
        self.Update()

    def OnPaint(self, event=None):
        """画面書き換え要求があった時に呼ばれる処理"""
        if USE_BUFFERED_DC:
            # ダブルバッファを使う場合
            dc = wx.BufferedPaintDC(self, self._buffer)
        else:
            # ダブルバッファを使わない場合
            dc = wx.PaintDC(self)
            dc.DrawBitmap(self._buffer, 0, 0, True)

    def Draw(self, dc):
        """描画処理。デバイスコンテキストを貰ってソレを使って処理"""
        dc.Clear()  # デバイスコンテキストでクリア

        # 画像を描画
        x, y = 0, 0
        for img in self.imgs:
            dc.SetPen(wx.Pen(wx.BLACK, 4))  # ペンを設定しないと描画できない
            dc.DrawBitmap(img, x, y, True) # 画像描画

            # 画像枠を描画
            dc.SetBrush(wx.TRANSPARENT_BRUSH) # 透明塗り潰し
            dc.SetPen(wx.Pen(wx.RED, 2)) # 赤い線を指定
            dc.DrawRectangle(x, y, img.Width, img.Height)
            x += 32
            y += 32

if __name__ == '__main__':
    # メイン処理
    app = wx.App(False)
    frame = MyFrame(None, "DnD Image display use Double Buffer")
    frame.Show()
    app.MainLoop()

require 'dxruby'

#
# パイプ内のような背景描画を行う
#
class PipeBg
  @@hlsl = <<EOS
  float sz;
  float r;
  float angle_max;
  float start_x;
  float start_y;
  texture tex0;

  sampler Samp = sampler_state {
    Texture =<tex0>;
    MinFilter = LINEAR;
    MagFilter = LINEAR;
    MipFilter = LINEAR;
    // MinFilter = POINT;
    // MagFilter = POINT;
    // MipFilter = POINT;
    AddressU = BORDER;
    AddressV = WRAP;
  };

  float4 PS(float2 input : TEXCOORD0) : COLOR0
  {
    input.x = (input.x - 0.5) * (r * cos(atan2(input.y - 0.5, sz))) / sz + start_x + 0.5;
    input.y = (atan2(input.y - 0.5, sz) / angle_max) + start_y;
    return tex2D( Samp, input );
  }

  technique {
    pass {
      PixelShader = compile ps_2_0 PS();
    }
  }
EOS

  attr_accessor :sz
  attr_accessor :r
  attr_accessor :angle_max
  attr_accessor :start_x
  attr_accessor :start_y
  attr_accessor :shader

  #
  # コンストラクタ
  #
  # @param [Number] sz スクリーンまでの距離
  # @param [Number] r 壁までの距離
  # @param [Number] start_x 初期位置 x
  # @param [Number] start_y 初期位置 y
  #
  def initialize(sz = 160, r = 280, start_x = 0.0, start_y = 0.0)
    self.sz = sz
    self.r = r
    self.start_x = start_x
    self.start_y = start_y

    core = Shader::Core.new(@@hlsl,{
                              :sz=>:float,
                              :r=>:float,
                              :angle_max=>:float,
                              :start_x=>:float,
                              :start_y=>:float
                            })
    self.shader = Shader.new(core)
    self.shader.sz = self.sz.to_f / (Window.height / 2)
    self.shader.r = self.r.to_f / (Window.width / 2)
    self.shader.start_x = self.start_x
    self.shader.start_y = self.start_y
    self.angle_max = Math.atan2(Window.height / 2, sz)
    # self.angle_max = 90.0 * Math::PI / 180.0
    self.shader.angle_max = self.angle_max
  end

  #
  # 描画開始位置を更新
  #
  # @param [Number] dx テクスチャ取得位置 x 増分(1.0より小さい値が望ましい)
  # @param [Number] dy テクスチャ取得位置 y 増分(1.0より小さい値が望ましい)
  #
  def update(dx, dy)
    self.start_x += dx
    self.start_y += dy
    self.shader.start_x = self.start_x
    self.shader.start_y = self.start_y
  end

  #
  # 描画
  #
  # @param [Number] x 描画位置 x
  # @param [Number] y 描画位置 y
  #
  def draw(x, y, img)
    Window.drawEx(x, y, img, :shader => self.shader)
  end
end


if $0 == __FILE__
  # ----------------------------------------
  # 使用例

  font = Font.new(14)

  img = Image.load("bg_960x480.png")
  bg = PipeBg.new(200, 360, 0.0, 0.0)

  Window.loop do
    break if Input.keyPush?(K_ESCAPE)
    bg.update(0.0, -0.005)
    bg.draw(-Window.width / 4, 0, img)

    s = "#{Window.real_fps.to_i} FPS CPU: #{Window.getLoad.to_i} % x = #{bg.start_x.to_i}"
    Window.drawFont(4, 4, s, font)
  end
end

#
# pipebg.rb の呼び出しテスト
#

require 'dxruby'
require_relative 'pipebg'

# 背景マップデータ
mapdata = [
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 1, 2, 1, 2, 2, 2, 1, 1, 2, nil, nil, 2, 1, 2, 2, 2, 1, 1, 2, nil, nil, nil, 2, 1, 1, 1, 1, 1, 1, 1, 1, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 2, nil, nil, 2, 1, nil, 2, 1, 2, nil, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 2, nil, nil, nil, 2, 1, 3, 3, 3, 3, nil, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 2, nil, nil, 2, 1, nil, nil, 2, nil, nil, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 2, nil, 2, 1, 1, 1, 2, nil, 2, 1, 1, 3, 3, 3, 3, 3, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 2, nil, nil, 2, 1, nil, nil, 2, nil, nil, 1, 2, 2, 2, 1, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 3, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 2, nil, nil, 2, 1, nil, 2, 1, 2, nil, 1, 2, nil, 2, 1, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 1, 1, 2, 1, nil, nil, nil, nil, 1, 3, 3, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 1, 2, 1, 2, nil, nil, 2, 1, 1, 2, 2, 1, 1, 2, 2, 2, 1, 1, 1, 1, 2, 1, nil, nil, nil, 3, 3, 3, nil, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, nil]
]

font = Font.new(14)

bg = PipeBg.new(160, 280)

imgs = Image.loadTiles("bg_chip.png", 4, 1, true)
star_bg = Image.load("bg_star.png")
rt = RenderTarget.new(64 * 15, 64 * 8)

bg_x, bg_y = 0, 0

Window.loop do
  break if Input.keyPush?(K_ESCAPE)

  # 星BG描画
  Window.drawTile(0, 0, [[0, 0]], [star_bg], bg_x / 3, 0, 2, 1)

  # ReanderTargetにタイルBGを描画
  rt.drawTile(0, 0, mapdata, imgs, bg_x, bg_y, 15, 8).update

  # RenderTarget を円柱のように描画
  bg.draw(-Window.width / 4, -32, rt)

  bg_x += 3
  bg_y += 2

  s = "#{Window.real_fps.to_i} FPS CPU: #{Window.getLoad.to_i} %"
  Window.drawFont(4, 4, s, font)
end

◎ 処理内容について。 :

どうやって実現したのか自分自身が忘れそうなので、考え方をメモ。

Shader (HLSL) で、Input.x と Input.y の値を変化させてやれば、こういう円柱っぽい表示ができるわけですが…。

とりあえず、横から見た図で考えてみるとして。

• 原点 (0,0) が、視点。
• スクリーンまでの距離が、sz。テキトーに決めておく。
• 青い線で描かれた円が、壁に相当するところ。半径 r の円。

点B、原点、点A でできる角度 a は、アークタンジェントを使えば求められます。この場合は、atan2(sy, sz) で得られるはず。

この、角度 a を、テクスチャを参照する際のuv値 ―― Input.y を変化させる値としてそのまま利用すれば、y方向に関しては円柱っぽい見た目になりそうだなと。Input.y は、0,0〜1.0 の値を取るので、角度 a も 0,0〜1.0 に収まるように変換してやればいいわけで。

さらに、角度 a が分かれば、点Aを通る直線と円の交点、のz値も、r * cos(a) で求められます。z値が得られたら、各ラスターを横方向にどれだけ拡大縮小すればいいのか計算可能になるわけで。

今度は上から見た図で考えるとして。

• z値は ―― 図で言うところの pz 値は、r * cos(a) で得られた。
• sz はテキトーに決めてある。
• sx も HLSL内では Input.x として得られると分かってる。

後は px を求めるだけ。

sx : sz = px : pz
sz * px = sx * pz
px = sx * pz / sz

px が求まったら、それを Input.x に反映してやれば、拡大縮小ができるわけで。

注意点としては…。Input.x も Input.y も、0.0〜1.0 として得られるので、0.5 を引くことで、画面の中心が 0.0 になるようにしてから計算に使ってます。

また、Shader は、与えられた画像 or RenderTarget を円柱っぽく描画する処理しかしていません。スクロール処理は…。

• テクスチャuv値をちょっと弄る。
• もしくは、RenderTarget にスクロールした状態の画を描画しておいて、その RenderTarget を Shader に渡す。

という仕組みでやってます。

◎ 課題。 :

◎ 実装してみたものの。 :

# マップエディタ Tiled でエクスポートした json から
# DXRuby用のマップデータを取り出してみるテスト

require 'json'
require 'pp'

if ARGV.size == 0
  puts "usage: ruby #{$0} json_file"
  exit
end

infile = ARGV[0]
unless File.file?(infile)
  puts "#{infile} not found"
  exit 1
end

d = JSON.parse(File.open(infile).read)

# レイヤー枚数分ループ
d["layers"].each do |layer|
  name = layer["name"]
  w = layer["width"].to_i
  h = layer["height"].to_i

  ndt = layer["data"].map {|c| (c == 0 or c== 1)? nil : (c - 1)}
  a = ndt.each_slice(w).to_a

  puts "# name=#{name},w=#{w},h=#{h}"
  puts "mapdata = ["
  a.each { |aa| puts "  #{aa}," }
  puts "]"
end

exit

ruby convtmxjson.rb hoge.json
ruby convtmxjson.rb hoge.json > map.txt

{ "height":8,
 "layers":[
        {
         "data":[1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 2, 2, 3, 2, 2, 2, 3, 2, 3, 3, 3, 2, 2, 3, 1, 1, 3, 2, 3, 3, 3, 2, 2, 3, 1, 1, 1, 3, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 3, 1, 1, 3, 2, 1, 3, 2, 3, 1, 2, 3, 1, 1, 3, 2, 3, 1, 1, 3, 2, 3, 1, 1, 3, 2, 3, 1, 1, 1, 3, 2, 4, 4, 4, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 3, 2, 1, 1, 3, 1, 1, 2, 3, 1, 1, 3, 2, 3, 1, 1, 3, 2, 3, 1, 3, 2, 2, 2, 3, 1, 3, 2, 2, 4, 4, 4, 4, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 3, 2, 1, 1, 3, 1, 1, 2, 3, 3, 3, 2, 2, 3, 1, 1, 3, 2, 3, 1, 1, 3, 2, 2, 2, 3, 2, 2, 2, 2, 2, 2, 2, 2, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 3, 1, 1, 3, 2, 1, 3, 2, 3, 1, 2, 3, 1, 3, 2, 2, 3, 1, 1, 3, 2, 3, 1, 1, 3, 2, 2, 2, 3, 2, 1, 1, 1, 1, 2, 4, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 2, 2, 3, 2, 2, 2, 3, 2, 3, 1, 1, 3, 2, 2, 3, 3, 2, 2, 3, 3, 3, 2, 2, 2, 2, 3, 2, 1, 1, 1, 4, 4, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1],
         "height":8,
         "name":"layer1",
         "opacity":1,
         "type":"tilelayer",
         "visible":true,
         "width":60,
         "x":0,
         "y":0
        }],
 "orientation":"orthogonal",
 "properties":
    {

    },
 "tileheight":64,
 "tilesets":[
        {
         "firstgid":1,
         "image":"bg_chip.png",
         "imageheight":64,
         "imagewidth":256,
         "margin":0,
         "name":"bg_chip",
         "properties":
            {

            },
         "spacing":0,
         "tileheight":64,
         "tilewidth":64
        }],
 "tilewidth":64,
 "version":1,
 "width":60
}

# name=layer1,w=60,h=8
mapdata = [
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 1, 2, 1, 2, 2, 2, 1, 1, 2, nil, nil, 2, 1, 2, 2, 2, 1, 1, 2, nil, nil, nil, 2, 1, 1, 1, 1, 1, 1, 1, 1, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 2, nil, nil, 2, 1, nil, 2, 1, 2, nil, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 2, nil, nil, nil, 2, 1, 3, 3, 3, 3, nil, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 2, nil, nil, 2, 1, nil, nil, 2, nil, nil, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 2, nil, 2, 1, 1, 1, 2, nil, 2, 1, 1, 3, 3, 3, 3, 3, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 2, nil, nil, 2, 1, nil, nil, 2, nil, nil, 1, 2, 2, 2, 1, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 3, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 2, nil, nil, 2, 1, nil, 2, 1, 2, nil, 1, 2, nil, 2, 1, 1, 2, nil, nil, 2, 1, 2, nil, nil, 2, 1, 1, 1, 2, 1, nil, nil, nil, nil, 1, 3, 3, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 2, 2, 2, 1, 1, 2, 1, 1, 1, 2, 1, 2, nil, nil, 2, 1, 1, 2, 2, 1, 1, 2, 2, 2, 1, 1, 1, 1, 2, 1, nil, nil, nil, 3, 3, 3, nil, nil, nil, nil, nil],
  [nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, nil],
]

• Windows7 x64 で MIDI Yoke をインストールするなら、管理者権限でコマンドプロンプトを開いてそこからインストールすること。

• DAWソフトに比べると、MIDIポートの割り当てや VSTi の切り替え等が少し面倒。どれがどこに繋がってるか、自分で把握しておかないといけない。
• ピアノロール上での操作がしっくりこなかった。ペンツール、選択ツール、消しゴムツールの切り替えがシームレス？ではなかったり、ダブルクリックを要求されるあたりが、ちょっと。ただ、これは慣れの問題、あるいはショートカットキーの設定で改善できそうなので、たいした問題では無いと思う。

• Web検索すれば、Domino、及び、関連ソフトに対する詳しい解説記事がすぐに見つかるので、初心者には大変ありがたい。記事をよく読んで、順々に作業していけば、どうにかなる。こういった資料の多さ・充実ぶりは、素晴らしいと感じた。ただただ感謝。
• 仮想MIDIケーブルのポート数制限はあるけれど、色んな音源(VSTi)を同時に使えるのはありがたい。

◎ 補足。 :

◎ 買ったものをメモ :

確約すること。トランザクションの終了。データベーストランザクションを確定させること。CVSでソースの更新をレポジトリに反映すること。

コミット - 通信用語の基礎知識 より

関連する複数の処理を一つの処理単位としてまとめたもの。金融機関のコンピュータシステムにおける入出金処理のように、一連の作業を全体として一つの処理として管理するために用いる。

トランザクションとして管理された処理は「すべて成功」か「すべて失敗」のいずれかであることが保証される。例えば、資金移動システムをコンピュータで処理する場合、出金処理と入金処理は「どちらも成功」か「どちらも失敗」のどちらかであることが要求される。「出金に成功して入金に失敗」すると、出金された資金が宙に浮いてしまうからである。

このような場合に、出金と入金をまとめて1つのトランザクションとして管理し、どちらか一方が失敗したらもう片方も失敗させ、どちらも成功したときに初めて全体を成功と評価するのがトランザクション処理である。これを実現するシステムをTPモニタという。

トランザクションとは 【transaction】　─　意味・解説 ： IT用語辞典 e-Words より

◎ とあるところへアクセスする際のコマンド資料の中に「コミット通信」「トランザクション番号」なる単語があって :

◎ _スタックマシン - Wikipedia :

◎ 一通りビデオチュートリアルを見てみた :

◎ 仮に「上手」「下手」が「好き」「嫌い」として使われることが大半な世の中になってしまったとして :

また、それとは別の話だが、掲示板やblogなどに寄せられる迷惑なコメント例として「書いた記事内容と全然関係ない（実際にはうっすらと話題は繋がっているのがポイント）ことについて長々と語られる。」ってのをしばしば見かける。
自分の中で考えて考えて、考えすぎて話が飛躍しちゃっているんだろうか。Aという話の先にBという話があるのでそれを踏まえてCを言ってみました、っていう A→Cへの飛躍。コメント書いた本人にしてみればA→(B)→Cという流れなのでごく自然な流れだと思っているんだろうが、本人以外の人にしてみれば A→Cとしか見えないので、見た人は「この人は何を言っているんだろう」と当惑してしまう。

◎ 全然関係ないけど該当blogサービスのコメント欄にも「続きを読む」機能があれば問題解決かもしれないと思ったり :

◎ でも、そっち方面への応用って実現性低いだろうなぁ… :

◎ OP、EDをビデオで2、3回見直しているうちに :

新たなメディア＆フォーマットを作り続けたにも関わらず、旧来の文化を切り捨てて負け組に転じたセガ。方や、新機種ながら旧来のソフト資産を流用出来るハードを提供しつづけて来たソニーや任天堂の勝ち組

• 今現在に限って言えば、旧来のソフト資産をSONYや任天堂が活かそうとしてるのはたしかにその通りだろうと自分も思ったり。
• でも、ほんのちょっと前までは ――「メガドライブ vs スーパーファミコン」「セガサターン vs PlayStation」の頃は逆(?)だったし、その頃に勝負がついちゃったような気がする。

◎ 「ファミコン → スーパーファミコン」 vs 「マークIII・マスターシステム → メガドライブ」の時代 :

◎ 「メガドライブ → セガサターン」 vs 「PlayStation」の時代 :

◎ ここぞというときに「旧来の○○」を活かそうという意識が鎌首をもたげて負け組になっちゃうセガ :

◎ ちなみに今現在のセガも旧来のソフト資産をそれなりに活かそうとしてるフシがあったり :

◎ 「CD-ROM関連」とか「ゲームボーイ vs ゲームギア」とか「DC」とか抜けてますな :

◎ _正論と論理の飛躍 :