【プロクラム】　　BASIC　　【繋げて】

1 ：ナイコンさん：02/10/03 21:37.net

GOTO 2

362 ：ナイコンさん：2008/07/16(水) 23:35:04 .net

で、その子ってだれなんだよ

363 ：ナイコンさん：2008/07/18(金) 00:51:48 .net

>>361-362
懐かしくなって画像見たついでに釣られてやるか
↓でその子見な

ttp://jp.youtube.com/watch?v=Da838M0Mpzo

364 ：ナイコンさん：2008/07/19(土) 19:14:14 .net

この子がその子なのか、やっとわかった

どうでもいいが、スレタイがプロクラムなのな

365 ：ナイコンさん：2008/07/19(土) 19:40:18 .net

この流れはぴゅー太ですね

366 ：数列：2008/07/20(日) 16:54:56 .net

数学で、今コンピュータプログラムの勉強をし始めてBASICを使っています。
等差数列の計算プログラムを書いたのですが、どうもうまくいきません。
御教授お願い致します。
因みに、公式も書きます。
nが項数、a初項、ｄが公差です。
Sn=n{2a+(n-1)d}/2

100 REM 等差数列
110INPUT N, A, D
120 S=N{2A+(N-1)*D}/2
130 PRINT "項数=" ; N
140 PRINT "初項=" ; A
150 PRINT "公差=" ; D
160 PRINT "総和=" ; S
170 END

367 ：ナイコンさん：2008/07/20(日) 17:48:00 .net

初項（一番初めの項）が a1
公差が d
項数が n

の場合の公式

an = a1 + (n-1)d

3, 5, 7, 9, 11, 13に当てはめると
初項は3
項差は2
項数3の場合

an = 3 + (3-1)2
an = 7

となる

これをプログラムにするのは難しくないと思うが

368 ：ナイコンさん：2008/07/29(火) 12:07:18 .net

>>366
120 S=N*(2*A+(N-1)*D)/2

369 ：ナイコンさん：2008/11/10(月) 11:05:39 .net

http://petitbasic.jp/

こういうのみっけた・・・
でもプログラムのペーストができ無い、ビスタのせいか；？

370 ：ナイコンさん：2008/11/20(木) 14:06:15 .net

と、おもって・・・
押入れからＸＰ入りのロートル機を出してやってみたが、
やっぱりペーストができない！

ＬＯＡＤ　ﾘﾀｰﾝで、小窓が出て、そこにＢＡＳＩＣテキストをペースト
してくれ言うのだが、小窓で右ボタン押しても無反応なんですよ・・・

他に、ペーストのしかたとか有るのか教えてください；

371 ：ナイコンさん：2008/11/20(木) 21:45:21 .net

指摘のサイトに行って見てはいないが、
ペーストは

　　　Ctrl　＋　V

もダメすか？

372 ：ナイコンさん：2008/11/21(金) 03:42:05 .net

ありがとうございます！　できました！

が、なんか、うまく動かない・・・なんか、気むずかしそう；

internaru　erra　とかでるし・・・小窓は出ぱなしになるし；

もっとシームレスにネットから呼び出せると、たとえばココのスレとか
だって、盛り上がると思うのダケド・・・

373 ：ナイコンさん：2008/11/22(土) 18:43:41 .net

このスレに来る人たちは、多分BASICインタプリタの稼動する何らかのハードを持っているのだと思う
なので、わざわざjavaアプレットでBASICプログラムを動かそうとは思っていない
ベクターとかでフリーのBASICインタプリタとかダウンロードできると思うので、それを使ってみてはどうだろうか？

374 ：ナイコンさん：2008/11/23(日) 14:18:11 .net

