設定

シューティング
その他

ソース名:設定

soft1("保存")
soft2("ロード")
origin(120,174)
label 9
lock()
cls()
col(aqua)
frect(-120,-174,width,height)
setfont("L")
col(red)
text("ＳＥＴＴＩＮＧＳ",-1,-80,HCENTER|BASELINE)
text("ＳＥＴＴＩＮＧＳ",0,-80,HCENTER|BASELINE)
text("ＳＥＴＴＩＮＧＳ",1,-80,HCENTER|BASELINE)
col(blue)
text("☆★☆★★☆★☆",TX,-100,HCENTER|BASELINE)
text("★☆★☆☆★☆★",TX,-60,HCENTER|BASELINE)
setfont("M")
col(0)
text("敵弾速度",0,-30,HCENTER|BASELINE)
text("自機移動速度",0,0,HCENTER|BASELINE)
text("ハイスコア削除",0,30,HCENTER|BASELINE)
text("FPS表示",0,60,HCENTER|BASELINE)
text("難易度設定",0,90,HCENTER|BASELINE)
text("ショットタイプ変更",0,120,HCENTER|BASELINE)
col(fuchsia)
text("タイトルへ",0,150,HCENTER|BASELINE)
text("タイトルへ",1,150,HCENTER|BASELINE)
col(-1)
text("◆＿＿＿＿＿＿＿＿＿◆",0,stl-30,HCENTER|BASELINE)

switch(input(0)){
case keyup:
'選択項目'stl-=30
break;

case keydown:
stl+=30
break;

case keyselect:
goto 10

case keysoft1:
hoge=yndlg("保存","設定を保存しますか？")
if(hoge==1){
save(Bs,5)
save(Pm,6)
save(showfps,7)
save(dif,8)
save(shoottype,9)
}
stt=stl=0
break;

case keysoft2:
hoge=yndlg("ロード","設定をロードしますか？")
if(hoge==1){yomikomi()}
stt=stl=0
break:

}

if(stl<0){stl=180}
if(stl>180){stl=0}
unlock()
goto 9

label 10
switch(stl/30){
case 0:
Bs=inputdlg("最低敵弾速度変更(最大:10)",Bs,2,1)
if(Bs==""){Bs=8}
if(Bs>10){Bs=10}
if(Bs<=0){Bs=1}
stt=stl=0
goto 9

case 1:
Pm=inputdlg("プレイヤー移動速度",Pm,1,1)
if(Pm==""){Pm=4}
stt=stl=0
goto 9

case 2:
del=yndlg("記録を削除しますか？","")
if(del==1){
save("0",1)
save("0",2)}
stt=stl=0
goto 9

case 3:
showfps=yndlg("フレームレートっぽいの","表示しますか？")
stt=stl=0
goto 9

case 4:
dif=selectdlg("難易度設定",難)
stt=stl=0
goto 9

case 5:
'selectdlg試用'
hoge[0]="レーザー/多段ヒット"
hoge[1]="単発ショット/高得点"
shoottype=selectdlg("ショットタイプ変更",hoge)
stt=stl=0
disvar(hoge[0])
disvar(hoge[1])
goto 9

case 6:
disvar(stl)
disvar(stt)
soft1("")
soft2("")
goto 8
}



func yomikomi(){
Bs=load(5)
Pm=load(6)
showfps=load(7)
dif=load(8)
shoottype=load(9)
}