{背景顏色設(shè)定}
{DRAWGBKLAST(CLOSE>0,STRIP(RGB(55,75,55),RGB(10,10,20),0));}
DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;
{能量線 {測能量動(dòng)力，很像KDJ公式的J值}
{原神猴探月公式 將原神猴線改名能量線}
CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
YJD:=(EMA(CS,3)-50)*2;能量線:YJD,LINETHICK0;
中線:0,LINETHICK2,COLORYELLOW,LAYER1;
DRAWICON(cross(YJD,中線),0,7),ALIGN1;
{原 莊家克星的抄底逃頂公式 將山水線改名拋留線，去掉倒影線}
能量線1:=能量線>=0;
能量線2:=能量線<=0;
Var1:=(2*CLOSE+HIGH+LOW)/4;
Var2:=LLV(LOW,5);
Var3:=HHV(HIGH,4);
Var5:=(Var1-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
Var6:=SMA(Var5,2,1);
sK:EMA((Var1-Var2)/(Var3-Var2)*100,4),LINETHICK0,precis2;
sD:EMA(0.667*REF(sK,1)+0.333*sK,2),LINETHICK0,precis2;
sJ:2*sK-1*sD,LINETHICK0,precis2;
sKD差:sK-sD,colorred,LINETHICK0,precis2;
拋留線: SMA(Var6,2,1),COLOR889999,linethick0;
PARTLINE(拋留線,拋留線>REF(拋留線,1),RGB(255,0,0),拋留線 金叉:if(CROSS(sK,sD),拋留線,0),colorffffff,LINETHICK2,layer1;{買入點(diǎn)}
{金叉:if(CROSS(sK,sD),30,0),COLORWHITE,POINTDOT,LINETHICK0;
STICKLINE(金叉,30,40,6,0),COLORffffff;
drawtext(金叉,35,’金叉’),ALIGN1,color6600FF,layer0;}
VERTLINE(CROSS(金叉,0.1),2),COLORffffff,layer7;
金叉天數(shù):barslast(cross(sK,sD)),linethick0;{計(jì)算幾日前金叉}
{能量線用柱表示}
{綠色 0線上 表示下跌}
STICKLINE(YJD0,0,YJD,8,0 ),COLOr008800;
STICKLINE(YJD0,0,YJD,7,0 ),COLOR009900;
STICKLINE(YJD0,0,YJD,6,0 ),COLOR00aa00;
STICKLINE(YJD0,0,YJD,5,0 ),COLOR00bb00;
STICKLINE(YJD0,0,YJD,4,0 ),COLOR00cc00;
STICKLINE(YJD0,0,YJD,3,0 ),COLOR00dd00;
STICKLINE(YJD0,0,YJD,2,0 ),COLOR00ee00;
STICKLINE(YJD0,0,YJD,1,0 ),COLOR00ff00;
{紅色 0線上 表示上漲}
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,8,0 ),COLOR000088;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,7,0 ),COLOR000099;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,6,0 ),COLOR0000aa;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,5,0 ),COLOR0000bb;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,4,0 ),COLOR0000cc;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,3,0 ),COLOR0000dd;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,2,0 ),COLOR0000ee;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,1,0 ),COLOR0000ff;
{黃色 0線下 表示上漲}
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,8,0 ),COLOR338fdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,7,0 ),COLOR339fdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,6,0 ),COLOR33afdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,5,0 ),COLOR33bfdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,4,0 ),COLOR33cfdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,3,0 ),COLOR33dfdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,2,0 ),COLOR33efdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,1,0 ),COLOR33ffdd;
{藍(lán)色 0線下 表示下跌}
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,8,0 ),COLORFF4400;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,7,0 ),COLORFF6600;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,6,0 ),COLORFF7700;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,5,0 ),COLORFF8800;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,4,0 ),COLORFF9900;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,3,0 ),COLORFFaa00;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,2,0 ),COLORFFbb00;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,1,0 ),COLORFFcc00;
{當(dāng)日及時(shí)行情}
DRAWTEXTREL(5,30,’■’ ),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,50,’ 金 叉：’+NUMTOSTRN(金叉,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,190,’今 ‘),COLORgreen,linethick1,layer0;
DRAWTEXTREL(5,350,’日 能量線：’+NUMTOSTRN(YJD,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,510,’行 ‘),COLORgreen,linethick1,layer0;
DRAWTEXTREL(5,670,’情 拋留線：’+NUMTOSTRN(拋留線,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,830,’■ ‘),COLORgreen,linethick1,layer0;
JC0:=金叉 < 35 and 金叉 >0 and YJD > ref(yjd,1) and 拋留線 > ref(拋留線,1);
JC1:=金叉 < 35 and 金叉 >0 and (YJD < ref(yjd,1) OR 拋留線 < ref(拋留線,1));
JC2:=金叉 <= 55 and 金叉 > 35 and YJD > ref(yjd,1) and 拋留線 > ref(拋留線,1);
JC3:=金叉 <=55 and 金叉 > 35 and (YJD < ref(yjd,1) or 拋留線 < ref(拋留線,1));
JC4:=金叉 > 55;
IF BARSTATUS=2 AND JC0 THEN BEGIN
DRAWTEXTREL(25,190,’ ● 低位好 能量拋留見紅 買’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND JC1 THEN BEGIN
DRAWTEXTREL(25,190,’ ● 低位好 能量或拋留回跌 可考慮買’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND JC2 THEN BEGIN
DRAWTEXTREL(25,190,’ ● 中位可 能量拋留見紅 買’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND JC3 THEN BEGIN
DRAWTEXTREL(25,190,’ ● 中位可 能量線見綠 觀望’),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND JC4 THEN BEGIN
DRAWTEXTREL(25,190,’ ● 高位可能有暴利也是陷阱!!’),coloryellow,layer0;
END;
DRAWTEXTABS(5,5,’概念股網(wǎng) www.chiang1015.com’),linethick1,COLOR00EEff;
NJC1:=金叉 = 0 AND 金叉天數(shù) <=1 and YJD > ref(yjd,1) and 拋留線 > ref(拋留線,1) and YJD <30;
NJC2:=金叉 = 0 AND 金叉天數(shù) <=1 and YJD > ref(yjd,1) and 拋留線 > ref(拋留線,1) and YJD <60 and YJD >30;
NJC3:=金叉 = 0 AND 金叉天數(shù) <=1 and YJD > ref(yjd,1) and 拋留線 > ref(拋留線,1) and YJD >60 ;
NJC4:=金叉 = 0 AND 金叉天數(shù) <=1 and (YJD < ref(yjd,1) or 拋留線 < ref(拋留線,1)) ;
NJC5:=金叉 = 0 AND 金叉天數(shù) =2 ;
NJC6:=金叉 = 0 AND 金叉天數(shù) >2 and YJD > ref(yjd,1) and 拋留線 > ref(拋留線,1);
NJC7:=金叉 = 0 AND 金叉天數(shù) >2 and (YJD < ref(yjd,1) or 拋留線 < ref(拋留線,1)) ;
NJC8:=金叉 = 0 AND 金叉天數(shù) >2 and YJD < ref(yjd,1) and 拋留線 < ref(拋留線,1) ;
IF BARSTATUS=2 AND NJC1 THEN BEGIN
DRAWTEXTREL(25,30,’ ● ‘+NUMTOSTRN(金叉天數(shù),0)+’天前金叉’),colorred,layer0;
DRAWTEXTREL(25,190,’ ● 低位可進(jìn)場’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC2 THEN BEGIN
DRAWTEXTREL(25,30,’ ● ‘+NUMTOSTRN(金叉天數(shù),0)+’天前金叉’),colorred,layer0;
DRAWTEXTREL(25,190,’ ● 中位可進(jìn)場’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC3 THEN BEGIN
DRAWTEXTREL(25,30,’ ● ‘+NUMTOSTRN(金叉天數(shù),0)+’天前金叉’),coloryellow,layer0;
DRAWTEXTREL(25,190,’ ● 高位小心 ?，F(xiàn) 還是？’),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC4 THEN BEGIN
DRAWTEXTREL(25,30,’ ● ‘+NUMTOSTRN(金叉天數(shù),0)+’天前金叉’),coloryellow,layer0;
DRAWTEXTREL(25,190,’ ● 陷阱 還是？’),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC5 THEN BEGIN
DRAWTEXTREL(25,30,’ ● ‘+NUMTOSTRN(金叉天數(shù),0)+’天前金叉’),coloryellow,layer0;
DRAWTEXTREL(25,190,’ ● 今日沒買 下次再來！’),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC6 THEN BEGIN
DRAWTEXTREL(25,30,’ ● ‘+NUMTOSTRN(金叉天數(shù),0)+’天前金叉’),colorYELLOW,layer0;
DRAWTEXTREL(25,190,’ ● 陷阱 還是？’),colorYELLOW,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC7 THEN BEGIN
DRAWTEXTREL(25,30,’ ● ‘+NUMTOSTRN(金叉天數(shù),0)+’天前金叉’),colorgreen,layer0;
DRAWTEXTREL(25,190,’ ● 喝茶去吧！’),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND NJC8 THEN BEGIN
DRAWTEXTREL(25,190,’ ● 喝咖啡去了！’),colorgreen,layer0;
END;
NL0:=YJD > ref(yjd,1) and YJD >0 and YJD <70;
NL1:=YJD < ref(yjd,1) and YJD >0 and YJD <70;
NL2:=YJD > ref(yjd,1) and YJD <0 ;
NL3:=YJD < ref(yjd,1) and YJD <0 ;
NL4:=YJD >0 and YJD > ref(yjd,1) and YJD >70 ;
NL5:=YJD >0 and YJD < ref(yjd,1) and YJD >70 ;
IF BARSTATUS=2 AND NL0 THEN BEGIN
DRAWTEXTREL(25,350,’ ● 進(jìn)入買區(qū)’),colorred,layer0;
DRAWTEXTREL(25,510,’ ● 見紅 勢好’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NL1 THEN BEGIN
DRAWTEXTREL(25,350,’ ● 進(jìn)入買區(qū)’),colorgreen,layer0;
DRAWTEXTREL(25,510,’ ● 見綠 下車’),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND NL2 THEN BEGIN
DRAWTEXTREL(25,350,’ ● 不在買區(qū)’),colorgreen,layer0;
DRAWTEXTREL(25,510,’ ● 趨勢上升’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND NL3 THEN BEGIN
DRAWTEXTREL(25,350,’ ● 不在買區(qū)’),colorgreen,layer0;
DRAWTEXTREL(25,510,’ ● 喝茶吧！’),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND NL4 THEN BEGIN
DRAWTEXTREL(25,350,’ ● 在買區(qū)’),colorgreen,layer0;
DRAWTEXTREL(25,510,’ ● 超過70小心！’),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND NL5 THEN BEGIN
DRAWTEXTREL(25,350,’ ● 在買區(qū)’),colorgreen,layer0;
DRAWTEXTREL(25,510,’ ● 70下跌快逃！’),colorgreen,layer0;
END;
PL1:=拋留線 > ref(拋留線,1);
PL2:=拋留線 < ref(拋留線,1);
IF BARSTATUS=2 AND PL1 THEN BEGIN
DRAWTEXTREL(25,670,’ ● 見紅 勢好’),colorred,layer0;
END
ELSE
IF BARSTATUS=2 AND PL2 THEN BEGIN
DRAWTEXTREL(25,670,’ ● 見綠 走人’),colorgreen,layer0;
END;
PL3:=拋留線 > 65 and 拋留線 <70;
PL4:=拋留線 > 70;
IF BARSTATUS=2 AND PL3 THEN BEGIN
DRAWTEXTREL(25,830,’ ● 超過65小心！’),coloryellow,layer0;
END
ELSE
IF BARSTATUS=2 AND PL4 THEN BEGIN
DRAWTEXTREL(25,830,’ ● 超過70走人！’),colorgreen,layer0;
END;
頂線:80,COLORred,dotline,layer7;
強(qiáng)勢:65,COLORffffff,dotline,precis2,layer7;
均線:-65,COLORred,dotline,precis2,layer7;
底線:-80,COLORgreen,dotline,layer7;