MA5:MA(CLOSE,5),POINTDOT,LINETHICK4;
MA10:MA(CLOSE,10)COLORBLUE,POINTDOT,LINETHICK4;
MA20:MA(CLOSE,20)COLORRED,POINTDOT,LINETHICK3;
MA30:MA(CLOSE,30),COLORYELLOW,POINTDOT,LINETHICK3;
MA60:MA(CLOSE,60),POINTDOT,COLOR8080FF,LINETHICK4;
MA135:MA(CLOSE,135),POINTDOT,COLOR00FFFF,LINETHICK4;
MA250:MA(CLOSE,250),POINTDOT,COLORLICYAN,LINETHICK4;
{}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
VA2:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);
前高:=DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORWHITE;
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);
VA4:=CROSS(BACKSET(CROSS(MACD,0) OR (ISLASTBAR AND MACD<0),REF(VA3,1)+2),0.5);
前低:=DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1),COLORYELLOW;
X:IF(COUNT(MACD>0,BARSLAST(VA2))=BARSLAST(VA2),DRAWLINE(VA2,H,REF(VA2,1),REF(H,1),1),
DRAWNULL),COLORGREEN,LINETHICK2;
STICKLINE(MACD>0 AND C>X AND O>X,C,O,1,0),COLORRED;
STICKLINE(MACD>0 AND C>X AND O<X,C,X,1,0),COLORRED;
STICKLINE(MACD>0 AND MACD>前高,C,O,1,0),COLORYELLOW;
STICKLINE(REFX(VA2,1) OR REFX(VA4,1),C,O,1,0),COLORGREEN;
JC:=CROSS(DIF,DEA);
JTS:=BARSLAST(DIF<DEA);
SC:=CROSS(DEA,DIF);
STS:=BARSLAST(DIF>DEA);
價值低點:IF(JTS>0,DRAWLINE(JC,L,REF(JC,1),REF(L,1),1),DRAWNULL),COLORMAGENTA,LINETHICK2;
價值高點:IF(STS>0,DRAWLINE(SC,H,REF(SC,1),REF(H,1),1),DRAWNULL),COLORYELLOW,LINETHICK2;
JGGD:=DRAWLINE(SC,H,REF(SC,1),REF(H,1),1);
WW:=BARSLAST(VA4)<=REF(IF(VA4,BARSNEXT(JC),DRAWNULL),BARSLAST(VA4));
指標(biāo)低點:IF(WW,DRAWLINE(VA4,L,REF(VA4,1),REF(L,1),1),DRAWNULL),COLORWHITE,LINETHICK2;
白線:=DRAWLINE(VA4,L,REF(VA4,1),REF(L,1),1);
STICKLINE(MAX(C,O)<指標(biāo)低點,C,O,1,0),COLORWHITE;
STICKLINE(MAX(C,O)>指標(biāo)低點 AND MIN(C,O)<指標(biāo)低點,指標(biāo)低點,MIN(C,O),1,0),COLORWHITE;
STICKLINE(價值低點<白線 AND MAX(C,O)>價值低點 AND MIN(C,O)<價值低點,價值低點,
MIN(C,O),1,0),COLORMAGENTA;
STICKLINE(價值低點<白線 AND MAX(C,O)<價值低點,C,O,1,0),COLORMAGENTA;
DRAWTEXT(價值低點<白線 AND O<價值低點 AND C>價值低點 AND MACD>REF(MACD,1) AND
REF(C,1)<價值低點 AND JTS>1,L*0.99,'挖坑竣事、還需確認'),COLORYELLOW;
DRAWTEXT(JC AND 價值低點>JGGD,L*0.99,'小心筑頂、紅柱掩護');
DRAWTEXT(NOT(WW) AND C>價值高點 AND O<價值高點,L*0.99,'簡樸騙術(shù)、時間調(diào)和');
DRAWTEXT(WW AND C>價值高點 AND O<價值高點,L*0.99,'再漲一段、留意真假'),COLORYELLOW;
DRAWTEXT_FIX(1,0.02,0.90,0,'財神705-正品標(biāo)志'),COLOR00FFFF;
DRAWTEXT_FIX(1,0.00,0,0,'所屬行業(yè):')COLORCYAN;
DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLORWHITE;
DRAWTEXT_FIX(1,0.14,0,0,'所屬地區(qū):')COLORCYAN;
DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK),COLORWHITE;
DRAWTEXT_FIX(C>0,0.0,0.05,0,STRCAT('業(yè)績預(yù)報:',EXTERNSTR(0,3))),COLORWHITE;
DRAWTEXT_FIX(C>0,0.00,0.10,0,STRCAT('主題投資:',EXTERNSTR(0,7))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.65,0.8,0,HYBLOCK),COLOR00FF00;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.8,0,DYBLOCK),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.65,0.9,0,GNBLOCK),COLORYELLOW;
{以上為顯示所屬板塊,地域,概念等};
總股本:=STRCAT(STRCAT('總股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'億');
流通盤:=STRCAT(STRCAT(' 流通盤: ',CON2STR(CAPITAL/1000000,2)),'億');
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'億');
上市日期:=STRCAT(' 上市天數(shù): ',CON2STR(FINANCE(42),0));
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(總股本,流通盤),全流通),市值),上市日期));
聯(lián)系客服