波动率:=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));
VARG:=(3*C+O+L+H)/6;
WMA20:=(20*VARG+19*REF(VARG,1)+18*REF(VARG,2)+17*REF(VARG,3)+16*REF(VARG,4)+15*REF(VARG,5)+14*REF(VARG,6)+13*REF(VARG,7)+12*REF(VARG,8)+11*REF(VARG,9)+10*REF(VARG,10)+9*REF(VARG,11)+8*REF(VARG,12)+7*REF(VARG,13)+6*REF(VARG,14)+5*REF(VARG,15)+4*REF(VARG,16)+3*REF(VARG,17)+2*REF(VARG,18)+REF(VARG,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;
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;
