雪乃☆雫のなでしこ日和

完成かな？

サイコロ, なでしこ | 22:17

　ダイスはサイコロキャラメルに差し替えて、得点表示部分が白だと、白のサイコロが何だか見づらいから、ちょこっとだけ色替えをして（でもそんなに見やすくなったわけでもない；）、勝敗判定の表示と、メッセージ表示を付け加えて・・・

　このメッセージの数々に一番、無駄っぽく行数と時間を食っていたり；；；

　ついでに、なこ様を表示させてみたりして、いちおう完成、完成～☆

#-----------------------------------------------------------------------
#　３６（Thirty-six）
#-----------------------------------------------------------------------

#-----母艦設計-----------------------------------------------
！母艦設計=「母艦の可視はオフ」

#---メニュー----
『#親部品名,部品名,テキスト,ショートカット,オプション,イベント
なし,ファイルメニュー,ファイル(&F),,,
 -,新規メニュー,新しいゲーム(&N),Ctrl+N,,新規ゲーム
 -,-,,,,
 -,メッセージメニュー,メッセージ速度(&S),Ctrl+S,,
 --,速度１,早い(&1),,,「早い」にメッセージ速度変更。
 --,速度２,普通(&2),,,「普通」にメッセージ速度変更。
 --,速度３,遅い(&3),,,「遅い」にメッセージ速度変更。
 -,-,,,,
 -,閉じるメニュー,閉じる(&X),Ctrl+X,,終わる
なし,ヘルプメニュー,ヘルプ(&H),,,
 -,ルールメニュー,遊び方(&R),Ctrl+R,,遊び方
 -,-,,,,
 -,バージョンメニュー,バージョン情報(&A),Ctrl+A,,バージョン
』をメニュー一括作成。

＊メッセージ速度変更（Sに）
　　もし、S=「早い」ならば、
　　　　メッセージ速度＝０
　　　　速度１のチェックはオン。速度２のチェックはオフ。速度３のチェックはオフ。

　　違えば、もし、S=「普通」ならば、
　　　　メッセージ速度＝３０
　　　　速度１のチェックはオフ。速度２のチェックはオン。速度３のチェックはオフ。

　　違えば、もし、S=「遅い」ならば、
　　　　メッセージ速度＝６０
　　　　速度１のチェックはオフ。速度２のチェックはオフ。速度３のチェックはオン。
#------------------------------------------------------------

#---母艦----
母艦のタイトルは「３６（Thirty-six）」
母艦のクライアント幅は640。母艦のクライアント高さは480。
母艦を$EEAA88で画面クリア。
母艦のスタイルは「枠固定」
母艦はオフに最大化ボタン有効変更。
母艦を中央移動。
#------------------------------------------------------------

#-----宣言---------------------------------------------------
プレイヤー名とは文字列＝「プレイヤー」
コンピューター名とは文字列＝「なこ様」
ナコ様画像とは文字列＝「{ランタイムパス}\lib\nako.png」

出目とは配列。
得点とは整数＝０
プレイヤー得点とは整数＝０
コンピューター得点とは整数＝０
プレイヤー罰点とは整数＝０
コンピューター罰点とは整数＝０

手番とは整数＝０
プレイヤーとは整数＝０
コンピューターとは整数＝１
カウントとは整数＝０
ゾロ目とは整数＝オフ
六ゾロとは整数＝オフ

マージンとは整数＝１５
メッセージ速度とは整数＝３０
速度２のチェックはオン。

#---サイコロ設定----
ダイスサイズとは整数＝８０
ミニダイスとは整数＝２０

サイコロ赤とは配列。
サイコロ赤＝「{ダイスサイズ}
{黒色},{赤色},{白色}
{黒色},{赤色},{白色}
{黒色},{赤色},{白色}
{黒色},{赤色},{白色}
{黒色},{赤色},{白色}
{黒色},{赤色},{白色}」

サイコロ白とは配列。
サイコロ白＝「{ダイスサイズ}
{黒色},{白色},{赤色}
{黒色},{白色},{赤色}
{黒色},{白色},{赤色}
{黒色},{白色},{赤色}
{黒色},{白色},{赤色}
{黒色},{白色},{赤色}」

#---サイコロ用イメージ----
線太さ＝１
ダイス用￥１にサイコロ赤でサイコロ準備
ダイス用￥２にサイコロ白でサイコロ準備

処理用とはイメージ。その可視はオフ。

