BASICで始めるプログラム

１ · 04/11/15 14:58:03

昔ながらのＢＡＳＩＣでプログラムを始めてみませんか。
基本的にこのスレを見るだけで話が完結するようにする予定です。

初心者スレは乱立しておりますが、ここはあくまでＢＡＳＩＣオンリーで
話を進めて行きます。

とりあえず最初にＢＡＳＩＣのツールを準備しましょう。
ツール
９９ＢＡＳＩＣ
http://www.sagami.ne.jp/tadaka/99Basic/
N88互換BASIC for Windows95
ttp://www.vector.co.jp/soft/win95/prog/se055956.html

参考リンク
はじめてのプログラミング講座
ttp://www.light-staff.com/prg/prg.html

関連スレ
【初心者歓迎】ｽﾚを立てる前にｺｺで質問を【Part6】
http://pc5.2ch.net/test/read.cgi/gamedev/1094627404/
【Ｎ８８？】９９ＢＡＳＩＣ【ＭＳＸ？】
http://pc5.2ch.net/test/read.cgi/tech/1099847305/
N88-BASICの神業
http://pc5.2ch.net/test/read.cgi/gamedev/1007371918/
ズブの初心者がゲーム作れるまで勉強するスレ
http://pc5.2ch.net/test/read.cgi/gamedev/1005132370/l50
今日から必死で～　　　
http://pc5.2ch.net/test/read.cgi/gamedev/1064146178/l50
【目標ない奴】おまいらに課題を与える。【集まれ】
http://pc5.2ch.net/test/read.cgi/gamedev/1026148930/l50

**受験生** ◆3VUXqvbfSY · 04/11/19 15:59:16

10 for i=0 to 9
20 print "ﾓﾅｰ",i+1,"が現れた！"
30 next i

の方がスッキリ

…それはそうと printって型が変わるとき,が必要だった気が…まあ僕がN88互換BASICなのが悪いのかもしれません

１ · 04/11/19 17:51:52

>>69
なるほど、そっちの方がすっきりしますね。

（　,　）とか（　;　）で囲った方が良いのかなー、と思いましたが、
>>68のままで走っちゃったので、
なんで囲むのか、とか説明するのが面倒になっちゃったので、
無しでやっちゃいました。
>>69のようにする場合だと、ちゃんと囲まないと走りませんね。

フォローありがとうございます。

**名前は開発中のものです。** · 04/11/20 23:36:23

先生！！このスレ見てBASICでプログラミングをしたくなってきますた！！

１ · 04/11/21 14:52:18

前回は１０匹のモナーが出てきましたね。
さてどうしましょう？逃げましょうか？皆ひっぱたきますか？
今回は何らかの選択肢を作りましょう。

10 input "1か2を選んで押して下さい";a
20 if a=1 then print "1を押したね":goto 50
30 if a=2 then print "2を押したね":goto 50
40 print "1か2以外を押しやがったな！やり直しだ！":goto 10
50 end

こんな感じが基本でしょうか。

inputはキーボードの何を押したか判定する命令文です。

１０行目の内容を説明します。
「　"　」チョンチョンをつける事で、同時にprintみたいに文字を表示させる事ができます。
で、表示の内容は、これから何を選択したら良いのか、と言う事を表示します。
今回は１か２を選択させます。
更に「　a　」と言う空き部屋を作りました。

２０行目では「if」と言う命令文も出てきましたね。
これは「もしも」って事ですので、以下の内容と併せて

もしも「　a 　」　の中身が1だったら

と言う事になってます。
で、「　a　」の中身が1だとしたら、"1を押したね"と表示して 50行目に行け。
って書いてある訳です。
大丈夫ですかね。

３０行目の内容は２０行目とほとんど変わりませんね。

１ · 04/11/21 14:59:02

４０行目ですが、
「　a　」の中身が１でも２でも無かった時にここに来ます。

