忘れない内に皆に伝授しときましょう。
・多色刷り、
・ドット単位横スクロール、
・エスケープシークエンス・・・
色々ありましたよね。
思い出したらなんでも書き込みよろしく。
MSX-BASICの奥義を伝授するスレ
■ このスレッドは過去ログ倉庫に格納されています
1デフォルトの名無しさん
NGNGNGNG
今ごろMSXPGで著作権を気にする奴はいないだろ
46デフォルトの名無しさん
NGNG48デフォルトの名無しさん
NGNG age
Syntax error
Ok
■
Syntax error
Ok
■
NGNG
先生!暴走してます、カーソルが点滅していません
50デフォルトの名無しさん
NGNG >49
先生! MSXはカーソル点滅しないと思います!
先生! MSXはカーソル点滅しないと思います!
51デフォルトの名無しさん
NGNG VDPコマンドとか、懐かしいフレーズだけど、全部忘れちゃったよ。
実家に帰れば、MSXテクニカルハンドブックがまだあるかな。
あのころは、3500円が激高価におもえたよ(リアル厨房だったし)。
いまなら、専門書で3500円ならやすい!とおもうが。
実家に帰れば、MSXテクニカルハンドブックがまだあるかな。
あのころは、3500円が激高価におもえたよ(リアル厨房だったし)。
いまなら、専門書で3500円ならやすい!とおもうが。
52デフォルトの名無しさん
NGNG Illegal function call in >>49
NGNG
MSXは凄いぜ!
なんたって、カーソルが斜めに動ける。
なんたって、カーソルが斜めに動ける。
NGNG
NGNG
コスト削減のためとか
NGNG
M5の方がずーーーっといいのにな
40桁表示だし
グラフィック画面とテキスト画面は独立しているし
カーソルが点滅しているし
Z80CTCを積んでるし
VDPの使い方がアンポンタンだぞ>>MSX
40桁表示だし
グラフィック画面とテキスト画面は独立しているし
カーソルが点滅しているし
Z80CTCを積んでるし
VDPの使い方がアンポンタンだぞ>>MSX
NGNG
>>56
アンポンタンぶりが却って良い結果を生んでたと思う。
アンポンタンぶりが却って良い結果を生んでたと思う。
NGNG
59デフォルトの名無しさん
NGNG なんかどうにかして 25行表示にすることってできなかったですかね
勘違いかな・・・
勘違いかな・・・
NGNG
まあ、MSXのVDPがクソなのは何を置いても認めよう。
NGNG
62デフォルトの名無しさん
NGNG >>59
POKE &HF3B1,25
POKE &HF3B1,25
NGNG
64デフォルトの名無しさん
NGNG65親切な人
NGNGヤフーオークションで、凄い人気商品、発見!!!
コピーガードキャンセラー↓
http://page2.auctions.yahoo.co.jp/jp/auction/b18032656
注目のオークションに適用される事、
間違いないですね。
私も買いました。
皆も買いましょう。
66デフォルトの名無しさん
NGNG67デフォルトの名無しさん
NGNG Z80のアセンブラ表にない隠し命令ってどこまで発見されてましたっけ?
NGNG
>>67
隠し命令とは、初耳。
隠し命令とは、初耳。
NGNG
>>68
http://www.geocities.com/SiliconValley/Peaks/3938/z80undoc.htm
全部かどうかは知らない。けど、turboRのR800では「正式」な命令になったはず。
http://www.geocities.com/SiliconValley/Peaks/3938/z80undoc.htm
全部かどうかは知らない。けど、turboRのR800では「正式」な命令になったはず。
NGNG
10 'MSX物理的劣化プログラム(MSX,MSX2,MSX2+用)
20 'このプログラムは決して実機で動かさないで下さい。
30 ON STOP GOSUB 60
40 STOP ON
50 MOTOR:GOTO 50
60 RETURN
20 'このプログラムは決して実機で動かさないで下さい。
30 ON STOP GOSUB 60
40 STOP ON
50 MOTOR:GOTO 50
60 RETURN
NGNG
>>70
ミシンだな。
ミシンだな。
72デフォルトの名無しさん
NGNGNGNG
そういえばMOTOR使ったお遊びプログラムを店頭展示マシンで実行してたな。
何かキーを押すと始動か時限式かで(w
何かキーを押すと始動か時限式かで(w
NGNG
>>73
こんな感じ?
A$=INPUT$(1):FOR I=0 TO 1:I=0:MOTOR:NEXT
TIME=0:FOR I=0 TO 10000:I=TIME:NEXT:FOR I=0 TO 1:I=0:MOTOR:NEXT
こんな感じ?
A$=INPUT$(1):FOR I=0 TO 1:I=0:MOTOR:NEXT
TIME=0:FOR I=0 TO 10000:I=TIME:NEXT:FOR I=0 TO 1:I=0:MOTOR:NEXT
75名梨産
NGNG 10 CLEAR:DIM SX(8),SY(8),TX(9),TY(9)
20 RESUME 30:FOR A=1 TO 8:READ SX(A),SY(A):NEXT
30 RESUME 40:FOR A=1 TO 9:READ TX(A),TY(A):NEXT
40 DATA 0,-1,1,-1,1,0,1,1,0,1,-1,1,-1,0,-1,-1
50 DATA -1,1,0,1,1,1,-1,0,0,0,1,0,-1,-1,0,-1,1,-1
60 X=X+SX(STICK(0))+TX(VAL(INKEY$))
70 Y=Y+SY(STICK(0))+TY(VAL(INKEY$))
ジョイスティックの番号あってるかな?ちと自信無し。
上が1だったらこれで動く・・・はず。誰か検証して。
20 RESUME 30:FOR A=1 TO 8:READ SX(A),SY(A):NEXT
30 RESUME 40:FOR A=1 TO 9:READ TX(A),TY(A):NEXT
40 DATA 0,-1,1,-1,1,0,1,1,0,1,-1,1,-1,0,-1,-1
50 DATA -1,1,0,1,1,1,-1,0,0,0,1,0,-1,-1,0,-1,1,-1
60 X=X+SX(STICK(0))+TX(VAL(INKEY$))
70 Y=Y+SY(STICK(0))+TY(VAL(INKEY$))
ジョイスティックの番号あってるかな?ちと自信無し。
上が1だったらこれで動く・・・はず。誰か検証して。
NGNG
奥義
1 'CSAVE "TEST.BAS"
1 'CSAVE "TEST.BAS"
NGNG
>40 DATA 0,-1,1,-1,1,0,1,1,0,1,-1,1,-1,0,-1,-1
>50 DATA -1,1,0,1,1,1,-1,0,0,0,1,0,-1,-1,0,-1,1,-1
MSX-FANに載ってたシューティングの自機移動速度が遅かったので
バイナリで上のテーブル見つけ出して書き換えたことがあるな。
>50 DATA -1,1,0,1,1,1,-1,0,0,0,1,0,-1,-1,0,-1,1,-1
MSX-FANに載ってたシューティングの自機移動速度が遅かったので
バイナリで上のテーブル見つけ出して書き換えたことがあるな。
78名梨産
NGNG あの頃ってファンダムの影響で行番号を1行刻み、コロンでひたすらネスト
っていう書き方のプログラムばっかだったな(藁
っていう書き方のプログラムばっかだったな(藁
NGNG
>>77
「バイナリで」ってどういう意味?
「バイナリで」ってどういう意味?
80デフォルトの名無しさん
NGNG >>79
「左右から雌雄のペンギンで挟み込んで」の意
「左右から雌雄のペンギンで挟み込んで」の意
81三村
NGNG バイナリーランドかよ!
NGNG
バシシのほうがイイ
84デフォルトの名無しさん
NGNG がんばれ、ゲイツ君
むかしから中村さんって気に入らなかったんだけど
よくよんでたらこの人、MSXを馬鹿にしまくってるのな。
頃すぞ! と思った夕食時でした
むかしから中村さんって気に入らなかったんだけど
よくよんでたらこの人、MSXを馬鹿にしまくってるのな。
頃すぞ! と思った夕食時でした
NGNG
中村さんってなんだ?
間違えたよ宇津田詩嚢
間違えたよ宇津田詩嚢
NGNG
>85
まあトノサキって中村のコピーみたいなもんだし
まあトノサキって中村のコピーみたいなもんだし
NGNG
中村さん?
なんのこと?(what's?)
なんのこと?(what's?)
89デフォルトの名無しさん
NGNG UBASIC?
NGNG
>>89
二千数百桁までの数値が使えるPC-98やDOS/V用のBASICだよ。
まぁ、このスレとは関係ないけど。
ちなみに、MSX-BASICの浮動小数点型の内部表現は
10進で持ってるんだよね。
だから、他の大多数のマシンでは浮動小数点値を
内部では2進で値を持ってる。だから、
FOR I= 0.1 TO 1 STEP 0.1:NEXT I
とやると無限ループになるけどMSXではちゃんと10回回って抜ける。
#無限ループするのは0.1を2進数で表すと循環小数になるので
#切捨て誤差が発生して10回足してもきっちり1にはならない為。
この辺は直感に反しないし、変な誤差も出ないから良いよね。
二千数百桁までの数値が使えるPC-98やDOS/V用のBASICだよ。
まぁ、このスレとは関係ないけど。
ちなみに、MSX-BASICの浮動小数点型の内部表現は
10進で持ってるんだよね。
だから、他の大多数のマシンでは浮動小数点値を
内部では2進で値を持ってる。だから、
FOR I= 0.1 TO 1 STEP 0.1:NEXT I
とやると無限ループになるけどMSXではちゃんと10回回って抜ける。
#無限ループするのは0.1を2進数で表すと循環小数になるので
#切捨て誤差が発生して10回足してもきっちり1にはならない為。
この辺は直感に反しないし、変な誤差も出ないから良いよね。
NGNG
昔のPC板ができております。おいでませい。
http://pc.2ch.net/i4004/
http://pc.2ch.net/i4004/
92デフォルトの名無しさん
NGNG ここまで、DEFINTが1度ものってないなんて・・・
NGNG
DEFINTA -Z です。
NGNG
DEFSTRってFM音楽館(だっけ?)のプログラムで良く使われてたよね。
$無しの変数に文字列入ってたのにはカナーリビクーリしたよ。
$無しの変数に文字列入ってたのにはカナーリビクーリしたよ。
95もう忘れました
NGNG @Niftyでは、MSX-BASICで年賀状作るコーナーがあったな。
そろそろ干支が1周して再利用できるようになる、かも。
そろそろ干支が1周して再利用できるようになる、かも。
NGNG
保全sage
97デフォルトの名無しさん
NGNG TurboRのMIDI関係の命令が解りません。
何処かに資料は無いでしょうか?
最近、MSXユーザーになったばかりであります。
何処かに資料は無いでしょうか?
最近、MSXユーザーになったばかりであります。
NGNG
99デフォルトの名無しさん
NGNG エミュってキーボードのエミュレーションに不具合があるの?
なんか打ち込めない文字があるんだけど。
なんか打ち込めない文字があるんだけど。
100⊂(゚д゚⊂
NGNG 今だ!100ゲットォォ
101デフォルトの名無しさん
NGNG 奥義もっと伝授しる!
102デフォルトの名無しさん
NGNG POKE&HFBB1,1でCTRL-STOPの禁止。0で解除。
但しこの方法だとCTRL-STOPが押されたときにPSGが初期化される。
ただON STOP GOSUBだとプログラム移動時にスキが出るので
TPOで使い分ける。
但しこの方法だとCTRL-STOPが押されたときにPSGが初期化される。
ただON STOP GOSUBだとプログラム移動時にスキが出るので
TPOで使い分ける。
103デフォルトの名無しさん
NGNG DOS1ディスクから起動していない場合は call system が出来ないが
poke &hf346,1 を実行すると call system が出来るようになる。
DOS2は無条件で出来るのでする必要が無い。
poke &hf346,1 を実行すると call system が出来るようになる。
DOS2は無条件で出来るのでする必要が無い。
104デフォルトの名無しさん
NGNG age
105デフォルトの名無しさん
NGNG 奥義!ハァハァ
106デフォルトの名無しさん
NGNG 行番号は10、20、30ではなく1、2、3と使え。
107デフォルトの名無しさん
NGNG プロポシェの1行プログラム、投稿燃えたよね〜
常連と称されたときは嬉しくてマジ涙出た。
常連と称されたときは嬉しくてマジ涙出た。
108デフォルトの名無しさん
NGNG 作ったプログラムを保存するのって
やっぱりデーターレコーダーですよね♪
(フロッピーなんて野暮な機器は使わない方向で)
で、最近、そのデーターレコーダーは、手に入らないじゃないですか
(普通にラジカセ使うって野暮な話は無しの方向で)
そんな時は、MDを使ってみましょう♪
最初は、非可逆圧縮なので駄目かと思ったんですが
何となくやってみると、さすが1200(2400)ボー
上手く録音レベルを調節すれば、使えるんですね
(自分のがLPx非対応の為、標準でしか試してませんが)
と言う訳で、Rは、ほぼ確実に使えると思うので
チャレンジャーな方は、MP3やLPxモードに挑戦してみてください♪
(普通に(?)データを吸い出すって野暮な話は無しの方向で…)
また、ビデオデッキも試してみたのですが
Hi-Fiだと、ヘッドの回転ノイズが大きい為、上手くいかないようです
もしかしたら、ノーマル音声なら上手くいくかも知れないので
同じく、チャレンジャーな方は挑戦してみてください
って、こんな奥義じゃないのかな…。(^^;
やっぱりデーターレコーダーですよね♪
(フロッピーなんて野暮な機器は使わない方向で)
で、最近、そのデーターレコーダーは、手に入らないじゃないですか
(普通にラジカセ使うって野暮な話は無しの方向で)
そんな時は、MDを使ってみましょう♪
最初は、非可逆圧縮なので駄目かと思ったんですが
何となくやってみると、さすが1200(2400)ボー
上手く録音レベルを調節すれば、使えるんですね
(自分のがLPx非対応の為、標準でしか試してませんが)
と言う訳で、Rは、ほぼ確実に使えると思うので
チャレンジャーな方は、MP3やLPxモードに挑戦してみてください♪
(普通に(?)データを吸い出すって野暮な話は無しの方向で…)
また、ビデオデッキも試してみたのですが
Hi-Fiだと、ヘッドの回転ノイズが大きい為、上手くいかないようです
もしかしたら、ノーマル音声なら上手くいくかも知れないので
同じく、チャレンジャーな方は挑戦してみてください
って、こんな奥義じゃないのかな…。(^^;
109デフォルトの名無しさん
NGNG デーレコ今でも大切に保管してます
しかも、なぜかこいつだけ、箱や発泡スチロールごと残っている。
PHC-DR2。倍速読み込みモード付き。
しかし、本体はすでに捨ててたりするし。
しかも、なぜかこいつだけ、箱や発泡スチロールごと残っている。
PHC-DR2。倍速読み込みモード付き。
しかし、本体はすでに捨ててたりするし。
111デフォルトの名無しさん
NGNG はやく免許皆伝ください
112デフォルトの名無しさん
NGNG auto 10
113デフォルトの名無しさん
NGNG TRON
114デフォルトの名無しさん
NGNG KEY OFF:FOR I=1 TO 10:KEY I,"NEW"+CHR$(13):NEXT I
115デフォルトの名無しさん
NGNG 10 SCREEN 1:WIDTH 32:CLS
20 FOR I=0 TO 255:PRINT CHR$(I);:NEXT I:PRINT
30 FOR AD=1*8 TO 255*8-1:VPOKE AD-8,VPEEK(AD):NEXT AD
40 LIST
50 END
20 FOR I=0 TO 255:PRINT CHR$(I);:NEXT I:PRINT
30 FOR AD=1*8 TO 255*8-1:VPOKE AD-8,VPEEK(AD):NEXT AD
40 LIST
50 END
116デフォルトの名無しさん
NGNG へー、おめでたいな。厨房くん
MSX-BASICだって?なんじゃそりゃ
そんな過去の遺物の話してんのかい。板違いじゃねーの?
昔のパソコン板逝けば?
http://pc.2ch.net/i4004/
おまえら今話題のこれ知らないのかよ
これだよこれ
http://www.sharp.co.jp/corporate/news/011105.html
MSX-BASICだって?なんじゃそりゃ
そんな過去の遺物の話してんのかい。板違いじゃねーの?
昔のパソコン板逝けば?
http://pc.2ch.net/i4004/
おまえら今話題のこれ知らないのかよ
これだよこれ
http://www.sharp.co.jp/corporate/news/011105.html
117デフォルトの名無しさん
NGNG test
118デフォルトの名無しさん
NGNG test
119デフォルトの名無しさん
NGNG ( ´,_ゝ`)
120デフォルトの名無しさん
NGNG121デフォルトの名無しさん
NGNG >>115
0から255を画面に出したらコントロールコードまで吐いちゃうよ!
0から255を画面に出したらコントロールコードまで吐いちゃうよ!
122成毛 真
NGNG10 DEFUSR = &H0 : A = USR(0)
123デフォルトの名無しさん
NGNG CALL TURBO ON
124デフォルトの名無しさん
NGNG プログラムを速くするおまじない。
DEFINT A-Z
DEFINT A-Z
126デフォルトの名無しさん
NGNG >>125
俺はWAVYなので内蔵でしたのじゃ。
俺はWAVYなので内蔵でしたのじゃ。
128デフォルトの名無しさん
NGNG フォントを太字にします。
100 CLEAR 128,&HCF7F
110 '
120 FOR AD=&HCF80 TO &HCFCF
130 READ DT$:POKE AD,VAL("&H"+DT$)
140 NEXT AD
150 '
160 DEFUSR=&HCF80:A=USR(0)
170 '
180 'BSAVE "FONTBOLD.BIN",&HCF80,&HCFCF,&HCF80
190 'BLOAD "FONTBOLD.BIN",R
200 '
1000 DATA F3,DB,A8,F5,DD,21,1F,F9,DD,5E,00,E6,F0,B3,CB,23
1010 DATA CB,23,B3,D3,A8,DD,6E,01,DD,66,02,11,00,D0,01,00
1020 DATA 08,ED,B0,F1,D3,A8,FB,21,00,D0,01,00,08,7E,5F,CB
1030 DATA 3B,B3,77,23,0B,78,B1,20,F4,21,00,D0,DD,36,00,03
1040 DATA DD,75,01,DD,74,02,3A,AF,FC,CD,5F,00,C9,00,00,00
100 CLEAR 128,&HCF7F
110 '
120 FOR AD=&HCF80 TO &HCFCF
130 READ DT$:POKE AD,VAL("&H"+DT$)
140 NEXT AD
150 '
160 DEFUSR=&HCF80:A=USR(0)
170 '
180 'BSAVE "FONTBOLD.BIN",&HCF80,&HCFCF,&HCF80
190 'BLOAD "FONTBOLD.BIN",R
200 '
1000 DATA F3,DB,A8,F5,DD,21,1F,F9,DD,5E,00,E6,F0,B3,CB,23
1010 DATA CB,23,B3,D3,A8,DD,6E,01,DD,66,02,11,00,D0,01,00
1020 DATA 08,ED,B0,F1,D3,A8,FB,21,00,D0,01,00,08,7E,5F,CB
1030 DATA 3B,B3,77,23,0B,78,B1,20,F4,21,00,D0,DD,36,00,03
1040 DATA DD,75,01,DD,74,02,3A,AF,FC,CD,5F,00,C9,00,00,00
129デフォルトの名無しさん
NGNG 10 SCREEN 0:WIDTH 80:CLS
20 FOR AD=0 TO 65535! STEP 16
30 PRINT RIGHT$(("000" + HEX$(AD)), 4);":";
40 FOR OF=0 TO 15
50 PRINT RIGHT$(("0" + HEX$(PEEK(AD+OF))), 2);" ";
60 NEXT OF:PRINT
70 NEXT AD
80 END
20 FOR AD=0 TO 65535! STEP 16
30 PRINT RIGHT$(("000" + HEX$(AD)), 4);":";
40 FOR OF=0 TO 15
50 PRINT RIGHT$(("0" + HEX$(PEEK(AD+OF))), 2);" ";
60 NEXT OF:PRINT
70 NEXT AD
80 END
130デフォルトの名無しさん
NGNG >128
わざわざマシン語でやることもないじゃん。
って書いてさらに思ったが、「マシン語」っていう言葉の響きそのものが
すでに懐かしく感じた今日この頃。
わざわざマシン語でやることもないじゃん。
って書いてさらに思ったが、「マシン語」っていう言葉の響きそのものが
すでに懐かしく感じた今日この頃。
131128
NGNG132デフォルトの名無しさん
NGNG なんか古すぎてもう文法とかいまいち覚えてないな。
マシン語の話題だったら少しくらいは覚えてるけど。
マシン語の話題だったら少しくらいは覚えてるけど。
133128
NGNG134デフォルトの名無しさん
NGNG135デフォルトの名無しさん
NGNG136デフォルトの名無しさん
NGNG137デフォルトの名無しさん
NGNG 懐かしいスレだ・・・
POKEとかSPRITE$とかたった今まですっかり忘れてた言葉だよ。
米チャでも呼んでくるか・・・
POKEとかSPRITE$とかたった今まですっかり忘れてた言葉だよ。
米チャでも呼んでくるか・・・
138デフォルトの名無しさん
NGNG 久しぶりに、こたぐち君が表紙にのってる
「MSXマシン語プログラム入門」がみたいれす。
だれかすきゃん&うぷよろすぃく。
「MSXマシン語プログラム入門」がみたいれす。
だれかすきゃん&うぷよろすぃく。
139デフォルトの名無しさん
NGNG poke &Hfbb0,255
140デフォルトの名無しさん
NGNG >>139
ホットスタート開始。
ホットスタート開始。
141デフォルトの名無しさん
NGNG >>139
ctrl+sft+grp+カナだったっけ。
ctrl+sft+grp+カナだったっけ。
142デフォルトの名無しさん
NGNG ポーク食いたい。
143デフォルトの名無しさん
NGNG >>142
VPOKE安いよw
VPOKE安いよw
144デフォルトの名無しさん
NGNG MSXは終わったけど、面白いよ。お金掛からないし。
■ このスレッドは過去ログ倉庫に格納されています
ニュース
- 高市早苗首相、人口減少問題で「地方は東京を見習って」発言に違和感 鳥取・平井知事、県議会で言及 ★2 [Hitzeschleier★]
- 中国外務省「絶対に受け入れない」改めて撤回求める 台湾有事めぐる高市総理の「政府の立場に変更なし」との答弁に対し★2 [ぐれ★]
- 高市総理の「働き方」のリアル 実質“休みゼロ”、睡眠は2時間、会食ゼロ…溜まった洗濯をしながら党首討論の準備 [Hitzeschleier★]
- 『M-1』決勝進出9組発表 エバース、ヤーレンズ、ヨネダ2000、ママタルト、真空ジェシカら進出 [muffin★]
- 【速報】 山上徹也被告が謝罪 「何の恨みもありません。非常に申し訳ないことをした」 ★2 [お断り★]
- 【サッカー】日本代表・中村敬斗選手へのストーカー行為容疑で逮捕の女性(65)不起訴処分「犯行時の精神状態を考慮した」千葉地検 [久太郎★]
- 【悲報】日本維新の女議員、旦那にサンドイッチ作るからパン買ってこいと命令し、6枚切りを買ってきたため発狂wwwwwwwwwwwwwwwwwww [802034645]
- かなたそ🪽に握りつぶされるお🏡
- なんg冬のボーナスマウント部
- 曖昧3センチwwwそれ粗チンってことじゃんwwwプッwww
- 「90年代までの日本人は皆が明るかった!」→これマジなの? [346195464]
- 尿道オナ二ーの専門家だけど質問ある?
