通达信交响乐主图未加密选股指标公式源码

源码正文：

玄:=1+(BArslAst(YEAR!=REF(YEAR,1) OR DATETODAY(DATE)=1)){XG51};
悟斋:=IF(PERIOD=5,玄,DRAWNULL){XG51};
主:=LLV(L,悟斋){XG51};
底:CONST(主),NODRAW,COLOR00FF00{XG51};
RC:=底{XG51};
difF:=ema(CLOSE,12)-Ema(CLOSE,26),COLORBLacK{XG51};
DIFFA:=(RC+DIFF*3){XG51};
DEA:=EMA(DIFF,9),COLORLIMAGENTA{XG51};
DEAA:=(RC+DEA*3){XG51};
LC:=REF(C,1){XG51};
MA5:=MA(C,5){XG51};
K:=BARSLAST(CURRBARSCOUNT=250){XG51};
高1:=CONST(IF(ISLASTBAR=1,HHV(H,K),0)){XG51};
低0:=CONST(IF(ISLASTBAR=1,LLV(L,K),0)),COLOR00FF00{XG51};
KJ:=高1-低0{XG51};
GD4:=IF(CURRBARSCOUNT<=250/2,高1,DRAWNULL){XG51};
高压:=IF(1=1,低0+KJ*0.873,DRAWNULL),COLOR0000FF,NODRAW{XG51};
压力:=IF(1=1,低0+KJ*0.809,DRAWNULL),COLORFF00FF,NODRAW{XG51};
上中:=IF(1=1,低0+KJ*0.618,DRAWNULL),COLORLIMAGENTA,NODRAW{XG51};
中线:=IF(1=1,低0+KJ/2,DRAWNULL),COLORCCCCCC,POINTDOT{XG51};
下中:=IF(1=1,低0+KJ*0.382,DRAWNULL),COLORLIMAGENTA,NODRAW{XG51};
支撑:=IF(1=1,低0+KJ*0.191,DRAWNULL),COLORFFAA00,NODRAW{XG51};
超跌:=IF(1=1,低0+KJ*0.127,DRAWNULL),COLORFFAA00,{XG51};
STICKLINE(1=1,GD4,高压,10,0),COLOR330000{XG51};
STICKLINE(1=1,高压,压力,10,0),COLORAA0000{XG51};
STICKLINE(1=1,压力,上中,10,0),COLOR990000{XG51};
STICKLINE(1=1,上中,下中,10,0),COLOR770000{XG51};
STICKLINE(1=1,下中,支撑,10,0),COLOR550000{XG51};
STICKLINE(1=1,支撑,低0,10,0),COLOR110000{XG51};
macd:=(DIFF-DEA)*4{XG51};
STICKLINE(MACD>0,RC,RC+MACD,1,0),COLORWHITE{XG51};
STICKLINE(MACD<0,RC,RC+MACD,1,1),COLOR008000{XG51};
STICKLINE(MACD>0 AND MACD<REF(MACD,1),RC,RC+MACD,1,1),COLORFF00AA{XG51};
STICKLINE(MACD<0 AND MACD>REF(MACD,1),RC,RC+MACD,1,0),COLOR889900{XG51};
HH:=HHV(HIGH,5){XG51};
LL:=LLV(LOW,5){XG51};
HH1Z:=BARSLAST((HH > REF(HH,1))){XG51};
LL1Z:=BARSLAST((LL < REF(LL,1))){XG51};
STICKLINE((HH1Z < LL1Z),CLOSE,OPEN,3,0),COLORWHITE{XG51};
STICKLINE((HH1Z < LL1Z),HIGH,LOW,0,0),COLORWHITE{XG51};
STICKLINE((HH1Z > LL1Z),CLOSE,OPEN,3,0),COLORYELLOW{XG51};
STICKLINE((HH1Z > LL1Z),HIGH,LOW,0,0),COLORYELLOW{XG51};
黄金分割中线:IF(1=1,低0+KJ/2,DRAWNULL),COLORBLUE,POINTDOT,LINETHICK4{XG51};
卖:MA5*1.1,LINETHICK2,COLORCYAN{XG51};
高:MA5*1.05,LINETHICK1,COLORGREEN{XG51};
中:MA5,LINETHICK2,COLORBLUE{XG51};
低:MA5*0.945,LINETHICK1,COLORLIMAGENTA{XG51};
买:MA5*0.88,LINETHICK2,COLORWHITE{XG51};
STICKLINE(C>LC AND C>O,H,H*0.92,0,0),COLORFFFFFF{XG51};
STICKLINE(C>LC AND C>O AND C>高,H,H*0.9,0,0),COLORFFFFFF{XG51};
STICKLINE(1=1,H,L,0,0),COLORFFFFFF{XG51};
STICKLINE(C<LC AND C<O,L,L*1.08,0,0),COLORFFFFFF{XG51};
STICKLINE(C<LC AND C<O AND C<低,L,L*1.1,0,0),COLORFFFFFF{XG51};
IF(C>=LC AND C>O,H,DRAWNULL),POINTDOT,LINETHICK9,COLOR000099{XG51};
IF(C>=LC AND C<O,L*0.98,DRAWNULL),POINTDOT,LINETHICK9,COLORFF5500{XG51};
IF(C<=LC AND C<O,L,DRAWNULL),POINTDOT,LINETHICK9,COLORFF5500{XG51};
IF(C<=LC AND C>O,H*0.995,DRAWNULL),POINTDOT,LINETHICK9,COLORFF5500{XG51};
IF(C<=MA5*0.945,L*1.03,DRAWNULL),POINTDOT,LINETHICK9,COLORFFFF00{XG51};
IF(C<=MA5*0.945,L,DRAWNULL),POINTDOT,LINETHICK9,COLORFFFF00{XG51};
IF(C<=买 AND C<O,L*1.03,DRAWNULL),POINTDOT,LINETHICK9,COLOR00FF00{XG51};
IF(C<=买 AND C<O,L,DRAWNULL),POINTDOT,LINETHICK7,COLOR00FA00{XG51};
IF(C>=MA5*1.05 AND L>MA5*0.945,H*0.97,DRAWNULL),POINTDOT,LINETHICK9,COLOR0000FF{XG51};
IF(C>=MA5*1.05 AND L>MA5*0.945,H,DRAWNULL),POINTDOT,LINETHICK9,COLOR0000FF{XG51};
IF(C>=MA5*1.1,H*0.97,DRAWNULL),POINTDOT,LINETHICK9,COLOR00CCFF{XG51};
IF(C>=MA5*1.1,H,DRAWNULL),POINTDOT,LINETHICK9,COLOR00CCFF{XG51};
IF(FILTER(C<MA5*0.945,10),H*1.25,DRAWNULL),POINTDOT,LINETHICK5,COLORAA0000{XG51};
IF(FILTER(C<MA5*0.945,10),H*1.25,DRAWNULL),POINTDOT,LINETHICK3,COLOR00CCFF{XG51};
DRAWTEXT(FILTER(C<MA5,30),卖,'降调出'),COLORCYAN{XG51};
RSV:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))*100{XG51};
KZ:=EMA(RSV,3){XG51};
DZ:=EMA(KZ,3){XG51};
JZ:=(3*KZ-2*DZ){XG51};
kdj1:=REF(COUNT(JZ<REF(JZ,1),5)>=3,1) AND REF(JZ,1)<20{XG51};
kdj2:=JZ>REF(JZ,1){XG51};
反转:=IF(FILTER(KDJ1 AND KDJ2,3),50,0),COLORWHITE{XG51};
VAR22:=REF(LOW,1){XG51};
VAR33:=SMA(Abs(LOW-VAR22),3,1)/SMA(MAX(LOW-VAR22,0),3,1)*100{XG51};
VAR44:=EMA(IF(CLOSE*1.3,VAR33*10,VAR33/10),3){XG51};
VAR55:=LLV(LOW,13){XG51};
VAR66:=HHV(VAR44,13){XG51};
VAR77:=IF(MA(CLOSE,34),1,0){XG51};
VAR888:=EMA(IF(LOW<=VAR55,(VAR44+VAR66*2)/2,0),3)/618*VAR77{XG51};
VAR999:=IF(VAR888>100,100,VAR888){XG51};
吸筹:=VAR999,LINETHICK1,COLORCD7F32 {XG51};
HHZ:=CONST(HHV(C,120))*1{XG51};
LLZ:=CONST(LLV(C,120))*1{XG51};
HL:=CONST(IF(CONST((HHZ+LLZ)/2)<CONST(C),LLZ-(HHZ-LLZ)*0.4,HHZ+(HHZ-LLZ)*0.4)){XG51};
HH1:=IF(CONST((HHZ+LLZ)/2)>CONST(C),HHZ,HL){XG51};
LL1:=IF(CONST((HHZ+LLZ)/2)<CONST(C),LLZ,HL){XG51};
HLMAX:=MAX(HH1,LL1){XG51};
HLMIN:=MIN(HH1,LL1){XG51};
HLMN1:=(HLMAX+HLMIN)/2{XG51};
HLMN2:=HLMAX-HLMIN{XG51};
HLMN3:=(100-0)/2{XG51};
HLMN4:=100-0{XG51};
STICKLINE(吸筹,(0-50)*HLMN2/100+HLMN1,
(VAR999-50)*HLMN2/100+HLMN1,2,10),COLORFF00FF{XG51};
STICKLINE(JZ<=0,(90-50)*HLMN2/100+HLMN1,
(100-50)*HLMN2/100+HLMN1,4,0),COLORBLUE{XG51};
IF(反转=50,(50-50)*HLMN2/100+HLMN1,
(0-50)*HLMN2/100+HLMN1),COLORWHITE{XG51};
K1:(KZ-50)*HLMN2/100+HLMN1,COLORFFFFFF{XG51};
D1:(DZ-50)*HLMN2/100+HLMN1,COLOR00FFFF{XG51};
J1:(JZ-50)*HLMN2/100+HLMN1,COLOR00FF00{XG51};
A5:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
A6:=EMA(A5,9){XG51};
A7:=(A5<-0.1 AND A5>A6){XG51};
财神:IF(A7,LLV(L,21),DRAWNULL),COLORBLUE,CIRCLEDOT,LINETHICK5{XG51};
VAR326:=IF(CLOSE>REF(CLOSE,1),88,0){XG51};
VAR327:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0){XG51};
STICKLINE(VAR327>90,L*0.99,L*0.94,2,0),COLORLIMAGENTA{XG51};
DRAWTEXT(VAR327>90,LOW*0.93,'升调追涨'),COLORLIMAGENTA{X~G_5=1~C~N~{};

源码正文：

NOTEXT1:ma(ema(CLOSE,12),1),LINETHICK1,COLORBLUE{XG51};
NOTEXT2:MA(EMA(CLOSE,12),3),LINETHICK1.4,COLORBLUE{XG51};
NOTEXT3:MA(EMA(CLOSE,12),5),LINETHICK1.8,COLORBLUE{XG51};
NOTEXT4:MA(EMA(CLOSE,12),7),LINETHICK2.1,COLORBLUE{XG51};
NOTEXT5:MA(EMA(CLOSE,12),9),LINETHICK2.4,COLORBLUE{XG51};
NOTEXT6:MA(EMA(CLOSE,12),11),LINETHICK2.7,COLORBLUE{XG51};
NOTEXT7:MA(EMA(CLOSE,12),13),LINETHICK3,COLORBLUE{XG51};
NOTEXT8:MA(EMA(CLOSE,60),1),LINETHICK1,COLORLIMAGENTA{XG51};
NOTEXT9:MA(EMA(CLOSE,60),3),LINETHICK1.4,COLORLIMAGENTA{XG51};
NOTEXT10:MA(EMA(CLOSE,60),5),LINETHICK1.8,COLORLIMAGENTA{XG51};
NOTEXT11:MA(EMA(CLOSE,60),7),LINETHICK2.1,COLORLIMAGENTA{XG51};
NOTEXT12:MA(EMA(CLOSE,60),9),LINETHICK2.4,COLORLIMAGENTA{XG51};
NOTEXT13:MA(EMA(CLOSE,60),11),LINETHICK2.7,COLORLIMAGENTA{XG51};
NOTEXT14:MA(EMA(CLOSE,60),13),LINETHICK3,COLORLIMAGENTA{XG51};
NOTEXT15:MA(C,1),LINETHICK1,COLORBLACK{X_G*5_1_C_N_{};