通达信叶老师源码
X_1:=5;
X_2:=REF(HIGH,X_1)=HHV(HIGH,2*X_1+1);
X_3:=FILTER(X_2,X_1);
X_4:=BACKSET(X_3,X_1+1);
X_5:=FILTER(X_4,X_1);
X_6:=BACKSET(CURRBARSCOUNT=2,BARSLAST(X_5)+1);
X_7:=X_6 REF(X_6,1);
H1:REF(HIGH,BARSLAST(X_7));
X_8:=REF(LOW,X_1)=LLV(LOW,2*X_1+1);
X_9:=FILTER(X_8,X_1);
X_10:=BACKSET(X_9,X_1+1);
X_11:=FILTER(X_10,X_1);
X_12:=BACKSET(CURRBARSCOUNT=2,BARSLAST(X_11)+1);
X_13:=X_12 REF(X_12,1);
L1:REF(LOW,BARSLAST(X_13));
X_14:=CONST(HHV(HIGH,120))*1;
X_15:=CONST(LLV(LOW,120))*1;
X_16:=CONST((X_14+X_15)/2);
X_17:=IF(CONST(CLOSE) X_16,X_15-(X_14-X_15)*0.4,X_15-(X_14-X_15)*0.2);
X_18:=X_15;
X_19:=MAX(X_17,X_18);
X_20:=MIN(X_17,X_18);
X_21:=(X_19+X_20)/2;
X_22:=X_19-X_20;
X_23:=HHV(VOL,250)/2;
X_24:=HHV(VOL,250);
X_25:=STD(VOL,10);
X_26:=(X_25-X_23)*X_22/X_24+X_21;
STICKLINE(CLOSE OPEN,X_26,(0-X_23)*X_22/X_24+X_21,2,1),COLOR881888;
STICKLINE(CLOSE =OPEN,X_26,(0-X_23)*X_22/X_24+X_21,2,0),COLOR888518;
X_27:=MA(X_25,5);
X_28:=MA(X_25,10);
STICKLINE(IF(CURRBARSCOUNT =X_1,VOL=CONST(LLV(VOL,X_1)),DRAWNULL),X_26,(0-X_23)*X_22/X_24+X_21,3,0),COLORMAGENTA;
X_29:=VOL/REF(VOL,1);
X_30:=VOL;
X_31:=VOL*10000/FINANCE(7);
X_32:=VOL =REF(VOL,1)*1.95 AND CLOSE REF(CLOSE,1);
X_33:=VOL =REF(VOL,1) AND REF(VOL,1) =REF(VOL,2) AND CLOSE OPEN AND REF(CLOSE OPEN,1);
STICKLINE(X_33,X_26,(0-X_23)*X_22/X_24+X_21,1,0),COLORLIRED;
STICKLINE(X_32,X_26,(0-X_23)*X_22/X_24+X_21,1,0),COLORYELLOW;
STICKLINE(IF(CURRBARSCOUNT =N1,VOL=CONST(LLV(VOL,N1)),DRAWNULL),X_26,(0-X_23)*X_22/X_24+X_21,3,0),COLORMAGENTA;
STICKLINE(IF(CURRBARSCOUNT =N2,VOL=CONST(LLV(VOL,X_1)),DRAWNULL),X_26,(0-X_23)*X_22/X_24+X_21,3,0),COLORMAGENTA;
STICKLINE(IF(CURRBARSCOUNT =N3,VOL=CONST(LLV(VOL,X_1)),DRAWNULL),X_26,(0-X_23)*X_22/X_24+X_21,3,0),COLORMAGENTA;
STICKLINE(IF(CURRBARSCOUNT =N4,VOL=CONST(LLV(VOL,X_1)),DRAWNULL),X_26,(0-X_23)*X_22/X_24+X_21,3,0),COLORMAGENTA;
X_34:=100;
X_35:=VOL=LLV(VOL,X_34) AND VOL 0 AND BARSCOUNT(VOL) =X_34;
STICKLINE(X_35,OPEN,CLOSE,1.8,0),COLORMAGENTA;
X_36:=13;
X_37:=55;
X_38:=VOL=LLV(VOL,X_36) AND VOL 0 AND BARSCOUNT(VOL) =X_36;
X_39:=VOL=LLV(VOL,X_37) AND VOL 0 AND BARSCOUNT(VOL) =X_37;
STICKLINE(X_38,OPEN,CLOSE,1.8,0),COLORWHITE;
STICKLINE(X_39,OPEN,CLOSE,1.8,0),COLORWHITE;
X_40:=REF(CLOSE,1);
X_41:=IF((CLOSE-X_40)*100/X_40 =10-0.01*100/X_40,1,0);
STICKLINE(X_41,OPEN,CLOSE,(-1),0),COLORMAGENTA;
X_42:=IF((X_40-CLOSE)*100/X_40 =10-0.01*100/X_40,1,0);
STICKLINE(X_42,OPEN,CLOSE,(-1),0),COLORBLUE;
STICKLINE(X_42,HIGH,LOW,0,1),COLORBLUE;
涨家数:INDEXADV,NODRAW,COLORLIMAGENTA;
跌家数:INDEXDEC,NODRAW,COLORGREEN;
X_43:=CONST(HHV(HIGH,120))*1;
X_44:=CONST(LLV(LOW,120))*1;
X_45:=CONST((X_43+X_44)/2);
X_46:=IF(CONST(CLOSE) X_45,X_44-(X_43-X_44)*0.4,X_44-(X_43-X_44)*0.2);
X_47:=X_44;
X_48:=MAX(X_46,X_47);
X_49:=MIN(X_46,X_47);
X_50:=(X_48+X_49)/2;
X_51:=X_48-X_49;
X_52:=HHV(VOL,250)/2;
X_53:=HHV(VOL,250);
X_54:=(VOL-X_52)*X_51/X_53+X_50;
STICKLINE(CLOSE =OPEN,X_54,(0-X_52)*X_51/X_53+X_50,2,1),COLORRED;
STICKLINE(CLOSE OPEN,X_54,(0-X_52)*X_51/X_53+X_50,2,0),COLORCYAN;
X_55:=CLOSE OPEN;
X_56:=OPEN-CLOSE;
X_57:=BARSLAST(CLOSE =OPEN);
X_58:=REF(CLOSE,X_57)-REF(OPEN,X_57);
X_59:=X_57
X_60:=X_56-X_58
X_61:=VOL REF(VOL,X_57);
X_62:=VOL REF(VOL,X_57) AND REF(VOL,1) REF(VOL,2);
X_63:=IF(X_57=2,X_62,X_61);
X_64:=X_59 AND X_60 AND X_62;
X_65:=VOL SUM(VOL,5)/5;
X_66:=VOL REF(VOL,X_57)*1/4+REF(VOL,12)*3/4;
X_67:=VOL 1/3*SUM(VOL,5)/5+1/3*REF(VOL,X_57)+1/3*LLV(VOL,5);
X_68:=10 100*SUM(DYNAINFO(37),5)/5;
X_69:=10000000*(HIGH-LOW)/VOL;
X_70:=10000000*(REF(HIGH,X_57)-REF(LOW,X_57))/REF(VOL,X_57);
X_71:=SUM(X_70,12)/12;
X_72:=X_69 X_71;
X_73:=X_65 AND X_67 AND X_68 AND X_72;
X_74:=X_64 AND X_73;
DRAWICON(X_74,HIGH*1.01,27);
X_75:=CONST(LLVBARS(LOW,10));
X_76:=CONST(REF(HIGH,X_75));
X_77:=CONST(CURRBARSCOUNT);
X_78:=CONST(BARSLAST(CURRBARSCOUNT X_77+X_75 AND HIGH X_76));
X_79:=CONST(REF(HIGH,X_78));
X_80:=CONST(BARSLAST(CURRBARSCOUNT X_77+X_78 AND HIGH X_79));
X_81:=CONST(REF(HIGH,X_80));
洗盘杀入线:DRAWLINE(CURRBARSCOUNT=X_80+1,X_81,ISLASTBAR,X_81,1),COLORRED;
DRAWTEXT(ISLASTBAR,X_81,33),COLORYELLOW;
STICKLINE(CLOSE/REF(CLOSE,1) 1.095,CLOSE,OPEN,2,0),DOTLINE,COLORYELLOW;
X_82:=CONST(HHV(VOL,21));
X_83:=CONST(HHV(HIGH,21));
X_84:=X_82/X_83;
X_85:=VOL/X_84*0.1;
X_86:=CONST(LLV(LOW,0))-CONST(0.5*HHV(X_85,0));
NOTEXT1:MA(X_85,2)+X_86;
NOTEXT2:MA(X_85,6)+X_86;
NOTEXT3:MA(X_85,30)+X_86;