実は２０行目や３０行目の最後に「５０行目に行く」と言う指令が出ていない場合は、
１や２を選んでもここに来てしまうんですけどね。

とにかく、４０行目に来てしまうと言う事は、
１や２以外の数字を押してしまった時と言う事になります。
想定外の答えを入れられた時にはどうするのか、と言う事も一応考えている訳ですね。
で、想定外の答えなので、やりなおしをさせる事にしました。

５０行目のendでこのプログラムを終了します。
今までは無しにしておりましたが、プログラムは「ここから始まりだよ」「ここで終わるよ」
と言う事をちゃんと命令しておくものなのです。
これからはちゃんと終わりを書いておきましょうね。

１ · 04/11/21 15:09:29

説明を忘れていましたが、：（コロン、点々とか呼んでもよし、キョンシーズみたいですが）をつけるとある程度続けてプログラムを実行する事ができます。

ではでは、今やったプログラムをちょっと変えるだけで選択肢とその結果の表示ができますね。

10 input "モナー達をどうしますか？（１：全員ひっぱたく　２：逃げるよ！）";a
20 if a=1 then print "モナー達は「逝ってよし！」と叫んで、泣きながら家に帰っていきました":goto 50
30 if a=2 then print "しかし回り込まれてしまった！":goto 10
40 print "1か2以外を押しやがったな！やり直しだ！":goto 10
50 print "あなたは「さあ！殺伐と牛丼でも食いにいくか！」と言いましたとさ"
60 end

今日の所はお終いです。
次は何をやりましょうね。

他の講師の方が来てくれると本当に助かるんですけど。

１ · 04/11/21 15:10:42

>>71
頑張って下さい！

１ · 04/11/21 15:14:58

更に補足です。

「　;　」（セミコロン、点とチョン）と「　:　」（コロン、点々とか呼んでもいいですが、スイカ頭とか呼ぶと他の人たちにわかりにくいのでちょっと駄目かも）
は似てますがちょっと違います。

気をつけてくださいね。

**受験生** ◆3VUXqvbfSY · 04/11/21 17:57:45

LOCATEを使い
簡単なテキストアドベンチャー
はどうでしょうか？

**名前は開発中のものです。** · 04/11/22 02:20:12

>>1
>10 input "1か2を選んで押して下さい";a
それだとreturnが必要だから、こうじゃないの？↓

1 for i=0 to 255:i$=inkey$:next
2 print "1か2を選んで押して下さい";
3 i$=inkey$:if i$="" then 3
4 a=val(i$)

昔はよくやったなぁ

**受験生** ◆3VUXqvbfSY · 04/11/22 12:15:38

まだ、inkey$は早いだろ…
256回も解放してるが…初心者には何の事やら解らないだろうし…
最初のは
1 if ""<>inkey$ then 1
の方が機能的

１ · 04/11/22 12:44:44

>>77
おお、良いっすね。

フォントのカラーを変えるとかgosub辺りも
使って行くと良い感じな気がします。

実は今から出張してしまうので、代わりに講義してくれたりすると助かりますです。

>>78

一応初心者にもわかりやすい部分から説明してますです。
inkey$も当然、そのうち触れるとは思いますけど、
受験生さんのおっしゃるとおり、まだちょっと早いかと。

１ · 04/11/22 13:02:39

一応定期的にそれまでやった講義の内容をまとめました。

・print ""
・基礎の計算、加減乗除
・代入の基礎、letは省略可能
・行の概念、goto命令文
・for ～　next
・input
・if ～　then
・end

次回辺りからはフォントの色変更、locate、gosub等を使って
簡単なテキストアドベンチャーを作りながら、ＢＡＳＩＣプログラムへの理解を深める。
と言う流れになる予定ですが、
「これをやった方がわかりやすいんじゃない？」
と言うのがありましたら、講義をお願いします。
講義をして下さる方は誰でも先生ですから。
宜しくお願いします。

**受験生** ◆3VUXqvbfSY · 04/11/22 13:23:47

