落下人の移動が一通りできたので、いよいよゲームになるように、キャッチとミスの判定処理を作る。まずはキャッチの判定から。落下人を同時に動かすようにしたので、どうしても複数個所に同時に落ちてしまう。それを救うために、キャッチの判定を緩くする方法を考えた。 ミスになる前にキャッチできればいいので、救助隊が移動したときに、落下位置に人がいればキャッチした情報をキャッチ判定用の文字列に追加するようにした。 ;キャッチ判定 switch px case 0 fpos=instr(fmanpos,0,"E") if fpos>=0 { poke fmancatch,fpos,'E' } swbreak ca…