注意:本指标源码用于通达信。 指标源码 01 HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6; HHJSJDB:(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+REF(HHJSJDA,20))/210,COLORYELLOW; HHJSJDC:MA(HHJSJDB,5),COLORRED; TSM1:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)); TSM%:=TSM1/AMOUNT*100; LIURU1:=AMOUNT*TSM%/10000000000; LIUCHU1:=AMOUNT/100000000-LIURU1; JINGLIU:=(LIURU1-LIUCHU1); AMOUNT3:=SUM(AMOUNT,3); LIURU3:=SUM(LIURU1,3); LIUCHU3:=SUM(LIUCHU1,3); JINGLIU3:=SUM(LIURU1-LIUCHU1,3); AMOUNT5:=SUM(AMOUNT,5); LIURU5:=SUM(LIURU1,5); LIUCHU5:=SUM(LIUCHU1,5); JINGLIU5:=SUM(LIURU1-LIUCHU1,5); AMOUNT10:=SUM(AMOUNT,10); LIURU10:=SUM(LIURU1,10); LIUCHU10:=SUM(LIUCHU1,10); JINGLIU10:=SUM(LIURU1-LIUCHU1,10); MA1:=MA(C,1); MA2:=MA(C,2); MA3:=MA(C,3); MA4:=MA(C,5); MA52:=MA(C,8); MA62:=MA(C,13); JUNXIAN:MA((MA1+MA2+MA3+MA4+MA52+MA62)/6,5),COLORMAGENTA,LINETHICK2; TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9); TT1:=REF(EMA(TT2,3),1); 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; LC:=REF(CLOSE,1); RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); FF:=EMA(CLOSE,3); AA1:=AMOUNT/VOL; BB1:=L<AA1*0.9; CC1:=(C-REF(C,1))/REF(C,1)*100>1.2; DD1:=L<MA(C,5)*0.921; EE1:=VOL<MA(V,5)*1.5; FF1:=BB1 AND CC1 AND DD1 AND EE1; F:=100*(C-REF(C,1))/REF(C,1); P1:=IF(C<REF(O,1) AND F<0,1,0); P2:=IF(C<REF(O,2) AND F<0,1,0); TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ; TT4:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ; Z1:=MA(C,13); ZX:=REF(Z1,13/2+1); DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED; STICKLINE(TT3,OPEN,CLOSE,3,0),COLORFF00FF; A1:=EMA(C,14)COLORWHITE,LINETHICK1; A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW; STICKLINE(CROSS(A1X,0),C,O,2,0)COLORYELLOW; STICKLINE(CROSS(0,A1X),C,O,2,0)COLORGREEN; AZ:=BARSCOUNT(CLOSE); AH:=HHV(HIGH,144); AL:=LLV(LOW,144); B0:=(AH-AL)/34; BL1:=HIGH+B0; BL2:=LOW-B0; STICKLINE((AZ+0)/34=FLOOR((AZ+0)/34),BL2,BL2-2*B0,2,0),COLORFFFFFF; DRAWTEXT((AZ+0)/34=FLOOR((AZ+0)/34),BL2-4*B0,'窗'),COLORFFFFFF; VAR3:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1); STICKLINE(VAR3,O,(O+C)/2,2.5,0),COLOR00BB00; STICKLINE(VAR3,O,(O+C)/2,0.2,0),COLOR00FF00; MTM:=C-REF(C,1); DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6); TSM:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)); TSMXIAN:=EMA(CLOSE,2); TTMXIAN:=EMA(SLOPE(CLOSE,32)*20+CLOSE,56),LINETHICK0; BU:=CROSS(TSMXIAN,TTMXIAN); SEL:=CROSS(TTMXIAN,TSMXIAN); DRAWTEXT (BU,LOW*0.989,'点'),COLORYELLOW,LINETHICK3; STICKLINE(CROSS(TSMXIAN,TTMXIAN),OPEN,CLOSE,2,0),COLORYELLOW; AA:=CROSS(MA(C,5),MA(C,21)) AND CROSS(MA(C,5),MA(C,34)) AND CROSS(MA(C,5),MA(C,55)); BB:=MA(C,55)>MA(C,13) AND CROSS(MA(C,13),MA(C,34)) AND MA(C,34)>MA(C,21) AND ABS(MA(C,55)-MA(C,21))/MA(C,21)<0.05; CC:=MA(C,34)>MA(C,5) AND CROSS(MA(C,5),MA(C,21)) AND MA(C,21)>MA(C,13); DD:=ABS((MA(C,5)-MA(C,13))+(MA(C,13)-MA(C,21))+(MA(C,21)-MA(C,34)))<0.02 AND MA(C,5)>REF(MA(C,5),1) AND MA(C,13)>REF(MA(C,13),1); EE:=MA(C,21)>MA(C,5) AND CROSS(MA(C,5),MA(C,13)) AND MA(C,13)>MA(C,55) AND ABS(MA(C,21)-MA(C,55))/MA(C,55)<0.05; FFF:=AA OR BB OR CC OR DD OR EE ; TANCE:=FFF AND FILTER( FFF,8); DRAWTEXT(TANCE,L*0.978,'●'),COLORRED; STICKLINE(TANCE,O,C,3,0),LINETHICK2,COLORWHITE; MTJ1:=HHV(HIGH,9)-LLV(LOW,9); MTJ2:=HHV(HIGH,9)-CLOSE; MTJ3:=CLOSE-LLV(LOW,9); MTJ4:=((MTJ2)/(MTJ1))*(100)-70; MTJ6:=((2)*(CLOSE)+HIGH+LOW)/(4); MTJ7:=SMA(((MTJ3)/(MTJ1))*(100),3,1); MTJ8:=LLV(LOW,34); MTJ9:=SMA(MTJ7,3,1)-SMA(MTJ4,9,1); MTJ10:=IF((MTJ9>100),MTJ9-100,0); MTJ11:=HHV(HIGH,34); V1:=(C*2+H+L)/4*10; V2:=EMA(V1,13)-EMA(V1,34); V3:=EMA(V2,5); V4:=2*(V2-V3)*5.5; V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1); V12:=(EMA(V11,3)-REF(EMA(V11,3),1))/REF(EMA(V11,3),1)*100; BBO:= (EMA(V11,3)<=13 AND V12>13) AND FILTER((EMA(V11,3)<=13 AND V12>13),10); DRAWTEXT (BBO,L,'主力进'),COLORWHITE; CCO:=(EMA(V11,3)>=90 AND V12) AND FILTER((EMA(V11,3)>=90 AND V12),10); AAZ:=(O+H+L+C)/4; BBZ:=MA(AAZ,3); CCZ:=SUM(IF(AAZ>REF(AAZ,1),AAZ*VOL,0),4)/SUM(IF(AAZ<REF(AAZ,1),AAZ*VOL,0),4); DDZ:=REF(100-(100/(1+CCZ)),1); A1N:=HHV(AAZ,10); A2N:=LLV(AAZ,30); A3N:=A1N-A2N; A4N:=EMA((AAZ-A2N)/A3N,1)*100; B1N:=HHV(AAZ,16); B2N:=LLV(AAZ,90); B3N:=B1N-B2N; B4N:=EMA((AAZ-B2N)/B3N,1)*100; MTJE:=REF(LOW,1)*0.9; MTJF:=LOW*0.9; MTJ12:=(MTJF*VOL+MTJE*(VOL)); MTJ13:=EMA(MTJ12,30); MTJ14:=CLOSE-REF(CLOSE,1); MTJ15:=MAX(MTJ14,0); MTJ16:=ABS(MTJ14); MTJ17:=SMA(MTJ15,7,1)/SMA(MTJ16,7,1)*100; MTJ18:=SMA(MTJ15,13,1)/SMA(MTJ16,13,1)*100; MTJ19:=BARSCOUNT(CLOSE); MTJ20:=SMA(MAX(MTJ14,0),6,1)/SMA(ABS(MTJ14),6,1)*100; MTJ21:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100; MTJ1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100; MTJ1B:=SMA((SMA(MTJ1A,4,1)-50)*2,3,1); MTJ1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100; MTJ1D:=SMA(MTJ1C,4,1); MTJ1E:=SMA(MTJ1D,3,1); MTJ1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100; MTJ22:=MTJ20<=25 AND MTJ21<-95 AND MTJ1F>20 AND MTJ1B<-30 AND MTJ1E<30 AND MTJ11-CLOSE>=-0.25 AND MTJ17<22 AND MTJ18<28 AND MTJ19>50; DRAWTEXT(CROSS(MTJ22,0.5) AND COUNT(MTJ22=1,10)=1,L,'主力建仓') , COLORMAGENTA; MTJEX:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; MTJFX:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); MTJ10X:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); MTJ11X:=MTJF<REF(MTJ10X,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1); DRAWTEXT(MTJ11X AND COUNT(MTJ11X,30)=1,L,'大资金进场'),LINETHICK1,COLORYELLOW; 图片示例 风险提示:本指标公式仅作为知识分享,供交流学习使用,不构成任何投资建议,不作为投资依据。 |
|
来自: 新用户5173uwrS > 《待分类》