指标源码:
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; KEA:HHV(MA(B2,1),13),COLORYELLOW; R1A:=(2*CLOSE+HIGH+LOW)/4; R2A:=MA(R1A,7); R3A:=R2A-MA(R1A,7/2)<0; R4A:=R2A-MA(R1A,7/2)>0; R5A:=BARSLAST(R3A); R6A:=0-BARSLAST(R4A); R7A:=IF(R3A<=0,R5A,R6A); STICKLINE(KEA>B2 AND B2>SMA2,KEA,B2,0,0),COLORBLUE; STICKLINE(KEA>SMA2 AND B2<SMA2,KEA,SMA2,0,0),COLORBLUE; R11A:=(CLOSE*2+HIGH+LOW)/4; R21A:=EMA(R11A,13)-EMA(R11A,34); R31A:=EMA(R21A,5); R2:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))); R3:=((REF(R2,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R4:=((REF(R3,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R5:=((REF(R4,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R6:=((REF(R5,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R7:=((REF(R6,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R8:=((REF(R7,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R9:=((REF(R8,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); RA:=((REF(R9,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); RB:=((REF(RA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
RC:=((REF(RB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); RD:=((REF(RC,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); RE:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))); RF:=((REF(RE,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R10:=((REF(RF,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R11:=((REF(R10,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R12:=((REF(R11,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R13:=((REF(R12,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R14:=((REF(R13,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R15:=((REF(R14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R16:=((REF(R15,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R17:=((REF(R16,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R18:=((REF(R17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); R19:=((REF(R18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); R1B:=(REF((((((((((((RE OR RF) OR R10) OR R11) OR R12) OR R13) OR R14) OR R15) OR R16) OR R17) OR R18) OR R19),1) AND R2);
STICKLINE(R1B,O,O+(C-O)/3,2,0),COLOR10FFFF; STICKLINE(R1B,O,O+(C-O)/3,1,0),COLOR00FFFF; AA:=(REF((((((((((((R2 OR R3) OR R4) OR R5) OR R6) OR R7) OR R8) OR R9) OR RA) OR RB) OR RC) OR RD),1) AND RE);
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)));
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; TJ:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)<1.25 AND REF(CLOSE,1)<(LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85) AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10); STICKLINE(C/REF(C,1)>=1.096 AND H=C,O,C,1,0),COLORYELLOW; 放量突破:TJ,NODRAW,COLORRED; DRAWTEXT(TJ,L-0.3,'放量突破'),COLORRED; W1:=C=HHV(C,20); W2:=BARSLAST(W1); W3:=IF(W2>0,REF(C,W2),REF(C,W2)); W4:=CROSS(C,REF(W3,1)); 回调突破:=W4 AND COUNT(W4,5)=1; DRAWTEXT(回调突破>0,MA(L,3),'*回调突破'),COLORYELLOW; 敢死队操作线:MA(C,24),LINETHICK2,COLORLIMAGENTA;
选股源码:
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)); DRAWTEXT(LIFENGCYC>0,LOW*0.99,'☆'),COLORDD00DD;
|