>>80 了解しました。
では…基本の文字色変更から

例文:
10 for a=1 to 7
20 color a:print "代理講師を任された！"
30 next a

さて…新しい命令が有るのが解りますか？
そう、color命令です。
このcolor命令は多様な使い方が有りますが、取り合えずは color 色番号で文字色が変更出来ることを覚えて下さい。

色番号は
0が黒
1が青
2が赤
3が紫
4が緑
5が水
6が黄
7が白

となっています。

**番外編** · 04/11/22 14:06:17

色番号の秘密

次のようにイメージしてください
３つのスイッチがあります
スイッチは左から緑赤青の順でならんでいます
さらに緑=4、赤=2、青=1というなぞの数値を持っています

ここから紫の番号が何番か知ることができます
紫は赤と青の合成色です
スイッチにすると緑OFF赤ON青ONです
ここでONになったスイッチのなぞの数値を足してみます
赤と青がONなので2+1=3ですね
そう紫は3です

試しに黄色はどうでしょう
黄色は緑と赤の合成色です
緑ON赤ON青OFF
なぞの数値をスイッチにあわせて足していきます
4+2=6
黄色は6ですね

こういったルールで色番号というのは決められています
丸暗記でもいいですけど、豆知識程度に覚えておくといいと思います

**名前は開発中のものです。** · 04/11/23 18:19:10

教えたい人しかいないスレってここですか？

**名前は開発中のものです。** · 04/11/23 21:25:02

おれ教わりたい

**名前は開発中のものです。** · 04/11/23 21:40:48

おなじく教わりたい。

BASIC、ポケコン使って子供の遊戯王カード用プログラムとか書いてるけど、ほんとに基本的な文法使うだけで冗長なプログラムになってるし。もっとまとまった感じのカッコイイプログラム書きたいので、講師のかたがたよろしくです！

**名前は開発中のものです。** · 04/11/23 21:56:28

ソースさらせば誰かがきっと助言してくれるよ。

85とかいまさらBASICで何やりたいの？

**名前は開発中のものです。** · 04/11/23 22:50:54

特に何がやりたいとかはない
でもなんか楽しい

**受験生** ◆3VUXqvbfSY · 04/11/24 12:23:37

色々な意見が有るようですが
私は代理講師なので……何とも言えません
ただ、恐らくスレ主様は見てくれている方がいらっしゃる限り止めないと思うので、私も止めません。

さて、本日はlocate命令です
例:
10 width 80,20 '画面のサイズをN88BASICに合わせる
20 for loops=0 to 19
30 locate loops*4,loops '位置確定
40 for wait=0 to 999:next wait
50 print "ニヤ"
60 next loops

実行してみて下さい
ニヤが画面を斜めに切るはずです

新しい命令は二つ
width命令は画面サイズを変更する為の命令です。N88BASIC環境に合わせるため
よこ80文字、たて20文字の設定にしています。

locate命令は文字を表示する位置を指定します。上記の設定にすると左上の座標が0,0となり右下の座標が79,19となりますね。

**受験生** ◆3VUXqvbfSY · 04/11/24 14:28:27

とりあえずノルマを終わらしちゃいますか。
と言うことでgosub命令もやりましょう
これでだいぶ冗長的なコードから脱却できますよ。

例:
10 width 80,20:cls '画面を綺麗に
20 '階乗(m!)を求める
30 *main 'メイン
40 input "入力値の階乗を行います。整数m=";m
50 gosub *factorial
60 print "結果は";Ans;"になりました。"
70 goto *main
100 *factorial
110 Ans=1
120 for loops=m to 1 step -1
130 Ans=Ans*loops
140 next loops
150 return

コードが長めなので詳しくは次に書きますが、重要なのはgosub ～ returnです。
このようにして、N88BASICは見かけ上、コードを分割する事が出来ます。

gosubラベルでプログラムは指定されたラベルへ飛び、return命令でgosubが実行された所に返ってきます。

