通达信圆弧式突破主图选股指标公式源码

通达信圆弧式突破主图选股指标公式源码

源码正文：

DRAWGBK(C>O,RGB(60,0,0),RGB(0,0,0),1,2,1){XG51};
DRAWKLINE(H,O,L,C){XG51};
低天:=15{XG51};
高天:=5{XG51};
CURR:=CURRBARSCOUNT{XG51};
高低:=DRAWLINE(CURR=高天,H,CURR=低天,L,0){XG51};
低高:=DRAWLINE(CURR=低天,L,CURR=高天,H,0){XG51};
高低线:=IF(高天>低天,高低,低高){XG51};
IF(CURR=高天,H,IF(CURR=低天,L,IF(CURR=ROUND((低天+高天)/2),高低线,DRAWNULL))),COLORAA00AA,crOSSDOT,LINETHICK3{XG51};
SH:=CONst(REF(H,BArslAST(CURR=高天))){XG51};
SL:=CONST(REF(L,BARSLAST(CURR=低天))){XG51};
高低距:=SH-SL{XG51};
天距:=Abs(低天-高天){XG51};
PR:=ABS(低天-高天)/2+IF(高天>低天,低天,高天){XG51};
RN:(SH+SL)/2{XG51};
Y弧:=(SH*SL){XG51};
BX:=2*(SH*SL)/天距{XG51};
BY:=(SH*SL)/高低距{XG51};
XW:=IF(CURR<PR,PR-CURR,CURR-PR)*BX{XG51};
SY:=IF(XW<Y弧,SQRT(Y弧*Y弧-XW*XW),0)/BY{XG51};
Y震谱1:=IF(高天<低天,RN+SY,RN-SY),COLORWHITE{XG51};
Y震谱2:=IF(高天<低天,RN-SY,RN+SY),COLORWHITE{XG51};
高点:HHV(Y震谱1,10){XG51};
XW11:IF(REF(Y震谱1,1)<高点,高点,高点),COLORBLUE{XG51};
Y弧1:=(SH*SL)/2{XG51};
BX1:=2*(SH*SL)/天距{XG51};
BY1:=(SH*SL)/高低距{XG51};
XW1:=IF(CURR<PR,PR-CURR,CURR-PR)*BX1{XG51};
SY1:=IF(XW<Y弧,SQRT(Y弧1*Y弧1-XW1*XW1),0)/BY1{XG51};
Y震谱3:=IF(高天<低天,RN+SY1,RN-SY1),COLORWHITE{XG51};
Y震谱4:=IF(高天<低天,RN-SY1,RN+SY1),COLORWHITE{XG51};
高点1:HHV(Y震谱3,10),COLORYELLOW{XG51};
XW111:IF(REF(Y震谱3,1)<高点1,高点1,高点1){XG51};
XG:=CROSS(C,高点) OR CROSS(C,高点1) AND V/REF(ma(V,5),1)>1.2{XG51};
DRAWTEXT(CURRBARSCOUNT<10 AND XG ,L,'▲圆弧突破'),COLORBLUE{X-G!5+1-C-N-{};