一括処理部品集3‖message1.html                            《戻る》 《玄関へ
 《 解答に対するメッセージを表示する 》

【内容】
  正答や誤答に対しそれぞれメッセージの言葉を変えて表示します。

【用例】(『桐』Ver.5です)
 ・・・・・・
 名札 正解表示
    代入 &M=#MOD(#乱数(9999),22)+1                                       @
    代入 &MESS=""
   ケース開始
    ケース ((&トップ=2 .or &トップ=3 .or &トップ=8 .or &トップ=10) .and &POPM=2)
      条件 ([解答下の句]<>"" .and [正解下の句]=[解答下の句]) 手続き実行 正解時          A
      条件 ([解答下の句]<>"" .and [正解下の句]<>[解答下の句]) 手続き実行 誤答時          B
      条件 ([解答下の句]="") 代入 &MESS="どうしましたか?"
      手続き実行 答え表示
      条件 ([解答下の句]<>"" .and [正解下の句]=[解答下の句]) 画面表示 (19,06)-(19,27),&MESS,中央,黄
      条件 ([解答下の句]<>"" .and [正解下の句]<>[解答下の句]) 画面表示 (19,06)-(19,27),&MESS,中央,赤
      条件 ([解答下の句]="") 画面表示 (19,06)-(19,27),&MESS,中央,赤
      画面表示 (21,11)-(21,45),#連結("正解は(",#全角(#STR([正解下の句])),")でした。"),白
    ケース ((&トップ=2 .or &トップ=3 .or &トップ=8 .or &トップ=10) .and &POPM=3)
      条件 ([解答四句]<>"" .and [正解四句]=[解答四句]) 手続き実行 正解時
      条件 ([解答四句]<>"" .and [正解四句]<>[解答四句]) 手続き実行 誤答時
      条件 ([解答四句]="") 代入 &MESS="どうしましたか?"
      手続き実行 答え表示
      条件 ([解答四句]<>"" .and [正解四句]=[解答四句]) 画面表示 (19,06)-(19,27),&MESS,中央,黄  C
      条件 ([解答四句]<>"" .and [正解四句]<>[解答四句]) 画面表示 (19,06)-(19,27),&MESS,中央,赤
      条件 ([解答四句]="") 画面表示 (19,06)-(19,27),&MESS,中央,赤
      画面表示 (21,11)-(21,45),#連結("正解は(",#全角(#STR([正解四句])),")でした。"),白
    ケース ((&トップ=2 .or &トップ=3 .or &トップ=8 .or &トップ=10) .and &POPM=4)
      条件 ([解答上の句]<>"" .and [正解上の句]=[解答上の句]) 手続き実行 正解時
      条件 ([解答上の句]<>"" .and [正解上の句]<>[解答上の句]) 手続き実行 誤答時
      条件 ([解答上の句]="") 代入 &MESS="どうしましたか?"
      手続き実行 答え表示
      条件 ([解答上の句]<>"" .and [正解上の句]=[解答上の句]) 画面表示 (19,06)-(19,27),&MESS,中央,黄
      条件 ([解答上の句]<>"" .and [正解上の句]<>[解答上の句]) 画面表示 (19,06)-(19,27),&MESS,中央,赤
      条件 ([解答上の句]="") 画面表示 (19,06)-(19,27),&MESS,中央,赤
      画面表示 (21,11)-(21,45),#連結("正解は(",#全角(#STR([正解上の句])),")でした。"),白
    ケース (&トップ=4 .or &POPM=5)
      条件 ([解答下の句]<>"" .and [正解下の句]=[解答下の句]) 手続き実行 正解時
      条件 ([解答下の句]<>"" .and [正解下の句]<>[解答下の句]) 手続き実行 誤答時
      条件 ([解答下の句]="") 代入 &MESS="どうしましたか?"
      手続き実行 答え表示
      条件 ([解答下の句]<>"" .and [正解下の句]=[解答下の句]) 画面表示 (19,06)-(19,27),&MESS,中央,黄
      条件 ([解答下の句]<>"" .and [正解下の句]<>[解答下の句]) 画面表示 (19,06)-(19,27),&MESS,中央,赤
      条件 ([解答下の句]="") 画面表示 (19,06)-(19,27),&MESS,中央,赤
      画面表示 (21,11)-(21,45),#連結("正解は(",#全角(#STR([正解下の句])),")でした。"),白
   ケース終了
      確認
      画面消去 (16,01)-(24,60)
 ・・・・・・
 手続き終了
 名札 正解時
   &MESS=#対応文字列("よくできました,お見事!,やったね。,実力ですね。,簡単でしたか?,おめでとう。 \
        ,すごーい!,勉強してますね。,ピッタシカンカン,正解です。,えらい!,おみそれしました。,大当り! \
        ,気分爽快!,頭が下がります。,なかなかやるー!,参りました。,朝メシ前ね。,素晴らしい。! \
        ,ピンポーン,冴えてますね。,のってますね。",&M)
 手続き終了
 名札 誤答時
   &MESS=#対応文字列("次は挽回だ。,間ぬけ!,ドジ!,頑張ろう。,気を落とすなよ。,ダメですね。 \
        ,残念でした。,勉強不足。,ブッブー,お気の毒に。,実力なしね。,難しいかな。,やる気ある? \
        ,お疲れですね。,お休みになったら?,出直ししろ!,ひどいねぇー。,もうやめますか?,おそまつ。 \
        ,みじめですね。,冴えないね。,ギブアップですか。",&M)
 手続き終了

【解説】
 @ 対乱数を利用し、正解時・誤答時の文字列の番号を準備します。
 A 正解時に表示するメッセージの文字列を得ます。
 B 誤答時に表示するメッセージの文字列を得ます。
 C 正解時は黄色で表示します。それ以外は赤色です。

【参考】


                      END of FILE  戻る 玄関へ