Home > CBM > BASIC > Keywords > Rclr
180 Subpages: (divide), (equal), (less), (minus), (more), (multiply), (plus), (power), Abs, And, Append, Asc, Atn, Auto, Backup, Bank, Begin, Bend, Bload, Boot, Box, Bsave, Bump, Catalog, Char, Chr, Circle, Close, Clr, Cmd, Collect, Collision, Color, Concat, Cont, Copy, Cos, Data, Dclear, Dclose, Dec, Def, Delete, Dim, Directory, Dispose, Dload, Do, Dopen, Draw, Ds, Ds string, Dsave, Dverify, El, Else, End, Envelope, Er, Err, Exit, Exp, Fast, Fetch, Filter, Fn, For, Fre, Get, Get num, Getkey, Go, Gosub, Goto, Graphic, Gshape, Header, Help, Hex, If, Input, Input num, Instr, Int, Joy, Key, Left, Len, Let, List, Load, Locate, Log, Loop, Mid, Monitor, Movspr, New, Next, Not, Off, On, Open, Or, Paint, Peek, Pen, Pi, Play, Pointer, Poke, Pos, Pot, Print, Print num, Pudef, Quit, Rdot, Read, Record, Rem, Rename, Renumber, Restore, Resume, Return, Rgr, Right, Rlum, Rnd, Rreg, Rspcolor, Rsppos, Rsprite, Run, Rwindow, Save, Scale, Scnclr, Scratch, Sgn, Sin, Sleep, Slow, Sound, Spc, Sprcolor, Sprdef, Sprite, Sprsav, Sqr, Sshape, St, Stash, Step, Stop, Str, Swap, Sys, Tab, Tan, Tempo, Then, Ti, Ti string, To, Trap, Troff, Tron, Until, Using, Usr, Val, Verify, Vol, Wait, While, Width, Window, Xor |
| Keyword | Abbreviation | Token (hex) | Version(s) | Classification | | RCLR | R{Shift+C} | CD | 3.5,7.0 | Function | | DOPEN | D{Shift+O} | CD | 4.x | Command and Statement |
RCLR ( colorSource ) | Parameters | Type | Legal Value(s) | Note(s) | | colorSource | Integer | - background (bitmap & 40-column text)
- bitmap foreground
- bitmap multi-color 1
- bitmap multi-color 2
- 40-column border
- active text*
- 80-column background*
| * C128 only |
| Returns | Type | Value(s) | Note(s) | | chipColor | Integer | 1 ~ 16 | |
Return a chipColor assigned to a graphic screen element.
The RCLR function is a partial complement to COLOR. It returns the chipColor that has been assigned to a colorSource. On the TED series (BASIC v3.5), another partial complement to COLOR is available, RLUM. See COLOR for a list of colors and their assigned numbers. The text color can be changed by printing special "control codes" with CHR$ (or some reverse-font characters in text strings). Only BASAIC v7.0, however, allows you to get the current text color with RCLR. On other machines, you have to PEEK a secret variable, "Text Attribute". The C128 has two text screens, but RCLR can only give the text color of the active text editor. So to get the "other" screen's text color, you would have to use GRAPHIC (or print ESC X) to switch the active text editor before using this function (and then you may need to switch back to the original text editor). What a kludge! If colorSource is omitted or is not a valid expression, SYNTAX ERROR occurs. If colorSource is a string, TYPE MISMATCH ERROR occurs; you can use VAL to make a string numeric. Otherwise the colorSource is converted with INT. If the result is not a LegalValue (see table above) then ILLEGAL QUANTITY ERROR occurs. Examples (from C128 in 80-column text mode, default values):
PRINT RCLR("0")
?TYPE MISMATCH ERROR
READY.
PRINT RCLR(0) : REM 40-column background
12 dark gray
READY.
PRINT RCLR(1) : REM bitmap background
14 light green
READY.
PRINT RCLR(2) : REM bitmap multi-color 1
2 white
READY.
PRINT RCLR(3) : REM bitmap multi-color 2
3 red
READY.
PRINT RCLR(4) : REM 40-column border
14 light green
READY.
PRINT RCLR(5) : REM active text color (80 columns)
4 cyan
READY.
PRINT RCLR(6) : REM 80-column background
1 black
READY.
PRINT RGR(7)
?ILLEGAL QUANTITY ERROR
READY.
|
© H2Obsession, 2014 |