软件名称：[B]开心轮回6[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：12.0 KB
官方主页：Home Page
更新时间：2017-01-13 03:28:31
软件简介:
{参数：
轮回线属性开关1，0,1；
角度线显示开关1，0,1；
比较线显示开关1，0,1；
均线显示开关0,0,1;
空间黄金分割开关1，0,1；
短期均线周期5,1,20；
中期均线周期13,5,90；
长期均线周期120,30,200；
超长期均线周期250,120,500；
时间窗开关3,0,3；}
//开心轮回6
input:轮回线属性开关(1,0,1),均线显示开关(0,0,1),角度线显示开关(1,0,1),比较线显示开关(1,0,1),空间黄金分割开关(1,0,1),短期均线周期(5,1,20),中期均线周期(13,5,90),长期均线周期(120,30,200),超长期均线周期(250,120,500),时间窗开关(3,0,3),幅度(30,1,40);
DEA:="MACD.DEA",linethick;
轮回DIFF:=EMA(C,12)-EMA(C,26);
轮回DEA:=EMA(轮回DIFF,9);
{//上穿:=交叉函数(轮回dea,0);
//下穿:=交叉函数(0,轮回dea);}
上穿s:=CROSS(轮回dea,0);
下穿s:=CROSS(0,轮回dea);
上穿:=上穿s AND REF(下穿s,1)=0 AND REFX(下穿s,1)=0;
下穿:=下穿s AND REF(上穿s,1)=0 AND REFX(上穿s,1)=0;
上穿周期:=BARSLAST(上穿);
下穿周期:=BARSLAST(下穿),LINETHICK0;
低点条件:=L=LLV(L,下穿周期) AND 轮回dea<0,LINETHICK0;
最低点周期:=BARSLAST(L=LLV(L,下穿周期) AND 轮回dea<0),LINETHICK0;
最高点周期:=BARSLAST(H=HHV(H,最低点周期)),LINETHICK0;
轮高点tj1:=下穿;{最后一天的条件}
轮高点tj2:=BACKSET(轮高点tj1,最高点周期+1);
轮高点:=轮高点tj2>REF(轮高点tj2,1),LINETHICK0;
轮低最高点周期:=BARSLAST(H=HHV(H,上穿周期) AND 轮回dea>0),LINETHICK0;
轮低最低点周期:=BARSLAST(L=LLV(L,轮低最高点周期)),LINETHICK0;
高点条件:=L=LLV(L,轮低最高点周期),LINETHICK0;
轮低点tj1:=上穿;{最后一天的条件}
轮低点tj2:=BACKSET(轮低点tj1,轮低最低点周期+1);
轮低点:=轮低点tj2>REF(轮低点tj2,1);
DRAWLINE(轮高点,H,轮低点,L,0),COLORGREEN,LINETHICK2;{画下轮回线}
DRAWLINE(轮低点,L,轮高点,H,0),COLORRED,LINETHICK2;{画上轮回线}
//轮回点要标出当下斜率,上级斜率,上上级斜率,从近到远分别命名斜率1，斜率2，斜率3,分轮高点和轮低点两种情况
轮回点:=轮高点 OR 轮低点;
nz1:=BARSLAST(轮回点);{最近转折点到现在的时间,如果现在是轮回点,值为0}
nz2:=REF(nz1,nz1+1)+nz1+1;{第二转折点到现在的时间}
nz3:=REF(nz2,nz2)+nz2;{第3转折点到现在的时间}
nz4:=REF(nz2,nz3)+nz3;{第4转折点到现在的时间}
最后点TJ:=BACKSET(ISLASTBAR,BARSLAST(轮低点 OR 轮高点)+1);
最后点:=最后点TJ>REF(最后点TJ,1);
//轮低点情况
轮低点斜率1:=IF(轮低点,(REF(H,nz2)-L)/nz2,0),LINETHICK0,PRECISION7;
轮低点斜率2:=IF(轮低点,(REF(H,nz2)-REF(L,nz3))/(nz3-nz2),0),LINETHICK0,PRECISION7;
轮低点斜率3:=IF(轮低点,(REF(H,nz4)-REF(L,nz3))/(nz4-nz3),0),LINETHICK0,PRECISION7;
//轮高点情况
轮高点斜率1:=IF(轮高点,(H-REF(L,nz2))/nz2,0),LINETHICK0,PRECISION7;
轮高点斜率2:=IF(轮高点,(REF(H,nz3)-REF(L,nz2))/(nz3-nz2),0),LINETHICK0,PRECISION7;
轮高点斜率3:=IF(轮高点,(REF(H,nz3)-REF(L,nz4))/(nz4-nz3),0),LINETHICK0,PRECISION7;
//轮低点情况
DRAWTEXT(轮低点 AND 轮回线属性开关,L,'时:');
DRAWNUMBER(轮低点 AND 轮回线属性开关,L,nz2,0),shift3,COLORWHITE;{显示轮回线时间}
DRAWTEXT(轮低点 AND 轮回线属性开关,L,'空:'),shift8;
DRAWNUMBER(轮低点 AND 轮回线属性开关,L,REF(H,nz2)-L,2),shift11,COLORWHITE;{显示轮回线空间}
DRAWTEXT(轮低点 AND 轮回线属性开关,L,'斜率:'),shift16,COLOR00FFFF;
DRAWNUMBER(轮低点 AND 轮回线属性开关,L,轮低点斜率1*10,2),shift21,COLORWHITE;{显示轮回线斜率}
//轮高点情况
DRAWTEXT(轮高点 AND 轮回线属性开关,H,'时:');
DRAWNUMBER(轮高点 AND 轮回线属性开关,H,nz2,0),shift3,COLORWHITE;{显示轮回线时间}
DRAWTEXT(轮高点 AND 轮回线属性开关,H,'空:'),shift8;
DRAWNUMBER(轮高点 AND 轮回线属性开关,H,H-REF(L,nz2),2),shift11,COLORWHITE;{显示轮回线空间}
DRAWTEXT(轮高点 AND 轮回线属性开关,H,'斜率:'),shift16,COLOR00FF00;
DRAWNUMBER(轮高点 AND 轮回线属性开关,H,轮高点斜率1*10,2),shift21,COLORWHITE;{显示轮回线斜率}
//下行中的轮回角度线的画法
最后低点tj:=BACKSET(ISLASTBAR,BARSLAST(轮低点)+1);
最后低点:=最后低点tj>REF(最后低点tj,1);
DRAWSL(最后低点 AND 角度线显示开关,L,轮低点斜率1,0,5),COLORYELLOW,LINETHICK1;
DRAWSL(最后低点 AND 角度线显示开关,L,轮低点斜率1*2,0,5),COLORYELLOW,LINETHICK1,LINEDOT;
DRAWSL(最后低点 AND 角度线显示开关,L,轮低点斜率1/2,0,5),COLORYELLOW,LINETHICK1,LINEDOT;
//上行中的轮回角度线的画法
最后高点tj:=BACKSET(ISLASTBAR,BARSLAST(轮高点)+1);
最后高点:=最后高点tj>REF(最后高点tj,1);
DRAWSL(最后高点 AND 角度线显示开关,H,-轮高点斜率1,0,5),COLORYELLOW,LINETHICK1;
DRAWSL(最后高点 AND 角度线显示开关,H,-轮高点斜率1*2,0,5),COLORYELLOW,LINETHICK1,LINEDOT;
DRAWSL(最后高点 AND 角度线显示开关,H,-轮高点斜率1/2,0,5),COLORYELLOW,LINETHICK1,LINEDOT;
//画背离比较线
DRAWSL(最后低点 AND 比较线显示开关,L,轮低点斜率2,0,5),COLORWHITE,LINETHICK1,LINEDASH;
DRAWSL(最后高点 AND 比较线显示开关,H,-1*轮高点斜率2,0,5),COLORWHITE,LINETHICK1,LINEDASH;
//黄金柱&黄金线
倍量TJ:=IF(ISLASTBAR=1,V*240/OPENMINUTES(CURRENTTIME)/REF(V,1),V/REF(V,1));
回调量:=IF(C>=O,0,V);
黄金线TJ:=倍量TJ>=1.9 AND 倍量TJ<=3 AND REFX(C,1)>O AND REFX(C,2)>O AND REFX(C,3)>O AND REFX(回调量,1)/V<1 AND REFX(回调量,2)/V<1 AND REFX(回调量,3)/V<1;
黄金线WZ:=MIN(MIN(REFX(C,1),REFX(C,2)),REFX(C,3));
黄金线XS:=IF(黄金线WZ>=C,O,黄金线WZ);
{}STICKLINE(黄金线TJ AND C>O,O,C,2,0),COLORYELLOW;
DRAWSL(黄金线TJ AND C>O,黄金线WZ,0,10,0),COLORYELLOW;
DRAWTEXT(黄金线TJ AND C>O,黄金线WZ,'金尺线：'),PXUP20,SHIFT11,COLOR00dddd;
DRAWNUMBER(黄金线TJ AND C>O,黄金线WZ,黄金线WZ,2),PXUP20,SHIFT20,COLOR00dddd;
//画空间黄金分割线
//轮低点划线
DRAWTEXT(最后点 AND 轮低点 AND 空间黄金分割开关,L,'【轮低点】↑'),ColorWhite;
DRAWNUMBER(最后点 AND 轮低点 AND 空间黄金分割开关,L,L,2),SHIFT6,ColorWhite;
DRAWSL(最后点 AND 轮低点 AND 空间黄金分割开关,L,0,0,0),ColorWhite,LINEDOT;
DRAWTEXT(最后点 AND 轮低点 AND 空间黄金分割开关,L+(REF(H,nz2)-L)*0.191,'【0.191】↑'),ColorWhite;
DRAWNUMBER(最后点 AND 轮低点 AND 空间黄金分割开关,L+(REF(H,nz2)-L)*0.191,L+(REF(H,nz2)-L)*0.191,2),SHIFT6,ColorWhite;
DRAWSL(最后点 AND 轮低点 AND 空间黄金分割开关,L+(REF(H,nz2)-L)*0.191,0,0,0),ColorWhite,LINEDOT;
DRAWTEXT(最后点 AND
[url=http://www.70822.com/soft/sort013/sort091/down-107232.html]开心轮回6[/url]
[url=http://www.70822.com/soft/sort013/sort091/down-107232.html]开心轮回6[/url]