お絵描き掲示板というのがありまして〜・・・(略

375 ：ナイコンさん：2008/11/23(日) 21:13:01 .net

MON
*L
*GCE80

376 ：ナイコンさん：2008/12/05(金) 18:41:31 .net

ニモニックやめて！

377 ：ナイコンさん：2008/12/09(火) 17:46:07 .net

10 CLS
20 A$=INKEY$
30 IF A$="" GOTO 20
40 IF A$=CHR$(13) GOTO 10
50 PRINT CHR$(STR(A$));
60 GOTO20

でよかったっけ?
よく店のデモ機に手打ちして走らせといたっけ、なあ。

378 ：ナイコンさん：2008/12/23(火) 20:27:18 .net

誰かセガサターンＢＡＳＩＣはいないのか？

379 ：ナイコンさん：2009/01/04(日) 04:22:08 .net

ttp://yoshiki.syuriken.jp/10-Basic/kazuate.html
数当てゲーム

構造化BASICのはずなのに、なぜかGOTOでスパゲッティーになっていてびっくりした
こういう癖って時代を越えたものがあるのかな

380 ：ナイコンさん：2009/06/05(金) 02:43:11 .net

あー、まだこのスレあったんだ。懐かしい。

381 ：（￣ー￣）ニヤリッ ◆dTQkcZeb9M ：2009/07/29(水) 23:38:00 .net

BASIC/98を知ってる人なんて・・・
まだ居るのだろうか？

382 ：ナイコンさん：2009/07/30(木) 10:16:41 .net

知ってるよ

383 ：ナイコンさん：2009/08/08(土) 18:47:37 .net

>>377
50 PRINT CHR$(ASC(A$));

じゃね？

384 ：ナイコンさん：2009/08/12(水) 17:55:06 .net

50 PRINT A$
じゃだめなの？

385 ：ナイコンさん：2009/08/13(木) 11:05:31 .net

>>383-384
とっちでも動作に問題は無いが、処理速度を出したいなら>>384だろうな

＊PC-G850Vにブザーを半田付けしちゃった記念に作った奴
【どっかの研究室BGM】
10 V= RND 256-1
20 BEEP 1,V,200000/(166+22*V)
30 GOTO 10

＊おまけ(変更)
5 I=0
10 PEEK I,V:I=I+1:IF I>65535 THEN END 'ENDの代わりにI=0でも可
ちょっと趣が変わります

テンポを変えたい時は20行の200000を増減してね

386 ：ナイコンさん：2009/09/06(日) 17:27:19 .net

99basicはブロックIF文が使えないのが唯一残念だな

387 ：ナイコンさん：2009/09/06(日) 20:25:51 .net

必要ない。

388 ：ナイコンさん：2009/09/07(月) 10:40:21 .net

汚いソースを当たり前に書く人か

389 ：─☆─ X''CULTer's / Esprit de 99BASIC ◆M33J0QkV0U ：2009/09/07(月) 11:50:02 .net

…そろそろ99BASIC普及活動にでも入るとするかｗ

>>386
ブロックIFなんていらねーじゃん。

なくても死にゃせん（笑）

…って、FB386あたりか。

390 ：ナイコンさん：2009/09/07(月) 16:23:05 .net

この各所に出るコテの人はやっぱコテや名無し切り替えたりしてんのかな？

391 ：─☆─ X''CULTer's / Esprit de 99BASIC ◆M33J0QkV0U ：2009/09/07(月) 22:26:03 .net

いやいや、いわゆる ” 大復活 ” なワケでさ（笑）

392 ：ナイコンさん：2010/11/02(火) 22:54:39 .net

↑ってあの馬鹿か?

393 ：ナイコンさん：2011/02/27(日) 01:59:39.74 .net

アハ〜♪”

394 ：福盛俊明：2011/03/02(水) 23:31:28.39 .net

アハ〜♪”

395 ：ナイコンさん：2011/03/04(金) 20:09:39.46 .net

プチコン DSでBASIC
http://toki.2ch.net/test/read.cgi/handygame/1298442815/l50

3DS/DSi上で「BASIC」が使える「プチコン」 X=2
http://kamome.2ch.net/test/read.cgi/ghard/1298985388/l50

プチコン
http://smileboom.com/special/petitcom/index.html

396 ：福盛俊明：2011/03/05(土) 02:04:43.61 .net

アハ〜♪”

397 ：ナイコンさん：2011/04/15(金) 16:09:29.33 .net

ブロック構文は使えない理由はそれなりにある。元々昔のBASICインタプリタは、
行番号があって行を編集した。メモ帳のようなエディタはフルスクリーンエディタというが、
これすら無かった。本格的な汎用機やミニコンならスクリーンエディタはあったがマイコンには無かった。

BASICインタプリタは一行入力するごとに編集する訳だが、一行エディタ機能には別の機能があって、一行入力
する毎に中間言語にコンパイルしている。だから昔のBASICはエディタとインタプリタの機能が備わってる。
これが原因で、簡単にブロック構造などが使えない。昔のBASICは構文解釈が独特。

BASICに構造化構文が登場しなかったのは、インタプリタの構造にも原因がある。
MSのQBASICは構造化構文を持っているが、これはフルスクリーンエディタの環境が用意されてる。
一行実行もイミディエイトウインドウで可能になっていた。
フルスクリーンエディタを備えたQuickBASIC世代でないと構文解釈系がうまく構造化を扱えない。
QBASICで始めて構造化構文をBASICに取り入れられたのは、インタプリタの構造が関係してる。

398 ：ナイコンさん：2011/04/15(金) 16:29:10.23 .net

昔は16kROM,8kRAMといったような今のPCと比較して米粒ほどのメモリで高級言語を動作
させる必要があったので、インタプリタの構造も特殊でメモリが無くとも動作するような
構造になっていたし、その殆どがアセンブラで書かれていたりするので非常にトリッキーな
ソースコードになってる。アセンブラに詳しくないと今の人は読めない。

ブロック構文を採用する場合の理想的なインタプリタは、エディタとインタプリタが区別され、
DOSか何かのコマンドで動作する方式の方が構文解釈しやすい。だけど8bit機だとDOSすら
動作が遅いという事になって結局ブロック構文は意味があるのかという話にもなる。
QBASICはスクリーンエディタとインタプリタの統合環境になっているけれども。

399 ：ナイコンさん：2011/04/15(金) 16:43:56.86 .net

ではスクリーンエディタをBASICの命令だけで作れるのか、というとこれは無理。
なぜかというと、BASICに備わっているINPUTやOPEN命令は、ファイルI/OやキーボードI/Oを
前提としているので、データファイル操作以外を想定していない。
多分、BASIC等でフルスクリーンエディタを作ろうと考えた人は過去に何人かいると思う。

だからスクリーンエディタを作りたければ、ハードウエアを直接操作し、キースキャンや
画面表示を行なう必要があった。DOSのプログラミングと同じで用意されたファンクションコール
以外は自前で実装する必要がある。
文字列の処理の仕方もBASICインタプリタは特殊なので難しくさせる要因だろう。

ポケコンなどを使っていると、BASICのみでエディタを作ろうと試みた形跡が見られる。
エディタを付けてインタプリタをもうちょっと改良すると使いやすくなるのだが、多分
オリジナルのソースコードはアセンブラで書かれていると思うので、手も足も出ないだろう。
Cでインタプリタを書き直す程度の事は行なわないと、改良は難しいかも。

古いBASICは、整数TinyBASICから発展したものなので、その辺りから見直せば、又新しい
展開はあるかもしれない。

400 ：ナイコンさん：2011/04/15(金) 16:54:50.84 .net

確か、DOSで動いていた頃のTurboPASCALも、エディタ環境とコンパイラが統合されて
いたような気がするが、これはQuickBASICと比べても見た目は全く同じ開発環境で、
エディタとインタプリタ/コンパイラが統合されているもの。
16bitのDOSで動いていたので、8bitではないが、ブロック構文や構造化構文を使う場合は、
こういったエディタ環境が解釈系とコンビで必然的に必要になる、という良い事例。

401 ：ナイコンさん：2011/04/16(土) 05:37:07.54 .net

♪目覚めてくれと　鼻たれた〜♪
まで読んだ

402 ： 【東電 44.7 %】 ：2011/08/22(月) 04:51:18.85 .net

TurboPascalはCP/Mで動いてたろ
インタプリタはついていない

403 ：ナイコンさん：2012/06/24(日) 23:03:15.99 .net

>>397
BASIC-M25は出来ただろ

404 ：ナイコンさん：2012/11/05(月) 01:17:42.05 .net

ＲｅａｄｙかＲＥＡＤＹでよくOut of Data がでる党、結成

405 ：ナイコンさん：2017/12/16(土) 17:44:06.11 .net

NEW ON 1

406 ：ナイコンさん：2017/12/16(土) 17:44:33.43 .net

リセットがかかった。ぉ

407 ：ナイコンさん：2020/11/28(土) 17:53:41.55 .net

やばみ

408 ：ナイコンさん：2021/02/13(土) 22:01:09.45 .net

使える?

409 ：ナイコンさん：2022/05/06(金) 08:27:38.65 .net

むりぽ

410 ：ナイコンさん：2022/05/06(金) 11:55:37.37 .net

ゴミパソ

411 ：ナイコンさん：2022/07/25(月) 15:47:56 .net

SP-5030