通信达卖三量公式 带龙虎榜提示的自用主图 源码(3)

    
十周价:=(C+M1+M2+M3+M4+M5+M6+M7+M8+M9)/10;
决策:REFDATE(十周价,DATE),COLORBROWN,LINETHICK1;
DRAWTEXT(ISLASTBAR,决策,' 决策线'),COLORBROWN;
DRAWTEXT_FIX(C>0,0.004,0.0001,0,STRCAT('三季报业绩：',EXTERNSTR(0,10))),COLORLIRED,LINETHICK2;
{DRAWTEXT_FIX(C>0,0.004,0.05,0,STRCAT('一季报业绩：',EXTERNSTR(0,8))),COLORBROWN,LINETHICK2;}
{DRAWTEXT_FIX(C>0,0.004,0.1,0,STRCAT('中报预报：',EXTERNSTR(0,6))),COLORLIGRAY,LINETHICK2;}
DRAWTEXT_FIX(C>0,0.004,0.05,0,STRCAT('年报预告：',EXTERNSTR(0,16))),COLORWHITE,LINETHICK2;
DRAWTEXT_FIX(C>0,0.004,0.1,0,STRCAT('股东变动：',EXTERNSTR(0,9))),COLORLIGRAY,LINETHICK2;
DRAWTEXT_FIX(C>0,0.004,0.15,0,STRCAT('机构持仓：',EXTERNSTR(0,1))),COLORLIGRAY,LINETHICK2;
{DRAWTEXT_FIX(ISLASTBAR,0,0,0,GNBLOCK),COLORYELLOW;}{概念板块左上角}
DRAWTEXT_FIX(ISLASTBAR,0,28,0,GNBLOCK),COLOR0099CC;{板块概念左下角}
DRAWTEXT_FIX(1,0.34,28,0,HYBLOCK)COLOR0099CC;{所属行业左下角}
DRAWTEXT_FIX(1,0.40,28,0,DYBLOCK)COLOR0099CC;{所属地区左下角}
DRAWTEXT_FIX(1,0.48,28,0,EXTERNSTR(0,2))COLOR0099CC;{主题投资左下角};
半分位:=(O+C)/2;
昨半分位:=REF(半分位,1);
STICKLINE(ISLASTBAR,昨半分位,昨半分位,10,0),COLORWHITE;
DRAWNUMBER(ISLASTBAR,昨半分位,昨半分位),COLORBROWN;
DRAWTEXT(ISLASTBAR,昨半分位,' 昨半分位'),COLORGRAY;