#---サイコロ振るところ----
トレイ幅とは整数＝３５０
トレイ高さとは整数＝３１０
トレイｘとは整数。トレイｘ＝（母艦のクライアント幅/２）－（トレイ幅/２）
トレイｙとは整数。トレイｙ＝３０

ダイストレイとはイメージ。その可視はオフ。
その幅はトレイ幅。その高さはトレイ高さ。
ダイストレイを$006600で画面クリア。
ダイストレイを母艦のトレイｘ,トレイｙへ画像コピー。

#---メッセージ出すところ----
テキストウィンドウ幅とは整数＝６１０
テキストウィンドウ高さとは整数＝１１５
テキストウィンドウｘとは整数＝マージン
テキストウィンドウｙとは整数。テキストウィンドウｙ＝トレイ高さ＋トレイｙ＋マージン

テキストウィンドウとはイメージ。その可視はオフ。
その幅はテキストウィンドウ幅。その高さはテキストウィンドウ高さ。
テキストウィンドウを$222222で画面クリア。
テキストウィンドウを母艦のテキストウィンドウｘ,テキストウィンドウｙへ画像コピー

#---得点計算するところ----
得点表示幅とは整数＝１１０
得点表示高さとは整数＝３１０
プレイヤーｘとは整数＝マージン
コンピューターｘとは整数＝母艦のクライアント幅－（マージン＋得点表示幅）
得点表示ｘとは整数。
得点表示ｙとは整数＝マージン

得点表示用とはイメージ。その可視はオフ。
その幅は得点表示幅。その高さは得点表示高さ。
得点表示用を$FFDDAAで画面クリア。

得点表示用を母艦のプレイヤーｘ,得点表示ｙ＊２へ画像コピー。
得点表示用を母艦のコンピューターｘ,得点表示ｙ＊２へ画像コピー。
文字書体は「ＭＳ ゴシック|12|太字」
母艦のプレイヤーｘ,0,得点表示幅,得点表示ｙ＊２－１へ「{プレイヤー名}」を中央,下で枠内文字描画。
母艦のコンピューターｘ,0,得点表示幅,得点表示ｙ＊２－１へ「{コンピューター名}」を中央,下で枠内文字描画。

#---サイコロ振るボタン----
ボタンフラグとは整数。　　＃０＝ＯＫ、１＝ゲーム開始、２＝サイコロ振る、３＝勝敗判定、４＝新規ゲーム

ボタンＡとはボタン。その可視はオフ。
その幅は１００。その高さは３０。
そのXはトレイｘ＋（トレイ幅/２－ボタンＡの幅/２）。そのYはトレイ高さ＋トレイｙ－ボタンＡの高さ。
ボタンＡをクリックした時は～
　　ナコ様の可視はオフ。
　　もし、ボタンフラグ＝０ならば
　　　　ボタンフラグ＝２
　　　　もし、手番＝プレイヤーならば、プレイヤー手番。
　　　　違えば、コンピューター手番。
　　違えば、もし、ボタンフラグ＝１ならば
　　　　ボタンＡの有効はオフ。
　　　　「プレイヤーの手番」でメッセージ表示。
　　　　ボタンＡのテキストは「ダイスを振る」
　　　　その有効はオン。
　　　　ボタンフラグ＝２
　　違えば、もし、ボタンフラグ＝２ならば
　　　　ボタンＡの有効はオフ。
　　　　サイコロ振る。得点計算。得点加算。
　　違えば、もし、ボタンフラグ＝３ならば
　　　　勝敗判定。
　　違えば、もし、ボタンフラグ＝４ならば
　　　　ボタンＡの有効はオフ
　　　　新規ゲーム。

#---なこ様----
ナコ様とはフォーム。その可視はオフ。その親部品は母艦
その画像はナコ様画像。
ナコ様を画像通り変形。
そのドラッグ移動はオフ。
#------------------------------------------------------------

#-----メインルーチン-----------------------------------------
母艦の可視はオン。

ダイアログIMEはIMEオン。
ダイアログタイトルは「名前入力」
「あなたの名前は？（全角７文字以内で教えてね）」と尋ねる。
もし、それが空ならば、
　　プレイヤー名は「プレイヤー」
違えば
　　プレイヤー名はそれの１４バイト左部分。
　　線色は$EEAA88。塗り色は$EEAA88。
　　母艦のプレイヤーｘ,0からプレイヤーｘ＋得点表示幅,得点表示ｙ＊２－１へ四角。
　　母艦のプレイヤーｘ,0,得点表示幅,得点表示ｙ＊２－１へ「{プレイヤー名}」を中央,下で枠内文字描画。

