懐かしのＮ８８ＢＡＳＩＣについて語ろうぜ

この板には無いようだから一応立ててみました。
Ｎ８８ＢＡＳＩＣ今現在もやっているよという人熱く語り合いましょう。

定期的に立つなぁ

ＸＰでＮ８８ＢＡＳＩＣって可能ですか？

連休?

あげ

>>1
もうそんな言語使いたくねえよ。
C言語とJavaがありゃｲﾗﾈ

DABA最強

懐かしいね。
今の小学生はVBをやってるのかな。

あげ

昔、 N88BASIC で 3200 行くらいのプログラム作ってたなぁ。
今じゃそれくらい普通だけど、昔はかなり膨大なプログラムに感じた。

当時 N88BASIC やってたパソコンは、今も健在で、 N88BASIC のディスクまである。
このスレ見て、 3 年ぶりに NEC PC9801EX 動かしてみちゃったよ。
今もちゃんと動作する 3200 行のプログラムと少々うるさい 3.5 インチ FDD 2 基を見て、未熟なころの俺を思い出した。
メインメモリ 640KB、 HDD なし、 12MHz の CPU、 4096 色モニタ。
今ではガラクタのような当時 40 万円のパソコン。
でも、このパソコンがあったからこそ、今の自分があるんだなと感じた。

今では N88互換BASIC っていうソフト使ってる。もちろん、今でも N88BASIC 使うときがある。
たまにだけどね。
今では、 VC++ とか VB とか Delphi とか Java とか、いろいろ掛け持ちしてるけど、 N88BASIC の存在も俺は一生忘れない。

行番号という概念があったおかげで、あまりいい印象を与えてなかった言語だったけどね。
俺に未来を与えてくれた言語、 N88BASIC に敬意を表する。

age

>>8
そしてブビ厨学生になってこの板で暴れまわるw

