Re: 無題 - webmaster

2025/04/10 (Thu) 18:04:14

返信遅れてすみません。
BASIC リスト、以下の通り作ってみましたのでお試しください。
打ち間違い対策として、一応チェックサムを付けてあります。
このプログラムは私の手元の実機環境(MA2+24kHz モニター)でしか
動作確認していません。あしからず。
-------------------------------------------------------------
100 ' Binary to N88-BASIC
110 CLEAR ,&HB7FF:DEFINT A-Z:CONSOLE 0,25,0,1
120 S=&HB800:E=&HBA31:DEF USR=S:C=0
130 FOR A=S TO E:READ B$:N=VAL("&H"+B$):POKE A,N:C=C+N:C=C AND 255:NEXT
140 CLS:IF C<>103 THEN 155
150 A=USR(0):END
155 PRINT"CHECK SUM ERROR!":END
160 data F3,3E,80,D3,70,3E,99,D3,32,3E,07,D3,E4,3E,02,D3,E6,3E,39,D3
170 data 31,3E,B9,D3,32,CD,02,BA,CD,B7,B9,D3,5F,21,55,B8,11,41,F5,CD
180 data 19,BA,11,0F,F8,CD,19,BA,11,E0,FA,CD,19,BA,11,AF,FD,CD,19,BA
190 data 11,DE,F3,CD,19,BA,3E,A9,D3,32,21,48,7A,22,CA,F3,DB,6E,07,D2
200 data D1,B8,C3,9D,B8,52,65,64,00,47,72,65,65,6E,00,42,6C,75,65,00
210 data 57,68,69,74,65,00,30,20,20,20,20,20,20,31,20,20,20,20,20,20
220 data 32,20,20,20,20,20,20,33,20,20,20,20,20,20,34,20,20,20,20,20
230 data 20,35,20,20,20,20,20,20,36,20,20,20,20,20,20,37,00,21,34,4D
240 data 22,C8,F3,DB,40,E6,20,28,FA,DB,09,CB,7F,CA,00,B8,21,77,B9,CD
250 data 0E,B9,DB,40,E6,20,20,FA,CD,38,B9,CD,0E,B9,CD,49,B9,CD,0E,B9
260 data CD,49,B9,CD,0E,B9,C3,A3,B8,21,38,4D,22,C8,F3,DB,40,E6,20,28
270 data FA,DB,09,CB,7F,CA,00,B8,21,77,B9,CD,0E,B9,DB,40,E6,20,20,FA
280 data CD,38,B9,CD,59,B9,CD,0E,B9,CD,49,B9,CD,68,B9,CD,0E,B9,CD,49
290 data B9,CD,68,B9,CD,0E,B9,C3,D7,B8,0E,54,ED,A3,ED,A3,0C,ED,A3,ED
300 data A3,0C,ED,A3,ED,A3,0C,ED,A3,ED,A3,0C,ED,A3,ED,A3,0C,ED,A3,ED
310 data A3,0C,ED,A3,ED,A3,0C,ED,A3,ED,A3,C9,06,BE,06,BE,06,BE,06,BE
320 data E5,E1,E5,E1,E5,E1,10,F8,C9,01,54,00,06,CF,06,CF,E5,E1,E5,E1
330 data E5,E1,10,F8,C9,DD,46,00,DD,46,00,06,AA,E5,E1,E5,E1,10,FA,C9
340 data DB,00,DB,00,DB,00,06,BD,E5,E1,E5,E1,10,FA,C9,00,40,08,40,10
350 data 40,18,40,20,40,28,40,30,40,38,40,00,40,00,41,00,42,00,43,00
360 data 44,00,45,00,46,00,47,00,40,01,40,02,40,03,40,04,40,05,40,06
370 data 40,07,40,00,40,09,41,12,42,1B,43,24,44,2D,45,36,46,3F,47,21
380 data F4,C1,CD,D0,B9,21,94,D1,CD,D0,B9,21,34,E1,CD,D0,B9,21,D4,F0
390 data CD,D0,B9,C9,AF,01,28,07,11,49,00,CB,47,28,04,D3,5C,36,FF,CB
400 data 4F,28,04,D3,5D,36,FF,CB,57,28,04,D3,5E,36,FF,23,10,E5,19,06
410 data 07,0D,20,DF,11,87,F3,19,3C,FE,08,20,D0,C9,0E,5B,3E,07,67,87
420 data 87,87,B4,ED,79,CB,F4,ED,61,0D,E6,07,3D,F2,06,BA,C9,C5,DB,31
430 data CB,77,DB,32,F5,28,04,CB,A7,D3,32,AF,ED,A0,BE,20,FB,F1,D3,32
440 data C1,C9

Re: 無題 - 撃

2025/04/10 (Thu) 22:22:54

無理な要望にお応えいただきありがとうございます。Z80ASにかけたらバイナリが出るのかな？と試してもエラーで諦めかけておりました。早速打ち込みを始めます。CRTは可変抵抗交換の為再度バラしているところですが、運用成功した暁にはご報告したく思います。本当にありがとうございました。

Re: 無題 - 撃

2025/04/15 (Tue) 23:06:46

とりあえず常用している液晶モニタにてうちのMAも29色同時発色（黒含む）しました。V1H及びV2モードで4MHzと8MHzどちらでも正常表示されました。素晴らしいツールをありがとうございました。

Re: 無題 - webmaster

2025/04/17 (Thu) 02:25:50

無事動いたようで良かったです。
実機・CRTの保守は大変ですがお大事に。