何をするか
「にゃーん」をいっぱい流す。
実行結果
YouTube動画(2分23秒)
ソースコード
10 'ニャーン
20 POKE#700,#00,#4C,#42,#40
30 POKE#704,#40,#48,#26,#00
40 POKE#708,#00,#00,#00,#28
50 POKE#70C,#7C,#24,#20,#00
60 POKE#710,#00,#00,#00,#0E
70 POKE#714,#70,#00,#00,#00
80 POKE#718,#00,#08,#10,#20
90 POKE#71C,#38,#6A,#44,#00
100 FOR I=0 TO 23:[I]=0:NEXT
110 CLS
120 SCROLL LEFT
130 FOR I=0 TO 23
140 IF [I]=0 GOTO 190
150 [I]=[I]+1
160 IF [I]>4:[I]=0:GOTO 210
170 POKE#91F+32*I,#E0+[I]-1
180 GOTO 210
190 IF RND(48)<>0 GOTO 210
200 [I]=1:GOTO 170
210 NEXT
220 WAIT 5:GOTO 120
解説
カタカナの「ニャーン」ではなくひらがなの「にゃーん」を出すために、「にゃーん」のフォントを用意した。
SCROLL
命令で「にゃーん」を左に流す。
配列で右端の状態を管理する。
「にゃーん」が出ている途中であれば次の文字を出し、出ていないならばランダムで出し始める。
裏の解説
スケジューリングが下手にゃので連日Advent Calendar用の記事を深夜に書いてしまうにゃーん。
そのため、夜寝る時間が普段でも短いが、普段よりさらに短くなってしまうにゃーん。
にゃーん。
IchigoJamとは
2,000円前後で購入することができ、BASICによるプログラミングが可能なパソコン。
こどもパソコン IchigoJam - はじめてのプログラミングパソコン(1500円)
また、プログラムをWebブラウザ上で実行できるサービスもある。
※「IchigoJam」はjig.jpの登録商標