新六脈神劍（主圖、通達信、貼圖、源碼）

說在前面的話：無論主圖、副圖或選股，都是對未來趨勢的判斷。沒有量的配合，等于零！

 

{ 新六脈神劍主圖 }

低1:=REF(LLV(L,150),3);
標底:=REFDATE(低1,DATE)*0.9;

突破:=REF(EMA(C,14),1),DOTLINE;
A1X:=(EMA(C,10)-突破)/突破*100;
多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL),DOTLINE,COLORRED,LINETHICK1;
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL),DOTLINE,COLORGREEN,LINETHICK1;

{ ·········································}
DRAWRECTREL(0,0,999,990,RGB(18,18,18));
DRAWRECTREL(0,0,999,100,RGB(90,0,0));

DRAWBAND(空方,RGB(8,118,8),突破,RGB(0,0,255));
DRAWBAND(突破,RGB(118,8,8),多方,RGB(0,0,255));

五五線:EMA(C,55),COLORGRAY;
STICKLINE(C>0,五五線,標底,0.1,0),COLORGRAY;

DRAWKLINE(H,O,L,C);

丹田能量:EMA(C,55)COLORMAGENTA,CIRCLEDOT,NODRAW;
少商劍:EMA(C,13),COLORRED,LINETHICK2;
商陽劍:EMA(EMA(C,13),2);
中沖劍:EMA(EMA(EMA(C,13),2),2);
關沖劍:EMA(EMA(EMA(EMA(C,13),2),2),2);
少沖劍:EMA(EMA(EMA(EMA(EMA(C,13),2),2),2),2);
少澤劍:EMA(EMA(EMA(EMA(EMA(EMA(C,13),2),2),2),2),2);
IF(少商劍<REF(少商劍,1),少商劍,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(商陽劍<REF(商陽劍,1),商陽劍,DRAWNULL),COLORYELLOW;
IF(中沖劍<REF(中沖劍,1),中沖劍,DRAWNULL),COLORYELLOW;
IF(關沖劍<REF(關沖劍,1),關沖劍,DRAWNULL),COLORYELLOW;
IF(少沖劍<REF(少沖劍,1),少沖劍,DRAWNULL),COLORYELLOW;
IF(少澤劍<REF(少澤劍,1),少澤劍,DRAWNULL),COLORYELLOW;

TJ1:=少商劍>=REF(少商劍,1);
TJ2:=商陽劍>=REF(商陽劍,1);
TJ3:=中沖劍>=REF(中沖劍,1);
TJ4:=關沖劍>=REF(關沖劍,1);
TJ5:=少沖劍>=REF(少沖劍,1);
TJ6:=少澤劍>=REF(少澤劍,1);

ZTJ:=(TJ1 AND TJ2 AND TJ3 AND TJ4 AND TJ5 AND TJ6)=1 
AND REF((TJ1 AND TJ2 AND TJ3 AND TJ4 AND TJ5 AND TJ6),1)=0;
DRAWICON(ZTJ,少澤劍*0.96,9);

STICKLINE(C>0,標底,標底*0.95,2,-1),COLORGREEN;
STICKLINE(TJ6,標底,標底*0.95,2,0),COLORLIRED;

STICKLINE(C>0,標底*0.92,標底*0.87,2,-1),COLORGREEN;
STICKLINE(TJ5,標底*0.92,標底*0.87,2,0),COLORLIRED;

STICKLINE(C>0,標底*0.84,標底*0.79,2,-1),COLORGREEN;
STICKLINE(TJ4,標底*0.84,標底*0.79,2,0),COLORLIRED;

STICKLINE(C>0,標底*0.76,標底*0.71,2,-1),COLORGREEN;
STICKLINE(TJ3,標底*0.76,標底*0.71,2,0),COLORLIRED;

STICKLINE(C>0,標底*0.68,標底*0.63,2,-1),COLORGREEN;
STICKLINE(TJ2,標底*0.68,標底*0.63,2,0),COLORLIRED;

STICKLINE(C>0,標底*0.6,標底*0.55,2,-1),COLORGREEN;
STICKLINE(TJ1,標底*0.6,標底*0.55,2,0),COLORLIRED;

DRAWTEXT_FIX(1,0.01,0.01,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.01,0,DYBLOCK),COLORWHITE;