分享

通达信叠加在主图上的指标,高人使用多年很实用修改

 红牛2008 2016-06-12
股票公式不明白请查阅:股票公式文件使用以及说明!

通达信叠加在主图上的指标,高人使用多年很实用修改

AA1:=AMOUNT/V;

BB1:=L<AA1*0.9;

CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;

DD1:=L<MA(C,5)*0.921;

EE1:=V<MA(V,5)*1.5;

FF1:=BB1 AND CC1 AND DD1 AND EE1;

A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);

A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;

LC:=REF(CLOSE,1);

RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);

FF:=EMA(CLOSE,3);

MA15:=EMA(CLOSE,21);

VAR2:=LLV(LOW,27);

VAR3:=HHV(HIGH,34);

VAR4:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*25;

RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

BDDD:=LLV(J,2)=LLV(J,8);

MTM:=C-REF(C,1);

DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

STICKLINE(CLOSE>OPEN,OPEN,LOW,0,0 ),COLOR0000FF;

STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0,0 ),COLOR0000FF;

STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0,0 ),COLOR00FF00;

STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0,0 ),COLOR00FF00;

STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORFF8800;

STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORFFAA00;

STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORFFCC00;

STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLORFFEE00;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR000066;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR000088;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000AA;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000CC;

VAR9Q:=C=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);

STICKLINE(VAR9Q,C,(O+C)/2,3,0),COLOR000066;

STICKLINE(VAR9Q,C,(O+C)/2,2,0),COLOR000088;

STICKLINE(VAR9Q,C,(O+C)/2,1,0),COLOR0000AA;

STICKLINE(VAR9Q,C,(O+C)/2,0,0),COLOR0000CC;

VARAQ:=C=HHV(C,4) AND REF(C,1)=LLV(C,4);

STICKLINE(VARAQ,C,(O+C)/2,3,0),COLORFF22FF;

STICKLINE(VARAQ,C,(O+C)/2,2,0),COLORFF44FF;

STICKLINE(VARAQ,C,(O+C)/2,1,0),COLORFF66FF;

STICKLINE(VARAQ,C,(O+C)/2,0,0),COLORFF88FF;

VARBQ:=C=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND (REF(C,1)>HHV(C,4) OR REF(C,1)<HHV(C,4)) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND C<REF(C,1) AND C<REF(C,2);

STICKLINE(VARBQ,C,(O+C)/2,3,0),COLOR444444;

STICKLINE(VARBQ,C,(O+C)/2,2,0),COLOR666666;

STICKLINE(VARBQ,C,(O+C)/2,1,0),COLOR888888;

STICKLINE(VARBQ,C,(O+C)/2,0,0),COLORAAAAAA;

VARCQ:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);

STICKLINE(VARCQ,O,(O+C)/2,3,0),COLOR004400;

STICKLINE(VARCQ,O,(O+C)/2,2,0),COLOR006600;

STICKLINE(VARCQ,O,(O+C)/2,1,0),COLOR008800;

STICKLINE(VARCQ,O,(O+C)/2,0,0),COLOR00AA00;

VARDQ:=REF(C,1)=HHV(C,4) AND C<REF(C,2) OR (REF(C,2)=HHV(C,4) AND REF(C,1)>REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND REF(C,2)>=REF(C,4) AND C<REF(C,1);

STICKLINE(VARDQ,O,(O+C)/2,3,0),COLORFF2200;

STICKLINE(VARDQ,O,(O+C)/2,2,0),COLORFF4400;

STICKLINE(VARDQ,O,(O+C)/2,1,0),COLORFF6600;

STICKLINE(VARDQ,O,(O+C)/2,0,0),COLORFF8800;

注意买:=IF((VAR4<10),80,100);

{www.}

VAR21:=EMA(CLOSE,5);

VAR22:=EMA(CLOSE,5);

VAR23:=EMA(SLOPE(CLOSE,21)*20+CLOSE,55);

DRAWTEXT(CROSS(VAR22,VAR23),LOW*0.96,'买');

K_T1:=MA(H,5)*(1+5/100);

均价:=(3*C+H+L+O)/6;

VAR11:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36;

TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR11;

{www.}

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;

马线:MA(牛线,6),COLORGREEN;

五日线:MA(CLOSE,5),POINTDOT,COLORLIBLUE;

水平面:MA(CLOSE,60),COLORYELLOW;

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0.5,0,0,STRCAT(Z3,GNBLOCK)),COLORWHITE;

中价:(MIN(OPEN,CLOSE)+(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))/2),NODRAW,COLORYELLOW,NODRAW;

C3:=REF(C,1);

跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);

STICKLINE(跌停,OPEN,CLOSE,4,0),COLORBLUE;

STICKLINE(跌停,OPEN,CLOSE,3,0),COLORGREEN;

DRAWTEXT(跌停,H+0.1,'跌'),COLORGREEN; 

STICKLINE(ABS((C-REF(C,1)))/REF(C,1)>0.03,(C+O)/2,(C+O)/2,5,0) COLORYELLOW;

{月金叉,死叉}

月DIFF:="MACD.DIF#MONTH";

月DEA:="MACD.DEA#MONTH";

DIF月金叉:=CROSS(月DIFF,月DEA);

DRAWTEXT(DIF月金叉,L-0.06,'DIF月金叉'),COLOR00FFCC;

DRAWICON(DIF月金叉,L-0.06,13),COLOR00FFCC;

周K:="KDJ.K#WEEK"(9,3,3);

周D:="KDJ.D#WEEK"(9,3,3);

周J:="KDJ.J#WEEK"(9,3,3);

月K:="KDJ.K#MONTH"(9,3,3);

月D:="KDJ.D#MONTH"(9,3,3);

月J:="KDJ.J#MONTH"(9,3,3);

月金叉:=CROSS(月K,月D);

周金叉:=CROSS(周K,周D);

DRAWICON(周金叉,L-0.1,13),COLOR0022EE;

DRAWTEXT(周金叉,L-0.1,'KD周金叉'),COLOR0022EE;

DRAWICON(月金叉,L-0.14,13),COLOR0022EE;

DRAWTEXT(月金叉,L-0.14,'KD月金叉'),COLOR0022EE;

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
 

通达信叠加在主图上的指标,本人使用多年很实用修改

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约