IchigoJam、無駄知識。似非スムーズスクロール

IchigoJamで自由にキャラクターを作ってみます。まずIchigoJamのコード表はどうなっているかというと、下記のPDFで公開してくださっている方がいるので、利用してみます。
http://d.hatena.ne.jp/arcanum_jp/20160111/1452490398

さて、前回のPCG機能を利用して、何の役に立つかわかりませんが、IchigoJamでスムーズスクロールのサンプルを書いてみました。

下記、"裹"の文字は、ALT+5でハートマーク２個です。（裹が５個なので２＊５＝１０個）

10 CLS
20 PRINT "裹裹裹裹裹"
30 PRINT "裹裹裹裹裹"
40 PRINT "裹裹裹裹裹"
50 PRINT "裹裹裹裹裹"
60 PRINT "裹裹裹裹裹"
70 PRINT "裹裹裹裹裹"
80 PRINT "裹裹裹裹裹"
90 PRINT "裹裹裹裹裹"
100 C=1010
110 GOSUB C
120 C=C+10
130 IF C=1090 C=1010
140 WAIT 5
150 GOTO 110
1010 POKE #728,#05,#55,#52,#20,#82,#AA,#29,#11:RETURN
1020 POKE #728,#11,#05,#55,#52,#20,#82,#AA,#29:RETURN
1030 POKE #728,#29,#11,#05,#55,#52,#20,#82,#AA:RETURN
1040 POKE #728,#AA,#29,#11,#05,#55,#52,#20,#82:RETURN
1050 POKE #728,#82,#AA,#29,#11,#05,#55,#52,#20:RETURN
1060 POKE #728,#20,#82,#AA,#29,#11,#05,#55,#52:RETURN
1070 POKE #728,#52,#20,#82,#AA,#29,#11,#05,#55:RETURN
1080 POKE #728,#55,#52,#20,#82,#AA,#29,#11,#05:RETURN

　こんな感じです。