I have the part were the transparency changes but I haven't scripted in a while and so I don't know what to do next..
local function Close(Blib1)
Blib1.Transparency = .2
wait(2)
Blib1.Transparency = .6
wait(2)
Blib1.Transparency = .8
wait(2)
Blib1.Transparency = 1
end
local function Open(Blib1)
Blib1.Transparency = .8
wait(2)
Blib1.Transparency = .6
wait(2)
Blib1.Transparency = .2
wait(2)
Blib1.Transparency = .0
end
