search

cb-hackers / cbEnchanted

A new runtime for CoolBasic
13 stars 3 forks source link

Törmäykset tarkistetaan myös piilotettuihin objekteihin #68

Closed valscion closed 12 years ago

valscion commented 12 years ago 
FrameLimit 60
obj = LoadObject("Media\guy.bmp", 72)
obj2 = CloneObject(obj)

PositionObject obj2, 0, -50
SetupCollision obj, obj2, 2, 2, 2

showGuy = True
ShowObject obj2, showGuy

Repeat
    TurnObject obj, (LeftKey() - RightKey()) *  5
    MoveObject obj, (UpKey() - DownKey()) * 3

    If KeyHit(cbKeySpace) Then showGuy = Not showGuy : ShowObject obj2, showGuy

    DrawScreen
Forever