TheGameCreators - CodeBase - Understanding RGB

Return to the CodeBase listing

Category: Basic 2D

Version: 1.0

Information

Uploaded: 2nd Mar 2005 08:07

Modified: 1st Jan 1970 01:00

Author: MikeS

Summary

Learn what RGB is all about, and how to use it in your 2D and 3D programs.

Full Description

Learn what RGB is all about, and how to use it in your 2D and 3D programs.

DarkBASIC Professional Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

`3-2-05 Ink RGB tutorial

`By MikeS of CurvedBasic

`What exactly does RGB stand for?

`RGB means Red,Green,Blue. different combinations of these values will give you millions(~16)

`of colors at your disposal. You can specify a value of between 0-255 for each color.

sync on : sync rate 60 `Setup our refresh rate for the screen.

set display mode 1024,768,32 `This is our resolution for our window.

do `Intialize our main loop

cls `Since we're doing lots of drawing and 2D work, it works well to clear the screen first.

ink rgb(255,0,0),1 `This command sets the ink for any lines, text, boxes, etc. that we use.

text 0,0,"This is red" `Heres use of the text command to  show us the red text.

`As you may have noticed, the higher value you put in the 'R' or red value, the more influence

`of that color you get. What happens when you balance them all out though?

ink rgb(255,255,255),1

text 0,30,"This will be white"

ink rgb(128,128,128),1

text 0,60,"This will be gray"

ink rgb(0,0,0),1

text 0,90,"This is black, though you can't see it because the screen is black!"

`This little for-next routine is really going to slow down your computer.

`It's not a good idea to put it into your main loop normally, but it's okay for this example.

lock pixels `Locking the pixels will help speed up the draw speed here.

for x=0 to 255

for y=0 to 255

dot x,y+120,rgb(x,0,0) `This makes dots at the specified x and y co-ordinates.

`We add 120 to the y value, so it will be positioned lower than our

`previous text.

next x

next y

`Here are the color gradiants for green and blue

for x=0 to 255

for y=0 to 255

dot x,y+375,rgb(0,x,0)

next x

next y

for x=0 to 255

for y=0 to 255

dot x,y+630,rgb(0,0,x)

next x

next y

unlock pixels `Unlock the pixels, since we're done with the drawing.

`You may be interested in returning the colors currently on screen. To do this

`we can use some neat pixel commands.

`This returns the pixel color value from our mouse position.

`It's a big number, so we'll break it down more.

pixelcolor=point(mousex(),mousey())

`These next 3 commands return the red(rgbr), green(rgbg), and blue(rgbb) values) of the

`pixel color.

red=rgbr(pixelcolor)

green=rgbg(pixelcolor)

blue=rgbb(pixelcolor)

`Now lets just print a simple text statement to show us the values.

ink rgb(255,255,255),1

text 400,0,"red="+str$(red)+" green="+str$(green)+" blue="+str$(blue)

sync `refresh the screen

loop `Send us back to the loop

`Hope this tutorial is helps you fully understand RGB and even some of the drawing commands

`better.

`CurvedBasic 2005

`Mike

Download

Please login to download

Comments

No comments yet.

Author Name:	MikeS
CodeBase Entries:	24

CodeBase - Understanding RGB

Information

Summary

Full Description

DarkBASIC Professional Source Code

Download

Screen Shot

Author

Comments