分享

资金流向统计主图(大盘)

 zgy1216 2014-09-10
{资金流向统计主图} {沪主1:="999999$AMOUNT"/100000000,NODRAW;} 沪主:=STRCAT(STRCAT('沪主:' ,CON2STR("999999$AMOUNT"/100000000,2)),' 亿 '); {深主1:="399001$AMOUNT"/100000000,NODRAW;} 深主:=STRCAT(STRCAT('深主:' ,CON2STR("399001$AMOUNT"/100000000,2)),' 亿 '); {中小1:="399005$AMOUNT"/100000000,NODRAW;} 中小:=STRCAT(STRCAT('中小:' ,CON2STR("399005$AMOUNT"/100000000,2)),' 亿 '); {创业1:="399006$AMOUNT"/100000000,NODRAW;} 创业:=STRCAT(STRCAT('创业:' ,CON2STR("399006$AMOUNT"/100000000,2)),' 亿 '); {总额1:沪主1+深主1+中小1+创业1;} 额:=("999999$AMOUNT"+"399001$AMOUNT"+"399005$AMOUNT"+"399006$AMOUNT")/100000000; {Y:=("999999$AMOUNT"/100000000+"399001$AMOUNT"/100000000+"399005$AMOUNT"/100000000+"399006$AMOUNT"/100000000);} 总额:=STRCAT(STRCAT('总额:' ,CON2STR(额,2)),' 亿 '); 昨沪主:=STRCAT(STRCAT('昨沪主:' ,CON2STR(REF("999999$AMOUNT"/100000000,1),2)),' 亿 '); {昨深主:=REF(深主,1);} 昨深主:=STRCAT(STRCAT('昨深主:' ,CON2STR(REF("399001$AMOUNT"/100000000,1),2)),' 亿 '); {昨中小:=REF(中小,1);} 昨中小:=STRCAT(STRCAT(' 昨中小:' ,CON2STR(REF("399005$AMOUNT"/100000000,1),2)),' 亿 '); {昨创业:=REF(创业,1);} 昨创业:=STRCAT(STRCAT(' 昨创业:' ,CON2STR(REF("399006$AMOUNT"/100000000,1),2)),' 亿 '); {昨总额:=REF(总额,1);} 昨总额:=STRCAT(STRCAT('昨总额:' ,CON2STR(REF(("999999$AMOUNT"+"399001$AMOUNT"+"399005$AMOUNT"+"399006$AMOUNT")/100000000,1),2)),' 亿 '); {沪主【差】:=沪主-昨沪主;} 沪主【差】:=STRCAT(STRCAT('沪主【差】:' ,CON2STR(("999999$AMOUNT"/100000000-REF("999999$AMOUNT"/100000000,1)),2)),' 亿 '); {深主【差】:=深主-昨深主;} 深主【差】:=STRCAT(STRCAT('深主【差】:' ,CON2STR(("399001$AMOUNT"/100000000-REF("399001$AMOUNT"/100000000,1)),2)),' 亿 '); {中小【差】:=中小-昨中小;} 中小【差】:=STRCAT(STRCAT('中小【差】:' ,CON2STR(("399005$AMOUNT"/100000000-REF("399005$AMOUNT"/100000000,1)),2)),' 亿 '); {创业【差】:=创业-昨创业;} 创业【差】:=STRCAT(STRCAT('创业【差】:' ,CON2STR(("399006$AMOUNT"/100000000-REF("399006$AMOUNT"/100000000,1)),2)),' 亿 '); {总额【差】:=总额-昨总额;} 总额【差】:=STRCAT(STRCAT('总额【差】:' ,CON2STR((("999999$AMOUNT"+"399001$AMOUNT"+"399005$AMOUNT"+"399006$AMOUNT")/100000000- REF(("999999$AMOUNT"+"399001$AMOUNT"+"399005$AMOUNT"+"399006$AMOUNT")/100000000,1)),2)),' 亿 '); {总额【差】:=STRCAT(STRCAT('总额【差】:' ,CON2STR((总额-REF(总额,1)),2)),' 亿 ');} A:=STRCAT(昨沪主 , STRCAT( 沪主, 沪主【差】 )); B:=STRCAT(昨深主 , STRCAT( 深主, 深主【差】 )); D:=STRCAT(昨中小 , STRCAT( 中小, 中小【差】 )); E:=STRCAT(昨创业 , STRCAT( 创业, 创业【差】 )); F:=STRCAT(昨总额 , STRCAT( 总额, 总额【差】 )); DRAWTEXT_FIX(ISLASTBAR,0.03,0.09,0,A),COLORGREEN; DRAWTEXT_FIX(ISLASTBAR,0.03,0.15,0,B),COLORGREEN; DRAWTEXT_FIX(ISLASTBAR,0.03,0.21,0,D),COLORGREEN; DRAWTEXT_FIX(ISLASTBAR,0.03,0.27,0,E),COLORGREEN; DRAWTEXT_FIX(ISLASTBAR,0.03,0.33,0,F),COLORGREEN; DRAWTEXT_FIX(ISLASTBAR,0,0,0,' 收盘前查看'),COLORYELLOW; {收盘前查看}

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约