神马文学网培油整合6
来源：百度文库 编辑：神马文学网 时间：2024/04/27 19:15:47
｛主图叠加｝主图叠加
DRAWTEXTABS(5,0,'主图：'),COLORRED;DRAWTEXTABS(35,0,'【变色龙】买1 卖1 B1玻 S1思'),COLORRED;
DRAWTEXTABS(5,15,'副图：'),COLORRED;
DRAWTEXTABS(35,15,'【BOLL主图】量能量价走势分析及指导，追 单箭头'),COLORYELLOW;
DRAWTEXTABS(35,45,'【短线买卖】B玻 S思'),COLORBLUE;
DRAWTEXTABS(35,30,'【红色主图】项 买 顶 逃 短进 买！ 赢'),COLORRED;
DRAWTEXTABS(145,45,'【WD.K线 】买2 卖2 双箭头'),COLORWHITE;
DRAWTEXTABS(35,60,'【自编辑 】减仓 清仓 开买'),colorFF00FF;
{M 10 1 30 1}
止盈线:(MA(CLOSE,M) * 1.15),Color0000FF;
分水岭:(MA(CLOSE,M) * 1),COLORWHITE;
止损线:(MA(CLOSE,M) * 0.85),Color00FF80;
总股本:=FINANCE2(35) ;
流通股:=FINANCE2(37);
限售A股:=FINANCE2(41);
每股收益:=FINANCE2(3);
市盈率:=DYNAINFO(39);
每股公积金:=FINANCE2(7);
x9:FORCAST(c,9),Colorwhite,LINETHICK2;
llx:=llv(FORCAST(c,9),2);
DRAWGBKLAST(DYNAINFO(3)DRAWGBKLAST({CLOSE}DYNAINFO(3)>DYNAINFO(7){OPEN},STRIP(RGB(150,0,0),RGB(0,150,0),1));
DRAWTEXTREL(550,900,STKLABEL+' '+STKNAME+' '+DYNAINFO(7)+'元'+' '+DYNAINFO(14)*100+'%'),LINETHICK4,COLORFFFF00;
PARTLINE(x9,x9=llx,rgb(255,205,0),x9<>llx,rgb(255,0,0)),linethick4;
{24}
{柱图}
STICKLINE(c>=o and o<>0,HIGH,LOW,0.5,0),color0000CD;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,8,0),color070084;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,7,0),color0000A3;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,6,0),color0000B7;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,5,0),color0000CD;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,4,0),color0000E9;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,2,0),color0754E9;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,0.5,0),Color68B8FF;
STICKLINE(c0,HIGH,LOW,0.5,0),colorFFBE00;
STICKLINE(CLOSE0,HIGH,LOW,0.5,0),colorFFBE00;
STICKLINE(CLOSE0,CLOSE,OPEN,8,0),ColorCA6500;
STICKLINE(CLOSE0,CLOSE,OPEN,7,0),ColorE17100;
STICKLINE(CLOSE0,CLOSE,OPEN,6,0),ColorF27900;
STICKLINE(CLOSE0,CLOSE,OPEN,5,0),ColorFF850B;
STICKLINE(CLOSE0,CLOSE,OPEN,4,0),ColorFF9326;
STICKLINE(CLOSE0,CLOSE,OPEN,2,0),ColorFFA851;
STICKLINE(CLOSE0,CLOSE,OPEN,0.5,0),colorFFFF00;
{43}
DRAWGBK(c,'7' );
Var3:=LLV(H,240);
Var4:=100*(C-Var3)/Var3;
Var5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
Var6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
{Var7:=0;}
Var8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
Var9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VarA:=BARSCOUNT(C);
VarB:=Var8<20 AND Var9<23 AND VarA>35;
VarC:=VarB AND COUNT(VarB,1)=1;
VarD:=EMA(C,21)-EMA(C,8);
VarE:=EMA(VarD,5);
VarF:=TROUGH(3,6,1)<4 AND CROSS(VarD,VarE);
Var10:=IF(TROUGH(3,16,1)=0 AND H>L+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),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),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),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),2)AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
Var19:=EMA(C,2)-EMA(C,150);
Var1A:=EMA(Var19,100);
Var1B:=2*(Var19-Var1A);
Var1C:=POW(Var1B,3)*0.1+POW(Var1B,1);
Var1D:=SQRT(SQRT(L*H*O*C));
Var1E:=EMA(Var1D*0.97,3);
Var1F:=(H+L+C)/3;
Var20:=(Var1F-MA(Var1F,14))/(0.015*AVEDEV(Var1F,14));
Var21:=CROSS(Var1E,L);
买点1:=Var10;
买点2:=(Var11+Var13+Var15+Var17);
卖点1:=(Var12+Var14+Var16+Var18);
Var22:=买点1 AND VarF AND VarC AND Var21 AND Var4<0AND Var5=0 AND Var6=0 AND Var20<(-110);
DRAWTEXT(买点1>0,L-0.05,'B1玻'),LINETHICK3,ALIGN1,COLORRED;{B1玻}
DRAWTEXT(买点2>0,L-0.10,{'B1玻'}'买1'),LINETHICK3,ALIGN1,COLORRED;{B1玻}
DRAWTEXT(卖点1>0,H+0.15,{'S1思'}'卖1'),LINETHICK3,ALIGN1,COLORRED;{S1思}
{83}
{十字光标提示}
a:="LTFunc6@FORLT2";
s1:="LTFunc6@LT_S1";
hs:="LTFunc6@LT_HS";
ls:="LTFunc6@LT_LS";
p1:="LTFunc6@LT_P1";
upp:="LTFunc6@LT_UPP";
udd:="LTFunc6@LT_UDD";
{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};
d1:=ema(abs("ddx.ddx"),60);
d2:=max("ddx.ddx"/d1+7.5,7.5);
d3:=min("ddx.ddx"/d1,10);
fb:=if(s1=0,hs,ls);
tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现"卖"点\n','若明日收盘价>'+numtostrn(upp,2)+',出现"买"点\n');{1.BS点:}
tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价>'+numtostrn(hs,2)+'短线买入机会');{2.短线:}
tr2:=ifs(p1=1,ifs(cross(p1,0),'"买"点','持股'),ifs(cross(1,p1),'"卖"点','持币'));{1.BS点:}
tr3:=ifs(s1=0,'向下,','向上,');{2.短线:}
tr4:='3.能量级别:'+numtostrn(d3,1)+'级';{3.能量级别:}
{102}
c1:=INTPART(cyc(5)*100*0.96)/100;
p2:=intpart(ref(cyc(5),1)*100)/100;
p3:=intpart(ref(cyc(5),1)*0.96*100)/100;
vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100);
p40:=intpart(maxcyc*100)/100;
p41:=intpart(ref(MAXCYC,1)*100)/100;
p4:=p1=0 and c>p2 or (ref(vol/100,1)intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1)));
p5:=p1=1 and cp1:=if(p4=1,1,if(p5=1,0,ref(p1,1)));
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'持币');{4.}
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)>=vv,c,'明日收盘价超过'+str(c1)+'买入');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'持股');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'明日收盘价跌破'+str(min(c1,p40))+'卖出');
{117}
bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'买卖点决策系统提示\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS点:'+tr2+','+tr0+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'2.短线:'+tr3+tr1+'\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+tr4;
drawflagtext(1,fb,bs);
DRAWTEXTABS(35,15,'【BOLL主图】量能量价走势分析及指导，追 单箭头'),COLORYELLOW;
A4:=MA(CLOSE,20);
A5:=(CLOSE > MA(CLOSE,5));
A6:=(MA(CLOSE,5) > MA(CLOSE,10));
A7:=(CLOSE > MA(CLOSE,10));
A8:=(MA(CLOSE,5) > MA(CLOSE,20));
A9:=(CLOSE > MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4 > A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
阻力位:=IF((CLOSE > 200),(CLOSE * 1.01),(CLOSE * 1.07));
阻力位１:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位);
止损位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93));
止损位１:=IF((CLOSE < 10),(CLOSE * 0.95),止损位);
TJTS1:=BARSTATUS=2 and c<200;
TJTS2:=BARSTATUS=2 and c>200;
k2:=hhv(h,barslast(DISPSTATUS=1)+1);
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股放量下跌，走势明显偏弱，离场观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股缩量下跌，走势偏弱，离场观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态良好，强势明显，量能充足，可以继续持有。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股走势趋弱，量能不足，减持大部分筹码。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态不佳，注意成交量的变化，但目前不适合参与。 '),ALIGN2;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。 '),ALIGN2;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股有走强迹象，但量能不足，趋势不明，不适合操作。 '),ALIGN2;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股走势太弱，没有参与价值。 '),ALIGN2;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.99,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右， '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.98,' 如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 < V2)) ,k2*0.99,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌， '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 < V2)) ,k2*0.98,' 可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(1,AVX) AND (V1 >= V2)) ,k2*0.99,'大盘形态走坏，重仓者可以减去大部分仓位。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS2 and (CROSS(1,AVX) AND (V1 < V2)) ,k2*0.99,'大盘缩量调整，注意风险，短线清仓观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS2 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) ,k2*0.99,'大盘走势良好，量能理想，可以继续持有强势股。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) ,k2*0.99,'大盘形态良好，但量能稍显不足，随时准备减仓。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) ,k2*0.99,'大盘趋势不明，注意成交量变化，目前不适宜进场。 '),ALIGN2;
DRAWTEXT(TJTS2 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) ,k2*0.99,'大盘趋势向下，量能萎缩，不适合进场。 '),ALIGN2;
DRAWTEXTABS(35,45,'【短线买卖】B玻 S思'), COLORBLUE;
CB:cyc(5),colorFF9999,linethick1;
c,color0066FF,linethick1;
C13:cyc(13),color009900;
成本:=cb;
收盘价:=c;
DRAWTEXT(cross(收盘价,成本) and count(cross(收盘价,成本),6)>1,c ,'B玻' ), COLORBLUE;
DRAWTEXT(cross(成本,收盘价),o ,'S思' ), COLORBLUE;
DRAWTEXTABS(35,30,'【红色主图】项 买 顶 逃 短进 买！ 赢'),COLORRED;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'顶'),COLORRED;
DRAWTEXT(CROSS(80,RSI),HIGH * 1.02,'逃'),COLORRED;
X:=LLV(J,2)=LLV(J,8);
Y:=IF(CROSS(J,REF(J+0.01,1)) AND X AND J<20,30,0);
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<20,LOW,'短进'), COLORRED;
DRAWTEXT((MA(CLOSE,13) > MA(CLOSE,18)) AND CROSS(CLOSE,MA(CLOSE,4)) AND (MA(CLOSE,4) < MA(CLOSE,13)),(LOW)*(0.992),'赢'), COLORRED;
VAR1:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);
VAR2:=8;
CC:=CROSS(VAR1,VAR2);
DRAWTEXT(CC,L*0.98,'买！'),COLORRED;
DRAWTEXTABS(145,45,'【WD.K线 】买2 卖2 双箭头'),COLORWHITE;
买线:EMA(C,2),pointdot,color0000DD;
卖线:EMA(SLOPE(C,21)*20+C,42),pointdot,color00DD00;
BU:=cross(买线,卖线);
SEL:=cross(卖线,买线);
drawtext(bu,LOW-0.05,'买2'),COLORWHITE,LINETHICK3;
drawtext(sel,HIGH+0.10,'卖2'),COLORWHITE,linethick3;
DRAWicon(BU,l-0.1,7),LINETHICK5;
DRAWicon(SEL,h+0.05,8),LINETHICK5;
DRAWicon(BU,l-0.085,7),LINETHICK5;
DRAWicon(SEL,h+0.035,8),LINETHICK5;
G:=(HIGH+LOW+CLOSE+OPEN)/4;
MA3:=MA(G,3);
MA5:=MA(G,5);
MA7:=MA(G,7);
MA10:=MA(G,10);
BOLL:=MA(G,20);
UPPER:=BOLL+2*STD(G,20);
LOWER:=BOLL-2*STD(G,20);
DRAWTEXT(CROSS(UPPER,CLOSE),H*1.05,'减仓'),colorFF00FF,LINETHICK3;
DRAWICON(CROSS(UPPER,CLOSE),H*1.03,2);
DRAWTEXT(COUNT(CROSS(UPPER,CLOSE),2)>=1,H*1.01,'清仓'),colorFF00FF,LINETHICK3;
DRAWICON(COUNT(CROSS(UPPER,CLOSE),2)>=1,H*1.02,2);
DRAWTEXT(COUNT(CROSS(MA3,MA7),2)>=1 AND CLOSE> REF (CLOSE,1),H*1.01,'开买'),colorFF00FF,LINETHICK3;
DRAWICON(COUNT(CROSS(MA3,MA7),2)>=1 AND CLOSE> REF (CLOSE,1),H*1.02,1);
DRAWTEXTABS(5,0,'主图：'),COLORRED;DRAWTEXTABS(35,0,'【变色龙】买1 卖1 B1玻 S1思'),COLORRED;
DRAWTEXTABS(5,15,'副图：'),COLORRED;
DRAWTEXTABS(35,15,'【BOLL主图】量能量价走势分析及指导，追 单箭头'),COLORYELLOW;
DRAWTEXTABS(35,45,'【短线买卖】B玻 S思'),COLORBLUE;
DRAWTEXTABS(35,30,'【红色主图】项 买 顶 逃 短进 买！ 赢'),COLORRED;
DRAWTEXTABS(145,45,'【WD.K线 】买2 卖2 双箭头'),COLORWHITE;
DRAWTEXTABS(35,60,'【自编辑 】减仓 清仓 开买'),colorFF00FF;
{M 10 1 30 1}
止盈线:(MA(CLOSE,M) * 1.15),Color0000FF;
分水岭:(MA(CLOSE,M) * 1),COLORWHITE;
止损线:(MA(CLOSE,M) * 0.85),Color00FF80;
总股本:=FINANCE2(35) ;
流通股:=FINANCE2(37);
限售A股:=FINANCE2(41);
每股收益:=FINANCE2(3);
市盈率:=DYNAINFO(39);
每股公积金:=FINANCE2(7);
x9:FORCAST(c,9),Colorwhite,LINETHICK2;
llx:=llv(FORCAST(c,9),2);
DRAWGBKLAST(DYNAINFO(3)
DRAWTEXTREL(550,900,STKLABEL+' '+STKNAME+' '+DYNAINFO(7)+'元'+' '+DYNAINFO(14)*100+'%'),LINETHICK4,COLORFFFF00;
PARTLINE(x9,x9=llx,rgb(255,205,0),x9<>llx,rgb(255,0,0)),linethick4;
{24}
{柱图}
STICKLINE(c>=o and o<>0,HIGH,LOW,0.5,0),color0000CD;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,8,0),color070084;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,7,0),color0000A3;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,6,0),color0000B7;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,5,0),color0000CD;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,4,0),color0000E9;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,2,0),color0754E9;
STICKLINE(c>=o and o<>0,CLOSE,OPEN,0.5,0),Color68B8FF;
STICKLINE(c
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
{43}
DRAWGBK(c,'7' );
Var3:=LLV(H,240);
Var4:=100*(C-Var3)/Var3;
Var5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
Var6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
{Var7:=0;}
Var8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
Var9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VarA:=BARSCOUNT(C);
VarB:=Var8<20 AND Var9<23 AND VarA>35;
VarC:=VarB AND COUNT(VarB,1)=1;
VarD:=EMA(C,21)-EMA(C,8);
VarE:=EMA(VarD,5);
VarF:=TROUGH(3,6,1)<4 AND CROSS(VarD,VarE);
Var10:=IF(TROUGH(3,16,1)=0 AND H>L+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)
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)
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)
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)
Var19:=EMA(C,2)-EMA(C,150);
Var1A:=EMA(Var19,100);
Var1B:=2*(Var19-Var1A);
Var1C:=POW(Var1B,3)*0.1+POW(Var1B,1);
Var1D:=SQRT(SQRT(L*H*O*C));
Var1E:=EMA(Var1D*0.97,3);
Var1F:=(H+L+C)/3;
Var20:=(Var1F-MA(Var1F,14))/(0.015*AVEDEV(Var1F,14));
Var21:=CROSS(Var1E,L);
买点1:=Var10;
买点2:=(Var11+Var13+Var15+Var17);
卖点1:=(Var12+Var14+Var16+Var18);
Var22:=买点1 AND VarF AND VarC AND Var21 AND Var4<0AND Var5=0 AND Var6=0 AND Var20<(-110);
DRAWTEXT(买点1>0,L-0.05,'B1玻'),LINETHICK3,ALIGN1,COLORRED;{B1玻}
DRAWTEXT(买点2>0,L-0.10,{'B1玻'}'买1'),LINETHICK3,ALIGN1,COLORRED;{B1玻}
DRAWTEXT(卖点1>0,H+0.15,{'S1思'}'卖1'),LINETHICK3,ALIGN1,COLORRED;{S1思}
{83}
{十字光标提示}
a:="LTFunc6@FORLT2";
s1:="LTFunc6@LT_S1";
hs:="LTFunc6@LT_HS";
ls:="LTFunc6@LT_LS";
p1:="LTFunc6@LT_P1";
upp:="LTFunc6@LT_UPP";
udd:="LTFunc6@LT_UDD";
{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};
d1:=ema(abs("ddx.ddx"),60);
d2:=max("ddx.ddx"/d1+7.5,7.5);
d3:=min("ddx.ddx"/d1,10);
fb:=if(s1=0,hs,ls);
tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现"卖"点\n','若明日收盘价>'+numtostrn(upp,2)+',出现"买"点\n');{1.BS点:}
tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价>'+numtostrn(hs,2)+'短线买入机会');{2.短线:}
tr2:=ifs(p1=1,ifs(cross(p1,0),'"买"点','持股'),ifs(cross(1,p1),'"卖"点','持币'));{1.BS点:}
tr3:=ifs(s1=0,'向下,','向上,');{2.短线:}
tr4:='3.能量级别:'+numtostrn(d3,1)+'级';{3.能量级别:}
{102}
c1:=INTPART(cyc(5)*100*0.96)/100;
p2:=intpart(ref(cyc(5),1)*100)/100;
p3:=intpart(ref(cyc(5),1)*0.96*100)/100;
vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100);
p40:=intpart(maxcyc*100)/100;
p41:=intpart(ref(MAXCYC,1)*100)/100;
p4:=p1=0 and c>p2 or (ref(vol/100,1)
p5:=p1=1 and c
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'持币');{4.}
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'持股');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'明日收盘价跌破'+str(min(c1,p40))+'卖出');
{117}
bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+'买卖点决策系统提示\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS点:'+tr2+','+tr0+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'2.短线:'+tr3+tr1+'\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+tr4;
drawflagtext(1,fb,bs);
DRAWTEXTABS(35,15,'【BOLL主图】量能量价走势分析及指导，追 单箭头'),COLORYELLOW;
A4:=MA(CLOSE,20);
A5:=(CLOSE > MA(CLOSE,5));
A6:=(MA(CLOSE,5) > MA(CLOSE,10));
A7:=(CLOSE > MA(CLOSE,10));
A8:=(MA(CLOSE,5) > MA(CLOSE,20));
A9:=(CLOSE > MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4 > A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
阻力位:=IF((CLOSE > 200),(CLOSE * 1.01),(CLOSE * 1.07));
阻力位１:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位);
止损位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93));
止损位１:=IF((CLOSE < 10),(CLOSE * 0.95),止损位);
TJTS1:=BARSTATUS=2 and c<200;
TJTS2:=BARSTATUS=2 and c>200;
k2:=hhv(h,barslast(DISPSTATUS=1)+1);
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股放量下跌，走势明显偏弱，离场观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股缩量下跌，走势偏弱，离场观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态良好，强势明显，量能充足，可以继续持有。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股走势趋弱，量能不足，减持大部分筹码。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态不佳，注意成交量的变化，但目前不适合参与。 '),ALIGN2;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。 '),ALIGN2;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股有走强迹象，但量能不足，趋势不明，不适合操作。 '),ALIGN2;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股走势太弱，没有参与价值。 '),ALIGN2;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.99,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右， '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.98,' 如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 < V2)) ,k2*0.99,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌， '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 < V2)) ,k2*0.98,' 可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(1,AVX) AND (V1 >= V2)) ,k2*0.99,'大盘形态走坏，重仓者可以减去大部分仓位。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS2 and (CROSS(1,AVX) AND (V1 < V2)) ,k2*0.99,'大盘缩量调整，注意风险，短线清仓观望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS2 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) ,k2*0.99,'大盘走势良好，量能理想，可以继续持有强势股。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) ,k2*0.99,'大盘形态良好，但量能稍显不足，随时准备减仓。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) ,k2*0.99,'大盘趋势不明，注意成交量变化，目前不适宜进场。 '),ALIGN2;
DRAWTEXT(TJTS2 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) ,k2*0.99,'大盘趋势向下，量能萎缩，不适合进场。 '),ALIGN2;
DRAWTEXTABS(35,45,'【短线买卖】B玻 S思'), COLORBLUE;
CB:cyc(5),colorFF9999,linethick1;
c,color0066FF,linethick1;
C13:cyc(13),color009900;
成本:=cb;
收盘价:=c;
DRAWTEXT(cross(收盘价,成本) and count(cross(收盘价,成本),6)>1,c ,'B玻' ), COLORBLUE;
DRAWTEXT(cross(成本,收盘价),o ,'S思' ), COLORBLUE;
DRAWTEXTABS(35,30,'【红色主图】项 买 顶 逃 短进 买！ 赢'),COLORRED;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'顶'),COLORRED;
DRAWTEXT(CROSS(80,RSI),HIGH * 1.02,'逃'),COLORRED;
X:=LLV(J,2)=LLV(J,8);
Y:=IF(CROSS(J,REF(J+0.01,1)) AND X AND J<20,30,0);
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<20,LOW,'短进'), COLORRED;
DRAWTEXT((MA(CLOSE,13) > MA(CLOSE,18)) AND CROSS(CLOSE,MA(CLOSE,4)) AND (MA(CLOSE,4) < MA(CLOSE,13)),(LOW)*(0.992),'赢'), COLORRED;
VAR1:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);
VAR2:=8;
CC:=CROSS(VAR1,VAR2);
DRAWTEXT(CC,L*0.98,'买！'),COLORRED;
DRAWTEXTABS(145,45,'【WD.K线 】买2 卖2 双箭头'),COLORWHITE;
买线:EMA(C,2),pointdot,color0000DD;
卖线:EMA(SLOPE(C,21)*20+C,42),pointdot,color00DD00;
BU:=cross(买线,卖线);
SEL:=cross(卖线,买线);
drawtext(bu,LOW-0.05,'买2'),COLORWHITE,LINETHICK3;
drawtext(sel,HIGH+0.10,'卖2'),COLORWHITE,linethick3;
DRAWicon(BU,l-0.1,7),LINETHICK5;
DRAWicon(SEL,h+0.05,8),LINETHICK5;
DRAWicon(BU,l-0.085,7),LINETHICK5;
DRAWicon(SEL,h+0.035,8),LINETHICK5;
G:=(HIGH+LOW+CLOSE+OPEN)/4;
MA3:=MA(G,3);
MA5:=MA(G,5);
MA7:=MA(G,7);
MA10:=MA(G,10);
BOLL:=MA(G,20);
UPPER:=BOLL+2*STD(G,20);
LOWER:=BOLL-2*STD(G,20);
DRAWTEXT(CROSS(UPPER,CLOSE),H*1.05,'减仓'),colorFF00FF,LINETHICK3;
DRAWICON(CROSS(UPPER,CLOSE),H*1.03,2);
DRAWTEXT(COUNT(CROSS(UPPER,CLOSE),2)>=1,H*1.01,'清仓'),colorFF00FF,LINETHICK3;
DRAWICON(COUNT(CROSS(UPPER,CLOSE),2)>=1,H*1.02,2);
DRAWTEXT(COUNT(CROSS(MA3,MA7),2)>=1 AND CLOSE> REF (CLOSE,1),H*1.01,'开买'),colorFF00FF,LINETHICK3;
DRAWICON(COUNT(CROSS(MA3,MA7),2)>=1 AND CLOSE> REF (CLOSE,1),H*1.02,1);