「挨拶」でメッセージ表示。
ボタンＡのテキストは「よろしく」
その可視はオン。
ボタンフラグ＝４
#------------------------------------------------------------
＊新規ゲーム
　　乱数初期化。
　　プレイヤー得点＝０
　　コンピューター得点＝０
　　プレイヤー罰点＝０
　　コンピューター罰点＝０
　　カウント＝０

　　得点表示ｙ＝マージン。
　　得点表示用を母艦のプレイヤーｘ,得点表示ｙ＊２へ画像コピー。
　　得点表示用を母艦のコンピューターｘ,得点表示ｙ＊２へ画像コピー。
　　ダイストレイを母艦のトレイｘ,トレイｙへ画像コピー。
　　描画処理反映。
　　手番はプレイヤー。
　　「ゲーム開始」でメッセージ表示。
　　ボタンＡの有効はオン
　　ボタンＡのテキストは「準備ＯＫ！」
　　ボタンフラグは１

#-----２Ｄを振る---------------------------------------------
＊サイコロ振る
　　２回
　　　　処理用をダイスサイズ,ダイスサイズへ画像高速リサイズ。
　　　　ｒ＝６の乱数。出目￥（回数-1）＝ｒ＋１。
　　　　ｘ＝ｒ＊ダイスサイズ。ｙ＝０。
　　　　ダイス用￥回数のｘ,ｙ,ダイスサイズ,ダイスサイズを処理用の０,０へ画像部分コピー。
　　　　処理用を母艦のトレイｘ＋（（トレイ幅／３）＊回数－ダイスサイズ／２）,トレイｙ＋（トレイ高さ／２－ダイスサイズ／２）へ画像コピー。

　　　　処理用をミニダイス,ミニダイスへ画像リサイズ。
　　　　もし、手番＝プレイヤーならば
　　　　　　得点表示ｘ＝プレイヤーｘ＋１０＋（ミニダイス＋１０）＊（回数-1）
　　　　　　得点表示ｙ＝マージン＊２＋１０＋（ミニダイス＋１０）＊（カウント/２）
　　　　　　処理用を母艦の得点表示ｘ,得点表示ｙへ画像コピー。
　　　　違えば
　　　　　　得点表示ｘ＝コンピューターｘ＋１０＋（ミニダイス＋１０）＊（回数-1）
　　　　　　得点表示ｙ＝マージン＊２＋１０＋（ミニダイス＋１０）＊（（カウント-1）/２）
　　　　　　処理用を母艦の得点表示ｘ,得点表示ｙへ画像コピー。
#------------------------------------------------------------
＊得点計算
　　もし、（出目￥０）＝（出目￥１）ならば
　　　　もし、（出目￥０）＝６ならば
　　　　　　得点＝３６。
　　　　　　文字色は赤色。
　　　　違えば、もし、（出目￥０）＝１ならば
　　　　　　得点＝０。
　　　　　　文字色は青色。
　　　　違えば
　　　　　　得点＝出目￥０＊出目￥１。
　　　　　　ゾロ目＝オン
　　　　　　文字色は黒色。
　　違えば
　　　　得点＝出目￥０＋出目￥１。
　　　　文字色は黒色。

