回头望月+火车轨+背离指标+趋势+时间窗
H1:EMA(CLOSE,3),linethick2,colorred;
H2:EMA(H1,20),linethick2,coloryellow;
DRAWICON(CROSS(H1,H2)AND CLOSE<EMA(CLOSE,60) ,LOW,1);
STICKLINE(H1>H2,H1,H2,1,0.8),COLORRED;
STICKLINE(H1<H2,H1,H2,1,0.8),COLORGREEN;
x1:=EMA(C,7);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(84,RSI) , HIGH,'★ 快跑 '),COLORYELLOW;
VarA:=REF(CLOSE,1);
VarB:=SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100;
DRAWTEXT(CROSS(75,VarB),HIGH,'☆短出'),Color00FF00 ;
选股1:cross(h1,h2),LINETHICK0,colorgreen;
DRAWTEXT(cross(h1,h2),l,'☆加仓'),ALIGN0,coloryellow,linethick3;
选股2:cross(h2,h1),LINETHICK0,colorred;
DRAWTEXT(cross(h2,h1),l,'☆止损'),ALIGN0,colorred,linethick3;
input:Q(27,1,250);
MA5:MA(CLOSE,5),linethick1;
MA10:MA(CLOSE,10),linethick1;
MA20:MA(CLOSE,20),Color0000FF,linethick1;
MA30:MA(CLOSE,30),ColorFFFF00,linethick1;
MA60:MA(CLOSE,60),ColorFF0000,linethick1;
MA120:MA(CLOSE,120),Color00FF00,linethick1;
MA250:MA(CLOSE,250),Colorgray,linethick1;
Var1:=(开盘价+最低价+最高价+收盘价)/4;
stickline(1,var1,var1,6,0),ColorFF00FF;
拐点:=ma(c,3); 拐点1:=ma(c,3);
gd1:=ref(count(拐点<=ref(拐点,1),5)=5 ,1) and 拐点>ref(拐点,1),linethick2 ,colorred ;
gd2:=ref(count(拐点1<=ref(拐点1,1),5)=5 ,1) and 拐点1>ref(拐点1,1),linethick2 ,colorred ;
DRAWICON(gd1,0.98*c,1);
DRAWICON(gd2,0.98*c,8);
{回头望月}
tt1:=BARSLAST(REF(CROSS(CLOSE,ma120),1)) and CROSS(ma20,ma120);
STICKLINE(TT1,ma120,ma120-0.09,4,0),Color00FF00;
DRAWTEXT(TT1,ma120-0.13,'望月'),Color00FF00;
{火车轨:}
火车轨:=ma120/REF(ma250,1)>1.03 and ma120>ma250 and ma120>REF(ma120,1) and ma250>REF(ma250,1);
STICKLINE(火车轨,ma120,ma120-0.035,4,0),colorffcccc;
STICKLINE(火车轨,ma250,ma250+0.035,4,0),colorffcccc;
{三线开花:}
STICKLINE(ma120<ma250 and CROSS(ma20,ma120) and CROSS(ma20,ma250),ma20,ma20-0.09,4,0),color00ff00;
DRAWTEXT(ma120<ma250 and CROSS(ma20,ma120) and CROSS(ma20,ma250),ma20-0.13,'三线开花'),color00ff00;
{二次握手}
fa:=BARSLAST(CROSS(ma10,ma5)) and CROSS(ma5,ma10);
fb:=fa and ma5>ma30 and ma10>ma30 and ma10>REF(ma10,1);
STICKLINE(fb,LOW,LOW-0.09,4,0),colorwhite;
DRAWTEXT(fb,LOW-0.13,'握手'),colorwhite;
fa1:=BARSLAST(CROSS(ma60,ma20)) and CROSS(ma20,ma60);
fb1:=fa and ma20>ma120 and ma60>ma120 and ma20>REF(ma20,1);
STICKLINE(fb,LOW,LOW-0.09,4,0),colorwhite;
DRAWTEXT(fb,LOW-0.13,'握手'),,Color00FF00;
VarA:=AMOUNT/vOL/100;
VarB:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarC:=SUM(AMOUNT,7)/varA/100;
VarD:=DMA(VarB,VOL /varC);
VarE:=(CLOSE-VarD) /varD*100;
VarF:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
VarJ:=MA(VarE,20)+STD(VarE,20);
BIAS18:=(CLOSE-MA(CLOSE,18))/MA(CLOSE,18)*100;
K:=SMA(VarF,3,1);
DRAWTEXT(REF(BIAS18,1)>=5 AND CROSS(VarJ,VarE) AND K>79 ,H+0.1,'先走一走'),,COLORY;
var31:=hhvbars(zig(3, 19)>ref(zig(3,19),1) and ref(zig(3,19), 1)<ref(zig(3,19), 2),0);
转折时间:var31+1,pointdot,colorff00ff,LINETHICK0;
时间窗:=0,colorwhite;
stickline(var31=2,l*0.95,l*0.98,8,0),color0000ff;
drawtext(var31=2,l*0.95,'3天'),coloryellow;
stickline(var31=4,h*1.05,h*1.02,8,0),color9966ff;
drawtext(var31=4,h*1.06,'5天'),coloryellow;
stickline(var31=7,l*0.95,l*0.98,8,0),color00ffff;
drawtext(var31=7,l*0.95,'8天'),coloryellow;
stickline(var31=12,h*1.05,h*1.02,8,0),colorff33ff;
drawtext(var31=12,h*1.06,'13天'),coloryellow;
stickline(var31=20,l*0.95,l*0.98,8,0),color0066ff;
drawtext(var31=20,l*0.95,'21天'),coloryellow;
stickline(var31=33,h*1.05,h*1.02,8,0),colorffff00;
drawtext(var31=33,h*1.06,'34天'),coloryellow;
stickline(var31=54,l*0.95,l*0.98,8,0),color006600;
drawtext(var31=54,l*0.95,'55天'),coloryellow;
stickline(var31=88,h*1.05,h*1.02,8,0),color00ff00;
drawtext(var31=88,h*1.06,'89天'),coloryellow;
stickline(var31=143,l*0.95,l*0.98,8,0),colorccffff;
drawtext(var31=143,l*0.95,'144天'),coloryellow;
stickline(var31=232 ,h*1.05,h*1.02,8,0),colorff0033;
drawtext(var31=232,h*1.06,'233天'),coloryellow;
stickline(var31=376,l*0.95,l*0.98,8,0),colorff9966;
drawtext(var31=376,l*0.95,'377天'),coloryellow;
X1:=(C+L+H)/3;
X2:=EMA(X1,6);
X3:=EMA(X2,5);
GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5));
GR2:=EMA(X1,13)>EMA(X1,21) AND EMA(X1,21)>EMA(X1,34)
AND EMA(X1,13)>REF(EMA(X1,13),1);
GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1);
GR4:=H=HHV(H,GR1);
GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1);
GR6:=GR2 AND GR3 AND GR4;
GR7:=GR2 AND GR3 AND GR4 AND GR5;
GR8:=GR6 AND GR7;
LC := REF(CLOSE,1);
RSI6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
BIAS5:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
换手:=100*V/CAPITAL;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),
EMA8,'∠45上升'),COLORWHITE;
A1:=BARSLAST(ref(cross("macd.diff"(12,26,9),"macd.dea"(12,26,9)),1));
B1:=ref(c,A1+1)>c and ref("macd.diff"(12,26,9),A1+1)<"macd.diff"(12,26,9) and cross("macd.diff"(12,26,9),"macd.dea"(12,26,9));
DRAWTEXT(FILTER(B1>0,5),l-0.01,'M 底背'),COLORGREEN;
A2:=BARSLAST(ref(cross("kdj.k"(9,3,3),"kdj.d"(9,3,3)),1));
B2:=ref(c,A2+1)>c and ref("kdj.k"(9,3,3),A2+1)<"kdj.k"(9,3,3)and cross("kdj.k"(9,3,3),"kdj.d"(9,3,3));
DRAWTEXT(FILTER(B2>0,5),l-0.25,'K 底背'),COLORYELLOW;
A3:=BARSLAST(ref(cross("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
B3:=ref(c,A3+1)>c and ref("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) and cross("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));
DRAWTEXT(FILTER(B3>0,5),l-0.4,'R 底背'),COLORffff00;
C1:=BARSLAST(ref(cross("macd.dea"(12,26,9),"macd.diff"(12,26,9)),1));
D1:=ref(c,C1+1)<c and ref("macd.diff"(12,26,9),C1+1)>"macd.diff"(12,26,9)and cross("macd.dea"(12,26,9),"macd.diff"(12,26,9));
DRAWTEXT(FILTER(D1>0,5),h+0.01,'M 顶背'),COLORRED;
C2:=BARSLAST(ref(cross("kdj.d"(9,3,3),"kdj.k"(9,3,3)),1));
D2:=ref(c,C2+1)<c and ref("kdj.k"(9,3,3),C2+1)>"kdj.k"(9,3,3)and cross("kdj.d"(9,3,3),"kdj.k"(9,3,3));
DRAWTEXT(FILTER(D2>0,5),h+0.25,'K 顶背'),COLOR0066FF;
C3:=BARSLAST(ref(cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));
D3:=ref(c,C3+1)<c and ref("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24)and cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));
DRAWTEXT(FILTER(D3>0,5),h+0.4,'R 顶背'),COLORff00ff;
e1:=BARSCOUNT(c);
ah:=hhv(h,200);
al:=llv(l,200);
b0:=(ah-al)/40;
kb1:=h+b0;
kb2:=l-b0;
stickline((e1+0)/34=FLOOR((e1+0)/34),kb2,kb2-3*b0,2,0),COLOryellow,LINETHICK3;
drawtext((e1+0)/34=FLOOR((e1+0)/34),kb2-2*b0,'时间窗'),COLORwhite;
TY:=C;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪顶:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK4;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK4;
