MSX-BASICの奥義を伝授するスレ
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
NGNG・多色刷り、
・ドット単位横スクロール、
・エスケープシークエンス・・・
色々ありましたよね。
思い出したらなんでも書き込みよろしく。
0002デフォルトの名無しさん
NGNG10 SCREEN1:WIDTH32:DEFUSR=&H7E:A=USR(0)
0003デフォルトの名無しさん
NGNG0004デフォルトの名無しさん
NGNG0005デフォルトの名無しさん
NGNGSETADJUSTだと画面位置がバックアップされてしまうから。
でも肝心のVDP(N)のNの値が思い出せない。。。
0006デフォルトの名無しさん
NGNGR#27 VDP(28) 画面の水平スクロール量 (Low)
何故かあったM・FAN95年6月号より。
でも、もうVDPの弄くりかたも忘れたなあ。。。
0007スプライト定義
NGNG0008デフォルトの名無しさん
NGNGOUT 64, 8
OUT 65, 1
ちょっと、自信ない・・・
0009デフォルトの名無しさん
NGNG00105
NGNGサンクス。
しかしこの情報を何に生かしたらよいのやら・・・w
00116
NGNG(苦笑
まあ、うちのMSXはとっくの昔にぶっ壊れましたけど、TVに直接出せるし
一応持ち運べるし、A1GTならMIDIポートついてるし、なんかの時に何か
の役にたつこともないことはないかも(いや、多分ないが(藁
0012仕様書無しさん
NGNGMSXエミュは結構いいのがいろいろ出てますぜ。
もっとも、実機もちゃんと持ってますが、いつ壊れるかわからんからな〜。
ひょっとすると、知らないうちに壊れてたりして。
0013仕様書無しさん
NGNG0015デフォルトの名無しさん
NGNG0016キングコング
NGNGセミコロンが抜けてると思われ
0017デフォルトの名無しさん
NGNG0018デフォルトの名無しさん
NGNG実機をもってても、フロッピーの保管が大変じゃない?
どんなに、厳重にしまっていても、3〜5年で壊れるでしょ。
0019デフォルトの名無しさん
NGNG00201ch.tvへ逝け
NGNGout64,8:out65,0じゃないかな。
ASCATのテクニカルガイドではFS-A1WX/FX/WSXで使えるとある。
あと、BASIC ROMを覗いてDSKI$, DSKI$を発見して使ったはいいが、
ディスク壊してしまったこともあったなあ。
0021デフォルトの名無しさん
NGNGたしか行番号のあたりに直接
最終行番号の値を書いちまう方法があったが
どこの番地にナニを書けばいいか忘れた
実機があればリスト格納先頭番地からダンプするところだけど
0022デフォルトの名無しさん
NGNGあの時代のエロゲーには現代にはない何かがあった・・・
0023デフォルトの名無しさん
NGNG00241ch.tvへ逝け
NGNGTXTTAB(0F676H,2)の値+2と+3のアドレスにそれぞれ&HFFを書けばいいらしいな。
つーか、これも受け売りだけど(w
あと>>20はDSKI$, DSKO$な。DSKI$じゃディスク壊せん。
0025デフォルトの名無しさん
NGNGMファンのタイトル音楽を久々に聴く。なつかし。
0027仕様書無しさん
NGNG今なら普通に if で書くけどな。
002827
NGNGホントは、こうね。
' ジキ イドウ
X=X+(STICK(0)=6)-(STICK(0)=2)+(X>39)-(X<0)
鬱だァァァァ。
0029デフォルトの名無しさん
NGNGそれも間違ってるぞ(w
X=X-(STICK(0)=7)*(X>0)+(STICK(0)=3)*(X<39)
が正解かと。
>+(X>39)-(X<0)
にしちゃうと、端まで行った時に1ドット跳ね返るからね。
あとスティック関数値も間違いw
0030デフォルトの名無しさん
NGNG配列使った方が読みやすいしスピードが少しはあがるんじゃない?
なんでみんなこの方法を使ったんだろ。
0031デフォルトの名無しさん
NGNG配列つかうと行数とメモリ使用量増えるから
0032デフォルトの名無しさん
NGNG0033デフォルトの名無しさん
NGNGなんとなくかっこいいからという理由もあったかも。
0034デフォルトの名無しさん
NGNG↓
LISTで表示
↓
表示された0行にカーソル移動
↓
RETURNキー押す
↓
もう一度LIST
↓
行番号直後の空白が1つ増える
↓
(゜д゜)バグー
00351
NGNG(所要時間40分)
10 SCREEN1,0,0:WIDTH32:KEYOFF:COLOR1,14,1
20 X=112:BX=112:BY=4:MX=2:MY=2:SC=0
40 FOR J=0 TO 23:PRINT"########## ##########";:NEXT J
60 SPRITE$(0)=""
70 SPRITE$(2)="タタ"
80 REM =========ball move=====
90 BX=BX+MX:BY=BY+MY
100 MX=MX*((BX=78)*2+1)*((BX=174)*2+1)
110 PUTSPRITE2,(BX,BY),1
120 REM =======key input========
130 T=STRIG(0)
140 X=X-(T=0)*(X>78)+(T=-1)*(X<166)
150 PUTSPRITE0,(X,160),1
160 REM =======judge=========
170 IF BY=158 AND BX>X-1 AND BX<X+9 THEN MY=-2:SC=SC+1
180 IF BY=170 THEN 220
190 IF BY=2 THEN MY=2
200 GOTO 90
210 REM ===========game over=======
220 PRINT"SCORE=";SC*10:FOR I=0 TO 500:NEXT
230 FOR I=0 TO 1:I=-STRIG(0):NEXT I:GOTO 10
Ruでのみ動作確認してます。
(まぁ、動作確認とるまでもないショボプログラムだがw)
ちなみに最後の までを含めたリストをメモ帳等にコピってSAVEした後、
そのTXTファイルをDISK-manegerでDSKイメージに突っ込んでsaveすれば、
いちいちプログラムを入力しなくてもOKなんで楽チンです。
0036デフォルトの名無しさん
NGNGこんな時間になにやっとるんだ(藁
オレモナー
00371
NGNGまたエミュ上でプログラムをアスキーセーブすれば(save"*****.bas",a)
Win上でプログラムの閲覧、編集等ができます。
手順は、そのプログラムを・・・
・DISK-MANEGERでEXTRACTを選択してデスクトップ等に出す。
・拡張子をTXTに変更
・メモ帳で開く
という手順です。
その際プログラム末尾に” ”が付きますが、
これはアスキーセーブを有効にする為に必要なので削除しないで下さい。
00381
NGNGぐは!ソレは突っ込まないで・・・(w
0039デフォルトの名無しさん
NGNGつー事は2chで簡単な自作プログラムの公開なんかもできるワケですな!
まぁ、漏れは公開するようなブツは持ち合わせてないんダガナ…(藁
皆さんの日の目を見なかった作品のうpをキボンしてよいですか?
0040デフォルトの名無しさん
NGNG###と###の間に12個のスペースが入ると解釈してよいんですね?
そうしないとワケワカラン画面になりましたぜ〜。
0041デフォルトの名無しさん
NGNGラリー10回すら続かない…
鬱駄氏脳
0042デフォルトの名無しさん
NGNG著作権関係の問題ってやっぱあるよなー。
0043デフォルトの名無しさん
NGNG0044デフォルトの名無しさん
NGNG時効。気にすんな。
0045デフォルトの名無しさん
NGNG■ このスレッドは過去ログ倉庫に格納されています