通达信过四峰主图及未加密选股指标公式源码

通达信过四峰主图及未加密选股指标公式源码

源码正文：

N:=40{XG51};
T:=BArslAst(H<REF(H,1) AND REF(H,1)>REF(H,2)){XG51};
HH:=REF(H,T+1){XG51};
LL:=FINDLOW(L,T=0,10,1){XG51};
LH:=SUM(H>REF(H,1),10){XG51};
ZF:=(HH-LL)/LL*100{XG51};
TT:=BARSLAST(T=0 AND ZF>20 AND LH>2){XG51};
T1:=SUMBARS(TT=0,1){XG51};
T2:=SUMBARS(TT=0,2){XG51};
T3:=SUMBARS(TT=0,3){XG51};
T4:=SUMBARS(TT=0,4){XG51};
H1:=REF(HH,T1-1){XG51};
H2:=REF(HH,T2-1){XG51};
H3:=REF(HH,T3-1){XG51};
H4:=REF(HH,T4-1){XG51};
AH:=maX(MAX(MAX(H1,H2),H3),H4){XG51};
AL:=MIN(MIN(MIN(H1,H2),H3),H4){XG51};
BL:=AH/AL<1.15{XG51};
TJ:=COUNT(crOSS(C,H1),TT+1)=1 AND CROSS(C,H1){XG51};
TJ1:=H4<H3 AND H3<H2 AND H2<H1{XG51};
XG:=TJ AND BL AND T4<N AND TJ1{XG51};
XG1:=COUNT(XG,T4+1)=1 AND XG{XG51};
STICKLINE(XG1,H,L,0,1),COLORFFFFFF{XG51};
STICKLINE(XG1,C,O,3.2,0),COLOR555555{XG51};
STICKLINE(XG1,C,O,2.6,0),COLOR777777;
STICKLINE(XG1,C,O,1.9,0),COLOR999999{XG51};
STICKLINE(XG1,C,O,1.1,0),COLORCCCCCC{XG51};
STICKLINE(XG1,C,O,0.3,0),COLORCCDDBB{XG51};
DRAWICON(XG1,L*0.96,1){X!G~5~1!C!N!{};

通达信突破天量最高价主图及未加密选股指标公式源码

源码正文：

T:=BArslAst(H=HHV(H,100) AND V=HHV(V,500)){XG51};
HT:=BARSLAST(H=HHV(H,T+1)){XG51};
HT1:=BARSLAST(EVERY(H<REF(H,HT),HT) AND crOSS(HT>=80,0.5))NODRAW{XG51};
天量最高价:DRAWLINE(HT=0,REF(H,HT),HT1=0,REF(H,HT),1),DOTLINE,COLORmaGENTA{XG51};
TT:=BARSLAST(CROSS(天量最高价>=0,0.5)){XG51};
XG:=COUNT(CROSS(C>=天量最高价,0.5),TT+1)=1 AND CROSS(C>=天量最高价,0.5){XG51};
DRAWICON(XG,L*0.98,1){XG51};
STICKLINE(XG,C,O,2,0),COLORBLUE{XG51};
STICKLINE(XG,H,L,0,0),COLORBLUE{X=G~5*1=C=N={};