N88-日本語 BASIC ASCII ファイルにするのにはどうしたら、宜しいのでしょうか。
・MS-DOS 6.20 に付属されている、「Fileconv」を使ってみました。
MS-DOS → N88BASIC
ドライブ名は、「C」ですが、Cと打つと、弾かれてしまって、入力が不可能です。
・因みに、MS-DOSのファイル形式になっている、現在は、以下の記述名です。
-----
10 width 80,20 '10~96行まで初期設定
20 cls:beep
30 print "KEY操作 1 左 2 右 3 ミサイル発射"
40 print "自機 <T> を操り 敵 = を撃つゲーム"
50 for i=0 to 40
60 locate i,5:print "-"
70 next
80 locate 19,5:print "-<T>-"
90 x=19: m=0:mx=0:my=0 'x、y 自機の座標 mx、my ミサイル座標
95 randomize(val(right$(time$,2))) 'ex,ey 敵座標
96 ey=int(rnd(1)*10)+6:ex=5
100 gosub 200 '100~130 メインルーチン
110 if m=1 then gosub 300 'm=0 ミサイル未発射。この時は300行(ミサイル移動ルーチン
'にはいかない m=1 ミサイル発射中は300行へ
120 gosub 400
130 goto 100
200 b$="" '自機の移動、ミサイル発射
202 a$=inkey$
205 if a$<>"" then b$=a$:goto 202
210 if b$="1" and x>1 then x=x-1
215 if b$="2" and x<37 then x=x+1
220 if b$="3" and m=0 then mx=x+2:my=5:m=1:beep
230 locate x,5 :print"-<T>-"
240 return
300 locate mx,my:print " " 'ミサイル移動ルーチン
310 my=my+1
320 if mx=ex and my=ey then gosub 600: end '当たり判定
330 if my>15 then mx=0:my=0:m=0:return '下までいったらミサイル終了。m=0に戻す
340 locate mx,my:print "V":return
400 locate ex,ey:print " " '敵移動ルーチン
410 ex=ex+1
420 if ex=mx and ey=my then gosub 600 :end '当たり判定
430 if ex>39 then ex=0: ey=int(rnd(1)*10)+6 '端までいったら新座標
440 locate ex,ey:print"="
450 return
600 beep '当たりの時の処理
610 locate mx,my:color 4:print "*"
620 print "大当たり THE END": color 7
630 print "HIT ANY KEY"
640 a$=input$(1):return
No.1ベストアンサー
- 回答日時:
>N88-日本語 BASIC ASCII ファイルにするのにはどうしたら、宜しいのでしょうか。
「何を」?
>・因みに、MS-DOSのファイル形式になっている、現在は、以下の記述名です。
何を言ってるのかよくわかりません。中間コードでなくASCIIコードになってるみたいですが。
もしかしたら漢字コードがいけないとか、かも。
リストのようなBASICプログラムが現在あり、これの保存をバイナリ形式でなくASCII形式で保存したい、ということ?
うろ覚えですが、BASICプログラムは普通中間コード形式でファイル保存されるが、
保存時のオプションパラメータで全てASCII文字での保存も可能、だったと思います、
現在メモリ上にBASICプログラムが展開されてる状態なら
SAVE "C:ASCII",A
のようなコマンドだったような気がします。
・ドライブ指定は、""で示されるファイル名の直前に付けます。パス指定も可能だったかと。
・最後に ,A と付けることでASCII形式を指定します。
あと、Windows で、バイナリファイルをアスキーファイルに変換するフリーソフトがあります。
http://www.vector.co.jp/soft/win95/prog/se063951 …
N88日本語BASIC(86)のファイル変換
http://www.mirai.ne.jp/~nave/lib/bas2dos.htm
に、上のSAVEコマンドやFILECONV の使い方が紹介されてますが足りませんか?
MS-DOS形式 -> N88日本語BASICへの変換
MS-DOSを起動して、FILECONV.EXEを実行する。
"変換:2/MS-DOS=>N88-BASIC"を選択する。
"MS-DOSのドライブは:"で、ドライブ名を入力(例:"B:")<----- 此処でドライブ名を入力しようとすると、弾かれてしまいます。
"N88-BASICのドライブ名:"で、ドライブ名を入力(例:"D:")
"MS-DOSのファイル名は:"で、ファイルをカーソルキーで選択。
カーソルキーで変換したいファイルを選択する。
"N88-BASICのファイル名は"で、ファイル名を入力。
リターンキーのみで、MS-DOSのファイルと同じ名前になる。
"機械語ファイルですか"で、"2/NO"を選択。
"ランダムデータファイルですか"で"2/NO"を選択。
"SHIFTJIS変換は"で、"1/YES"を選択。
"パラメータを確認してください"で、"1/YES"を選択。
変換終了!
No.2
- 回答日時:
> 'にはいかない m=1 ミサイル発射中は300行へ
たぶん、ここが
http://oshiete.goo.ne.jp/qa/8879209.html
の原因。
あと、ここに貼ったものが、そのままコピー&ペーストしたものなら、コメントや文字列以外の「全角空白」が問題です。
エラーメッセージを読んで、なぜそんなエラーになるのか、その原因を考えるようにしましょう。
「正しい例題を正しく入力する」だけでは、プログラミング技術は身に付きません。
N88BASIC で書かれ、Sound 付き のプログラムであれば、何でも良いのです。
兎に角、プログラムを実行してみてみたいのです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【至急!!!】python言語で本を見...
-
16進の10進変換について
-
VBAのNext forでエラーが出て困...
-
パイソン文法で(インデント)
-
数値かどうかの判定方法
-
変数名に変数を使用
-
シェルスクリプト+perl
-
pythonの*
-
ランダム文字列
-
Perl でワードファイルのヘッダ...
-
Perlにおける<?phpinfo();?>の...
-
シェルスクリプトで、空白(ス...
-
パイソンのプログラムで contin...
-
JSONで文字列が長い時
-
Application.ScreenUpdating = ...
-
FindFirst を複数条件で検索
-
テキスト入力後、エンターを押...
-
文字の横にプルダウンを表示さ...
-
formで特定のinputを送信しない...
-
sendmailで複数アドレスに送信...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
16進の10進変換について
-
pythonで演算子を変数に代入す...
-
【至急!!!】python言語で本を見...
-
pythonの*
-
c言語 16進数の2進数への変換
-
awkの正規表現での最左最短マッ...
-
数値かどうかの判定方法
-
関数「exists」と「defined」の...
-
シェルで、ランダム関数を変数...
-
I2C接続のLCDディスプレイを使う
-
シェルスクリプトで、空白(ス...
-
perでメールが送信出来ない場合...
-
UWSCのSELECT文の記述方法
-
int(input("○○"))の使い方
-
switch文のエラーについて
-
pythonで改行を含めてfindする方法
-
シェルスクリプト+perl
-
PythonでUTF8の文字列をリスト...
-
少数点以下の桁数について
-
qq!!の意味を教えてください。
おすすめ情報