通达信喝一杯未加密选股指标公式源码

源码正文：

AA:=CLOSE > REF(CLOSE, 1) AND REF(CLOSE, 1) > REF(CLOSE, 2) AND REF(CLOSE, 1) < REF(CLOSE, 3) AND IF(REF(CLOSE, 3) < REF(CLOSE, 4), 1, IF(REF(CLOSE, 4) < REF(CLOSE, 5),REF(CLOSE, 1) < REF(CLOSE, 4) OR( REF(CLOSE, 2) < REF(CLOSE, 4) AND REF(CLOSE, 3) >= REF(CLOSE, 5) ),IF(REF(CLOSE, 5) < REF(CLOSE, 6), 1,REF(CLOSE, 6) < REF(CLOSE, 7)))){XG51};
BB:=CLOSE < REF(CLOSE, 1) AND REF(CLOSE, 1) < REF(CLOSE, 2) AND REF(CLOSE, 1) > REF(CLOSE, 3) AND IF(REF(CLOSE, 3) > REF(CLOSE, 4), 1, IF(REF(CLOSE, 4) > REF(CLOSE, 5),REF(CLOSE, 1) > REF(CLOSE, 4) OR( REF(CLOSE, 2) > REF(CLOSE, 4) AND REF(CLOSE, 3) <= REF(CLOSE, 5) ),IF(REF(CLOSE, 5) > REF(CLOSE, 6), 1,REF(CLOSE, 6) > REF(CLOSE, 7)))){XG51};
送酒:AA AND CLOSE>REF(OPEN,2){XG51};
stICKLINE(送酒>0,93,80,30,0),COLOR008899{XG51};
STICKLINE(送酒>0,93,80,26,0),COLOR1199AA{XG51};
STICKLINE(送酒>0,93,80,22,0),COLOR22AABB{XG51};
STICKLINE(送酒>0,93,80,18,0),COLOR33BBCC{XG51};
STICKLINE(送酒>0,93,80,14,0),COLOR44CCDD{XG51};
STICKLINE(送酒>0,93,80,10,0),COLOR55ddeE{XG51};
STICKLINE(送酒>0,93,80,6,0),COLOR66EEEE{XG51};
STICKLINE(送酒>0,93,80,2,0),COLOR77FFEE{XG51};
STICKLINE(送酒>0,100,93,40,0),COLOR008899{XG51};
STICKLINE(送酒>0,100,93,35,0),COLOR1199AA{XG51};
STICKLINE(送酒>0,100,93,30,0),COLOR22AABB{XG51};
STICKLINE(送酒>0,100,93,25,0),COLOR33BBCC{XG51};
STICKLINE(送酒>0,100,93,20,0),COLOR44CCDD{XG51};
STICKLINE(送酒>0,100,93,15,0),COLOR55DDEE{XG51};
STICKLINE(送酒>0,100,93,10,0),COLOR66EEEE{XG51};
STICKLINE(送酒>0,100,93,5,0),COLOR77FFEE{XG51};
STICKLINE(送酒>0,80,0,80,0),COLOR008899{XG51};
STICKLINE(送酒>0,80,0,70,0),COLOR1199AA{XG51};
STICKLINE(送酒>0,80,0,60,0),COLOR22AABB{XG51};
STICKLINE(送酒>0,80,0,50,0),COLOR33BBCC{XG51};
STICKLINE(送酒>0,80,0,40,0),COLOR44CCDD{XG51};
STICKLINE(送酒>0,80,0,30,0),COLOR55DDEE{XG51};
STICKLINE(送酒>0,80,0,20,0),COLOR66EEEE{XG51};
STICKLINE(送酒>0,80,0,10,0),COLOR77FFEE{XG51};
STICKLINE(送酒>0,23,13,60,1),COLORmaGENTA{XG51};
STICKLINE(送酒>0,72,35,60,1),COLORLIMAGENTA{X.G!5_1.C.N.{};

源码正文：

N:=180{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:(TYP-ma(TYP,N))/(0.015*AVEDEV(TYP,N)){XG51};
底:IF(CCI<-200,CCI,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
stICKLINE(CCI<-150,-150,CCI,5,0),COLOR33CCFF{XG51};
STICKLINE(CCI<-200,-200,CCI,5,0),COLORWHITE{X?G^5-1?C?N?{};