变色KDJ金死叉主图原码MA20:MA(C,20),COLORRED,LINETHICK2;MA55:MA(C,55),COLOR00FF
00,LINETHICK2;IF(MA20THICK2;IF(MA55BB:MA(MA(CLOSE,3),1),LINETHICK3,COLOR00FFFF;IF(BB>=REF(BB,1),BB,D
RAWNULL),COLORFF00FF,LINETHICK3;TT:=IF(ISLASTBAR,240/FROMOPEN,1);
NN:=120;HH:=HHV(VTT,NN);LL:=LLV(V,NN);最高:=CONST(HH);最低:=CONST(LL
);最高2:=CONST(HHV(H,NN));最低2:=CONST(LLV(L,NN));PP:=IF((最高20.9-(最高
2-最低2)0.5)>CONST(LLV(L,20)),0.9,IF((最高20.9-(最高2-最低2)0.5)>CONST
(LLV(L,50)),0.7,0.6)),NODRAW;RCC1:=最高20.9-(最高2-最低2)PP;最低3:=MIN(
RCC1,最低2);AA:=最低3;周J:=MA("KDJ.J#WEEK"(9,3,3),5),COLORFFFF00,LINE
THICK2;AA1:=周J<0AND周JREF(周J,1);BB1
:=周J>=0AND周J<85AND周J>REF(周J,1);DD1:=周J>=REF(周J,1)AND周J>=85
;EE1:=周J0;ZJ1:=MA("KDJ.J#WEEK"(9,3,3),5);YK:=M
A("KDJ.K#MONTH"(9,3,3),20),LINETHICK0;YD:=MA("KDJ.D#MONTH"(9,3,3)
,20),LINETHICK0;YJ:=MA("KDJ.J#MONTH"(9,3,3),20);ZK:=MA("KDJ.K#WE
EK"(9,3,3),5),LINETHICK0;ZD:=MA("KDJ.D#WEEK"(9,3,3),5),LINETHIC
K0;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))100;K:=SMA(RS
V,3,1),LINETHICK0;D:=SMA(K,3,1),LINETHICK0;J:=3K-2D,LINETHICK0;
GG1:=C>0;RJC:DRAWICON(CROSS(K,D),L0.98,1);DRAWTEXT(RJC,L0.98,''日
金叉''),COLOR0000FF;RSC:DRAWICON(CROSS(D,K),H1.03,2),;DRAWTEXT(RSC,
H1.03,''日死叉''),COLORFFFFFF;ZJC:DRAWICON(CROSS(ZK,ZD),L0.98,1);
DRAWTEXT(ZJC,L0.98,''周金叉''),COLORFF00FF;ZSC:DRAWICON(CROSS(ZD,ZK
),H1.03,2),;DRAWTEXT(ZSC,H1.03,''周死叉''),COLOR00FFFF;YJC:DRAWIC
ON(CROSS(YK,YD),L0.98,1);DRAWTEXT(YJC,L0.98,''月金叉''),COLORFF000
0;YSC:DRAWICON(CROSS(YD,YK),H1.03,2),;DRAWTEXT(YSC,H1.03,''月死
叉''),COLORFFFF00;STICKLINE(AA1,AA-0.000AA,AA-0.040AA,2.5,1),COLO
R6600BB;STICKLINE(FF1,AA-0.000AA,AA-0.040AA,2.5,0),COLOR0000FF;
STICKLINE(BB1,AA-0.000AA,AA-0.040AA,2.5,0),COLORFF00FF;STICKLIN
E(DD1,AA-0.000AA,AA-0.040AA,2.5,0),COLOR00FF00;STICKLINE(EE1,AA
-0.000AA,AA-0.040AA,2.5,1),COLORFFFF00;STICKLINE(GG1,AA-0.050A
A,AA-0.090AA,2.5,1),COLORBB0000;STICKLINE(RJC,AA-0.050AA,AA-0.0
90AA,2.5,0),COLOR0000FF;STICKLINE(RSC,AA-0.050AA,AA-0.090AA,2.
5,0),COLORFFFFFF;STICKLINE(ZJC,AA-0.050AA,AA-0.090AA,2.5,0),COL
ORFF00FF;STICKLINE(ZSC,AA-0.050AA,AA-0.090AA,2.5,0),COLOR00FFFF
;STICKLINE(YJC,AA-0.050AA,AA-0.090AA,2.5,0),COLORFF0000;STICKLINE(YSC,AA-0.050AA,AA-0.090AA,2.5,0),COLORFFFF00; |
|
