

文华财经6系统:
MA5:=MA(C,5);
MA10:=MA(C,10);
VARN6:=(2*C+H+L)/4;
VARN8:=LLV(L,34);
VARN11:=HHV(H,34);
VARN12:=EMA((VARN6-VARN8)/(VARN11-VARN8)*100,13);
VARN13:=EMA(0.667*REF(VARN12,1)+0.333*VARN12,2);
VARTE:=EMA(C,5)-EMA(C,10);
VARTF:=EMA(VARTE,9);
RVAR7:=LLV(O,13);
RVAR8:=HHV(O,13);
RVAR9:=EMA((VARN6-RVAR7)/(RVAR8-RVAR7)*100,13);
RVARA:=EMA(0.667*REF(RVAR9,1)+0.333*RVAR9,2);
VAR1:=EMA(EMA(C,9),9);
VAR2:=REF(VAR1,1);
控盘:=(VAR1-VAR2)/VAR2*10000;
HH:=IF(MA(H,3)>HHV(MA5,3),MA(H,3),IF(HHV(MA5,3)>MA10,HHV(MA5,3),MA10));
LL:=IF(MA(L,3)<LLV(MA5,3),MA(L,3),IF(LLV(MA5,3)<MA10,LLV(MA5,3),MA10));
AAZ:=(VARN12-VARN13>0 AND (VARTE<0 OR (VARTE>0 AND VARTE<VARTF)) OR (VARN12-VARN13<0 AND VARTE>0 AND VARTE>VARTF AND 控盘>0) ) AND NOT(VARN12-VARN13>0 AND VARTE<0 AND VARTE<VARTF AND 控盘<0);
DRAWICON(AAZ,EMA(LL,3),'ICO10');
DRAWICON((VARN12-VARN13<0 AND (VARTE>0 OR (VARTE<0 AND VARTE>VARTF)) OR (VARN12-VARN13>0 AND VARTE<0 AND VARTE<VARTF AND 控盘<0)) AND NOT(VARN12-VARN13<0 AND VARTE>0 AND VARTE>VARTF AND 控盘>0) ,EMA(HH,3),'ICO11');
DRAWICON(VARTE>0 AND VARTE>VARTF AND VARN12>VARN13,EMA(LL,3),'ICO95');
DRAWICON(VARTE<0 AND VARTE<VARTF AND VARN12<VARN13,EMA(HH,3),'ICO96');
N1:=10;
N2:=34;
VAR1SS:=EMA(EMA(EMA(CLOSE,4),4),3);
X:EMA(C,3),COLORFF0000;
AX:EMA(C,20),COLORFF00FF;
PJ:=MA(H-L,20)*1;
DRAWTEXT(CROSS(REF(VAR1SS,1),VAR1SS) AND X>AX,HHV(H,5),'多减'),COLORWHITE;
DRAWTEXT(CROSS(VAR1SS,REF(VAR1SS,1)) AND X>AX,L-PJ,'多开'),COLORFF0000,FONTSIZE24;
DRAWTEXT(CROSS(VAR1SS,REF(VAR1SS,1)) AND X<AX,LLV(L,5),'空减'),COLORWHITE;
DRAWTEXT(CROSS(REF(VAR1SS,1),VAR1SS) AND X<AX,H+PJ,'空开'),COLOR00FF00,FONTSIZE24;
PARTLINE(X<AX,X,COLOR0000FF),LINETHICK3;
PARTLINE(X<AX,AX,COLOR00FF00),LINETHICK3;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1);
VB1:=FILTER(A1,10);
C1:=BACKSET(VB1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1);
VB2:=FILTER(A2,10);
C2:=BACKSET(VB2,10+1);
LD:=FILTER(C2,10);
AAD:=REF(C,BARSLAST(HD));
BA:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
A3:=LLV(LOW,1);
A4:=LLV(LOW,5);
A5:=LLV(LOW,8);
A6:=HHV(H,21);
A7:=LLV(LOW,21),COLORRED;
A8:=(A6+A7)/2;
波峰:=IF(T1,AAD,AAD),COLORFF00FF,POINTDOT;
STICKLINE1(T1,AAD,AAD,4,0),COLOR80FF80;
波谷:=IF(T2,BA,BA),COLOR808000,POINTDOT;
STICKLINE1(T2 ,BA,BA,4,0),COLORFF0000;