こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

N88-日本語 BASIC ASCII ファイル

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

投稿日時 - 2015-01-04 11:40:32

QNo.8879615

すぐに回答ほしいです

質問者が選んだベストアンサー

>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.html


N88日本語BASIC(86)のファイル変換
http://www.mirai.ne.jp/~nave/lib/bas2dos.htm

に、上のSAVEコマンドやFILECONV の使い方が紹介されてますが足りませんか?

投稿日時 - 2015-01-04 12:32:05

補足

コメントを削除したところ、プログラムを実行出来るようになりました。

投稿日時 - 2015-01-04 18:07:10

お礼

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"を選択。
変換終了!

投稿日時 - 2015-01-04 17:16:09

ANo.1

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(5)

ANo.5

>   'にはいかない m=1 ミサイル発射中は300行へ 
  ↓
115 'にはいかない m=1 ミサイル発射中は300行へ 

行番号を追加してみて下さい。

投稿日時 - 2015-01-04 17:36:47

ANo.4

zwi

手で98上で打ち込むべし。

投稿日時 - 2015-01-04 16:08:02

お礼

はい。

投稿日時 - 2015-01-04 17:47:33

ANo.3

そうですね、コピー&ペーストのものだとダメですね。noname#157639

投稿日時 - 2015-01-04 14:35:00

お礼

はい。

投稿日時 - 2015-01-04 17:47:23

ANo.2

>   'にはいかない m=1 ミサイル発射中は300行へ  

たぶん、ここが
http://okwave.jp/qa/q8879209.html
の原因。

あと、ここに貼ったものが、そのままコピー&ペーストしたものなら、コメントや文字列以外の「全角空白」が問題です。



エラーメッセージを読んで、なぜそんなエラーになるのか、その原因を考えるようにしましょう。
「正しい例題を正しく入力する」だけでは、プログラミング技術は身に付きません。

投稿日時 - 2015-01-04 12:41:26

お礼

N88BASIC で書かれ、Sound 付き のプログラムであれば、何でも良いのです。

兎に角、プログラムを実行してみてみたいのです。

投稿日時 - 2015-01-04 14:59:10

あなたにオススメの質問