Dubbsta
Active member
- Joined
- Jul 13, 2017
- Messages
- 208
if i may give a small contribution to cx in the form of colors?
i tried to keep it basic with the most popular colors i could think of. so far 31 colors. its a basic implementation and may need more than i can do.
if it doesnt make the cut no prob.
[/CODE]
i tried to keep it basic with the most popular colors i could think of. so far 31 colors. its a basic implementation and may need more than i can do.
if it doesnt make the cut no prob.
Cerberus:
Import mojo
Class Color
Field color:String
Method set:Void(color:String)
Self.color = color
Select color
Case "forestgreen"
SetColor(34,139,34)
Case "darkgreen"
SetColor(0,100,0)
Case "lightgreen"
SetColor(144,238,144)
Case "lightblue"
SetColor(173,216,230)
Case "blue"
SetColor(0,0,255)
Case "red"
SetColor(255,0,0)
Case "limegreen"
SetColor(0,255,0)
Case "yellow"
SetColor(255,255,0)
Case "orange"
SetColor(255,165,0)
Case "cyan"
SetColor(0,255,255)
Case "gold"
SetColor(255,215,0)
Case "pink"
SetColor(255,192,203)
Case "purple"
SetColor(128,0,128)
Case "violet"
SetColor(238,130,238)
Case "magenta"
SetColor(255,0,255)
Case "navyblue"
SetColor(0,0,128)
Case "royalblue"
SetColor(65,105,255)
Case "tan"
SetColor(210,180,140)
Case "brown"
SetColor(139,69,19)
Case "green"
SetColor(0,128,0)
Case "black"
SetColor(0,0,0)
Case "white"
SetColor(255,255,255)
Case "lightgray"
SetColor(211,211,211)
Case "gray"
SetColor(128,128,128)
Case "darkgray"
SetColor(169,169,169)
Case "pastelred"
SetColor(254,163,170)
Case "pastelorange"
SetColor(248,184,139)
Case "pastelyellow"
SetColor(250,248,132)
Case "pastelgreen"
SetColor(186,237,145)
Case "pastelblue"
SetColor(178,206,254)
Case "pastelpurple"
SetColor(242,162,232)
End
End
Method get:String()
Return color
End
End