＊得点加算
　　もし、手番＝プレイヤーならば
　　　　もし、得点＝３６ならば
　　　　　　プレイヤー得点＝３６
　　　　　　得点表示。
　　　　　　「プレイヤー６ゾロ」でメッセージ表示。
　　　　　　六ゾロ＝１
　　　　違えば、もし、得点＝０ならば
　　　　　　プレイヤー得点＝０
　　　　　　得点表示。
　　　　　　「プレイヤー１ゾロ」でメッセージ表示。
　　　　違えば
　　　　　　プレイヤー得点＝プレイヤー得点＋得点
　　　　　　もし、プレイヤー得点＞＝３６ならば
　　　　　　　　文字色は赤色。
　　　　　　　　プレイヤー罰点＝プレイヤー得点－３６
　　　　　　得点表示。
　　　　　　もし、ゾロ目＝オンならば
　　　　　　　　「プレイヤーゾロ目」でメッセージ表示。
　　　　　　　　ゾロ目＝オフ
　　　　　　違えば
　　　　　　　　「プレイヤー出目」でメッセージ表示。
　　　　手番＝コンピューター。
　　　　ボタンＡのテキストは「ＯＫ」
　　　　その有効はオン。
　　　　ボタンフラグ＝０
　　　　
　　違えば
　　　　もし、得点＝３６ならば
　　　　　　コンピューター得点＝３６
　　　　　　得点表示。
　　　　　　「コンピューター６ゾロ」でメッセージ表示。
　　　　　　六ゾロ＝六ゾロ＋２
　　　　違えば、もし、得点＝０ならば
　　　　　　コンピューター得点＝０
　　　　　　得点表示。
　　　　　　「コンピューター１ゾロ」でメッセージ表示。
　　　　違えば
　　　　　　コンピューター得点＝コンピューター得点＋得点
　　　　　　もし、コンピューター得点＞＝３６ならば
　　　　　　　　文字色は赤色。
　　　　　　　　コンピューター罰点＝コンピューター得点－３６
　　　　　　得点表示。
　　　　　　もし、ゾロ目＝オンならば
　　　　　　　　「コンピューターゾロ目」でメッセージ表示。
　　　　　　　　ゾロ目＝オフ
　　　　　　違えば
　　　　　　　　「コンピューター出目」でメッセージ表示。

　　　　もし、（プレイヤー得点＞＝３６）または（コンピューター得点＞＝３６）ならば
　　　　　　ボタンＡのテキストは「勝敗判定」
　　　　　　その有効はオン。
　　　　　　ボタンフラグ＝３
　　　　違えば、もし、カウント＝１９ならば
　　　　　　ボタンＡのテキストは「無効試合」
　　　　　　その有効はオン。
　　　　　　ボタンフラグ＝３
　　　　違えば
　　　　　　手番＝プレイヤー。
　　　　　　ボタンＡのテキストは「ＯＫ」
　　　　　　その有効はオン。
　　　　　　ボタンフラグ＝０

＊得点表示
　　文字書体は「ＭＳ ゴシック|16|太字」。
　　もし、手番＝プレイヤーならば
　　　　得点表示ｘ＝プレイヤーｘ＋２０＋（ミニダイス＋１０）＊２
　　　　得点表示ｙ＝マージン＊２＋１０＋（ミニダイス＋１０）＊（カウント/２）
　　　　母艦の得点表示ｘ,得点表示ｙ,ミニダイス,ミニダイスへ右,中央でプレイヤー得点を枠内文字描画。

　　違えば
　　　　得点表示ｘ＝コンピューターｘ＋２０＋（ミニダイス＋１０）＊２
　　　　得点表示ｙ＝マージン＊２＋１０＋（ミニダイス＋１０）＊（（カウント-1）/２）
　　　　母艦の得点表示ｘ,得点表示ｙ,ミニダイス,ミニダイスへ右,中央でコンピューター得点を枠内文字描画。
#------------------------------------------------------------
＊勝敗判定
　　#６ゾロでの上がりは累計での上がりに優先する
　　もし、六ゾロ＝１ならば　　　　　　　　#プレイヤーが６ゾロ
　　　　「勝ち」で勝敗表示。「プレイヤー６ゾロ勝利」で勝敗メッセージ表示。
　　違えば、もし、六ゾロ＝２ならば　　　　#コンピューターが６ゾロ
　　　　「負け」で勝敗表示。「コンピューター６ゾロ勝利」で勝敗メッセージ表示。
　　違えば、もし、六ゾロ＝３ならば　　　　#プレイヤーもコンピューターも６ゾロ
　　　　「引き分け」で勝敗表示。「双方６ゾロ」で勝敗メッセージ表示。

