screen 0,200,200	;ウインドウ0の大きさを変更
	repeat			;繰り返し
	redraw 2		;画面には何も描かない
	color 255,255,255:boxf	;白色で画面を塗りつぶす
	color 0,255,0:boxf 100,0,200,200	;緑の壁を作る
	color 0,0,0		;描画色を黒にする
	pos cnt,0		;Ｘ座標cntＹ座標０に
	print "あ"		;あ　と表示
	if cnt>100:stop		;cntが100より大きかったらストップ
	redraw 1		;一気に描画
	wait 1			;待つ
	loop			;repeatヘ戻る