**名前は開発中のものです。** · 04/11/24 14:43:19

>>89
嘘を教えちゃいかん

**受験生** · 04/11/24 15:00:47

あれ？
80,25でしたっけ？

**受験生** ◆3VUXqvbfSY · 04/11/24 15:15:13

ああ！画面サイズ！
いや…あの～
N88互換BASICではwidthを変更すると文字サイズでなくウィンドウがﾘｻｲｽﾞされるんですよ。

う～済みません。

１ · 04/11/24 21:57:49

ども、ただ今戻りました。

受験生さん、講義ありがとうございました。
文字色の変更、とてもわかりやすかったです。

一応受験生さんの講義に補足をさせて頂きますと、
コメントと言いまして、プログラム中で、何を行っているのかを
わかりやすくする為に書き込む時に使うのが
「　' 　」チョン、これです。
改行するまでが、コメントとして扱われます。
あまりに細かくコメントを書くこともありませんが、
ある程度何をやっているのか、大雑把でかまいませんので、コメントを書くと良いです。

次に僕なりのlocate の説明を。
locateは文字の座標の位置を示す命令文で、
座標の基本は受験生さんの仰る通り、ウィンドウの一番左上の角っちょがＸ軸（横軸）０、Ｙ軸（縦軸）０になります。
数学とかで習ったのとはちょっと違う部分がありまして、Ｘ軸は、数字が増える度に１つ分づつ右に増えるので、わかりやすいのですが、
Ｙ軸は数字が増えるほど、上ではなく、　”　下　”　に向かって行く事になります。
わかりやすいように以下のプログラムを書いてみました。

10 for i=0 to 9
20 x=i:y=i
30 locate x,y
40 print "x"x,"y"y
50 next i

わかりづらい人の為に下のように書いておきました、要するにやってる事はこう言う事です。
10 locate 0,0
20 print "x 0""y0"
10 locate 1,1
20 print "x 1""y1" 'これを１０まで繰り返す

１ · 04/11/24 22:03:18

えーと、

x 0　　　　　　　　　　　　y0
　x 1　　　　　　　　　　　y1
　　x 2　　　　　　　　　　y2

みたいに表示されたはずです。

ｘ　の位置が　横。
ｙ　の位置は　縦。

どうでしょう？少しわかりづらいですかね？
自分で試してみるとわかりやすいかもしれません。
ともあれ、locateを使うと文字の位置を自由に変えることができると言うことがわかりましたね。

今日はこの辺で。

明日は、受験生さんのやって下さったgosubと、ウィンドウのサイズ変更等をやるかもです。
受験生さんは、受験生さんで、お好きなように講義を進めて下さって結構ですので、どうかお願いします。

**名前は開発中のものです。** · 04/11/24 22:06:18

>>1 はもういいよ。
文書がだらだら長くて判りにくいし。

１ · 04/11/24 22:11:09

>>94の下の部分の行数が失敗でしたね。

10 locate 0,0
20 print "x 0""y0"
30 locate 1,1
40 print "x 1""y1"
60 locate 2,2
70 print "x 2""y2"
80 locate 3,3
90 print "x 3""y3"

こんな感じですね。
場所を指定して、ＸとＹの場所がわかるようにしてあります。

０、Ｘ１，Ｘ２，Ｘ３，Ｘ４，Ｘ５
Ｙ１
Ｙ２
Ｙ３
Ｙ４
Ｙ５

みたいになるほうがわかりやすかったですかね。

１ · 04/11/24 22:12:16

>>96
だから、なんであなたが文章のまとまったわかりやすい講義をしてくれないのかが、不思議で仕方ないのですが。
あなたが講義してくれれば皆が幸せなはずなのに。

**名前は開発中のものです。** · 04/11/24 22:22:08

別に文章が長いと感想抱いたからって、
文章が書けるわけないだろうて

１ · 04/11/24 22:25:38

やー、人に言うぐらいなら当然、できて然るべきなはずですから。

