股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索

[通达信] 〖十脉擒龙〗以波动率自适应动态均线作为计算核心完美主图源码


   
楼主
2026-9-7 14:15:08



波动率:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);

动态均线:=DMA(CLOSE,波动率);

高抛线:(1+14/100)*动态均线,COLORGREEN;

压力线:(1+7/100)*动态均线,DOTLINE,COLORFFFF00;

支撑线:(1-7/100)*动态均线,DOTLINE,COLORBLUE;

低吸线:(1-14/100)*动态均线,COLORRED;

中轴线:(压力线+支撑线)/2,COLORMAGENTA,LINETHICK2;

DRAWTEXT(BARSTATUS=2,高抛线,'高抛'),COLORGREEN;

DRAWTEXT(BARSTATUS=2,压力线,'压力'),COLORFFFF00;

DRAWTEXT(BARSTATUS=2,中轴线,'中轨'),COLORMAGENTA;

DRAWTEXT(BARSTATUS=2,支撑线,'支撑'),COLORBLUE;

DRAWTEXT(BARSTATUS=2,低吸线,'低吸'),COLORRED;

ZFB:=(H-L)/L*100;

SBWZB:=(C-L)/L*100;

LBJD:=SBWZB/ZFB*100;

DRAWRECTREL(40,850,70,150,RGB(0,255,0));

DRAWRECTREL(70,CONST(850-LBJD*7),40,850,RGB(255,0,0));

DRAWRECTREL(70,150,40,850,RGB(0,0,0));

JJJ:=(3*C+O+L+H)/6;

网:DRAWTEXT_FIX(1,0.70,0,0,'☆ ☆'),COLOR222222;

WMA20:=(20*JJJ+19*REF(JJJ,1)+18*REF(JJJ,2)+17*REF(JJJ,3)+16*REF(JJJ,4)+15*REF(JJJ,5)+14*REF(JJJ,6)+13*REF(JJJ,7)+12*REF(JJJ,8)+11*REF(JJJ,9)+10*REF(JJJ,10)+9*REF(JJJ,11)+8*REF(JJJ,12)+7*REF(JJJ,13)+6*REF(JJJ,14)+5*REF(JJJ,15)+4*REF(JJJ,16)+3*REF(JJJ,17)+2*REF(JJJ,18)+REF(JJJ,20))/210,COLORF0F000;

MA5S:=MA(WMA20,5),COLORYELLOW,LINETHICK1;

SPJ:=(C+L+H)/3;

INSIG:=CROSS(WMA20,MA5S);

OUTSIG:=CROSS(MA5S,WMA20);

DRAWICON(INSIG,L*0.95,1);

DRAWICON(CROSS(WMA20,MA5S),L*0.97,7);

DRAWICON(OUTSIG,H*1.04,2);

DRAWICON(CROSS(MA5S,WMA20),H*1.02,8);

STICKLINE(WMA20>=MA5S,L,H,0,1)+网,COLORRED;

STICKLINE(WMA20>=MA5S,C,O,3.2,0)+网,COLORRED;

STICKLINE(WMA20<MA5S,L,H,0,1)+网,COLOR00FF00;

STICKLINE(WMA20<MA5S,C,O,3.2,0)+网,COLOR00FF00;

STICKLINE(CROSS(MA5S,WMA20),O,C,3.2,0),COLOR00FF00;

STICKLINE(CROSS(WMA20,MA5S),O,C,3.2,0),COLORRED;

STICKLINE(C>O AND WMA20<MA5S,C,O,3.2,0)COLOR00FF00;

STICKLINE(C>O AND WMA20>=MA5S,C,O,3.2,0)COLORRED;

STICKLINE(C<O AND WMA20<MA5S,C,O,3.2,0)COLOR00FF00;

STICKLINE(C<O AND WMA20>=MA5S,C,O,3.2,0)COLORRED;

EMA1:=EMA(C,1);

EMA5:=EMA(EMA1,5),COLORYELLOW;

PHASEHI:=EMA(HHV(EMA5,5),1);

HI1:=EMA(HHV(PHASEHI,17),1),COLORFF00FF;

HI2:=EMA(HHV(HI1,17),2),COLORFF80FF;

