通达信分时控盘有图源码
通达信分时控盘有图源码
C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
- {分时控盘}
- VAR1:=EMA(EMA(CLOSE,13),13);
- 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
- STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00;
- STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF;
- 无庄控盘:=控盘<0;
- STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF;
- 有庄控盘:=控盘>REF(控盘,1) AND 控盘>0;
- VAR2:=100*WINNER(CLOSE*0.95);
- STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLORFFFF00;
- 主力出货:=控盘<REF(控盘,1) AND 控盘>0;
- STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,1),COLOR00FFFF;
- 高度控盘: VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLOR00FFFF,LINETHICK2;
- A10:=CROSS(控盘,0);
- 控盘B:=FILTER(IF(A10,1,0),5);
- {分时价格原码}
- JJ:=DYNAINFO(11);
- {波段买卖原码}
- P:=55;S:=8;M1:=3;
- 财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2;
- 神:=EMA(财,M1),COLORGREEN,LINETHICK1;
- DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50));
- {股价与均线偏离买卖条件}
- BTJ1:=(C-JJ)/JJ<-0.005;
- BTJ11:=(C-JJ)/JJ<-0.03;
- BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;
- STJ1:=(C-JJ)/JJ>0.005;
- {控盘买卖条件}
- STJ01:=控盘<REF(控盘,1) AND 控盘>0.5;
- STJ02:=控盘>0;
- BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
- BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ;
- {波段买卖条件}
- BTJ3:=CROSS(财,神) AND 财<-0.3;
- BTJ32:=CROSS(财,神) AND 财<-0.1;
- STJ31:=CROSS(神,财);
- STJ32:=CROSS(神,财) AND 财>1.618;
- {以下为信号};
- BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
- BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);
- BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);
- DRAWICON(BTJ82,神,23);{追买};
- DRAWICON(BTJ81 AND TIME>10,神,27);{};
- DRAWICON(BTJ811 AND TIME>10,神,26);{有庄};
- DRAWTEXT(BTJ81,神,''),COLORRED;
- DRAWTEXT(BTJ811,神*1.2,'有庄'),COLORWHITE;
- STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);
- DRAWICON(STJ81,神,19);
- STJ82:=FILTER(STJ02 AND STJ32 ,13);
- DRAWICON(STJ82,神,15);
- STJ83:=STJ81 AND STJ82;
- DRAWTEXT(STJ83,神,'必卖'),COLOR00FF00;
{公式在线提供：www.gszx.com.cn}
