AA:=MA((2*CLOSE+HIGH+LOW)/4,5);
短顶:AA*13/100,LINETHICK1;
短底:AA*(200-13)/100,LINETHICK1,COLORFF00FF;
DRAWTEXT(CURRBARSCOUNT=1,短底,'__短底'),COLORFF00FF;
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
中顶:(1+7/100)*DD,LINETHICK1,COLORFF9150;
中底:(1-7/100)*DD,LINETHICK1,COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,中顶,'__中顶'),COLORFF9150;
DRAWTEXT(CURRBARSCOUNT=1,中底,'__中底'),COLORYELLOW;
VAR4X:=EXPMA(CLOSE,9);
长底:EXPMA(VAR4X*0.86,5),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,长底,'__长底'),COLORGREEN;
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0 AND HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0 AND LD>HD,LD,0),14);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,13);
ADXR:=EXPMEMA(ADX,13);
TYP:=(HIGH+LOW+CLOSE)/3;
CCIA:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
DRAWTEXT(CROSS(MDI,25),L,'★信号'),COLORYELLOW;
跌穿中轨:=O<短底 AND O<中底 AND O>长底;
跌穿长规:=O<长底;
红K线:=C>O;
带上下影线:=H>O AND H>C AND L<O AND L<C;
山包:=ADX>60;
低位拐弯:=CCIA<-10 AND CCIA-REF(CCIA,1)>1;
DRAWTEXT(跌穿中轨 AND 红K线 AND 低位拐弯,L,'___¥小金币'),COLORMAGENTA;
DRAWTEXT(跌穿长规 AND 红K线 AND 低位拐弯,L,'___$大金币'),COLORRED;