注意:
本文属于八戒
改编
指标公式,源码可以用于通达信软件,第一部分源码属于主图或副图;第二部分属于选股公式源码(多个选股公式请分别使用);第三部分属于图片示例。
注意2:防止源码复制粘贴出错,请先把源码复制到WORD文档排序,再从WORD文档中复制源码!
星网宇达和航天晨光未能有做多动作导致失望资金离场,尾盘跳水,明天情绪端的分歧估计不会小。
板块方面,受消息刺激消费方向走强,不过持续性不太好确定,可以把中央商场作为风向标看待,这里教育相对其他行业有反转预期,可能会好一些。
第一部分 【倒三角形态套装Ⅱ】 手机/电脑
【倒三角形态套装Ⅱ】是在
【倒三角形态套装】主图
的基础上,将不同周期的倒三角形叠加在同一个主图。
倒三角形态
代表着多空双方的分歧加剧,所以一般这种形态之后,波动一般会加剧,当突破倒三角压力线时,容易出现单边快速的走势。
【倒三角形态套装Ⅱ】主图
编写如下:
LT:=BARSLAST(L=LLV(L,120));
CT:=CONST(LT)+1;
HT:=FINDHIGHBARS(H,CT,CT,1);
HH:=FINDHIGH(H,CT,CT,1);
LL:=CONST(REF(L,LT));
QD:=CURRBARSCOUNT=CT*2;
ZD:=CURRBARSCOUNT=CT;
DRAWLINE(QD,CONST(HH),ISLASTBAR,CONST(HH),0),COLORYELLOW;
DRAWLINE(QD,CONST(HH),ZD,LL,0),COLORYELLOW;
DRAWLINE(ZD,LL,ISLASTBAR,CONST(HH),0),COLORYELLOW;
LT3:=BARSLAST(L=LLV(L,60));
CT3:=CONST(LT3)+1;
HT3:=FINDHIGHBARS(H,CT3,CT3,1);
HH3:=FINDHIGH(H,CT3,CT3,1);
LL3:=CONST(REF(L,LT3));
QD3:=CURRBARSCOUNT=CT3*2;
ZD3:=CURRBARSCOUNT=CT3;
DRAWLINE(QD3,CONST(HH3),ISLASTBAR,CONST(HH3),0),COLORYELLOW;
DRAWLINE(QD3,CONST(HH3),ZD3,LL3,0),COLORYELLOW;
DRAWLINE(ZD3,LL3,ISLASTBAR,CONST(HH3),0),COLORYELLOW;
LT1:=BARSLAST(L=LLV(L,30));
CT1:=CONST(LT1)+1;
HT1:=FINDHIGHBARS(H,CT1,CT1,1);
HH1:=FINDHIGH(H,CT1,CT1,1);
LL1:=CONST(REF(L,LT1));
QD1:=CURRBARSCOUNT=CT1*2;
ZD1:=CURRBARSCOUNT=CT1;
DRAWLINE(QD1,CONST(HH1),ISLASTBAR,CONST(HH1),0),COLORYELLOW;
DRAWLINE(QD1,CONST(HH1),ZD1,LL1,0),COLORYELLOW;
DRAWLINE(ZD1,LL1,ISLASTBAR,CONST(HH1),0),COLORYELLOW;
LT2:=BARSLAST(L=LLV(L,10));
CT2:=CONST(LT2)+2;
HT2:=FINDHIGHBARS(H,CT2,CT2,2);
HH2:=FINDHIGH(H,CT2,CT2,2);
LL2:=CONST(REF(L,LT2));
QD2:=CURRBARSCOUNT=CT2*2;
ZD2:=CURRBARSCOUNT=CT2;
DRAWLINE(QD2,CONST(HH2),ISLASTBAR,CONST(HH2),0),COLORYELLOW;
DRAWLINE(QD2,CONST(HH2),ZD2,LL2,0),COLORYELLOW;
DRAWLINE(ZD2,LL2,ISLASTBAR,CONST(HH2),0),COLORYELLOW;
山谷:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,30) AND CROSS(MA(C,10),MA(C,30));
DRAWTEXT(山谷 AND MA(C,5)
DRAWTEXT(山谷 AND MA(C,30)>MA(C,120),MA(C,30)-0.08,'金山谷'),COLORYELLOW;
{涨停做记号}
CM:=REF(C,1);
涨停:=IF((C-CM)*100/CM>=9.9,1,0);
STICKLINE(涨停,OPEN,CLOSE,3.8,0),COLORMAGENTA; {K线实体部分画洋红色,宽度为2,画实线实心柱}
STICKLINE(涨停,H,L,0,0),COLORLIRED; {K线影线部分画紫红色,宽度为0?,画实线实心柱};
{跌停做记号}
跌停:=IF((C-CM)*100/CM<=-9.9,1,0);
STICKLINE(跌停,OPEN,CLOSE,3.8,0),COLORGREEN; {K线实体部分画绿色,宽度为2,画实线实心柱}
STICKLINE(跌停,H,L,0,0),COLORGREEN;{K线影线部分画绿色,宽度为0?,画实线实心柱};
{黑码起飞点}
实在1:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,20)
AND O
MA(C,5)
AND C<30
AND V
DRAWTEXT(实在1,MA(C,20)*0.95,'一阳穿双'),COLORCYAN;
DRAWTEXT(实在1,MA(C,20)*0.9,'无量黑码等止跌'),COLORCYAN;
STICKLINE(实在1,MA(C,20)*0.9,MA(C,20)*0.95,0.01,0),COLORCYAN;
实在2:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,20)
AND O
MA(C,5)
AND C<30
AND V>MA(V,60)
AND COUNT(V>MA(V,60),2)=1;
DRAWTEXT(实在2,MA(C,20)*0.95,'一阳穿双'),COLORWHITE;
DRAWTEXT(实在2,MA(C,20)*0.9,'有量黑码起飞'),COLORWHITE;
STICKLINE(实在2,MA(C,20)*0.9,MA(C,20)*0.95,0.01,0),COLORWHITE;
【金银成交量】副图
①
编写如下:
八戒1:=MA(VOL,5);
八戒2:=MA(VOL,40);
八戒3:=V*100/CAPITAL;
八戒4:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
八戒5:=IF(C>OPEN,八戒4*(HIGH-LOW),IF(C
八戒6:=IF(C>OPEN,0-八戒4*((HIGH-C)+(OPEN-LOW)),IF(C
八戒7:=HHV(V,90);
八戒8:=LLV(V,90);
八戒9:=八戒8+(八戒7-八戒8)*0.06;
八戒10:=八戒8+(八戒7-八戒8)*0.28;
八戒18:=八戒8+(八戒7-八戒8)*0.50;
八戒19:=八戒8+(八戒7-八戒8)*0.75;
VOLUME:VOL,VOLSTICK;
新股成交量:IF(BARSCOUNT(CLOSE)<40,VOL,DRAWNULL),VOLSTICK;
成交量(手):VOL,COLORWHITE,NODRAW;
调整周期:IF(八戒1<八戒2,BARSLAST(CROSS(八戒2,八戒1))+1,BARSLAST(CROSS(八戒2,八戒1))-BARSLAST(CROSS(八戒1,八戒2))),NODRAW;
调整总换手:IF(八戒1<八戒2,SUM(八戒3,BARSLAST(CROSS(八戒2,八戒1))+1),SUM(八戒3,BARSLAST(CROSS(八戒2,八戒1))+1)-SUM(八戒3,BARSLAST(CROSS(八戒1,八戒2))+1)),NODRAW;
调整均换手:调整总换手/调整周期,NODRAW;
虚拟成交量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
放量上涨:C/REF(C,1)>=1.01 AND V/REF(V,1)>=1.5 AND V>MA(V,5) AND REF(V,1)/REF(MA(V,5),1)<=1.8,NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟成交量,0,4,-1),COLOR00C0C0;
STICKLINE(八戒5>八戒6 AND 八戒1>=八戒2,VOL,0,3,0),COLOR0000AA;
STICKLINE(八戒5>八戒6 AND 八戒1>=八戒2,八戒5,0,2.5,0),COLOR0000BB;
STICKLINE(八戒5>八戒6 AND 八戒1>=八戒2,八戒5,0,1.5,0),COLOR0000CC;
STICKLINE(八戒5>八戒6 AND 八戒1>=八戒2,八戒5,0,1,0),COLOR0000EE;
DRAWTEXT_FIX(C>O,0,0.2,0,',公式源码 '),COLOR333333;
STICKLINE(八戒6<八戒5 AND 八戒1>=八戒2,八戒5,八戒5+ABS(八戒6),3,0),COLOR7B7B00;
STICKLINE(八戒6<八戒5 AND 八戒1>=八戒2,八戒5,八戒5+ABS(八戒6),2.5,0),COLOR909000;
STICKLINE(八戒6<八戒5 AND 八戒1>=八戒2,八戒5,八戒5+ABS(八戒6),1.5,0),COLORA8A800;
STICKLINE(八戒6<八戒5 AND 八戒1>=八戒2,八戒5,八戒5+ABS(八戒6),1,0),COLORCECE00;
STICKLINE(八戒5>八戒6 AND 八戒1<八戒2,0,八戒5,3,0),COLORRED;
STICKLINE(八戒5>八戒6 AND 八戒1<八戒2,0,八戒5,2.5,0),COLOR0066FF;
STICKLINE(八戒5>八戒6 AND 八戒1<八戒2,0,八戒5,1.5,0),COLOR0099FF;
STICKLINE(八戒5>八戒6 AND 八戒1<八戒2,0,八戒5,1,0),COLORYELLOW;
STICKLINE(八戒6<八戒5 AND 八戒1<八戒2,八戒5,八戒5+ABS(八戒6),3,0),COLOR007B00;
STICKLINE(八戒6<八戒5 AND 八戒1<八戒2,八戒5,八戒5+ABS(八戒6),2.5,0),COLOR009000;
STICKLINE(八戒6<八戒5 AND 八戒1<八戒2,八戒5,八戒5+ABS(八戒6),1.5,0),COLOR00A800;
【金】:REFDATE(八戒9,DATE),COLOR00FFFF;
【银】:REFDATE(八戒10,DATE),COLORFFFFFF;
【铜】:REFDATE(八戒18,DATE),COLORLIRED;
【铁】:REFDATE(八戒19,DATE),COLORRED;
【顶】:REFDATE(HHV(V,90),DATE),COLORCYAN;
【金山银山】-黄钻选股
①
编写如下:
VAR2:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR3:=SMA(SMA(VAR2,3,1),3,1)/28.57;
VAR4:=EMA(VAR3,5);
操盘:=3*VAR3-2*VAR4;
D1:=crOSS(操盘,VAR3) AND VAR3<2.1 AND C>O;
N:=14;M:=6;
TRA:=EXPMEMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);
pdi:=DMP*100/TR;
mdi:=DMM*100/TR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
ADXR:=EXPMEMA(ADX,M);
主跌:=MDI,COLORFFFFFF,LINETHICK2;
D2:=CROSS(ADX,主跌) AND 主跌<20 AND ADX>ADXR;
D66:=D1 AND D2;
黄钻:FILTER(D66,5);
【金山银山】-红钻选股
②
编写如下:
VAR2:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR3:=SMA(SMA(VAR2,3,1),3,1)/28.57;
VAR4:=EMA(VAR3,5);
操盘:=3*VAR3-2*VAR4;
D1:=crOSS(操盘,VAR3) AND VAR3<2.1 AND C>O;
N:=14;M:=6;
TRA:=EXPMEMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);
pdi:=DMP*100/TR;
mdi:=DMM*100/TR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
ADXR:=EXPMEMA(ADX,M);
主跌:=MDI,COLORFFFFFF,LINETHICK2;
D2:=CROSS(ADX,主跌) AND 主跌<20 AND ADX>ADXR;
D33:=COUNT(D1 OR D2,3)>=2;
红钻:FILTER(D33,5);
【金山银山】-紫钻选股
③