　　#プレイヤーもコンピューターも６ゾロではない
　　違えば
　　　　もし、（プレイヤー得点＞＝３６）ならば　　　　　　　　#プレイヤーの点数が３６かそれ以上で
　　　　　　もし、（コンピューター得点＜３６）ならば　　　　　　　　#コンピューターがそれ以下ならば
　　　　　　　　「勝ち」で勝敗表示。「プレイヤー勝利」で勝敗メッセージ表示。
　　　　　　違えば、もし、（コンピューター得点＞＝３６）ならば　　　#コンピューターの点数も３６かそれ以上なら
　　　　　　　　もし、（プレイヤー罰点＜コンピューター罰点）ならば　　　　#罰点のより少ない方が勝ちとなり
　　　　　　　　　　「勝ち」で勝敗表示。「プレイヤー勝利２」で勝敗メッセージ表示。
　　　　　　　　違えば、もし、（プレイヤー罰点＞コンピューター罰点）ならば
　　　　　　　　　　「負け」で勝敗表示。「コンピューター勝利２」で勝敗メッセージ表示。
　　　　　　　　違えば　　　　　　　　　　　　　　　　　　　　　　　　　　#それも同じならば引き分け
　　　　　　　　　　「引き分け」で勝敗表示。「引き分け」で勝敗メッセージ表示。
　　　　違えば、もし、（コンピューター得点＞＝３６）ならば　　#プレイヤーの点数が３６に満たずコンピューターの点数が３６かそれ以上
　　　　　　「負け」で勝敗表示。「コンピューター勝利」で勝敗メッセージ表示。
　　　　違えば　　　　　　　　　　　　　　　　　　　　　　　　#１０回でどちらも３６を越えなかった場合
　　　　　　「引き分け」で勝敗表示。「無効試合」で勝敗メッセージ表示。

　　六ゾロ＝０
　　ボタンＡのテキストは「もう一度？」
　　ボタンフラグ＝４

＊勝敗表示（Sで）
　　ダイストレイを母艦のトレイｘ,トレイｙへ画像コピー。
　　文字書体は「ＭＳ ゴシック|32|太字」。
　　勝敗表示ｘ＝（トレイ幅/2）-（Sの文字幅取得/2）＋トレイｘ
　　勝敗表示ｙ＝トレイｙ＋１０
　　もし、S＝「勝ち」ならば、
　　　　文字色は白色。母艦の勝敗表示ｘ+2,勝敗表示ｙ+2へ「勝ち」を文字描画。
　　　　文字色は赤色。母艦の勝敗表示ｘ,勝敗表示ｙへ「勝ち」を文字描画。
　　違えば、もし、S＝「負け」ならば、
　　　　文字色は白色。母艦の勝敗表示ｘ+2,勝敗表示ｙ+2へ「負け」を文字描画。
　　　　文字色は青色。母艦の勝敗表示ｘ,勝敗表示ｙへ「負け」を文字描画。
　　違えば、もし、S＝「引き分け」ならば、
　　　　文字色は白色。母艦の勝敗表示ｘ+2,勝敗表示ｙ+2へ「引き分け」を文字描画。
　　　　文字色は$777777。母艦の勝敗表示ｘ,勝敗表示ｙへ「引き分け」を文字描画。

＊勝敗メッセージ表示（Sで）
　　文字色は白色。文字書体は「ＭＳ ゴシック|18|太字」。＃12文字表示できる
　　勝敗表示ｘ＝トレイｘ＋３０
　　勝敗表示ｙ＝トレイｙ＋８０
　　もし、S＝「プレイヤー６ゾロ勝利」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「おめでとう！{改行}６ゾロで{プレイヤー名}の{改行}完全勝利！！」を文字描画。
　　もし、S＝「コンピューター６ゾロ勝利」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「残念！！{改行}６ゾロで{コンピューター名}の{改行}完全勝利！」を文字描画。
　　もし、S＝「双方６ゾロ」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「双方６ゾロで引き分けです」を文字描画。
　　もし、S＝「プレイヤー勝利」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「おめでとう！{改行}{プレイヤー名}の勝ち！！」を文字描画。
　　もし、S＝「プレイヤー勝利２」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「{プレイヤー名}の罰点{プレイヤー罰点}点{改行}{コンピューター名}の罰点{コンピューター罰点}点で{改行}{プレイヤー名}の勝ち！」を文字描画。
　　もし、S＝「コンピューター勝利」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「残念！！{改行}{コンピューター名}の勝ち！」を文字描画。
　　もし、S＝「コンピューター勝利２」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「{プレイヤー名}の罰点{プレイヤー罰点}点{改行}{コンピューター名}の罰点{コンピューター罰点}点で{改行}{コンピューター名}の勝ち！」を文字描画。
　　もし、S＝「引き分け」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「引き分けです」を文字描画。
　　もし、S＝「無効試合」ならば
　　　　母艦の勝敗表示ｘ,勝敗表示ｙへ「残念でした。{改行}１０回で決着がつかず{改行}無効試合となります。」を文字描画。
　　Sでメッセージ表示。
#------------------------------------------------------------
＊プレイヤー手番
　　カウント＝カウント＋１
　　ボタンＡの有効はオフ。
　　ボタンＡのテキストは「ダイスを振る」　　
　　ダイストレイを母艦のトレイｘ,トレイｙへ画像コピー。
　　「プレイヤーの手番」でメッセージ表示。
　　ボタンＡの有効はオン。

