通达信叶老师源码

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<3;
 X_60:=X_56-X_58>0;
 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;