神獒能量分析量能趋势变化(大智慧),股市航灯主图(大智慧)

神獒能量分析量能趋势变化(大智慧),股市航灯主图(大智慧)

神獒能量分析量能趋势变化(大智慧)

{?神獒能量}input:N(5,1,111),M(21,1,1111),N1(60,1,111);

DRAWGBK((CLOSE > 0),stRIP(RGB(4,1,28),RGB(4,1,35),0));

换:IF((CLOSE > 800),AMOUNT,((vol/ CAPITAL) * 100)),VOLSTICK;

a1:=(((ma(换,5)) + (ema(换,15))) + (MA(换,25))) / 3;

a2:=a1 * 1.382;a3:=a1 * 0.618;

a4:=a1 * 1.618;

a5:=a1 * 0.382;

防守量:((MA(换,6)) + (MA(换,12))) / 2,linethick0;攻击量:防守量 * 1.2,linethick0;

a6:=EMA(CLOSE,6);

a7:=MA(CLOSE,21);

短期量能:MA(换,N),linethick1,Color35AD18;

PARTLINE(短期量能,短期量能 > (REF(短期量能,3)),RGB(255,0,0)),linethick1,colorRed;

中期量能:MA(换,M),linethick2,Color35AD18;

a8:=((换 <= (LLV(换,20))) AND (换 < a3)) AND (((a6 >= a7) OR ((a7 > (REF(a7,2))) AND (CLOSE > a7))) OR (a6 >= (REF(a6,1))));

PARTLINE(中期量能,中期量能 > (REF(中期量能,3)),RGB(255,0,0)),linethick2,colorRed;

STICKLINE(a8,换,0,8,0),Color8C0C80;

STICKLINE((换 <= a5),换,0,8,0),ColorFF0000;

a9:=CLOSE / (REF(CLOSE,1));

STICKLINE(((换 <= 1.5) AND (a9 > 1.03)),换,0,8,0),colorYellow;

STICKLINE(((换 < 0.6) AND (a9 >= 1.02)),换,0,8,0),colorYellow;

a10:=100 * WINNER(CLOSE);

DRAWTEXT((((换 <= 1.5) AND (a9 > 1.03)) OR ((a10 > 85) AND (换 <= 3))),-0.1,'控'),ColorC05693;

a11:=换 / (((HIGH - LOW) * 2) - Abs((CLOSE - OPEN)));

a12:=IF((CLOSE > OPEN),(a11 * (HIGH - LOW)),(IF((CLOSE < OPEN),(a11 * ((HIGH - OPEN) + (CLOSE - LOW))),(换 / 2))));

a13:=IF((CLOSE > OPEN),(0 - (a11 * ((HIGH - CLOSE) + (OPEN - LOW)))),(IF((CLOSE < OPEN),(0 - (a11 * (HIGH - LOW))),(0 - (换 / 2)))));

a14:=a12 + a13;

STICKLINE((a14 < -0.8),0,a14,4,0),linethick3,Color35AD18;

a15:=((SMA((MAX((CLOSE - (REF(CLOSE,1))),0)),6,1)) / (SMA(ABS((CLOSE - (REF(CLOSE,1)))),6,1))) * 100;

DRAWTEXT(((DATE <13091008) AND (crOSS(88,a15))),0,'■卖出'),ColorF2A3A4;

a16:=换 = (HHV(换,10));

IF(a16,换,(REF(换,BArslAST(a16)))),DOTLINE,colorYellow;

DRAWTEXT(((((OPEN / (REF(CLOSE,1))) > 1.03) AND (CLOSE < OPEN)) AND a16),(换 * 1.13),'?'),ALIGN1,colorGreen;

DRAWTEXT(((((CROSS(换,短期量能)) AND (CROSS(换,中期量能))) AND ((CLOSE >= a6) OR (CROSS(CLOSE,a6)))) AND (CLOSE > OPEN)),(换 * 1.13),'▲'),ALIGN1,colorRed;

DRAWTEXTREL(10,900,'?十二星座*神獒赢富?'),linethick1,COLOR00EEff;

