通达信背离线主图未加密选股指标公式源码

通达信背离线主图未加密选股指标公式源码

源码正文：

VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
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,0),COLOR000055;
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),2.7,0),COLOR000077;
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),2.1,0),COLOR000099;
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),1.5,0),COLOR0000BB;
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),0.9,0),COLOR0000DD;
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),0.3,0),COLOR0000FF{XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
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.1,0),COLOR00AAFF{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),2.7,0),COLOR00ddfF{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),2.1,0),COLOR00EEFF{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),1.5,0),COLOR22FFFF{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),0.9,0),COLOR99FFFF{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),0.3,0),COLORFFFFFF{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;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORmaGENTA;
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;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR008800{XG51};
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=3*K24-2*D24;
压力位:IF(crOSS(J24,J),H,REF(H,BArslAST(CROSS(J24,J)))),COLOR00FF33,LINETHICK1;
支撑位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),COLORCC33CC,LINETHICK1{XG51};
支撑价:LLV(LOW,23) ,COLOR7FFF00,LINETHICK2{XG51};
阻力价:HHV(HIGH,23),COLORFF9900, LINETHICK2{XG51};
A1:=BARSLAST(REF(CROSS("macd.dif","MacD.DEA"),1)){XG51};
DRAWTEXT(REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'★M底背离'),COLOR00FFFF;
A2:=BARSLAST(REF(CROSS("kdj.K","kdJ.D"),1)){XG51};
DRAWTEXT(REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"),L-0.10,'◎K底背离'),COLORFF00FF{XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1","RSI.RSI2"),1)){XG51};
DRAWTEXT(REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L-0.18,'◆R底背离'),COLOR0000FF;{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1)){XG51};
DRAWTEXT(REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M顶背离'),COLOR00FF00;{XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)){XG51};
DRAWTEXT(REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,H+0.08,'◎K顶背离'),COLORFFFFCC{XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)){XG51};
DRAWTEXT(REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,H+0.04,'◆R顶背离'),COLORFF9900;{XG51};
重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382{XG51};
【操盘线】:ema(((SLOPE(C,22)*20)+C),55),COLORBLUE,LINETHICK4{XG51};
【黄金线】:IF(重心>=【操盘线】,【操盘线】,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
【空仓线】:IF(重心<【操盘线】,【操盘线】,DRAWNULL),COLORGREEN,LINETHICK2{XG51};
DRAWTEXT(ISLASTBAR,【操盘线】,'【操盘线】'),COLORWHITE{XG51};
变:EMA(CLOSE,5),LINETHICK1,COLORBLUE{XG51};
金:IF(变>REF(变,1),变,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
空:IF(变<REF(变,1),变,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
DRAWTEXT(ISLASTBAR,变,'【雷达线】'),COLORWHITE{XG51};
STICKLINE(REF(COUNT(C<MA(REF(HHV((C+L+O+H)/4,40),1),3),5)=5,1) AND C>MA(REF(HHV((C+L+O+H)/4,40),1),3) AND C>O,C,O,1.3,0),COLORBLUE{XG51};
TYX2:=MA(REF(HHV((C+L+O+H)/4,10),1),3){XG51};
STICKLINE(REF(COUNT(C<TYX2,5)=5,1) AND C>TYX2 AND C>O,C,O,1.3,0),COLORYELLOW;DRAWTEXT(HIGH>REF(HIGH,1) AND REF(HIGH,2)>REF(HIGH,1) AND LOW>REF(LOW,1)
AND REF(LOW,2)>REF(LOW,1)
AND MA(CLOSE,5)<MA(CLOSE,10),L-0.4,'买进'),COLORLIMAGENTA{XG51};
Z1:=STRCAT(HYBLOCK,' '){XG51};
Z2:=STRCAT(Z1,DYBLOCK){XG51};
Z3:=STRCAT(Z2,' '){XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0{X_G.5_1_C_N_{};

通达信资金变化未加密选股指标公式源码

源码正文：

N:=3{XG51};
K1:=IF(CLOSE>=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW){XG51};
K2:=IF(CLOSE<=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE){XG51};
DT:=vol*K1/(K1+K2){XG51};
KT:=(VOL-DT){XG51};
买量:SUM(DT,N),COLOR0000FF{XG51};
卖量:-SUM(KT,N),COLORFFFF00{XG51};
DRAWBAND(买量,RGB(0,120,0),0,DRAWNULL){XG51};
DRAWBAND(0,RGB(0,80,0),卖量,DRAWNULL){XG51};
进出量:买量+卖量,POINTDOT,COLOR00FFFF{XG51};
净量换手:100*进出量/CAPITAL,POINTDOT,COLOR00FF33{XG51};
stICKLINE(进出量>=0,0,进出量,3,1),COLOR0000FF{XG51};
STICKLINE(进出量<0,0,进出量,3,1),COLORFFFF00{XG51};
D3:=100*SUM(DT,3)/CAPITAL{XG51};
K3:=100*SUM(KT,3)/CAPITAL{XG51};
J3:=D3-K3{XG51};
D6:=100*SUM(DT,6)/CAPITAL{XG51};
K6:=100*SUM(KT,6)/CAPITAL{XG51};
J6:=D6-K6{XG51};
D9:=100*SUM(DT,9)/CAPITAL{XG51};
K9:=100*SUM(KT,9)/CAPITAL{XG51};
J9:=D9-K9{XG51};
画:=CONST(FINDLOW(卖量,0,90,1)){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,66,44),Abs(画),DRAWNULL),RGB(50,50,50),画,DRAWNULL){XG51};
BL3:=ABS(画)/CONST(FINDHIGH(maX(D3,K3),0,65,1)){XG51};
BL6:=ABS(画)/CONST(FINDHIGH(MAX(D6,K6),0,65,1)){XG51};
BL9:=ABS(画)/CONST(FINDHIGH(MAX(D9,K9),0,65,1)){XG51};
D3B:=(D3*BL3){XG51};
K3B:=(K3*BL3){XG51};
J3B:=(ABS(J3)*BL3){XG51};
D6B:=(D6*BL6){XG51};
K6B:=(K6*BL6){XG51};
J6B:=(ABS(J6)*BL6){XG51};
D9B:=(D9*BL9){XG51};
K9B:=(K9*BL9){XG51};
J9B:=(ABS(J9)*BL9){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,63,62),CONST(D3B),DRAWNULL),RGB(150,0,0),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,62,61),CONST(K3B),DRAWNULL),RGB(0,150,150),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,61,60),CONST(J3B),DRAWNULL),RGB(150,150,0),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,56,55),CONST(D6B),DRAWNULL),RGB(150,0,0),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,55,54),CONST(K6B),DRAWNULL),RGB(0,150,150),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,54,53),CONST(J6B),DRAWNULL),RGB(150,150,0),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,49,48),CONST(D9B),DRAWNULL),RGB(150,0,0),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,48,47),CONST(K9B),DRAWNULL),RGB(0,150,150),0,DRAWNULL){XG51};
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,47,46),CONST(J9B),DRAWNULL),RGB(150,150,0),0,DRAWNULL){XG51};
DRAWTEXT(CURRBARSCOUNT=60,0,'买量'), COLORddfFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=55,0,'卖量'), COLORDDFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=50,0,'进出量'), COLORDDFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=65,画*0.2,'今日'), COLOR33FFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=60,画*0.2,CONST(100*DT/CAPITAL)), COLOR33FFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=55,画*0.2,CONST(100*KT/CAPITAL)), COLOR33FFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=50,画*0.2,CONST(100*DT/CAPITAL-100*KT/CAPITAL)), COLOR33FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=65,画*0.4,'3日'), COLORDDFFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=60,画*0.4,CONST(D3)), COLORDDFFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=55,画*0.4,CONST(K3)), COLORDDFFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=50,画*0.4,CONST(J3)), COLORDDFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=65,画*0.6,'6日'), COLOR33FFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=60,画*0.6,CONST(D6)), COLOR33FFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=55,画*0.6,CONST(K6)), COLOR33FFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=50,画*0.6,CONST(J6)), COLOR33FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=65,画*0.8,'9日'), COLORDDFFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=60,画*0.8,CONST(D9)), COLORDDFFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=55,画*0.8,CONST(K9)), COLORDDFFFF{XG51};
DRAWNUMBER(CURRBARSCOUNT=50,画*0.8,CONST(J9)), COLORDDFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=65,ABS(画)*0.6,'3'), COLORBBFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=58,ABS(画)*0.6,'6'), COLORBBFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=51,ABS(画)*0.6,'9'), COLORBBFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=65 OR CURRBARSCOUNT=58 OR CURRBARSCOUNT=51,ABS(画)*0.4,'日'), COLORBBFFFF{X_G.5~1_C_N_{};