授業で習ったBASIC

1 ：04/03/27 〜 最終レス ：11/08/02

結局使い道なくてむかついた

2 ：

教えられる人がいなかったので独学した。
ってのがこのスレ的にはほとんどじゃないか？

3 ：

授業でBASICを習うということ自体、この板では想像の範囲外。
今はセンター試験でBASICが使えるんだから、十分役に立つと思うが。>>1
>>2
その通り。
俺は「はるみのゲームライブラリー」ｊを読んで、INPを使ったキーの読み出し方を覚えたよ。

4 ：

>>3
>今はセンター試験でBASICが使えるんだから
マ、マ、マジ？w

5 ：

>>4
ttp://www.dnc.ac.jp/center_exam/15seikai/15hon_mondai.html
ここの数学�U・Ｂを見るべし。

6 ：

>>5
見てみた。
出題は初級も初級なんだね。スゲー時代になった。

7 ：

ANSI-Cが出来れば
センター試験のBASICが糞みたいだ

8 ：

BASICをバシックて読んでたの俺だけ？

9 ：

>>5
昔と同じスタイルのBASICそのままなんだ。
今でもあのスタイルのBASICが使える現行マシンってあるのか？

10 ：

>>9
昔ながらのBASICが使える現行機といえばポケコンぐらいだろう。
Windows用のN88-BASIC互換環境は色々あるから、普通はそっちを使うと思われ。
ttp://www.dennougumi.co.jp/index.html
ttp://www.discover-soft.com/
あと、N88じゃなくてMSXだがこんなのもある。
ttp://www.fcm.co.jp/msx/

11 ：

確か、Visual F-Basic があったと思う(富士通)
初めてCやVBの環境に触ったとき、関数が便利な
こと、行番号打ち込むのって、面倒だったなぁ、と
素朴に感じちゃいました。

12 ：

俺はＮ６０だったが…

13 ：

そういえば漏れは普通高校だったけど
昭和の終わりの頃に全商の情報処理検定をBASICで取ったなぁ。
全く勉強なんかしなくても取れた。
正直、そんなものでは就職にも実務にも役に立たなかった。

14 ：

10 S$="10 S$=@@@:Q$=CHR$(34):PRINT USING S$;Q$,S$,Q$":Q$=CHR$(34):PRINT USING S$;Q$,S$,Q$
ちょっとビックリ。

15 ：

>>14
PRINT USINGの制御文字に@なんてあったっけ？

16 ：

>>15
あるよん。引数の文字列をそのまま表示。

17 ：

>>16
そうなんだ。
この板のメインと思われる8bit時代にもあったっけ？

18 ：

わてはガキの頃、本で勉強した足算プログラムを組んだことがある。

19 ：

結局、最低限の手間で、最低限のプログラミングだけは学ばせようって
ことなんだろうね。
まあ、あんな簡単な言語って思う人はそれ以上を学べばいいし、勉強が
面倒な人は、フリーのBASICでも使えばいい。
え？有料のもある？あの遅くてぼろいの？

20 ：

ポケコンで一生懸命ゲーム作ってたなぁ。
田舎に帰ったついでにポケコン見つけてきたけど
当然ながらメモリー用の電池が切れてて中身はまっさらだった。
なんかやってみようとも思ったけど今更BASICってかったるくてやる気になれなかったーよ。
行番号って…。

21 ：

Ｂａｓｉｃというて馬鹿にしたらいかんぜよ。
おいら、現役時代にＦＭＶ？のＢａｓｉｃでデータ処理のプログラムを組んであそんどったよ。
平社員ではあったがけっこう楽しんだ。
おかげで事務処理の定型作業の苦痛から逃れられたよ。
ＷｉｎになってからはＥｘｃｅｌのマクロであそんだ。
年寄りのたわごと・・・・・

22 ：

そういうことならオイラも教師だったおふくろのために、mz-2500のM25BASICで
成績管理プログラム作ってあげますた。
入力と各項目でのソートと出力だけという、単純さを絵に描いたようなものでした。
それでもだいぶ時間短縮にはなったようで感謝されました。
しかし、プログラムそのものよりも、２００人分の氏名と５教科のデータの入力が
なによりも大変でありますた。（まぁ氏名は運用開始時だけだけど）
最初はソートのアルゴリズムが悪くて一度動かすと２０分近くだんまりになった
挙句にエラーで停止して、入力データパーにしたり・・・
あの頃の情熱はどこにいってしまたのでしょうね。
スレ違い？スマン