股市航灯主图(大智慧)

{股市航灯5}TJTS:=BARstATUS=2;

cg:=hhv(h,125);

cgl:=llv(h,125);

j:=(cg-cgl)/8;

IF C>0 AND TJTS THEN BEGINDRAWTEXT(C>0,cg*1.04,'股市航灯 '),LINETHICK6,Coloryellow,ALIGN2;

DRAWTEXT(C>0,cg*1.04,STKLABEL+' '+STKNAME+' '),LINETHICK6,ColorFFFF80,ALIGN2;

DRAWTEXT(C>0,cg*1.04,' '+ '流通:'+NUMTOSTRN( FINANCE(7),0 )+' '+'换手:'+NUMTOSTRN( DYNAINFO(37)*100,3 )+' '),LINETHICK3,ColorFFFF80,ALIGN2;end;

fs:=SMA(h,21,2)*1.05;

ls:=sma(l,21,2)*0.95;

bd:=sma(l,5,1);

rd:=sma(c,2,1);

航灯１:=if(cross(rd,bd),fs*1.05,bd);

航灯２:=if(cross(rd,fs),fs*1.1,ls);

前兆:=航灯１;

fillrgn(bd,航灯１,航灯１>bd),colorff9900;

PARTLINE(航灯１,航灯１>bd),POINTDOT,LINETHICK7,colorff9900;

PARTLINE(航灯１,航灯１>bd),POINTDOT,LINETHICK3,colorffffff;

fillrgn(ls,航灯２,航灯２>ls),color0000ff;

PARTLINE(航灯２,航灯２>ls),POINTDOT,LINETHICK7,color0000ff;

PARTLINE(航灯２,航灯２>ls),POINTDOT,LINETHICK3,colorffffff;

热点:=航灯２;

上线:sma(h,21,2)*1.05,color0000ff;

IF rd>上线 and TJTS THEN DRAWTEXT(C>0,cg*1.04,'热点持续区：辨别黑马'),LINETHICK3,color0000ff,ALIGN2;中线:bd,colorff00ff;

下线:sma(l,21,2)*0.95,color00ffff;

股市:rd,POINTDOT,LINETHICK7,color00ff00;

PARTLINE(股市,c>0),POINTDOT,LINETHICK3,colorffffff;

life:=(ema(c,60)+ema(c,90))/2;

var1:=(2*c+h+l)/4;

snook:=ema(var1,99)*0.91;

IF c>life AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'操作区域分析：多头区域 '),LINETHICK3,color3300ff,ALIGN2;

IF c<=life AND c>=snook AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'操作区域分析：盘整区域 '),LINETHICK3,colorff0066,ALIGN2;

IF c0,cg-1.1*j,'操作区域分析：空头区域 '),LINETHICK3,color99ff33,ALIGN2;

vVar1:=DYNAINFO(17)*REF(MA(vol,5),1);

vVar2:=DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT;

Var3:=DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT;

hhsl:=IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,vVar1,vVar2);

hsl:=hhsl/capital*100;

IF hsl<1 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：绝对地量'),LINETHICK3,color33ffcc,ALIGN2;

IF hsl>=1 and hsl<2 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：成交低靡 '),LINETHICK3,color33ffcc,ALIGN2;

IF hsl>=2 and hsl<3 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：成交温和 '),LINETHICK3,color33ffcc,ALIGN2;

IF hsl>=3 and hsl<5 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：成交活跃 '),LINETHICK3,color33ffcc,ALIGN2;

IF hsl>=5 and hsl<8 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：成交带量 '),LINETHICK3,color33ffcc,ALIGN2;

IF hsl>=8 and hsl<15 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：成交放量'),LINETHICK3,color33ffcc,ALIGN2;

IF hsl>=15 and hsl<25 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：成交巨量 '),LINETHICK3,color33ffcc,ALIGN2;

IF hsl>25 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'个股活跃分析：成交怪异 '),LINETHICK3,color33ffcc,ALIGN2;

zslife:=(ema(indexc,60)+ema(indexc,90))/2;

zsbl:=indexc/zslife;

