‖一括処理部品集3‖syozyo.html 《戻る》 《玄関へ》
《 演習結果が良ければ賞状を出す 》
【内容】
「品詞の活用」などで、演習した結果が良ければ
画面に賞状を表示します。悪くてもそれなりに出します。
【用例】
名札 賞状表示
代入 &解答数=&言葉正+&言葉誤+&活用形正+&活用形誤 @
条件 (&解答数<>0 .or &解答数<>"")
代入 &正解率=(&言葉正+&活用形正)*100/&解答数 A
条件 (&解答数>=20 .and &正解率>=80) 代入 &GOKAKU=1 B
条件 (&解答数>=7 .and &正解率<80) 代入 &GOKAKU=2
C
条件 (&解答数<6) 代入 &GOKAKU=3
ケース開始
ケース (&GOKAKU=1)
画面表示 (15,15)-(15,26),"おめでとう!",中央,赤
画面表示 (17,15)-(17,36),#連結(&HINSI,"の活用演習に"),白
画面表示 (18,13)-(18,36),"合格しましたので",白
画面表示 (19,13)-(19,36),"ここに賞します。",白
代入 &GRP=#連結(&DAPA,"ショウジョウ1.GRP")
条件 (#ファイルサイズ(&GRP)>-1
.and &GOKAKU=1)
図形表示 (4,48)-(21,80),&GRP,枠表示=しない
画面表示 (11,51)-(11,72),#連結(&NAME," 殿"),中央,赤
画面表示 (16,51)-(16,79),#元号日付(&年月日,1),黒
ケース (&GOKAKU=2)
画面表示 (15,15)-(15,38),"残念(ざんねん)です。",中央,赤
画面表示 (17,15)-(17,36),#連結(&HINSI,"の活用演習に"),白
画面表示 (18,13)-(18,38),"合格しませんでした。",白
画面表示 (19,13)-(19,38)," 気を落とさずにもっと",白
画面表示 (20,13)-(20,38),"もっとがんばってください。",白
代入 &GRP=#連結(&DAPA,"ショウジョウ2.GRP")
条件 (#ファイルサイズ(&GRP)>-1
.and &GOKAKU=2)
図形表示 (4,48)-(21,80),&GRP,枠表示=しない
ケース (&GOKAKU=3)
画面表示 (14,15)-(14,38),"どうでしたか。",水
画面表示 (16,13)-(16,38)," また挑戦(ちょうせん)",白
画面表示 (17,13)-(17,38),"してください。",白
画面表示 (18,13)-(18,38)," 20問以上に挑戦して",白
画面表示 (19,13)-(19,38),"良い成績を上げると,",白
画面表示 (20,13)-(20,38),"合格証を出します。",白
ケース終了
確認 ""
手続き終了
【解説】
@ 解答数を計算します。
A 正解数を計算します。
B 解答数が20以上且つ正解率が80%以上なら合格賞を表示します。
C 解答数が7以上で正解率が80%未満なら残念賞です。
【参考】


END
of FILE 《戻る》 《玄関へ》