黑码早盘出击的源码: ******************************************************** RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100); K:SMA(RSV,3,1); D:SMA(K,3,1); J:=((3 * K) - (2 * D)); KK:=INTPART(SMA(RSV,3,1)); DD:=INTPART(SMA(K,3,1)); JJ:=INTPART(((3 * K) - (2 * D))); N:=(KK + DD); KX:=(N < 25); KX1:=REF(KX,29); XX:=(N < 18); XX1:=REF(XX,31); XXX:=(N < 23); XXX1:=REF(XXX,198); KP:=((KX1 OR XX1) OR XXX1); KA1:=(((REF(CLOSE,2) / REF(OPEN,2)) < 0.95) AND (REF(CLOSE,2) < REF(CLOSE,3))); KA2:=(((REF(OPEN,1) < REF(CLOSE,2)) AND (REF(CLOSE,1) > REF(CLOSE,2))) AND (REF(CLOSE,1) > ((REF(CLOSE,2) + REF(OPEN,2)) / 2))); KA3:=(CLOSE > REF(CLOSE,1)); KA4:=(LLV(LOW,13) = REF(LOW,1)); KP2:=(COUNT((((KA1 AND KA2) AND KA3) AND KA4),3) > 0); KP3:=CROSS((-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))),80); KD:=(N < 45); KD1:=(((((REF(KD,180) OR REF(KD,179)) OR REF(KD,31)) OR REF(KD,29)) OR REF(KD,13)) OR REF(KD,11)); KP4:=((KP2 AND KP3) AND KD1); DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); DEA:=EMA(DIFF,9); KP5:=2*(DIFF-DEA); KD2:=((((REF(KD,180) OR REF(KD,261)) OR REF(KD,98)) OR REF(KD,77)) OR REF(KD,1)); KP6:=((KP2 AND KP5) AND KD2); KP7:=(N < 34); KP8:=REF(KP7,11); KP9:=(N < 45); KP10:=((REF(KP9,83) AND KP8) AND KP2); KP11:=(N < 38); KP12:=((REF(KP11,19) AND REF(KP11,32)) AND KP2); KP13:=((REF(KP9,28) AND REF(KP11,101)) AND KP2); KP14:=(N < 43); KP15:=((REF(KP14,28) AND REF(KP14,189)) AND KP2); I:=((((((REF(CLOSE,2) / REF(OPEN,2)) < 0.95) AND (REF(OPEN,1) < REF(CLOSE,2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) / REF(CLOSE,1)) < 0.03)) AND ((CLOSE / OPEN) > 1.05)) AND (CLOSE > REF(CLOSE,2))); I1:=2*(DIFF-DEA); T3:=(N < 40); T4:=((REF(T3,34) OR REF(T3,28)) OR REF(T3,57)); KP16:=((I AND I1) AND T4); 逃顶线:90,COLORGREEN; 中轴线:50,COLORRED; 抄底线:10,COLORGREEN; 黑码出击:IF(KP AND KP2 OR KP4 OR KP6 OR KP10 OR KP12 OR KP13 OR KP15 OR KP16,100,10),COLORGREEN; ******************************************************** 美人如玉剑如虹:源码 ******************************************************** 明月照积雪:源码RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100; RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100; J0:=(HIGH+LOW)/2; QJ:=EMA(J0,3); J1:=IF(CLOSE>QJ,VOL,0); J2:=IF(CLOSE<QJ,VOL,0); 明月:MA(SUM(J1-J2,22),3),COLOR00DDDD,NODRAW; 累加:=21*明月+20*REF(明月,1)+19*REF(明月,2)+18*REF(明月,3)+17*REF(明月,4)+16*REF(明月,5)+15*REF(明月,6)+14*REF(明月,7)+13*REF(明月,8)+12*REF(明月,9)+11*REF(明月,10)+10*REF(明月,11)+9*REF(明月,12)+8*REF(明月,13)+7*REF(明月,14)+6*REF(明月,15)+5*REF(明月,16)+4*REF(明月,17)+3*REF(明月,18)+2*REF(明月,19)+REF(明月,20); WMA:=累加/(21+1)/21*2; 积雪:WMA,COLOR008800,NODRAW; VAR3:=(明月-积雪);VAR4:=SMA(RV,3,1); VAR5:=SMA(VAR4,3,1); STICKLINE(VAR3>0,100,50,3,0),COLOR990099; STICKLINE(VAR3<0,0,50,3,0),COLOR008800; KK:EMA(SMA(RG,3,1),2),COLORFFFFFF;DD:SMA(KK,3,1),COLOR00FFFF; DRAWTEXT(CROSS(VAR4,VAR5) AND CROSS(KK,DD),10,'明月照积雪'),COLOR00FFFF; STICKLINE(CROSS(VAR4,VAR5) AND CROSS(KK,DD),0,100,1,0),COLORMAGENTA; STICKLINE(VAR4<VAR5,VAR4,VAR5,2,0),COLORFF8800; STICKLINE(VAR4>VAR5,VAR5,VAR4,2,0),COLOR0000BB; DRAWICON(CROSS(VAR4,VAR5) AND VAR5<30,2,1); DRAWICON(CROSS(VAR5,VAR4) AND VAR5>30,97,2); 明月照积雪:CROSS(VAR4,VAR5) AND CROSS(KK,DD),NODRAW,COLORMAGENTA; 买:CROSS(VAR4,VAR5) AND VAR5<30,NODRAW,COLORRED;******************************************************** 黑码早盘出击(选股¥预警公式)RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100); K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=((3 * K) - (2 * D)); KK:=INTPART(SMA(RSV,3,1)); DD:=INTPART(SMA(K,3,1)); JJ:=INTPART(((3 * K) - (2 * D))); N:=(KK + DD); KX:=(N < 25); KX1:=REF(KX,29); XX:=(N < 18); XX1:=REF(XX,31); XXX:=(N < 23); XXX1:=REF(XXX,198); KP:=((KX1 OR XX1) OR XXX1); KA1:=(((REF(CLOSE,2) / REF(OPEN,2)) < 0.95) AND (REF(CLOSE,2) < REF(CLOSE,3))); KA2:=(((REF(OPEN,1) < REF(CLOSE,2)) AND (REF(CLOSE,1) > REF(CLOSE,2))) AND (REF(CLOSE,1) > ((REF(CLOSE,2) + REF(OPEN,2)) / 2))); KA3:=(CLOSE > REF(CLOSE,1)); KA4:=(LLV(LOW,13) = REF(LOW,1)); KP2:=(COUNT((((KA1 AND KA2) AND KA3) AND KA4),3) > 0); KP3:=CROSS((-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))),80); KD:=(N < 45); KD1:=(((((REF(KD,180) OR REF(KD,179)) OR REF(KD,31)) OR REF(KD,29)) OR REF(KD,13)) OR REF(KD,11)); KP4:=((KP2 AND KP3) AND KD1); DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); DEA:=EMA(DIFF,9); KP5:=2*(DIFF-DEA); KD2:=((((REF(KD,180) OR REF(KD,261)) OR REF(KD,98)) OR REF(KD,77)) OR REF(KD,1)); KP6:=((KP2 AND KP5) AND KD2); KP7:=(N < 34); KP8:=REF(KP7,11); KP9:=(N < 45); KP10:=((REF(KP9,83) AND KP8) AND KP2); KP11:=(N < 38); KP12:=((REF(KP11,19) AND REF(KP11,32)) AND KP2); KP13:=((REF(KP9,28) AND REF(KP11,101)) AND KP2); KP14:=(N < 43); KP15:=((REF(KP14,28) AND REF(KP14,189)) AND KP2); I:=((((((REF(CLOSE,2) / REF(OPEN,2)) < 0.95) AND (REF(OPEN,1) < REF(CLOSE,2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) / REF(CLOSE,1)) < 0.03)) AND ((CLOSE / OPEN) > 1.05)) AND (CLOSE > REF(CLOSE,2))); I1:=2*(DIFF-DEA); T3:=(N < 40); T4:=((REF(T3,34) OR REF(T3,28)) OR REF(T3,57)); KP16:=((I AND I1) AND T4);黑码出击:IF(KP AND KP2 OR KP4 OR KP6 OR KP10 OR KP12 OR KP13 OR KP15 OR KP16,100,0),COLORGREEN; |