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

2018-12-25 23:18

此法应用不多，仅举例。

例一：

主图成交量(V叠加C)

{M:960,1,2000}

R0:=M/1000;R:=(L-R0*SYSPARAM(5))/V;

R1:=LLV(R,SYSPARAM(3)-SYSPARAM(2));R2:=R1[SYSPARAM(3)]; R3:=LLV(L-R2*V,SYSPARAM(3)-SYSPARAM(2)); R4:=R3[SYSPARAM(3)];R5:=(R2*V+R4)*0.995;

STICKLINE(C>=REF(C,1),R5,R0*SYSPARAM(5),6,1)COLORRED; STICKLINE(C< REF(C,1),R5,R0*SYSPARAM(5),6,0)COLORCYAN; PARTLINE(V>=0,R0*SYSPARAM(5)) COLORWHITE; PARTLINE(R5>0,MA(R5,5));

PARTLINE(R5>0,MA(R5,10)); PARTLINE(R5>0,MA(R5,20));

例二：

INPUT:N(10,2,999);

M:=SYSPARAM(3)-SYSPARAM(2); X:=C; Y:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL,IF(CLOSE< REF(CLOSE,1),-VOL/CAPITAL,0)),0); XH:=HHV(X,M); XDL:=XL[SYSPARAM(3)]; BX:=100/(XDH-XDL); 收盘:C,LINETHICK0,;

收盘↑:PARTLINE(X>REF(X,1),(X-XDL)*BX),COLORRED; 收盘↓:PARTLINE(X< REF(X,1),(X-XDL)*BX),COLORCYAN; YH:=HHV(Y,M); YDL:=YL[SYSPARAM(3)];

YL:=LLV(Y,M);

YDH:=YH[SYSPARAM(3)];

XL:=LLV(X,M);

XDH:=XH[SYSPARAM(3)];

BY:=100/(YDH-YDL);

TY:=(Y-YDL)*BY;

OBV值:Y*1000,LINETHICK0,COLOR007BFF;

OBV线↑:PARTLINE(Y>REF(Y,1),(Y-YDL)*BY),COLORYELLOW; OBV线↓:PARTLINE(Y< REF(Y,1),(Y-YDL)*BY),COLOR009F00;

A1:=REF(TY,N)=HHV(TY,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1);

B2:=FILTER(A2,N);

C2:=BACKSET(B2,N+1);

HD:=FILTER(C1,N);

A2:=REF(TY,N)=LLV(TY,2*N+1); LD:=FILTER(C2,N);

AA:=REF(TY,BARSLAST(HD));

BB:=REF(TY,BARSLAST(LD));A1:=REF(Y,BARSLAST(HD))*1000; B1:=REF(Y,BARSLAST(LD))*1000;

T1:=BARSLAST(HD)< BARSLAST(LD) AND NOT(HD) ; T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD); PARTLINE(T1,AA),COLORMAGENTA,LINETHICK2; PARTLINE(T2,BB),COLORGREEN,LINETHICK2;

DRAWNUMBER(T1=0 AND REF(T1,1)>0,REF(AA,1)+0.1,A1,2); DRAWNUMBER(T2=0 AND REF(T2,1)>0,REF(BB,1)+0.1,B1,2);

DRAWNUMBER(ISLASTBAR AND T1>0,REF(AA,1)+0.1,A1,2),COLORYELLOW; DRAWNUMBER(ISLASTBAR AND T2>0,REF(BB,1)+0.1,B1,2),COLORMAGENTA; ------------------------------------------------------------------------------- 0042--均线变色

MA05:MA(CLOSE,5); MA30:MA(CLOSE,30);

IF(MA05< MA30,MA05,MA30),COLORGREEN; IF(MA05< MA30,MA30,MA05),COLORRED; IF(MA05>MA30,MA30,MA30),COLORBLUE;

DRAWICON(CROSS(MA05,MA30),L*0.98,4); DRAWICON(CROSS(MA30,MA05),H*1.02,5);

------------------------------------------------------------------------------- 0043--基本配色：白红峰

白红峰 ((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),COLOREEEEFF; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLORDDDDFF; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLORCCCCFF; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLORBBBBFF; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLORAAAAFF; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLOR9999FF; STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLOR8888FF; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR7777FF; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLOR6666FF; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLOR5555FF; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR4444FF; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR3333FF;

STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR2222FF; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR1111FF;

STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLOR0000FF;{红色}

------------------------------------------------------------------------------- 0044--基本配色：白晶峰

白晶峰 ((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),COLORFFEEFF; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLORFFDDFF; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLORFFCCFF; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLORFFBBFF; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLORFFAAFF; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLORFF99FF; STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLORFF88FF; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLORFF77FF;

STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLORFF66FF; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLORFF55FF; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLORFF44FF; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLORFF33FF;

STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLORFF22FF; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLORFF11FF; STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLORFF00FF;{晶红色}

------------------------------------------------------------------------------- 0045--基本配色：白蓝峰

白蓝峰 ((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),COLORFFEEEE; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLORFFDDDD; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLORFFCCCC; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLORFFBBBB; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLORFFAAAA; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLORFF9999;

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

STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLORFF7777; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLORFF6666; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLORFF5555; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLORFF4444;

STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLORFF3333; STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLORFF2222; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLORFF1111;

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

------------------------------------------------------------------------------- 0046--基本配色：白绿峰

白绿峰 ((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),COLOREEFFEE;

STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLORDDFFDD; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLORCCFFCC; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLORBBFFBB; STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLORAAFFAA;

STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLOR99FF99; STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLOR88FF88; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR77FF77; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLOR66FF66; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLOR55FF55; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR44FF44; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR33FF33; STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR22FF22; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR11FF11; STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLOR00FF00;{绿色}

------------------------------------------------------------------------------- 0047--基本配色：淡紫峰

淡紫峰 ((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),COLORFFFFCC;{淡蓝色}

STICKLINE(色彩峰>0,0,色彩峰*0.9,5,0),COLORFFEECC; STICKLINE(色彩峰>0,0,色彩峰*0.85,5,0),COLORFFDDCC; STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLORFFCCCC; STICKLINE(色彩峰>0,0,色彩峰*0.75,5,0),COLORFFBBCC;

STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLORFFAACC; STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLORFF99CC; STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLORFF88CC; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLORFF77CC; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLORFF66CC; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLORFF55CC; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLORFF44CC; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLORFF33CC; STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLORFF22CC; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLORFF11CC;

STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLORFF00CC;{紫色}

------------------------------------------------------------------------------- 0048--基本配色：黄褐峰

黄褐峰 ((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),COLOR00EE99; STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR00DD99; STICKLINE(色彩峰>0,0,色彩峰*0.5,5,0),COLOR00CC99; STICKLINE(色彩峰>0,0,色彩峰*0.45,5,0),COLOR00BB99; STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR00AA99; STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR009999; STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR008899; STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR007799;

STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLOR006699;{褐色}

------------------------------------------------------------------------------- 0049--基本配色：黄红峰

共8页:

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

下载这篇word文档

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

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