0
{-----以下是个股利昨日信息------}
昨天成交金额:=STRCAT(STRCAT(‘昨金:‘,CON2STR(REF(AMO,1)/100000000,2)),‘亿‘);
昨天换手:=STRCAT(STRCAT(‘昨换:‘,CON2STR(REF(V,1)/CAPITAL*100,2)),‘%‘);
昨天开盘涨幅:=STRCAT(STRCAT(‘昨开:‘,CON2STR((REF(O,1)-REF(C,2))/REF(C,2)*100,2)),‘%‘);
DRAWTEXT_FIX(1,0.45,0.21,0,昨天成交金额),COLORWHITE;
DRAWTEXT_FIX(1,0.45,0.42,0,昨天开盘涨幅),COLORWHITE;
DRAWTEXT_FIX(1,0.45,0.01,0,昨天换手),COLORYELLOW;
{-----以下是个股利今日信息------}
AA:=DYNAINFO(15)/DYNAINFO(4)/100;
BB:=REF(V,1);
开盘换手:=STRCAT(STRCAT(‘开换:‘,CON2STR(AA/BB*100,2)),‘%‘);
现在换手:=STRCAT(STRCAT(‘现换:‘,CON2STR(DYNAINFO(8)/CAPITAL*100,2)),‘%‘);
今开涨幅:=STRCAT(STRCAT(‘今开:‘,CON2STR((DYNAINFO(4)-DYNAINFO(3))/DYNAINFO(3)*100,2)),‘%‘);
开盘金额:=STRCAT(STRCAT(‘开金:‘,CON2STR(DYNAINFO(15)/10000,0)),‘万‘);
现在成交金额:=STRCAT(STRCAT(‘现金:‘,CON2STR(DYNAINFO(10)/100000000,2)),‘亿‘);
今昨成交量比率:=STRCAT(CON2STR(DYNAINFO(8)/REF(V,1)*100,1),‘%‘);
DRAWTEXT_FIX(1,0.6,0.42,0,今开涨幅),COLORRED;
DRAWTEXT_FIX(1,0.75,0.01,0,开盘换手),COLORYELLOW;
DRAWTEXT_FIX(1,0.6,0.01,0,现在换手),COLORRED;
DRAWTEXT_FIX(1,0.45,0.63,0,今昨成交量比率),COLORWHITE;
DRAWTEXT_FIX(1,0.6,0.21,0,现在成交金额),COLORWHITE;
DRAWTEXT_FIX(1,0.75,0.21,0,开盘金额),COLORRED;
{-----以下是个股利行情信息------}
均价:=STRCAT(STRCAT(‘均价:‘,CON2STR((DYNAINFO(11)-DYNAINFO(3))/DYNAINFO(3)*100,2)),‘%‘);
最低:=STRCAT(STRCAT(‘最低:‘,CON2STR((DYNAINFO(6)-DYNAINFO(3))/DYNAINFO(3)*100,2)),‘%‘);
最高:=STRCAT(STRCAT(‘最高:‘,CON2STR((DYNAINFO(5)-DYNAINFO(3))/DYNAINFO(3)*100,2)),‘%‘);
DRAWTEXT_FIX(1,0.15,0.01,0,最高),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.42,0,最低),COLORRED;
DRAWTEXT_FIX(1,0.15,0.21,0,均价),COLORWHITE;
{-----以下是个股基本信息------}
偏离10日均线:=STRCAT(STRCAT(‘十偏:‘,CON2STR((DYNAINFO(7)-MA(C,10))/MA(C,10)*100,2)),‘%‘);
上市天数:=STRCAT(STRCAT(‘上市天数:‘,CON2STR(FINANCE(42),0)),‘天‘);
DRAWTEXT_FIX(1,0.01,0.42,0,上市天数),COLORWHITE;
市盈率:=STRCAT(STRCAT(‘市盈率:‘,CON2STR(DYNAINFO(39),1)),‘倍‘);
DRAWTEXT_FIX(1,0.01,0.21,0,市盈率),COLORWHITE;
流通市值:=STRCAT(STRCAT(‘流通市值:‘,CON2STR((CAPITAL/1000000)*C,2)),‘亿‘);
DRAWTEXT_FIX(1,0.01,0.01,0,流通市值),COLORYELLOW;
DRAWTEXT_FIX(1,0.01,0.63,0,偏离10日均线),COLORWHITE;
接上面
2
{-----以下是个股利好利空和个股概念------}
ZD1:=STRCAT(‘风格:‘,FGBLOCK);
ZD2:=STRCAT(ZD1,‘概念:‘);
ZD3:=STRCAT(ZD2,GNBLOCK);
AA1:=FINDSTR(ZD3,‘近期解禁‘);
FX1:=IF(AA1=1,‘近期解禁 ‘,‘ ‘);
AA2:=FINDSTR(ZD3,‘拟减持‘);
FX2:=IF(AA2=1,‘拟减持 ‘,‘ ‘);
AA3:=FINDSTR(ZD3,‘亏损股 ‘);
FX3:=IF(AA3=1,‘亏损股‘,‘ ‘);
AA4:=FINDSTR(ZD3,‘业绩预降‘);
FX4:=IF(AA4=1,‘业绩预降 ‘,‘ ‘);
AA5:=FINDSTR(ZD3,‘连续亏损‘);
FX5:=IF(AA5=1,‘连续亏损 ‘,‘ ‘);
AA6:=FINDSTR(ZD3,‘风险提示‘);
FX6:=IF(AA6=1,‘风险提示‘,‘ ‘);
ZD:=IF(GNBLOCKNUM<1,1,0);
风险:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(FX1,FX2),FX3),FX4),FX5),FX6);
DRAWTEXT_FIX(1,0.2,0.95,0,风险),COLORGREEN;
ZZD1:=STRCAT(‘风格:‘,FGBLOCK);
ZZD2:=STRCAT(ZZD1,‘概念:‘);
ZZD3:=STRCAT(ZZD2,GNBLOCK);
ZAA1:=FINDSTR(ZZD3,‘预高送转‘);
ZFX1:=IF(ZAA1=1,‘预高送转 ‘,‘ ‘);
ZAA2:=FINDSTR(ZZD3,‘拟增持‘);
ZFX2:=IF(ZAA2=1,‘拟增持 ‘,‘ ‘);
ZAA3:=FINDSTR(ZZD3,‘预计扭亏‘);
ZFX3:=IF(ZAA3=1,‘预计扭亏 ‘,‘ ‘);
ZAA4:=FINDSTR(ZZD3,‘业绩预升‘);
ZFX4:=IF(ZAA4=1,‘业绩预升 ‘,‘ ‘);
ZAA5:=FINDSTR(ZZD3,‘持续增长‘);
ZFX5:=IF(ZAA5=1,‘持续增长 ‘,‘ ‘);
ZAA6:=FINDSTR(ZZD3,‘高管增持‘);
ZFX6:=IF(ZAA6=1,‘高管增持 ‘,‘ ‘);
ZZD:=IF(GNBLOCKNUM<1,1,0);
利好:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(ZFX1,ZFX2),ZFX3),ZFX4),ZFX5),ZFX6);
DRAWTEXT_FIX(1,0.01,0.95,0,利好),COLORRED;
ZD18:=STRCAT(‘概念:‘,GNBLOCK);
DRAWTEXT_FIX(1,0.45,0.95,0,ZD18),COLORWHITE;
公式里面的利空利好和概念在这