教你学股票公式编程 -(5)

2018-12-25 23:18

黄红峰 ((16色)黄色-红色)

VarA:=EMA(REF(CLOSE,1),4);

色彩峰:=(SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100);

STICKLINE(色彩峰>0,0,色彩峰,5,0),COLOR00FFFF;{黄色} STICKLINE(色彩峰>0,0,色彩峰*0.9,5,0),COLOR00EEFF; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLOR00DDFF; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLOR00CCFF; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLOR00BBFF; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLOR00AAFF; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLOR0099FF; STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLOR0088FF; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR0077FF; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLOR0066FF; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLOR0055FF; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR0044FF; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR0033FF; STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR0022FF; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR0011FF; STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLOR0000FF;{红色}

------------------------------------------------------------------------------- 0050--基本配色：黄绿峰

黄绿峰 ((16色)黄色-绿色)

VarA:=EMA(REF(CLOSE,1),4);

色彩峰:=(SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100);

STICKLINE(色彩峰>0,0,色彩峰,5,0),COLOR00FFFF;{黄色} STICKLINE(色彩峰>0,0,色彩峰*0.9,5,0),COLOR00FFEE; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLOR00FFDD; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLOR00FFCC; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLOR00FFBB; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLOR00FFAA; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLOR00FF99; STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLOR00FF88; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR00FF77; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLOR00FF66; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLOR00FF55; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR00FF44; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR00FF33;

STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR00FF22; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR00FF11;

STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLOR00FF00;{绿色}

------------------------------------------------------------------------------- 0051--基本配色：灰色峰

灰色峰 ((16色)白色-黑色)

VarA:=EMA(REF(CLOSE,1),4);

色彩峰:=(SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100);

STICKLINE(色彩峰>0,0,色彩峰,5,0),COLORFFFFFF;{白色} STICKLINE(色彩峰>0,0,色彩峰*0.9,5,0),COLOREEEEEE; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLORDDDDDD; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLORCCCCCC; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLORBBBBBB; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLORAAAAAA; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLOR999999; STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLOR888888; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR777777;

STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLOR666666; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLOR555555; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR444444; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR333333;

STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR222222; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR111111; STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLOR000000;{黑色}

------------------------------------------------------------------------------- 0052--基本配色：绿蓝峰

绿蓝峰 ((16色)翠绿-深蓝)

VarA:=EMA(REF(CLOSE,1),4);

色彩峰:=(SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100);

STICKLINE(色彩峰>0,0,色彩峰,5,0),COLOR66FF00;{翠绿} STICKLINE(色彩峰>0,0,色彩峰*0.9,5,0),COLOR66EE00; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLOR66DD00; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLOR66CC00; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLOR66BB00; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLOR66AA00; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLOR669900;

STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLOR668800;

STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR667700; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLOR666600; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLOR665500; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR664400;

STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR663300; STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR662200; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR661100;

STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLOR660000;{深蓝}

------------------------------------------------------------------------------- 0053--随机K线最高、最低价向右平行线

DRAWSL(SYSPARAM(1)=BARPOS,REF(L,SYSPARAM(1)=SUM(1,0)-1),0,0,1),COLORGREEN;

DRAWSL(SYSPARAM(1)=BARPOS,REF(H,SYSPARAM(1)=SUM(1,0)-1),0,0,1),COLORRED;

------------------------------------------------------------------------------- 0054--显示无数条线

例一：

{先显示200条黄色的}

A1:POLYLINE(C>0,C+0.01),COLORYELLOW; A2:=POLYLINE(C>0,C+0.02); A3:=POLYLINE(C>0,C+0.03); ??

A199:=POLYLINE(C>0,C+1.99):

A200:POLYLINE(C>0,C+2) COLORYELLOW; {再显示200条绿色的}

B1:POLYLINE(C>0,C+2.01) COLORGREEN; B2:=POLYLINE(C>0,C+2.02) ; B3:=POLYLINE(C>0,C+2.03) ; ??

B199:=POLYLINE(C>0,C+3.99):

B200:POLYLINE(C>0,C+4) COLORGREEN; {想显示别的颜色继续??}

