通达信机构占比分时未加密选股指标公式源码

通达信机构占比分时未加密选股指标公式源码

源码正文：

成交额:=V*C/100,NODRAW{XG51};
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0){XG51};
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0){XG51};
A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0){XG51};
A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0){XG51};
A6:=((A2+A3)+A4)+A5{XG51};
A7:=IF((ISLAstBAR),((100*A2)/A6),0){XG51};
A8:=IF((ISLASTBAR),((100*A3)/A6),0){XG51};
A9:=IF((ISLASTBAR),((100*A4)/A6),0){XG51};
A10:=IF((ISLASTBAR),((100*A5)/A6),0){XG51};
机构买:(A2),LINETHICK6,COLORWHITE{XG51};
机构卖:(A3),LINETHICK6,COLORFFFF55{XG51};
机构进出:=机构买-机构卖,NODRAW{XG51};
散户买:(A4),COLOR5555FF{XG51};
散户卖:(A5),COLOR55FF55{XG51};
强势:=((100*A2)/A6>50){XG51};
STICKLINE(强势,机构买*1.02,机构买*1.1,1,0),COLORBLUE{XG51};
拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18{XG51};
STICKLINE(拉升,机构买*1.1,机构买*1.2,1,0),COLORFF00FF{XG51};
DRAWTEXT(ISLASTBAR=1,机构买*0.95,'●机构买'),LINETHICK2,COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR=1,机构卖*0.95,'○机构卖'),LINETHICK2,COLORFFFF55{XG51};
DRAWTEXT(机构进出>0 AND REF(机构进出,1)<=0,机构买*1.02,'●机买'),COLORWHITE{XG51};
DRAWTEXT(机构进出<0 AND REF(机构进出,1)>=0,机构买*0.98,'○机卖'),COLORFFFF55{XG51};
DD1:=1{XG51};
AAA1:=STRCAT(STRCAT('机构买',CON2STR((100*A2)/A6,0)),'%%'){XG51};
AAA2:=STRCAT(STRCAT('机构卖',CON2STR((100*A3)/A6,0)),'%%'){XG51};
AAA3:=STRCAT(STRCAT('散户买',CON2STR((100*A4)/A6,0)),'%%'){XG51};
AAA4:=STRCAT(STRCAT('散户卖',CON2STR((100*A5)/A6,0)),'%%'){XG51};
DRAWTEXT_FIX(DD1=1,0,0.02,0,AAA1),COLORWHITE{XG51};
DRAWTEXT_FIX(DD1=1,0,0.13,0,AAA2),COLORFFFF55{XG51};
DRAWTEXT_FIX(DD1=1,0,0.24,0,AAA3),COLOR5555FF{XG51};
DRAWTEXT_FIX(DD1=1,0,0.35,0,AAA4),COLOR55FF55{X!G!5=1!C!N!{};

通达信回扣卖出法未加密选股指标公式源码

源码正文：

止损设定:=5{XG51};
递进回扣:=1.2{XG51};
VAR1:=100*ema(Ema((C-REF(C,1)),6),6)/EMA(EMA(Abs((C-REF(C,1))),6),6){XG51};
买点:=FILTER(LLV(VAR1,2)=LLV(VAR1,7) AND COUNT(VAR1<0,2) AND crOSS(VAR1,MA(VAR1,2)),5),COLORBLUE{XG51};
买距:=BArslAst(买点),COLORRED,NODRAW{XG51};
MM:=买距>0{XG51};
买价:=IF(买距=0,C,REF(C,买距)*MM),COLORRED,NODRAW{XG51};
价:=(买价*(100-止损设定)/100)+(买距*递进回扣/100*买价),NODRAW{XG51};
卖出:=C<REF(价,1)AND 买点=0 {XG51};
明天卖出价:IF(BARSLAST(买点)<BARSLAST(卖出),价,DRAWNULL)COLORRED,NODRAW{XG51};
今日卖出价:REF(明天卖出价,1),COLORRED,NODRAW{XG51};
DRAWICON(买点=1,1,25){XG51};
DRAWICON(卖出 AND REF(BARSLAST(买点)<BARSLAST(卖出),1),10,15){XG51};
DRAWTEXT(CURRBARSCOUNT=110,7.5,'请 根 据 心 理 承 受 力 , 调 控 止 损 设 定 ！'),COLORBLUE{XG51};
DRAWTEXT(CURRBARSCOUNT=110,5.5,'由 欲 念 期 盼 值 , 把 关 递 进 回 扣 。'),COLORBLUE{XG51};
DRAWTEXT(CURRBARSCOUNT=110,3.5,'调 整 缺 省 值 , 数 目 几 代 表 百 分 之 几 ？'),COLORBLUE{X-G~5^1-C-N-{};