;
	;	JPEGロード & BMPセーブをするスクリプト
	;
	width 320,80
	objsize 300,24
	button "JPEGロード",*fload
	button "BMPセーブ",*fsave
	;
	screen 2,640,480
	gsel 2,-1
	stop
*fload
	dialog "jpg",16,"JPEG"
	if stat=0 : goto *failed
	gsel 2,1
	picload refstr
	stop
*fsave
	dialog "bmp",17,"BMP"
	if stat=0 : goto *failed
	gsel 2,1
	bmpsave refstr
	stop
*failed
	dialog "Error"
	stop