screen 0,200,200		;ウインドウ０の大きさを変更
	repeat				;繰り返しの始め
	getkey key,1			;キー番号１のキーが押されたらkeyに１を入力
	if key=1:line x,y,mousex,mousey	;keyが１だったら　ｘ座標x,y座標yの位置から
					;x座標mousex　ｙ座標mouseyまで　線を引く
	x=mousex:y=mousey		;x変数にmousexの数字をy変数にmouseyの数字を入力
	await 1				;待つ
	loop				;repeatヘ戻る