local workspace=game:GetService("Workspace") local Lighting=game:GetService("Lighting") local RunService=game:GetService("RunService") local Debris=game:GetService("Debris") local TweenService=game:GetService("TweenService") local SoundService=game:GetService("SoundService") local Players=game:GetService("Players") local player = game.Players.LocalPlayer local playerGui = player:WaitForChild("PlayerGui") local model=workspace:FindFirstChild("Model") local screenGui = Instance.new("ScreenGui") screenGui.Name = "ActivationSystem" screenGui.ResetOnSpawn = false screenGui.Parent = playerGui -- خلفية ضوئية local blur = Instance.new("BlurEffect") blur.Size = 0 blur.Parent = game.Lighting -- إنشاء إطار التفعيل local frame = Instance.new("Frame") frame.Size = UDim2.new(0.5, 0, 0.4, 0) frame.Position = UDim2.new(0.25, 0, 0.3, 0) frame.BackgroundColor3 = Color3.fromRGB(15, 15, 15) frame.BackgroundTransparency = 1 frame.BorderSizePixel = 0 frame.Parent = screenGui -- الظل الداخلي local uicorner = Instance.new("UICorner") uicorner.CornerRadius = UDim.new(0, 12) uicorner.Parent = frame local uiStroke = Instance.new("UIStroke") uiStroke.Thickness = 2 uiStroke.Color = Color3.fromRGB(0, 255, 0) uiStroke.Parent = frame -- عنوان الرسالة local title = Instance.new("TextLabel") title.Size = UDim2.new(1, 0, 0.2, 0) title.Position = UDim2.new(0, 0, 0, 0) title.Text = "YouTube: @Dzenr" title.TextColor3 = Color3.fromRGB(0, 255, 0) title.Font = Enum.Font.GothamBold title.TextSize = 32 title.BackgroundTransparency = 1 title.Parent = frame -- وصف الرسالة local desc = Instance.new("TextLabel") desc.Size = UDim2.new(1, -40, 0.2, 0) desc.Position = UDim2.new(0, 20, 0.2, 0) desc.Text = "يتم الان تفعيل تفعيل وحدات الإضاءة وتجهيز الموثرات البصرية. . ." desc.TextWrapped = true desc.TextColor3 = Color3.fromRGB(200, 255, 200) desc.Font = Enum.Font.Gotham desc.TextSize = 20 desc.BackgroundTransparency = 1 desc.Parent = frame -- شريط التحميل local loadingBarBG = Instance.new("Frame") loadingBarBG.Size = UDim2.new(0.8, 0, 0.08, 0) loadingBarBG.Position = UDim2.new(0.1, 0, 0.6, 0) loadingBarBG.BackgroundColor3 = Color3.fromRGB(30, 30, 30) loadingBarBG.BorderSizePixel = 0 loadingBarBG.Parent = frame local uicornerBar = Instance.new("UICorner") uicornerBar.CornerRadius = UDim.new(0, 6) uicornerBar.Parent = loadingBarBG local loadingBar = Instance.new("Frame") loadingBar.Size = UDim2.new(0, 0, 1, 0) loadingBar.Position = UDim2.new(0, 0, 0, 0) loadingBar.BackgroundColor3 = Color3.fromRGB(0, 255, 0) loadingBar.BorderSizePixel = 0 loadingBar.Parent = loadingBarBG local uicornerProgress = Instance.new("UICorner") uicornerProgress.CornerRadius = UDim.new(0, 6) uicornerProgress.Parent = loadingBar -- زر مخفي للتأكيد النهائي local confirmBtn = Instance.new("TextButton") confirmBtn.Size = UDim2.new(0.4, 0, 0.12, 0) confirmBtn.Position = UDim2.new(0.3, 0, 0.78, 0) confirmBtn.Text = "ابدأ اللعب الآن" confirmBtn.Font = Enum.Font.GothamBold confirmBtn.TextSize = 22 confirmBtn.TextColor3 = Color3.fromRGB(255, 255, 255) confirmBtn.BackgroundColor3 = Color3.fromRGB(0, 170, 0) confirmBtn.BorderSizePixel = 0 confirmBtn.Visible = false confirmBtn.Parent = frame local uicornerBtn = Instance.new("UICorner") uicornerBtn.CornerRadius = UDim.new(0, 8) uicornerBtn.Parent = confirmBtn -- تأثير وميض local function flashFrame() for i = 1, 5 do uiStroke.Color = Color3.fromRGB(255, 255, 255) wait(0.1) uiStroke.Color = Color3.fromRGB(0, 255, 0) wait(0.1) end end -- صوت تفعيل local sound = Instance.new("Sound") sound.SoundId = "rbxassetid://131644923" -- صوت تفعيل sound.Volume = 1 sound.Parent = player:WaitForChild("PlayerGui") -- حركة دخول تدريجية for i = 1, 10 do frame.BackgroundTransparency = 1 - (i * 0.1) blur.Size = i * 2 wait(0.05) end -- تشغيل الصوت sound:Play() -- تشغيل الوميض flashFrame() -- تحميل شريط التقدم for i = 1, 100 do loadingBar.Size = UDim2.new(i / 100, 0, 1, 0) wait(0.05) if i == 20 then desc.Text = "يتم الان تحميل الاصوات . . ." elseif i == 40 then desc.Text = "يتم الان إعداد انعكاسات البيئة" elseif i == 60 then desc.Text = "التحقق من سلامة ملفات التظليل. . ." elseif i == 80 then desc.Text = "يتم تحميل الوضع الليلي . . . ." end end -- التفعيل اكتمل desc.Text = "✅ تم التفعيل بنجاح! اضغط للمتابعة." confirmBtn.Visible = true -- اهتزاز بسيط للنافذة لجذب الانتباه spawn(function() for i = 1, 10 do frame.Position = frame.Position + UDim2.new(0, math.random(-2,2), 0, math.random(-2,2)) wait(0.03) end frame.Position = UDim2.new(0.25, 0, 0.3, 0) end) -- عند الضغط على زر البدء confirmBtn.MouseButton1Click:Connect(function() for i = 1, 10 do frame.BackgroundTransparency = i * 0.1 blur.Size = blur.Size - 2 wait(0.03) end screenGui:Destroy() blur:Destroy() if model then local function setMat(obj) for _,c in pairs(obj:GetChildren()) do if c:IsA("BasePart") then c.Material=Enum.Material.Basalt elseif c:IsA("Model")or c:IsA("Folder") then setMat(c) end end end if model:FindFirstChild("001_SnowStreet") then setMat(model["001_SnowStreet"]) end if model:FindFirstChild("Street") then for _,o in pairs(model.Street:GetDescendants()) do if o:IsA("BasePart") then o.Material=Enum.Material.Basalt end end end for _,o in pairs(model:GetChildren()) do if o:IsA("BasePart") and (o.Name=="Sidewalk" or o.Name=="Wedge") and o.Material==Enum.Material.SmoothPlastic then o.Material=Enum.Material.Cobblestone end end model.ChildAdded:Connect(function(obj) if obj:IsA("BasePart") and (obj.Name=="Sidewalk" or obj.Name=="Wedge") and obj.Material==Enum.Material.SmoothPlastic then obj.Material=Enum.Material.Cobblestone end end) end local soundPart=Instance.new("Part") soundPart.Size=Vector3.new(1,1,1) soundPart.Transparency=1 soundPart.Anchored=true soundPart.CanCollide=false soundPart.Parent=workspace local player=Players.LocalPlayer local character=player.Character or player.CharacterAdded:Wait() local hrp=character:WaitForChild("HumanoidRootPart") local birdSound=Instance.new("Sound") birdSound.Name="BirdsSound" birdSound.SoundId="rbxassetid://1237969272" birdSound.Looped=true birdSound.Volume=0.05 birdSound.Parent=soundPart local wolfSound=Instance.new("Sound") wolfSound.SoundId="rbxassetid://6654360741" wolfSound.Volume=0.05 wolfSound.Looped=false wolfSound.Parent=workspace RunService.Heartbeat:Connect(function() if hrp and hrp.Parent then soundPart.Position=hrp.Position+Vector3.new(0,10,0) end end) local function isNight() local t=Lighting.ClockTime return (t>=18 or t<=6) end task.spawn(function() while true do if isNight() then if birdSound.IsPlaying then birdSound:Stop() end if wolfSound.IsPlaying then wolfSound:Stop() end wolfSound:Play() else if wolfSound.IsPlaying then wolfSound:Stop() end if not birdSound.IsPlaying then birdSound:Play() end end wait(20) end end) local fountainPart=Instance.new("Part") fountainPart.Anchored=true fountainPart.CanCollide=false fountainPart.Transparency=1 fountainPart.Size=Vector3.new(1,1,1) fountainPart.Position=Vector3.new(-27,19,15) fountainPart.Parent=workspace local attachment=Instance.new("Attachment") attachment.Position=Vector3.new(-27,19,15) attachment.Parent=fountainPart local fountainSound=Instance.new("Sound") fountainSound.Name="FountainSound" fountainSound.SoundId="rbxassetid://4766793559" fountainSound.Looped=true fountainSound.Volume=0.03 fountainSound.EmitterSize=10 fountainSound.RollOffMode=Enum.RollOffMode.Linear fountainSound.MaxDistance=100 fountainSound.Parent=attachment fountainSound:Play() local customSound=Instance.new("Sound") customSound.Name="MyCustomSound" customSound.SoundId="rbxassetid://9048659736" customSound.Volume=0.01 customSound.Looped=true customSound.PlayOnRemove=false customSound.Parent=workspace customSound:Play() local active=false local stars={} local shootingStarsFolder=Instance.new("Folder",workspace) shootingStarsFolder.Name="ShootingStars" local STAR_COUNT=300 local SHOOTING_STAR_CHANCE=0.3 local SHOOTING_STAR_MAX=12 local shootingStarCooldown=0.1 local spaceSound=Instance.new("Sound",workspace) spaceSound.SoundId="rbxassetid://1843520836" spaceSound.Volume=0.3 spaceSound.Looped=true spaceSound.Name="SpaceAmbience" local function createStar() local star=Instance.new("Part") local size=math.random(1,3)*0.5 star.Size=Vector3.new(size,size,size) star.Position=Vector3.new(math.random(-1000,1000),math.random(300,700),math.random(-1000,1000)) star.Anchored=true star.CanCollide=false star.Material=Enum.Material.Neon local colors={Color3.fromRGB(255,255,255),Color3.fromRGB(255,255,180),Color3.fromRGB(180,200,255)} star.Color=colors[math.random(1,#colors)] star.Name="Star" star.Parent=workspace local light=Instance.new("PointLight",star) light.Brightness=2+math.random()*1.5 light.Range=12 spawn(function() while star.Parent and active do star.Transparency=0.2+math.sin(tick()*math.random(2,5))*0.2 RunService.Heartbeat:Wait() end if star.Parent then star:Destroy() end end) table.insert(stars,star) end local function createShootingStar() if not active then return end local startPos=Vector3.new(math.random(-1000,1000),math.random(350,600),math.random(-1000,1000)) local dir=Vector3.new(math.random(-1,1),math.random(-0.1,0.1),math.random(-1,1)).Unit local speed=math.random(350,550) local isFire=math.random()<=SHOOTING_STAR_CHANCE local color=isFire and Color3.fromRGB(255,50,50) or Color3.fromRGB(255,255,220) local trailColor=isFire and ColorSequence.new(Color3.fromRGB(255,120,0),Color3.fromRGB(255,230,50)) or ColorSequence.new(Color3.fromRGB(255,255,255),Color3.fromRGB(255,255,180)) local star=Instance.new("Part") star.Size=Vector3.new(0.5,0.5,3) star.Position=startPos star.Anchored=true star.CanCollide=false star.Material=Enum.Material.Neon star.Color=color star.Name="ShootingStar" star.Parent=shootingStarsFolder local att0=Instance.new("Attachment",star) local att1=Instance.new("Attachment",star) att1.Position=Vector3.new(0,0,-3) local trail=Instance.new("Trail",star) trail.Attachment0=att0 trail.Attachment1=att1 trail.Lifetime=0.35 trail.Color=trailColor trail.LightEmission=1 trail.WidthScale=NumberSequence.new({NumberSequenceKeypoint.new(0,1),NumberSequenceKeypoint.new(1,0)}) local light=Instance.new("PointLight",star) light.Brightness=isFire and 12 or 7 light.Range=35 light.Color=color if isFire then local fire=Instance.new("Fire",star) fire.Heat=15 fire.Size=3.5 fire.Color=Color3.fromRGB(255,110,0) fire.SecondaryColor=Color3.fromRGB(255,210,0) end local lifetime=math.random(1,1.5) local timePassed=0 local moveConn moveConn=RunService.Heartbeat:Connect(function(dt) if not active then moveConn:Disconnect() if star.Parent then star:Destroy() end return end timePassed+=dt if timePassed>=lifetime then moveConn:Disconnect() if star.Parent then star:Destroy() end return end local curve=math.sin(timePassed*20)*0.5 star.Position+=(dir+Vector3.new(0,curve,0)).Unit*speed*dt end) Debris:AddItem(star,4) end local function updateSky() local hour=Lighting.ClockTime local shouldBeActive=hour>=18 or hour<6 if shouldBeActive and not active then active=true Lighting.FogColor=Color3.fromRGB(10,10,30) Lighting.FogEnd=5000 Lighting.Brightness=2 for _,s in ipairs(stars)do if s and s.Parent then s:Destroy() end end stars={} for _,p in ipairs(shootingStarsFolder:GetChildren())do p:Destroy() end for i=1,STAR_COUNT do createStar() end spaceSound:Play() elseif not shouldBeActive and active then active=false for _,s in ipairs(stars)do if s and s.Parent then s:Destroy() end end stars={} for _,p in ipairs(shootingStarsFolder:GetChildren())do p:Destroy() end spaceSound:Stop() Lighting.FogColor=Color3.fromRGB(192,192,192) Lighting.FogEnd=100000 Lighting.Brightness=2 end end task.spawn(function() while true do if active then for i=1,SHOOTING_STAR_MAX do createShootingStar() task.wait(shootingStarCooldown) end else task.wait(1) end end end) task.spawn(function() while true do updateSky() task.wait(1) end end) local rainFolder=Instance.new("Folder",workspace) rainFolder.Name="FakeRain" local isRaining=false local birds=Instance.new("Sound",SoundService) birds.SoundId="rbxassetid://9111139882" birds.Volume=0.2 birds.Looped=true birds:Play() local rainSound=Instance.new("Sound",SoundService) rainSound.SoundId="rbxassetid://9118823106" rainSound.Volume=0.3 rainSound.Looped=true rainSound:Play() local thunder=Instance.new("Sound",SoundService) thunder.SoundId="rbxassetid://9120018695" thunder.Volume=0.4 local function updateBirdSound() if isRaining then birds.Volume=0 else birds.Volume=0.2 end end local function spawnRain() isRaining=true updateBirdSound() for i=1,120 do local drop=Instance.new("Part") drop.Size=Vector3.new(0.1,2,0.1) drop.Anchored=true drop.CanCollide=false drop.Material=Enum.Material.Glass drop.Transparency=0.5 drop.Color=Color3.fromRGB(160,160,255) drop.Position=Vector3.new(math.random(-150,150),100,math.random(-150,150)) drop.Parent=rainFolder local tween=TweenService:Create(drop,TweenInfo.new(1),{Position=drop.Position-Vector3.new(0,60,0)}) tween:Play() Debris:AddItem(drop,1.5) end wait(1.5) isRaining=false updateBirdSound() end local function lightningStrike() local flash=Instance.new("Part") flash.Size=Vector3.new(1,1000,1) flash.Anchored=true flash.CanCollide=false flash.Transparency=0.4 flash.Material=Enum.Material.Neon flash.Color=Color3.new(1,1,1) flash.Position=Vector3.new(math.random(-100,100),500,math.random(-100,100)) flash.Parent=workspace Lighting.Brightness=Lighting.Brightness+1.5 thunder:Play() wait(0.1) Lighting.Brightness=Lighting.Brightness-1.5 flash:Destroy() end for _,part in pairs(workspace:GetDescendants())do if part:IsA("BasePart") and part.Material==Enum.Material.SmoothPlastic then part.Reflectance=0.25 end end task.spawn(function() while true do spawnRain() if math.random()<0.2 then lightningStrike() end wait(1) end end) -- إعدادات Lighting أساسية Lighting.Brightness = 2 Lighting.GlobalShadows = true Lighting.OutdoorAmbient = Color3.fromRGB(70, 70, 70) -- تعديل الضباب لخفة وعمق جميل Lighting.FogColor = Color3.fromRGB(120, 130, 140) Lighting.FogStart = 80 Lighting.FogEnd = 600 Lighting.EnvironmentSpecularScale = 1 Lighting.EnvironmentDiffuseScale = 0.5 -- Skybox واقعي local sky = Instance.new("Sky") sky.SkyboxBk = "rbxassetid://159454299" sky.SkyboxDn = "rbxassetid://159454296" sky.SkyboxFt = "rbxassetid://159454293" sky.SkyboxLf = "rbxassetid://159454286" sky.SkyboxRt = "rbxassetid://159454300" sky.SkyboxUp = "rbxassetid://159454304" sky.Parent = Lighting -- مؤثرات بصرية مريحة local color = Instance.new("ColorCorrectionEffect", Lighting) color.Brightness = 0.03 color.Contrast = 0.15 color.Saturation = 0.05 color.TintColor = Color3.fromRGB(255, 240, 220) local bloom = Instance.new("BloomEffect", Lighting) bloom.Intensity = 0.8 bloom.Size = 56 bloom.Threshold = 0.9 local sunRays = Instance.new("SunRaysEffect", Lighting) sunRays.Intensity = 0.05 sunRays.Spread = 0.8 local blur = Instance.new("BlurEffect", Lighting) blur.Size = 0 -- صوت عصافير طبيعي local birds = Instance.new("Sound", SoundService) birds.SoundId = "rbxassetid://9111139882" -- صوت عصافير جميل birds.Volume = 0.2 birds.Looped = true birds:Play() -- حالة الطقس (مطر/لا) local isRaining = false local function updateBirdSound() if isRaining then birds.Volume = 0 else birds.Volume = 0.2 end end -- مجلد المطر الوهمي local rainFolder = Instance.new("Folder", workspace) rainFolder.Name = "FakeRain" -- صوت المطر local rainSound = Instance.new("Sound", SoundService) rainSound.SoundId = "rbxassetid://9118823106" rainSound.Volume = 0.3 rainSound.Looped = true rainSound:Play() -- وظيفة إنشاء المطر الوهمي local function spawnRain() isRaining = true updateBirdSound() for i = 1, 120 do local drop = Instance.new("Part") drop.Size = Vector3.new(0.1, 2, 0.1) drop.Anchored = true drop.CanCollide = false drop.Material = Enum.Material.Glass drop.Transparency = 0.5 drop.Color = Color3.fromRGB(160, 160, 255) drop.Position = Vector3.new(math.random(-150,150), 100, math.random(-150,150)) drop.Parent = rainFolder local tween = TweenService:Create(drop, TweenInfo.new(1), {Position = drop.Position - Vector3.new(0, 60, 0)}) tween:Play() game:GetService("Debris"):AddItem(drop, 1.5) end wait(1.5) isRaining = false updateBirdSound() end -- انعكاسات على أجزاء SmoothPlastic for _, part in pairs(workspace:GetDescendants()) do if part:IsA("BasePart") and part.Material == Enum.Material.SmoothPlastic then part.Reflectance = 0.25 end end -- تشغيل المطر والبرق بشكل دوري task.spawn(function() while true do spawnRain() if math.random() < 0.2 then lightningStrike() end wait(1) end end) end)