通达信叶老师源码

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_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_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);