トップページ昔のPC
24コメント3KB
昔作ったプログラムをこっそり置いてくスレ [無断転載禁止]©2ch.net
0007ナイコンさん
垢版 |
2016/10/29(土) 10:32:23.48
1 開式の辞
2 校歌斉唱
3 卒業証書授与
4 学校長式辞
5 送辞
6 答辞
7 仰げば尊し 斉唱
8 閉式の辞
0008ナイコンさん
垢版 |
2016/10/31(月) 18:28:10.01
プログラムでもなんでもないな
0009ナイコンさん
垢版 |
2017/02/22(水) 12:26:39.10
100 STOP OFF
110 INPUT a$
120 BEEP
130 PRINT "Syntax Error"
140 PRINT "Ok"
150 GOTO 110
0010ナイコンさん
垢版 |
2017/03/14(火) 05:01:12.20
10 NEW
0013ナイコンさん
垢版 |
2017/04/04(火) 21:00:24.80
ピーーーーーーギョーーーギョーギョーーーーーーギョーーーギョーギョー
ンギョーーーギョーギョーピーーーーーーピーーーギョーーー
ギョギョーーピーギョーーーーーーーーーーーーピーーーーー

カセットテープで置いておきますね
0015ナイコンさん
垢版 |
2017/10/20(金) 04:59:13.57
>>13
むかし、ニッポン放送の生番組で
MSXのプログラムデータをそのまま放送したことがあったね
かなり大胆な試みだった
録音してロードしたら
ちゃんと動いたよ
0016ナイコンさん
垢版 |
2018/06/30(土) 17:37:52.03
整数BASIC対応ベンチマーク
(変数が-32768~32767しか扱えないBASIC:例CASIO PV-2000)
MSX系でいけるはず。

100 'PAI Montecalro
105 CT=0:COLOR 1,14:CLS
110 FOR I=0 TO 10000
120 X=RND(100):Y=RND(100)
130 PR=X*X+Y*Y
140 COLOR 15
150 IF PR<10000 THEN CT=CT+1:COLOR RND(13)+1
160 LOCATE X/5,Y/5:PRINT ”*”;
170 NEXT
180 LOCATE 1,1:PRINT "PAI*10000";CT*4
200 COLOR 1,4:END
0017ナイコンさん
垢版 |
2018/07/24(火) 13:26:19.19
BEEP
0020ナイコンさん
垢版 |
2022/05/15(日) 21:24:16.52
10 MOTOR:RUN
0021ナイコンさん
垢版 |
2022/12/11(日) 18:23:19.42
10 PRINT"SEX ";
20 GOTO 10
0022ナイコンさん
垢版 |
2022/12/17(土) 05:11:26.39
>>21
1 PRINT"大晦日は";
2 FOR X=1 TO 107
3 PRINT X;"回突いて"
4 NEXT
5 PRINT"煩悩の数まで突いた瞬間、お寺の鐘と一緒にフィニッシュ";
0023ナイコンさん
垢版 |
2023/02/26(日) 18:06:34.89
1 motor:run
レスを投稿する


ニューススポーツなんでも実況