通达信指标公式源码 几何压力支撑

源码：{几何压力支撑，p：2，4，3}

N:=POW(2,P);

FF:=CONST(REF(C,1));

AA:=IF((FF < 100),FF,(FF / 100));

A:=INTPART(((N * (LOG(AA) / LOG(2))) + 1));

Y1:=(A/N);

Y2:=((A+1 ) / N);

Y3:=((A+2 ) / N);

Z1:=((A-1) / N);{第一个支撑}

Z2:=((A-2) / N);

Z3:=((A-3) / N);

ZC1:=IF((FF > 100),(POW(2,Z1) * 100),POW(2,Z1));

ZC2:=IF((FF > 100),(POW(2,Z2) * 100),POW(2,Z2));

ZC3:=IF((FF > 100),(POW(2,Z3) * 100),POW(2,Z3));

YL1:=IF((FF > 100),(POW(2,Y1) * 100),POW(2,Y1));

YL2:=IF((FF > 100),(POW(2,Y2) * 100),POW(2,Y2));

YL3:=IF((FF > 100),(POW(2,Y3) * 100),POW(2,Y3));

支撑一:IF(CURRBARSCOUNT<=50,ZC1,DRAWNULL),COLOR00F24F;

支撑二:IF(CURRBARSCOUNT<=50,ZC2,DRAWNULL),COLORWHITE,POINTDOT; {支撑三:IF(CURRBARSCOUNT<=50,ZC3,DRAWNULL),COLORWHITE,POINTDOT;} 压力一:IF(CURRBARSCOUNT<=50,YL1,DRAWNULL),COLOR05DDFC;

压力二:IF(CURRBARSCOUNT<=50,YL2,DRAWNULL),COLORWHITE,POINTDOT; {压力三:IF(CURRBARSCOUNT<=50,YL3,DRAWNULL),COLORWHITE,POINTDOT;} 均价线:=AMOUNT/V/100;

C2:=REF(C,1);

涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);

STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED;

STICKLINE(涨停,OPEN,CLOSE,3,0),COLORYELLOW;

STICKLINE(涨停,H,L,0,0),COLORYELLOW;

支撑线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; LC:=REF(CLOSE,1);

操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;

趋势线:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;

震仓线:=45;

震仓线2:=50;

逃命线:=80;

抄底线:=20;

绝底线:=5;

PP2:=操作线<震仓线2 AND REF(操作线,1)>震仓线2 ;

PP:=操作线<震仓线AND REF(操作线,1)>震仓线;

PP3:=操作线<抄底线AND REF(操作线,1)>抄底线;

HH:=COUNT(涨停,13)>=1;

STICKLINE(PP2 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;

STICKLINE(PP AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;

STICKLINE(PP3 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;

A8:=SMA(L,4,3) ;

STICKLINE(A8 AND REF(PP,1) AND HH ,A8*0.9999,A8*0.9979,5,0);

DRAWICON(A8 AND REF(PP,1) AND HH,L*0.98,1);

STICKLINE(A8 AND REF(PP3,1) AND HH ,A8*0.9999,A8*0.9979,5,0);

DRAWICON(A8 AND REF(PP3,1) AND HH,L*0.98,1);

HD:=COUNT(涨停,21)>=1;

A1:=SMA(H,4,3);

STICKLINE(A1 AND HD ,A1,A1*1.001,0.3,0);

ZT:=C/REF(C,1)>1.097;

DRAWTEXT(ZT,L*0.98,'涨停'),COLORGRAY;

VARZT:=BARSLAST(C/REF(C,1)>1.097);

STICKLINE(VARZT=2,L*0.97,L*0.98,3.5,0),COLOR0000FF;

DRAWTEXT(VARZT=2,L*0.95,'3'),COLORYELLOW;

STICKLINE(VARZT=4,H*1.03,H*1.02,3.5,0),COLOR9966FF;

DRAWTEXT(VARZT=4,H*1.06,'5'),COLORYELLOW;

STICKLINE(VARZT=7,L*0.97,L*0.98,3.5,0),COLOR00FFFF;

DRAWTEXT(VARZT=7,L*0.95,'8'),COLORYELLOW;

STICKLINE(VARZT=12,H*1.03,H*1.02,3.5,0),COLORFF33FF;

DRAWTEXT(VARZT=12,H*1.06,'13'),COLORYELLOW;

西:=EMA(HHV(HIGH,1),8);

电:=EMA(CLOSE,8);

进:=((电< REF(电,1)) AND (CLOSE < 电));

出:=IF(((西< REF(西,1)) OR 进),1,0);

出击:=((((COUNT((出= 1),4) = 3) AND (出= 0)) AND (((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) > 0.085)) * 89);

DRAWICON((出击>=89),L*0.97,1);

DRAWTEXT((出击>=89),L*0.97,'出击'),COLORYELLOW;

STICKLINE((出击>=89),H,L,4,0),LINETHICK1,COLORRED;

STICKLINE((出击>=89),H,L,0.2,0),COLORYELLOW;

STICKLINE((出击>=89),O,C,2,0),LINETHICK1,COLORYELLOW;

DRAWICON((出击>=89),(H+L)/2,7);