昔作ったプログラムをこっそり置いてくスレ

1 ：ナイコンさん：2016/10/28(金) 05:46:28.45 .net

機種は問わないので、置いてってね。

2 ：ナイコンさん：2016/10/28(金) 09:22:55.34 .net

10 new

3 ：ナイコンさん：2016/10/28(金) 09:28:22.05 .net

10 goto 10

4 ：ナイコンさん：2016/10/28(金) 19:37:25.46 .net

DI
HLT

5 ：ナイコンさん：2016/10/29(土) 00:10:38.08 .net

talk "ﾏﾝｺ"

6 ：ナイコンさん：2016/10/29(土) 00:43:40.61 .net

PUSH
POP

7 ：ナイコンさん：2016/10/29(土) 10:32:23.48 .net

1　開式の辞
2　校歌斉唱
3　卒業証書授与
4　学校長式辞
5　送辞
6　答辞
7　仰げば尊し 斉唱
8　閉式の辞

8 ：ナイコンさん：2016/10/31(月) 18:28:10.01 .net

プログラムでもなんでもないな

9 ：ナイコンさん：2017/02/22(水) 12:26:39.10 .net

100 STOP OFF
110 INPUT a$
120 BEEP
130 PRINT "Syntax Error"
140 PRINT "Ok"
150 GOTO 110

10 ：ナイコンさん：2017/03/14(火) 05:01:12.20 .net

10 NEW

11 ：ナイコンさん：2017/03/31(金) 19:30:06.18 .net

>>7
これの機種は何？

12 ：ナイコンさん：2017/04/03(月) 02:50:43.08 .net

>>7
4　学校長式辞 ←無駄ループで時間稼ぎ

13 ：ナイコンさん：2017/04/04(火) 21:00:24.80 .net

ピーーーーーーギョーーーギョーギョーーーーーーギョーーーギョーギョー
ンギョーーーギョーギョーピーーーーーーピーーーギョーーー
ギョギョーーピーギョーーーーーーーーーーーーピーーーーー

カセットテープで置いておきますね

14 ：ナイコンさん：2017/04/04(火) 21:09:38.75 .net

ゲンセンカン主人

15 ：ナイコンさん：2017/10/20(金) 04:59:13.57 .net

>>13
むかし、ニッポン放送の生番組で
MSXのプログラムデータをそのまま放送したことがあったね
かなり大胆な試みだった
録音してロードしたら
ちゃんと動いたよ

16 ：ナイコンさん：2018/06/30(土) 17:37:52.03 .net

整数BASIC対応ベンチマーク
（変数が-3276８~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

17 ：ナイコンさん：2018/07/24(火) 13:26:19.19 .net

BEEP

18 ：ナイコンさん：2020/07/05(日) 14:20:57 .net

とりま

19 ：ナイコンさん：2021/12/17(金) 18:09:32.07 .net

いつもおまえを見ているぞ

20 ：ナイコンさん：2022/05/15(日) 21:24:16 .net

10 MOTOR:RUN

21 ：ナイコンさん：2022/12/11(日) 18:23:19.42 .net

10 PRINT"SEX ";
20 GOTO 10

22 ：ナイコンさん：2022/12/17(土) 05:11:26.39 .net

>>21
1 PRINT"大晦日は";
2 FOR X=1 TO 107
3 PRINT X;"回突いて"
4 NEXT
5 PRINT"煩悩の数まで突いた瞬間、お寺の鐘と一緒にフィニッシュ";

23 ：ナイコンさん：2023/02/26(日) 18:06:34.89 .net

1 motor:run

24 ：ナイコンさん：2023/10/24(火) 09:57:58.50 .net

なるはや