ゲームを作りたい人のための ソースコード集

私がその日作った短めのソースを簡単な解説とともに載せていきます
ゲーム制作初心者にとって参考になるかもしれないソースが多いです


<< 縄張りアルゴリズム | main | 慣性の法則 >>



落下と上昇

落下と上昇を組み合わせたアルゴリズムです

そのままでは物体が落ちていくだけですが、上キーを押すことで上昇させることができます

 


vy=0.0        ;速度
ay=0.0        ;加速度
vis=0.05    ;粘性抵抗係数
grav=0.8    ;重力

chx=320.0
chy=240.0
border=480
chcsz=24:chcszh2=chcsz/2
fallflg=1
*main
    color:boxf
    getkey k38,38
    if k38{
        if fallflg=0{
            ay=0.0
            vy=0.0
            chy-=1.0
        }
        fallflg=1
        ay=-grav+(vis*(-vy))
    }else{
        if fallflg=1{
            ay=grav-(vis*vy)
        }
    }
    vy+ay
    chy+vy
    if chy>=border{
        chy=border
        fallflg=0
    }
    color 255,255,255
    boxf chx-chcszh2,chy-chcsz,chx+chcszh2,chy
    redraw:await 17:redraw 0
    goto *main

0
    posted by higashijugem 19:10comments(0)|-|


    この記事に対するコメント