通达信自用战神主图公式
{牛牛指标网提供:www.tdx001.com}
复制内容到剪贴板
- GJ:=(C+H+L+O)/4;
- 明日阻力:=L+(GJ-L)+(C-L);
- 明日支撑:=L+(C-GJ);
- 下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
- RRRSV:=SMA(下档线,3,1);
- KKK:=SMA(RRRSV,3,1);
- DDDDD:=((3 * RRRSV) - (2 * KKK));
- JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
- RSV24:=SMA(JJ12,3,1);
- K24:=SMA(RSV24,3,1);
- D24:=((3 * RSV24) - (2 * K24));
- 压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;
- 底部:=LLV(HIGH,30),COLOR00FF00;
- 阻力:REF(明日阻力 , 1),NODRAW;
- 支撑:REF(明日支撑 , 1),NODRAW;
- 压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;
- 底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;
- PMA:MA(C,5),COLORWHITE,LINETHICK2;
- IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2;
- IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK2;
- X:=(3*C+L+O+H)/6;
- 多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
- +13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
- +7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
- REF(X,20))/210,COLORFF00FF,LINETHICK2;
- {用法:黄托底买进,蓝压顶卖出。}
- DD:=多空线<REF(多空线,1);
- IF(DD,多空线,DRAWNULL),COLOR00FFFF,LINETHICK2;
- A:=(PMA>多空线);
- IF(A,多空线,DRAWNULL),COLOR33FF33,POINTDOT,LINETHICK4;
- VAR3:=LLV(HIGH,240);
- VAR4:=100*(CLOSE-VAR3)/VAR3;
- VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
- VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
- VAR7:=0;
- VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
- VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
- VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
- VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
- VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
- VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
- VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
- VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
- VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
- VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
- VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
- VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
- 买1:=VAR10;
- 买2:=(VAR11+VAR13+VAR15+VAR17);
- 卖1:=(VAR12+VAR14+VAR16+VAR18);
- B:IF(买1>0 OR 买2>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
- DRAWTEXT(买1>0 OR 买2>0,LOW*0.99,'买'),COLORRED;
- S:IF(卖1>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
- DRAWTEXT(卖1>0,HIGH*1.02,'卖'),COLORGREEN;
- DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,1) ;
- DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,2);
- ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;
- VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
- K:=EMA(VAR7,5)*2, , COLORFF00FF;
- D:=EMA(K,5), , COLORWHITE;
- J:=K*3-D*2, ,COLORYELLOW;
- VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;
- HS:=VOL/CAPITAL*100, , COLORGREEN;
- VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
- VARF:=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);
- DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'机构进场'),LINETHICK1,COLORFF00FF;
- VAR1A:=IF(VARE>0,VARE,0);
- VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
- VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
- DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*0.95,'大顶(底)') COLORWHITE;
- AA1:=AMOUNT/V;
- BB1:=L<AA1*0.9;
- CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
- DD1:=L<MA(C,5)*0.921;
- EE1:=V<MA(V,5)*1.5;
- FF1:=BB1 AND CC1 AND DD1 AND EE1;
- DRAWTEXT(FF1,(LOW* 0.97),'老鼠仓'),COLOR4080FF;
E47302734.png
|