47 · 04/11/24 22:43:51

センセー講座のリクエストです。
ネタ切れの時にでもやって頂けると嬉しっす。

飛び先に行番号しか指定出来ない( *ラベルが使えない)BASICで
なるべくスパゲッティーにならないようにするノウハウをご教示下さい。

**受験生** ◆3VUXqvbfSY · 04/11/25 00:19:28

まず、変数表を作る
次に飛ぶ番号にコメントでサブ名を書く

飛ばす方もどこに飛ばすかコメントを書く

なるべく細かく分けるべし
拡張性を持たせたいなら、サブ内はサブ内のみの変数を使うべき。渡す変数もそのサブ用に用意

疑似構造化がｱﾝﾁｽﾊﾟへの道

**名前は開発中のものです。** · 04/11/25 04:44:04

サブルーチンコ

**受験生** ◆3VUXqvbfSY · 04/11/25 15:39:10

>>47さんはどのようなソフトを製作中なのでしょうか？
お手伝いしますよ！

暇ですから orz

**名前は開発中のものです。** · 04/11/26 01:11:01

20年前を思い出させるスレやな・・・
次スレは「Z80で始めるプログラム」にしれ。

**名前は開発中のものです。** · 04/11/26 12:08:45

ゲーム製作技術板・・・

47 · 04/11/27 00:25:09

受験生さん、丁寧な解説有難うございます｡

MSX-BASICは古雑誌のプログラムリストを打ち込む事くらいでしか
使ったことがありません。
あんな短いソースで立派にゲームになってしまうのが不思議です。
前にミニゲームでも作ってみようとしたけど、言語の制限が結構
厳しくて途方に暮れてしまいますた。
とは言え、こういう箱庭的環境はなかなか新鮮です（リアルタイムに
体験しなかったせいか、憧れのような感覚を持ってる）。
講義が済んだら自作もやってみようかって思ってます。

１ · 04/11/29 10:49:32

明日、とか予告しておいてさぼっちゃいました。
まあのんびりやりましょう。
しかも予定していた内容とは違う事を書きます。

えーと、今日やる命令文は結構数が多いです。
だけど、結構どれも関連していると言うか、まあ使う機会が多いと思います。
命令文って程の物でもないような物もありますが。

cls

と入れてみましょう。
画面が綺麗さっぱりしました。
これは「CL」ear 「S」creen　クリアスクリーンの略らしいです。
プログラムの中で、画面を綺麗にしてから、描画をする時とかに使います。

次にコーディング（タカタカとプログラムを打ち込む事）をして、実行した後に、
今まで打ったコード（プログラムの中身）を見たい時には

list

と打ちます。
今まで打ったプログラムが表示されたはずです。
これは基本的には表示されるだけですんで、修正をしたい時には

edit

を使います。
「あー、もうだりぃ！最初からやり直す！！」とか言うときには

new
を使います。

１ · 04/11/29 10:56:12

new

を使うと、今まで打ったコードが完全に無くなります。
やり直す時にだけ使いましょう。

プログラムの中で使うと、プログラムを実行している途中で、全てのプログラムを消してしまうと言う恐ろしい命令なので、
やり直す時ぐらいにしか使いませんが。

次に、保存の方法です。

save

と打つだけです。簡単簡単♪
保存したデータを呼び出す方法も、もうわかるでしょう？

load

と入れるだけです。

基本的な物ばかりですが、絶対に覚えておきたいのはclsぐらいで、
他の物は「こういう事ができるんだ」程度の事だけ知っておいてもらえば、
皆さんが必要になった時にだけ、このレスを見直すなり何なりして、使っていくうちに覚えると思います。

次回こそ予定通り、gosub等の説明になると思います。

**名前は開発中のものです。** · 04/12/01 07:24:12

変数を箱に例える教え方なんだけど
全くの初心者は箱（変数）に値が１つしか入れれないということを教えないと
いくつでも箱（変数）に入ると思う人間がいる
例えば、

