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

源码正文：

ma5:ema(C,5),COLOR00FF00,DOTLINE{XG51};
IF(MA5>REF(MA5,1),MA5,DRAWNULL),COLOR0077FF,LINETHICK3{XG51};
dif1:=WMA(CLOSE,5){XG51};
DIF2:=WMA(CLOSE,13){XG51};
macd:WMA((3*DIF1-2*DIF2),2),COLORFF9900,DOTLINE{XG51};
IF(MacD>REF(MACD,1),MACD,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
BC1E:=IF(L=LLV(L,8*20),L,DRAWNULL){XG51};
BC2E:=CONst(BArslAST(BC1E=L))+1{XG51};
E:=CONST(IF(BC2E=1,L,REF(L,BC2E-1))){XG51};
DIFFK:=DIF1-DIF2{XG51};
DEAK:=WMA(DIFFK,8){XG51};
MACDK:=2*(DIFFK-DEAK){XG51};
STICKLINE(MACDK>0 AND MACDK>REF(MACDK,1),E+MACDK,E,2,0),COLOR0000FF{XG51};
STICKLINE(MACDK>0 AND MACDK<REF(MACDK,1),E+MACDK,E,2,0),COLORFF9900{XG51};
STICKLINE(MACDK<0,E+MACDK,E,2,0),COLORFF9900{XG51};
SJ:=WMA((C-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2){XG51};
ZJ:=WMA(0.667*REF(SJ,1)+0.333*SJ,2){XG51};
DRAWTEXT(crOSS(SJ,ZJ) AND SJ<30,L-0.05,'←低吸'),COLOR00FF99,LINETHICK2{XG51};
DRAWTEXT(CROSS(ZJ,SJ) AND SJ>70,H+0.05,'←高抛'),COLOR0044FF,LINETHICK2{XG51};
TC1:=IF(H=HHV(H,8*14),H,DRAWNULL){XG51};
TC2:=CONST(BARSLAST(TC1=H))+1{XG51};
UPPER:=CONST(IF(TC2=1,H,REF(H,TC2-1))){XG51};
BC1:=IF(L=LLV(L,8*20),L,DRAWNULL){XG51};
BC2:=CONST(BARSLAST(BC1=L))+1{XG51};
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1))){XG51};
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER{XG51};
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;{XG51};
STICKLINE(LP,L*0.992,L,13,0),COLORFF00FF{XG51};
STICKLINE(HP,H,H*1.005,13,0),COLOR00FF00{XG51};
X1:IF(CURRBARSCOUNT<=MAX(BC2,TC2),UPPER,DRAWNULL),COLOR89615F{XG51};
X2:IF(CURRBARSCOUNT<=MAX(BC2,TC2),LOWER,DRAWNULL),COLOR89615F{XG51};
X3:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.146,LOWER+(UPPER-LOWER)*0.146),DRAWNULL),COLOR89615F{XG51};
X4:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.191,LOWER+(UPPER-LOWER)*0.191),DRAWNULL),COLOR89615F{XG51};
X5:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.236,LOWER+(UPPER-LOWER)*0.236),DRAWNULL),COLOR89615F{XG51};
X6:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.382,LOWER+(UPPER-LOWER)*0.382),DRAWNULL),COLOR89615F{XG51};
X7:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.5,LOWER+(UPPER-LOWER)*0.5),DRAWNULL),COLOR89615F{XG51};
X8:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.618,LOWER+(UPPER-LOWER)*0.618),DRAWNULL),COLOR89615F{XG51};
X9:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.764,LOWER+(UPPER-LOWER)*0.764),DRAWNULL),COLOR89615F{XG51};
X10:IF(CURRBARSCOUNT<=MAX(BC2,TC2),IF(BC2>TC2,UPPER-(UPPER-LOWER)*0.809,LOWER+(UPPER-LOWER)*0.809),DRAWNULL),COLOR89615F{XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X1,'UPPER'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X2,'LOWER'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X3,'0.146'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X4,'0.191'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X5,'0.236'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X6,'0.382'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X7,'0.5'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X8,'0.618'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X9,'0.764'){XG51};
DRAWTEXT(CURRBARSCOUNT=MIN(BC2,TC2)+8,X10,'0.809'){XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000066{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,2.6,0 ),COLOR000099{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,2,0 ),COLOR0000CC{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,1.2,0 ),COLOR0000FF{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,0.4,0 ),COLORCC66FF{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORGREEN{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLORCC0000{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.6,0 ),COLORFF4400{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2,0 ),COLORFF8800{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.2,0 ),COLORFFCC00{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.4,0 ),COLORGREEN{X_G~5!1_C_N_{};

源码正文：

趋势线:ema(SLOPE(CLOSE,21)*20+CLOSE,55)*1,LINETHICK2,COLORGREEN{XG51};
股价线:Ema(CLOSE,3),POINTDOT,LINETHICK1,COLORRED{XG51};
DRAWTEXT(crOSS(趋势线,股价线),趋势线,'▼卖出'),LINETHICK1,COLORCYAN{XG51};
DRAWTEXT(CROSS(股价线,趋势线),股价线,'▲买入'),LINETHICK1,COLORWHITE{XG51};
stICKLINE(股价线>趋势线 AND C<O,H,L,0,0),COLORBLUE{XG51};
STICKLINE(股价线>趋势线 AND C<O,O,C,3,1),COLORBLUE{XG51};
STICKLINE(股价线>趋势线 AND C>=O,H,L,0,0),COLORBLUE{XG51};
STICKLINE(股价线>趋势线 AND C>=O ,O,C,3,0),COLORBLUE{XG51};
STICKLINE(股价线<=趋势线 AND C>O,H,L,0,0),COLORYELLOW{XG51};
STICKLINE(股价线<=趋势线 AND C>O,O,C,3,1),COLORYELLOW{XG51};
STICKLINE(股价线<=趋势线 AND C<=O ,H,L,0,0),COLORYELLOW {XG51};
STICKLINE(股价线<=趋势线 AND C<=O,O,C,3,0),COLORYELLOW {XG51};
DRAWTEXT(趋势线<股价线 AND ISLASTBAR,趋势线,'黄色，大胆持股'),COLORBLUE{XG51};
DRAWTEXT(趋势线>=股价线 AND ISLASTBAR,趋势线,'蓝色，别犯贱'),COLORYELLOW {XG51};
多方强度:EMA(CLOSE,3),COLOR00FFFF,LINETHICK1{XG51};
空方强度:EMA(CLOSE,8),COLORLIMAGENTA,LINETHICK1{XG51};
多空平衡:EMA(CLOSE,17),COLORWHITE,LINETHICK2{XG51};
洗盘线:EMA(CLOSE,27),,COLOR0080FF,LINETHICK1{XG51};
IF(多方强度>REF(多方强度,1),多方强度,DRAWNULL),COLOR00FFFF,LINETHICK1{XG51};
IF(多方强度<REF(多方强度,1),多方强度,DRAWNULL),COLORFFFFFF,LINETHICK1{XG51};
IF(空方强度>REF(空方强度,1),空方强度,DRAWNULL),COLORLIMAGENTA,LINETHICK1{XG51};
IF(空方强度<REF(空方强度,1),空方强度,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
IF(多空平衡>REF(多空平衡,1),多空平衡,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(多空平衡<REF(多空平衡,1),多空平衡,DRAWNULL),COLORYELLOW ,LINETHICK2{XG51};
买线:=EMA(C,2){XG51};
卖线:=EMA(SLOPE(C,21)*20+C,42);
BU:=CROSS(买线,卖线){XG51};
SEL:=CROSS(卖线,买线){XG51};
DRAWICON(BU,L-0.1,7){XG51};
DRAWICON(SEL,H+0.1,8){XG51};
DRAWICON(CROSS(多方强度,空方强度),空方强度,1){XG51};
DRAWICON(CROSS(空方强度,多方强度),空方强度,2){XG51};
LC:=REF(CLOSE,1);
rsi:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(84,RSI) , HIGH,'逃顶'),COLORCYAN{XG51};
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1))))){XG51};
MTIME:=MOD(FROMOPEN,TOTAL){XG51};
CTIME:=IF(MTIME<0.5,TOTAL,MTIME){XG51};
VV:=IF(CURRBARSCOUNT=1,vol*TOTAL/CTIME,V){XG51};
N:=120{XG51};
A:=CONST(HHV(H,N)-LLV(L,N))/CONST(HHV(VV,N)){XG51};
B:=CONST(LLV(L,N))-CONST(HHV(VV,N))*A/8{XG51};
天数:=10{XG51};
STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0