通达信自动测幅主图未加密选股指标公式源码

通达信自动测幅主图未加密选股指标公式源码

源码正文：

KG1:=20{XG51};
F1:=10{XG51};
A1:=10{XG51};
A2:=10{XG51};
A3:=zig(1,A1){XG51};
A4:=PEAK(1,A1,1);
A5:=TROUGH(1,A1,1){XG51};
CC:=IF((A3 < (REF(A3,1))),A4,A5),LINETHICK2{XG51};
A6:=crOSS((A4 - 0.02),A3){XG51};
A7:=CROSS(A3,(A5 + 0.02)){XG51};
A8:=A2 / 100{XG51};
A9:=IF((A3 < (REF(A3,1))),A8,REVERSE(A8)){XG51};
A10:=IF((A3 < (REF(A3,1))),A6,A7){XG51};
H1:REF((CC * (1 - (A9 * 1))),BArslAst(A10)),DOTLINE{XG51};
H2:REF((CC * (1 - (A9 * 2))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H3:REF((CC * (1 - (A9 * 3))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H4:REF((CC * (1 - (A9 * 4))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H5:REF((CC * (1 - (A9 * 5))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H6:REF((CC * (1 - (A9 * 6))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H7:REF((CC * (1 - (A9 * 7))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H8:REF((CC * (1 - (A9 * 8))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H9:REF((CC * (1 - (A9 * 9))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H10:REF((CC * (1 - (A9 * 10))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H11:REF((CC * (1 - (A9 * 11))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H12:REF((CC * (1 - (A9 * 12))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H13:REF((CC * (1 - (A9 * 13))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H14:REF((CC * (1 - (A9 * 14))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H15:REF((CC * (1 - (A9 * 15))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
A11:=BARSLAST((ISLASTBAR = 1)) + 1{XG51};
A12:=HHV(HIGH,100){XG51};
A13:=LLV(LOW,100){XG51};
A14:=IF((PERIOD = 12),1.00005,(IF((PERIOD < 3),1.0005,1.002))){XG51};
STICKLINE(((CC >= A13) AND (CC <= A12)),CC,(CC * A14),10,-1000),COLORWHITE{XG51};
STICKLINE(((CC >= A13) AND (CC <= A12)),H1,H1,5,0),COLORBROWN{XG51};
STICKLINE(((H1 > A13) AND (H1 < A12)),H2,H2,5,0),COLORBROWN{XG51};
STICKLINE(((H2 > A13) AND (H2 < A12)),H3,H3,5,0),COLORBROWN{XG51};
STICKLINE(((H3 > A13) AND (H3 < A12)),H4,H4,5,0),COLORBROWN{XG51};
STICKLINE(((H4 > A13) AND (H4 < A12)),H5,H5,5,0),COLORBROWN{XG51};
STICKLINE(((H5 > A13) AND (H5 < A12)),H6,H6,5,0),COLORBROWN{XG51};
STICKLINE(((H6 > A13) AND (H6 < A12)),H7,H7,5,0),COLORBROWN{XG51};
STICKLINE(((H7 > A13) AND (H7 < A12)),H8,H8,5,0),COLORBROWN{XG51};
STICKLINE(((H8 > A13) AND (H8 < A12)),H9,H9,5,0),COLORBROWN{XG51};
STICKLINE(((H9 > A13) AND (H9 < A12)),H10,H10,5,0),COLORBROWN{XG51};
STICKLINE(((H10 > A13) AND (H10 < A12)),H11,H11,5,0),COLORBROWN{XG51};
STICKLINE(((H11 > A13) AND (H11 < A12)),H12,H12,5,0),COLORBROWN{XG51};
STICKLINE(((H12 > A13) AND (H12 < A12)),H13,H13,5,0),COLORBROWN{XG51};
STICKLINE(((H13 > A13) AND (H13 < A12)),H14,H14,5,0),COLORBROWN{XG51};
STICKLINE(((H14 > A13) AND (H14 < A12)),H15,H15,5,0),COLORBROWN{XG51};
DRAWTEXT(BARSLAST(A10) ,H1,'10' ),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H2,'20'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H3,'30'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H4,'40'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H5,'50'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H6,'60'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H7,'70'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H8,'80'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H9,'90'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H10,'100'),COLORC0C0C0{X!G~5-1!C!N!{};

通达信三合一底背离及未加密选股指标公式源码

源码正文：

difF:ema(CLOSE,12) - Ema(CLOSE,26){XG51};
DEA:EMA(DIFF,9){XG51};
macd:2*(DIFF-DEA),COLORstICK{XG51};
A1:=BArslAST(REF(crOSS(DIFF,DEA),1)){XG51};
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA){XG51};
A2:=BARSLAST(REF(CROSS("kdj.K"(9,3,3),"kdj.D"(9,3,3)),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)){XG51};
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF){XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)){XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)){XG51};
MacD底背:IF(B1>0,-0.1,0),COLORWHITE,POINTDOT{XG51};
KDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT{XG51};
RSI底背:IF(B3>0,-0.1,0),COLORBLUE,POINTDOT{XG51};
MACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT{XG51};
KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT{XG51};
RSI顶背:IF(D3>0,0.1,0),COLORRED,POINTDOT{XG51};
STICKLINE(B1>0,-0.1,0,2,0),COLORWHITE{XG51};
STICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF{XG51};
STICKLINE(B3>0,-0.1,0,2,0),COLORBLUE{XG51};
STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00{XG51};
STICKLINE(D2>0,0.1,0,2,0),COLORFFCC66{XG51};
STICKLINE(D3>0,0.1,0,2,0),COLORRED{X!G_5_1!C!N!{};