冬休みに作ってみたやつです
無駄に''でくくってあったりします
絵文字使用しています
その他
設定
本体：
func bmove(){
gc()
for(ii=0;ii<=iid;0){
ax[ii]-=min((Bs+ii),12)
if(ax[ii]<-120){at[ii]=0}
ii++}
}
#その他#
label 6
disvar(tn)
disvar(ttl)
disvar(cix)
disvar(cixx)
'スタート'
cls()
text("GAME START",0,0,HCENTER|BASELINE)
unlock()
sleep(1500)
cls()
clearkey()
'変数'
mojiw=max(stwide("ハイスコア:".hna."/".hpt."pt"),stwide("残機:".pHP."/敵体力:".eHP."/スコア:".pt))/2
weapon="★"
dantyo=stwide(weapon)*7
eye=4
eHP=50
FLAME=0
pt=0
iid=(dif+1)*3+dif
pHP=5
tama=0
t=tick
co=0
'背景'
makeimg(BG,240,388)
trgt(BG)
origin(120,174)
col(0x00D0FF)
frect(-120,-174,240,388)
trgt(off)
origin(120,174)
'敵弾てす'
makeimg(bullet,20,13)
trgt(bullet)
col(0x00D0FF)
frect(0,0,20,13)
setfont("S")
col(red)
text("●≡",0,0,0)
trgt(off)
origin(120,174)
col(0)
'被弾後'
label 99
Ax=120
At=0
psx=0
for(ii=0;ii<=iid;0){
ax[ii]=120
at[ii]=0
ii++
}
ii=0
'ショット'
@(psx,psx,psx,psx)
'ショット'
@(psy,psy,psy,psy3)
soft1("残機:".pHP)
x=-100
y=0
yomex=120
ex=80
ey=-20
tama=0
'★main program★'
label 0
++FLAME
gc()
'ショット絵変更'
if(scan==key8){
shoottype?tw=5:tw=1;
weapon=inputdlg("自機弾絵変更","★",tw,0)
if(weapon==""){weapon="★"}
}
'time'
time=int((tick-t)/1000)
'背景色'
'col(0x00D0FF)
frect(-120,-174,240,388)
col(0)'
drawimg(BG,-120,-174,0)
setfont("S")
'各種数値'
col(0xDCDCDC)
frect(-mojiw-3,134,mojiw*2+6,45)
col(0)
text("ハイスコア:".hna."/".hpt."pt",0,148,HCENTER|BOTTOM)
text("敵体力:".eHP."/スコア:".pt,0,161,HCENTER|BOTTOM)
つづき
シューティング２
