通达信四方力道+利多方舟K线主图未加密选股指标公式源码

源码正文：

M5:ma(CLOSE,5),COLORRED{XG51};
M10:MA(CLOSE,10),COLORBLUE{XG51};
M20:MA(CLOSE,20),COLORWHITE{XG51};
M60:MA(CLOSE,60),COLORCYAN{XG51};
V1:=dma((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9){XG51};
HY1:=REF(ema(V1,3),1){XG51};
实时线:MA(CLOSE,1),COLOR006400{XG51};
神秘线:HY1,COLOR400080{XG51};
DRAWTEXT(crOSS(CLOSE,HY1),LOW,'买点'),LINETHICK2,COLORBLUE{XG51};
DRAWTEXT(CROSS(HY1,CLOSE),HIGH*1.08,'卖点'),LINETHICK3,COLORRED{XG51};
APP:=(vol / (((HIGH - LOW) * 2) - Abs((CLOSE - OPEN)))){XG51};
ZL:=IF((CLOSE > OPEN),(APP * (HIGH - LOW)),IF((CLOSE < OPEN),(APP * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))){XG51};
SF:=IF((CLOSE > OPEN),(0 - (APP * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (APP * (HIGH - LOW))),(0 - (VOL / 2)))){XG51};
库存能量:=MA((ZL + SF),2){XG51};
库存平均:=MA((ZL + SF),5){XG51};
DRAWTEXT(CROSS(库存能量,库存平均),L*0.97,''),COLORFF00FF,LINETHICK4{XG51};
VAR3:=LLV(HIGH,240){XG51};
VAR4:=100*(CLOSE-VAR3)/VAR3{XG51};
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100{XG51};
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100{XG51};
VAR7:=0{XG51};
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100{XG51};
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100{XG51};
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0){XG51};
VAR11:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3){XG51};
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3){XG51};
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3){XG51};
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3){XG51};
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150){XG51};
买１:=VAR10{XG51};
买２:=(VAR11+VAR13+VAR15+VAR17){XG51};
卖１:=(VAR12+VAR14+VAR16+VAR18){XG51};
B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORBLUE{XG51};
DRAWTEXT(FILTER(VAR10 OR VAR11,5),LOW,'买入'),COLORWHITE{XG51};
S:IF(卖１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORCYAN{XG51};
DRAWTEXT(FILTER(VAR12 OR VAR14,3),HIGH,'卖出'),COLORCYAN{XG51};
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))){XG51};
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))){XG51};
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34)){XG51};
F:IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),CROSSDOT,LINETHICK3,COLOREE00EE{XG51};
X1:=(C+L+H)/3{XG51};
X2:=EMA(X1,6){XG51};
X3:=EMA(X2,5){XG51};
GR1:=BArslAst(BETWEEN("bias.BIAS2"(6,13,24),0,5)){XG51};
GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1){XG51};
GR4:=H=HHV(H,GR1){XG51};
GR5:="macd.MacD"(9,17,8)<REF("MACD.MACD"(9,17,8),1){XG51};
LC := REF(CLOSE,1){XG51};
rsi6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
BIAS5:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100{XG51};
换手:=100*V/CAPITAL{XG51};
EMA8:=EMA(C,8){XG51};
AA1:=AMOUNT/VOL{XG51};
BB1:=L<AA1*0.9{XG51};
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2{XG51};
DD1:=L<MA(C,6)*0.921{XG51};
EE1:=VOL<MA(V,5)*1.5{XG51};
FF1:=BB1 AND CC1 AND DD1 AND EE1{XG51};
DRAWTEXT(FF1,L*0.99,'买点'),COLOR00FF00{XG51};
STICKLINE(FF1,H,L,0.3,0),COLOR00FF00{XG51};
A2:=(C-REF(C,1))/REF(C,1)*100<1.02{XG51};
A3:=H>MA(C,5)*1.12{XG51};
AA:= A2 AND A3{X~G_5_1~C~N~{};

源码正文：

VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
stICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLORWHITE{XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORFFCC66{XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,1),COLORBLUE{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),5,2),COLOR00FF00{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00C8FF{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10ECFF{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10FFFF{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00D900{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORYELLOW{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR090FF2{XG51};
Pma:MA(C,5),COLORRED,LINETHICK2{XG51};
IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
X:=(3*C+L+O+H)/6{XG51};
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORFF00FF,LINETHICK2{XG51};
DD:=多空线<REF(多空线,1){XG51};
IF(DD,多空线,DRAWNULL),COLOR00FFFF,LINETHICK2{XG51};
A:=(PMA>多空线){XG51};
IF(A,多空线,DRAWNULL),COLOR33FF33,POINTDOT,LINETHICK4{X.G.5_1.C.N.{};