 | |  |  |
varl13:=("macd.diff#WEEK"(26,12,9));
varl14:=("macd.dea#WEEK"(26,12,9));
VL:=REF(LOW,1);VH:=REF(H,1);
Var1:=SMA(ABS(H-Vh),13,1)/SMA(MAX(H-Vh,0),13,1)*100;
Var2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100;
Var3:=MA(Var1,13);
Var4:=MA(Var2,13);
Var5:=LLV(L,34);
Var6:=HHV(H,34);
Var7:=EMA(IF(H>=Var6,Var3,0),3);
Var8:=EMA(IF(L<=Var5,Var4,0),3);
var9:=(SMA(SMA((((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54)))*100),7,1),5,1));
var10:=((SMA(((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54))*100),7,1))*16.18)-(var9*10.9);
Var11:=FILTER(IF(var10<=var9ANDVar8>REF(Var8,1),Var8*8,0),55);
Var21:=LLV(LOW,60);
Var31:=HHV(HIGH,60);
Var41:=EMA((CLOSE-Var21)/(Var31-Var21)*100,13);
Var51:=EMA(0.667*REF(Var41,1)+0.333*Var41,21);
varl2:=FILTER(CROSS(Var51,Var41)ANDVar41>84,13);
{K线}
STICKLINE(CLOSE>OPENorCLOSE=OPENandCLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred;
STICKLINE(CLOSE>OPENorCLOSE=OPENandCLOSE>REF(CLOSE,1),OPEN,CLOSE,7,0),colorred;
STICKLINE(CLOSE<OPENorCLOSE=OPENandCLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan;
STICKLINE(CLOSE<OPENorCLOSE=OPENandCLOSE<=REF(CLOSE,1),OPEN,CLOSE,7,0),colorcyan;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0,0),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),COLOR008800;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),COLOR009900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),COLOR00AA00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),COLOR00BB00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,4,0),COLOR00CC00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLOR00DD00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2,0),COLOR00EE00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1,0),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0),COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),COLORFFBBFF;
DRAWTEXTABS(20,0,STKLABEL+''+STKNAME+''),ColorFFFF80;
持股线:MA(C,26),LINETHICK2,COLOR6600FF;
qjj:FILTER((CROSS(varl13,varl14)andvarl14<0andCROSS(c,持股线)),90),LINETHICK0;
DRAWTEXTREL(0,900,'一发千钧告诫朋友:指标是参考,决策在人脑.锁定:分批建仓.霸占:满仓待涨.逃跑:遵守纪律.祝君:股海拾贝沙海淘金'),Color989500;
var100:='所属板块:';
ifinblock('电力')=1thenvar100:=var100+'电力';
ifinblock('电脑')=1thenvar100:=var100+'电脑';
ifinblock('电器')=1thenvar100:=var100+'电器';
ifinblock('电子信息')=1thenvar100:=var100+'电子信息';
ifinblock('房地产')=1thenvar100:=var100+'房地产';
ifinblock('纺织服装')=1thenvar100:=var100+'纺织服装';
ifinblock('钢铁')=1thenvar100:=var100+'钢铁';
ifinblock('工程建筑')=1thenvar100:=var100+'工程建筑';
ifinblock('供水供气')=1thenvar100:=var100+'供水供气';
ifinblock('化工')=1thenvar100:=var100+'化工';
ifinblock('化纤')=1thenvar100:=var100+'化纤';
ifinblock('机械')=1thenvar100:=var100+'机械';
ifinblock('建材')=1thenvar100:=var100+'建材';
ifinblock('交通工具')=1thenvar100:=var100+'交通工具';
ifinblock('交通设施')=1thenvar100:=var100+'交通设施';
ifinblock('教育传媒')=1thenvar100:=var100+'教育传媒';
ifinblock('金融')=1thenvar100:=var100+'金融';
ifinblock('旅游酒店')=1thenvar100:=var100+'旅游酒店';
ifinblock('煤炭石油')=1thenvar100:=var100+'煤炭石油';
ifinblock('酿酒食品')=1thenvar100:=var100+'酿酒食品';
ifinblock('农林牧渔')=1thenvar100:=var100+'农林牧渔';
ifinblock('其他行业')=1thenvar100:=var100+'其他行业';
ifinblock('汽车')=1thenvar100:=var100+'汽车';
ifinblock('汽配')=1thenvar100:=var100+'汽配';
ifinblock('商业连锁')=1thenvar100:=var100+'商业连锁';
ifinblock('石化')=1thenvar100:=var100+'石化';
ifinblock('通信')=1thenvar100:=var100+'通信';
ifinblock('外贸')=1thenvar100:=var100+'外贸';
ifinblock('医药')=1thenvar100:=var100+'医药';
ifinblock('仪电仪表')=1thenvar100:=var100+'仪电仪表';
ifinblock('有色金属')=1thenvar100:=var100+'有色金属';
ifinblock('运输物流')=1thenvar100:=var100+'运输物流';
ifinblock('造纸印刷')=1thenvar100:=var100+'造纸印刷';
ifinblock('安徽')=1thenvar100:=var100+'安徽';
ifinblock('北京')=1thenvar100:=var100+'北京';
ifinblock('福建')=1thenvar100:=var100+'福建';
ifinblock('甘肃')=1thenvar100:=var100+'甘肃';
ifinblock('广东')=1thenvar100:=var100+'广东';
ifinblock('广西')=1thenvar100:=var100+'广西';
ifinblock('贵州')=1thenvar100:=var100+'贵州';
ifinblock('海南')=1thenvar100:=var100+'海南';
ifinblock('河北')=1thenvar100:=var100+'河北';
ifinblock('河南')=1thenvar100:=var100+'河南';
ifinblock('黑龙江')=1thenvar100:=var100+'黑龙江';
ifinblock('湖北')=1thenvar100:=var100+'湖北';
ifinblock('湖南')=1thenvar100:=var100+'湖南';
ifinblock('吉林')=1thenvar100:=var100+'吉林';
ifinblock('江苏')=1thenvar100:=var100+'江苏';
ifinblock('江西')=1thenvar100:=var100+'江西';
ifinblock('辽宁')=1thenvar100:=var100+'辽宁';
ifinblock('内蒙古')=1thenvar100:=var100+'内蒙古';
ifinblock('宁夏')=1thenvar100:=var100+'宁夏';
ifinblock('青海')=1thenvar100:=var100+'青海';
ifinblock('山东')=1thenvar100:=var100+'山东';
ifinblock('山西')=1thenvar100:=var100+'山西';
ifinblock('陕西')=1thenvar100:=var100+'陕西';
ifinblock('上海')=1thenvar100:=var100+'上海';
ifinblock('深圳')=1thenvar100:=var100+'深圳';
ifinblock('四川')=1thenvar100:=var100+'四川';
ifinblock('天津')=1thenvar100:=var100+'天津';
ifinblock('***')=1thenvar100:=var100+'***';
ifinblock('新疆')=1thenvar100:=var100+'新疆';
ifinblock('云南')=1thenvar100:=var100+'云南';
ifinblock('浙江')=1thenvar100:=var100+'浙江';
ifinblock('重庆')=1thenvar100:=var100+'重庆';
ifinblock('3G')=1thenvar100:=var100+'3G';
ifinblock('H股')=1thenvar100:=var100+'H股';
ifinblock('QFII持股')=1thenvar100:=var100+'QFII持股';
ifinblock('ST')=1thenvar100:=var100+'ST';
ifinblock('奥运')=1thenvar100:=var100+'奥运';
ifinblock('创投')=1thenvar100:=var100+'创投';
ifinblock('次新股')=1thenvar100:=var100+'次新股';
ifinblock('大盘')=1thenvar100:=var100+'大盘';
ifinblock('股权改革')=1thenvar100:=var100+'股权改革';
ifinblock('股权投资')=1thenvar100:=var100+'股权投资';
DD:=FINANCE2(35);
SS:=FINANCE2(37);
GG:=FINANCE2(3);
TH:=DYNAINFO(39);
DRAWTEXTABS(20,20,'总股本:'+NUMTOSTRn(DD,0)+'万股'+'流通A股:'+NUMTOSTRn(SS,0)+'万股'+'市盈率:'+NUMTOSTRn(TH,2)+'倍'+'每股收益:'+NUMTOSTRn(GG,3)+'元'),Color989500;
DRAWTEXTABS(20,40,var100+''),Color989500;
DRAWTEXT(var11,C*0.98,'锁定'),ColorFFFF00;
DRAWICON(qjj,C*1.09,1);
DRAWTEXT(qjj,l*0.78,'霸占大牛股'),COLOR00FFFF;
DRAWTEXT(varl2,C*1.04,'逃跑'),Colorgreen;
MA5:MA(close,5);
MA10:MA(close,10);
MA60:MA(close,60);
pday1:=barslast(cross(ma5,ma60));{5日均线上穿60日均线}
pday2:=barslast(cross(ma10,ma60));{10日均线上穿60日均线,至此形成鸭颈部}
pday3:=barslast(high=hhv(high,pday2));{形成头部,要下跌}
pday4:=barslast(cross(ma10,ma5){or(ref(ma10,1)<ref(ma5,1)andma5=ma10)});{下跌后,5日均线和10日均线死叉}
pday5:=barslast(cross(ma5,ma10){or(ref(ma5,1)=ref(ma10,1)andma5>ma10)});{回落不久,5日均线和10日均线形成金叉,形成部}
a1:=pday1>pday2andpday2>pday3andpday3>pday4andpday4>pday5andpday5<5;
a2:=count(cross(ma10,ma5),pday2)=1;
a3:=ma5>ma60andma10>ma60;
老鸭头:=(A1ANDA2anda3)andFILTER(A1ANDA2anda3,5);
drawtext(老鸭头,l,'老鸭头'),coloryellow;
stickline(老鸭头,h,l,0.5,0),coloryellow;
stickline(老鸭头,o,c,6,1),coloryellow,linethick3;
| |  | |  |
|