Time changing script - Loops forever

Administrator Posts : 58 Join date : 2010-07-28

Code:: speed = 2 --Sets the speed of the time changing.
sec = 0
min = 0
hour = 0
while true do
game.Lighting.TimeOfDay = ""..hour..":"..min..":"..sec.."" --The time of day is equal to the amount of hours, minutes, and seconds.
sec = sec + (5*speed) --Add 5*Speed to the seconds value. Meaning, add 10 seconds to the time.

if sec >= 60 then --If the seconds value is equal to or more than 60
   sec = 0 --make seconds equal to zero and
   min = min + 1 --Add a minute to the minute value
end

if min >= 60 then --If the minutes value is equal to or more than 60
   min = 0 --make the amount of minutes equal to zero and
   hour = hour + 1 --add one hour to the hour value
end

if hour >= 24 then --if the hours value is equal to or more than 24
   hour = 0 --make the ammount of hours equal to zero and restart the script
end

wait(0.05) --Run the script every 5 mili-seconds
end

Administrator Posts : 878 Join date : 2010-07-30

You could make it slightly more effeicent....

Code:: speed = 2 --Sets the speed of the time changing.
local sec = 0
local min = 0
local hour = 0
while wait(.05) do
game.Lighting.TimeOfDay = ""..hour..":"..min..":"..sec.."" --The time of day is equal to the amount of hours, minutes, and seconds.
sec = sec + (5*speed) --Add 5*Speed to the seconds value. Meaning, add 10 seconds to the time.

if sec >= 60 then --If the seconds value is equal to or more than 60
sec = 0 --make seconds equal to zero and
min = min + 1 --Add a minute to the minute value
end

if min >= 60 then --If the minutes value is equal to or more than 60
min = 0 --make the amount of minutes equal to zero and
hour = hour + 1 --add one hour to the hour value
end

if hour >= 24 then --if the hours value is equal to or more than 24
hour = 0 --make the ammount of hours equal to zero and restart the script
end
end

Administrator Posts : 58 Join date : 2010-07-28

It's the same exact thing... It doesn't make it more efficient or less efficient.

Administrator Posts : 878 Join date : 2010-07-30

you would save more time and effort my way...

Administrator Posts : 58 Join date : 2010-07-28

Okay... but typing four extra letters isn't time consuming and doesn't take any effort.

Guest

You can not only shorten it, but make it MUCH neater and efficent.

Code:: --I remembered the block xD
Speed = 2
while true do
game.Lighting:SetMinutesAfterMidnight(game.Lighting:GetMinutesAfterMidnight() + Speed / 60)
wait(0.05)
end

Administrator Posts : 878 Join date : 2010-07-30

I think voidhack wins...

Guest

I think I win also. I remembered the code for adding code xD

Expert Scripter Posts : 393 Join date : 2011-01-17

is this just a time changing thing for the lighting? if it is, who would want to use it?

Administrator Posts : 878 Join date : 2010-07-30

To make your map have day and night.

Expert Scripter Posts : 393 Join date : 2011-01-17

the point is that i do not want a day and night script

Administrator Posts : 1081 Join date : 2010-12-09 Age : 26

the point is that others might want it.

Administrator Posts : 878 Join date : 2010-07-30

Exactly

Administrator Posts : 1081 Join date : 2010-12-09 Age : 26

lol I win.

Subject: Re: Time changing script - Loops forever January 24th 2011, 9:08 pm

Actually voidhack still wins.

Administrator Posts : 878 Join date : 2010-07-30

Code:: S = 2
while wait(.05) do
game.Lighting:SetMinutesAfterMidnight(game.Lighting:GetMinutesAfterMidnight()+S/60)
end

hmm...

Expert Scripter Posts : 393 Join date : 2011-01-17

Code:: while wait(0.05) do
game.Lighting:SetMinutesAfterMidnight(game.Lighting:GetMinutesAfterMidnight()+%Speed%/60)
end

you don't need a variable, that saves time and, for this exception, space

Administrator Posts : 1081 Join date : 2010-12-09 Age : 26

lol, why would make a fuss over the smallest things? =P

Got a really good idea? Post it in projects and it might show up here!