bcdiceGuiShoes.rb

# -*- coding : utf-8 -*-
Shoes.app(title: "BCDice") do
  para("設定",:font => "MS UI Gothic")
  list_box :items => ['default']
  button "この設定で保存" #{ }
  button "この設定を削除" #{ }
  para("\nサーバー名",:font => "MS UI Gothic")
  server = edit_line
  para("\nポート番号",:font => "MS UI Gothic")
  port = edit_line
  para("\nログインチャンネル",:font => "MS UI Gothic")
  channel = edit_line
  para("\nニックネーム",:font => "MS UI Gothic")
  nick = edit_line
  para("\nゲームタイトル",:font => "MS UI Gothic")
  gameTitle = list_box :items => gameTitles
  para("\nIRC文字コード",:font => "MS UI Gothic")
  charaCode = list_box :items => charaCodes
  para("\n拡張カードファイル名",:font => "MS UI Gothic")
  advanceCard = edit_line
  button "接続"# { }
  button "切断"# { }
  para("\n動作確認テスト欄",:font => "MS UI Gothic")
  test = edit_line
  button "test" #{ }
  testFeald = edit_box
end
def gameTitles
  ["a", "b"]
end

def charaCodes
  ["UTF-8", "ISO-2022-JP"]
end

#end