＊コンピューター手番
　　カウント＝カウント＋１
　　ボタンＡの有効はオフ。
　　ダイストレイを母艦のトレイｘ,トレイｙへ画像コピー。
　　「コンピューターの手番」でメッセージ表示。
　　サイコロ振る。得点計算。得点加算。
#------------------------------------------------------------
＊メッセージ表示（Sで）
　　テキストウィンドウを母艦のテキストウィンドウｘ,テキストウィンドウｙへ画像コピー。
　　文字色は白色。文字書体は「ＭＳ ゴシック|18|太字」。
　　メッセージｘ＝マージン＋３０。一行目＝テキストウィンドウｙ＋３０。二行目＝テキストウィンドウｙ＋６０。
　　名前ｘ＝マージン。名前ｙ＝テキストウィンドウｙ＋５。
　　セリフ一行目＝テキストウィンドウｙ＋４０。セリフ二行目＝テキストウィンドウｙ＋７０。
　　もし、S＝「挨拶」ならば
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　ナコ様表示。
　　　　母艦のメッセージｘ,セリフ一行目へ「こんにちは、{プレイヤー名}！」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,セリフ二行目へ「よろしくね☆」をメッセージ速度で文字遅延描画。
　　もし、S＝「ゲーム開始」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「それでは始めよう！」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,セリフ二行目へ「準備はいいかな？」をメッセージ速度で文字遅延描画。　
　　もし、S＝「プレイヤーの手番」ならば、
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「{プレイヤー名}の番だよ。」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,セリフ二行目へ「ダイスを振ってね。」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューターの手番」ならば、
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「僕の番だね。」をメッセージ速度で文字遅延描画。
　　　　0.5秒待つ。
　　　　母艦のメッセージｘ,セリフ二行目へ「…………　…………　…………　…………」をメッセージ速度で文字遅延描画。
　　　　0.5秒待つ。
　　　　ナコ様の可視はオフ。

　　もし、S＝「プレイヤー出目」ならば、
　　　　母艦のメッセージｘ,一行目へ「出目は{得点}です。」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,二行目へ「{プレイヤー名}の点数は{プレイヤー得点}点になりました。」をメッセージ速度で文字遅延描画。
　　もし、S＝「プレイヤーゾロ目」ならば、
　　　　母艦のメッセージｘ,一行目へ「{出目￥０}ゾロです。得点は{得点}点。」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,二行目へ「{プレイヤー名}の点数は{プレイヤー得点}点になりました。」をメッセージ速度で文字遅延描画。
　　もし、S＝「プレイヤー６ゾロ」ならば、
　　　　母艦のメッセージｘ,一行目へ「６ゾロです！！」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,二行目へ「{コンピューター名}が６ゾロ以外なら{プレイヤー名}の勝ち！」をメッセージ速度で文字遅延描画。
　　もし、S＝「プレイヤー１ゾロ」ならば、
　　　　母艦のメッセージｘ,一行目へ「残念！１ゾロです！！」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,二行目へ「{プレイヤー名}の点数が０点になりました。」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューター出目」ならば、
　　　　母艦のメッセージｘ,一行目へ「出目は{得点}です。」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,二行目へ「{コンピューター名}の点数は{コンピューター得点}点になりました。」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューターゾロ目」ならば、
　　　　母艦のメッセージｘ,一行目へ「{出目￥０}ゾロです。得点は{得点}点。」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,二行目へ「{コンピューター名}の点数は{コンピューター得点}点になりました。」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューター６ゾロ」ならば、
　　　　母艦のメッセージｘ,一行目へ「{コンピューター名}が、６ゾロを出しました！！」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューター１ゾロ」ならば、
　　　　母艦のメッセージｘ,一行目へ「１ゾロです！！」をメッセージ速度で文字遅延描画。
　　　　母艦のメッセージｘ,二行目へ「{コンピューター名}の点数が０点になりました。」をメッセージ速度で文字遅延描画。

