盘中买卖(通达信公式 主图 源码 测试图)

[复制链接]
查看51 | 回复0 | 2022-6-27 17:30:32 | 显示全部楼层 |阅读模式

 盘中买卖

DRAWTEXT_FIX(1,0,0.02,0,STRCAT(STRCAT(GNBLOCK,FGBLOCK),ZSBLOCK)),COLORMAGENTA;
{股东人数}
ZZ:=STRCAT('股东人数:',CON2STR(FINANCE(8),0));
DRAWTEXT_FIX(ISLASTBAR,0,0.18,0,ZZ);
DRAWTEXT_FIX(ISLASTBAR,0.06,0.06,0,STRCAT('涨家数:    ',CON2STR(DYNAINFO(60),0))),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.06,0.10,0,STRCAT('跌家数:    ',CON2STR(DYNAINFO(61),0))),COLORGREEN;
总涨跌比:=DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100,COLORCYAN,NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.06,0.14,0,STRCAT(STRCAT('总涨跌比:   ',CON2STR(总涨跌比,2)),'%')),COLORCYAN;
 
{季度收益}
季:=IF(FINANCE(37)=4,'【年度】',IF(FINANCE(37)=3,'【三季】',IF(FINANCE(37)=2,'【二季】','【一季】')));
收益:=IF(1,CON2STR(FINANCE(30)/FINANCE(1),3),'');
动:=IF(CONST(FINANCE(30)/FINANCE(1)<-0.0001),'———',CON2STR(DYNAINFO(39),1));
DRAWTEXT_FIX(NOT(FINANCE(3)=0),0,0.22,0,STRCAT(STRCAT(季,'收益:'),收益))COLOR0000FF;
DRAWTEXT_FIX(NOT(FINANCE(3)=0),0,0.26,0,STRCAT('【动态】市盈:',动))COLOR00FFFF;
 
DYNAINFO(7),COLORYELLOW,DOTLINE;
MA20:=EMA(CLOSE,20);
强弱:EMA(CLOSE,150);
STICKLINE((MA20>强弱),MA20,强弱,0.5,0),COLOR0000FF;
STICKLINE((MA20<强弱),MA20,强弱,0.5,0),COLOR00FF00;
 
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:L1+P1*7/8,CROSSDOT;
DRAWTEXT(CURRBARSCOUNT=20,阻力,'阻力线'),COLORYELLOW,LINETHICK3;
支撑:L1+P1*0.5/8,CROSSDOT;
DRAWTEXT(CURRBARSCOUNT=20,支撑,'支撑线'),COLORWHITE,LINETHICK3;
DRAWICON(LONGCROSS(支撑,C,2),C,1);
DRAWICON(LONGCROSS(C,阻力,2),C,2);
DRAWTEXT(LONGCROSS(支撑,C,2),C,'支撑买点'),COLORRED;
DRAWTEXT(LONGCROSS(C,阻力,2),C,'阻力卖点'),COLORWHITE;
 
ZRS:=CONST(DYNAINFO(3)),NODRAW;
A11:=2.5*(EMA(CLOSE,12)-EMA(CLOSE,26))+ZRS,COLORLIMAGENTA;
A21:=EMA(A11,9),COLORLIBLUE;
MACD:=(A11-A21)*2+ZRS; 
DRAWKLINE(H,O,L,C);
STICKLINE(A11>=A21,ZRS,MACD ,0,1),COLORRED;
STICKLINE(A11<A21,ZRS,MACD ,0,1),COLORCYAN;
C,COLORWHITE,LINETHICK2;
均价:SUM(V*C,0)/SUM(V,0),COLORGREEN,LINETHICK1;
IF(均价<=REF(均价,1),均价,DRAWNULL),COLORGREEN,LINETHICK3;
IF(均价>=REF(均价,1),均价,DRAWNULL),COLORYELLOW,LINETHICK3;
DRAWTEXT(CURRBARSCOUNT=4,均价,'均'),COLORYELLOW,LINETHICK3;
DRAWNUMBER(CURRBARSCOUNT=2,均价,均价),COLORYELLOW,LINETHICK3;
{地区行业概念版块}
DRAWTEXT_FIX(1,0.000,1-0.05,0,DYBLOCK),COLORWHITE;
DRAWTEXT_FIX(1,0.0550,1-0.05,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.1050,1-0.05,0,GNBLOCK),COLORYELLOW;
{分析家公式网 WWW.70822.COM 整理}
{分时价咯原码}
JJ:=DYNAINFO(11);
{波段买卖原码}
P:=55;
S:=8;
M1:=3;
财:=0.3*(EMA(CLOSE,S)-EMA(CLOSE,P))*9+ZRS,COLORRED,LINETHICK2;
神:EMA(财,M1),COLORGREEN,LINETHICK4;
DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50));
 
{股价与均线偏离买卖条件}
BTJ1:=(C-JJ)/JJ<-0.003;
STJ1:=(C-JJ)/JJ>0.005;
{控盘买卖条件}
VAR1:=EMA(EMA(CLOSE,9),9)+ZRS;
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STJ01:=控盘<REF(控盘,1)  AND 控盘>0.5;
STJ02:=控盘>0;
BTJ2:=控盘>REF(控盘,1);
 
