;あらかじめ背景・顔・効果音を読み込んでおく〈初期設定〉 load h_Salon Haikei 1 load face_a06 Kao 11 locateCenter Kao 0 -50 loads SE_POW loads SE_CARE loads SE_ATK kachi = 0 i = 0 ;女の人がサイコロを投げる fit Haikei paint Haikei paint Kao 私の投げるサイコロの目を当ててください for i = 0 to 9 sound SE_POW ;0〜5から乱数をひとつ発生させ、出たサイコロの目にする コロン rand 5 saikoro saikoro + 1 ;プレイヤーにどの目が出たのか、1〜6の中から数字をひとつ入力してもらう 出た目は？ *lbl_loop clear input suuji m0 suuMoji if m0 = 1 then ; 戻る end else if m0 = 2 then 使用できない文字が含まれています goto lbl_loop else if suuMoji = 0 then goto lbl_loop else if suuMoji > 1 then 1文字までです goto lbl_loop endif ;それが発生させた乱数と同じかどうか判断し、当たっているなら「あたり！」、当たっていないなら「はずれ」を表示させる if saikoro = suuji then sound SE_CARE あたり！ kachi + 1 else sound SE_ATK はずれ endif ;出た目も○へ表示する 私の出した目は$saikoro$です endfor 目が当たった回数・１０回中$kachi$回 if kachi > 5 then あなたの勝ちですね else 私の勝ちですね endif erase Kao erase Haikei end ;＝＝ポイント＝＝ ;どこからどこまでをくり返しプレイさせるか。「私の投げる・・・」というセリフは上にあった図で「オープニング」、「目が当たった回数・・・」はエンディングにあたります。