> konnoさんが誠実な人であるのは間違いがないところでしょう。根がいい加減なのでなるべく誠実なふりをしているとバレてるかもしれんが。(^^;> > NP2でN88BASIC を使って RENUM や中間語に変換してみました。> これ、変換に使ったツールの記述はありますが、変換後をどうやって表示している> のかがよくわからない。文字化けっぽい表記になっている、というのもあって。VZで開いて見えたイメージをテキストにしたのです。ここの人達ならわかるかと。(^^;> ということで引っ張り出してきたのが、ASCIIの出版した「PC-Techkonw 8800」> という本。ISBN4-87148-292-8。archive.orgにあるかなぁ。ググったら MSX2のがありました。\(^^)/ https://archive.org/details/MSX2TechnicalHandBookFE1986/mode/2up> この本には、ROM内のルーチンのどのアドレスに何をするコードがあるか、と> いう表も載っていて、それによると、RENUMを行うルーチンは75DDH〜7673Hに> あるとか。なんと、150バイト。もちろん、どこかよそのサブルーチンを呼んで> いるのかもしれませんが、でもRENUMでも使うような汎用性のあるルーチンて> ちょっと思いつかないので、これで全部のような気もする。マシン語ならそのくらいで出来るかもしれませんね。 せっかくなので私も DEBUG の結果を張っておきます。 3D6A:0100 FE 15 00 0A 00 01 41 00-F1 0F 0A 3A A4 01 0E A0 ......A....:.... 3D6A:0110 0F 00 27 31 30 00 0E 00-1E 00 01 A7 01 41 00 00 ..'10........A.. 3D6A:0120 27 33 30 00 24 00 C8 00-02 A8 01 41 00 24 F1 FF '30.$......A.$.. 3D6A:0130 9C 28 0F 0D 29 01 D6 01-0E B8 0B 01 3A 99 01 0E .(..).......:... 3D6A:0140 C8 00 00 27 32 30 30 00-2E 00 D2 00 01 00 27 69 ...'200.......'i 3D6A:0150 66 20 61 24 3D 63 68 72-24 28 31 33 29 20 74 68 f a$=chr$(13) th 3D6A:0160 65 6E 20 33 30 30 30 20-65 6C 73 65 20 32 30 30 en 3000 else 200 3D6A:0170 09 27 32 31 30 00 10 00-2C 01 02 A3 01 0E 1E 00 .'210...,....... 3D6A:0180 00 27 33 30 30 00 0D 00-B8 0B 01 9A 00 27 33 30 .'300........'30 3D6A:0190 30 30 00 19 00 A0 0F 01-9E 01 49 00 F1 11 01 DA 00........I..... 3D6A:01A0 01 41 00 3A B7 00 27 34-30 30 30 00 0D 00 68 10 .A.:..'4000...h. 3D6A:01B0 01 C6 00 27 34 32 30 30-00 1A 00 00 00 00 00 00 ...'4200........ 10 A=10:GOSUB 4000'10 30 INPUT A'30 200 IF A$=CHR$(13) THEN 3000 ELSE 200'200 210 'if a$=chr$(13) then 3000 else 200 '210 300 GOTO 30'300 3000 END'3000 4000 FOR I=1 TO A:NEXT'4000 4200 RETURN'4200
関連記事一覧ツリー (▼ を押すとツリー全体を一括表示します)
返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)
- 以下のフォームから自分の投稿記事を修正・削除することができます -