Help on a teleporter?

Asked by

11 years ago

When you step on the Red teleporter it goes to the Blue teleporter then it keeps going back and forth not letting you get off. Please help

Script 1:

01modelname="teler"
02 
03function onTouched(part)
04    if part.Parent ~= nil then
05    local h = part.Parent:findFirstChild("Humanoid")
06        if h~=nil then
07            local teleportfrom=script.Parent.Enabled.Value
08            if teleportfrom~=0 then
09                local teleportto=script.Parent.Parent:findFirstChild(modelname)
10                if teleportto~=nil then
11                    local gui = script.ScreenGui:Clone()
12                    local pname = game.Players:GetPlayerFromCharacter(h.Parent)
13                    gui.Parent = pname.PlayerGui
14                    local torso = h.Parent.Torso
15                    local location = {teleportto.Position}
16                    local i = 1
17 
18                    local x = location[i].x
19                    local y = location[i].y
20                    local z = location[i].z
21 
22                    x = x + math.random(-1, 1)
23                    z = z + math.random(-1, 1)
24                    y = y + math.random(2, 3)
25 
26                    local cf = torso.CFrame
27                    local lx = 0
28                    local ly = y
29                    local lz = 0
30 
31                    script.Parent.Enabled.Value=0
32                    teleportto.Enabled.Value=0
33                    torso.CFrame = CFrame.new(Vector3.new(x,y,z), Vector3.new(lx,ly,lz))
34                    wait(3)
35                    script.Parent.Enabled.Value=1
36                    teleportto.Enabled.Value=1
37                else
38                    print("Could not find teleporter!")
39                end
40            end
41        end
42    end
43end
44 
45script.Parent.Touched:connect(onTouched)
 View all 45 lines...

Script 2: (LOCAL SCRIPT)

01s = script.Parent
02f = s.Frame
03 
04if s.Parent.Name ~= "Script" then
05    s.Town:TweenPosition(UDim2.new(0, 200, 0, 0), "Out", "Quad", 0.5)
06    for i=1, 50 do
07        f.BackgroundTransparency = f.BackgroundTransparency + 0.05
08        wait(0.01)
09    end
10    s.Town:TweenPosition(UDim2.new(0, 200, 0, -50), "Out", "Quad", 0.5)
11    wait(1.5)
12    s:Remove()
13end

Help on a teleporter?

1 answer

Answer this question