正大专用通达信主图，源码分享

E5:=EMA(CLOSE,5);

E13:=EMA(CLOSE,13);

平衡:EMA(CLOSE,20),COLORYELLOW;

上轨:平衡+2*STD(CLOSE,20),COLORMAGENTA,LINETHICK2;

下轨:平衡-2*STD(CLOSE,20),COLORGREEN,LINETHICK3;

上:=EMA(CLOSE,3);

中:=EMA(CLOSE,5);

下:=EMA(中,5);

QQ:=CLOSE<中;

MM:=上>REF(上,1) AND REF(上,1)<REF(上,2);

VAR1W:=100-90*(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21));

VAR2W:=100-90*(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21));

VAR3W:=100-MA(100*(HHV(HIGH,6)-CLOSE)/(HHV(HIGH,6)-LLV(LOW,6)),34);

VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.05 AND HIGH/CLOSE<1.01 AND IF(CLOSE>REF(CLOSE,1),88,0)>0,91,0);

TDXSTEP468:STICKLINE(VAR3P>90,LOW,LOW*0.92,1,1),COLORMAGENTA;

TDXSTEP469:DRAWTEXT(VAR3P>90,LOW*0.92,'追'),COLORMAGENTA;

V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);

V2:=(1-7/100)*DMA(CLOSE,V1);

V3:=(1+7/100)*DMA(CLOSE,V1);

V5:=MA((LOW+HIGH+CLOSE)/3,5);

MA1:=MEMA(CLOSE,5);

MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;

MA3:=IF(MA2>0,MA2,MA2);

MA5:MA(CLOSE,5);

MA25:=MA(CLOSE,25);

VAR1:=CLOSE=HHV(CLOSE,4) AND (REF(CLOSE,1)>=REF(CLOSE,2) OR REF(CLOSE,1)>=REF(CLOSE,3)) OR REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) OR REF(CLOSE,3)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR2:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);

VAR3:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1)<REF(CLOSE,2) OR REF(CLOSE,1)<REF(CLOSE,3)) OR REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE<REF(CLOSE,1) OR REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);

VAR4:=REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<=REF(CLOSE,3) AND REF(CLOSE,2)<REF(CLOSE,4) AND CLOSE>=REF(CLOSE,1);

TDXSTEP470:STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,(-1)),COLORYELLOW;

TDXSTEP471:STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,(-1)),COLORGREEN;

TDXSTEP472:STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.3,0),COLORFF6600;

TDXSTEP473:STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.4,0),COLORFF8800;

TDXSTEP474:STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.3,0),COLORFFAA00;

TDXSTEP475:STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.6,0),COLORFFCC00;

TDXSTEP476:STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.3,0),COLOR000099;

TDXSTEP477:STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4,0),COLOR0000BB;

TDXSTEP478:STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.3,0),COLOR0000DD;

TDXSTEP479:STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORRED;

TDXSTEP480:STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR009900;

TDXSTEP481:STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,2.4,0),COLOR00BB00;

TDXSTEP482:STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORGREEN;

TDXSTEP483:STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR999999;

TDXSTEP484:STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;

TDXSTEP485:STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,1.3,0),COLORDDDDDD;

TDXSTEP486:STICKLINE(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORWHITE;

AA10:=MA(CLOSE,8);{分析家公式网WWW.gspt.com}

BB10:=ATAN(AA10-REF(AA10,1))*3.1416*10;

均线３０:=MA(CLOSE,30);

均线８９:=MA(CLOSE,89);

均线:=MA(CLOSE,16);

TDXSTEP487:DRAWTEXT(OPEN<=均线 AND 均线３０-REF(均线３０,1)>0 AND CLOSE>均线８９ AND BB10>1 AND CLOSE/OPEN>1.04,LOW,'进'),COLORCC99FF;

TDXSTEP488:DRAWTEXT_FIX(1,0,0,0,53),COLOR0080FF;

TDXSTEP489:DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLOR0080FF;

TDXSTEP490

+-