通达信趋势多空决战未加密选股指标公式源码

源码正文：

JJ :=(C*3+H+L+O)/6;SK := ema(JJ,13) - Ema(JJ,21){XG51};
SD := EMA(SK,3){XG51};
SP := EMA(SK,10){XG51};
A1:=EMA(C,7)-EMA(C,21){XG51};
B1:=EMA((0.668*REF
(A1,1)+0.333*A1),1){XG51};
B1,COLORstICK;X1:=V/SUM(V,13){XG51};
X2:=dma(C,X1){XG51};
X3:=(C-X2)/X2*40{XG51};
L2:=MA(AMOUNT/(100*V),13){XG51};
CYS13:= (C-L2)/L2*100{XG51};
做多:IF(A1>=B1,A1,B1),LINETHICK2,COLORFF00FF{XG51};
做空:IF(B1-A1,B1,A1),COLORCYAN,LINETHICK2{XG51};
强庄:STICKLINE(cys13>5,0,-做空,2,0 ),COLORBLUE{XG51};
主力强度:STICKLINE(X3>0 AND 做多>0,做多+0.1,做多,1,0),COLORFF80FF{XG51};
C>MA(C,30),COLORFF80FF,LINETHICK2{XG51};
difF:=EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,9){XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J1:=DIFF{XG51};
J2:=DEA{XG51};
J3:=K{XG51};
J4:=D{XG51};
VL:=REF(LOW,1); VH:=REF(H,1){XG51};
VAR1:=SMA(Abs(H-VH),13,1)/SMA(MAX(H-VH,0),13,1)*100;
VAR2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100{XG51};
VAR3:=REF(CLOSE,1){XG51};
VAR4:=MA(VAR2,13){XG51};
VAR5:=LLV(L,34){XG51};
VAR6:=SMA(MAX(CLOSE-VAR3,0),6,1)/SMA(ABS(CLOSE-VAR3),6,1)*100{XG51};
VAR7:=crOSS(93,VAR6){XG51};
VAR8:=EMA(IF(L<=VAR5,VAR4,0),3){XG51};
VAR9:=H>LLV(L,0)*7{XG51};
VAR10:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1)){XG51};
VAR11:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (VAR10 * 10.9){XG51};
上攻:FILTER(CROSS(J1,J2) AND vol>REF(SUM(VOL,5),1),3),COLOR0066FF,LINETHICK2{XG51};
wr10:=-100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10));
WR45:=-100*(HHV(HIGH,45)-CLOSE)/(HHV(HIGH,45)-LLV(LOW,45));
WR99:=-100*(HHV(HIGH,99)-CLOSE)/(HHV(HIGH,99)-LLV (LOW,99)){XG51};
顶:= 0;
底1:=-95{X-G*5?1-C-N-{};

源码正文：

现手买:=BUYvol*DYnaINFO(7)*100/10000 COLOR0000FF,NODRAW{XG51};
现手卖:=SELLVOL*DYNAINFO(7)*100/10000 COLOR00FF00,NODRAW{XG51};
合:=Abs(现手买)+ABS(现手卖)COLOR80FFFF,NODRAW{XG51};
差:=ABS(现手买)-ABS(现手卖)COLOR80FFFF,NODRAW{XG51};
MPB1:=ABS(现手买)/合*100;
MPB2:=ABS(现手卖)/合*100;
TESTSKIP(NOT(现手买 OR 现手卖 OR 合 OR 差 OR MPB1 OR MPB2)!=0){XG51};
DRAwrECTREL(640,1000,940,940,RGB(190,190,190)){XG51};
DRAWRECTREL(640,995,940,945,RGB(200,200,200)){XG51};
DRAWRECTREL(640,990,940,950,RGB(210,210,210)){XG51};
DRAWRECTREL(640,985,940,955,RGB(220,220,220)){XG51};
DRAWRECTREL(640,980,940,960,RGB(230,230,230)){XG51};
DRAWRECTREL(640,975,940,965,RGB(240,240,240)){XG51};
DRAWRECTREL(640,970,940,970,RGB(250,250,250)){XG51};
DRAWRECTREL(790-现手卖*210/合,1000,790,940,RGB(0,128,0)){XG51};
DRAWRECTREL(790-现手卖*210/合,995,790,945,RGB(0,148,0)){XG51};
DRAWRECTREL(790-现手卖*210/合,990,790,950,RGB(0,168,0)){XG51};
DRAWRECTREL(790-现手卖*210/合,985,790,955,RGB(0,188,0)){XG51};
DRAWRECTREL(790-现手卖*210/合,980,790,960,RGB(0,208,0)){XG51};
DRAWRECTREL(790-现手卖*210/合,975,790,965,RGB(0,228,0)){XG51};
DRAWRECTREL(790-现手卖*210/合,970,790,970,RGB(0,248,0)){XG51};
DRAWRECTREL(790-现手卖*210/合,940,790-现手卖*210/合,1000,RGB(0,128,0)){XG51};
DRAWRECTREL(790,1000,790+现手买*210/合,940,RGB(128,0,0)){XG51};
DRAWRECTREL(790,995,790+现手买*210/合,945,RGB(148,0,0)){XG51};
DRAWRECTREL(790,990,790+现手买*210/合,950,RGB(168,0,0)){XG51};
DRAWRECTREL(790,985,790+现手买*210/合,955,RGB(188,0,0)){XG51};
DRAWRECTREL(790,980,790+现手买*210/合,960,RGB(208,0,0)){XG51};
DRAWRECTREL(790,975,790+现手买*210/合,965,RGB(228,0,0)){XG51};
DRAWRECTREL(790,970,790+现手买*210/合,970,RGB(248,0,0)){XG51};
DRAWRECTREL(790+现手买*210/合,940,790+现手买*210/合,1000,RGB(128,0,0)){XG51};
DRAWRECTREL(789.8,940,790.2,1000,RGB(0,0.0,10)){XG51};
DRAWRECTREL(639.8,940,640.2,1000,RGB(0,0,10)){XG51};
DRAWRECTREL(939.8,940,940.2,1000,RGB(0,0,10)){XG51};
DRAWRECTREL(0,940,1000,940.2,RGB(0,0,10)){XG51};
DRAWTEXT_FIX(1,0.9,0.88,0,stRCAT(STRCAT('',CON2STR(现手买,1)),'万')),COLOR0000FF{XG51};
DRAWTEXT_FIX(1,0.61,0.88,0,STRCAT(STRCAT('',CON2STR(现手卖,1)),'万')),COLOR00FF00{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)>0,0.755,0.88,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万'))) COLOR0000FF{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)<0,0.755,0.88,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万'))) COLOR00FF00{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)=0,0.755,0.88,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万'))) COLOR80FFFF{XG51};
DRAWTEXT_FIX(1,0.58,0.97,0,STRCAT(STRCAT(' ',CON2STR(MPB2,1)),'%%')),COLOR00FF00{XG51};
DRAWTEXT_FIX(1,0.94,0.97,0,STRCAT(STRCAT('',CON2STR(MPB1,1)),'%%')),COLOR0000FF{XG51};
成交额:=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};
A6:=(A2+A3){XG51};
A7:=IF((ISLASTBAR),((100*A2)/A6),0){XG51};
A8:=IF((ISLASTBAR),((100*A3)/A6),0){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*(A2-A3))/A6,0)),'%%'){XG51};
DRAWTEXT_FIX(DD1=1,0,0.02,0,AAA1),COLORWHITE{XG51};
DRAWTEXT_FIX(DD1=1,0,0.13,0,AAA2),COLOR00FF00{XG51};
DRAWTEXT_FIX(DD1=1,0,0.24,0,AAA3),COLOR00FFFF{X_G-5?1_C_N_{};