How to make a door move?

How can I make a door move up, like a rollerdoor?

if game.Workspace.Game.Value == true then
    if open==false then
        for i=1,100 do
            door.CFrame=door.CFrame + Vector3.new(0, 0.1, 0)
            wait(0.1)
        end
        open=true
    		elseif open==true then
    	for i=1,100 do
        	door.CFrame=door.CFrame + Vector3.new(0, -0.1, 0)
        	wait(0.1)
    	end
    	open=false
	end
end

This wont work, I want it so once the Game BoolValue = true, it moves the door up and then after 10 seconds it shuts again