通达信顶天立地选股指标公式源码

通达信顶天立地选股指标公式源码

源码正文：

顶天立地(不错的买卖指标附图)
立地、逢低买、明天涨、买、粉红色竖杆、股神向上勾为买入信号，
顶、向下信号及股神向下弯卖出信号，
目标出现为转向信号，股价低位为注意买入，股价高位为注意卖出。

VAR3:=ma(CLOSE,13){XG51};
VAR4:=100-Abs(((CLOSE-VAR3)/(VAR3))*(100)){XG51};
VAR5:=LLV(LOW,75){XG51};
VAR6:=HHV(HIGH,75){XG51};
VAR7:=(VAR6-VAR5)/(100){XG51};
VAR8:=SMA((CLOSE-VAR5)/(VAR7),20,1){XG51};
VAR9:=SMA((OPEN-VAR5)/(VAR7),20,1){XG51};
VARA:=(3)*(VAR8)-(2)*(SMA(VAR8,15,1)){XG51};
VARB:=(3)*(VAR9)-(2)*(SMA(VAR9,15,1)){XG51};
VARC:=100-VARB{XG51};
VARD:=(REF(LOW,1))*(0.89999997){XG51};
VARE:=(LOW)*(0.89999997){XG51};
VAR11:=CLOSE-REF(CLOSE,1){XG51};
VAR12:=MAX(VAR11,0){XG51};
VAR13:=ABS(VAR11){XG51};
VAR14:=((SMA(VAR12,7,1))/(SMA(VAR13,7,1)))*(100){XG51};
VAR15:=((SMA(VAR12,13,1))/(SMA(VAR13,13,1)))*(100){XG51};
VAR16:=BARSCOUNT(CLOSE){XG51};
VAR17:=((SMA(MAX(VAR11,0),6,1))/(SMA(ABS(VAR11),6,1)))*(100){XG51};
VAR18:=(((-200))*(HHV(HIGH,60)-CLOSE))/(HHV(HIGH,60)-LLV(LOW,60))+100{XG51};
VAR19:=((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15)))*(100){XG51};
VAR1A:=SMA((SMA(VAR19,4,1)-50)*(2),3,1){XG51};
VAR1B:=((INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14)))*(100){XG51};
VAR1C:=SMA(VAR1B,4,1){XG51};
VAR1D:=SMA(VAR1C,3,1){XG51};
VAR1E:=((HHV(HIGH,30)-CLOSE)/(CLOSE))*(100){XG51};
VAR1F:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100){XG51};
VAR20:=REVERSE(VAR1F){XG51};
VAR21:=SMA(VAR1F,3,1){XG51};
趋势:SMA(VAR21,3,1),COLOR0000FF,LINETHICK2{XG51};
人气:SMA(趋势,3,1),COLORBLUE,LINETHICK2{XG51};
出击:IF(crOSS(趋势,人气) AND (趋势<30),20,0),COLOR0000FF,LINETHICK2{XG51};
DRAWTEXT(CROSS(趋势,人气) AND 趋势<30,25,'立地 '),COLORRED{XG51};
短卖:IF(CROSS(人气,趋势) AND (人气>75),85,100),COLOR008000,LINETHICK3;

DRAWTEXT(CROSS(趋势, 人气) AND REF(人气,1)>80, REF(人气,3), '顶'),COLORWHITE,LINETHICK5{XG51};
逢低买:DRAWTEXT(REF(CROSS(趋势,人气),82) AND 人气>1.3*趋势,85,'逢低买'),LINETHICK1{XG51};
买: DRAWTEXT(REF(CROSS(趋势,人气),1) AND 趋势>1.3*人气,85,'买'),COLORWHITE,LINETHICK1{XG51};
DRAWTEXT(CROSS(趋势,人气),人气,'★'),COLORWHITE{XG51};
AA:=LLV(LOW,36){XG51};
BB:=HHV(HIGH,30){XG51};
云:=80,COLORFF00FF{XG51};
天:=87.5,COLOR00FF00{XG51};
DD:=(ema(((CLOSE-AA)/(BB-AA))*(4),4))*(25){XG51};
股神:DD,COLORLIGREEN,LINETHICK1{XG51};
stICKLINE(CROSS(股神,趋势),40,65,0.2,0),COLORLIMAGENTA{XG51};
DRAWICON(CROSS(股神,天) AND 人气<云,95,2),COLORRED{XG51};
股海:=(((DD-LLV(DD,21))/(HHV(DD,21)-LLV(DD,21)))*(4))*(25){XG51};
目标出现:IF(CROSS(股海,90) AND (股神<40),70,0),COLORFFFF00{XG51};
DRAWTEXT(CROSS(股海,90) AND (股神<40),70,'注意'),COLORWHITE{XG51};
跟踪:=10,COLOR0000FF{XG51};
神偷出现:IF((COUNT((股神>REF(股神,1)),1)=1) AND (REF(股神,1)<REF(REF(股神,1),1)) AND (股神<跟踪),50,0),COLORF00FF0;

RSV:=(((CLOSE - LLV(LOW,29)) / (HHV(HIGH,29) - LLV(LOW,29))) * 100){XG51};
K:=MA(RSV,5){XG51};
D:=MA(K,2){XG51};
J:=((3 * K) - (2 * D)){XG51};
明天涨:IF((J < 5),50,0),COLORLIMAGENTA{XG51};
DRAWTEXT((J < 5),60,'明天涨'),COLORWHITE{XG51};
V11:=LLV(LOW,10){XG51};
V12:=HHV(H,25){XG51};
价位线:=EMA((C-V11)/(V12-V11)*4,4){XG51};
DRAWTEXT(CROSS(价位线,0.3),20+4,'●买'),COLORWHITE;

RSVV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*1{XG51};
KK:=SMA(RSVV,9,1){XG51};
DDD:=SMA(KK,3,1){XG51};
R2:=BArslAST(REF(CROSS(DDD,KK),1)){XG51};
TJ:=(DDD-REF(DDD,1))>0{XG51};
TJ1:=(DDD-REF(DDD,1))<0{XG51};
MR:=CROSS(KK,DDD) AND DDD<25{XG51};
MC:=CROSS(DDD,KK) AND DDD>75{XG51};
DRAWTEXT(MR,20,'买'),COLORWHITE{XG51};
DRAWTEXT(MC,90,'卖'),COLORCYAN{X_G.5~1_C_N_{};