STRBRK:=C>O AND (C/EMA(HHV(HI2,17),3)-1)*100>0.5;

DRAWTEXT(STRBRK,EMA(HHV(HI2,17),3)*1.0,'强')COLORFF0000;



DRAWTEXT_FIX(1,0,0.2,0,'BUY买股【出现 B K线红色 买股信号=YES】'),COLOR0000FF;

DRAWTEXT_FIX(1,0,0.25,0,'SELL卖股【出现S K线绿色 卖股信号=NO】'),COLOR00FF00;

DRAWTEXT_FIX(1,0,0.3,0,'友情提醒【更多指标股朋网www.】'),COLOR00FFFF;

TCAP:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');

FCAP:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');

FMV:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');

FUND:=STRCAT(' 每股公积金:',CON2STR(FINANCE(18),2));

UDIST:=STRCAT(' 每股未分利润:',CON2STR(FINANCE(32),2));

NAV:=STRCAT(' 每股净资产:',CON2STR(FINANCE(34),2));

利润增长:FINANCE(43),COLORYELLOW,NODRAW;

FUNDINFO:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(TCAP,FCAP),FMV),FUND),UDIST),NAV);

DRAWTEXT_FIX(ISLASTBAR,0,0.02,0,FUNDINFO),COLOR00C0C0;

PREVC:=REF(C,1);

NLMT:=IF((C-PREVC)*100/PREVC>=(10-0.01*100/PREVC),1,0);

ZT:=NLMT;

NLMD:=IF((PREVC-C)*100/PREVC>=(10-0.01*100/PREVC),1,0);

DT:=NLMD;

ZTCNT:=COUNT(NLMT,BARSSINCE(NLMT)+1);

DTCNT:=COUNT(NLMD,BARSSINCE(NLMD)+1);

DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.66,0.02,0,ZTCNT),COLORWHITE;

DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.79,0.02,0,DTCNT),COLORWHITE;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.55,0.02,0,'上市以来共涨停'),COLORYELLOW;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.70,0.02,0,'上市以来共跌停'),COLOR008000;

VMA5:=MA(V,5);

VMA20:=MA(V,20);

VRATIO:=V/VMA20;

PCT:=(C-REF(C,1))/REF(C,1)*100;

ZTBD:=C>=ZTPRICE(REF(C,1),0.1) AND C=H;

DBLV:=V>=REF(V,1)*2;

DBLVOK:=VRATIO>=2 AND PCT>3 AND C>=HHV(H,6) AND C>EMA(C,13);

DBLVGO:=DBLVOK AND REF(DBLVOK,1)=0;

DRAWTEXT(DBLVGO,L*0.98,'★倍量启动'),COLOR00FFFF;

REZT:=COUNT(ZTBD,20)>=1;

CVUP:=EVERY(V>VMA5,3);

TRUP:=C>MA(C,20) AND MA(C,20)>REF(MA(C,20),1);

CUMPCT:=(C-REF(C,10))/REF(C,10)*100;

MAINWV:=REZT AND CVUP AND TRUP AND CUMPCT>15;

MAINWVOK:=MAINWV AND REF(MAINWV,1)=0;

DRAWTEXT(MAINWVOK,H*1.02,'▲主升浪'),COLORMAGENTA;

PREPCT:=(HHV(H,30)-LLV(L,30))/LLV(L,30)*100;

PRESTR:=PREPCT>20;

CONSDAYS:=BARSLAST(C>HHV(H,15));

CONSOK:=CONSDAYS>=3 AND CONSDAYS<=12;

CONSVS:=SUM(V,CONSDAYS)/CONSDAYS<REF(HHV(V,20),CONSDAYS)*0.7;

NOBRK:=EVERY(C>MA(C,10),CONSDAYS);

PLATHI:=REF(HHV(H,CONSDAYS),1);

REBRK:=C>PLATHI AND V>VMA5*1.5;

AIRGAS:=PRESTR AND CONSOK AND CONSVS AND NOBRK AND REBRK;

AIRGASOK:=AIRGAS AND REF(AIRGAS,1)=0;

DRAWTEXT(AIRGASOK,H*1.02,'空中加油'),COLORCYAN;

ZTPOS:=BARSLAST(ZTBD);