　　　 /　　　　　　　　　　　　　　　　　　　 ヽ
　　　/　__, ィ_,-ｧ__,,　,,､　　, ､,,__ -ｧ-=彡ﾍ　 ヽ
　 　 '　「　　　　　　´　{ハi′　　 　　 　 　 }　 l　　　　　
　　 |　 |　　　　　　　　　　　　　　　　　　　 |　 |
　　 |　 !　　　　　　　　　 　 　 　 　 　 　 　 |　 |　　　「Ｈｏｗ　ｍａｎｙ ｆｉｌｅｓ？」
　　 | │　　　　　　　　　　　　　　　　　　　〈 　 !　　　　
　　 |　|/ノ二__‐──ｧ　　 ヽﾆニ二二二ヾ } ,'⌒ヽ　　　
　 /⌒!|　 =彳ｏ｡ﾄ￣ヽ　　　　　'´ !o_ｼ｀ヾ　| i/ ヽ !　　　
　 ! ハ!|　　ー─　'　　i　　!　 　 `' 　 '' " 　 ||ヽ　l |　　　
　| | /ヽ!　　　　　　　　|　　　　　　　　　　　 |ヽ i　!　　　
　ヽ { 　|　　 　 　 　 　 !　　　　　　　　　　　|ﾉ　 /　　
　　ヽ　 |　　　　　　　 _ 　 ,､　 　 　 　 　 　 !　, 　　　　　　
　　　＼ !　　 　 　 　 '-ﾞ　‐ ﾞ　　　　　　　　レ'′　　　　
　　　　 ｀!　　　　　　　　　　　　　 　 　 　 /
　　　　　ヽ　　　　　ﾞ　￣　 ￣ ｀　　　　 / |
　　　　 　 |＼　　　 　 ー ─‐ 　 　 　 , ′ !

excelのvbaで充分だろ、焼酎某は

今の商業高校はCOBOLとVBの授業はあるけど、CもJavaは教えないそうだ。

C/C++は教えます。

名スレの予感

N88BASIC.NETを作ってください。

うちの大学(経済)もdelphi止まり。
一応、VS.NETとかBCCとかjavaとかごちゃごちゃ入ってるけど。

俺が学校で習ったときはFORTRANだった。（工学部機械系）
白黒液晶の98note使って。
今はWSでCを教えてるそうな。

今、授業で使ってるんだが･･･
>3さん
xpでも使えますよ。

うちの学校の技術部で、使ってます。＞PC９８０１
まだ入りたてで、よくわかんないんですが・・・

えーじ

センター試験の数学にあるよね>>BASIC

ほらよ

N88互換BASIC for Windows95
Windows95上で動く N88-BASIC

http://www.vector.co.jp/soft/win95/prog/se055956.html

XPで動くか
わからねーけどよ

中学生のころ
配列というものを知らずに
気合で
テトリスを作ったな

配列のかわりに
変数を
a0101 a0102 a0103 ..
a0201 a0202 a0203 ..
..

ってコピペ＋手直し
でやってた。

レッツ、メイキング、信長の野望

>>26
俺も初めてのプログラムはそうだった。
でもって、判定部分の条件分岐で3000行。

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣

大学でGP-IB経由でオシロスコープ制御するのに使ってる

ソースくれ。

ワンダースワンて8086だよね。
移植できまいか。

RATBASは？

http://homepage.mac.com/hiroyuki44/

（＾＾）

>>30
奇遇だなぁ。俺もやってる。
AZI-4301って言うボードを使って繋いでいるんだが、
どうもメモリからの読み込みでうまくいかなくて、
波形が取れたり取れなかったりしてたんだが、
ボードのN88basic用のリファレンスをようやく入手できて
やっとまともに動くようになったよ。
N88basicはメモリ関係が難しいなぁと思ったね。

　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン

まもなく1000

中学校なんかN88だよ。

>>39
ウチもそうですが何か？

我が中学校のパソコン部ではNECの16ビットマシンでn8basicをやってる。
basicの参考資料が少なくて困り果てております。
どなたかお助けを…。

今のROMにはBASICなんて入ってないんだろうか。

>>41
隅から隅まで熟知してますんで(ぉぃ)、何かあればお聞きくだされ。

>>42
入ってないよ。

>>36
そうでもない。まずは VARPTR関数で、変数のアドレスが得られる事を知るべし。
PEEK関数と POKE命令を使う事を覚えるのは、その後でよい。
この３つがあれば、メモリ関係はほぼ何でもＯＫ。

10 print "ｺﾝﾆﾁﾜ"
20 goto 10
run

思ったんだけど、高校の数学でBASICやる（やってる）学校ってあるのかね？
漏れは工業高校いってて情報の授業でやったけど。（4,5年前）
もちろん訳わかんなかった。

で、その翌年、VBを習った。
もちろん訳ﾜｶﾝﾈ。
しかし、勢いでVB6ラーニング（アカデミック版）を買ってしまう。
プロフェッショナルを買えばよかったと激しく後悔する。
ろくにやらず挫折。

今はJavaプログラマ見習いだけど、もしかしたら使えるかもと今のPCに一応ｲﾝｽｺしてある。


長文ｽﾏｿ。

>>46
そのVBオレにくれ。有効に活用したる。

>>46
俺やった。
それではまった！
もちろんセンター入試ではプログラム選んだ。
楽勝だった。

N88BASICのクローン
qqbasicスレはここですか？

qqbasic ... Windowsで動作するフリーウェア。ほぼN88書式で行けるハズ

>>49
あれぜんぜんだめ。
かなりプログラム書き直さんと動かん。
やっぱ98エミュでN88basic動かしたほうが確実。

N88互換BASIC for WINという便利なものが世に出ているのを知っていますか?

>>51
あれもっとだめ。
やっぱエミュで動かすのが一番！

OUT &H32,&H37 ってのは、なんなんだ？
ハードマニュアル無いしわかんねーよ！！

教えてくださいな。

>>53
それってハードによっても変わらんのかね？

>>53
おしかったなぁ　一週間前に　テクノウ９８　捨てたんだよ。。。

>>54
おそらく９８である限り変わらないと思います。

>>55
残念、、多分OPEN　COM〜CLOSE間でしか書かれていないので
COMポートになんかしてると思うのだが、、、、？

>>53
98ならこれ
ttp://hp.vector.co.jp/authors/VA000981/dos-tech/8251-reg.html
ttp://www.webtech.co.jp/undoc/

ＷＳＨで使えるＮ８８ＢＡＳＩＣキボンヌ

>>57
ありがとうございます。助かりました。

>>58 こんなふうに使えるやつかい。

<?xml version="1.0" standalone="yes" ?>
<job id="hello">
<script language="N88BASIC">
<![CDATA[
10 print "hello, world"
20 goto 10
]]>
</script>
</job>

N88互換BASIC for Windows95はｘｐでも動きます。
10 REM
20 PRINT"数あて"
30 A=5
40 INPUT B
50 IF A>B THEN GOTO 80
60 IF A<B THEN GOTO 120
70 IF A=B THEN GOTO 180
80 LET X=X+1
90 PRINT "もっと大きい"
100 IF X=5 THEN GOTO 160
110 GOTO 40
120 LET X=X+1
130 PRINT "もっと小さい"
140 IF X=5 THEN GOTO 160
150 GOTO 40
160 PRINT "答えは;A;です"
170 GOTO 170
180 PRINT "正解"
190 END

10 REM
20 PRINT"数あて"
30 A=5
40 INPUT B
50 IF A=B THEN GOTO 130
60 LET X=X+1
70 IF A>B THEN PRINT "もっと大きい"
80 IF A<B THEN PRINT "もっと小さい"
90 IF X=5 THEN GOTO 110
100 GOTO 40
110 PRINT "答えは5です"
120 GOTO 140
130 PRINT "正解"
140 END

>>61
あんなもんおもちゃだね。
そんな物より98エミュでN88basic走らせたほうがいい。

10 REM
20 PRINT"数あて"
30 A=5
40 INPUT B
50 IF A=B THEN GOTO 130
60 LET X=X+1
70 IF A>B THEN PRINT "もっと大きい"
80 IF A<B THEN PRINT "もっと小さい"
90 IF X=5 THEN GOTO 110
100 GOTO 40
110 PRINT "答えは5です"
120 GOTO 140
130 PRINT "正解"
140 END

実行できません。どこがおかしいのですか？教えてください。
INPUT"ﾌﾟﾚｲﾔｰの人数は？";P:IF P<1 THEN GOTO Z
INPUT "上限は？";L:IF L<P THEN GOTO Z
CLS
PRINT "決定！"
PRINT "人数は";P;"人！"
PRINT L;"を言ったら負け！":PRINT
PRINT "ｽﾀｰﾄ!!"
FOR I=1 TO L
FOR K=1 TO P
PRINT "現在";I;"周目"
PRINT "ﾌﾟﾚｲﾔｰ";K;"の入力"
INPUT "(入力は1〜3まで)";D
IF D<1 THEN GOTO Z:IF D>3 THEN GOTO Z
S=S+D
IF S>=L THEN GOTO B:PRINT
PRINT "今の合計は";S;"です"
CLS
NEXT K
NEXT I
LABEL B
PRINT "残念！":PRINT
PRINT "合計が";L;"を超えました"
PRINT "よってﾌﾟﾚｲﾔｰ";K;"の負け！"
END
LABEL Z
CLS
PRINT"ふざけるなYO!!"EEND

PRINT"ふざけるなYO!!"EEND
↓
PRINT"ふざけるなYO!!"
END

10 INPUT "ﾌﾟﾚｲﾔｰの人数は？", P
20 INPUT "上限は？", L
30 CLS

40 PRINT "決定！"
50 PRINT "人数は";P;"人！"
60 PRINT L;"を言ったら負け！"
70 PRINT "ｽﾀｰﾄ!!"

80 LET Z=Z+1
90 IF P>=Z THEN GOTO 110
100 LET Z=Z-P
110 PRINT "プレイヤー";Z;"の入力"
120 INPUT "(入力は1〜3まで)";D
130 IF D=3>4 THEN GOTO 120
140 LET S=S+D
150 IF S>=L THEN GOTO 190
160 CLS
170 PRINT "今の合計は";S;"です"
180 GOTO 80
190 PRINT "残念！"
200 PRINT "合計が";L;"を超えました"
210 PRINT "プレイヤー";Z;"の負け！"
220 END
これでええよ

訂正
10 INPUT "ﾌﾟﾚｲﾔｰの人数は？", P
20 INPUT "上限は？", L
30 CLS

40 PRINT "決定！"
50 PRINT "人数は";P;"人！"
60 PRINT L;"を言ったら負け！"
70 PRINT "ｽﾀｰﾄ!!"

80 LET Z=Z+1
90 IF P>=Z THEN GOTO 110
100 LET Z=Z-P
110 PRINT "プレイヤー";Z;"の入力"
120 INPUT "(入力は1〜3まで)";D
130 IF D=3>4 THEN GOTO 230
140 LET S=S+D
150 IF S>=L THEN GOTO 190
160 CLS
170 PRINT "今の合計は";S;"です"
180 GOTO 80
190 PRINT "残念！"
200 PRINT "合計が";L;"を超えました"
210 PRINT "プレイヤー";Z;"の負け！"
220 GOTO 250
230 PRINT "ふざけるなＹＯ!!"
240 END

>>68
ありがとうございました〜

訂正2
130 IF D=3>4 THEN GOTO 230
は
130 IF D=>4 THEN GOTO 230

220 GOTO 250
は
220 GOTO 240

個人的に面白そうだったから作ってみた。

>>70
またまたありがとうございます〜

なんかBASICで作れるゲームのアイデアないですか？
BASICのアプリ見つけてからハマってしまったw
500文字しか入らないけど

>>62辺りを参考に作ってみました。無駄が多いと思いますが、見てやってください。


PRINT:PRINT"数当てゲーム！":PRINT
LABEL A
PRINT"数字入力":INPUT"（0〜50）"; N
IF N>50 THEN GOTO Z
CLS
PRINT "スタート！":PRINT
LABEL B
X=X+1
PRINT X;"回目入力":PRINT"いくつ？":INPUT"（0〜50）";M
IF M>50 THEN GOTO Y:IF N>M THEN GOTO I:IF N<M THEN GOTO J:IF N=M THEN GOTO K
LABEL I
CLS
PRINT"小さいよ":PRINT:GOTO B
LABEL J
CLS
PRINT"大きいよ":PRINT:GOTO B
LABEL Y
CLS
PRINT"0〜50だってば":PRINT:GOTO B
LABEL Z
CLS
PRINT"0〜50だってば":PRINT:GOTO A
LABEL K
CLS
PRINT:PRINT"正解！":PRINT:PRINT"答えは【";N;"】":PRINT "挑戦回数";X;"回"
END

>>71
ここで流行っている「数当てゲーム」だけど。
この数当てゲームを「一定の割合でコンピュータが嘘をつく」ように
変更してみて！

>>73
どうでしょうか。>>62を参考にさせていただきました。試してないんでアレですが…(汗
答えは25、チャンスは50回で、五回入力毎に嘘をつくようになってると思います。


10 REM
20 PRINT"数あて"
30 A=25
35 READ U
40 INPUT B
50 IF A=B THEN GOTO 130
60 LET X=X+1
65 IF A=U THEN GOTO 150
70 IF A>B THEN PRINT "もっと大きい"
80 IF A<B THEN PRINT "もっと小さい"
90 IF X=50 THEN GOTO 110
100 GOTO 40
110 PRINT "答えは25です"
120 GOTO 140
130 PRINT "正解"
140 END

150 IF A<B THEN PRINT "もっと大きい"
160 IF A>B THEN PRINT "もっと小さい"
170 IF X=50 THEN GOTO 110
180 GOTO 35

190 DATA 5,10,15,20,25,30,35,40,45

ちなみに、１０までの乱数を出すのは
10 X=INT(RND(1)*9)
20 PRINT ;X
でOK.なので、

10 REM
20 PRINT"数あて"
30 A=5
40 INPUT B
50 IF A=B THEN GOTO 130
60 LET X=X+1
70 IF A>B THEN PRINT "もっと大きい"
80 IF A<B THEN PRINT "もっと小さい"
90 IF X=5 THEN GOTO 110
100 GOTO 40
110 PRINT "答えは5です"
120 GOTO 140
130 PRINT "正解"
140 END
こう見えても中三です。おじさん臭いですかね？

>>76
むしろガキ

10 REM
20 PRINT"数あて"
30 A=67564
40 INPUT B
50 Y=INT(RND(1)*11)
60 IF Y=5 THEN GOTO 150
70 IF A=B THEN GOTO 10
80 LET X=X+1
90 IF A>B THEN PRINT "もっと大きい"
100 IF A<B THEN PRINT "もっと小さい"
110 IF X=50 THEN GOTO 130
120 GOTO 40
130 PRINT "答えは67564です"
140 GOTO 0
150 IF A<B THEN PRINT "もっと大きい"
160 IF A>B THEN PRINT "もっと小さい"
170 GOTO 40
180 PRINT "正解"
190 END
ごめ、間違えた。
ちなみにA=の後変えれば当てる数字が変わる。
50 Y=INT(RND(1)*11)の11で、確立が変わる。
110 の�]が、回数

>>74
それじゃ面白くないよー。嘘をつく場面が限定されているし…。
乱数を使ってランダムに１／５の割合で嘘をつくとか、最初の数値も
乱数で決定するとかしないとゲームにならないな。

>>79
まあ確かにそうかもしれない。
ちょっといまドラクエ５（SFCのｗ）やってるので、経験値を出すのを作ってみた。
http://uploader.org/normal/data/up5163.txt

Auto 10

>>80にはいかないで。

なつかしいなぁ
漏れは高校入ったときに弟の技術の教科書でBASICが乗ってたのでそれで覚えた。
自宅にファミベがあったんだが、LINE文とか

教科書か。

N88BASIC の書籍ってありますかね今も

N88(互換）BASICの大作プログラムUP希ｳﾞｫｧｰﾝ

Ｎ８８ＢＡＳＩＣの職がないのですが・・・大型店行ったのに・・・・
鬱　　みんあーーーーーーーーーーーー

今時N88-BASICを使う職があるほうが奇跡。

書籍は、古本屋で探したほうが懸命ですか。？

いくら何でも絶版だろうなあ。。。
手元を探したら二冊ほど残ってたけどｗ

機械工学や建築・土木工学の専門書で数値計算を扱ってる本の中には
N88-BASICを使っていてまだ絶版になっていないものがいくつかある罠。

ブックオフに突撃ます

ブックオフフウフｈッフフフフフフ

「Ｎ８８互換BASIC」で、PUT KANJI命令が、
構文エラーとか、定義されていないエラーになるのですが・・・・・
いや、間違っていないです、何ｄも見直しましたし・・・・

>>94
互換BASICが互換になってないんだろ。
エミュレーターで動かした方が確実だ。

>>88
機械の制御コマンドをBASICで記述しているメーカー（特に下請け）も多いわけだが。
>>86
N88BASIC＞＞＞＞（超えられない壁）＞＞＞＞（次元の狭間）＞＞＞＞N88（互換）BASIC

10 REM
20 PRINT"数あて"
30 C=INT(RND*100)+1
31 D=C-5+INT(RND*11)
40 INPUT B
41 IF INT(RND*4)=1 THEN A=D ELSE A=C
50 IF A=B THEN GOTO 130
60 X=X+1
65 IF A=B THEN GOTO 150
70 IF A>B THEN PRINT "もっと大きい"
80 IF A<B THEN PRINT "もっと小さい"
90 IF X=50 THEN GOTO 110
100 GOTO 40
110 PRINT "答えは";C;"です"
120 GOTO 140
130 PRINT "正解"
140 END

この数当てはおよそ４回に１回は嘘をつきます。

>>97
おかしいようなので修正してみた。
10 REM
20 PRINT"数あて"
30 C=INT(RND*100)+1
40 INPUT B
41 A=C
42 IF INT(RND*4)=1 THEN SWAP A,B
50 IF A=B THEN GOTO 130
60 X=X+1
70 IF A>B THEN PRINT "もっと大きい"
80 IF A<B THEN PRINT "もっと小さい"
90 IF X=50 THEN GOTO 110
100 GOTO 40
110 PRINT "答えは";C;"です"
120 GOTO 140
130 PRINT "正解"
140 END

その気になれば、FC版ドラクエ並のソフト作れる、か・・・

>>99
メモリさえ許せば十分可能。

ボコスカウォーズはBASICだったらしいね。

>>98
ｻﾝｽｺ。

でも、漏れの実装した嘘をつくというのは
「本物の答に近いニセの答が用意してあって、一定の確率で
本当の答ではなくニセの答との比較結果を教える」
というものっす。

>>101
なるほど。そんな感じもしたんだけど、入力値が答えの付近でないと
嘘になることがなく、「『およそ4回に1回』ではないのでは？」と思ったので。

N88BASIC、99BASIC、ACTIVEBASIC あたりがフリーの最高峰ですか・・・

10 if >>1-1000=ぬるぽ then print "ｶﾞｯ"
20 goto 10

EPSON N88BASIC が懐かしい
バスマウスのドライバーをアセンブラでロードして・・・
windowsまがいのものを作ってた（マルチタスクではない）

>>105
俺と同じようなことしてるやつがいた・・・・
俺は割り込み使わないマウスドライバ作って使ってた
半角が6x12ドットのDOS窓とか・・・

ってそれは BASIC じゃなかったな
BASIC では・・・大したことはしていあい

　

N88BASICで入力と出力が全く同じになる文があります。それは何でしょう？

mid$?

直接入力で１行命令を書いて、入力と出力が同じになるプログラムです。

例）PRINT "PRINT・・・

ちなみに、OKを考えなくていいのなら簡単な答えがあります。

保守age

Syntax Error

>>112
正解です。

10 list

それだとrunが必要です。
PRINT文を使うということで。

MONでマシン語モニタになるのがよかったな。
WinXPもそうなりゃオモロイのだが…

CLS 3 画面上の文字と絵の両方を消す

LOAD "〜" プログラムを呼び出す

TM

>>116
debug.exe

すみません。どなたか↓これ↓をコンパイルできるコンパイラーを知りませんでしょうか？


10 rem 2次方程式の解
20 input "a,b,c=" ;a,b,c
30 d=b^2-4*a*c
40 if d<0 then goto 100
50 r=sqr(d)
60 x1=(-b+r)/(2*a)
70 x2=(-b-r)/(2*a)
80 print x1,x2
90 goto 110
100 print "解なし"
110 end

>>120
WinBASIC

>>120
BASICC.COM

age

>>110
どうすれば入力と出力が同じになるかわからない(-＿-)ｳﾂﾀﾞｼﾉｳ

>>124
もう答え出ている

>>121
>>122
すみません。DLできるページを貼ってもらえないでしょうか。

ActiveBasicはN88BASIC互換らしいよ。

すみません。できました。本当に迷惑かけました。皆さんありがとうございました。

一つ質問させてください。
この前、ＮＥＣのホームページにＭＳ−ＤＯＳのＮ８８ＢＡＳＩＣがあったんですが、これは今のパソコンでも使えるのでしょうか？
初歩的な質問ですいません。

「ハニリイト」とか「リニトカ」の悲しい記憶が・・・

>>129
98エミュを使えば動く。
それ以外はPC-98でなければ動作しない。

誰か、キーを押したらキーコードを出力するプログラムを、
BASICか、WSHで作成してください。

>>132
N88BASICで? 作るのはいいけど公開する手段がないなぁ。
なんせ、LANなんてない時代だし5.25"のFDドライブがWindows端末にないし。

Re:>133 どうもキーコードを返す関数が分からないのです。どこかに情報ありませんか？

>>129
どこにあるの？

Re:>134 INP

　　　　　　　　　　　　　　　　　　　　　　 ,
　　　　　　　　　　　　　　　　　 　 　　,／ヽ
　　　　　　　　　　　　　　　　 　 　 ,／　　　ヽ
　　　　　　　　　　　 ∧＿∧　　,／　　　　　　ヽ
　　　　　　　　　　　（　´∀｀）,／　 　　　　　　　 ヽ
　　　　　　　　　　　（　　つつ@　 　　　　 　　　　　ヽ
　　　 　 　 ＿＿　 ｜ ｜　|　　　 　　　　 　　　　　　 ヽ
　　　　　　|――|　（_＿）＿）　　　　 　　 　　　　　　　　ヽ
￣￣￣￣￣￣￣￣￣￣￣￣|　　　　　　　　 　　　 　　　ヽ
／⌒＼／⌒＼／⌒＼／⌒＼|彡~ﾟ　゜~ ~。゜　~ ~　~ ~~　~ ~~　~ ~~　~~　~~
⌒＼／⌒＼／⌒＼／⌒＼／⌒＼彡　〜　〜〜　〜〜　〜〜　〜　〜
Q:釣れますか？
A:ええ、雑魚(>135)が一匹。

>>132
10 print "キーコードを出力したいキーを押してください。"
20 a$=input$(1)
30 print "キーコードは ";asc(a$);"です。"
40 emd

40行はendの間違い。

>>138
ファンクションキー押したらどうなったっけ？

>>140
ファンクションキーに割り当ててある文字が順番にキャッシュに入るだけ。

Re:>138
どうもありがとうございます。
これでスラッシュの隣のバックスラッシュを押したら255が出ました。
やっぱり私の環境に異常があるようです。

誰かこのプログラム作ってください。お願いします。

正六角形の中心から対角線方向を選んで進むランダム・ウォークを行うプログラムを次の二通りで作成する。
　１）　サイコロで方向を決め、IF文で各方向に移動距離を計算するプログラム。
　２）　最初に６方向の移動距離を計算して配列（ＤＩＭ）に保存し、利用するプログラム。

宿題は宿題スレへ

祝 N88(.NET)-BASIC 発売決定

まじ？

N88互換BASICでCドライブにある画像をBLOADで読み込むにはどうやったらいいの？

10 bload "null",s

N88互換BASICはぜんぜん互換じゃないところがﾜﾛｽ

N88互換にはお世話になったぜ。
すばらしい遅さだったが・・・

まだPC98エミュレータで動かした方がよくなかったか？

　　　　　　　　　　　 ＿
　　　　　　　 r-､' ´　　 ｀ヽr-､
　　　　　　　ｨ7　/l: ハヽﾊ ﾄヾ 　　 名スレを沈めることは、この俺が許さん！
　　　　　　　 '|l |'´_`　´_ ｀| || 　　　信念に基づいて行動する。
　　　　　　　 |　|´ﾋ} 　 ﾋ}｀! l|　　　 それを人は正義と言う。
　　　__ノﾞ).　从 l,　　_'_. 　|从　　　 今俺が行ってることは、荒らしではない。
　,_'（＿ ﾉ_ヽ　ヾl.＞ - ,イ;ﾘ 　　　　正義という名の粛清だぁ！
　{ f:ﾃ} {'f:ﾃ}',／＼ヽ--/／ヽ 　　　
　ヽ,r─‐ ､ｨ .､､ i l＞Y＜! i　'､ 　　　バーニング！
　/ iゝ＿ﾉ iヽ　/l　　 |l　　l 　 ',
　lﾝヽ/ムノじ

　 ●　　　　ワタシカ゛　イナイヨウタ゛カラ　イチオウ　アラワレテ　ミマシタ。
＜■＞
／　 ＼

おいおまえら、元ＣＳＫの金山昇一が逮捕されそうな勢いだぞ。
ＣＳＫ世代は読んでみれ。

http://www.tanteifile.com/diary/index_shibaru.html

N88BASICを使って機械を動かすプログラムを組むことは出来ますか？

>156
すいません、N88互換BASICの間違いでした。

>>157
無理に決まってるだろ。
馬鹿か。

>>157
できるよ
もちろんI/Oから先は自力になるけど

ペイント文だけでガンダム書いた俺は神ですか？

いいえ、グラフィックキャラクタでガンダムを書いた私こそが神です。

>>25
XPで動く模様。
ちなみに俺が使ってるのはXPのHomeEdition版

>159
OUTとINPが使えないようなので困っているのですがどのようにすればいいですか？
もし、迷惑でなければ教えてください。

>>163
自分でドライバ作って自力で実装しろって事だろ。

機械語モニタでI/O命令を書けと。

･･･えっ、互換BASIC？IOPLが0だから無理。
I/O命令はカーネルモードじゃないとダメポ。

いや別に、シリアルポートでも使えばデバイスを開けるべさ。

シリアルの先にH8でも繋げば大概のことはできるだろ＞機械制御

シリアルの制御はドライバイランのか？
パラレルはドライバが必要だが。

厳密に言うと標準のシリアルポートでもデバイスドライバは必要だが
通信するだけなら大抵"COMn"のOPENでおｋ

そこでKe386SetIoAccessMapですよ(廃止されたけど)

giveio.sysを使って・・・ってBASICからじゃ無理か。

これなら2000/XPでINP/OUTが使えるようだが↓
ttp://www.dennougumi.co.jp/products/basic98/ver5/index.html

２６年前にN-BASIC(PC-8001用)で書いたプログラムを
改訂しつつ、今も使ってる私は　神　？

大学あたりじゃ普通だろ

N88　Basicの課題なんでけど・・・＾−＾；
プログラム全然わからなくて＞＜教えてくださぃ・・・(´･ω･`)

１、配列に以下の値を代入して以下の計算をしなさい。
　　111+112+113+114+115+116+117+118+119+120+121=?
配列に代入した値も表示する。

２、配列に適当な値（15〜19ぐらい）を代入（読み込む）しその値を出力
　　する。総和、平均、標準偏差を求め出力しなさい。配列内の値を小さい
　　順に並べて出力しなさい。

(´･ω･`)

宿題は宿題スレへ。

・・・答えられる奴いるのかなあ（大藁
案外居そうな気もするが。

>>174
１．
100 DIM N(10):M=0

110 FOR I=0 TO 10
:N(I)=I+111:PRINT I+111: M=M+I+111

120 NEXT:PRINT M

２．
200 DIM X(2)
210 FOR I=1 TO 2:INPUT X(I): PRINT X(I):NEXT
220 T=X(1)+X(2):A=T/2:S=SQR((X(1)-A)^2+(X(2)-A)^2)
230 PRINT T,A,S
240 IF X(1)>X(2) THEN PRINT X(2),X(1) ELSE PRINT X(1),X(2)

(ノ゜ω゜）ノ＊．オオォォォォォォォー
ご丁寧にありがとうございます<(＿ ＿)>
また機会がありましたらよろしくお願いいたします・・・。
ｳﾜｧｧ-----｡ﾟ(ﾟ´Д｀ﾟ)ﾟ｡-----ﾝ!!!!

いや、君もう来なくていいから。

ｶﾞ━━ΣΣ(ﾟДﾟ;)━━ﾝ

俺の歴史

N88日本語BASIC(86) DISK-BASIC期
　　１．マイコンBASICのプログラムをチマチマ入力して遊ぶ（ｼﾞｬﾝﾋﾟﾝｸﾞｱｯﾀｸ？が秀逸）
　　２．モニターモードで遊ぶ
　　３．I/O掲載のホバーアタック・ルーサイトのマシン語をチマチマ入力
　　４．GDCのI/Oを弄って遊ぶ

MS-DOS期
　　１．DOSは、これまでの資産がほとんど使えないので放置される
　　２．Turbo C＆Turbo Assembler を学割で買う（6000円くらいだった？）
　　３．N88日本語BASIC(86)DOS版を買うが、モニターモードがないので放置
　　４．Cにはまる

Win3.1期
　　１．Winのプログラムがわけわかめで、プログラムとの決別宣言
　　２．でも、ちょっとやってみようかなと、Borland C++を買う
　　３．他人ライブラリを使う事に抵抗を感じるも、WinGを使う

Win95〜期
　　１．Winにも成れてきたが、気が乗らないのでプログラムは放置される
　　２．Delphiが気になるが、Pascalが分からない・・・。
　　３．C++Builder登場！早速購入！（待ってたのよ、こんなツールを）
　　４．DirectXで遊ぶ
　　５．仕事でN88日本語BASIC(86)のプログラムに触れ、懐かしさに涙す
　　６．ゲーム改造ツール職人と化す

そして現在
　　１．I/O掲載のホバーアタックが移植できないかと画策中

宝物：98ハードに強くなる本 ハードウェア・テクニカルガイド 2
　　　 PC-9801プログラマーズBible

>>180
> １．I/O掲載のホバーアタックが移植できないかと画策中

是非お願いします。

モニターモードって何だっけ？

>>182
mon
*

これのことじゃね

ちなみに
*G0
でリブートしたよね。

俺の歴史
10 '前処理
20 FM-NEW7を買ってF-BASICにはまるが、マシン語のサブシステム乗っ取りは難しくて手を出さず。
25 プロポシェのPF-Xを打ち込んでゲーム書きまくり。
30 '88
40 PC-8801を買って、ナツメ社のLOGOSを入手してゲーム書きまくり。
50 '88V2
60 PC-8801MHを買って、テンポずれと戦いながら音を鳴らして遊ぶ。
70 '98
80 大学のPC-9801DAで音を鳴らすも、長い音符が短く鳴ると言うバグに萎える。
90 PC-486SRを買い、同時にQuick BASICを入手。
100 行番号なしやブロック構文にとまどうも、すぐになれて便利さに感動。
110 ドットの雪を降らすプログラムで、400ドット同時くらいいけて32ビットパワーに驚く。
120 Oh!Xの特集をたまたま読んでフラクタルにはまるが、当時はFPUがなくて遅かった。
130 'VB
140 仕事でVB2初体験。何をどこから書き始めてよいのやらもわからず絶望する。
150 VB4,5,6で順調に仕事。
160 仕事仲間がGoSub...ReturnやDefIntを知らないことにショックを受ける。
170 ローカル変数宣言のDimって何の意味？とか聞かれてショックを受ける。
180 Mid$(Date$, 6, 2)という今月の取得コードを見て懐かしさを感じる。
190 しかしよく見るとMid(Date, 6, 2)と$が抜けており、Dateが環境依存の文字列を返すのでバグっていることに気づいてショックを受ける。
200 'VB.NET
210 仕事の都合でC#になったのでついにBASICとサヨウナラ。
220 While...WendがVB.NETでなぜか生き残り、あまつさえExit Whileという強化機能まで付いているのを見てショックを受ける。
230 Do While...Loopでいいじゃん。
240 「VB.NETでは行番号の後ろにはコロンを付けます」という説明を読んで違和感を覚える。
250 正確には「行番号は廃止され、代わりに数字だけのラベルを使用できる」の間違いだろう。
260 未だに変数名の先頭をFNにすることに抵抗がある。
270 ちょっとした処理をN88互換BASICで書こうとしてVBScriptに落ち着く日々。

talk:>>184 Syntax error.

DEF SEGとかVARPTRとか言われた時点で投げた

>>186
そんな命令無視で良いじゃん

あれ使っても1MB分しかメモリ扱えんよな。
それよりもデカイメモリ扱う際はどうするんだ？

>>188
つ [I・Oバンクメモリ]

フロッピーはどうやってフォーマットするの？

システムディスクのフォーマットユーティリティでやる。

そういえば、アレのメッセージで「物理フォーマットしています」
とかでてたけど、論理フォーマットしてるようなメッセージなかったなあ、
とどうでもいいことを思い出した。

load "format.nip" だっけ？

How many files(0-15)?

10 FOR I = 0 TO 65535
20 POKE I , 0
30 NEXT I

>>192
確かformat.n88だったような。

>>195
そかそか。　なんとかnipってのなかったっけ？

モラミとかスナミとかリニトカとか
そんな思い出しかないんだがw
Syntax error

ﾑﾈ ｻﾜﾙ

TextSS　のWindowsXP(Professional)64bit対応化おながいします

もしくは64bitにネイティブ対応したテキスト置換ソフトありますか？

そういや64bitにネイティブ対応している２ｃｈブラウザてありましたっけ？

N88BASIC(x64)

N88BASIC(x88)

n88互換で作ったやつを
アクティブでやろうとするとエラー多発
初心者の俺には訳不明な件

>>202
DIM、RND、などなど記述がかなり違うからね。手に入るならF-basicのがいい。

んな事より98エミュレーターでDOS版のN88動かした方が確実！

ああ、何だ互換BASICで作ったやつを動かしたいわけか。じゃあこの方法じゃだめだな。

最近、PC-9801Eに繋いでた8"FDD用の巨大なフロッピーが出てきた。(藁

>>171
こんなスレあったのかと、はじめから読んでたら、
>>171
ttp://www.dennougumi.co.jp/products/basic98/ver5/index.html
が出てきてびっくり！
確か、構造化BASIC/98（？）とか何とか呼ばれてたやつの生き残りか？
これは、よくこけて、当時ほとんど使いものにならなかったな。

＋模様(？)が動き回るのがおもしろくて、
＋よく、マシン語VRAMにロードして走らせたな。
＋ある時、LINEDT.COM（うろ覚え）で作った大量のコードを、
＋保存もせず、客に自慢たらしく見せていて、
＋思わず、CLS [←┘]。

>>207
【昔取った】BASIC/98 Ver.5【杵柄】
http://pc8.2ch.net/test/read.cgi/tech/1114815249/

INPUTで入力した文字が
数字以外ならもう一度入力させるにはどうすれば？
初心者でゴメン

ROM-BASICでフロッピーをホーマットする命令は何だったっけ

10 INPUT A$
20 IF A$ <"0" OR A$>"9" THEN 10
30 B=VAL(A$)

みみずできたよ

10 cls
20 x=600:xa=0:y=400:ya=0:r=20:xaa=rnd:yaa=rnd
30 circle (x,y),r,,,,,F,2
40 if y>400 then yaa=-rnd
50 if x>600 then xaa=-rnd
60 if y<400 then yaa=rnd
70 if x<600 then xaa=rnd
80 xa=xa+xaa:ya=ya+yaa:x=x+xa:y=y+ya:r=r+0.01
90 if r>100 then 10 else 30

Ｎ８８のスレで検索がヒットして来ました

父親がＰＣ９８　ＭＳ　ｄｏｓ３．３の上でＮ８８ＢＡＳＩＣのプログラムを書いたものを今でも使用しています
Windows上でもＮ８８ＢＡＳＩＣのプログラムが動かせるソフトがあるということで
勉強してＷｉｎ機でも使用できるようにしてあげれたらなぁと思い
プログラムのソースをＰＣ９８のパソコンからＦＤにコピーもらったのですが
秀丸で開こうとすると　文字化けが発生してしまいソースを見ることができませんでした

ＸＰでコピーしてもらったファイルを開けるようにすることは可能なのでしょうか?
何か手順がありましたら教えていただけないでしょうか

>>213
えみゅ

>>214
返答有難うございます
詳しく教えていただけないでしょうか
まったく初めてＮ８８ＢＡＳＩＣをさわるものでして
ActiveBasicなどに入れてあげればいいという意味でしょうか

>>215
PC98エミュでぐぐれ。

有り難う御座います
エミュレータでどうにかなりそうかなと思っております

今後Cなどで父親のプログラムを書き直すかもしれないことも考え
プログラム自体をメモ帳などで開く方法を教えていただけないでしょうか？
よろしくお願いいたします

アスキーセーブされていればメモ帳で見れたんじゃなかったっけ？
メモ帳で文字化けしている辺り、文字コードはJIS？
ブラウザにD&Dすれば文字コードを判別して正しく表示してくれるはず。

バイナリセーブだとこいつでアスキー形式に出来る。
ttp://www.vector.co.jp/soft/win95/prog/se063951.html

あと、N88BASICとActiveBasicは完全に別物。むしろVisualBasicに近いか。

N88との互換性が（比較的）強いのは99BASICとか
市販品だとF-BASICやBASIC/98など（まだ売ってるかどうかは知らんが）

アスキー保存にしたところ問題なく　秀丸でも表示することができました
有難うございました

グラフィックLIOとディスクLIOについて教えてください

LIOの何を知りたいのさ。全部説明汁とか無理だぞ

OPENとかDSKIとかDSKOを使わずに
ディスクLIOでファイルを操作する方法が知りたいです

>>160-161
なぜ貴様らはモモを描きやがりませんか？