1 圉笈

高木 真一

CS3

•はじめに

MSX パソコンで、 機械語で かれた ームを 楽しみたい や、 BASIC プロ グラ プノ レー チンを 作る 場合、

ムの 中に 拍^ サブ ルー RAM Z-80 械語命 1

むこと 必要に 4 モニタ』 その J RAM 機械語を 害き こむ ほかに、 書き んだ プログラムを 6 形式で 表示 1 カセット テープに LOAD/SAVE がで きる。 また、 タイプ ミスに よる i L する ための.1 7 チェック •サム j I [値を 計算す 檐能も ある。

発見す る/: いう 数値を f

[する こと 間違い

RUM RETURN 丨でス タートさせる と、 初に* MSX MACHINE LANGUAGE MONITOR という メッセージが 現れ、

つぎに,** A 示される。 これ)^ コマ 入力 待ちの 状態で、 この •♦•につ づけて コマンドを 入力す る。 コマンドは 8 あり、 コマンド (I 文字) あと 161 4 相の ドレスを 入力す 〇(1_、 Q コマンドを 除く) コマンド 名と アド ス、 アドレスと アドレスの 問を それぞれ I 文字 あけて 入力す こと。 スペース あけずに つめて 入力したり、 2 文字 以上 あけた りする 正常に 動作 しないの 注意。 また、 コマンド 名は 大文字で

いと 受けつ けない ので、 fCAPST^-$rjf して キー ポー ドを 大文字 モード ([CAPS1 キー 上の LED 点灯した 状態) にして くこと。

•M コマンド

(開始 ドレス) IRETURNK 入力 すると、 開始 アドレスから RAM 内容を 害き かえる ことができる 0 まず 画面に

ドレスが 表示され、 その ドレス 上の RAM 内容が 承され る。 新しく 害き こみた データを 6 進数 2 析で タイ すると、 それが RAM 害き こまれ、 次の ドレス 進む。 データを 入力す るか わりに URNfejfT と、 RAM 内容は その ままで

- 0i I = L

.•■ Mo :GO :GO :GO 20 20 2e 20 UM SE SE DA TO

I 1 _ -s i :I !J

OLOR ! nl ,c h4*! s _ r/s

l fel i h il ;I l :: ri l; i

1 f i § s? ! IP yl H r i ip=isl F

E l il 以^; , r li E ll E _i Ei> sl ;p:: s IS= li ls roT

110 120 130 沿 1 230 240 250 260 2?0 280 290 | 310 |1 3?0 |||忠 438 |ぽ 470 488 || 518 1 550 560 570 580 1§盟1||1ほ| 700 710 720 730 710 750 760

770 PRINT ND$(GT)J 780 NEXT GT

790 POKE A,VALC&H_+ND$(0HND$(1〉)

800 PRINT ' ';

810 A=A+1:CT=CT+1 820 IF CT<4 THEN 640 830 PRINT 840 GOTO 600 850 '

860 ' L COMMAND 870 /

880 INPUT ,FILENAME*;FI«

890 BLOAD 'CAS:*+FI$

900 RETURN 920 7 S COMMAND 930 '

940 TP=3:60SUB 1060 950 INPUT 'FILENAME* iFI$

960 BSAVE 'CASs'+F^.A.B.C

990 ' G COMMAND 1000 '

1010 TP=l:GOSUB 1060 1020 DEF USR=A 1030 DM=USR(0)

1840 RETURN 1050 '

1060 GET ADDRESS

1080 A$=MID*(CM$,3,d)

1090 A=VAL('&H,+A$)

1100 IF TP=1 THEN RETURN 1110 B$=MID$(CM$,8,4)

1120 B=VALC&H,+B*)

1130 IF TP=2 THEN RETURN 1140 C*=MID$(CM$,i3,4)

1150 C=VALC&H,+C$)

1160 RETURN 1180 4 DIGIT HEX

1200 ON LEN(H4$) GOTO 1210,122 0,1230 ,124( 1210 H4$=,000,+H4$sRETURN 1220 H4$=,00,+H4$:RETURN 1230 Hd$='0,+H4$:RETURN 1240 RETURN

1260 ERROR CHECK (M COMMAND)

1280 CK=ASC(CK$)

1300 IF~(CK>=8.H30 AND CK<=&H39> OR (CK>=i 1310 IF CK=&HD THEN EF=2s NEXT 1320 IF CK=&H8 THEN EF=3s BACK

1330 IF CK=&H1B THEN EF=4: END 1340 RETURN 1350 '

r DISPLAY CHECK SI

1380 CS$=RIGHT$(HEX$(CS),2> 1390 IF LEN(CS$)=1 THEN CS$=*0 1400 ON PF GOTO 1420,1430

1410 P「 ••一 ■■一,

1420 PI

. GOTO 1420, Uow

.0 PRINT V;CS$:RETURN

s RETURN

IT •: _;CS$:RETURN