portal to criminal base

local pl = game.Players.LocalPlayer
local p1 = Vector3.new(-955, 94, 2081)
local p2 = Vector3.new(997, 100, 2334)
local di = 2
local cd = false
local ct = 5

local ch
local hr

local function cp(po, co, ro)
    local mo = Instance.new("Model")
    mo.Name = "Portal"
    mo.Parent = workspace
    
    local po_m = Instance.new("Part")
    po_m.Name = "PortalMain"
    po_m.Size = Vector3.new(6, 9, 0.3)
    po_m.Position = po
    po_m.Anchored = true
    po_m.CanCollide = false
    po_m.Transparency = 0.2
    po_m.Material = Enum.Material.Neon
    po_m.Color = co
    po_m.Shape = Enum.PartType.Ball
    
    if ro then
        po_m.CFrame = CFrame.new(po) * ro
    end
    
    po_m.Parent = mo
    
    local function fr(si, of, fr_co)
        local fr_p = Instance.new("Part")
        fr_p.Size = si
        fr_p.Anchored = true
        fr_p.CanCollide = false
        fr_p.Material = Enum.Material.SmoothPlastic
        fr_p.Color = fr_co or Color3.fromRGB(40, 40, 40)
        if ro then