1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
| Quintiq file version 2.0
| #parent: #root
| StaticMethod GetRGBWithIntensity (
| Number colorvalue,
| Number intensity,
| output Number red_o,
| output Number green_o,
| output Number blue_o
| ) declarative remote
| {
| TextBody:
| [*
| GlobalParameters_MP::GetRGB( colorvalue, red_o, green_o, blue_o );
| if( intensity > 0 )
| {
| red_o := minvalue( 255, red_o + intensity );
| green_o := minvalue( 255, green_o + intensity );
| blue_o := minvalue( 255, blue_o + intensity );
| }
| else if( intensity < 0 )
| {
| red_o := maxvalue( 0, red_o + intensity );
| green_o := maxvalue( 0, green_o + intensity );
| blue_o := maxvalue( 0, blue_o + intensity );
| }
| *]
| }
|
|
