改在博弈上用 [博易POBO]
咨詢內容:
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;
?
<!-- 咨詢內容:
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; 來源 程序化久久網
改在博弈上用
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;
?
![B]K6{DMOFYPB}L[5Z)9EH[B.png](/UploadFiles/Article1/2019/2/201902132056076527.png)
附件 :
-->?
?來源:程序化99網( m.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; 來源 程序化久久網
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯系技術人員 QQ: 511411198 或微信:cxhjy888 進行 有償 編寫!(不貴!點擊查看價格!)
相關文章
-
沒有相關內容