関市教育いいｎかい？
プログラムの仕組み
１３４０行までがメインルーチンで、あとはサブルーチンです。
@主な変数
Ａ＄（１０） 漢字や単語などをばらしたものが入る
Ｍ＄（５，３０） 問題が５種類で３０問まで入る
Ｓ（５） それぞれの種類の問題数
Ｔ（５） それそれの種類の正解数
Ｙ 気球のＹ座標
Ｐ 問題種類番号
Ｂ 前から入れ替える数（桁数）
Ｎ 何回入れ替えたか
Ｋ，Ｌ 問題作成時に入れ替える桁数や問題数
Ａ＄ 問題（正しいもの）
Ｂ＄ 問題（途中）
Aサブルーチン（みたいなもの）
１ 準備
２ バック画面
３ データ入力
４ 画面作成
５ 針出力
６ 気球のＹ座標を０にして気球出力
７ 問題選択−−−−−−−−０なら２２へ
８ スクロールする画面を消去する
９ その問題種類の正解数を＋１
１０ その問題種類が全部正解なら７へ
１１ 問題数、正解数表示
１２ 問題を、ばらばらの順番にする
１３ 入れ替えの回数を１に
１４ 問題を出力
１５ 正解かを調べる−−−正解なら正解と表示して８へ
１６ 入れ替える数を入力要求
１７ 同時に気球を上へあげる
１８ 同時に気球が爆発かをチェック−−−爆発なら２２へ
１９ 入力が０なら４へ
２０ 入れ替える
２１ 入れ替え回数を＋１して１４へ
２２ 資格を認定、終了
B改造のアドバイス
１２５０行の．９９を小さくすると、気球が速く上がります。
２２８０行以降のデータ文で、最初の数が問題数で、そのあとが問題です。問題数を増やして、問題を増やしてください。一応３０問まで大丈夫です。