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に割り当てる。