a = 1
a = 2
print a

で 2 しか表示されないのは何故？ 1 も入れたのに～～ってなるｗ

**名前は開発中のものです。** · 04/12/01 15:36:52

>>110
代入が LET 文であることは、BASIC のいい点の１つだと思う。
あと、値に名前をつけると教えた方が経験的に混乱が少ない。

**名前は開発中のものです。** · 04/12/01 15:45:20

数学の変数ｘｙｚとかと同じ、では問題があるの？

**名前は開発中のものです。** · 04/12/01 16:05:13

>>112
数学は等式
こっちは代入
数学で>>110の式はありえない

**名前は開発中のものです。** · 04/12/09 07:32:29

・・・漏れのサイトがテンプレにある･････

**名前は開発中のものです。** · 04/12/13 15:33:34

age

**名前は開発中のものです。** · 04/12/15 15:36:58

４つの数字をいれて大きい順に並べ替えて表示する　プログラムを教えてください！！

**名前は開発中のものです。** · 04/12/17 13:19:44

こんな感じ? 長いことBASIC使ってないから細かいところは忘れた

N=4:DIM A(N)
' 入力
FOR I=1 TO N:INPUT "数字を入力してください。";A(I):NEXT I
' 大きい順にソート
FOR I=1 TO N-1
FOR J=I+1 TO N
IF A(I)<A(J) THEN SWAP A(I),A(J)
NEXT J
NEXT I
' 出力
FOR I=1 TO N:PRINT A(I):NEXT I
END

**名前は開発中のものです。** · 04/12/18 16:21:44

このスレ終了？

**名前は開発中のものです。** · 04/12/26 18:59:17

>>1
またBASICで構造化もオブジェクト指向も理解できない連中作るつもり？
やるならそこまでやってくれよ。ｶﾞﾝｶﾞﾚ。

**名前は開発中のものです。** · 05/01/03 09:32:49

そういえばかの有名な大戦略もBASIC製らしいな

**名前は開発中のものです。** · 05/01/07 19:14:57

>>120
どの大戦略？

**名前は開発中のものです。** · 05/01/10 11:44:18

３くらいまでBASICじゃなかったっけ。
半リアルタイム進行でめちゃくちゃ遅いの。

**名前は開発中のものです。** · 2005/04/18(月) 18:37:47

懐かしいのでage
>>1はもういないの？

**星電改** · 2005/04/21(木) 04:53:28

９９ＢＡＳＩＣ　って2DのDirectXが使えるじゃん
CMDモジュレータ法式で自作OCXのAPIを作れば
３Ｄだって出来るのでは　入力OCX命令の引数と戻り値
のアクセス方法の一覧表を公開アップして欲しいな
　９９ＢＡＳＩＣ超大大好き

**名前は開発中のものです。** · 2005/04/21(木) 10:40:20

LGPなら標準で3Dどころか通信機能まであるぞ。

**名前は開発中のものです。** · 2005/04/21(木) 13:18:25

>>1は消えたみたいだな。

誰か他の講師ｷﾎﾞﾝﾇ

**名前は開発中のものです。** · 2005/04/21(木) 21:28:16

今日図書館いってみたらＢＡＳＩＣ関係の本があったから借りたら
すげープログラムだった
10 'ohanasi
20 CONSOLE ,,1,1:cls 3
30 COLOR 6
40 PRINT "こんにちは！"
50 PRINT "きみ、おとこのこ？"
60 COLOR 3
65 INPUT R$
70 IF R$="ウン" OR R$="うん" THEN F=1 ELSE F=0
80 COLOR 6
90 PRINT "なまえは、なんていうの？"
100 COLOR 3
110 INPUT R$
120 COLOR 6
130 PRINT "そう、";R$;
140 IF F=1 THEN PRINT "くん"; ELSE PRINT "さん";
150 PRINT "ていうの。ぼくパソコン。よろしく。"
160 PRINT "じゃーね、さよなら。"
165 COLOR 7
170 END
まあ暇だったらやってみて

