通达信比例黄金分割主图未加密选股指标公式源码

通达信比例黄金分割主图未加密选股指标公式源码

源码正文：

N:=74{XG51};
M:=3{XG51};
PC:(C+REF(C,1)+O)/3{XG51};
高:=REF(HHV(H,N),M);
低:=REF(LLV(L,N),M){XG51};
H19:=高-(高-低)*0.191;
H38:=高-(高-低)*0.382;
H中:=高-(高-低)*0.5;
H61:=高-(高-低)*0.618;
H80:=高-(高-低)*0.809{XG51};
顶点:REFDATE(高,DATE),COLORRED DOTLINE{XG51};
%19.8:REFDATE(H19,DATE),COLORBLUE DOTLINE{XG51};
%38.2:REFDATE(H38,DATE),COLORmaGENTA DOTLINE{XG51};
%50:REFDATE(H中,DATE),COLORWHITE{XG51};
%61.8:REFDATE(H61,DATE),COLORLIMAGENTA DOTLINE{XG51};
%80.9:REFDATE(H80,DATE),COLORBLUE DOTLINE{XG51};
低点:REFDATE(低,DATE),COLORRED DOTLINE{XG51};
DRAWTEXT(ISLAstBAR,顶点,'顶点'),COLORRED{XG51};
DRAWTEXT(ISLASTBAR,%19.8,'％19.8安全'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,%38.2,'％38.2'),COLORLIMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,%50,'％50'),COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR,%61.8,'％61.8'),COLORLIMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,%80.9,'％80.9'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,低点,'低点'),COLORRED{XG51};
AAA:=(3*C+H+L+O)/6{XG51};
VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36{XG51};
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3{XG51};
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3{XG51};
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3{XG51};
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3{XG51};
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3{XG51};
STICKLINE(VAR1>VAR6,VAR1,VAR6,0.5,0),COLORFF00FF{XG51};
STICKLINE(C>=O,C,O,3,0),COLOR000045{XG51};
STICKLINE(C>=O,C,O,2,0),COLOR000085{XG51};
STICKLINE(C>=O,C,O,1,0),COLOR0000E5{XG51};
STICKLINE(C>=O,H,L,0,0),COLOR0000F5{XG51};
STICKLINE(C<O,C,O,3,0),COLOR353500{XG51};
STICKLINE(C<O,C,O,2,0),COLOR555500{XG51};
STICKLINE(C<O,C,O,1,0),COLOR858500{XG51};
STICKLINE(C<O,H,L,0,0),COLOR959500{XG51};
短线:VAR1,COLORRED{XG51};
中线:VAR6,COLORBLUE{XG51};
下跌:IF(VAR1=VAR6,VAR6,DRAWNULL),COLORCYAN{X_G+5-1_C_N_{};

通达信机构拉抬未加密选股指标公式源码

源码正文：

VAR1:=ema(Ema(CLOSE,9),9){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
stICKLINE(控盘<0,控盘,0,1,0),COLORRED{XG51};
A10:=crOSS(控盘,0){XG51};
无庄控盘:IF(控盘<0,控盘,0),COLORRED,NODRAW{XG51};
开始控盘:IF(A10,5,0),LINETHICK1,COLORBLUE{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORWHITE{XG51};
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORWHITE,NODRAW{XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF{XG51};
高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW{XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00{XG51};
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW{X+G-5*1+C+N+{};