gglife:=(ema(c,60)+ema(c,90))/2;

zstb:=zsbl*gglife;

rsv:=(c-llv(l,15))/(hhv(h,15)-llv(l,15))*100;

kk:=sma(rsv,10,1);

dd:=sma(kk,5,1);

zlcm:=intpart(sma(rsv,10,1));

shcm:=intpart(sma(kk,5,1));

IF (zlcm+shcm)>50 and (zlcm+shcm)<160 AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'精确风险系数%：'+NUMTOSTRN( (zlcm+shcm),2 )+''),LINETHICK3,color6699cc,ALIGN2;

IF ((zlcm+shcm)<=50 or (zlcm+shcm)>=160) AND TJTS THEN DRAWTEXT(C>0,cg-1.1*j,'精确风险系数%：'+NUMTOSTRN( -(zlcm+shcm),2 )+''),LINETHICK3,color6699cc,ALIGN2;

aa13:=ema(winner(c)*70,3);

bb13:=ema((winner(c*1.1)-winner(c*0.9))*80,3);

IF aa13>bb13 AND TJTS THEN DRAWTEXT(C>0,cg-2.1*j,'主力控盘系数%：'+NUMTOSTRN( aa13/(aa13+bb13)*100,2 )+' '),LINETHICK3,color0000ff,ALIGN2;

IF aa130,cg-2.1*j,'散户套牢系数%：'+NUMTOSTRN( bb13/(aa13+bb13)*100,2 )+' '),LINETHICK3,color00ff00,ALIGN2;

bs:=ema(c,21)-1+ema(v,5)/ema(v,40);

hs:=(bs-life)/life*100;

IF c>0 AND TJTS THEN DRAWTEXT(C>0,cg-3.1*j,'高潮乖离系数%：'+NUMTOSTRN(hs,2 )+' '),LINETHICK3,colorffffcc,ALIGN2;

hot:=ma(c,13);

glv:=atan(hot-ref(hot,1))*3.142*100;

IF c>0 AND TJTS THEN DRAWTEXT(C>0,cg-4.1*j,'股价倾斜系数%：'+NUMTOSTRN(glv,2 )+' '),LINETHICK3,colorff6666,ALIGN2;

IF c>0 AND TJTS THEN DRAWTEXT(C>0,cg-5.1*j,'历史价位系数％：'+NUMTOSTRN((c-llv(l,0))/(hhv(h,0)-llv(l,0))*100,2 )+' '),LINETHICK3,color33cc99,ALIGN2;i:=0;

pdi:=sum(max(max(h-l,abs(h-ref(c,1))),abs(l-ref(c,1))),14);

mdi:=h-ref(h,1);

adx:=ref(l,1)-l;

adxr:=sum(if(mdi>0 and mdi>adx,mdi,0),14);

typ:=sum(if(adx>0 and adx>mdi,adx,0),14);

cci:=adxr*100/pdi;

wr:=typ*100/pdi;

mtm:=ma(abs(wr-cci)/(wr+cci)*100,6);

mtmma:=(mtm+ref(mtm,6))/2;

IF cross(cci,wr) AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号 '),LINETHICK3,color0099ff,ALIGN2;i:=i+1 ;end;

IF cross(wr,cci) AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号 '),LINETHICK3,colorff0000,ALIGN2;i:=i+1 ;end;

IF mtm>ref(mtm,1) AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'ADX值持续高于前一日，行情将维持原趋势'),LINETHICK3,colorffff00,ALIGN2;i:=i+1 ;end;

IF mtm

DRAWTEXT(C>0,cg-(2.1+i)*j,'ADX值递减，降到20以下，且横向行进时，气氛为盘整 '),LINETHICK3,color00ffff,ALIGN2;i:=i+1 ;end;

IF mtmref(mtm,3) and ref(mtm,3)>ref(mtm,4) AND TJTS THEN BEGIN

DRAWTEXT(C>0,cg-(2.1+i)*j,'ADX值从上升倾向转为下降时，表明行情即将反转'),LINETHICK3,color0099ff,ALIGN2;i:=i+1 ;end;

lc:=(h+l+c)/3;

