通达信近期顶底主图未加密选股指标公式源码

源码正文：

N:=150;判断高低:=3;
高:=REF(HHV(H,N),判断高低);
近期顶:REFDATE(高,DATE),COLORCYAN,LINETHICK3{XG51};
最顶:=REFDATE(近期顶,DATE),NODRAW{XG51};
出:=最顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW{XG51};
stICKLINE(出,C,O,3,0),COLORCYAN{XG51};
STICKLINE(出,C,O,2,0),COLORCYAN{XG51};
低:=REF(LLV(L,N),判断高低){XG51};
近期底:REFDATE(低,DATE),COLORWHITE,LINETHICK3{XG51};
最底:=REFDATE(近期底,DATE),NODRAW{XG51};
进:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW{XG51};
STICKLINE(进,C,O,3,0),COLORWHITE{XG51};
STICKLINE(进,C,O,2,0),COLORWHITE{X-G-5+1-C-N-{};

源码正文：

A:=PERIOD{XG51};
N:=IF(A=0,1,IF(A=1,5,IF(A=2,15,IF(A=3,30,IF(A=4,60,IF(A=5,240,DRAWNULL)))))){XG51};
M:=IF(N=1,IF(MOD(FROMOPEN,1)=0,1,
MOD(FROMOPEN,1)),IF(N=5,IF(MOD(FROMOPEN,5)=0,5,
MOD(FROMOPEN,5)),IF(N=15,IF(MOD(FROMOPEN,15)=0,15,
MOD(FROMOPEN,15)),IF(N=30,IF(MOD(FROMOPEN,30)=0,30,
MOD(FROMOPEN,30)),IF(N=60,IF(MOD(FROMOPEN,60)=0,60,
MOD(FROMOPEN,60)),IF(N=240,FROMOPEN,DRAWNULL)))))){XG51};
现量:vol,NODRAW{XG51};
虚拟:IF(CURRBARSCOUNT=0,V*N/M,DRAWNULL),NODRAW,COLORFFFF00{XG51};
stICKLINE(CURRBARSCOUNT=0 AND N,虚拟,0,10,-1),COLORFFFF00{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,10,0),COLOR0099FF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,8,0),COLOR11AAFF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,6,0),COLOR22BBFF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,4.2,0),COLOR33CCFF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,3.3,0),COLOR44ddfF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,2.2,0),COLOR55EEFF{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,0.6,0),COLOR66FFFF{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,10,0),COLOR880000{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,8,0),COLOR991100{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,6,0),COLORAA2200{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,4.2,0),COLORBB3300{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,3.3,0),COLORCC4400{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,2.2,0),COLORDD5500{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,1.2,0),COLOREE6600{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,0.6,0),COLORFF7700{X^G_5~1^C^N^{};