shiro0922 https://blog.hatena.ne.jp/shiro0922/ SHIROのIchigoJam日記 https://www.ichigojaman.jp/ IchigoJam 10 CLS 20 S="ｶﾞﾝ":L=2:O=0:P=0:GSB60 30 S="ﾊﾞﾚ":L=2:O=8:P=4:GSB60 40 S="ﾌｸｲ":L=2:O=16:P=8:GSB60 50 CONT 60 '@PRT 70 FOR I=0 TO L 80 C=PEEK(S+I) 90 FOR B=0 TO 7 100 D=PEEK(C*8+B) 110 FOR J=0 TO 7 120 X=I*8+J+P 130 Y=O+B 140 POKE #900+X+Y*32,D&128>0 150 D=D<<1 160 NEXT 170 NEXT 180 NEXT 190 RTN 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fwww.ichigojaman.jp%2Fentry%2F20180206%2F1517920079" title="福井が大雪で大変なので… - SHIROのIchigoJam日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/s/shiro0922/20180206/20180206212651.png Hatena Blog https://hatena.blog 2018-02-06 21:27:59 rich https://www.ichigojaman.jp/entry/20180206/1517920079 1.0 100%