;
	;	objsel命令を使用したサンプル
	;	( [TAB]キーで入力フォーカスを移動する )
	;				for HSP ver2.4d
	;
	a1=""
	a2=""
	a3=""
	objsize 80,24,24
	pos 120,12
	mes "INPUT-1"
	mes "INPUT-2"
	mes "INPUT-3"
	pos 20,8
	input a1
	input a2
	input a3
	button "END",*owari
	;
	curid=0				; 現在のフォーカスID
	;
*keychk
	wait 2
	getkey a,9			; [TAB]キーをチェックする
	if a=0 : goto *keychk
	;
	curid+:if curid=3 : curid=0	; 次のフォーカスIDに
	objsel curid			; フォーカス設定
*keychk2
	wait 2
	getkey a,9			; [TAB]キーを離すまで待つ
	if a=1 : goto *keychk2
	goto *keychk

*owari
	end