コマンド用のタップ座標を作る


2017年 6月11日
 
 
 外周の隙間にコマンド用のタップ座標を作る。
 
 
 座標取りに苦労したが、赤い部分がコマンドのタップエリア。

 たぶんタップミスを考えて、4隅の 1、5、12、16は使わないと思う。
 消音とかに使えるかな?

 う~ん、メインは 2、3、4、13、14、15の 6つになるかなあ。
 消音に 9、10、11かな。
 10をオプションにして、左右の 9、11、を SEと音楽の on、offにするとか。
 
 
 座標割り出しのソースはベタベタ

/////// タップ座標 DATA///////

	hbx=52	: hkx=hbx/2	; 横の大きさ、半分、間隔
	hby=90	: hky=hby/2	; 縦の大きさ、間隔

	dim cxyd,4,17	; 格納する変数(0=x、1=y)

	n=1
	cxyd(0,n)=0 : cxyd(1,n)=0 : cxyd(2,n)=44 : cxyd(3,n)=30 : n+ ; 1
	repeat 3 ; 2~4
	 cxyd(0,n)=0 : cxyd(1,n)=90*cnt+60 : cxyd(2,n)=44 : cxyd(3,n)=90*cnt+60+60 : n+
	loop
	cxyd(0,n)=0 : cxyd(1,n)=90*3+60 : cxyd(2,n)=44 : cxyd(3,n)=360 : n+ ; 5

	repeat 3 ; 6~8
	 cxyd(0,n)=(hbx+hkx)*(cnt*2+1)+34+20
	 cxyd(1,n)=0
	 cxyd(2,n)=(hbx+hkx)*(cnt*2+1)+34+84
	 cxyd(3,n)=30
	 n+
	loop

	repeat 3 ; 9~11
	 cxyd(0,n)=(hbx+hkx)*(cnt*2+1)+34+20
	 cxyd(1,n)=360-30
	 cxyd(2,n)=(hbx+hkx)*(cnt*2+1)+34+84
	 cxyd(3,n)=360
	 n+
	loop

	cxyd(0,n)=640-44 : cxyd(1,n)=0 : cxyd(2,n)=640 : cxyd(3,n)=30 : n+ ; 12
	repeat 3 ; 13~15
	 cxyd(0,n)=640-44 : cxyd(1,n)=90*cnt+60 : cxyd(2,n)=640 : cxyd(3,n)=90*cnt+60+60 : n+
	loop
	cxyd(0,n)=640-44 : cxyd(1,n)=90*3+60 : cxyd(2,n)=640 : cxyd(3,n)=360 : n+ ; 16


	bsave "cxyd.dat",cxyd	; データファイル出力

 
 
 と言う訳で、とりあえずターンエンドのボタンを 15に割り当てる。

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です