**名前は開発中のものです。** · 2005/04/26(火) 13:25:00

すげーな…

「はい」と答えちゃいけないわけだ

**名前は開発中のものです。** · 2005/05/11(水) 04:48:29

>>127
IFを使った判断の練習プログラムとかじゃなきゃ
65 INPUT "1、はい　0、いいえ";F
で70消したらいいんじゃない？

**名前は開発中のものです。** · 2005/05/13(金) 14:50:26

RENUM くらいしてもいいとおもうけど

>>128
さん付けで呼ばれるだけだろ

しかしシュールな会話だ
HAL9000 は遠いな

**名前は開発中のものです。** · 2005/05/22(日) 22:56:53

携帯BASIC
ttp://satoo.jp/

携帯ではじめるBASIC
暇があいたらちょこちょこやるだけでもおもしろい

**名前は開発中のものです。** · 2005/06/07(火) 21:26:45

>>131
EZじゃ使えんorz

**名前は開発中のものです。** · 2005/06/07(火) 22:15:38

au、ドコモ対応のはず
かく言う俺はauだから

**名前は開発中のものです。** · 2005/06/08(水) 19:00:07

BREWで出ないかなー

◆3VUXqvbfSY · 2005/06/16(木) 20:32:22

どうだ

**名前は開発中のものです。** · 2005/07/09(土) 19:09:20

exeファイルにするのどうやるの？

**名前は開発中のものです。** · 2005/12/09(金) 17:03:09

N88互換BASIC for Windows95、XPにインストールできないorz。
RAINBOW.DIBがないって言われたって……。

**名前は開発中のものです。** · 2006/01/10(火) 17:11:59

BASICスレ色々
http://bubble4.2ch.net/test/read.cgi/i4004/1074389689/l50
http://bubble4.2ch.net/test/read.cgi/i4004/1008847300/l50
http://bubble4.2ch.net/test/read.cgi/i4004/1012582935/l50
http://pc8.2ch.net/test/read.cgi/gamedev/1007371918/l50

**名前は開発中のものです。** · 2006/01/12(木) 17:35:48

ﾎｯｼｭ!!

**名前は開発中のものです。** · 2006/01/13(金) 18:52:37

ｳﾒｯｼｭ!!

**名前は開発中のものです。** · 2006/01/14(土) 17:39:49

ﾌｧﾌﾞﾘｯｼｭ!!

**名前は開発中のものです。** · 2006/07/31(月) 11:23:21

あげるか

**名前は開発中のものです。** · 2006/08/01(火) 03:34:37

ﾊﾟﾄﾗｯｼｭ!!

**名前は開発中のものです。** · 2006/08/01(火) 07:15:16

ｶﾏﾝﾍﾞｰﾙ！

**名前は開発中のものです。** · 2006/09/28(木) 12:18:32

>>137
そこで、ＡｃｔｉｖｅＢａｓｉｃじゃよ。

**名前は開発中のものです。** · 2007/08/06(月) 13:07:22

>>137
僕のXPでは普通に使えてるよ
今も使ってる最中だよ

**TAKABON** · 2007/09/10(月) 10:02:23

初心者ですが、長いプログラムをコピー&貼り付けで
取り込むことはできませんか。

**名前は開発中のものです。** · 2007/09/11(火) 22:08:31

http://www.dotup.org/uploda/www.dotup.org2302.jpg？
これをベーシックにしたいのですがどうしても分かりません・・

**名前は開発中のものです。** · 2007/09/12(水) 02:34:54

http://uploader.fam.cx/img/u27557.jpg

**名前は開発中のものです。** · 2007/09/12(水) 05:36:33

>>147
メモ張で開けばコピペできるよ
（多のエディタでもいい）

>>149
vipにスレが起って解決済です。
指摘の通り、1→mもしくは、0→mらしい
１～５を足すプログラム

