咨询内容：

改在博弈上用

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.CXH99.COM ）

博易技术人员： 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; 来源 程序化久久网