1000 print"ﾂﾙﾄ ｶﾒﾉ ｶｽﾞｦ ｹｲｻﾝｼﾏｽ"
1100 print"ｹｲｻﾝﾁｭｳ"
1200 for a=0 to 20
1300    print"■";
1400 next
1500 print "ﾜｶﾘﾏｾﾝﾃﾞｼﾀ"
9999 end