通达信看长炒短公式这是组合力作

2015-11-05 22:30:00来源:本站整理浏览:396

通达信看长炒短公式这是组合力作

源码

ADVANCE,COLORRED,NODRAW;
DECLINE,COLORRED,NODRAW;
BTIQ:=100*ADVANCE/(ADVANCE+DECLINE);
判明大盘:=MA(BTIQ,5);
买入:=判明大盘<30,NODRAW,COLORYELLOW;
DRAWICON(买入,30*0.99,1);
25,COLORLICYAN;
80,COLORLIRED;

N:=9;
M1:=3;
M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J:=3*K-2*D;
CJ_K:MA(K,15),LINETHICK3;
CJ_D:MA(D,15),LINETHICK3;
CJ_J:MA(J,15),LINETHICK3;
DRAWICON(CROSS(CJ_K,CJ_D)&&CJ_D<30,CJ_K*0.80,11);
DRAWICON(CROSS(CJ_D,CJ_K)&&CJ_D>70,CJ_K*1.05,12);
VAR1:=1;
VAR2:=((((2*CLOSE)+HIGH)+LOW) / 4);
高位:90,COLORFFFF00;
低位:20,COLORFFFF00;
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4);
C1:(EMA((((VAR2-VAR4)/(VAR5-VAR4))*100),4)*VAR1),COLORFF00FF;
C2:(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VAR1),COLORFFFFFF;
DRAWICON(CROSS(C1,C2) AND C2>0,C2,1);
DRAWICON(CROSS(C2,C1) AND C2<-100,C1,2);
DRAWICON(CROSS(C1,C2) AND C2<0,C2,1);
DRAWICON(CROSS(C2,C1) AND C2>-100,C1,2);
条件:=CROSS(C1,C2) AND C1<40;
条件0:=CROSS(C2,C1) AND C1>90;
TJ1:=CROSS(C1,C2);
TJ2:=CROSS(C2,C1);
TJ3:=CROSS(C1,C2) AND REF(C1,1)<20;
TJ4:=CROSS(C2,C1) AND REF(C1,1)>80;
DRAWTEXT(FILTER((REF(条件,1) AND (REF(LOW,1)>LOW OR TJ2)) OR (REF(条件,2) AND (REF(LOW,2)>LLV(LOW,3) OR TJ2))
OR (REF(条件,3) AND (REF(LOW,3)>LLV(LOW,4) OR TJ2)),4),50,"止"),COLORGREEN;
DRAWTEXT(条件,20,"买"),COLORWHITE;
DRAWTEXT(条件0,85,"卖"),COLORYELLOW;
DRAWTEXT(CROSS(C1,75),70,"危险区"),COLORBLUE;
DRAWTEXT(TJ3,65,"安"),COLORRED;
DRAWTEXT(TJ3,56,"全"),COLORRED;
DRAWTEXT(TJ3,47,"买"),COLORRED;
DRAWTEXT(TJ4,85,"逃顶"),COLORYELLOW;
DRAWTEXT(ISLASTBAR,88,"清仓"),COLORYELLOW;
DRAWTEXT(ISLASTBAR,80,"减仓"),COLORYELLOW;
DRAWTEXT(ISLASTBAR,50,"控盘"),COLORWHITE;
DRAWTEXT(ISLASTBAR,20,"吸筹"),COLORGREEN;
{MA2爆点}
VAR41:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
VARK:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2));
VARL:=(REF(VARK,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARX:=(REF(VARL,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR30:=(REF(VARX,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR31:=(REF(VAR30,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR32:=(REF(VAR31,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR33:=(REF(VAR32,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR34:=(REF(VAR33,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR35:=(REF(VAR34,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR36:=(REF(VAR35,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR37:=(REF(VAR36,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR38:=(REF(VAR37,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR39:=REF(VARK OR VARL OR VARX OR VAR30 OR VAR31 OR VAR32 OR VAR33 OR VAR34 OR VAR35 OR VAR36 OR VAR37 OR VAR38,1) AND VAR41;
DIFF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);{www.gpxiazai.com 来自经典副B}
DEA:=EMA(DIFF,9),COLORFFFF00;
MACD:=(DIFF-DEA)*2;
A10:=BARSLAST(REF(CROSS(DIFF,DEA),1));
A11:=BARSLAST(REF(CROSS(DEA,DIFF),1));
底背离:=REF(CLOSE,A10+1)>CLOSE AND DIFF> REF(DIFF,A10+1) AND CROSS(DIFF,DEA);
顶背离:=REF(CLOSE,A11+1)< CLOSE AND REF(DIFF,A11+1)>DIFF AND CROSS(DEA,DIFF);
{爆}
LC:=REF(C,1),NODRAW;
LC2:=REF(C,2),NODRAW;
平底:=LC<LC2&&C>=LC,NODRAW;
收阳:=C>O,NODRAW;
XG:=平底 AND 收阳 AND 底背离;
DRAWICON(XG,LOW*0.97,1);
DRAWTEXT(XG,LOW*0.97," 爆"),COLORRED;
{绝顶}
日:=150;昨前:=3;
高1:=REF(HHV(H,日),昨前);
顶:REFDATE(高1,DATE),COLORBLACK;
绝顶:REFDATE(顶,DATE),NODRAW;
跑:=绝顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
STICKLINE(跑,C,O,3,0),COLOR777777;
STICKLINE(跑,C,O,2,0),COLORAAAAAA;
STICKLINE(跑,C,O,1,0),COLORCCCCCC;
STICKLINE(跑,C,O,0.1,0),COLORFFFFFF;
STICKLINE(跑,L,H,0,0),COLORFFFFFF;
DRAWTEXT(跑,C*1.06,"绝顶")COLORFFFFFF;
{顶底奇准}
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
SHORT:=7; LONG:=19;
RMA:=EMA(CLOSE,SHORT);
NMA:=EMA(CLOSE,LONG);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),0);