通达信组合回调支撑，高抛低吸，止盈止损主图

n 20 1000 72
m 200 3000 1357
p1 1 1000 151
p2 1 1000 14
p3 1 1000 318
p4 1 1000 453
p5 1 1000 99
p6 1 1000 48
{回调预测-M=200-1000-738}
高:=REF(HHV(H,N),3);
顶:REFDATE(高,DATE),COLORWHITE;
Z1:REFDATE(高/1.0809,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z2:REFDATE(高/1.1618,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z3:REFDATE(高/1.2558,DATE),POINTDOT,LINETHICK1,COLORMAGENTA;
Z4:REFDATE(高/1.4589,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z5:REFDATE(高/1.5770,DATE),POINTDOT,LINETHICK1,COLORRED;
{Z6:REFDATE(高/1.8322,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z7:REFDATE(高/1.9804,DATE),POINTDOT,LINETHICK1,COLORGREEN;
Z8:REFDATE(高/2.3008,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z9:REFDATE(高/2.4870,DATE),POINTDOT,LINETHICK1,COLORWHITE;}
Z:REFDATE(高/(M/1000),DATE),LINETHICK4,COLORYELLOW;
支:REFDATE(高/(M/1000),DATE),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR,顶,'顶'),COLORWHITE;
DRAWTEXT(ISLASTBAR,Z1,'8.09'),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z2,'16.18'),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z3,'25.58'),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z4,'45.98'),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z5,'57.7'),COLORGREEN;
{DRAWTEXT(ISLASTBAR,Z6,'83.22'),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z7,'98.04'),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z8,'130.08'),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z9,'148.7'),COLORGREEN;}
DRAWKLINE(H,O,L,C);

五日线:MA(CLOSE,30);
月线:MA(CLOSE,5);
半年线:MA(CLOSE,30);
年线:MA(CLOSE,250);
VAR1:=(2*CLOSE+HIGH+LOW)/4;
VAR2:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR3:=LLV(LOW,5);
VAR4:=HHV(HIGH,4);
散户:=EMA((VAR1-VAR3)/(VAR4-VAR3)*100,4)*VAR2;
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR2;
DRAWTEXT(CROSS(散户,庄家) AND 散户<47,L-0.05,'←低吸'),COLORLIRED;
DRAWTEXT(CROSS(庄家,散户) AND 散户>60,H+0.05,'←高抛'),COLOR80FF00;
DRAWICON(CROSS(散户,庄家) AND 散户<47,L-0.05,1);
DRAWICON(CROSS(庄家,散户) AND 散户>60,H+0.05,2);
市场成本:DMA(AMOUNT/V/100,V/CAPITAL),NODRAW;
操盘成本:(MA(C,30)+MA(C,72))/2,COLORRED;
市盈率:DYNAINFO(39),COLORFF00FF,NODRAW;
TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
STICKLINE(TJ,OPEN,CLOSE,1.5,0),COLORFF00FF;
量＿价:=1;CTKG:=1;
W:=量＿价;
EPSL:=0.0001;
ZZ:=(C+H+L)/3;
TJA:=ZZ>=MAX(C,O) AND CTKG=1;{倒锤头};
TJB:=ZZ<=MIN(C,O