Try this. The 'color' number, is - by default - your 'added up long number.'
Global color as dword
Global red as integer
Global green as integer
Global blue as integer
Box 100,100,400,400,Rgb(255,0,0),Rgb(0,255,0),Rgb(0,0,255),Rgb(255,255,255)
Do
Box 0,0,200,99,0,0,0,0
color=point(mousex(),mousey())
red=rgbr(color)
green=rgbg(color)
blue=rgbb(color)
Set Cursor 0,0
Print "Color: ";color
Print "Red: ";red
Print "Green: ";green
Print "Blue: ";blue
Loop
If you want a number like 128128128, then you would do something like this:
(red*1000000)+(green*1000)+blue
"Droids don't rip your arms off when they lose." -H. Solo
REALITY II