23 ：

ソートのアルゴリズムを専門学校で習った一番基本的な処理でプログラムしたら、作りなおしさせられた。
仕事では専門学校の知識ってほとんど通用しない。

24 ：

専門学校時代に夢の中でもプログラムを組んでいた時があった。

25 ：

センターでＢＡＳＩＣ使った世代ですが。
これまで過去問とかで完璧にとってたのに本番で大ポカかましてかなりしくじった。
数学はあれしかできないのに(´・ω・｀)

26 ：

センターじゃなくて共通一次・・・

27 ：

学校のパソコンが格好だけは一人前なんだけど、”斜めに線を描く”という程度の事もできない骨董品だった。
あんな古いので勉強させられては、やる気なくなるよ。
描けるのは垂直、水平の線だけだった。

28 ：

>>27
そこで座標をずらしながら描いて斜めの線を引いてみんなの度肝を抜こうとする！
っていう行動に行く子がプログラマーに向いた気質の子なんだろな
そこでもうだめだと思う子はプログラムのセンスが無いんだと思う

29 ：

27じゃないけど
そこで座標をずらしながら・・・？　ようわからん
PSET命令とか無かったのかな？

30 ：

座標を変数にしておけば、数式でどんな線でも引けないか？
N88basicでドット指定で1点ずつ入力して
アニメーションをする作品を提出したら皆に引かれた。

31 ：

わかりますた。FOR NEXT ですね。
古い88だと、かなりゆっくり線が引かれたのでせうね。

32 ：

方眼紙にイラスト描いて、それを一点づつ座標を読んでプログラムすれば、
線画のイラストがパソコンの画面上に表示される。
一枚画像プログラムするだけでも相当根気が必要だった。

33 ：

マシーンは何使ってた？ベーシックますた？

34 ：

えっきすいこーる　さん

35 ：

basicわかったら基本情報技術者試験に受かりますか

36 ：

マイコン３級なら受かるかもよ

37 ：

10 REM *****************************************
20 REM
30 REM 　　最初のＲＥＭ分だけは立派だった
40 REM　　　
50 REM　　 Copyright (C) 2005 by naiconsan
60 REM
70 REM *****************************************
　

38 ：

All rights reserved.

39 ：

>>38
(　´,_ゝ`)

40 ：

授業中、画面を赤と青で交互に点滅させて遊んでたら、
それを見てた隣のやつが気分悪くなりやがった

41 ：

REM 保守

42 ：

　　　　　　　,,.,.,.,.,.,.,.,.,.,.,.,
　　　　　／､ |l|l　l|l|　／ ﾞヽ､_
　　　　/　 ､ヾヾ川川　//　　ヽ
　　　/ ﾐﾝﾞ　　　　　　　　ヾニ ヽ
　　 /;;::　　　　　　　　　　 :::;;;;　 |
　　/彡:　　　　　　　　　　 :ミニ l
　　| 彡,.三ﾆ=､　　,.=ﾆ三､ :ﾐ三 |
　　ヽ /ｼ.-ー .;　 :..　ー-,ｯ　ヾ ,.l
　　　 i　　￣ _{　 }__　￣　　　Y l
　　　 ヽ　　,.`-､_,-‐'ヽ､　　／ } 〉
　　　　i`‐'/　,=ニニ=､　ｰ　　i_/
　　　　 i　i　<‐l‐l‐l‐l‐>　;　　| 　　　　　　　５！アヒャヒャ！！
　　　　 ヽヽ　`ニニニ'　/　 /
　　　　　 ヾ､＿｀　　´ ノ_,／

43 ：

　/-□‐□
◎´・ω・`)
o（,__U,,U）

44 ：

は

45 ：

>>40
俺もやった
俺が気分悪くなった

46 ：

保守

47 ：

よく秋葉原のパソコンに打ち込んで遊んだ。
10 for i=0 to 255
20 print chr$(i);
30 next i

48 ：

diskcopy
だよな。役に立つのは。
これでダメならMagicCopy

49 ：

わ〜い、サブルーチンでけた。
1000 REM MOVE
1010 A$=INKEY$(1)
1020 IF A$="4" THEN X=X-1 GOTO 1070
1030 IF A$="6" THEN X=X+1 GOTO 1070
1040 IF A$="2" THEN Y=Y-1 GOTO 1070
1050 IF A$="8" THEN Y=Y+1 GOTO 1070
1055 IF A$="5" GOSUB 1100
1060 GOTO 1010
1070 LOCATE(X,Y):PRINT "(´･ω･`)":GOTO 1010
1080 RETURN
1090 REM
1100 REM (^_^);
1100 FOR I=0 TO 1000
1110 PRINT "(^_^);" :BEEP 1
1120 IF INKEY$(1)="" GOTO 1110
1130 NEXT I
1140 RETURN
あれ？

