DRAWBAND(MA(CLOSE,60),RGB(25,0,25),MA(CLOSE,90),RGB(16,16,16)); DRAWBAND(MA(CLOSE,20),RGB(255,255,0),MA(CLOSE,30),RGB(0,0,0)); DRAWBAND(MA(CLOSE,10),RGB(255,0,0),MA(CLOSE,20),RGB(0,0,0)); MA5:MA(CLOSE,5),COLORFFFFFF; MA10:MA(CLOSE,10),COLOR00FFFF; MA20:MA(C,20),COLORFF00FF; MA30:MA(C,30),COLOR00FF00; MA60:MA(CLOSE,60),COLORFF9988; MA90:MA(CLOSE,90),COLOR0000FF; DRAWKLINE(HIGH,OPEN,LOW,CLOSE); BDGD:=C=HHV(C,13); GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1; 高点:REF(C,GDSJ),COLORFF00FF,POINTDOT; 突破:CROSS(C,REF(高点,1)),COLOR00FFFF,POINTDOT,NODRAW; STICKLINE(GDSJ<=6,高点,高点,3,0),COLORFF00FF; DRAWTEXT(突破,LOW,'↑'),COLOR00FFFF; BDDD:=C=LLV(C,13); DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1; 低点:REF(C,DDSJ),COLOR00FF00,POINTDOT; STICKLINE(DDSJ<=6,低点,低点,3,0),COLOR00FF00; 高点1:=REFDATE(HHV(H,140),DATE); 调整:=0.99;{这里是避免跟信息地雷冲突} DRAWTEXT(CURRBARSCOUNT=140,高点1*调整,'主营收入(万):');{CURRBARSCOUNT=N根据自已的初始K线来调,我的初始K线为140根} DRAWNUMBER(CURRBARSCOUNT=123,高点1*调整,FINANCE(20)/10000); DRAWTEXT(CURRBARSCOUNT=110,高点1*调整,'主营利润(万):'); DRAWNUMBER(CURRBARSCOUNT=93,高点1*调整,FINANCE(21)/10000); DRAWTEXT(CURRBARSCOUNT=80,高点1*调整,'每股收益(元):'); DRAWNUMBER(CURRBARSCOUNT=63,高点1*调整,FINANCE(33)); DRAWTEXT(CURRBARSCOUNT=55,高点1*调整,'每股净资产(元):'); DRAWNUMBER(CURRBARSCOUNT=35,高点1*调整,FINANCE(34)); A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; A4:=SMA(A3,3,1); A5:=SMA(A4,3,1); A6:=3*A4-2*A5; A7:=C-REF(C,1); A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6); 买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)); DRAWTEXT(FILTER(买=1,5),LOW-0.05,'↖买进'),COLORYELLOW; STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW; XS:=MA(LOW,5)*(1-5/100),LINETHICK0; XS1:=MA(HIGH,5)*(1+5/100); DRAWTEXT(CROSS(XS1,C),H*1.01,'砸'),COLORWHITE; VAR2:=(2*CLOSE+HIGH+LOW)/4; VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1); VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4); 小股民:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3; 庄家:=EMA(0.667*REF(小股民,1)+0.333*小股民,2)*VAR3; DRAWTEXT(CROSS(小股民,庄家) AND 小股民<30,L-0.05,'←低吸'),COLORLIRED; DRAWTEXT(CROSS(庄家,小股民) AND 小股民>70,H+0.05,'←高抛'); B1:=REF(CLOSE,1); DRAWTEXT_FIX(1,0.02,0,0,'☆微信公众号:(程序化指标) ☆'),COLORRED; WR:=-100*(HHV(HIGH,28)-CLOSE)/(HHV(HIGH,28)-LLV(LOW,28)); DRAWICON(FILTER(CROSS(WR,(0 - 81)),10),B1,13); DRAWICON(FILTER(CROSS((0 -19),WR),10),H*1.02,15); DRAWTEXT(FILTER(CROSS(WR,(0 - 81)),21),L*0.99,' W&R'),COLORRED; DRAWTEXT(FILTER(CROSS(0 -19,WR),21),H*1.01,' W&R'),COLORGREEN; MA18:=MA(C,18);{需要编写选股关注微信公众号:程序化指标} 跟:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0); DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'跟'),COLOR7F52AF; 买价:=((C-REF(MA5,1))/5+MA5)*1.004; 买条件:=CROSS(C,买价) AND 买价>REF(买价,1); 白K买进:IF(买条件,L,H),COLORWHITE,POINTDOT; STICKLINE(买条件,H,L,0,1),COLORWHITE,LINETHICK2; STICKLINE(买条件,O,C,4,1),COLORWHITE,LINETHICK2; 加码价:=((C-REF(MA10,1))/20+MA10)*1.004; 加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1); 黄K加码:IF(加码条件,L,H),COLORYELLOW,POINTDOT; STICKLINE(加码条件,H,L,0,1),COLORYELLOW,LINETHICK2; STICKLINE(加码条件,O,C,4,1),COLORYELLOW,LINETHICK2; HH0:=CONST(HHV(H,120))*1; LL0:=CONST(LLV(L,120))*1; MM0:=CONST((HH0+LL0)/2); HH1:=IF(CONST(C)<MM0,LL0-(HH0-LL0)*0.4,LL0-(HH0-LL0)*0.4),COLORRED; LL1:=LL0;HLMAX:=MAX(HH1,LL1); HLMIN:=MIN(HH1,LL1); HLMN1:=(HLMAX+HLMIN)/2; HLMN2:=(HLMAX-HLMIN); HLMN3:=HHV(V,250)/2; HLMN4:=HHV(V,250); VZ:=(V-HLMN3)*HLMN2/HLMN4+HLMN1; STICKLINE(C>=O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2.5,1),COLORRED; STICKLINE(C<O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2.5,0),COLORCYAN; (MA(V,5)-HLMN3)*HLMN2/HLMN4+HLMN1,COLORFFFFFF; (MA(V,10)-HLMN3)*HLMN2/HLMN4+HLMN1,COLOR00FFFF; T:=V=LLV(V,20); DRAWICON(T,(V-HLMN3)*HLMN2/HLMN4+HLMN1,1); STICKLINE(C/REF(C,1)>1.099,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORRED; STICKLINE(C/REF(C,1)<0.901,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORGREEN; VY:=(0-HLMN3)*HLMN2/HLMN4+HLMN1; STICKLINE(V>=2*REF(V,1),VZ,VY,0.3,0),COLORWHITE; STICKLINE(V>=3*REF(V,1),VZ,VY,0.3,0),COLORYELLOW; MA13:=MA(C,3); UU:=1,V<=LLV(V,13) AND MA13>REF(MA13,1); TJ:=1,REF(V,1)<=LLV(V,13) AND MA13>REF(MA13,1),COLORRED,LINETHICK3; DRAWTEXT(TJ=1,(V-HLMN3)*HLMN2/HLMN4+HLMN1+0.2,'买')COLORMAGENTA; BIAS11:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100; BIAS12:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100; BIAS13:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100; BIAS1:=(C-MA(C,6))/MA(C,6)*100; BIAS2:=(C-MA(C,12))/MA(C,12)*100; BIAS3:=(C-MA(C,24))/MA(C,24)*100; BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6; 乖离:=MA(BIAS,3);
|