ΣΣ(ﾟдﾟｌｌｌ)

これでどうでしょう？
10 screen 5
20 set page 0, 1
30 for i = 0 to 32
40 　line(0, 0) - (255, 211), 15, bf
50 　circle(128, 106), i * 5, 1
60 　set page i mod 2, (i + 1) mod 2
70 next i
80 goto 30