**名前は開発中のものです。** · 2007/09/12(水) 10:10:59

今後はプログラム板に宿題系のスレがあるからそっちに行けよ。
ここはBASICなんて使わない人間の方がおおいんだからさ。

**名前は開発中のものです。** · 2007/09/12(水) 11:17:09

BASICの宿題はお前にまかせた
http://pc11.2ch.net/test/read.cgi/tech/1136788500/l50

>>150
なんか、そんな気がしてたんだ。

**名前は開発中のものです。** · 2007/09/30(日) 02:59:19

BASIC懐かしい。ブロック崩しとか作ってた。
でもこれから始めるならHSPとかのほうがいいよね

**名前は開発中のものです。** · 2007/09/30(日) 08:04:02

C#がいいと思う

**名前は開発中のものです。** · 2007/10/02(火) 09:45:03

BASICはあくまでもBASICです。
業界標準でもあり、国際標準化されており、世界的に通用する。

**名前は開発中のものです。** · 2007/10/02(火) 12:34:51

CもC++もISOで規格化されているが。

**名前は開発中のものです。** · 2007/10/03(水) 14:14:13

C#も（ｒｙ

**名前は開発中のものです。** · 2007/10/03(水) 16:12:42

そこでDELPHI

**名前は開発中のものです。** · 2007/10/04(木) 00:20:20

>>158
> 業界標準でもあり、国際標準化されており、世界的に通用する。

冗談も体外にせえよｗ

という俺はDelphi使い orz

**名前は開発中のものです。** · 2007/10/11(木) 07:30:12

このアルゴリズムのプログラムがわからないです・・・
どなたか教えていただけませんか？BASICです!!
http://www.geocities.jp/sugachu_kbb/suucccccccccccccc.JPG

**名前は開発中のものです。** · 2007/10/11(木) 18:24:23

見えないよ。間違ってないかぃ

**名前は開発中のものです。** · 2007/10/13(土) 01:01:57

見えるけど>>152に行ったほうがいいと思う。
こんなスレ見てる俺もBASICのコードもう覚えてないし。EndIfって使えたっけ？

**名前は開発中のものです。** · 2007/10/17(水) 16:55:49

N88互換BASIC for Windows95 で作ったものですが
手元にWIN機が無く動作させられません。誰か代わりに動かしてくれませんか？

代入値が(M,N)=(500,1000)と(M,N)=(500,10)の２回分の試行結果が欲しいです。
宜しくお願いします。

1000 INPUT M
1010 INPUT N
1020 SUM1=0:SUM2=0
1030 FOR I=1 TO M
1040 PI=3.14159
1050 X=0:Y=0
1060 FOR J=1 TO N
1070 A=RND*2*PI
1080 NEWX=X+SIN(A):NEWY=Y+COS(A)
1090 X=NEWX:Y=NEWY
1080 NEXTJ
1090 P=SQR(NEWX^2+NEWY^2)
1100 SUM1=SUM1+P
1110 SUM2=SUM2+P^2
1120 NEXT I
1130 Q=SUM1/M
1140 R=SUM2/M
1150 S=SQR(R-Q^2)
1160 PRINT Q: PRINT S

**名前は開発中のものです。** · 2007/10/17(水) 17:10:39

まだ学校のPCが使えるようなので自分でやってきます
>>163は結構です

**名前は開発中のものです。** · 2008/08/02(土) 18:50:12

age

**名前は開発中のものです。** · 2008/08/27(水) 18:22:45

BASIC開発者のテキストが応用問題の話題がバリエーション豊富でいいね。

**名前は開発中のものです。** · 2008/08/27(水) 19:19:41

行番号付きBASICはなんか見てて落ち着くなあ。

**名前は開発中のものです。** · 2008/10/18(土) 18:51:12

ttp://support.microsoft.com/kb/135315
↑このページのからOlddos.exeをダウンロードする
んで、解凍すると、その中にQbasicが入ってる