Sovjet3 Scriptjei

http://www.roblox.com/User.aspx?ID=3818551

 

Figyelem! Ez az oldal csak ROBLOX játékosoknak
készült akik scripteket akarnak készíteni.


Egyszerű VIP ajtó

 

 

Használat:
1. Írd be a Neved a "vips" be a "Sovjet3" vagy a "Sovjet2"helyére.
   (Ne felejtsd el hogy a neved elejére és végére egy " -t kell tenned!)
2. Másold be egy üres scriptbe az egész szöveget.
3. Másold be a scriptet egy Part-ba.

 
Ennyi! Nevetés

Ha nem működik akkor nézd meg hogy jól írtad-e be a neved.



vips = {"Sovjet3","Sovjet2"}
active = false

function DoorTouched(hit)
if active == false then
 if hit.Parent:findFirstChild("Humanoid") ~= nil then
  for i = 1, #vips do
   if hit.Parent.Name == vips[i] then
   active = true
   script.Parent.CanCollide = false
   wait(2)
   script.Parent.CanCollide = true
   active = false
   break
   else
   hit.Parent.Humanoid.Health = 0
   end
  end
 end
end
end
script.Parent.Touched:connect(DoorTouched)
_________________________________________________________
_________________________________________________________


Modell Készítő Tool

Használat:
1.Másold be a szöveget egy üres scriptbe
2.Másold be a scriptet egy Hopperbin-be

Ennyi!

Figyelem! A script nem teljesen működőképes úgyhogy hibák lehetnek benne.



---------------------------
mode = "Press V"
lox = true
deb = true
---------------------------
MaxSelections = 35
CurrentSelections = 0
---------------------------
MaxModels = 0
CurrentModels = 0
---------------------------

function click(mouse)
if (deb == true) then
 if (mouse.Target ~= nil) then
  if (mouse.Target:findFirstChild("Humanoid") == nil) and (mouse.Target.Locked ~= true) and (mouse.Target.Parent.className ~= "Model") then

   if mode == "Add" then
    if mouse.Target:findFirstChild("Selected") == nil then
     if CurrentSelections <= MaxSelections then
      local sv = Instance.new("StringValue")
      sv.Parent = mouse.Target
      sv.Name = "Selected"
      sv.Value = ""..game.Players.LocalPlayer.Name..""
      CurrentSelections = CurrentSelections + 1
      h.Text = ""
      wait(0.1)
      h.Text = "Part added"
     else
     h.Text = "You reached the max selection limit "..CurrentSelections.."/"..MaxSelections..""
     end
    elseif mouse.Target:findFirstChild("Selected") ~= nil then
     local mp = game.Players:GetChildren()
     for n=1,#mp do
      if mouse.Target.Selected.Value == mp[n].Name then
      h.Text = "This part is already selected by "..mouse.Target.Selected.Value..""
      break
      end
     end
    end
   end
  end
 end
 if mode == "CreateModel" then
  if (CurrentModels <= MaxModels)  then
   local mod = Instance.new("Model")
   mod.Parent = game.Workspace
   mod.Name = game.Players.LocalPlayer.Name
   p2 = game.Workspace:GetChildren()
   for i2 = 1,#p2 do
    if p2[i2]:findFirstChild("Selected")~= nil then
     if (p2[i2].Selected.Value == game.Players.LocalPlayer.Name) then
      p2[i2].Parent = mod
     end
    end
   end
  else
  h.Text = "You reached the max model limit "..CurrentModels.."/"..MaxModels..""
  end
 elseif mode == "Reset" then
  p1 = game.Workspace:GetChildren()
  for i1 =1,#p1 do
   if p1[i1]:findFirstChild("Selected") ~= nil then
    if p1[i1].Selected.Value == game.Players.LocalPlayer.Name then
    p1[i1].Selected:Remove()
    end
   end
  end
  CurrentSelections = 0 
 end
end
end
-----------------------------------------------------------------------------------------------------------------------------------------------------
function keyD(key)
 if (key == "u") then
  if lox ~= true then
   mode = "Reset"
   wait(0.001)
   m.Text = "Mode: "..mode..""
   h.Text = "Click to reset every selected parts"
  end
 elseif (key == "e") then
  if lox ~= true then
   mode = "Add"
   wait(0.001)
   m.Text = "Mode: "..mode..""
   h.Text = "Click to select a part"
  end
 elseif (key == "m") then
  if lox ~= true then
   mode = "CreateModel"
   wait(0.001)
   m.Text = "Mode: "..mode..""
   h.Text = "Click to put all selected part in model"
  end
 elseif (key == "v") then
  if deb == true then
   deb = false
   CurrentModels = 0
   CurrentSelections = 0
   p3 = game.Workspace:GetChildren()
   for i3=1,#p3 do
    if p3[i3].className == "Model" then
     if p3[i3]:findFirstChild("Humanoid")== nil then
      if p3[i3].Name == game.Players.LocalPlayer.Name then
       CurrentModels = CurrentModels + 1
      end
     end
    else
     if p3[i3]:findFirstChild("Selected") ~= nil then
      if p3[i3].Selected.Value == game.Players.LocalPlayer.Name then
      CurrentSelections = CurrentSelections + 1
      end
     end
    end
   wait(0.001)
   end
   h.Text = "Mode: "..mode.." | SelectedPart(s): "..CurrentSelections.."/"..MaxSelections.." | ModelsCreated: "..CurrentModels.."/"..MaxModels..""
  end
 deb = true
 lox = false
 end
end

function selected(mouse)
m = Instance.new("Message")
h = Instance.new("Hint")
m.Parent = game.Players.LocalPlayer
h.Parent = game.Players.LocalPlayer
m.Text = "Mode: "..mode..""
h.Text = " U = Reset | E = Add | M = CreateModel | V = SeeDetails (This version has no limits)"
 mouse.KeyDown:connect(keyD)
 mouse.Button1Down:connect(function () click(mouse) end)
end
function deselected()
m:Remove()
h:Remove()
end
script.Parent.Selected:connect(selected)
script.Parent.Deselected:connect(deselected)


--Made by Sovjet3





Weblap látogatottság számláló:

Mai: 2
Tegnapi: 3
Heti: 2
Havi: 32
Össz.: 2 950

Látogatottság növelés
Oldal: Hogyan működik a HuPont.hu weboldalszerkesztő és honlap?
Sovjet3 Scriptjei - © 2008 - 2018 - sovland.hupont.hu

Az ingyenes honlapkészítés azt jelenti, hogy Ön készíti el a honlapját! Ingyen adjunk: Ingyen Honlap!

Adatvédelmi Nyilatkozat

A HuPont.hu ingyen honlap látogatók száma jelen pillanatban:


▲   Laptop 1 Ft-ért? Regisztrálj most! - Vatera.hu
X

A honlap készítés ára 78 500 helyett MOST 0 (nulla) Ft! Tovább »