| 天狼剑副图: B1:=MA(C,1); B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1); SMA2:=MA(B2,3); 停损下限:IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2); IF(B2>SMA2,B2,DRAWNULL),colorred,LINETHICK4; IF(B2<SMA2,B2,DRAWNULL),colorgreen,LINETHICK4; SNAKEA:HHV(MA(B2,1),13),coloryellow; VAR1A:=(2*CLOSE+HIGH+LOW)/4; VAR2A:=MA(VAR1A,7); VAR3A:=VAR2A-MA(VAR1A,7/2)<0; VAR4A:=VAR2A-MA(VAR1A,7/2)>0; VAR5A:=BARSLAST(VAR3A); VAR6A:=0-BARSLAST(VAR4A); VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A); STICKLINE(SNAKEA>B2 AND B2>SMA2,SNAKEA,B2,0,0),COLORFFFF00; STICKLINE(SNAKEA>SMA2 AND B2<SMA2,SNAKEA,SMA2,0,0),COLORFFFF00; VAR11A:=(CLOSE*2+HIGH+LOW)/4; VAR21A:=EMA(VAR11A,13)-EMA(VAR11A,34); VAR31A:=EMA(VAR21A,5); VAR2:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))); VAR3:=((REF(VAR2,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR4:=((REF(VAR3,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR5:=((REF(VAR4,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR6:=((REF(VAR5,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR7:=((REF(VAR6,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR8:=((REF(VAR7,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR9:=((REF(VAR8,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VARA:=((REF(VAR9,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VARB:=((REF(VARA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VARC:=((REF(VARB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VARD:=((REF(VARC,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VARE:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))); VARF:=((REF(VARE,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR10:=((REF(VARF,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR11:=((REF(VAR10,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR12:=((REF(VAR11,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR13:=((REF(VAR12,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR14:=((REF(VAR13,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR15:=((REF(VAR14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR16:=((REF(VAR15,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR17:=((REF(VAR16,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR18:=((REF(VAR17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR19:=((REF(VAR18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR1B:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2); {STICKLINE(VAR1B,O,O+(C-O)/3,3,0),COLOR10D0FF;} STICKLINE(VAR1B,O,O+(C-O)/3,2,0),COLOR10FFFF; STICKLINE(VAR1B,O,O+(C-O)/3,1,0),COLOR00FFFF; AA:=(REF((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),1) AND VARE); {STICKLINE(AA,O,O+(C-O)/3,3,0),COLOR00DD00;} STICKLINE(AA,O,O+(C-O)/3,2,0),COLOR00EE00; STICKLINE(AA,O,O+(C-O)/3,1,0),COLOR00FF00; A13:=EMA(CLOSE,55); A14:=MA(CLOSE,75); A15:=EMA(A14,3); A16:=EMA(A15,3); A17:=(HIGH + LOW) / 5; A18:=(MA(A17,4)) - (MA(A17,34)); A19:=CROSS(A18,0); A20:=CROSS(0,A18); A21:=BARSLAST(A19); A22:=BARSLAST(A20); A23:=REF(A19,1); A24:=REF(A20,1); A25:=BARSLAST(A23); A26:=BARSLAST(A24); A27:=IF((A25 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26))); A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < A22); A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21); A30:=A28 AND ((COUNT(A28,A21)) = 1); A31:=A29 AND ((COUNT(A29,A22)) = 1); A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),1))); A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1))); DRAWTEXT(A32,SMA2*0.99,'←═≒∝'),coloryellow; AC:=AMOUNT/(VOL); YY:=MA(AC,13); LLL:=(C-YY)/YY*100; MIDC := MA(CLOSE,22); UPPERC:= MIDC + 2*STD(C,22); LOWERC:= MIDC - 2*STD(C,22); BBA:=(C-LOWERC)/(UPPERC-LOWERC); BBC:=FORCAST(BBA,3); LIFENGCYC:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1)); STICKLINE(LIFENGCYC>0,C,O,2,0),COLOR10ABFF; DRAWTEXT(LIFENGCYC>0,LOW*0.99,'☆'),COLORDD00DD; {}; 徐小明老师的定量结构(顶尖财经 股票学院: http://58188.com): DIF:100*(EMA(CLOSE,12)-EMA(CLOSE,26)); DEA:EMA(DIF,9); MACD:(DIF-DEA)*2,COLORSTICK; //{底部结构预警} 死叉:=CROSS(DEA,DIF); N1:BARSLAST(死叉),NODRAW;//{最近一次死叉的位置---最近一次死叉到当前位置的单位数量} N2:REF(BARSLAST(死叉),N1+1),NODRAW;//{倒数第二次死叉与倒数第一次死叉的区间--2次死叉间的单位数量} N3:REF(BARSLAST(死叉),N2+N1+2),NODRAW;//{倒数第三次死叉与倒数第二次死叉的区间--2次死叉间的单位数量} CL1:=LLV(C,N1+1),NODRAW;//{最近一次死叉后，最低收盘价} DIFL1:=LLV(DIF,N1+1),NODRAW; //{最近1死叉后，最低DIF} CL2:=REF(CL1,N1+1),NODRAW;//{倒数第二次死叉与倒数第一次死叉之间的最低收盘价} DIFL2:=REF(DIFL1,N1+1),NODRAW; //{倒数2死叉与倒数1死叉之间的最低DIF} CL3:=REF(CL2,N1+1),NODRAW;//{倒数第三次死叉与倒数第二次死叉之间的最低收盘价} DIFL3:=REF(DIFL2,N1+1),NODRAW; //{倒数3死叉与倒数2死叉之间的最低DIF} PDIFL2:=IF(DIFL2>0,INTPART(LOG(DIFL2))-1,INTPART(LOG(-DIFL2))-1); MDIFL2:=INTPART(DIFL2/POW(10,PDIFL2)); PDIFL3:=IF(DIFL3>0,INTPART(LOG(DIFL3))-1,INTPART(LOG(-DIFL3))-1); MDIFL3:=INTPART(DIFL3/POW(10,PDIFL3)); MDIFB2:=INTPART(DIF/POW(10,PDIFL2)); MDIFB3:=INTPART(DIF/POW(10,PDIFL3)); 直接底背离:=(CL1<CL2 ) AND (MDIFB2>MDIFL2) AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB2<=REF(MDIFB2,1); 隔峰底背离:=(CL1<CL3 ) AND (MDIFB3>MDIFL3) AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB3<=REF(MDIFB3,1); B:直接底背离 OR 隔峰底背离,NODRAW;//www.70822.com BG:((MDIFB2>REF(MDIFB2,1))*REF(直接底背离,1)) OR ((MDIFB3>REF(MDIFB3,1))*REF(隔峰底背离,1)),NODRAW; 底背离消失:=(REF(直接底背离,1) AND DIFL1<=DIFL2 ) OR (REF(隔峰底背离,1) AND DIFL1<=DIFL3); STICKLINE(B OR BG,DIF,DEA,8,0),colorred; //{划线标识钝化状态} DRAWTEXT((B AND COUNT(B,2)=1),(DIF*1.5),'钝化'),coloryellow; DRAWTEXT(FILTER(BG,10),DIF*1.5,'底部结构'),colormagenta; DRAWTEXT(FILTER(BG,10) AND MACD<=0,DIF*1.2,'MACD<0,成功率高'),colormagenta; DRAWTEXT(FILTER(底背离消失,10),(DIF+MACD),'消失'),colorgreen; STICKLINE(BG,0,DIF+DEA,5,0), colorred; //{顶部结构预警} 金叉:=CROSS(DIF,DEA); M1:=BARSLAST(金叉),NODRAW;//{最近一次金叉的位置} M2:=REF(BARSLAST(金叉),M1+1),NODRAW;//{倒数第二次金叉与倒数第一次金叉的区间} M3:=REF(BARSLAST(金叉),M2+M1+2),NODRAW;//{倒数第三次金叉与倒数第二次金叉的区间} CH1:=HHV(C,M1+1),NODRAW;//{最近一次金叉后，最高收盘价} DIFH1:=HHV(DIF,M1+1),NODRAW; CH2:=REF(CH1,M1+1),NODRAW;//{倒数第二次金叉与倒数第一次金叉之间的最高收盘价} DIFH2:=REF(DIFH1,M1+1),NODRAW; CH3:=REF(CH2,M1+1),NODRAW;//{倒数第三次金叉与倒数第二次金叉之间的最高收盘价} DIFH3:=REF(DIFH2,M1+1),NODRAW; PDIFH2:=IF(DIFH2>0,INTPART(LOG(DIFH2))-1,INTPART(LOG(-DIFH2))-1); MDIFH2:=INTPART(DIFH2/POW(10,PDIFH2)); PDIFH3:=IF(DIFH3>0,INTPART(LOG(DIFH3))-1,INTPART(LOG(-DIFH3))-1); MDIFH3:=INTPART(DIFH3/POW(10,PDIFH3)); MDIFT2:=INTPART(DIF/POW(10,PDIFH2)); MDIFT3:=INTPART(DIF/POW(10,PDIFH3)); 直接顶背离:=(CH1>CH2 ) AND (MDIFT2<MDIFH2) AND (MACD>0 AND REF(MACD,1)>0) AND MDIFT2>=REF(MDIFT2,1); 隔峰顶背离:=(CH1>CH3) AND (MDIFT3<MDIFH3) AND (MACD>0 AND REF(MACD,1)>0) AND MDIFT3>=REF(MDIFT3,1); T:=直接顶背离 OR 隔峰顶背离,NODRAW; TG:=((MDIFT2<REF(MDIFT2,1))*REF(直接顶背离,1)) OR ((MDIFT3<REF(MDIFT3,1))*REF(隔峰顶背离,1)),NODRAW; 顶背离消失:=(REF(直接顶背离,1) AND DIFH1>=DIFH2 ) OR (REF(隔峰顶背离,1) AND DIFH1>=DIFH3); STICKLINE(TG,0,DIF+DEA,5,0), colorgreen; STICKLINE(T OR TG,DIF,DEA,8,0),colorgreen; DRAWTEXT(FILTER(TG,20),DIF*1.4,'顶部结构'),colorgreen; DRAWTEXT(FILTER(TG,20) AND MACD>=0,DIF*1.7,'MACD>=0,成功率高'),colorgreen; DRAWTEXT(FILTER(顶背离消失,20),(DIF+MACD),'消失'),colorgreen; |