通达信几何压力支撑主图选股指标公式源码

通达信几何压力支撑主图选股指标公式源码

源码正文：

P:=3{XG51};
N:=POW(2,P){XG51};
FF:=CONst(REF(C,1)){XG51};
AA:=IF((FF < 100),FF,(FF / 100)){XG51};
A:=INTPART(((N * (LOG(AA) / LOG(2))) + 1)){XG51};
Y1:=(A/N){XG51};
Y2:=((A+1 ) / N){XG51};
Y3:=((A+2 ) / N){XG51};
Z1:=((A-1) / N){XG51};
Z2:=((A-2) / N){XG51};
Z3:=((A-3) / N){XG51};
ZC1:=IF((FF > 100),(POW(2,Z1) * 100),POW(2,Z1)){XG51};
ZC2:=IF((FF > 100),(POW(2,Z2) * 100),POW(2,Z2)){XG51};
ZC3:=IF((FF > 100),(POW(2,Z3) * 100),POW(2,Z3)){XG51};
YL1:=IF((FF > 100),(POW(2,Y1) * 100),POW(2,Y1)){XG51};
YL2:=IF((FF > 100),(POW(2,Y2) * 100),POW(2,Y2)){XG51};
YL3:=IF((FF > 100),(POW(2,Y3) * 100),POW(2,Y3)){XG51};
支撑一:IF(CURRBARSCOUNT<=50,ZC1,DRAWNULL),COLOR00F24F{XG51};
支撑二:IF(CURRBARSCOUNT<=50,ZC2,DRAWNULL),COLORRED,POINTDOT{XG51};
压力一:IF(CURRBARSCOUNT<=50,YL1,DRAWNULL),COLOR05ddfC{XG51};
压力二:IF(CURRBARSCOUNT<=50,YL2,DRAWNULL),COLORRED,POINTDOT{XG51};
均价线:=AMOUNT/V/100{XG51};
C2:=REF(C,1){XG51};
涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0){XG51};
STICKLINE(涨停,OPEN,CLOSE,4,0),COLORWHITE{XG51};
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORBLUE{XG51};
STICKLINE(涨停,H,L,0,0),COLORBLUE{XG51};
支撑线:=(ma(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4{XG51};
LC:=REF(CLOSE,1){XG51};
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(Abs(CLOSE-LC),2,1)*100{XG51};
趋势线:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100{XG51};
震仓线:=45{XG51};
震仓线2:=50{XG51};
逃命线:=80{XG51};
抄底线:=20{XG51};
绝底线:=5{XG51};
PP2:=操作线<震仓线2  AND REF(操作线,1)>震仓线2 {XG51};
PP:=操作线<震仓线  AND REF(操作线,1)>震仓线 {XG51};
PP3:=操作线<抄底线  AND REF(操作线,1)>抄底线{XG51};
HH:=COUNT(涨停,13)>=1{XG51};
STICKLINE(PP2 AND HH,OPEN,CLOSE,0.8,0),COLORYELLOW{XG51};
STICKLINE(PP AND HH,OPEN,CLOSE,0.8,0),COLORYELLOW{XG51};
STICKLINE(PP3 AND HH,OPEN,CLOSE,0.8,0),COLORYELLOW{XG51};
A8:=SMA(L,4,3) {XG51};
STICKLINE(A8 AND REF(PP,1) AND HH ,A8*0.9999,A8*0.9979,5,0){XG51};
DRAWICON(A8 AND REF(PP,1) AND HH,L*0.98,1){XG51};
STICKLINE(A8 AND REF(PP3,1) AND HH ,A8*0.9999,A8*0.9979,5,0){XG51};
DRAWICON(A8 AND REF(PP3,1) AND HH,L*0.98,1){XG51};
HD:=COUNT(涨停,21)>=1{XG51};
A1:=SMA(H,4,3){XG51};
STICKLINE(A1 AND HD ,A1,A1*1.001,0.3,0){XG51};
ZT:=C/REF(C,1)>1.097{XG51};
DRAWTEXT(ZT,L*0.98,'涨停'),COLORBROWN{XG51};
VARZT:=BArslAST(C/REF(C,1)>1.097){XG51};
STICKLINE(VARZT=2,L*0.97,L*0.98,3.5,0),COLOR0000FF{XG51};
DRAWTEXT(VARZT=2,L*0.95,'3'),COLORBLUE{XG51};
STICKLINE(VARZT=4,H*1.03,H*1.02,3.5,0),COLOR9966FF{XG51};
DRAWTEXT(VARZT=4,H*1.06,'5'),COLORBLUE{XG51};
STICKLINE(VARZT=7,L*0.97,L*0.98,3.5,0),COLOR00FFFF{XG51};
DRAWTEXT(VARZT=7,L*0.95,'8'),COLORBLUE{XG51};
STICKLINE(VARZT=12,H*1.03,H*1.02,3.5,0),COLORFF33FF{XG51};
DRAWTEXT(VARZT=12,H*1.06,'13'),COLORBLUE{XG51};
西:=ema(HHV(HIGH,1),8){XG51};
电:=EMA(CLOSE,8){XG51};
进:=((电 < REF(电,1)) AND (CLOSE < 电)){XG51};
出:=IF(((西 < REF(西,1)) OR 进),1,0){XG51};
出击:=((((COUNT((出 = 1),4) = 3) AND (出 = 0)) AND (((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) > 0.085)) * 89){XG51};
DRAWICON((出击 >=89),L*0.97,1){XG51};
DRAWTEXT((出击 >=89),L*0.97,'出击'),COLORBLUE{XG51};
STICKLINE((出击 >=89),H,L,4,0),LINETHICK1,COLORWHITE{XG51};
STICKLINE((出击 >=89),H,L,0.2,0),COLORBLUE{XG51};
STICKLINE((出击 >=89),O,C,2,0),LINETHICK1,COLORBLUE{XG51};
DRAWICON((出击 >=89),(H+L)/2,7){X*G_5*1*C*N*{};