VPX Functions
Lights
RGB Lighting
1 min
	' > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > 	' > color leds 10 colors 	' > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > 	dim red, orange, amber, yellow, darkgreen, green, blue, darkblue, purple, white 	red = 10 	orange = 9 	amber = 8 	yellow = 7 	darkgreen = 6 	green = 5 	blue = 4 	darkblue = 3 	purple = 2 	white = 1 	sub setlightcolor(n, col, stat) 	 select case col 	 case red 	 n color = rgb(18, 0, 0) 	 n colorfull = rgb(255, 0, 0) 	 case orange 	 n color = rgb(18, 3, 0) 	 n colorfull = rgb(255, 64, 0) 	 case amber 	 n color = rgb(193, 49, 0) 	 n colorfull = rgb(255, 153, 0) 	 case yellow 	 n color = rgb(18, 18, 0) 	 n colorfull = rgb(255, 255, 0) 	 case darkgreen 	 n color = rgb(0, 8, 0) 	 n colorfull = rgb(0, 64, 0) 	 case green 	 n color = rgb(0, 18, 0) 	 n colorfull = rgb(0, 255, 0) 	 case blue 	 n color = rgb(0, 18, 18) 	 n colorfull = rgb(0, 255, 255) 	 case darkblue 	 n color = rgb(0, 8, 8) 	 n colorfull = rgb(0, 64, 64) 	 case purple 	 n color = rgb(128, 0, 128) 	 n colorfull = rgb(255, 0, 255) 	 case white 	 n color = rgb(255, 252, 224) 	 n colorfull = rgb(193, 91, 0) 	 case white 	 n color = rgb(255, 252, 224) 	 n colorfull = rgb(193, 91, 0) 	 end select 	 if stat <> 1 then 	 n state = 0 	 n state = stat 	 end if 	end sub
Updated 25 Mar 2024
Did this page help you?