N:=50; M1:=10; M2:=20; M3:=60; VARX:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; VARY:=(HIGH-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; VARZ:=(LOW-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; VARXS:=SMA(VARX,M1,1); VARYS:=SMA(VARY,M1,1); VARZS:=SMA(VARZ,M1,1); VARXSS:=SMA(VARXS,M2,1); VARYSS:=SMA(VARYS,M2,1); VARZSS:=SMA(VARZS,M2,1); VAR1:4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,M1,1)- 3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,M1,1),M2,1),COLORYELLOW,LINETHICK1; 最大:4*((VARY+(M1-1)*REF(VARYS,1))/M1)-3*((((VARY+(M1-1)*REF(VARYS,1))/M1)+(M2-1)*REF(VARYSS,1))/M2),COLORLIRED,LINETHICK1; 最小:4*((VARZ+(M1-1)*REF(VARXS,1))/M1)-3*((((VARZ+(M1-1)*REF(VARXS,1))/M1)+(M2-1)*REF(VARXSS,1))/M2),COLORLIGREEN,LINETHICK1; VAR2:8,COLORGREEN; 准备拉升: IF(CROSS(最小,VAR2),80,0),STICK,COLORWHITE,LINETHICK2; 压住庄家: IF(VAR1<=8,0,0),STICK,COLORWHITE,LINETHICK1; DRAWTEXT(CROSS(VAR1,VAR2),5,'建仓'),COLORCYAN; VARO5:=LLV(LOW,27); VARO6:=HHV(HIGH,34); VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25; DIFS:=EMA(CLOSE,N*2); DIFL:=EMA(CLOSE,N*4); DIF:=DIFS-DIFL,COLORWHITE; DEA:=EMA(DIF,M3),COLORYELLOW; MACD:=(DIF-DEA)*2,COLORSTICK; { IF DIF>=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF>=DEA THEN 建仓区:100 ,COLORYELLOW,LINETHICK1; IF DIF<=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF>=DEA THEN 建仓区:85 ,COLORYELLOW,LINETHICK1; IF DIF<=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF<=DEA THEN 建仓区:80 ,COLORYELLOW,LINETHICK1; IF DIF>=REF(DIF,1) AND DEA>=REF(DEA,1) AND DIF<=DEA THEN 建仓区:85 ,COLORYELLOW,LINETHICK1; IF DIF<=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF>=DEA THEN 建仓区:70 ,COLORYELLOW,LINETHICK1; IF DIF>=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF>=DEA THEN 建仓区:80 ,COLORYELLOW,LINETHICK1; IF DIF<=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF<=DEA THEN 建仓区:60 ,COLORYELLOW,LINETHICK1; IF DIF>=REF(DIF,1) AND DEA<=REF(DEA,1) AND DIF<=DEA THEN 建仓区:85 ,COLORYELLOW,LINETHICK1; } 100,COLOR555555; 85,COLOR555555; 80,COLOR555555; 70,COLOR555555; 60,COLOR555555;
DRAWTEXT(最小< 15 AND 最小>=-5 AND (CLOSE-REF(CLOSE,1))/CLOSE<=(VAR1-REF(VAR1,1))/VAR1 AND MA(CLOSE,N*2)>=REF(MA(CLOSE,N*2),1),最小,'备');