2017年 6月11日
外周の隙間にコマンド用のタップ座標を作る。
座標取りに苦労したが、赤い部分がコマンドのタップエリア。
たぶんタップミスを考えて、4隅の 1、5、12、16は使わないと思う。
消音とかに使えるかな？
う～ん、メインは 2、3、4、13、14、15の 6つになるかなあ。
消音に 9、10、11かな。
10をオプションにして、左右の 9、11、を SEと音楽の on、offにするとか。
座標割り出しのソースはベタベタ
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 |
/////// タップ座標 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に割り当てる。
