FOR I=0 TO 29 SPRITE I,I,5,120+(SPDAT(0,I)+SPDAT(3,I)/2)*1.5,140,R+SPDAT(2,I),SPDAT(1,I),SPDAT(3,I)+1,SPDAT(4,I),1.5,SPDAT(5,I)*1.5 NEXT I BG BGC,0,0,0,0,0,0 REFRESH 0,50,0,50,240,180とかやると更に1.5倍(当社比)ほど己の矮小さが身にしみたりします。(言迷)
一部の人にはコレだけでも十分意味は伝わるんですが、解らない人のためにちょっと説明。
ダメザウルス指南でも何度かネタにしているとおり、 いみふめは944様作の944BASICで開発者登録をして、 プログラミングの真似事なんぞをやらせてもらっているんですが、 コレの現在配布されているバージョンの使用期限が4/30までなんですね。
おそらくもうじき次バージョンが出るんだろうとは思いますが、 その間使えないのもアレなのでザウルスのカレンダを巻き戻して日付チェックをやり過ごそう、 と企んだワケです。