通达信趋势主图源码主图趋势主图

CCC:=AMOUNT/VOL/100;

M5:MA(CCC,5),COLORFF00FF,LINETHICK1;

M13:MA(CCC,13),COLOR00FFFF,LINETHICK1;

M21:MA(CCC,21),COLORRED,LINETHICK1;

M34:MA(CCC,34),COLORFFFFFF,LINETHICK2;

STICKLINE(C<O,C,O,3.2,1),COLORFFF333;

STICKLINE(C>O,C,O,3.2,1),COLORRED;

STICKLINE(CCC>M34 AND M34>REF(M34,1) AND CCC>M13,C,O,3.2,0),COLORRED;

STICKLINE(CCC>M34 AND M34>REF(M34,1) AND CCC>M13 AND C<O,C,O,3.2,1),COLORDDDDDD;

STICKLINE(CCC<=M34 AND M34>REF(M34,1) AND C<=O,C,O,3.2,1),COLOR00FFFF;

STICKLINE(CCC<=M34 AND M34>REF(M34,1),C,O,3.2,0),COLOR00FFFF;

STICKLINE(CCC<=M34 AND M34>REF(M34,1) AND C<=O,C,O,3.2,1),COLOR00FFFF;

STICKLINE(CCC<=M34 AND M34<=REF(M34,1),C,O,3.2,1),COLORFF0000;

STICKLINE(CCC<=M34 AND M34<=REF(M34,1) AND C<=O,C,O,3.2,0),COLORFF0000;

M34,COLORFFFFFF,LINETHICK2;

IF(M34<REF(M34,1),M34,DRAWNULL),COLORFF0000,LINETHICK2;

M21,COLORRED;

IF(M21<REF(M21,1),M21,DRAWNULL),COLOR00FF00,LINETHICK1;

M13,COLOR00FFFF;

IF(M13<REF(M13,1),M13,DRAWNULL),COLORFFF333,LINETHICK1;

M5,COLORFF00FF;

IF(M5<REF(M5,1),M5,DRAWNULL),COLOR009880,LINETHICK1;

K8:=SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2.5,1);

短入:=K8>REF(K8,1) AND CROSS(K8,SMA(K8,2.5,1)) AND K8<50;

DRAWICON(短入,L*0.96,13);

抄底:=REF(COUNT("KDJ.K"<REF("KDJ.K",1),5)>=5,1) AND COUNT("KDJ.K"<30,5)>=2 

AND COUNT("KDJ.J"<0,3)>0 AND CROSS("KDJ.J",0);

DRAWTEXT(抄底 AND NOT((CCC>M34 OR M34>REF(M34,1))),L*0.98,'--抄底')

,COLOR00FFFF;

DRAWTEXT(抄底 AND (CCC>M34 OR M34>REF(M34,1)),L*0.98,'--确认'),COLORRED;

TJ00:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D") AND REF("KDJ.K",1)<35,1));

加仓:=C<REF(C,TJ00+1)*1.1 AND REF("KDJ.K",1)<60 AND (TJ00+1)<25 AND (TJ00+1)>5 AND "KDJ.K">REF("KDJ.K",TJ00+1) AND CROSS("KDJ.K","KDJ.D");

DRAWTEXT(加仓 AND NOT((CCC>M34 OR M34>REF(M34,1))),L*0.98,'--回抽')

,COLOR5599FF;

DRAWTEXT(加仓 AND (CCC>M34 OR M34>REF(M34,1)),L*0.98,'--加仓'),COLORFF00FF;

DRAWICON(CROSS("KDJ.J",0) AND (CCC>M34 OR M34>REF(M34,1)),L*0.97,1);

HH0:=CONST(HHV(H,75));

LL0:=CONST(LLV(L,75));

MM0:=CONST((HH0+LL0)/2);

HL0:=CONST(IF(CONST(C)>=MM0,LL0-(HH0-LL0)*0.2,HH0+(HH0-LL0)*0.2));

HH1:=IF(CONST(C)<MM0,HH0*1.01,HL0);

LL1:=IF(CONST(C)>=MM0,LL0*0.99,HL0);

HL1:=(HH1+LL1)/2,COLORFFFFFF;

{www.gspt.com}

STICKLINE("MACD.MACD">0,"MACD.MACD"+HL1,HL1,2.5,1),COLORDD55CC;

STICKLINE("MACD.MACD">0 AND "MACD.MACD">REF("MACD.MACD",1),

"MACD.MACD"+HL1,HL1,2.5,0),COLORDD55CC;

STICKLINE("MACD.MACD"<0,"MACD.MACD"+HL1,HL1,2.5,0),COLOR00D080;

STICKLINE("MACD.MACD"<0 AND "MACD.MACD">REF("MACD.MACD",1),

"MACD.MACD"+HL1,HL1,2.5,1),COLOR00D080;

IF("MACD.DIF">0,HL1*0.975,DRAWNULL),COLOR0000FF,LINETHICK1,CIRCLEDOT;

IF("MACD.DIF">0 AND "MACD.MACD"<0,HL1*0.975,DRAWNULL),COLOR00FFFF,CIRCLEDOT;

IF("MACD.DIF"<0 AND "MACD.MACD">0,HL1*0.975,DRAWNULL),COLORFF0080,CIRCLEDOT;