例二：

{先显示200条黄色的} A1:=POLYLINE(C>0,C+0.01);

A2:=POLYLINE(C>0,C+0.02); A3:=POLYLINE(C>0,C+0.03); ??

A199:=POLYLINE(C>0,C+1.99); A200:=POLYLINE(C>0,C+2);

A1 OR A2 OR A3 OR??OR A199 OR A200,COLORYELLOW; {再显示200条绿色的}

B1:=POLYLINE(C>0,C+2.01); B2:=POLYLINE(C>0,C+2.02) ; B3:=POLYLINE(C>0,C+2.03) ; ??

B199:=POLYLINE(C>0,C+3.99):

B200:=POLYLINE(C>0,C+4) ;

B1 OR B2 OR B3 OR??OR B199 OR B200,COLORGREEN; {想显示别的颜色继续??}

------------------------------------------------------------------------------- 0055--底背离

LLV(L,60)=L) AND NOT(LLV(DEA,60)=DEA);

------------------------------------------------------------------------------- 0056--顶背离

HHV(H,60)=H) AND NOT(HHV(DEA,60)=DEA);

------------------------------------------------------------------------------- 0057--N次金叉、死叉

0轴上二次金叉

COUNT(CROSS(DIF,DEA) AND DEA>0,20)=2 AND CROSS(DIF,DEA) AND DEA>0;

0轴上三次金叉

COUNT(CROSS(DIF,DEA) AND DEA>0,20)=3 AND CROSS(DIF,DEA) AND DEA>0;

0轴上四次金叉

COUNT(CROSS(DIF,DEA) AND DEA>0,20)=4 AND CROSS(DIF,DEA) AND DEA>0;

二次金叉

EXPLAIN(COUNT(CROSS(DIF,DEA),20)=2 AND CROSS(DIF,DEA);

二次死叉

COUNT(CROSS(DEA,DIF),20)=2 AND CROSS(DEA,DIF); ------------------------------------------------------------------------------- 0058--5分钟副图显示15分钟K线

建公式:0015

C15:CLOSE; O15:OPEN; H15:HIGH; L15:LOW;

建公式:十五K线

C15:=\ O15:=\ H15:=\ L15:=\

TI:=OPENMINUTES(TIME)=10

OPENMINUTES(TIME)=25

OPENMINUTES(TIME)=40 OR OPENMINUTES(TIME)=55 OR OPENMINUTES(TIME)=70 OR OPENMINUTES(TIME)=85 OR OPENMINUTES(TIME)=100 OR OPENMINUTES(TIME)=115 OR OPENMINUTES(TIME)=130 OR OPENMINUTES(TIME)=145 OR OPENMINUTES(TIME)=160 OR OPENMINUTES(TIME)=175 OPENMINUTES(TIME)=205 OPENMINUTES(TIME)=235;

HH15:=IF(TI,H15,C15); LL15:=IF(TI,L15,C15);

STICKLINE(C15>O15,C15,O15,10,0),COLORRED;

STICKLINE(C15>O15 AND H15>C15,HH15,C15,0.1,0),COLORRED; STICKLINE(C15>O15 AND O15>L15,O15,LL15,0.1,0),COLORRED; STICKLINE(C15<=O15,C15,O15,10,0),COLORGREEN;

STICKLINE(C15<=O15 AND C15>L15,C15,LL15,0.1,0),COLORGREEN;

STICKLINE(C15<=O15 AND H15>O15,HH15,O15,0.1,0),COLORGREEN;

注：以大陆股市为例，四小时，其他市场如超过四小时，可在中间语句“TI:=”中以15为系数顺序加足，如：OR 250 OR 265??等等。

------------------------------------------------------------------------------- 0059--移动成本

OR OR

OPENMINUTES(TIME)=190 OPENMINUTES(TIME)=220

OR OR

共8页:

教你学股票公式编程 -(5).doc 将本文的Word文档下载到电脑下载失败或者文档不完整，请联系客服人员解决！

下载这篇word文档

教你学股票公式编程&nbsp;-(5)

教你学股票公式编程 -(5)