rsi1:=(lc-ma(lc,14))/0.015*avedev(lc,14);

rsi2:=-(100*(hhv(h,14)-c)/(hhv(h,14)-llv(l,14)));

IF rsi1<-180 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'CCI指标底位，买入机会 '),LINETHICK3,color00ffff,ALIGN2;i:=i+1 ;end;

IF rsi1>180 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'CCI指标高位，卖出机会 '),LINETHICK3,color00ff00,ALIGN2;i:=i+1 ;end;

IF v/capital>0.075 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'换手过大，小心主力出逃，短期头部'),LINETHICK3,colorffff00,ALIGN2;i:=i+1 ;end;

IF rsi2>-20 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'W&R超买，短线即将见顶，应及时卖出 '),LINETHICK3,color00ffff,ALIGN2;i:=i+1 ;end;

IF rsi2<-80 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'W&R超卖，短线即将见底，应伺机买进 '),LINETHICK3,colorffff00,ALIGN2;i:=i+1 ;end;PSY:=c-ref(c,6);

布林１:=ma(psy,6);

IF cross(psy,布林１) and 布林１<-0.8 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'MTM从下向上突破MTMMA，买入信号 '),LINETHICK3,color00ff00,ALIGN2;i:=i+1 ;end;

IF cross(布林１,psy) and 布林１>0.8 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'MTM从上向下跌破MTMMA，卖出信号 '),LINETHICK3,color00ff00,ALIGN2;i:=i+1 ;end;

布林２:=ref(c,1);

布林３:=sma(max(c-布林２,0),6,1)/sma(abs(c-布林２),6,1)*100;

布林４:=sma(max(c-布林２,0),12,1)/sma(abs(c-布林２),12,1)*100;

IF 布林３>80 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'6日RSI向上突破85，超买,考虑卖出 '),LINETHICK3,colorffff00,ALIGN2;i:=i+1 ;end;

IF 布林３<15 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'6日RSI超卖,随时有可能反弹，考虑买入 '),LINETHICK3,colorffff00,ALIGN2;i:=i+1 ;end;

IF cross(布林３,15) AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'6日RSI向上突破15，买进信号 '),LINETHICK3,color00ffff,ALIGN2;i:=i+1 ;end;

IF cross(布林３,85) AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'6日RSI向下跌破85，卖出信号 '),LINETHICK3,color00ff00,ALIGN2;i:=i+1 ;end;

布林５:=count(c>ref(c,1),12)/12*100;

布林６:=(ma(c,3)+ma(c,6)+ma(c,12)+ma(c,24))/4;

布林７:=布林６+3*std(布林６,10);xx:=布林６-3*std(布林６,10);

a001:=(布林７-xx)/布林７<0.03;a002:=(布林７-xx)/布林７>0.18;a003:=(ma(c,60)-ma(c,5))/ma(c,60)>0.15;

a004:=(ma(c,5)-ma(c,60))/ma(c,5)>0.15;IF a001 AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'多空布林收敛中，有变盘的可能，上下自己分析 '),LINETHICK3,colorffff00,ALIGN2;i:=i+1 ;end;

IF a003 and a002 and c>o AND TJTS THEN BEGINDRAWTEXT(C>0,cg-(2.1+i)*j,'布林上下乖离太大，有反弹的可能 '),LINETHICK3,color00ffff,ALIGN2;i:=i+1 ;end;

IF a004 and a002 and c0,cg-(2.1+i)*j,'布林上下乖离太大，有回落的可能 '),LINETHICK3,color00ff00,ALIGN2;i:=i+1 ;end;

IF h>=hhv(h,20) AND TJTS THEN BEGINDRAWTEXT(C>0,cg-1.1*j,'创20天新高'),LINETHICK3,colorffff00,ALIGN2;end;

牛市通网是一个牛股推荐网与低风险投资知识网，可以在线联系客服领取牛股。牛市通网从权威的投资专家、金融分析师等投资信息中挑选优质的文章进行发布。牛市通网主要为投资者提供股票知识、股票观点、股票分析和明智金融投资讨论等信息。