11/04/24 19:00:24.62 .net
だってアホやもん
751:デフォルトの名無しさん
11/04/24 19:20:25.66 .net
前スレから１ヶ月あいてるのに… もう一ヶ月放置しといたら独り相撲だったのに…
752:デフォルトの名無しさん
11/04/24 19:21:10.88 .net
×前スレ
○前レス
やっちまったーい。
753:デフォルトの名無しさん
11/06/23 00:29:54.64 .net
10 'LND712を仮定しGM管のパルス数(CPM)からシーベルト(uSv/h)へ単位変換
20 input "cpm";a
30 print a/108;"uSv/h"
10 '毎時の放射線量から一年間累積した時の実効線量を求める
20 input "uSv/h";a
30 print a*24*365;"uSv"
754:デフォルトの名無しさん
11/06/23 00:47:25.30 .net
ガイガーカウンタのパルスをジョイスティックポート等に入力し、パルスをカウントすればデジタル方式の。
ガイガーカウンタになる。一分間のパルス数を計数したものがCPM。
シーベルトへ単位変換する際には、ガイガーカウンタがγ線のみを検出している事を前提とする。
ガイガーカウンタに金属製のシールドがしてあれば、ほぼγ線を検出していると考えられる。
このガイガーカウンタの値に対して時間累積すると線量計となる。1uSv/hの場所に4時間居れば1*4=4uSv。
線量計は累積した放射線量。年間20mSvという表現は、この線量計の一年間累積した値を示している。
755:デフォルトの名無しさん
11/08/26 13:54:23.16 .net
復元
756:デフォルトの名無しさん
11/11/26 11:41:35.37 .net
また復元
757:デフォルトの名無しさん
11/11/29 11:09:43.44 .net
Xbox360/XNAで動くMSX-BASIC互換アプリってないの？
758:デフォルトの名無しさん
11/12/01 20:25:30.78 .net
裏レジスタは癖が強くて使えない
759:デフォルトの名無しさん
11/12/02 19:29:22.07 .net
裏レジスタは頭が弱くて使えない
760:デフォルトの名無しさん
11/12/02 20:01:07.80 .net
IRQ処理で頻繁に使う者だとおもってた
761:デフォルトの名無しさん
11/12/17 14:53:45.63 .net
>>1-1000
おまえら一盛り10円
URLﾘﾝｸ(www.kh.rim.or.jp)
762:デフォルトの名無しさん
11/12/19 13:42:33.16 .net
>>756
>>1-1000って自分自身も入れてどうする。
あとCOBOLとBASICは全くの別言語。どちらかというとBASICはFortranの系譜だ
MSX-DOS用に一応COBOLもあったけど、使っていた人はわずかでしょう。
ちなみに自分はX1のCP/M 80用のFortranをMSX-DOSに移植して使っていた
763:デフォルトの名無しさん
11/12/19 13:56:45.47 .net
おい、なんかマジっぽいレスしてる奴がいるぞ
764:デフォルトの名無しさん
11/12/19 14:18:03.31 .net
そこは「マジレスしてる奴がいるぞ」にしとけ
「マジっぽいレス」だと理解不足なのが丸バレで757が図に乗るぞ
真面目な奴ほどキれると暴れるから荒れるのはカンベン
765:デフォルトの名無しさん
11/12/19 14:48:29.85 .net
>>759
もしかしたら俺の理解できないボケかもしれないので、少し逃げた。
766:デフォルトの名無しさん
11/12/26 17:26:33.06 .net
少し逃げたね。
767:デフォルトの名無しさん
12/01/02 17:57:05.98 .net
うん、少し逃げたね
768:デフォルトの名無しさん
12/09/03 01:32:23.10 .net
>2012年 9月 2日(日) 13：00～
>MSX30周年が来年だと思ったら、ミナカンも今年15周年だった...
ふーん､よくやるね(呆…
769:デフォルトの名無しさん
12/10/09 14:29:01.18 .net
770:電脳プリオン 忍法帖【Lv=40,xxxPT】(1+0：5) 【32.1m】
13/01/27 19:00:43.97 ?PLT(12080).net
∧＿∧
（ ・∀・） 人 ｶﾞｯ
（ つ―-‐-‐-‐-‐-‐○ < >__Λ∩
人 Y ノ. Ｖ｀Д´）/
し（＿） / ←>>269
771:デフォルトの名無しさん
13/02/06 13:34:07.37 .net
序破急（じょは きゅう）
772:デフォルトの名無しさん
13/02/06 13:35:36.64 .net
奥義（おくぎ）
奥義（おうぎ）
773:デフォルトの名無しさん
13/02/24 07:48:22.15 .net
どんだけ過疎ってんだよ。お前らのＭＳＸに対する愛はそんなものか！
774:デフォルトの名無しさん
13/02/24 15:59:45.43 .net
愛ってなんだ
775:デフォルトの名無しさん
13/02/24 16:11:01.59 .net
振り向かないことさ
776:デフォルトの名無しさん
13/02/24 18
777::10:28.96 .net
778:デフォルトの名無しさん
13/02/24 23:10:39.51 .net
アキムカないことさ
779:デフォルトの名無しさん
13/03/02 13:35:36.02 .net
MSXFANの1画面プログラムは色々とマニアックなことが書いてあったな
STOPキー押すまで入力待ちとかあったような
780:デフォルトの名無しさん
13/05/25 02:05:38.26 .net
なつかしい。昔ログインにゲーム投稿してお金貰ったわ
781:デフォルトの名無しさん
13/09/27 09:13:12.19 .net
保守
782:デフォルトの名無しさん
13/10/21 19:41:55.44 .net
URLﾘﾝｸ(pbs.twimg.com)
783:デフォルトの名無しさん
13/10/22 12:49:05.01 .net
バカな！
しかし、パッケージは紛れもなく本物……ッ！！
784:デフォルトの名無しさん
13/10/22 17:25:20.94 .net
MSXちゃうやん
785:デフォルトの名無しさん
13/10/22 20:38:30.87 .net
その人何の技術もないからフェイクしかできないでしょ
786:デフォルトの名無しさん
13/10/23 12:32:15.62 .net
奥義伝承の儀とかやらんの？
787:デフォルトの名無しさん
13/10/23 15:20:38.16 .net
>>776
MSXじゃなくてPC6Kシリーズじゃねぇか!!!
788:デフォルトの名無しさん
13/10/24 08:23:50.03 .net
キーボードはパピコンだけど、こんなにカラフルで高精細な画面モード無いし
789:デフォルトの名無しさん
13/11/16 07:44:01.61 .net
画面だけエミュで映し出してるな
790:デフォルトの名無しさん
13/11/16 07:52:01.86 .net
>>461
配列の定義をサブルーチンの頭に挿れてるのはどうしてなの？
ベーマガではそういうプログラムの書き方は教えてないぞ
791:デフォルトの名無しさん
13/11/16 08:26:02.58 .net
元ベーマガスタッフｷﾀ━ヽ(ﾟ∀ﾟ)ﾉ━!!!!
792:デフォルトの名無しさん
13/12/05 21:10:30.52 .net
でもプログラム末尾にDATA文で並べるより
使ってる近辺に書いたほうが分かりやすいよね今考えれば
793:デフォルトの名無しさん
13/12/06 00:21:13.46 .net
エディタがまともならな
794:デフォルトの名無しさん
14/01/03 00:28:03.71 .net
データとプログラムは分離されてた方が訂正するのは楽かな。
どうせ構造や意味は開発資料としてメモしておくでしょ。
795:デフォルトの名無しさん
14/01/03 14:41:05.34 .net
配列の定義だから、DIMのことだろう
796:デフォルトの名無しさん
14/02/06 03:33:44.69 .net
あれだけいろいろ作ってたのに今見たらもうBASIC読めないな。
配列の確保ってその行の実行時だったけ？
797:デフォルトの名無しさん
14/02/06 08:37:37.66 .net
10個ぐらいだったら宣言しなくても使えたような気がする。忘れた。
そういうデフォルト設定や裏技を極限まで使いこなすのが「テクニック」だったよなあ。
今ではクソコードに分類されるけど。
798:デフォルトの名無しさん
14/02/06 12:11:32.90 .net
>>791
＞10個ぐらいだったら宣言しなくても使えたような気がする。
古いBASIC
799:デフォルトの名無しさん
14/02/06 13:29:46.17 .net
>>790
時間があまりにも過ぎてるからじゃね？
俺もマシン語・アセンブラでバリバリやってて
ハードウェアの隅から隅まで知っていたつもりだけど
今じゃ何も思い出せないなｗ
まあ資料見ればすぐに思い出せるだろうけど
さすがに全く触らなくなってから時間が経ち過ぎてる
800:デフォルトの名無しさん
14/02/06 13:41:28.12 .net
てきとーに配列に数値をぶち込むものを書いてみる。
10 DIM A(100)
20 CLS
30 FOR I=0 TO 100
40 A(I)=I
50 LOCATE 0,0:PRINT I
60 NEXT
10行がないと、I=10 の時点でエラーになるな。
801:デフォルトの名無しさん
14/02/07 05:57:15.58 .net
ワ、ワタシハタダシイ
802:デフォルトの名無しさん
14/02/13 22:37:49.35 .net
読める、読めるぞ～、インストラクション表を片手に
しかしコードの真意は書いた本人にしかわからない
数年後には書いた本人にもわからない古文書となる
803:デフォルトの名無しさん
14/02/16 12:25:00.81 .net
DarkBASIC Pro Freeで最新技術を誰よりも早く習得 - VC++プログラマーより情報が早い
- DarkBASIC Professional - FREE Download（英語版のみ）
[ URLﾘﾝｸ(www.thegamecreators.com) ]
[ URLﾘﾝｸ(www.thegamecreators.com) ]
U77 Public Release Candidate（最新バージョンアップデート）
[ URLﾘﾝｸ(forum.thegamecreators.com) ]
[ URLﾘﾝｸ(files.thegamecreators.com) ]
804:デフォルトの名無しさん
14/02/16 12:26:25.19 .net
今回紹介するのはDarkBASIC Professinalフリーバージョン。
商用利用をしないと言う条件ですべての機能が使える。
DarkBASIC本体をダウンロードしたら、メールアドレスを送信してアンロックキーをメール受信する。
次にメールアドレスとアンロックキーをアクティベーション（認証）すればDarkBASICが使えるようになる。
さらに、最新バージョンアップデートを適用すれば、実行速度が高速になる。
DarkBASICはVisualBasic以前の古いBASICの延長上の別系統の設計にある最新BASICで、記述
が簡単で本格的な構造化もサポートしている。
簡単なゲームから大規模プロジェクトまで作成可能だ。
また、外部モデリングフォーマットを通さずにプログラム中で3Dオブジェクトの定義も可能で、非常に自由度
の高いプログラミングができる。
英語版と言うことであるが、BASICと3Dの基礎知識があれば、誰でも使える。
805:デフォルトの名無しさん
14/03/12 07:21:04.94 9nRIvxt0.net
Mファン1990年9月号に掲載された1行プログラム（システム上の1行、の意）
「200年カレンダー」
（万年カレンダーから100年毎の閏年判定ルーチンを除いたもの、
1900年3月1日～2100年2月28日に対応）
＃SCREEN1:WIDTH29(以上)で実行すること
1 CLS:INPUT"年,月";Y,M:Y=(Y+4)MOD28:J=YMOD4:D=(Y\4)*5-(J>0)+J
:FORI=1TOM:D=(D+X)MOD7:READX:X=X+(I=2)*(J=0):NEXT:PRINT:PRINT
SPC(D*4);:FORI=1TOX+28:PRINTUSING" ## ";I;:A=D=6:A$=CHR$(A*-10)
+CHR$(A*-13):PRINTA$;A$;:D=(D+1)MOD7:NEXT:DATA3,,3,2,3,2,3,3,2,3,2,3
806:799
14/03/14 03:44:10.36 Dt0a1Iuk.net
799の「200年カレンダー」を
807:、Windows用の「99Basic」向けに作り直した （「移植」とは呼べない。文字化けを除けばMSXでも動く。論理式を追放した。） 100 CLS 110 INPUT "年(1900～2100),月 ";Y,M 120 IF Y<1900 OR Y>2100 OR M<1 OR M>12 THEN RUN 130 YY=Y:Y=(Y+4) MOD 28 140 J=Y MOD 4:D=INT(Y/4)*5+J 150 IF J>0 THEN D=D+1 160 IF YY=1900 THEN D=1 170 X=0 180 FOR I=1 TO 12 190 IF I<=M THEN D=(D+X) MOD 7 200 READ X 210 IF I=2 AND J=0 THEN X=1 220 IF (YY=1900 AND I=2) OR (YY=2100 AND I=2) THEN X=0 230 IF I=M THEN XX=X+28 240 NEXT 250 PRINT:PRINT 260 FOR I=1 TO 7 270 READ A$:PRINT " ";A$;" "; 280 NEXT 290 PRINT:PRINT:PRINT SPACE$(D*4); （続く）
808:799
14/03/14 03:58:27.59 Dt0a1Iuk.net
300 FOR I=1 TO XX
310 PRINT USING" ## ";I;:D=D+1
320 IF D=7 THEN D=0:PRINT:PRINT
330 NEXT
340 PRINT
350 IF D>0 THEN PRINT:PRINT
360 END
370 DATA 3,0,3,2,3,2,3,3,2,3,2,3
380 DATA "日","月","火","水","木","金","土"
主な修正点：1900年1・2月と2100年3月～12月も表示できるように。
・MSXで実行するときの注意点
110行のINPUT文・380行のDATA文にある「年」「月」「火」などの全角文字、
場合によっては270行の曜日前後にある空白を修正する必要がある。
・MSXの漢字BASICで実行するときの注意点
最低でも100行を「100 _CLS」に修正する必要がある。
インターレスモード～_KANJI2・_KANJI3でないと、上部が強制スクロールされる。
画面がちらつかない_KANJI・_KANJI1で実行するときは、改行の「PRINT」を削除する、
最後にINPUT$(1)やIF INKEY$="" THEN を加えるなどの工夫が必要。
809:799
14/03/14 04:13:09.54 Dt0a1Iuk.net
もう一つ。海外のBASICのことを考え、140行は Y\4 から INT(Y/4) に変更した。
整数除算の"\"は、海外（日本語環境以外・日本のMSX以外）では半角"＼"になる。
110行 INPUT"年(1900～2100),月" ;Y,M → INPUT"M,Y(1900-2100)";M,Y
270行 PRINT " ";A$;" "; → PRINT A$;" "; (曜日名を英3文字にするため)
380行 DATA "日","月","火","水","木","金","土"
→DATA "SUN","MON","TUE","WED","THU","FRI","SAT"
それ以外の変更はなし……で動く海外のBASICはあるだろうか？
810:799
14/03/15 03:32:57.56 GTtrbY0y.net
訂正。MSXと99Basicは問題ないが、
N88互換のBASICの一つ「MBASIC86」でエラーが出た。
99Basicは作者が元MSXユーザーなので、MSXとの互換性をある程度重視している。
けど、N88BASIC系統は空白の省略は許されない。
PRINT命令やPRINT USING命令などの次には、空白が必要。
310 PRINT USING " ## ";I;:D=D+1
↑310行を訂正してほしい。申し訳ない。
「MBASIC86」は、これで動作した。
811:デフォルトの名無しさん
14/03/15 12:51:19.31 8TvWREf7.net
なにこの独り相撲
812:デフォルトの名無しさん
14/03/15 13:37:16.17 E7qCmrfx.net
IDありになって良かったな
813:799
14/03/15 22:22:48.57 GTtrbY0y.net
わざわざ過疎スレまで煽りに来たのか。
……昔のMファンをヤフオクで落札したので、自作品をここに書いただけ。
他人様の作品を無断転載はしないよ。
落札前に再び同じプログラムを作ろうとしたが、肝心の自分がアルゴリズムを忘れた。
私のカレンダーでは使っていないけど（28年分のカレンダーを使いまわしているだけ～例：1986年＝2014年＝2042年）
カレンダーのプログラムを作るなら、「ツェラーの公式」
URLﾘﾝｸ(ja.wikipedia.org)
を参考にするといいと思う。
……と書いたら、また煽られるだろうな。
昔～ひろゆき氏が熱心に活動していた頃～の2chは、
この程度で煽られることは少ない気はしたが。
ひろゆき氏が「PCが安価になったので、一部を除いては、2chは馬鹿ばかりになった」
と嘆いたのもわかる気が。
814:799
14/03/15 22:31:04.32 GTtrbY0y.net
ID制…といっても、末尾が「0」「O」「i」「P」ではないので、
ID云々で煽る板ではない気がする（少数だが、現時点でもIDがない板がある）。
内容はどうであれ、末尾が「P」はボロクソに罵倒される。
「P」はp2。p2はものすごく嫌われている。悪質な荒らしが多いのかも。
（そのせいで、荒らし以外が罵倒の被害に遭っている）
アク禁になったら、別の携帯電話や避難所のスレに代理書き込み依頼が多数のはず。
あと、書き込みが1日1回限定だとIDの意味をなさないと思う。
815:デフォルトの名無しさん
14/03/16 14:24:59.42 SqWBi3v6.net
なんかよくわからんけど、どうせなら、この世の全ての BASIC で動くコード
とかだと面白いんだけどな
816:デフォルトの名無しさん
14/03/16 14:50:41.80 4mUPyn+t.net
独り相撲してナンボのスレだけどな
まあ、番号コテの人にはスレタイくらい読んでおいてほしかったとは思うな
817:デフォルトの名無しさん
14/03/16 15:08:12.80 gkqHMcUQ.net
BASICでは、ダークと９９はNGに入ってるわ、俺。
818:799
14/03/16 16:50:59.39 P7mFBOx5.net
Wikiや他サイトを参考にし、カレンダーの曜日を求める式を作ったところ…
変数 H：曜日(0～6、0＝日・1＝月…6＝土)、Y：年（2014など） M：月（3など） D:日（今回は1のみ）
H=(365*Y+INT(Y/4)-INT(Y/100)+INT(Y/400)+INT((306*(M+1))/10)+D-428) MOD 7
N88互換系では実行できたけど……MSXでは"Overflow in xxx"エラー。
MSXのMOD演算子や整数除算"\(海外版は＼)"は、
2バイトの整数型（-32768～32767）の範囲に限られる。
365×西暦4桁がある時点でアウト。
……ので、MODの被除数を32767以下にしてみるか。7の倍数で最も32767に近い値を減算するとどうだろう。
MSXで動かないプログラムを作っても……と思うし。
行番号は追放する方針。>>800->>801のプログラムも、最初はDATA命令の行番号を指示する
"RESTORE 380"があったが、180～240行を無駄ループにして回避。
819:799（MSXで動作可）
14/03/16 17:47:43.30 P7mFBOx5.net
100 CLS
110 INPUT "Y,M ";Y,M:MM=M:D=1:U=Y MOD 4
120 IF U=0 THEN UU=1
130 IF U=0 AND (Y MOD 100)=0 AND (Y MOD 400)>0 THEN UU=0
140 IF M=1 OR M=2 THEN M=M+12:Y=Y-1
150 IF Y<0 OR Y>9999 OR MM<1 OR MM>12 THEN RUN
160 H1=(365*Y+INT(Y/4)-INT(Y/100)+INT(Y/400)+INT((306*(M+1))/10)+D-428)
170 HH=INT(H1/32767):H=(H1-32767*HH) MOD 7
180 FOR I=1 TO 12
190 READ X
200 IF MM=I THEN D=X+28
210 IF MM=2 AND UU=1 THEN D=29
220 NEXT
230 PRINT:PRINT
240 FOR I=1 TO 7
250 READ A$:PRINT A$;" ";
260 NEXT
270 PRINT:PRINT:PRINT SPACE$(H*4);
280 FOR I=1 TO D
290 PRINT USING " ## ";I;:H=H+1
300 IF H=7 THEN H=0:PRINT:PRINT
310 NEXT
320 PRINT
330 IF H>0 THEN PRINT:PRINT
340 END
350 DATA 3,0,3,2,3,2,3,3,2,3,2,3
360 DATA "SUN","MON","TUE","WED","THU","FRI","SAT"
820:デフォルトの名無しさん
14/03/16 21:18:49.40 lTEgNzO7.net
>>807
俺P2からの書き込みだけどPにならんよ
821:799
14/03/17 00:30:21.19 wkMqB80o.net
>>813
この板ではならない。
末尾に"7"などの数字・"Q"などその他の英字がある時点で
「ここはp2・ガラケー・iPhone・PCなどその他 の判別がない」とわかるはず？
末尾が"P"になってもp2とは無関係。"0" "O" "i"も同様。
このような板だと、プロバイダがアク禁のときにp2から書き込んでもバレないけど。
>>809
＞スレタイくらい読んでおいてほしかったとは思うな
MSXでMファンに採用された1行プログラムを作ったとき、「これはMSXの仕様に依存している」
と意識した。SPC関数はMSX独自。論理式の"A=D=6"は、正しくは"A=(D=6)"
（D=6のときAが-1に・その他はAが0に、の意）と書くべきだが、エラー覚悟で書いたところ実行できた。
99BasicやMBASIC86でも動く…を目指すと、どうしても脱MSXになる傾向が。
>>812のプログラムの160行・170行はMSX対策。
MODや整数除算"\"は、MSXは32767以下限定。「MSX対策」と書かないとなぜ？と聞かれると思う。
822:デフォルトの名無しさん
14/03/17 00:41:51.33 cdm9pD2a.net
「これはMSXの仕様に依存している」…まさしくそれがスレタイの意味するところじゃねかしら？
ほかのBASICで動くなら、MSX-BASICの奥義でもなんでもないし
823:799
14/03/17 04:47:53.34 wkMqB80o.net
>>812のカレンダーだけど、MSXでもエラーが出ない式があったので訂正。
160 '
170 H=(Y+INT(Y/4)-INT(Y/100)+INT(Y/400)+INT((13*M+8)/5)+D) MOD 7
（160行は削除してもよい。GOTO xxなどがないので、RENUMコマンドも問題ない。）
被除数は常に32767未満なので、MOD演算子でOverflowが出ることはない。
曜日は 0＝日・1＝月…6＝土 なので使いやすい。
調べたところ、0＝土・1＝日…6＝金 と返す式もあるから。
あとは…漢字BASICの_KANJI版を作ったら、カレンダーは終わりにするか。
_KANJI2・_KANJI3を除く漢字BASICは、いかに改行を減らすか…
改行の問題さえ解決すれば、数字が大きいので見やすいはず。
そのうち～バスの電磁大光ブザーを真似た PLAY"S8M90O6G" とSOUND命令版も紹介するか。
これは自分で考えたもの。 PLAY"S8M90O7G" だと、通常のアナログブザーに。
…当時のMSXのクイズプログラムは、不正解の音は PLAY"O1C" などワンパターンだった。
ちなみにエミュレータのfMSXとRuMSXは、これらの音は再現できない＝PSG再現に難がある。
824:799（漢字BASIC版、改行は最小限に）
14/03/17 05:17:53.14 wkMqB80o.net
100 _KANJI:WIDTH 29:_CLS
110 INPUT "Y,M ";Y,M:MM=M:D=1:U=Y MOD 4:UU=0
120 IF U=0 THEN UU=1
130 IF U=0 AND (Y MOD 100)=0 AND (Y MOD 400)>0 THEN UU=0
140 IF M=1 OR M=2 THEN M=M+12:Y=Y-1
150 IF Y<0 OR Y>9999 OR MM<1 OR MM>12 THEN RUN
160 H=(Y+INT(Y/4)-INT(Y/100)+INT(Y/400)+INT((13*M+8)/5)+D) MOD 7
170 D=31:M=MM
180 IF M=4 OR M=6 OR M=9 OR M=11 THEN D=30
190 IF M=2 THEN D=28+UU
200 PRINT:PRINT "SUN MON TUE WED THU FRI SAT"
210 PRINT SPACE$(H*4);
220 FOR I=1 TO D
230 PRINT USING " ## ";I;:H=H+1
240 IF H=7 THEN H=0:PRINT
250 NEXT
260 PRINT
270 IF H>0 THEN PRINT
280 END
825:デフォルトの名無しさん
14/06/04 15:34:40.19 ZiHf6GEW.net
揚げろや屑やろう！
826:デフォルトの名無しさん
14/06/04 15:40:59.44 3TCFL1gZ.net
断る
827:デフォルトの名無しさん
14/07/09 09:59:00.63 jeW2TfnT.net
保守
828:デフォルトの名無しさん
14/07/12 17:02:47.46 dhVKd2av.net
奥義はよ
829:デフォルトの名無しさん
14/07/14 22:42:26.64 4A74nF8C.net
奥義マダー？
830:デフォルトの名無しさん
14/07/15 06:39:57.66 mWyocOMn.net
奥義・光子力まるはだか！
831:デフォルトの名無しさん
14/07/15 11:46:12.23 6lvRYATA.net
ジャパニウム、だっけ？
832:デフォルトの名無しさん
14/07/15 19:41:46.28 uDYfEjIO.net
そのジャパニウムの力で、
小学４年生の江久保葉子ちゃんをまるはだかにむくのじゃあ！
833:デフォルトの名無しさん
14/07/25 13:12:32.97 RkXLEhxK.net
>>825
通報しますた
834:デフォルトの名無しさん
14/07/28 11:47:27.95 XCE2nVfS.net
★2ch勢いランキングサイトリスト★
◎ +ニュース
・ 2NN
・ 2chTimes
◎ +ニュース新着
・ 2NN新着
・ Headline BBY
◎ +ニュース他
・ Desktop2ch
・ 記者別一覧
◎ 全板
・ 全板縦断勢いランキング
・ スレッドランキング総合ランキング
◎ 実況込み
・ 2勢
・ READ2CH
・ i-ikioi
※ 要サイト名検索
835:デフォルトの名無しさん
14/09/09 20:53:47.73 xGs4sfhV.net
2001年の生き残りはこのスレだけ
最長老ごきげんよろし
836:デフォルトの名無しさん
14/09/26 15:40:44.73 cDF8qWEh.net
多色刷りって、BIOS使わずVDP直接操作だけでやるとしたら
どうやるんだろうか…(市販ゲームとか)
BIOSのINIT32(006FH)とかSETGRP(007EH)とかを解析したら良いんだろうけど、
めんどいなｗ
スクリーンモードってVDPのR#0と#1だけで決めていると思ってるんだけど、
それ以外に何かいじらないと多色刷りモードにはならないってことか
837:デフォルトの名無しさん
14/09/28 10:53:47.04 nD5Yu8m1.net
多色刷りってのは BASIC で手軽に Graphic 2 の性能を引き出す手法の俗称だろ。
市販ゲームなんかは、それこそすべての操作を VDP に直接アクセスしてやってるから、
多色刷り云々の話ではないよ。
838:デフォルトの名無しさん
14/09/28 11:28:05.44 /z7vQ2zP.net
一号機
URLﾘﾝｸ(i.imgur.com)
三号機
URLﾘﾝｸ(i.imgur.com)
839:デフォルトの名無しさん
14/09/28 14:43:20.51 DVWno/3n.net
>>134
お願いします
840:デフォルトの名無しさん
14/09/28 15:22:11.12 8Hq1x0kC.net
反応するのに12年もかかるのかよ
841:デフォルトの名無しさん
14/09/28 15:28:43.79 J5abx0zT.net
12年後が楽しみだ
842:830
14/09/29 00:58:02.60 EDDV56hZ.net
>>830
それは知ってるんだが、
なぜVDPがscreen2であるにも関わらず、
VDPに対してprint文などでキャラクタコードで書けるのかが不思議だったんだよ
screen2はパターンジェネレータテーブルとカラーテーブルだけが有効で、
パターンネームテーブルは無効だと思ってたから。
…と思いながら、screen2をテクハン片手にvpokeでいじってたら、
screen2でもパターンネームテーブルは生きてるんだな。
今ごろになって気が付いたｗこれでスッとしたわ…自己解決。
screen2のパターンネームテーブルは&h1800から値が順に01,02,03,…とデフォでは入っていて、
これによってパターンジェネレータテーブルの定義内容が順に表示されるようになっているみたいだな。
(これでグラフィック画面らしい挙動ができるわけだ)
で、多色刷りだと、screen2でもscreen1同様このテーブルをprint文などで書き換えると。
(今までscreen2のパターンネームテーブルは無効だと思い込んでいたから、この1点が謎だった)
じゃあ多色刷りって、VDP側はただのscreen2だな。
別にどうってことない話じゃないかｗ(←オイ
843:デフォルトの名無しさん
14/10/01 09:01:42.86 1BRcjDE3.net
screen2はぶっちゃけ画面全部を違うパターンの文字にしたものだからね
多食刷りのミソは、本来テキストを扱うscreen1用のbasicコマンドが
（内部が）screen2でもそのまま使えたことだろうな
844:デフォルトの名無しさん
14/10/08 10:54:52.16 2a6Sl7jH.net
なつかしいFANダムに４本載ったワシ
845:デフォルトの名無しさん
14/10/09 13:56:29.65 MpVmhvXd.net
何の作品か言うてみい。打ち込んでやるわボケ。
846:デフォルトの名無しさん
14/10/23 03:08:20.65 khbr0nbg.net
MSX1で縦スクロールする。スペースで終了
100 SCREEN2:COLOR15,4,4:CLEAR1000:KEYOFF:SCREEN1:DEFINTA-Z:ONSTRIGGOSUB200:STRIG(0)ON
110 P$=" MSX SCROLL "
120 PM=LEN(P$)*8:DIMP$(PM):C!=PEEK(4)+PEEK(5)*256:FORA=0TOLEN(P$)-1:I=ASC(MID$(P$,A+1,1)):FORB=0TO7:P$(A*8+7-B)=RIGHT$("00000000"+BIN$(PEEK(I*8+B+C!)),8):NEXTB,A
130 FORA=0TOPM-2:I!=VARPTR(P$(A)):I1!=PEEK(I!+1)+PEEK(I!+2)*256:I!=VARPTR(P$(A+1)):I2!=PEEK(I!+1)+PEEK(I!+2)*256:FORB=0TO7:POKEI1!+B,PEEK(I1!+B)-(PEEK(I1!+B)=49)-(PEEK(I2!+B)=49):NEXTB,A
140 FORA=0TO15:VPOKE384+A,0:VPOKE400+A,255:VPOKE2432+A,0:VPOKE2448+A,255:NEXT:FORA=5120TO5887:VPOKEA,0:NEXT
150 ONINTERVAL=4GOSUB300:INTERVALON
160 GOTO160
200 STRIG(0)OFF:INTERVALOFF:SCREEN0:FORA=-1TO0:A=INKEY$<>"":NEXT:END
300 INTERVALOFF:B=PCAND7:ONBGOTO330,330,330,320,330,330,330
310 GOSUB350:D=1-D:GOSUB360:GOTO340
320 GOSUB350
330 A=391+B+2048*(1-D):VPOKEA,255:VPOKEA+8,0:VPOKEA+16,255
340 A=384+B+2048*D:VPOKEA,0:VPOKEA+8,0:VPOKEA+16,255:VPOKEA+24,255:PC=(PC+1)MOD(PM*8):INTERVALON:RETURN
350 PRINTCHR$(27);"Y! ";CHR$(27);"L";P$(PC/8):RETURN
360 VDP(1)=VDP(1)AND191:VDP(2)=6-D:VDP(4)=1-D:VDP(1)=VDP(1)OR64:POKE&HF923,20+D*4:RETURN
847:デフォルトの名無しさん
14/10/23 06:59:36.83 QsQhyUlJ.net
テープに録音するときってどんな音に聞こえた？
ピー
ガラガラガラ
ピロピロピロ
848:デフォルトの名無しさん
14/10/23 09:03:15.77 sksS7kTY.net
ピー－ｶﾞｯ！ ←最初に必ずこの工程があるでしょ
ピーーガゴギゴギゴ…
849:デフォルトの名無しさん
14/10/23 09:29:44.09 GVukQ4G4.net
緊急地震速報の音が当時のやつに一番近いかな
850:デフォルトの名無しさん
14/10/23 09:31:17.65 GVukQ4G4.net
ああ間違えた
大津波警報の方です
すみません
851:デフォルトの名無しさん
14/10/23 09:33:03.26 GVukQ4G4.net
あれ？
ぐぐって聴いてみたら最近JALERTのは違うんだね
852:デフォルトの名無しさん
14/10/23 09:39:04.77 xi8wnWKn.net
>>840
つURLﾘﾝｸ(www.vector.co.jp)
853:デフォルトの名無しさん
14/10/23 09:40:34.27 GVukQ4G4.net
>>845
へーこんなのあるんだ
ありがとう
ほんとにセーブ出来てるなら
ロードも試してみたくなるな
854:デフォルトの名無しさん
14/10/23 10:53:09.83 GVukQ4G4.net
作者のページも逝ってみたけど
ロードエミュレータは無いんだね
ぐぐってたらこんなページはあった
URLﾘﾝｸ(psyzans.com)
855:デフォルトの名無しさん
14/10/23 11:28:00.27 ISc0F2Qf.net
>>842-844
どんだけ古いおっさんやねん
URLﾘﾝｸ(radio1ban.com)
856:デフォルトの名無しさん
14/11/15 10:36:19.60 gWegtIR0.net
REM文を利用するプログラムを作ってみた。
内容は>>35。
1 'ｯﾂ`ﾒﾋﾟｮﾏｬﾍﾏﾓｯ｣ｪﾏﾟｬﾕｿ`｣ﾘ｡ﾓｶﾄ`ｨｾ｣ﾓｿﾎｻﾜｽﾔｼｮ`ｼﾕｧ`ｬﾗｬ`｢ｧﾉﾜﾓｸ｡ｨﾓｸｮｨﾓｸ｡ﾓｶｨ`ｨｰ`ｸ`ｰﾈ`ｯﾂｯｭｵﾀ`ｦ･ﾒ､ｶｦｬｷﾅ`ｱｰ`ｯﾂｯｭｵﾀ｣ﾁ`ｲ``｢ｼ､ｰﾛﾀ､ｪ`｣ﾘﾃﾓｵｸ`ｨｰﾓｱ､ｰ`ﾘ`ｱ``ﾓｵﾐ`ｨｲ｣ｱ､ｲｳｱｿﾏﾘ｣ｬ`ｬﾞ
2 '`ﾁｨｺﾁﾇｼﾃ､ﾑﾊｦｽﾝｹｯﾟﾅﾜﾘ｡｡ﾋﾍｱ｡ｪﾏﾓｽﾀ`ﾁﾓﾓﾍｱ｢､ｽﾔｸｻﾞｳﾃﾀ･ﾟﾊｸﾐ`ｷｼﾁｧｭ､ｱ`｡ﾌ｡｢`｣ｭｷ``ﾁｨｭ･ﾞﾟﾊﾈﾐｫﾏﾚｾｨ｡ﾘﾃｿﾂ､ｽﾔｹｸﾜﾟﾀﾈﾐ､ﾓﾛﾞｬﾂｳｱｨｳｫｱｿﾌｸ｡ｩﾗｼﾋｿﾌﾘ`ｩﾗｼｦｪ､ﾀｦ`｡｣ﾞｰｱ｣ﾘｦｨﾇｭｵﾀ､ｦ｢ﾒ､ﾆﾔｷﾘﾃ
3 'ﾓｺｨ`､ｯﾆﾏ｣ﾀｨｦ`ﾎﾕﾏﾍﾒﾀ･ﾝﾃ｣ｭﾈﾀ`ｰﾝｮﾕﾏｨﾐﾔﾀﾛ｣ﾘﾐﾓｺｨ`ﾒｿﾟﾟﾟﾟﾜ`````ﾐｬ````````｢ﾀｼ``｡｡ｧ`｡`ｰｨ｢ｦﾕﾄﾗｨ`ﾉｳｰﾔﾝｲｱｳﾔ`````
10 CLEAR 300,&HD000:DEFINTA-Z:A=&HD800:DEFUSR=A
20 A$="2148FC5E2356EB1100D0010500092323237EB7283DD620E63F878747237ED620E6300F0F0F0F8012137ED620E60F8787878747237ED620E63C0F0F8012137ED620E6030F0F47237E23D620E63F80121318BF010500097EFE3A28B3C300D0C9"
30 FORI=1TOLEN(A$)STEP2:POKEA,VAL("&H"+MID$(A$,I,2)):A=A+1:NEXT:A=USR(0)
blueMSXで動作確認。
blueMSXにはディレクトリをMSXディスクとして読み込む機能があるので、コピペしてファイルに書き込んだ後、[ファイル]-[ディスクドライブA]-[ディレクトリ挿入]でディレクトリを指定してやると、ディスクイメージを作らなくてもファイルが読める。
857:デフォルトの名無しさん
14/11/15 10:44:03.15 gWegtIR0.net
補足
コピペの際、各行の終わりにスペースがつく場合は、スペースを消して実行してくれ
858:デフォルトの名無しさん
14/11/18 00:02:20.73 zu7jtgft.net
REM文に書かれた文字そのものがプログラムだっていうのは結構やってたな
プログラムすべてを文字化するのは面倒だから、文字だけでデコーダを書いて、
文字にエンコードされたメインプログラムを展開して実行みたいなことが多かった
小さなちょっとしたことなら文字だけでプログラムを書くのも普通にやってたね
そもそも上記のデコーダがそうだし
で、REM文の内容の書かれたアドレスを直接指定してマシン語として実行するわけだけど
GRAPH文字には結構お世話になった気がする
ご存知だろうがGRAPH文字は01hを頭とする2バイト文字なのだ
01hを表現したいときに、たとえば >円 と書くと
文字コードが 3e 01 49 となって
LD A,01h → LD C,C になる、みたいな
文字コードとか覚えてなくてググりながら書いてみたんで間違いがあったりするかもだけど、
とにかく、GRAPH文字の01hっていうのはREMに直接マシン語を書くとき便利だったなあ
というお話
859:デフォルトの名無しさん
15/10/13 21:35:13.92 tF56vlyv.net
昔、Panasonic FS-A１FX(MSX2+)持ってたんだけど
POKE文でどこかのアドレスに所定の値を設定すると
CPUのクロック数が上がるって技があったと思うんだけど
・・・いや、今更調べたいというわけでもないんだけど、ちょっと脳裏に浮かんだので書いてみた
860:デフォルトの名無しさん
15/10/14 15:47:26.04 NrBXnG0t.net
昔、ASCII社製の木の板にMSX基板をはっつけた開発機材もらったんだけど、これってオクで売れるかな
仕様はMSX1とMSX2と両方もってる
仕入れ元はガーボロジーなのでアレなのだが
861:デフォルトの名無しさん
15/10/14 16:02:06.05 PR+BbI9O.net
もれは買わんな
862:デフォルトの名無しさん
15/10/16 06:55:09.09 ubnomhpt.net
ちなみにいくらで売りたい？
ぼったくり価格でないなら買うかもよ
863:デフォルトの名無しさん
15/10/16 11:43:35.94 ZWbPxBYc.net
ｲﾗﾈ
864:デフォルトの名無しさん
15/10/16 22:21:53.33 08ph5kmV.net
欲しいとは思うけど、買ってもどうせ押し入れの中で腐らすだろうな
865:デフォルトの名無しさん
16/01/23 16:18:18.90 SBqTJcjF.net
保守
866:デフォルトの名無しさん
16/01/23 19:22:11.95 l5TKWQpo.net
>>853
珍品奇品のように騙せば売れる
がんばれ
867:デフォルトの名無しさん
16/01/29 13:22:13.24 sHuG6nTkW
DOS TOOLS/DOS2 TOOLSのM80やL80。
BASICのBSAVEファイルやROMカートリッジなど
「MSX-DOS以外のファイルのアセンブルができない」者を罵倒している輩がいた。鈴なんとかだったと思う。
「BASICしかできない馬鹿は、ソース→バイナリに直接アセンブルするものを使え！（例：永久保存版1の付録・ZASM）」
ということか。
……M80で（ファイル名本体）.REL を作ってから
L80 /P:(アドレス～D000など),(ファイル名本体),(ファイル名本体)/N/X/E
でインテルHEXファイルを作り、BSAVE.COMでBSAVE形式バイナリに変換する。
L80の/Eオプションに/E:(ソースのラベル名)を指定すると、BSAVEの実行アドレスを変えられるらしい。もちろん、ソースでラベル名を使う必要はあるが。
…もっとも、BSAVEの実行アドレスは、バイナリエディタで簡単に変更できるが。ROMカートリッジ用などはBSAVEのヘッダ7バイトを削除する。
868:デフォルトの名無しさん
16/02/01 05:57:38.30 XkHCvxET/
１．DEF FNで2バイト数値の換算
………8000h～FFFFhはBASICではマイナス、8000hを32768・FFFFhを65535などはエラーになる場合が多い
２．MSXでバイナリファイルにアクセス
………BSAVE形式のヘッダチェック・ヘッダ書き換え（開始・終了・実行）
100 SCREEN 0:KEY OFF:DEFINT A-Z:DIM B(7)
110 IF PEEK(&H2D) THEN WIDTH 80 ELSE WIDTH 40
120 DEF FNHL(H,L)=(H+(H>127)*256)*256+L
130 DEF FNH(HL)=(HL-(HL<0))\256-(HL<0)*255
140 DEF FNL(HL)=(HL-(HL<0))MOD256-(HL<0)*255
150 DEF FNDF!(A,B)=A-(A<0)*65536!-B+(B<0)*65536!
160 DEF FNHX$(A)=RIGHT$("000"+HEX$(A),4)
170 PRINT "1:BSAVE ﾍｯﾀﾞﾁｪｯｸ"
180 PRINT "2:BSAVE ﾍｯﾀﾞｶｷｶｴ"
190 PRINT "3:ｼｭｳﾘｮｳ":PRINT:PRINT "ﾄﾞﾚﾆ ｼﾏｽｶ? ";
200 A$=INPUT$(1):IF A$<"1" OR A$>"3" THEN 200 ELSE PRINT A$:PRINT:PRINT
210 IF A$="3" THEN 520
220 ON ERROR GOTO 300
230 FILES:PRINT:PRINT:PRINT
240 INPUT "BSAVE ﾌｧｲﾙ";FL$:IF FL$="" THEN 510 ELSE PRINT:PRINT
250 OPEN FL$ FOR INPUT AS #1:CLOSE #1
260 OPEN FL$ AS #1 LEN=1:SZ!=LOF(1)
270 FIELD #1,1 AS B$
280 IF SZ!<8 THEN PRINT "BSAVE ﾌｧｲﾙﾊ 8ﾊﾞｲﾄｲｼﾞｮｳ ｱﾘﾏｽ":GOTO 510
290 FOR I=1 TO 7:GET #1,I:B(I)=ASC(B$):NEXT:GOTO 320
300 IF ERL=230 THEN PRINT "ﾃﾞｨｽｸﾆ ﾌｧｲﾙｶﾞ ｱﾘﾏｾﾝ":RESUME 510
869:続き
16/02/01 05:58:34.71 XkHCvxET/
310 IF ERL=250 THEN PRINT "ﾆｭｳﾘｮｸｼﾀ ﾌｧｲﾙｶﾞ ｱﾘﾏｾﾝ":RESUME 510
320 ON ERROR GOTO 0
330 IF B(1)<>&HFE THEN PRINT "BSAVE ﾌｧｲﾙﾃﾞﾊ ｱﾘﾏｾﾝ":GOTO 510
340 S=FNHL(B(3),B(2)):E=FNHL(B(5),B(4)):X=FNHL(B(7),B(6))
350 PRINT " ｶｲｼ ｱﾄﾞﾚｽ:";FNHX$(S)
360 PRINT " ｼｭｳﾘｮｳ ｱﾄﾞﾚｽ:";FNHX$(E)
370 PRINT " ｼﾞｯｺｳ ｱﾄﾞﾚｽ:";FNHX$(X):PRINT
380 PRINT "ﾌｧｲﾙｻｲｽﾞ:";FNHX$(SZ!);" (";STR$(SZ!);"bytes)"
390 PRINT:IF SZ!=FNDF!(E,S)+1+7 THEN PRINT "ｾｲｼﾞｮｳ ﾃﾞｽ":GOTO 410
400 PRINT "ﾌｧｲﾙｻｲｽﾞｶﾞ ﾍｯﾀﾞﾄ ｲｯﾁ ｼﾏｾﾝ"
410 IF A$="1" THEN CLOSE #1:GOTO 510
420 PRINT:PRINT:PRINT "BSAVE ﾍｯﾀﾞｦ ｶｷｶｴﾏｽ":PRINT:PRINT
430 S$=FNHX$(S):E$=FNHX$(E):X$=""
440 INPUT " ｶｲｼ ｱﾄﾞﾚｽ(16ｼﾝｽｳ 1-4ｹﾀ)";S$:IF LEN(S$)>4 THEN 440
450 INPUT "ｼｭｳﾘｮｳ ｱﾄﾞﾚｽ(16ｼﾝｽｳ 1-4ｹﾀ)";E$:IF LEN(E$)>4 THEN 450
460 INPUT " ｼﾞｯｺｳ ｱﾄﾞﾚｽ(16ｼﾝｽｳ 1-4ｹﾀ)";X$:IF LEN(X$)>4 THEN 460
470 S=VAL("&H"+S$):E=VAL("&H"+E$):IF X$="" THEN X=S ELSE X=VAL("&H"+X$)
480 B(3)=FNH(S):B(2)=FNL(S):B(5)=FNH(E):B(4)=FNL(E):B(7)=FNH(X):B(6)=FNL(X)
490 FOR I=2 TO 7:LSET B$=CHR$(B(I)):PUT #1,I:NEXT:CLOSE #1
500 PRINT:PRINT:PRINT "BSAVE ﾍｯﾀﾞｦ ｶｷｶｴﾏｼﾀ"
510 PRINT:PRINT:PRINT "Hit any key ";:A$=INPUT$(1):CLS:GOTO 170
520 END
870:デフォルトの名無しさん
16/02/12 08:28:52.97 qz3mrubwg
1984年のリファレンスマニュアル（東芝・ヤマハ・キヤノンなど）のサンプルプログラムを機械語にした。
SLの音などSOUND命令のサンプル。
機械語の場合、SOUND 7,nの値は「必ず &B10xxxxxx」でないといけない。
100 CLEAR 200,&HD000:DEFINT A-Z:AD=&HD000
110 FOR I=0 TO 447
120 READ A$:A=VAL("&H"+A$):POKE AD+I,A
130 NEXT I
140 DEFUSR=AD:A=USR(0)
150 END
160 DATA 3E,0C,CD,A2,00,CD,3E,D0,21,80,D0,7E,FE,FF,28,1A
170 DATA CD,33,D0,01,11,00,09,4E,23,06,0E,AF,5E,CD,93,00
180 DATA 3C,23,10,F8,CD,3E,D0,79,18,E2,3E,0C,CD,A2,00,CD
190 DATA 90,00,C9,E5,D1,CD,4D,D0,06,02,CD,57,D0,C9,11,70
200 DATA D0,CD,4D,D0,CD,9F,00,06,03,CD,57,D0,C9,1A,FE,00
210 DATA C8,CD,A2,00,13,18,F6,3E,0D,CD,A2,00,3E,0A,CD,A2
220 DATA 00,10,F4,C9,00,00,00,00,00,00,00,00,00,00,00,00
230 DATA 48,69,74,20,61,6E,79,20,6B,65,79,20,00,00,00,00
871:デフォルトの名無しさん
16/02/12 08:36:13.24 qz3mrubwg
続き。240行以降はデータ。240-250行のように32バイトで一組。
240 DATA 53,54,41,52,54,21,21,00,00,00,00,00,00,00,00,00
250 DATA 00,00,00,00,00,00,00,00,01,87,10,10,10,64,64,00
260 DATA 57,48,49,53,54,4C,45,00,00,00,00,00,00,00,00,00
270 DATA 00,00,54,00,34,00,97,00,00,B8,0E,0E,0E,C8,0A,0B
280 DATA 4C,4F,43,4F,4D,4F,54,49,56,45,31,00,00,00,00,00
290 DATA 00,00,00,00,00,00,FF,0F,10,83,10,07,10,5A,14,08
300 DATA 4C,4F,43,4F,4D,4F,54,49,56,45,32,00,00,00,00,00
310 DATA 00,00,00,00,00,00,FF,0F,0C,83,10,07,10,5A,08,08
320 DATA 4C,4F,43,4F,4D,4F,54,49,56,45,33,00,00,00,00,00
330 DATA 00,00,00,00,00,00,FF,0F,08,83,10,17,10,5A,04,08
340 DATA 43,52,4F,53,53,49,4E,47,00,00,00,00,00,00,00,00
350 DATA 00,00,64,00,6E,00,B4,00,00,B8,10,10,10,5A,08,08
360 DATA 48,45,4C,49,43,4F,50,54,45,52,31,00,00,00,00,00
370 DATA 00,00,00,00,00,00,18,00,16,83,02,02,10,5A,02,0C
380 DATA 48,45,4C,49,43,4F,50,54,45,52,32,00,00,00,00,00
390 DATA 00,00,00,00,64,03,18,00,10,81,00,10,10,5A,02,0C
400 DATA 42,4F,4D,42,21,21,00,00,00,00,00,00,00,00,00,00
410 DATA 00,00,00,00,00,00,00,00,15,B7,10,00,00,64,3C,00
420 DATA 42,55,5A,5A,45,52,00,00,00,00,00,00,00,00,00,00
430 DATA 00,FF,47,00,00,00,00,00,00,B8,10,00,00,5A,00,08
1～17バイト目(偶数行すべて・奇数行1バイト目)：文字列 (例：BOMB!!)
18バイト目(奇数行2バイト目)：FF～最終行 00～その他
19～32バイト目(奇数行3～16バイト目)：PSGデータ、レジスタ0,1,2…12,13の順、レジスタ7以外はSOUND命令と同じ
872:デフォルトの名無しさん
16/02/12 08:50:05.69 qz3mrubwg
補足。
420-430行は私が作った音。
PLAY"S8M90O6G"
と同じ音だが、PLAY命令と違い、自分で止めない限り鳴りっぱなし。
最後は DEFUSR=&H90:A=USR(0) を実行してPSGを初期化。
ついでに。このプログラムのROMイメージも作ってみた。
OpenMSX＋C-BIOS、WebMSXで動作。ROM版は無限ループ・RAM8Kでも動く。
873:デフォルトの名無しさん
16/02/20 06:24:47.86 GAQ/DQUn.net
URLﾘﾝｸ(pickaka.ka12345.com)
874:デフォルトの名無しさん
16/02/21 10:33:15.20 zmvsu5mb.net
What is her name?
875:デフォルトの名無しさん
16/02/22 11:48:33.93 suz1nbmf.net
山本陽菜 means Hina Ymamamoto
876:DOSからSUB-ROMのBIOSを呼ぶ
16/02/23 00:42:06.64 tto5lnBWm
リストＡその１（M80、Windowsのxasなどが必要）
PUBLIC CALSUB
;
CALSLT EQU 001CH
EXTROM EQU 015FH
NMI EQU 0066H ;NON-MASKABLE INTERRUPT
H.NMI EQU 0FDD6H ;HOOK FOR NMI
EXPTBL EQU 0FCC1H
;
;
877:DOSからSUB-ROMのBIOSを呼ぶ
16/02/23 00:43:35.41 tto5lnBWm
リストＡその２
CALSUB:
EXX ;SAVE ARGUMENT REGISTERS OVER SETUP
EX AF,AF'
LD HL,EXTROM
PUSH HL
LD HL,0C300H ;JP XXXX,NOP
PUSH HL
PUSH IX ;SUB-ROM ENTRY
LD HL,021DDH ;LD IX,XXXX
PUSH HL
LD HL,03333H ;INC SP,INC SP
PUSH HL
LD HL,0
ADD HL,SP
LD A,0C3H
LD (H.NMI),A
LD (H.NMI+1),HL
EX AF,AF'
EXX
878:DOSからSUB-ROMのBIOSを呼ぶ
16/02/23 00:49:10.29 tto5lnBWm
リストＡその３（リストＡはここまで）
;
LD HL,10 ;THROW AWAY THE INTERFACE ROUTINE
ADD HL,SP
LD SP,HL
RET
;
END
以上、MSX Datapackのサンプルプログラムより。
「テクニカルガイドブック」でもSUB-ROMのBIOSを呼ぶのは非常に面倒だ、と書かれていたが……サンプルプログラムはスタック上に呼び出しルーチンを置くという方法が。
879:DOSからSUB-ROMのBIOSを呼ぶ
16/02/23 00:54:09.64 tto5lnBWm
このルーチンを使ったDOS上のプログラム。
SCREEN6にする(SUB)→BEEP(SUB)→キー入力待ち(MAIN)→テキストモードに戻す(MAIN)→BEEP(SUB)→終了
リストＢその１
EXTRN CALSUB
;
CHGMOD EQU 00D1H ;SUBROM-CHANGE SCREEN
CHGET EQU 009FH ;MAIN-KEYIN
TOTEXT EQU 00D2H ;MAIN-TEXT MODE
BEEP EQU 017DH ;SUBROM-BEEP
;
CALSLT EQU 001CH ;MAINROM-INTERSLOT CALL
EXPTBL EQU 0FCC1H ;MAINROM-SLOT
880:DOSからSUB-ROMのBIOSを呼ぶ
16/02/23 00:55:57.50 tto5lnBWm
リストＢその２
;
LD A,6
LD IX,CHGMOD
CALL CALSUB
;
LD IX,BEEP
CALL CALSUB
;
LD IX,CHGET
LD IY,(EXPTBL-1)
CALL CALSLT
;
LD IX,TOTEXT
LD IY,(EXPTBL-1)
CALL CALSLT
;
LD IX,BEEP
CALL CALSUB
;
RET
;
END
881:DOSからSUB-ROMのBIOSを呼ぶ
16/02/23 01:12:02.76 tto5lnBWm
実行ファイル(????.com)をダンプリストにしたもの。
Windowsのバイナリエディタで入力→????.comでセーブ→MSXに転送。
0100: 3E 06 DD 21 D1 00 CD 2E 01 DD 21 7D 01 CD 2E 01
0110: DD 21 9F 00 FD 2A C0 FC CD 1C 00 DD 21 D2 00 FD
0120: 2A C0 FC CD 1C 00 DD 21 7D 01 CD 2E 01 C9 D9 08
0130: 21 5F 01 E5 21 00 C3 E5 DD E5 21 DD 21 E5 21 33
0140: 33 E5 21 00 00 39 3E C3 32 D6 FD 22 D7 FD 08 D9
0150: DD 21 66 00 FD 2A C0 FC CD 1C 00 FB 21 0A 00 39
0160: F9 C9
機械語の初心者には、M80やXasは使いこなせない。
（99BasicでHEX→バイナリ変換は作ったが）
BASIC用の機械語プログラムは、PC用はZASM、
MSX用は永久保存版1の付録にある「MSX-DOSスーパーハンドブック」のアセンブラで作ったほうが簡単だ。
882:DOSからSUB-ROMのBIOS 訂正１
16/02/23 22:30:09.88 tto5lnBWm
リスト１(MSX Datapackのサンプル
883:)に誤りがあったので訂正。"PUBLIC CALSUB"で、他のプログラムから呼び出すサブルーチンとして使う。; +0 INC SP; +1 INC SP; +2 LD IX,<SUB-ROM ENTRY>; +6 NOP; +7 JP EXTROM
884:DOSからSUB-ROMのBIOS 訂正２
16/02/23 22:30:50.05 tto5lnBWm
CALSLT EQU 001CH
EXTROM EQU 015FH
NMI EQU 0066H
EXPTBL EQU 0FCC1H
;
_CALSUB::
EXX
EX AF,AF'
LD HL,EXTROM
PUSH HL
LD HL,0C300H
PUSH HL
PUSH IX
LD HL,021DDH
PUSH HL
LD HL,03333H
PUSH HL
LD HL,0
ADD HL,SP
LD A,0C3H
LD (H.NMI),A
LD (H.NMI+1),HL
EX AF,AF'
EXX
885:DOSからSUB-ROMのBIOS 訂正３
16/02/23 22:36:05.21 tto5lnBWm
;
LD IX,NMI
LD IY,(EXPTBL-1)
CALL CALSLT
EI
;
LD HL,10
ADD HL,SP
LD SP,HL
RET
END
一番重要なところを書き落とした。
LD IX,NMI
LD IY,(EXPTBL-1)
CALL CALSLT
MAIN ROMをインタースロットコール→NMIフックを呼ぶ→スタックに書かれたプログラムでSUB ROMを呼ぶ。これが抜けていた。申し訳ありません。
URLﾘﾝｸ(ngs.no.coocan.jp)
のソースリストを引用。読みづらいので大文字に変換。
886:DOSからSUB-ROMのBIOS 最後に
16/02/23 22:39:23.26 tto5lnBWm
>>872-873のプログラムは私が作ったものなので、Datapackの作者とは無関係。
ただ、>>875-877のソースリストの先頭に
PUBLIC CALSUB
を書いておく必要がある。
887:CALL CPU命令を増設
16/02/25 03:03:21.34 6/BmD+Ggl
100 DEFINT A-Z:AD=&H8F90
110 READ A$:IF A$="*" THEN 130
120 POKE AD+C,VAL("&H"+A$):C=C+1:GOTO 110
130 DEFUSR=AD:A=USR(0):END
140 '
150 'Emulator ROM Make
160 '
170 'DEFUSR1=&H8FE9:A=USR1(0)
180 'BSAVE"CALLCPU.ROM",&H9000,&HAFFF
190 '
200 '----->Delete BSAVE header (7bytes) FE 00 90 FF AF 00 90
210 '
220 DATA 3A,09,FD,E6,40,B7,28,09,1E,05,DD,21,6F,40,CD,59
230 DATA 01,AF,32,00,90,32,01,90,3A,42,F3,26,40,CD,24,00
240 DATA 21,00,90,11,00,40,ED,B0,3A,C1,FC,26,40,CD,24,00
250 DATA FB,3A,42,F3,E6,03,07,07,07,07,5F,3A,42,F3,E6,0C
260 DATA 83,3C,5F,16,00,21,C9,FC,19,36,20,3A,09,FD,F6,20
270 DATA 32,09,FD,C9,00,00,00,00,00,AF,21,80,90,11,81,90
280 DATA 01,7F,3F,77,ED,B0,3E,41,21,00,90,77,3C,23,77,C9
290 DATA 41,42,00,00,10,40,00,00,00,00,00,00,00,00,00,00
300 DATA FB,E5,21,2F,40,11,89,FD,1A,BE,20,0B,13,23,A7,20
310 DATA F7,E1,CD,50,40,A7,C9,0E,FF,AF,ED,B1,E1,37,C9,43
320 DATA 50,55,00,7E,E3,BE,23,E3,20,0D,DD,21,66,46,CD,59
330 DATA 01,FB,C9,1E,05,18,02,1E,02,DD,21,6F,40,CD,59,01
340 DATA 3A,2D,00,FE,03,38,EC,CD,33,40,28,DD,21,1C,52,CD
350 DATA 59,01,FB,F5,CD,33,40,29,F1,FE,03,30,D6,F6,80,CD
360 DATA 80,01,C9,00,00,00,00,00,00,00,00,00,00,00,00,00,"*"
888:CALL CPU命令を増設
16/02/25 03:12:30.22 6/BmD+Ggl
使用方法：CALL CPU(0-2)
0:Z80 1:R800(ROM) 2:R800(DRAM) その他はIllegal function callエラー。
MSX2+以前は常にIllegal function call。
このエラーが出たら、裏RAMにCALL CPU命令がセットされたとわかる。
【注意】
1.CALL MEMINIを実行中の場合はエラーが出るので、CALL MEMINI(0)で解除する。
2.命令増設後はCALL MEMINIが実行できなくなる。裏RAMを使用するため、メモリディスクの使用を禁止した。
【補足】
REM文を読めば、エミュレータ用ROMファイルの作成方法がわかるはず。
エミュレータ用ROMファイルを作成した場合、裏RAMは使用しないので、CALL MEMINIなどのメモリディスク命令が使用できる。
【最後に】
8F90H-8FFFのローダープログラムを改造したら、ノーマルROMゲームのローダーになるはず。ゲームの場合、メモリディスク使用チェックは必要ない。
889:CALL CPU命令を増設
16/02/25 03:57:30.48 6/BmD+Ggl
訂正～240-270行。LDIRの前にBCレジスタの値の設定を忘れた。
訂正前は異常が見つからなかったので、ミスの発見が遅れた。
100 DEFINT A-Z:AD=&H8F90
110 READ A$:IF A$="*" THEN 130
120 POKE AD+C,VAL("&H"+A$):C=C+1:GOTO 110
130 DEFUSR=AD:A=USR(0):END
140 '
150 'Emulator ROM Make
160 '
170 'DEFUSR1=&H8FE9:A=USR1(0)
180 'BSAVE"CALLCPU.ROM",&H9000,&HAFFF
190 '
200 '----->Delete BSAVE header (7bytes) FE 00 90 FF AF 00 90
210 '
220 DATA 3A,09,FD,E6,40,B7,28,09,1E,05,DD,21,6F,40,CD,59
230 DATA 01,AF,32,00,90,32,01,90,3A,42,F3,26,40,CD,24,00
240 DATA 21,00,90,11,00,40,01,00,40,ED,B0,3A,C1,FC,26,40
250 DATA CD,24,00,FB,3A,42,F3,E6,03,07,07,07,07,5F,3A,42
260 DATA F3,E6,0C,83,3C,5F,16,00,21,C9,FC,19,36,20,3A,09
270 DATA FD,F6,20,32,09,FD,C9,00,00,AF,21,80,90,11,81,90
280 DATA 01,7F,3F,77,ED,B0,3E,41,21,00,90,77,3C,23,77,C9
290 DATA 41,42,00,00,10,40,00,00,00,00,00,00,00,00,00,00
300 DATA FB,E5,21,2F,40,11,89,FD,1A,BE,20,0B,13,23,A7,20
310 DATA F7,E1,CD,50,40,A7,C9,0E,FF,AF,ED,B1,E1,37,C9,43
320 DATA 50,55,00,7E,E3,BE,23,E3,20,0D,DD,21,66,46,CD,59
330 DATA 01,FB,C9,1E,05,18,02,1E,02,DD,21,6F,40,CD,59,01
340 DATA 3A,2D,00,FE,03,38,EC,CD,33,40,28,DD,21,1C,52,CD
350 DATA 59,01,FB,F5,CD,33,40,29,F1,FE,03,30,D6,F6,80,CD
360 DATA 80,01,C9,00,00,00,00,00,00,00,00,00,00,00,00,00,"*"
890:ノーマルROMゲームのローダー
16/02/26 03:45:30.28 5M5Yi5aow
100 DEFINT A-Z:AD=&H8FC0
110 READ A$:IF A$="*" THEN 130
120 POKE AD+C,VAL("&H"+A$):C=C+1:GOTO 110
130 DEFUSR=AD:KEY1,"A=USR(0)"+CHR$(13):END
150 'BASIC
170 A2=&H9010:DEFUSR1=A2:POKE &H904B,&H1E
180 FOR I=0 TO 2:POKE A2+I,0:NEXT I
190 A=USR1(0):END
210 'Emulator ROM SAVE
230 'DEFUSR2=&H8FE9:A=USR2(0)
240 'BSAVE"FONTTEST.ROM",&H9000,&HAFFF
260 '----->Delete BSAVE header (7bytes) FE 00 90 FF AF 00 90
280 DATA AF,32,00,90,32,01,90,3A,42,F3,26,40,CD,24,00,21
290 DATA 00,90,11,00,40,01,00,40,ED,B0,21,02,90,5E,23,56
300 DATA FB,D5,C9,00,00,00,00,00,00,AF,21,80,90,11,81,90
310 DATA 01,7F,3F,77,ED,B0,3E,41,21,00,90,77,3C,23,77,C9
330 '----- ROM DATA -----
350 DATA 41,42,10,40,00,00,00,00,00,00,00,00,00,00,00,00
360 DATA 31,00,F0,CD,CC,00,3E,20,32,AF,F3,CD,6F,00,06,00
370 DATA AF,21,00,18,CD,4D,00,3C,23,10,F9,AF,32,DB,F3,3A
380 DATA 2D,00,FE,03,38,05,3E,82,CD,80,01,CD,9C,00,28,FB
390 DATA CD,56,01,3E,08,CD,41,01,FE,FE,28,00,21,00,00,01
400 DATA 00,08,C5,06,08,CD,4A,00,07,CB,19,10,FB,79,C1,CD
410 DATA 4D,00,23,0B,78,B1,20,EA,18,D1,21,0A,00,CD,C6,00
420 DATA C9,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,"*"
891:REM文に機械語１
16/03/07 03:55:39.13 MGuXNuO80
100 'C318AA2A2A2053414D504C452050524F472E206F662056445020262050534720
110 '2A2A00202020204E4F562E203139383320204352454154454420425920455343
120 '55454C4120436F72702E2056455220312E30002E002020202020000000000000
130 '00000000000000000000000000000000000000000000FF450000000000000000
140 '0000000000000000000000000000000000000000000000000000000000000000
150 '0000000000000000000000000000000000000000000000000000000000000000
160 '0000000000000000000000000000000000000000000000000000000000000000
170 '0000000000000000000000000000000000000000000000000000000000000000
180 '0021000039225AA02101A1F9CD5601CD21A2CD77A1CD41A2CD9C00C26CA12A5C
190 'A02B225CA07DB420EF3A5EA03C325EA0CD41A2CD5CA2CDD2A2CD14A3CD64A3CD
200 'ACA3CDF4A3CD3CA4CD84A4CDCCA4CD14A5CD5CA5CDA4A5CDECA5CD34A6CD7CA6
210 'CD14A7CD44A7CD8FA7C318A13E0132DBF3C320AA00000021003822C7F3210000
220 '22CBF321001C22CDF321002022C9F321001822CFF33E0032EAF3CD72002187A9
230 '0E0046C5CD4700C1230C79FE08DAA2A111001821E7A701A001E5D5C5CD5C00C1
240 'E1D109EB218FA90120003E0BF5E5D5C5CD5C00C1E1D109EBF13D20F011001C21
250 'AFA9016400CD5C002103A03E0A010000110800CD48A2213DA03E0A010A001150
260 '00CD48A22153A03E04010400111300CD48A22153A03E0401840011AE00CD48A2
270 'C9CD90003E061E0CCD93003E071EB1CD93003E081E08CD93003E091E00CD9300
280 'C9211000225CA0C932E9F3ED53B7FCED43B9FC7EB7C8CD8D002318F73A65A03C
290 '20253A64A03D3264A0C001040021011CAFCDC4A6AFCDC4A63E10CDC4A63E10CD
892:REM文に機械語２
16/03/07 03:56:22.75 MGuXNuO80
300 'C4A6AF3265A0C93A5EA0E607C001040021011CCD4A003CFEFF2007F53EFF3265
310 'A0F15FFE20200C2323CD4A0017DAE0A67B2B2BCD4D0009CD4A003CCD4D0009CD
320 '4A00FEFFC83CCD4D0009CD4A003CCD4D00C93A76A03C2018ED5FE6FFC021101C
330 '3EBFCD4D00233E44CD4D00AF3276A0C93A5EA0E601C021111CCD4A003CFEFF5F
340 '20053EFF3276A07BCD4D002BCD4A003DCD4D00C93A67A03C20193A66A03C3266
350 'A0E67FC0212D1CAFCDC4A6AF3267A03266A0C93A5EA0E60FC0212C1C23CD4A00
360 '3CFEFF200AF53A67A0EEFF3267A0F15FFE20200C2323CD4A0017DAD4A67B2B2B
370 'CD4D00C93A69A03C20123A5EA0E6FFC021311CAFCDC4A6AF3269A0C93A5EA0E6
380 '1FC021311CCD4A003CFEFF200AF53A69A0EEFF3269A0F15FFE20200C2323CD4A
390 '0017DAD4A67B2B2BCD4D00C93A6AA03C20123A5EA0E6FFC021351CAFCDC4A6AF
400 '326AA0C93A5EA0E63FC021351CCD4A003CFEFF200AF53A6AA0EEFF326AA0F15F
410 'FE20200C2323CD4A0017DAD4A67B2B2BCD4D00C93A6BA03C20123A5EA0E6FFC0
420 '21391CAFCDC4A6AF326BA0C93A5EA0E63FC021391CCD4A003CFEFF200AF53A6B
430 'A0EEFF326BA0F15FFE20200C2323CD4A0017DAD4A67B2B2BCD4D00C93A6CA03C
440 '20123A5EA0E6FFC0213D1CAFCDC4A6AF326CA0C93A5EA0E63FC0213D1CCD4A00
450 '3CFEFF200AF53A6CA0EEFF326CA0F15FFE20200C2323CD4A0017DAD4A67B2B2B
460 'CD4D00C93A6DA03C20123A5EA0E6FFC021411CAFCDC4A6AF326DA0C93A5EA0E6
470 '3FC021411CCD4A003CFEFF200AF53A6DA0EEFF326DA0F15FFE20200C2323CD4A
480 '0017DAD4A67B2B2BCD4D00C93A6EA03C20123A5EA0E6FFC021451CAFCDC4A6AF
490 '326EA0C93A5EA0E63FC021451CCD4A003CFEFF200AF53A6EA0EEFF326EA0F15F
893:REM文に機械語２
16/03/07 03:56:51.58 MGuXNuO80
500 'FE20200C2323CD4A0017DAD4A67B2B2BCD4D00C93A6FA03C20123A5EA0E6FFC0
510 '21491C4FCDC4A6AF326FA0C93A5EA0E63FC021491CCD4A003CFEFF200AF53A6F
520 'A0EEFF326FA0F15FFE20200C2323CD4A0017DAD4A67B2B2BCD4D00C93A70A03C
530 '20123A5EA0E6FFC0214D1CAFCDC4A6AF3270A0C93A5EA0E67FC0214D1CCD4A00
540 '3CFEFF200AF53A70A0EEFF3270A0F15FFE20200C2323CD4A0017DAD4A67B2B2B
550 'CD4D00C93A71A03C20123A5EA0E6FFC021511CAFCDC4A6AF3271A0C93A5EA0E6
560 '7FC021511CCD4A003CFEFF200AF53A71A0EEFF3271A0F15FFE20200C2323CD4A
570 '0017DAD4A67B2B2BCD4D00C93A72A03C20123A5EA0E6FFC021551CAFCDC4A6AF
580 '3272A0C93A5EA0E67FC021551CCD4A003CFEFF200AF53A72A0EEFF3272A0F15F
590 'FE20200C2323CD4A0017DAD4A67B2B2BCD4D00C93A73A03C20123A5EA0E6FFC0
600 '21591CAFCDC4A6AF3273A0C93A5EA0E67FC021591CCD4A003CFEFF200AF53A73
610 'A0EEFF3273A0F15FFE20200C2323CD4A0017DAD4A67B2B2BCD4D00C93A74A03C
620 '20123A5EA0E6FFC0215D1CAFCDC4A6AF3274A0C93A5EA0E67FC0215D1CCD4A00
630 '3CFEFF200AF53A74A0EEFF3274A0F15FFE20200C2323CD4A0017DAD4A67B2B2B
640 'CD4D00C9CD4D002323CD4A00F680CD4D002323C9A71FCD4D002B2BAFCD4D00C9
650 'CDD4A60102000909AFCD4D0009CD4A00E67FCD4D00093E10CD4D0009CD4A00E6
660 '7FCD4D00093E10CD4D0009CD4A00E67FCD4D00C93A5EA0E67FC03E06CD96005F
670 '3A63A0B720111C7BFE1F38053EFF3263A03E06CD9300C91D7BFE1030F43E0032
680 '63A018ED3A76A03C20083E091E00CD9300C921101CCD4A00FEBF20163E021E10
690 'CD93003E031E00CD93003E091E0FCD9300C93E02CD96003C5F3E02CD93007BE6
894:REM文に機械語４
16/03/07 03:58:43.28 MGuXNuO80
700 '1FC03E09CD96003D5F3E09CD9300C93A65A03C20083E0A1E00CD9300C921031C
710 'CD4A00072B2B3031CD4A003C3DC03E041E10CD93003E051E01CD93003E0A1E10
720 'CD93003E0B1E09CD93003E0C1E08CD93003E0D1E0ACD9300C9CD4A00FEFFC03E
730 '0A1E00CD9300C900000103070F1F3F3F7F7FFFFFFFFFFF1F7FFFFFFFFFFFFFFF
740 'FFFFFFFFFFFFFFFFFFFFFFFF7F7F3F3F1F0F0703010000FFFFFFFFFFFFFFFFFF
750 'FFFFFFFFFF7F1FF8FEFFFFFFFFFFFFFFFFFFFFFFFFFFFF000080C0E0F0F8FCFC
760 'FEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEF8FFFFFFFFFFFEFEFCFC
770 'F8F0E0C080000000000000000103070F1E3860C000000000000060F0F8F8F0E0
780 '0000000000000000000000000000003F7FFFFF7F3F07070000000000000000FF
790 'FFFFFFFFFF80803F7FFFFF7F3F00000000000000000000FFFFFFFFFFFF000000
800 '0000000000000007073F7FFFFF7F3F00000000000000008080FFFFFFFFFFFF00
810 '000000000000000000000000031E7FFF1E0300000000000000073AF0A000FFFF
820 '00A0701A0700003FEF8F0F0F0F0FFFFF0F0F0F0F0FEF3FFFFFFFFFFFFFFFFFFF
830 'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
840 'FFFFFFFFFFFFFF00000000000000003C7EFFFFFFFF7E3C000000000000000000
850 '0000000000000000000000000000003C7EFFFFFFFF7E3C000000000000000000
860 '0000000000000002E20EFF033803010000000000000000000000000040E04000
870 '00000000000000000000000000000074C2000A84C2040A74D2080A84D20C0AC0
880 'FF1006548E1402698E1802748E1C026469200B6479240B6489280B57692C0D3E
890 'AF300D855934057918380584AE3C05523140054BD24405392748052D814C0423
895:REM文に機械語５
16/03/07 04:07:54.98 MGuXNuO80
900 'DC5004194F54040FB4580404135C04D000004F00000000003E0032DBF3C301A1
910 'CD9000CDC3002A5AA0F93E0F32E9F33E0432EAF33E0732EBF3CD5601C9000000X
920 CLEAR 200,&HA000:DEFINT A-Z
930 FOR I=0 TO 52:POKE &HF55E+I,VAL("&H"+MID$("2A76F62BED5BF8F7D57EFE582826B720060108000918F2FE3A3802D607D6300707070747237EFE3A3802D607D6308012231318D5C9",I*2+1,2)):NEXT I
940 DEFUSR=&HF55E:A=USR(&HA000)
>>885は「REM文に機械語３」の誤り～訂正。
昔のBASIC本に掲載されていた機械語プログラム（著者以外の人物が作成したもの）をREM文機械語にしてみた。
展開プログラムはF55Ehから53バイト使用。ここはダイレクトモードで入力した文字列が入るところだが、一時的に機械語プログラムが使っても問題ないとわかった。
展開プログラムは、「データに00があったら8バイト先に進む」仕組み。行末は00→8バイト進む→次の行のREMデータを読む。
Z80でも機械語だと読み込みが速い。
896:デフォルトの名無しさん
16/12/19 22:09:13.65 LUv0TAy6.net
paul gilbert alternate picking
URLﾘﾝｸ(www.youtube.com)
897:デフォルトの名無しさん
17/03/07 19:29:36.58 r9Kcpwe1.net
指長ぇな
898:デフォルトの名無しさん
18/04/04 14:03:45.90 nsnO7hcT.net
１年経っても書き込みゼロ
MSX-BASICの奥義ってこの程度かよｗ
まぁ安物マシンだったからこんなもんだろうがな
899:デフォルトの名無しさん
18/04/08 13:50:06.98 vzbFopv/.net
10年前にガチで奥義を書いたけど、理解できないような人しか居なかったようで……
900:デフォルトの名無しさん
18/04/11 21:56:09.68 2+sM3+jO.net
スレタイが"BASICの奥義"となっていながら、結局その奥義がマシン語に頼ることになってるからなぁ
901:デフォルトの名無しさん
18/05/23 22:52:21.42 Au5e7VGg.net
僕の知り合いの知り合いができたパソコン一台でお金持ちになれるやり方
役に立つかもしれません
グーグルで検索するといいかも『ネットで稼ぐ方法 モニアレフヌノ』
Z776Y
902:デフォルトの名無しさん
18/05/23 23:12:07.40 vLiyuJ6c.net
Z776Y
Z776Y
Z776Y
903:デフォルトの名無しさん
18/07/04 22:58:03.37 gFgZc5FG.net
VIM
904:デフォルトの名無しさん
18/07/06 12:33:43.11 uTPDH9XV.net
Z776Y
Z776Y
Z776Y
905:デフォルトの名無しさん
19/06/19 05:00:08.96 tVNS+22r.net
【出資】松本卓朗 人工知能詐欺【注意】
ｽﾚﾘﾝｸ(rikei板)
906:デフォルトの名無しさん
19/09/14 14:03:23.14 hhxdRhHk.net
やりたいんだけど今だったらどうすればいいの？
公式エミュとかあるの？
907:デフォルトの名無しさん
20/03/08 13:13:51 /DRbfiFK.net
BlueMSXを使うのじゃ
OpenMSXの方が細かいけどBIOS-ROMを別に用意しなければならん
Blueだったら必要ない
908:デフォルトの名無しさん
20/04/04 00:30:25 Zq6ktbwf.net
Microsoft xbox SXってのが出るらしいけど名前といい実質MSX4だよね？
909:デフォルトの名無しさん
20/06/14 14:00:39 pmI3WURN.net
CMD～だったかな？
自分でBASICの命令を拡張する（作る）ことができた
910:デフォルトの名無しさん
20/07/27 23:53:17 fLON8hVb.net
CMD ASM[RETUEN]とかDISK-BASIC版アセンブラ使ってたな
後にDOS版のASM.COMに移行したけど
911:デフォルトの名無しさん
20/09/17 01:08:34.08 2wikOAruX
【A型の人ごめん】「まじめ人間」は、自分の人生を生きられず、しかもお金持ちになれない。
URLﾘﾝｸ(www.youtube.com)
【人生観変わる話】「サラリーマン脳」のヤバい特徴5選。
URLﾘﾝｸ(www.youtube.com)
【人生終了】情弱がハマる「貧困スパイラル」のリアル。
URLﾘﾝｸ(www.youtube.com)
バカでもわかる！ネットビジネスの始め方。
URLﾘﾝｸ(www.youtube.com)
時給労働から卒業しよう！貧乏人が知らない「お金の稼ぎ方」まとめ。
URLﾘﾝｸ(www.youtube.com)
【人生攻略】経験・実績ゼロのあなたが、最短で何者かになる方法。
URLﾘﾝｸ(www.youtube.com)
【残酷】貧乏人はいつも忙しいのに、お金持ちは暇である理由。
URLﾘﾝｸ(www.youtube.com)
912:デフォルトの名無しさん
20/09/23 07:33:55.01 t/wfY7As.net
糞スレ
913:デフォルトの名無しさん
20/09/23 07:34:12.09 t/wfY7As.net
終わらせちまいたいな
914:デフォルトの名無しさん
20/09/23 07:34:18.93 t/wfY7As.net
こんな糞スレ
915:デフォルトの名無しさん
20/09/23 07:34:28.14 t/wfY7As.net
勘弁しちくりませ
916:デフォルトの名無しさん
20/09/23 07:58:56.56 y8i6TGSM.net
エール見る
917:デフォルトの名無しさん
20/09/23 16:45:43.26 U8R4tFiJ.net
わかりました
918:デフォルトの名無しさん
20/09/24 09:19:16.67 r0X6EHjc.net
情けない
919:デフォルトの名無しさん
20/09/24 09:19:22.31 r0X6EHjc.net
糞スレ
920:デフォルトの名無しさん
20/09/24 09:19:27.80 r0X6EHjc.net
早く終わらせろ
921:デフォルトの名無しさん
20/09/24 09:19:32.20 r0X6EHjc.net
マジ
922:デフォルトの名無しさん
20/09/24 09:19:40.08 r0X6EHjc.net
何という
923:デフォルトの名無しさん
20/09/24 09:19:45.11 r0X6EHjc.net
糞スレ
924:デフォルトの名無しさん
20/09/24 09:19:51.88 r0X6EHjc.net
勘弁
925:デフォルトの名無しさん
20/09/24 09:19:58.27 r0X6EHjc.net
していた
926:デフォルトの名無しさん
20/09/24 09:20:03.57 r0X6EHjc.net
だきたい
927:デフォルトの名無しさん
20/09/24 09:20:08.79 r0X6EHjc.net
カマン
928:デフォルトの名無しさん
20/09/24 15:39:18.12 gCZKgWY+.net
日韓国交断絶
929:デフォルトの名無しさん
20/09/24 15:40:25.20 gCZKgWY+.net
ロート製薬は反日企業
930:デフォルトの名無しさん
20/09/25 14:40:11.34 Cg84R9yT.net
糞スレ
931:デフォルトの名無しさん
20/09/25 14:40:21.80 Cg84R9yT.net
とりあえず900にまでは
932:デフォルトの名無しさん
20/09/25 14:40:27.14 Cg84R9yT.net
頑張り
933:デフォルトの名無しさん
20/09/25 14:40:33.28 Cg84R9yT.net
マッスル
934:デフォルトの名無しさん
20/09/25 14:40:40.62 Cg84R9yT.net
ガッデム
935:デフォルトの名無しさん
20/09/26 01:44:41.26 L98Fmfos.net
まさか
936:デフォルトの名無しさん
20/09/26 01:44:46.16 L98Fmfos.net
遥かなる
937:デフォルトの名無しさん
20/09/26 01:44:52.35 L98Fmfos.net
飛躍
938:デフォルトの名無しさん
20/09/26 01:45:02.97 L98Fmfos.net
だんだんと
939:デフォルトの名無しさん
20/09/26 01:45:11.15 L98Fmfos.net
この糞スレが終わったら
940:デフォルトの名無しさん
20/09/26 01:45:15.76 L98Fmfos.net
マジ
941:デフォルトの名無しさん
20/09/26 01:45:22.07 L98Fmfos.net
頑張りたい
942:デフォルトの名無しさん
20/09/26 01:45:30.52 L98Fmfos.net
空白の彼方に
943:デフォルトの名無しさん
20/09/26 01:45:35.95 L98Fmfos.net
910
944:デフォルトの名無しさん
20/09/26 01:45:41.33 L98Fmfos.net
くとう
945:デフォルトの名無しさん
20/09/26 01:45:46.45 L98Fmfos.net
カマン
946:デフォルトの名無しさん
20/09/26 01:45:52.00 L98Fmfos.net
こんなん
947:デフォルトの名無しさん
20/09/26 01:45:56.98 L98Fmfos.net
クレイジーな
948:デフォルトの名無しさん
20/09/26 01:46:01.81 L98Fmfos.net
糞スレ
949:デフォルトの名無しさん
20/09/26 01:46:12.21 L98Fmfos.net
早く糞スレを！
950:デフォルトの名無しさん
20/09/26 01:46:17.54 L98Fmfos.net
終わったら
951:デフォルトの名無しさん
20/09/26 01:46:31.68 L98Fmfos.net
にゃんたる
952:デフォルトの名無しさん
20/09/26 01:46:36.45 L98Fmfos.net
糞
953:デフォルトの名無しさん
20/09/26 01:46:44.79 L98Fmfos.net
ランブル
954:デフォルトの名無しさん
20/09/26 01:46:55.37 L98Fmfos.net
遥かなる鼓動
955:デフォルトの名無しさん
20/09/26 01:47:10.83 L98Fmfos.net
まあ
956:デフォルトの名無しさん
20/09/26 01:47:16.79 L98Fmfos.net
できる
957:デフォルトの名無しさん
20/09/26 01:47:22.49 L98Fmfos.net
こんなん
958:デフォルトの名無しさん
20/09/26 01:47:28.23 L98Fmfos.net
いらんだろ
959:デフォルトの名無しさん
20/09/26 01:47:42.00 RnJ9XH69.net
ここなら
960:デフォルトの名無しさん
20/09/26 01:47:53.97 RnJ9XH69.net
てかマジ復刻しろや！
961:デフォルトの名無しさん
20/09/26 01:48:20.44 RnJ9XH69.net
図鑑完成してる奴見ても復刻しないんだからしょうがないだろうが！
962:デフォルトの名無しさん
20/09/26 01:48:31.57 RnJ9XH69.net
順位とかいらんだろ
963:デフォルトの名無しさん
20/09/26 01:48:36.13 RnJ9XH69.net
はあ
964:デフォルトの名無しさん
20/09/26 01:49:20.40 RnJ9XH69.net
去年の1月から3月までのイベント復刻してないだろ！
965:デフォルトの名無しさん
20/09/26 01:49:33.22 RnJ9XH69.net
そろそろ来そうな気がするんだが
966:デフォルトの名無しさん
20/09/26 01:49:59.15 RnJ9XH69.net
他は約一年前くらいか？
967:デフォルトの名無しさん
20/09/26 01:50:13.52 RnJ9XH69.net
一年も復刻しないとか
968:デフォルトの名無しさん
20/09/26 01:50:17.44 RnJ9XH69.net
はあ
969:デフォルトの名無しさん
20/09/26 01:50:23.15 RnJ9XH69.net
遥かなる
970:デフォルトの名無しさん
20/09/26 01:50:34.16 RnJ9XH69.net
マキシマム
971:デフォルトの名無しさん
20/09/26 01:50:40.86 RnJ9XH69.net
完全に
972:デフォルトの名無しさん
20/09/26 01:50:47.12 RnJ9XH69.net
950にまでは
973:デフォルトの名無しさん
20/09/26 01:50:57.69 RnJ9XH69.net
限界があるんだろうか？
974:デフォルトの名無しさん
20/09/26 01:51:04.58 RnJ9XH69.net
極めて見たい
975:デフォルトの名無しさん
20/09/26 01:51:09.21 RnJ9XH69.net
糞スレ
976:デフォルトの名無しさん
20/09/26 01:59:48.73 guj+g2pE.net
けれ？
977:デフォルトの名無しさん
20/09/26 01:59:54.75 guj+g2pE.net
違うか
978:デフォルトの名無しさん
20/09/26 02:00:04.33 guj+g2pE.net
この糞スレも終わりだな
979:デフォルトの名無しさん
20/09/26 02:00:09.03 guj+g2pE.net
まだ
980:デフォルトの名無しさん
20/09/26 02:00:14.76 guj+g2pE.net
遥かなる
981:デフォルトの名無しさん
20/09/26 02:00:21.30 guj+g2pE.net
どんどん
982:デフォルトの名無しさん
20/09/26 02:00:27.65 guj+g2pE.net
いらん
983:デフォルトの名無しさん
20/09/26 02:00:35.70 guj+g2pE.net
未来に向けて
984:デフォルトの名無しさん
20/09/26 02:00:41.34 guj+g2pE.net
頑張り
985:デフォルトの名無しさん
20/09/26 02:00:45.60 guj+g2pE.net
最終回
986:デフォルトの名無しさん
20/09/26 02:00:50.61 guj+g2pE.net
ラスト
987:デフォルトの名無しさん
20/09/26 02:00:58.60 guj+g2pE.net
950を切ったわ
988:デフォルトの名無しさん
20/09/26 02:01:02.96 guj+g2pE.net
ガッデム
989:デフォルトの名無しさん
20/09/26 02:01:07.89 guj+g2pE.net
極め
990:デフォルトの名無しさん
20/09/26 02:01:18.61 guj+g2pE.net
だんだんと
991:デフォルトの名無しさん
20/09/26 02:01:35.87 guj+g2pE.net
てかこの糞スレはなんなんだ？
992:デフォルトの名無しさん
20/09/26 02:01:58.98 guj+g2pE.net
なるほど
993:デフォルトの名無しさん
20/09/26 02:02:08.99 guj+g2pE.net
2番目の糞スレか
994:デフォルトの名無しさん
20/09/26 02:02:14.67 guj+g2pE.net
いらんだれ
995:デフォルトの名無しさん
20/09/26 02:02:20.87 guj+g2pE.net
終わらせろ
996:デフォルトの名無しさん
20/09/26 02:02:26.44 guj+g2pE.net
ラスト40
997:デフォルトの名無しさん
20/09/26 02:02:30.93 guj+g2pE.net
糞スレ
998:デフォルトの名無しさん
20/09/26 02:02:36.65 guj+g2pE.net
はあ
999:デフォルトの名無しさん
20/09/26 02:02:47.59 guj+g2pE.net
情けないままに
1000:デフォルトの名無しさん
20/09/26 02:02:52.25 guj+g2pE.net
糞スレ
1001:デフォルトの名無しさん
20/09/26 02:02:57.58 guj+g2pE.net
雨か
1002:デフォルトの名無しさん
20/09/26 02:03:16.70 NVb5H58F.net
遥か
1003:デフォルトの名無しさん
20/09/26 02:03:22.42 NVb5H58F.net
なんちゃるか
1004:デフォルトの名無しさん
20/09/26 02:03:26.65 NVb5H58F.net
飛躍
1005:デフォルトの名無しさん
20/09/26 02:03:49.60 bCtB8v/2.net
いよいよ限界か？
1006:デフォルトの名無しさん
20/09/26 02:04:02.52 bCtB8v/2.net
前は同じ文字ができなかった
1007:デフォルトの名無しさん
20/09/26 02:04:09.57 bCtB8v/2.net
あれは悲しい
1008:デフォルトの名無しさん
20/09/26 02:04:19.13 bCtB8v/2.net
何か会話した方がいい
1009:デフォルトの名無しさん
20/09/26 02:04:26.94 bCtB8v/2.net
あと25かは
1010:デフォルトの名無しさん
20/09/26 02:04:33.49 bCtB8v/2.net
超えたから
1011:デフォルトの名無しさん
20/09/26 02:04:38.16 bCtB8v/2.net
糞スレ
1012:デフォルトの名無しさん
20/09/26 02:04:43.11 bCtB8v/2.net
マキシマム
1013:デフォルトの名無しさん
20/09/26 02:04:49.84 bCtB8v/2.net
いがんとな！
1014:デフォルトの名無しさん
20/09/26 02:04:54.57 bCtB8v/2.net
はあ！
1015:デフォルトの名無しさん
20/09/26 02:04:59.20 bCtB8v/2.net
糞スレ
1016:デフォルトの名無しさん
20/09/26 02:05:19.69 bCtB8v/2.net
また一つ糞スレが役目を終える
1017:デフォルトの名無しさん
20/09/26 02:05:27.75 bCtB8v/2.net
すごみである
1018:デフォルトの名無しさん
20/09/26 02:05:33.57 bCtB8v/2.net
ゆっくり
1019:デフォルトの名無しさん
20/09/26 02:05:43.72 bCtB8v/2.net
糞スレの末路
1020:デフォルトの名無しさん
20/09/26 02:05:53.80 bCtB8v/2.net
使われない糞スレたち
1021:デフォルトの名無しさん
20/09/26 02:05:59.97 bCtB8v/2.net
なんたるかを
1022:デフォルトの名無しさん
20/09/26 02:06:08.29 bCtB8v/2.net
やっとラスト10
1023:デフォルトの名無しさん
20/09/26 02:06:13.04 bCtB8v/2.net
糞スレ
1024:デフォルトの名無しさん
20/09/26 02:06:20.67 bCtB8v/2.net
また変わるのか？
1025:デフォルトの名無しさん
20/09/26 02:06:26.27 bCtB8v/2.net
へいなる
1026:デフォルトの名無しさん
20/09/26 02:06:31.01 bCtB8v/2.net
忘れていた
1027:デフォルトの名無しさん
20/09/26 02:06:37.85 bCtB8v/2.net
極め
1028:デフォルトの名無しさん
20/09/26 02:06:43.14 bCtB8v/2.net
だんだん
1029:デフォルトの名無しさん
20/09/26 02:06:50.34 bCtB8v/2.net
ラスト5
1030:デフォルトの名無しさん
20/09/26 02:06:56.49 bCtB8v/2.net
超えた
1031:デフォルトの名無しさん
20/09/26 02:07:00.79 bCtB8v/2.net
ラスト
1032:デフォルトの名無しさん
20/09/26 02:07:06.10 bCtB8v/2.net
野朗
1033:デフォルトの名無しさん
20/09/26 02:07:12.29 bCtB8v/2.net
おまんかー
1034:1001
Over 1000 Thread.net
このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 6879日 23時間 13分 58秒
1035:過去ログ ★
[過去ログ]
■ このスレッドは過去ログ倉庫に格納されています