通达信天地支撑主图选股指标公式源码

通达信天地支撑主图选股指标公式源码

源码正文：

D:=33;T:=29;N:=3{XG51};
AA:=SUMBARS(vol,CAPITAL){XG51};
地量:=IF(CAPITAL=0,AMOUNT=LLV(AMOUNT,34),VOL<ma(VOL,AA)*D/100 AND VOL>0),NODRAW{XG51};
DLZZ1:REF(MAX(C*1.025,H),BArslAst(地量)),POINTDOT,COLORCYAN{XG51};
DLZZ2:REF(C,BARSLAST(地量)),COLORCYAN{XG51};
DLZZ3:REF(MIN(C*0.975,L),BARSLAST(地量)),POINTDOT,COLORCYAN{XG51};
STICKLINE(RANGE(C,DLZZ3,DLZZ1) OR RANGE(L,DLZZ3,DLZZ1),DLZZ3,DLZZ1,0.01,1),COLOR008800{XG51};
天量:IF(CAPITAL=0,AMOUNT=HHV(AMOUNT,34),VOL>MA(VOL,AA)*T/10 ),NODRAW{XG51};
TL: 天量 AND COUNT(天量,9)=1,NODRAW{XG51};
TLZZ1:REF(MAX(C*1.025,H),BARSLAST(TL)),POINTDOT,COLORWHITE{XG51};
TLZZ2:REF(C,BARSLAST(TL)),COLORWHITE{XG51};
TLZZ3:REF(MIN(L,C*0.975),BARSLAST(TL)),POINTDOT,COLORWHITE{XG51};
STICKLINE(RANGE(C,TLZZ3,TLZZ1) OR RANGE(L,TLZZ3,TLZZ1),TLZZ3,TLZZ1,0.01,1),COLOR0000FF{XG51};
天量反弹区:RANGE(C,TLZZ3,TLZZ1) OR RANGE(L,TLZZ3,TLZZ1),NODRAW,COLORWHITE{XG51};
地量反弹区:RANGE(C,DLZZ3,DLZZ1) OR RANGE(L,DLZZ3,DLZZ1),NODRAW,COLORCYAN{XG51};
天地共反:COUNT(天量反弹区,3) AND COUNT(地量反弹区,3),NODRAW{XG51};
牛股:COUNT(天地共反,N),NODRAW{XG51};
DRAWICON((C/TLZZ2>1.03)&& COUNT(天量反弹区,3) ,C*1.03,18){XG51};
DRAWICON((C/DLZZ2>1.03)&& COUNT(地量反弹区,3) ,C*1.03,19){XG51};
DRAWICON(C/MIN(REF(C,1),MIN(TLZZ1,DLZZ1))>1.1&&COUNT(天地共反,2),C*1.05,23){XG51};
DRAWKLINE(H,O,L,C){XG51};
DRAWICON(COUNT(TL,34)>0 AND crOSS(C,DLZZ2),C*0.85,25){XG51};
DRAWICON(COUNT(地量,34)>0 AND CROSS(C,DLZZ2),C*0.95,26){X_G~5_1_C_N_{};