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