归零启航(通达信公式 主图 源码 测试图)

[复制链接]
查看23 | 回复0 | 2022-6-27 19:24:35 | 显示全部楼层 |阅读模式

X_1:=STRCAT(DYBLOCK,21);
X_2:=STRCAT(X_1,HYBLOCK);
X_3:=STRCAT(X_2,21);
X_4:=STRCAT(X_3,GNBLOCK);
X_5:=STRCAT(X_4,21);
X_6:=STRCAT(X_5,FGBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.01,0.012,0,STRCAT(X_6,ZHBLOCK)),COLORCYAN;
DRAWTEXT_FIX(1,0,0.075,0,STRCAT(93,ZDBLOCK)),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0.95,0,101),COLORYELLOW;
筹码95:COST(95);
筹码85:COST(85);
DRAWBAND(筹码95,RGB(110,139,61),筹码85,RGB(110,139,61));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
X_7:=VOL>=REF(VOL,1)*1.9 AND CLOSE>REF(CLOSE,1) AND CLOSE>OPEN AND MA(CLOSE,10)>REF(MA(CLOSE,10),1);
DRAWTEXT(X_7,HIGH*1.01,26),COLORYELLOW;
X_8:=CONST(HHVBARS(VOL,30));
X_9:=IF(CURRBARSCOUNT<=30+7,CONST(IF(X_8=0,CLOSE,REF(CLOSE,X_8))),DRAWNULL);
遇阻:IF(CURRBARSCOUNT=X_8+1,X_9,DRAWNULL),CROSSDOT;
AB:DRAWLINE(HIGH>=HHV(HIGH,20),HIGH,LOW<=LLV(LOW,5),HHV(HIGH,5),1),DOTLINE,COLORWHITE;
X_10:=IF(REF(HIGH,1)=REF(HHV(HIGH,2),1),1,0);
X_11:=IF(X_10=1,REF(HIGH,1),REF(HIGH,2));
X_12:=IF(REF(LOW,1)=REF(LLV(LOW,2),1),1,0);
X_13:=IF(X_12=1,REF(LOW,1),REF(LOW,2));
X_14:=(X_11+X_13)/2;
X_15:=IF(CLOSE<X_14,X_14,DRAWNULL);
X_16:=CURRBARSCOUNT<=1;
X_17:=CURRBARSCOUNT<=1;
X_18:=IF(X_16,X_11,DRAWNULL);
X_19:=IF(X_16,X_14,DRAWNULL);
X_20:=IF(X_16,X_13,DRAWNULL);
上线2:IF(X_17,X_11,DRAWNULL);
中线2:IF(X_17,X_19,DRAWNULL);
下线2:IF(X_17,X_13,DRAWNULL);
STICKLINE(X_17,上线2,上线2,20,(-1)),COLORLIBLUE;
STICKLINE(X_17,中线2,中线2,20,(-1)),COLORYELLOW;
STICKLINE(X_17,下线2,下线2,20,(-1)),COLORWHITE;
DRAWTEXT(X_16,上线2,28),COLORLIBLUE;
DRAWTEXT(X_16,中线2,29),COLORMAGENTA;
DRAWTEXT(X_16,下线2,30),COLORWHITE;
X_21:=AMOUNT/VOL/100;
X_22:=OPEN>CLOSE AND X_21>REF(CLOSE,1);
STICKLINE(X_22,OPEN,CLOSE,1,0),COLORRED;
X_23:=REF(CLOSE,1)/CLOSE>1.04;
STICKLINE(X_23,OPEN,CLOSE,1,0),COLORWHITE;
X_24:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
X_25:=NAMELIKE(2) OR NAMELIKE(3) OR NAMELIKE(4) AND X_24>=4.945;
X_26:=NAMELIKE(2) OR NAMELIKE(3) OR NAMELIKE(4) AND X_24<=(-4.945);
涨停价:IF(X_25,REF(CLOSE,1)*1.05,REF(CLOSE,1)*1.1),NODRAW,COLORRED;
跌停价:IF(X_26,REF(CLOSE,1)*0.95,REF(CLOSE,1)*0.9),NODRAW,COLORGREEN;
X_27:=NAMELIKE(2)=1 OR NAMELIKE(3)=1 OR NAMELIKE(5)=1 OR NAMELIKE(6)=1 OR NAMELIKE(7)=1;
X_28:=CLOSE/REF(CLOSE,1)>1.097 OR (CLOSE/REF(CLOSE,1)>1.0495 AND X_27) AND DYNAINFO(59)=0;
X_29:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
STICKLINE(X_29<(-9.9),OPEN,CLOSE,3,0),COLORGREEN;
STICKLINE(X_28,CLOSE,OPEN,3,0),COLORMAGENTA;
DRAWICON(HIGH=ZTPRICE(REF(CLOSE,1),0.1) AND CLOSE!=HIGH,LOW*0.965,15);
X_30:="999999$OPEN";
X_31:="999999$CLOSE";
X_32:="999999$HIGH";
X_33:="999999$LOW";
X_34:=(REF(X_31,1)-X_31)/REF(X_31,1)>0.00001;
DRAWTEXT(X_28 AND X_34 AND NOT(HIGH=LOW),HIGH*1.025,27),COLORWHITE;
X_35:=HHV(VOL,21);
X_36:=BARSLAST(X_35=VOL);
高量:DRAWLINE(X_36=0,MAX(CLOSE,OPEN),X_36=1,MAX(REF(CLOSE,1),REF(OPEN,1)),1),COLORWHITE,LINETHICK2;
X_37:=CONST(HHV(REF(HIGH,1),240));
X_38:=CONST(LLV(REF(LOW,1),240));
X_39:=X_37-X_38;
X_40:=LOW-X_39*0.03;
X_41:=HIGH+X_39*0.03;
X_42:=CLOSE>500;
X_43:=MAX(CLOSE,OPEN);
X_44:=MIN(CLOSE,OPEN);
X_45:=0;
X_46:=1;
X_47:=IF(X_42,HIGH,X_43);
X_48:=IF(X_42,LOW,X_44);
X_49:=IF(CLOSE>OPEN,IF(X_46=0,LOW,X_48),IF(X_46=0,HIGH,X_47));
X_50:=2/1000;
X_51:=CURRBARSCOUNT;
X_52:=400;
X_53:=X_51<=X_52;
X_54:=LOW;
X_55:=IF(X_45=0,X_54,REF(X_45,X_45));
基准价:IF(X_53,CONST(X_55),DRAWNULL),DOTLINE,COLORWHITE;
X_56:=BETWEEN(CLOSE-AMOUNT/VOL/100,0.01,(-0.01)) AND NOT(HIGH=LOW) AND TOTALBARSCOUNT>10 AND VOL<REF(VOL,1)*0.7;
STICKLINE(X_56,OPEN,CLOSE,1,0),COLORBLUE;
DRAWTEXT(X_56,LOW*0.99,94),COLORBLUE;
X_57:=OPEN>REF(CLOSE,1) AND VOL<REF(VOL,1) AND CLOSE<REF(CLOSE,1);
STICKLINE(X_57,OPEN,CLOSE,1,0),COLORBROWN;
DRAWTEXT(X_57,HIGH*1.01,95),COLORBROWN;
X_58:=OPEN<REF(CLOSE,1) AND VOL<REF(VOL,1)*0.7 AND CLOSE>OPEN AND CLOSE<REF(CLOSE,1) AND REF(CLOSE,1)<REF(CLOSE,2) AND REF(OPEN,1)>REF(CLOSE,1);
STICKLINE(X_58,OPEN,CLOSE,1,0),COLORCYAN;
DRAWTEXT(X_58,LOW*0.99,96),COLORCYAN;
X_59:=OPEN>REF(CLOSE,1) AND CLOSE>OPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND VOL<REF(VOL,1);
STICKLINE(X_59,OPEN,CLOSE,1,0),COLORRED;
DRAWTEXT(X_59,HIGH*1.01,23),COLORRED;
X_60:=REF(CLOSE,2)>REF(CLOSE,1) AND REF(OPEN,1)>REF(CLOSE,1) AND REF(CLOSE,3)>REF(CLOSE,2) AND REF(OPEN,2)>REF(CLOSE,2) AND CLOSE>OPEN AND CLOSE>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1) AND CLOSE>REF(OPEN,1) AND (VOL<REF(VOL,1) OR VOL<REF(VOL,2));
STICKLINE(X_60,OPEN,CLOSE,1,0),COLORGREEN;
DRAWTEXT(X_60,HIGH*1.01,97),COLORGREEN;
X_61:=REF(X_28,1) AND VOL=HHV(VOL,80) AND LOW>REF(HIGH,1) AND CLOSE>OPEN AND CLOSE/REF(CLOSE,1)>1.03 AND NOT(X_28) AND CLOSE>AMOUNT/VOL/100;
STICKLINE(X_61,OPEN,CLOSE,1,0),COLORWHITE;
DRAWTEXT(X_61,HIGH*1.01,98),COLORWHITE;
X_62:=DOWNNDAY(CLOSE,2) AND COUNT(OPEN>CLOSE,2)=2 AND REF(CLOSE,1)>=OPEN;
X_63:=REF(X_62,1) AND OPEN>REF(CLOSE,1) AND CLOSE>REF(CLOSE,1) AND VOL>REF(VOL,1)*1.9 AND CLOSE>REF(OPEN,2) AND DYNAINFO(4)>0;
X_64:=DOWNNDAY(CLOSE,3) AND COUNT(OPEN>CLOSE,3)>=2;
X_65:=REF(X_64,1) AND OPEN>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2) AND VOL>REF(VOL,1)*1.9 AND CLOSE>REF(OPEN,3) AND DYNAINFO(4)>0;
STICKLINE(X_63 OR X_65,OPEN,CLOSE,3,0),COLORRED;
DRAWTEXT(X_63 OR X_65,HIGH*1.02,99),COLORRED;
X_66:=IF(WEEKDAY=1 AND OPEN>REF(CLOSE,1) AND CLOSE>OPEN AND CLOSE/REF(CLOSE,1)>1.03 AND TOTALBARSCOUNT>20,1,0);
STICKLINE(X_66,OPEN,CLOSE,3,0),COLORLIRED;
STICKLINE(X_66,HIGH,LOW,0,0),COLORLIRED;
DRAWTEXT(X_66,LOW*0.98,100),COLORLIRED;
周五跳空眼:IF(WEEKDAY=5 AND NOT(HIGH=LOW) AND X_28,1,0);
DRAWICON(周五跳空眼,LOW,38);
DRAWTEXT_FIX(ISLASTBAR,0.2,0.95,0,48),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.35,0.95,0,CON2STR(归零启航#DAY,1)),COLORWHITE;
STICKLINE(CLOSE/REF(CLOSE,1)>=1.04 OR CLOSE/REF(CLOSE,1)<=0.96 AND CLOSE<=1000,(CLOSE+OPEN)/2,(CLOSE+OPEN)/2,2,1),COLORLIBLUE;
STICKLINE(CLOSE/REF(CLOSE,1)>=1.04 OR CLOSE/REF(CLOSE,1)<=0.96 AND CLOSE<=1000,(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))*2/3+MIN(OPEN,CLOSE),(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))*2/3+MIN(OPEN,CLOSE),2,1),COLORLIBLUE;
STICKLINE(CLOSE/REF(CLOSE,1)>=1.04 OR CLOSE/REF(CLOSE,1)<=0.96 AND CLOSE<=1000,(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))/3+MIN(OPEN,CLOSE),(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))/3+MIN(OPEN,CLOSE),2,1),COLORLIBLUE;
STICKLINE(CLOSE/REF(CLOSE,1)>=1.005 OR CLOSE/REF(CLOSE,1)<=0.995 AND CLOSE>1000,(CLOSE+OPEN)/2,(CLOSE+OPEN)/2,2,1),COLORLIBLUE;
STICKLINE(CLOSE/REF(CLOSE,1)>=1.005 OR CLOSE/REF(CLOSE,1)<=0.995 AND CLOSE>1000,(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))*2/3+MIN(OPEN,CLOSE),(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))*2/3+MIN(OPEN,CLOSE),2,1),COLORLIBLUE;
STICKLINE(CLOSE/REF(CLOSE,1)>=1.005 OR CLOSE/REF(CLOSE,1)<=0.995 AND CLOSE>1000,(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))/3+MIN(OPEN,CLOSE),(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))/3+MIN(OPEN,CLOSE),2,1),COLORLIBLUE;
 

201912172315668551.rar

2.81 KB, 下载次数: 0

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

201912172315668551.rar

回复

使用道具 举报

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

本版积分规则