〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
すべてはここからはじまりました。
中日電工も。
４０年前を振り返りつつ新連載です。
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
［第８２回］
●ＥＲＲＯＲ処理（２）
前回からの続きです。
前回はダイレクトモードとＩＮＰＵＴ文での入力エラーの処理について説明をしました。
今回はそれ以外の普通の命令行でのエラー処理について説明します。
アドレス０４Ｅ３から下のプログラムです。
０４Ｅ３ ＣＡＬＬ ＰＲＴＬＮ
で行番号を含むテキスト行を表示します。
ＰＲＴＬＮは［第４９回］で説明しました。
この場合テキスト行全体が表示されるのではなくて、エラーが発生した位置までが表示されます。
アドレス０４Ｄ１、０４Ｄ２でエラー発生位置に０を書き込んでいます。
ＰＲＴＬＮでは
０５Ｅ０ ＳＵＢ Ａ
でＡレジスタを０にした上でＣＡＬＬ ＰＲＴＳＴＧを実行します（［第４９回］参照）。
ＰＲＴＳＴＧは０ＤコードかＡレジスタと同じコードがみつかるところまで文字表示を行ないます。
そのためエラーが発生したところまでが表示されます。
０４Ｅ６ ＤＣＸ Ｄ
０４Ｅ７ ＰＯＰ ＰＳＷ
０４Ｅ８ ＳＴＡＸ Ｄ
でスタックに保存しておいたエラー発生位置の文字コードをもとに戻します。
０４Ｅ９ ＭＶＩ Ａ，３ＦＨ
０４ＥＢ ＲＳＴ ２
で”？”を表示します。
３Ｆは？の文字コードです。
ＲＳＴ ２は［第１１回］で説明しました。
Ａレジスタに入れた文字コードに対応する文字を表示します。
０４ＥＣ ＳＵＢ Ａ
０４ＥＤ ＣＡＬＬ ＰＲＴＳＴＧ
でエラーが発生したテキスト行位置から後ろの残りの文字列を表示します。
そのあと
０４Ｆ０ ＪＭＰ ＲＳＴＡＲＴ
でＲＳＴＡＲＴ：にジャンプします。
ＲＳＴＡＲＴは［第２７回］で説明しました。
復活！ＴＩＮＹ ＢＡＳＩＣ［第８２回］
２０２０．９．６ｕｐｌｏａｄ
前へ
次へ
ホームページトップへ戻る