ZTLO:=REF(L,ZTPOS);

ZTHI:=REF(H,ZTPOS);

HOLDBK:=EVERY(L>=ZTLO*0.97,ZTPOS);

HMQLV:=DBLV AND C>O AND C>ZTHI;

HMQ:=ZTPOS>=2 AND ZTPOS<=15 AND HOLDBK AND HMQLV;

HMQOK:=HMQ AND REF(HMQ,1)=0;

DRAWTEXT(HMQOK,L*0.97,'◆回马'),COLORFF00FF;

UPTREND:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,20);

PULLBK:=L<=MA(C,20)*1.02 AND L>=MA(C,20)*0.98;

SHRINK:=V<VMA5*0.5;

STABY:=C>O AND C>REF(C,1);

SHRINKBK:=UPTREND AND PULLBK AND SHRINK AND STABY;

SHRINKOK:=SHRINKBK AND REF(SHRINKBK,1)=0;

DRAWTEXT(SHRINKOK,L*0.98,'▽缩量回踩'),COLORBLUE;

CONY:=C>O AND REF(C,1)>REF(O,1) AND REF(C,2)>REF(O,2);

CVOLUP:=V>REF(V,1) AND REF(V,1)>REF(V,2);

MILDRS:=PCT<5 AND REF(PCT,1)<5 AND REF(PCT,2)<5;

ABVMA5:=C>MA(C,5);

CONYACC:=CONY AND CVOLUP AND MILDRS AND ABVMA5;

CONYACCOK:=CONYACC AND REF(CONYACC,1)=0;

DRAWTEXT(CONYACCOK,L*0.98,'≡连阳蓄力'),COLORYELLOW;

GAPUP:=O>REF(H,1);

STRGAP:=GAPUP AND PCT>5 AND V>VMA5*1.5;

BRKHI20:=C>REF(HHV(H,20),1);

GAPBRK:=STRGAP AND BRKHI20;

GAPBRKOK:=GAPBRK AND REF(GAPBRK,1)=0;

DRAWTEXT(GAPBRKOK,H*1.02,'跳空突破'),COLORRED;

BOTZONE:=C<=LLV(L,60)*1.1;

BOTVOL:=V>=VMA20*2;

REVC:=PCT>5 AND C>O;

ABVMA10:=C>MA(C,10);

BOTREV:=BOTZONE AND BOTVOL AND REVC AND ABVMA10;

BOTREVOK:=BOTREV AND REF(BOTREV,1)=0;

DRAWTEXT(BOTREVOK,L*0.97,' 底部反转'),COLORGREEN;

PREMAIN:=(HHV(H,40)-LLV(L,40))/LLV(L,40)*100>30;

PULLOK:=L<=MA(C,20)*1.03 AND L>=MA(C,20)*0.95;

STABY2:=C>O AND V<REF(V,1) AND REF(V,1)<REF(V,2);

WAVE2:=PREMAIN AND PULLOK AND STABY2 AND DBLV AND C>O;

DRAGONOK:=WAVE2 AND REF(WAVE2,1)=0;

DRAWTEXT(DRAGONOK,L*0.97,'◎龙回头'),COLORFF8000;

VOLSTAG:=V>REF(V,1) AND C<REF(C,1) AND REF(V,1)>REF(V,2) AND REF(C,1)<REF(C,2);

CONSTAG:=VOLSTAG AND REF(VOLSTAG,1);

HISHAD:=H>MA(C,20)*1.2 AND (H-C)/(H-L)>0.6 AND V>VMA20*2;

RISK:=CONSTAG OR HISHAD;

RISKOK:=RISK AND REF(RISK,1)=0;

DRAWTEXT(RISKOK,H*1.03,'风险'),COLORGREEN;

SCORE:=DBLVGO*15+MAINWVOK*20+AIRGASOK*20+HMQOK*18+SHRINKOK*12+CONYACCOK*10+GAPBRKOK*15+BOTREVOK*15+DRAGONOK*20+RISKOK*(-20);

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.9,0.05,2,'★ 形态信号强度评分:'),COLORWHITE;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.95,0.05,2,CON2STR(SCORE,0)),COLORRED;
















未
回复

举报