　　もし、S＝「プレイヤー６ゾロ勝利」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「ま、負けました・・・」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューター６ゾロ勝利」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「圧勝だね」をメッセージ速度で文字遅延描画。
　　もし、S＝「双方６ゾロ」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「惜しい！」をメッセージ速度で文字遅延描画。
　　もし、S＝「プレイヤー勝利」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「ちくしょ～」をメッセージ速度で文字遅延描画。
　　もし、S＝「プレイヤー勝利２」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「悔しい～」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューター勝利」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「ひゃっほう！」をメッセージ速度で文字遅延描画。
　　もし、S＝「コンピューター勝利２」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「やったね！」をメッセージ速度で文字遅延描画。
　　もし、S＝「引き分け」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「引き分けか・・・」をメッセージ速度で文字遅延描画。
　　もし、S＝「無効試合」ならば
　　　　ナコ様表示。
　　　　母艦の名前ｘ,名前ｙへ「【{コンピューター名}】」を文字描画。
　　　　母艦のメッセージｘ,セリフ一行目へ「なんと？！」をメッセージ速度で文字遅延描画。
#------------------------------------------------------------
＊ナコ様表示
　　ナコ様のX＝母艦のクライアント幅-ナコ様の幅。
　　ナコ様のY＝母艦のクライアント高さ-ナコ様の高さ。
　　ナコ様の可視はオン。ナコ様を最前面表示。
#------------------------------------------------------------
＊サイコロ準備（{グループ}imgにSで）
　　imgをイメージとして作成。
　　img→可視はオフ。
　　img→幅はS\0＊６
　　img→高さはS\0
　　imgを$00FF00で画面クリア。　　　　#透過色
　　目サイズ＝S\0/8。
　　６回
　　　　色設定とは配列。色設定＝S\回数。
　　　　線色は色設定￥０。塗り色は色設定￥１。
　　　　外枠（img,S\0）
　　　　線色は色設定￥２。塗り色は色設定￥２。
　　　　もし、回数＝１ならば
　　　　　　半径＝目サイズ＋S\0/40。
　　　　　　中点(img,S\0)。
　　　　もし、回数＝２ならば
　　　　　　半径＝目サイズ。
　　　　　　左上点(img,S\0)。右下点(img,S\0)。
　　　　もし、回数＝３ならば
　　　　　　半径＝目サイズ。
　　　　　　中点(img,S\0)。左上点(img,S\0)。右下点(img,S\0)。
　　　　もし、回数＝４ならば
　　　　　　半径＝目サイズ。
　　　　　　左上点(img,S\0)。左下点(img,S\0)。右上点(img,S\0)。右下点(img,S\0)。
　　　　もし、回数＝５ならば
　　　　　　半径＝目サイズ。
　　　　　　中点(img,S\0)。左上点(img,S\0)。左下点(img,S\0)。右上点(img,S\0)。右下点(img,S\0)。
　　　　もし、回数＝６ならば
　　　　　　半径＝目サイズ－S\0/80。
　　　　　　左上点(img,S\0)。左下点(img,S\0)。右上点(img,S\0)。右下点(img,S\0)。左中点(img,S\0)。右中点(img,S\0)。

＊外枠({グループ}img,S)
　　ｘ＝(回数-1)＊S。ｙ＝０。
　　ｘ２＝ｘ＋S。ｙ２＝S。
　　imgのｘ,ｙからｘ２,ｙ２へ四角。

＊中点({グループ}img,S)
　　ｘｘ＝（ｘ＋S／２）－半径。ｙｙ＝S／２－半径
　　ｘｘ２＝（ｘ＋S／２）＋半径。ｙｙ２＝S／２＋半径。
　　imgのｘｘ,ｙｙからｘｘ２,ｙｙ２へ円。

＊左上点({グループ}img,S)
　　ｘｘ＝（ｘ＋S／４）－半径。ｙｙ＝S／４－半径
　　ｘｘ２＝（ｘ＋S／４）＋半径。ｙｙ２＝S／４＋半径。
　　imgのｘｘ,ｙｙからｘｘ２,ｙｙ２へ円。

＊左下点({グループ}img,S)
　　ｘｘ＝（ｘ＋S／４）－半径。ｙｙ＝（S／４）＊３－半径
　　ｘｘ２＝（ｘ＋S／４）＋半径。ｙｙ２＝（S／４）＊３＋半径。
　　imgのｘｘ,ｙｙからｘｘ２,ｙｙ２へ円。

