咨詢內容：

改在博弈上用

VAR1:=EMA(EMA(C,9),9);
VAR2:=REF(VAR1,1);
控盤:=(VAR1-VAR2)/VAR2*100000;
AA:=EMA(控盤,8);
DRAWBMP(控盤<0,MA(0+ABS(控盤-REF(控盤,1)),100),'大綠.BMP');
DRAWBMP(控盤>REF(控盤,1) AND 控盤>0,MA(0-ABS(控盤-REF(控盤,1)),100),'大紅.BMP');
DRAWBMP(控盤<REF(控盤,1) AND 控盤>0,MA(0-ABS(控盤-REF(控盤,1)),100),'中黃.BMP');

//{紅色}
STICKLINE1(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,4.5,0),COLOR030163;
STICKLINE1(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,3.5,0),COLOR040187;
STICKLINE1(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,3,0),COLOR0501A7;
STICKLINE1(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,2.5,0),COLOR0601C9;
STICKLINE1(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,2,0),COLOR0601E2;
STICKLINE1(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,1.5,0),COLOR120CFE;
//{紅色2}
STICKLINE1(控盤>AA AND 控盤>0 AND AA<0,控盤,0,4.5,0),COLOR030163;
STICKLINE1(控盤>AA AND 控盤>0 AND AA<0,控盤,0,3.5,0),COLOR040187;
STICKLINE1(控盤>AA AND 控盤>0 AND AA<0,控盤,0,3,0),COLOR0501A7;
STICKLINE1(控盤>AA AND 控盤>0 AND AA<0,控盤,0,2.5,0),COLOR0601C9;
STICKLINE1(控盤>AA AND 控盤>0 AND AA<0,控盤,0,2,0),COLOR0601E2;
STICKLINE1(控盤>AA AND 控盤>0 AND AA<0,控盤,0,1.5,0),COLOR120CFE;
//{綠色}
STICKLINE1(控盤<0 AND AA>控盤 AND AA<0,控盤,AA,4.5,0),COLOR125A05;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,3.8,0),COLOR155500;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,3.1,0),COLOR208000;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,2.4,0),COLOR2BAA00;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,1.7,0),COLOR35D500;
//{綠色2}
STICKLINE1(控盤<0 AND AA>控盤 AND AA>0,控盤,0,4.5,0),COLOR125A05;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,3.8,0),COLOR155500;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,3.1,0),COLOR208000;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,2.4,0),COLOR2BAA00;
STICKLINE1(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,1.7,0),COLOR35D500;
//{白色}
STICKLINE1((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,4.5,0),COLOR959595;
STICKLINE1((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,3.8,0),COLORB4B4B4;
STICKLINE1((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,3.1,0),COLORD0D0D0;
STICKLINE1((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,2.4,0),COLORF0F0F0;
STICKLINE1((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,1.7,0),COLORFCFCFC;
A10:=CROSS(控盤,0);
//{黃色}
STICKLINE1((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,4.5,0),COLOR008484;
STICKLINE1((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,3.8,0),COLOR00A2A2;
STICKLINE1((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤),控盤,0,3.1,0),COLOR00B7B7;
STICKLINE1((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,2.4,0),COLOR00F0F0;
STICKLINE1((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,1.7,0),COLOR06FFFF;
? <!-- 咨詢內容：

附件 :

-->

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： VAR1:=EMA(EMA(C,9),9);
VAR2:=REF(VAR1,1);
控盤:=(VAR1-VAR2)/VAR2*100000;
AA:=EMA(控盤,8);
DRAWBMP(控盤<0,MA(0+ABS(控盤-REF(控盤,1)),100),'大綠.BMP');
DRAWBMP(控盤>REF(控盤,1) AND 控盤>0,MA(0-ABS(控盤-REF(控盤,1)),100),'大紅.BMP');
DRAWBMP(控盤<REF(控盤,1) AND 控盤>0,MA(0-ABS(控盤-REF(控盤,1)),100),'中黃.BMP');

//{紅色}
STICKLINE(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,4.5,0),COLOR030163;
STICKLINE(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,3.5,0),COLOR040187;
STICKLINE(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,3,0),COLOR0501A7;
STICKLINE(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,2.5,0),COLOR0601C9;
STICKLINE(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,2,0),COLOR0601E2;
STICKLINE(控盤>AA AND 控盤>0 AND AA>0,控盤,AA,1.5,0),COLOR120CFE;
//{紅色2}
STICKLINE(控盤>AA AND 控盤>0 AND AA<0,控盤,0,4.5,0),COLOR030163;
STICKLINE(控盤>AA AND 控盤>0 AND AA<0,控盤,0,3.5,0),COLOR040187;
STICKLINE(控盤>AA AND 控盤>0 AND AA<0,控盤,0,3,0),COLOR0501A7;
STICKLINE(控盤>AA AND 控盤>0 AND AA<0,控盤,0,2.5,0),COLOR0601C9;
STICKLINE(控盤>AA AND 控盤>0 AND AA<0,控盤,0,2,0),COLOR0601E2;
STICKLINE(控盤>AA AND 控盤>0 AND AA<0,控盤,0,1.5,0),COLOR120CFE;
//{綠色}
STICKLINE(控盤<0 AND AA>控盤 AND AA<0,控盤,AA,4.5,0),COLOR125A05;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,3.8,0),COLOR155500;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,3.1,0),COLOR208000;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,2.4,0),COLOR2BAA00;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA<0,控盤,AA,1.7,0),COLOR35D500;
//{綠色2}
STICKLINE(控盤<0 AND AA>控盤 AND AA>0,控盤,0,4.5,0),COLOR125A05;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,3.8,0),COLOR155500;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,3.1,0),COLOR208000;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,2.4,0),COLOR2BAA00;
STICKLINE(控盤<0 AND AA>控盤 ?AND AA>0,控盤,0,1.7,0),COLOR35D500;
//{白色}
STICKLINE((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,4.5,0),COLOR959595;
STICKLINE((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,3.8,0),COLORB4B4B4;
STICKLINE((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,3.1,0),COLORD0D0D0;
STICKLINE((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,2.4,0),COLORF0F0F0;
STICKLINE((AA<=0 AND AA>控盤) OR (AA>0 AND AA<控盤),AA,0,1.7,0),COLORFCFCFC;
A10:=CROSS(控盤,0);
//{黃色}
STICKLINE((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,4.5,0),COLOR008484;
STICKLINE((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,3.8,0),COLOR00A2A2;
STICKLINE((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤),控盤,0,3.1,0),COLOR00B7B7;
STICKLINE((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,2.4,0),COLOR00F0F0;
STICKLINE((控盤<=0 AND AA<控盤) OR (控盤>0 AND AA>控盤) ,控盤,0,1.7,0),COLOR06FFFF; 來源 程序化久久網