{波段买卖条件}
BTJ3:=CROSS(财,神) AND  控盘<-0.5;
STJ31:=CROSS(神,财);
STJ32:=CROSS(神,财) AND  财>1.618;
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,9);
DRAWTEXT(BTJ81,神,'↑势来可买'),COLORRED;
 
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,9);
STJ82:=FILTER(STJ02 AND STJ32 ,9);
STJ83:=STJ81 AND STJ82;
DRAWTEXT(STJ83,神,'↓势尽要卖'),COLOR00FF00;
 
{独醉分时主图源码}
成交额:=V*C/100,NODRAW;{万元}
A52:=SUM((IF(((成交额/8>18) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A53:=SUM((IF(((成交额/8>18) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A56:=(A52+A53);
A57:=IF((ISLASTBAR),((100*A52)/A56),0);
A58:=IF((ISLASTBAR),((100*A53)/A56),0);
DD1:=1;
AAA1:=STRCAT(STRCAT('机构买=  ',CON2STR((100*A52)/A56,0)),'%');
AAA2:=STRCAT(STRCAT('机构卖=  ',CON2STR((100*A53)/A56,0)),'%');
AAA3:=STRCAT(STRCAT('净买入=  ',CON2STR((100*(A52-A53))/A56,0)),'%');
DRAWTEXT_FIX(DD1=1,0,0.06,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0,0.10,0,AAA2),COLOR00FF00;
DRAWTEXT_FIX(DD1=1,0,0.14,0,AAA3),COLOR00FFFF;
 
 
{开盘三线的概念很简单,指的是将开盘后半个小时的走势划分为三段,
也就是9:40时、9:50时、10时变成三根10分钟K线。把这三根K线添加到分时主图中,
并给出类别、分时K线、暗示内容、措施、可能收、备注的文字提示。}
T31:=BARSLAST(TIME2=093100);
T40:=BARSLAST(TIME2=094000);
T41:=BARSLAST(TIME2=094100);
T50:=BARSLAST(TIME2=095000);
T51:=BARSLAST(TIME2=095100);
T60:=BARSLAST(TIME2=100000);
C31:=REF(C,T40);
O31:=REF(C,T31);
C40:=REF(C,T50);
O40:=REF(C,T41);
C50:=REF(C,T60);
O50:=REF(C,T51);
A1:=C31>O31 AND C40>O40 AND C50>O50 AND O40>=C31 AND O50>=C40;
A2:=C31<O31 AND C40<O40 AND C50<O50 AND O40<=C31 AND O50<=C40;
A3:=C31>O31 AND C40>O40 AND C50<O50 AND C50<C40 AND O50/C50<C40/O40 AND O50/C50<C31/O31;
A4:=C31>O31 AND C40<O40 AND C50<O50 AND C40<C31 AND C50<C40 AND C31/O31<O40/C40 AND C31/O31<O50/C50;
A5:=C31<O31 AND C40<O40 AND C50>O50 AND C40<C31 AND O50>=C40;
A6:=C31<O31 AND C40>O40 AND C50>O50 AND C40>C31 AND C50>C40 AND O31/C31<C40/O40 AND O31/C31<C50/O50;
A7:=C31>O31 AND C40<O40 AND C50>O50 AND C31/O31>O40/C40 AND C50/O50>O40/C40;
A8:=C31<O31 AND C40>O40 AND C50<O50 AND C40/O40<O31/C31 AND C40/O40<O50/C50;
A9:=MAX(C31,O31)>=MAX(C40,O40) AND MAX(C31,O31)>=MAX(C50,O50);
A10:=MIN(C31,O31)<=MIN(C40,O40) AND MIN(C31,O31)<=MIN(C50,O50);
B1:='连续三阳向上、有三阳开泰之兆头、如飚升走势,则可能涨停,要盯量,量大出货否则守仓、大阳';
B2:='连续三阴向下、三只乌鸦、重挫走势可能跌停、随时逃跑,只要反弹立即出货、大阴';
B3:='二阳一小阴,震荡走势则逢高减磅,后势看好可逢低吸纳,小阴或中阳';
B4:='一阳两阴,二只乌鸦,拉高出货后市看坏,逢高减磅,后市下跌,中阴或小阳';
B5:='二阴一阳、急跌控底后市不明、逢高减磅观望为主、下影阴线或中阳。分析家公式网';
B6:='一阴二阳、震荡控底后市趋好、观望为主谨慎吸纳、下影阳线或中阴';
B7:='二阳夹一阴、震荡走市后市看好、持股待涨逢低吸纳、中阳、小阴再一阳';
B8:='二阴夹一阳、跌幅较大尾市杀跌、只要反弹立即出货、中阴、小阳再一阴';
B9:='不创新高、可小阴小阳、三次不过短时顶部、层层阻力离场观望、上影阴阳K线';
B10:='不创新低、可小阴小阳、三次不破短时底部、走势不强逢低少吸、下影阴阳K线';
DRAWTEXT_FIX( A1,0.005,1-0.22,0,B1),COLORRED LINETHICK3;
DRAWTEXT_FIX( A2,0.005,1-0.22,0,B2),COLORGREEN LINETHICK3;
DRAWTEXT_FIX( A3,0.005,1-0.22,0,B3),COLORMAGENTA;
DRAWTEXT_FIX( A4,0.0

p202111927937447.jpg

p202111927937447.jpg

202111927227380.rar

9.6 KB, 下载次数: 0

售价: 3 金钱  [记录]  [购买]

202111927227380.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则