#0020/9999　Ｑ＆Ａ集
★タイトル (88VAUSER)  95/11/01  00:00  ( 68)
1.18   ＢＡＳＩＣのＰオプションの解除法はありませんか？
★内容

　Ｖ３−ＢＡＳＩＣで、プログラムをセーブするときに誤ってＰオプションを付けて
セーブしてしまったり、Ｐオプションを付けたものと付けないものをセーブしてあっ
たのに後者を削除してしまったりして、どうしてもＰオプションを解除する必要のあ
る場合もあるでしょう。
　このようなときは、少々手間がかかりますが、以下の手順に従うことで解除するこ
とができます。


３．フォーラム　−　９．質問・レポート　−　#7141(92/4/16) より引用
============================================================================
re:7131 Ｐスイッチの外し方。　　　　　　　　　　おる


★１
　まず、Ｐスイッチを外したいプログラムを普通にロードします。

★２
　次のコマンドを実行します。

　FOR I=0 TO 6:?HEX$(SYSTEM(I));" ";:NEXT

そうすると、次のようになると思います。勿論値は変わりますよ。

　2316 1215 1411 1420 1420 FFCD FFD5
　↑　　↑
　(A)   (B)

★３
　NEWコマンドでプログラムを消します。

★４
　機械語モニタに入り、 セグメント(A)の０番地から１４バイトを実行結果の
上位バイトと下位バイトを入れ替えて変更します。（何だか良く判らないけど、
以下参照）

 MON
 >K2316:0
 2316:0000  16 23 15 12 18 12 18 12-18 12 FF FF FF FF 10 39　<= 変更前

　　　　　　 2316  1215  1411  1420  1420  FFCD  FFD5  <= 実行結果例
　　　　　　　↓　　↓　　↓　　↓　　↓　　↓　　↓
 2316:0000  16 23 15 12 11 14 20 14-20 14 CD FF D5 FF 10 39  <= 変更後

★５
　セグメント(A)の(B)番地から、３バイトを 08 00 00 に変更します。

 >K2316:1215
 2316:1210  00 80 35 E0 35 03 00 01-00 22 00 E8 03 1A 04 02  <= 変更前
　　　　　　　　　　　　　 ↓ ↓ ↓
 2316:1210  00 80 35 E0 35 08 00 00-00 22 00 E8 03 1A 04 02  <= 変更前

★６
　ＢＡＳＩＣに戻ります。

 >Q
 OK

★７
　無事作業は終了しました。

============================================================================

                         <<< end of article >>>