短线波段 ZGMJ

AA:=REF(CLOSE,1);
BBB:=SMA(MAX(CLOSE-AA,0),21,1)/SMA(ABS(CLOSE-AA),21,1)*1000;
HHH:=BBB-LLV(BBB,27);
CCC:=LLV(BBB,27)-BBB;
QQ:(MA(HHH,2)*3+HHH*13)/16,COLORRED,LINETHICK2;
SS:(MA(CCC,2)*3+CCC*13)/16,COLORFF00FF,LINETHICK1;
GG:MA(HHH,5),LINETHICK2,COLORGREEN;
MM:MA(CCC,5),LINETHICK1,COLORGREEN;
WW:IF(QQ<GG ,SS,MM),LINETHICK1, COLORCYAN;
EE:IF(SS<MM ,GG,QQ),COLORFFFFCC,LINETHICK1;
S:0,COLORRED;
买:IF(EE-WW<5.6,100,0),LINETHICK2;
DRAWICON(EE-WW<5.6,60,23);

B1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100- 70;
B2:=SMA(B1,9,1)+100;
B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
B7:=IF(B6>60,B6-60,0);
TJ01:=LAST(B7<REF(B7,1),5,1);
TJ02:=REF(B7,1)<B7;
TJ:=TJ01 AND TJ02;
STICKLINE(TJ,0,50,4,0),COLOR0000FF;
SL1:=LAST(B7>REF(B7,1),5,1);
SL2:=REF(B7,1)>B7;
SL:=SL1 AND SL2;
STICKLINE(SL,0,-50,4,0),COLOR00FF00;