＊右上点({グループ}img,S)
　　ｘｘ＝（ｘ＋S／４＊３）－半径。ｙｙ＝S／４－半径
　　ｘｘ２＝（ｘ＋S／４＊３）＋半径。ｙｙ２＝S／４＋半径。
　　imgのｘｘ,ｙｙからｘｘ２,ｙｙ２へ円。

＊右下点({グループ}img,S)
　　ｘｘ＝（ｘ＋S／４＊３）－半径。ｙｙ＝（S／４）＊３－半径
　　ｘｘ２＝（ｘ＋S／４＊３）＋半径。ｙｙ２＝（S／４）＊３＋半径。
　　imgのｘｘ,ｙｙからｘｘ２,ｙｙ２へ円。

＊左中点({グループ}img,S)
　　ｘｘ＝（ｘ＋S／４）－半径。ｙｙ＝S／２－半径
　　ｘｘ２＝（ｘ＋S／４）＋半径。ｙｙ２＝S／２＋半径。
　　imgのｘｘ,ｙｙからｘｘ２,ｙｙ２へ円。

＊右中点({グループ}img,S)
　　ｘｘ＝（ｘ＋S／４＊３）－半径。ｙｙ＝S／２－半径
　　ｘｘ２＝（ｘ＋S／４＊３）＋半径。ｙｙ２＝S／２＋半径。
　　imgのｘｘ,ｙｙからｘｘ２,ｙｙ２へ円。
#------------------------------------------------------------
＊遊び方
　　ダイアログタイトルは「３６（Thirty-six）について」
　　「【３６（Thirty-six）のルール】
　　　二人で交互に六面ダイス二個を振り合い、点数を累計してゆきます。
　　　二個の目の和が、そのまま点数になり、ゾロ目の場合は二個の目の積が点数と
　　なりますが、１ゾロの場合はそれまでの点数の累計がクリアされ０点になります。
　　　早く３６点に達した方が勝ちとなりますが、先攻後攻はなく両者同じ回数だけ
　　ダイスを振ることが出来るため、双方同時に上がった場合は、３６を越えた分が
　　罰点となり、より罰点の少ない方が勝ちとなります。
　　　なお、６ゾロで上がった場合は、３６点ぴったりでの上がりとなり罰点はなく、
　　また、通常の累計での上がりに優先します。
　　　罰点も同数の場合や両者ともに６ゾロで上がった場合は、引き分けとなります。」と言う
#------------------------------------------------------------
＊バージョン
　　ダイアログタイトルは「バージョン情報」
　　「｛二重カッコ｝３６（Thirty-six）｛二重カッコ閉じ｝{改行}　　Version 1.03{改行}{改行}　by 雪乃☆雫」と言う。
#------------------------------------------------------------
●枠内文字描画（{グループ=?}OBJのX,Y,W,HへSをA,Vで）
　　xxとは整数。yyとは整数。
　　もし、A＝左ならば
　　　　xx＝X
　　違えば、もし、A＝中央ならば
　　　　xx＝X+(W-(Sの文字幅取得))/2
　　違えば、もし、A＝右ならば
　　　　xx＝(X+W)-(Sの文字幅取得)
　　もし、V＝上ならば
　　　　yy＝Y
　　違えば、もし、V＝中央ならば
　　　　yy＝Y+(H-(Sの文字高さ取得))/2
　　違えば、もし、V＝下ならば
　　　　yy＝(Y+H)-(Sの文字高さ取得)
　　OBJのxx,yyへSを文字描画。
#------------------------------------------------------------

　やっぱり、こうゆう単純なゲームは、自分でサイコロを振ってこそ、相手が人間であってこそって部分があるよねぇ。

　しかし、今の時代は各々スマホのアプリって感じで、みんなでこういった埒もない暇つぶしの遊びをしたりはもうしないんだろうね・・・

　なこ様がもう少し、出目に対して一喜一憂した方が、少しは人間っぽくて面白いかとも思ったけど、所詮は焼け石に水っていうか、色々メッセージを考えるのがもうさすがに面倒になったていうか、場合によっちゃむしろ腹立つっていうかなので、やめた～ｗｗｗ

　今回、画像合成を使わず、画面の書き換えもしなくて済むように、画像通り変形したフォームを重ねてみたんだけど、このなこ様で、デスクトップマスコットを作ってみたらどうだろう。

　またまたひらめいてしまったｗ（だから、なでコラはどうした；）

　次回は、なでコラです（予定）