cb-hackers / cbEnchanted

A new runtime for CoolBasic
13 stars 3 forks source link

Jos objekti törmää siirtokoordinaateissa, se ei mene oikeaan paikkaan. #131

Open valscion opened 12 years ago

valscion commented 12 years ago
FrameLimit 60
SCREEN 1024,768
Type enemys
    Field obj
EndType

map=LoadMap("media\cdm2.til","media\tileset.bmp")

man=LoadObject("media\guy.bmp")
door=LoadObject("media\car.bmp")

PositionObject door,-290,200' ei toimi
//PositionObject door,-220,200' toimii

hp=300

Repeat

luo+1
If luo>100
        newenemy.enemys= New(enemys)
        newenemy\obj=CloneObject(man)
        SetupCollision newenemy\obj,map,1,4,2
        CloneObjectPosition newenemy\obj,door
        luo=0
EndIf

DrawGame

DrawScreen

Forever