50 ：

おっと、1年以上経ってるじゃん。
1000 REM MOVE
1010 A$=INKEY$(1)
1020 IF A$="4" THEN X=X-1 GOTO 1070
1030 IF A$="6" THEN X=X+1 GOTO 1070
1040 IF A$="2" THEN Y=Y-1 GOTO 1070
1050 IF A$="8" THEN Y=Y+1 GOTO 1070
1055 IF A$="5" GOSUB 1100
1060 GOTO 1010
1070 REM LOCATE(X,Y):PRINT "(´･ω･`)":GOTO 1010
1072 LOCATE(X0,Y0): PRINT " 　 　 ":'前消し
1074 LOCATE(X,Y):PRINT "(´･ω･`)" :'表示
1076 X0=X,Y0=Y :'前位置保存
1078 GOTO 1010
1080 RETURN
1090 REM
1100 REM (^_^);
1100 FOR I=0 TO 1000
1110 PRINT "(^_^);" :BEEP 1
1120 IF INKEY$(1)="" GOTO 1110
1130 NEXT I
1140 RETURN

51 ：

　　　　　　　　　　　,.--- ､　　 ,.----､,.---､　　　　　 ノ ヽ
　　　　　　　___　　/ヽ　　 ヽ　/　　　/　　　 }　　 __,,／　 ﾉ
　　　　 ,.-''"　 ｀ｰ---ヽ　 　 l　　　/　　　 /｀ｰ-'"　｀ｰ--''"{
　　　　/　　 .....　　::. 　 ヽ ､__.j 　 /i　　,. / ::.　　.....　..:　::　 |
　　　　〉　　::　 ::..　 ,,.　　｀ｰ-'__, /ヽニン　 ::　　　 ::　:::　:　l
　　　 /　...::　　　 /　 ￣ヽ　｀ｰ-'　　　　...:::　　　 .:　..:　.::　l
　　　/　:::　　..:: 　｀‐=ﾆ-く　--‐‐‐‐‐‐-----,　　　::.　　:　l
　　 /　　.::　::　,.ｰ'"　,.-､　ヽ　　,.-､ ,.-､　 　 |　......　::　　 /
　　i　　::.　　　 ヽ_／　　ﾉ　ﾉ　　し'　し'　　 　| ::　　:: :::.　/
　,.-l　..　::::::..　　　| 　 / ／｀ヽノ⌒j　　　　　 |　::.　.::　:::/
/　　｀ｰ ､　 .....::: ___／／｀ｰ､　　／　　　,,. 、 |　 :::::: 　::{
ヽ　　　ヽ ヽ　::: ￣|￣ 　 ／　,.'　　　　 ﾉ　 〉 | ::::　　::　l
　｀ｰ-、 j　}...::　　 |　 　 {　　 (___,.-｀j /　 /　|　:: ﾉ ヽ:　l
　　　/｀ｰ-'　......::: |　 　 ヽ_______,,,,.-'/　　'‐'"｀ヽ'　 / ::　l
　　 /　:::　　:::　　　----------　 /　　,.-､　　　／　::　 l
　　{　　::::::::::　....::　　....::::::::::::::......　ヽ__/　　｀ｰ-'　....::::　 /
　　｀ｰ----､_____　　　　　　　　　　　　　　　　___,. -､___/
　　　　　　　　　　｀ｰ----､_________,,..--''""""

52 ：

人に見せたくなるプログラムです。
5 RUN
良く働くプログラムです。
10 LOAD

53 ：

本に載ってたテトリスのコードとか入力したな。懐かしや。

54 ：

10 NEW
RUN
ready

55 ：

10 PRINT "nullpo ";
20 GOTO 10

56 ：11/08/02

板移転につきサルベージします