|
以下是通达信立体彩k主图源码（无源码的请下载附件导入）
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
上:=EMA(C,3),COLORBLUE,LINETHICK1;
中:=EMA(C,5),COLORWHITE,LINETHICK1;
下:=EMA(中,5),COLOR00FF00,LINETHICK1;
QQ:= C<中;
MM:=上>REF(上,1) AND REF(上,1)<REF(上,2) ;
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);
VAR03:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR
REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND
C<REF(C,1) AND C<REF(C,2);
VAR04:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);
VAR05:=REF(C,1)=HHV(C,4) AND C<REF(C,2) OR (REF(C,2)=HHV(C,4) AND
REF(C,1)>REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND
REF(C,2)>=REF(C,4) AND C<REF(C,1);
VAR06:=V5>REF(V5,1) AND REF(V5,1)<REF(V5,2);
VAR07:=LOW<HHV(V5,13) AND HIGH>HHV(V5,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN;
VAR08:=VAR07 AND COUNT(VAR06,2);
VAR09:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
{绿}
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.0,0),COLOR00CC00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.7,0),COLOR003300;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.1,0),COLOR006600;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLOR009900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.9,0),COLOR00CC00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.3,0),COLOR00FF00;
{红}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.1,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.0,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.7,0),COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.1,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.9,0),COLOR0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.3,0),COLOR0000FF;
{蓝色}
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,3.0,0),COLORFFFF33;
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,2.7,0),COLORFF3333;
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,2.1,0),COLORFF6633;
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,1.5,0),COLORFF9933;
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,0.9,0),COLORFFCC33;
STICKLINE(VAR03,OPEN,(OPEN+CLOSE)/2,0.3,0),COLORFFFF33;
{灰}
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,3.0,0),COLOR00FFFF;
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,2.7,0),COLOR0033FF;
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,2.1,0),COLOR0066FF;
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,1.5,0),COLOR0099FF;
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,0.9,0),COLOR00CCFF;
STICKLINE(VAR04 AND MM,OPEN,(OPEN+CLOSE)/2,0.3,0),COLOR00FFFF;
557500469.jpg
|
