Spoiler 
-- [[ CONFIG START ]]--
--Admin Preferences--
--[[ This Needs To Be Changed To Your USGN!! To Add More Add A , And Add There USGN.. (ex: 15643) ]]--
Admins={15643}
--Time System Preferences--
RunTimeSystem=true
TimeSystemColor="white"
--[[
Color List (lowercase sensitive)
red
blue
green
white
black
To Change The Color InGame Just Type !Do And The Color...(ex:!DoRed)
]]--
--Day & Night Cycle System Preferences--
RunDayAndNightCycleSystem=true
--24/7 Night System Preferences--
Run247NightSystem=false
Darkness=0.75
-- [[ CONFIG END ]]--
addhook("ms100","Time")
addhook ("say","SayCommands")
function SayCommands(id,txt)
if (player(id,"usgn")==Admins[index]) then
     if (txt=="!DoBlue") then
          TimeSystemColor="blue"
          parse('sv_msg "©000000255A Server Admin Has Changed The Time Color To Blue!@C"')
     end
end
if (player(id,"usgn")==Admins[index]) then
     if (txt=="!DoRed") then
          TimeSystemColor="red"
          parse('sv_msg "©255000000A Server Admin Has Changed The Time Color To Red!@C"')
     end
end
if (player(id,"usgn")==Admins[index]) then
     if (txt=="!DoGreen") then
          TimeSystemColor="green"
          parse('sv_msg "©000255000A Server Admin Has Changed The Time Color To Green!@C"')
     end
end
if (player(id,"usgn")==Admins[index]) then
     if (txt=="!DoWhite") then
          TimeSystemColor="white"
          parse('sv_msg "©255255255A Server Admin Has Changed The Time Color To White!@C"')
     end
end
if (player(id,"usgn")==Admins[index]) then
     if (txt=="!DoBlack") then
          TimeSystemColor="black"
          parse('sv_msg "©000000000A Server Admin Has Changed The Time Color To Black!@C"')
     end
end
end
day=1
ampm="AM"
hour=2
minute=0
second=0
function Time()
-- [[ TIME SYSTEM START ]]--
second=second+10
if (RunTimeSystem==true) then
     if (TimeSystemColor=="red") then
          if (minute<10) then
          parse ('hudtxt 45 "©255000000'..hour..':0'..minute..' '..ampm..'"300 460 0')
               else
          parse ('hudtxt 45 "©255000000'..hour..':'..minute..' '..ampm..'" 300 460 0')
          end
     end
     if (TimeSystemColor=="green") then
          if (minute<10) then
          parse ('hudtxt 45 "©000255000'..hour..':0'..minute..' '..ampm..'" 300 460 0')
               else
          parse ('hudtxt 45 "©000255000'..hour..':'..minute..' '..ampm..'" 300 460 0')
          end
     end
     if (TimeSystemColor=="white") then
          if (minute<10) then
          parse ('hudtxt 45 "©255255255'..hour..':0'..minute..' '..ampm..'" 300 460 0')
               else
          parse ('hudtxt 45 "©255255255'..hour..':'..minute..' '..ampm..'" 300 460 0')
          end
     end
     if (TimeSystemColor=="black") then
          if (minute<10) then
          parse ('hudtxt 45 "©000000000'..hour..':0'..minute..' '..ampm..'" 300 460 0')
               else
          parse ('hudtxt 45 "©000000000'..hour..':'..minute..' '..ampm..'" 300 460 0')
          end
     end
     if (TimeSystemColor=="blue") then
          if (minute<10) then
          parse ('hudtxt 45 "©000000255'..hour..':0'..minute..' '..ampm..'" 300 460 0')
               else
          parse ('hudtxt 45 "©000000255'..hour..':'..minute..' '..ampm..'" 300 460 0')
          end
     end
end
     if (second==60) then
          second=0
          minute=minute+1
     end
     if (minute==60) then
          minute=0
          hour=hour+1
     end
     if (hour==12) then
          hour=1
          day=day+1
          if (ampm=="AM") then
          ampm="PM"
          else
          ampm="AM"
          end
     end
     if (day==7) then
          day=1
     end
-- [[ TIME SYSTEM END ]]--
-- [[ NIGHT SYSTEM START ]]--
if (night==nil) then
night = image("gfx/[Az]/block.bmp",0,0,2)
imagealpha(night,"0")
end
if (Run247NightSystem==true) then
freeimage (night)
night = image("gfx/[Az]/block.bmp",0,0,2)
imagecolor(night,0,0,0)
imagescale(night,6400,6400)
imagealpha(night,Darkness)     
end
if (RunDayAndNightCycleSystem==true) then
     if (hour==2) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.79")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.77")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.74")
               else if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.72")
               end
               end
               end
               end
          end
     end
     if (hour==3) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.69")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.67")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.64")
               else if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.6")
               end
               end
               end
               end
          end
     end
     if (hour==4) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.58")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.57")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.54")
               else if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.52")
               end
               end
               end
               end
          end
     end
     if (hour==5) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.48")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.46")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.43")
               else if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.41")
               end
               end
               end
               end
          end
     end
     if (hour==6) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.38")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.35")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.33")
               else if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.31")
               end
               end
               end
               end
          end
     end
     if (hour==7) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.28")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.25")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.23")
               else if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.2")
               end
               end
               end
               end
          end
     end
     if (hour==*8*) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.18")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.15")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.13")
               else if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.1")
               end
               end
               end
               end
          end
     end
     if (hour==*9*) then
          if (ampm=="AM") then
               if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.08")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.05")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.03")
               else if (minute==45) then
                    freeimage (night)
               end
               end
               end
               end
          end
     end
     if (hour==*8*) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.79")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.77")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.74")
               else if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.72")
               end
               end
               end
               end
          end
     end
     if (hour==7) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.69")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.67")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.64")
               else if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.6")
               end
               end
               end
               end
          end
     end
     if (hour==6) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.58")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.57")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.54")
               else if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.52")
               end
               end
               end
               end
          end
     end
     if (hour==5) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.48")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.46")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.43")
               else if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.41")
               end
               end
               end
               end
          end
     end
     if (hour==4) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.38")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.35")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.33")
               else if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.31")
               end
               end
               end
               end
          end
     end
     if (hour==3) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.28")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.25")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.23")
               else if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.2")
               end
               end
               end
               end
          end
     end
     if (hour==2) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.18")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.15")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.13")
               else if (minute==0) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.1")
               end
               end
               end
               end
          end
     end
     if (hour==1) then
          if (ampm=="PM") then
               if (minute==45) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.08")
               else if (minute==30) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.05")
               else if (minute==15) then
                    freeimage (night)
                    night = image("gfx/[Az]/block.bmp",0,0,2)
                    imagecolor(night,0,0,0)
                    imagescale(night,6400,6400)
                    imagealpha(night,"0.03")
               else if (minute==0) then
                    freeimage (night)
               end
               end
               end
               end
          end
     end
end
-- [[ NIGHT SYSTEM END ]]--
end