软件名称：[B]波浪理论 源码[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：23.0 KB
官方主页：Home Page
更新时间：2019-07-14 02:26:31
软件简介:
{波浪理论 ---主图 限期：无}
a1:=2*2*2*2*5*5*5*5*10*10+2*2*2*2*5*5*5*5*10+2*2*5*5*10+2*2*5*5+10+5;
a2:=2*2*2*2*5*5*5*5*10*10+2*2*2*2*5*5*5*5*10+2*2*5*5*10+2*2*5*5+10+5+2;
a3:=2*2*2*2*5*5*5*5*10*10+2*2*2*2*5*5*5*5*10+2*2*5*5*10+2*2*5*5+10+5+2+2;
a4:=if(date<a1,1,0);
a5:=if(date<a2,1,0);
a6:=if(date<a3,1,0);
a7:=1;{a4*a5*a6;}
a8:=(2*2*2*2*2-5*5-10+2+2+2*2*2*2*2-5*5-10+2+2+2*2*2*2*2-5*5-10+2+2)/(5-2);
a9:=1;
a10:=barslast(dispstatus=1)+1;
a11:=dispstatus=2;
a12:=hhv(h,a10)*a7;
a13:=llv(l,a10)*a7;
a14:=if(a7=a8,a12-a13,0);
a15:=hhvbars(h,a10)*a7;
a16:=llvbars(l,a10)*a7;
a17:=if(a7=a8,a15-a16,0);
a18:=if(a7=a8,a12-a14*0.5,0);
if (a9 = 1 ) Then
begin
a19:=(a12-a13)*0.191;
a20:=(a12-a13)*0.382;
a21:=(a12-a13)*0.618;
a22:=(a12-a13)*0.809;
if (a17 < 0 ) Then
begin
a23:=a12-a19;
a24:=a12-a20;
a25:=a12-a21;
a26:=a12-a22;
end
else
begin
a23:=a13+a19;
a24:=a13+a20;
a25:=a13+a21;
a26:=a13+a22;
end;
if (a9 = 1 ) Then
begin
a27:=(a12-a13)*0.125;
a28:=(a12-a13)*0.25;
a29:=(a12-a13)*0.375;
a30:=(a12-a13)*0.625;
a31:=(a12-a13)*0.75;
a32:=(a12-a13)*0.875;
if (a17 < 0 ) Then
begin
a33:=a12-a27;
a34:=a12-a28;
a35:=a12-a29;
a36:=a12-a30;
a37:=a12-a31;
a38:=a12-a32;
end
else
begin
a33:=a13+a27;
a34:=a13+a28;
a35:=a13+a29;
a36:=a13+a30;
a37:=a13+a31;
a38:=a13+a32;
end;
end;
end;
drawtext(a11 and (a9<>3),if(a7=a8,a12*a7,0),' 最高价：'+a12),align2,colorgreen;
drawtext(a11 and (a9<>3),a13*a7,' 最低价：'+a13),valign2,align2,colorgreen;
drawtext(a11 and (a9<>3),if(a7=a8,a18*a7,0),' 50%：'+a18),align2,coloryellow;
drawtext(a11 and (a9=1),a23*a7,' 0.191：'+numtostrn(a23,2)),align2,coloryellow;
drawtext(a11 and (a9=1),if(a7=a8,a24*a7,0),' 0.382：'+numtostrn(a24,2)),align2,coloryellow;
drawtext(a11 and (a9=1),if(a7=a8,a25*a7,0),' 0.618：'+numtostrn(a25,2)),align2,coloryellow;
drawtext(a11 and (a9=1),a26*a7,' 0.809：'+numtostrn(a26,2)),align2,coloryellow;
drawtext(a11 and (a9=1),if(a7=a8,a33*a7,0),' 1/8：'+numtostrn(a33,2)),align2,colorgreen;
drawtext(a11 and (a9=1),a34*a7,' 1/4：'+numtostrn(a34,2)),align2,colorgreen;
drawtext(a11 and (a9=1),a35*a7,' 3/8：'+numtostrn(a35,2)),colorgreen;
drawtext(a11 and (a9=1),if(a7=a8,a36*a7,0),' 5/8：'+numtostrn(a36,2)),colorgreen;
drawtext(a11 and (a9=1),a37*a7,' 3/4：'+numtostrn(a37,2)),align2,colorgreen;
drawtext(a11 and (a9=1),a38*a7,' 7/8：'+numtostrn(a38,2)),align2,colorgreen;
drawtext(a11 and (a9<>3),a12*a7,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),linethick7,align2,colorred;
drawtext(a11 and (a9<>3),a13*a7,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),linethick7,align2,colorred;
drawtext(a11 and (a9<>3),a18*a7,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),linethick7,align2,colorff0000;
drawtext(a11 and (a9=1),a23*a7,'﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),linethick0,align2,color208fff;
drawtext(a11 and (a9=1),if(a7=a8,a24*a7,0),'﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),linethick0,align2,color208fff;
drawtext(a11 and (a9=1),a25*a7,'﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),linethick0,align2,color208fff;
drawtext(a11 and (a9=1),a26*a7,'﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),linethick0,align2,color208fff;
drawtext(a11 and (a9=1),a33*a7,' ﹉﹉﹉﹉'),align2,colorgreen;
drawtext(a11 and (a9=1),a34*a7,' ﹉﹉﹉﹉'),align2,colorgreen;
drawtext(a11 and (a9=1),a35*a7,'﹉﹉'),colorgreen;
drawtext(a11 and (a9=1),if(a7=a8,a36*a7,0),'﹉﹉'),colorgreen;
drawtext(a11 and (a9=1),a37*a7,' ﹉﹉﹉﹉'),align2,colorgreen;
drawtext(a11 and (a9=1),a38*a7,' ﹉﹉﹉﹉'),align2,colorgreen;
a1:=2*2*2*2*5*5*5*5*10*10+2*2*2*2*5*5*5*5*10+2*2*5*5*10+2*2*5*5+10+5;
a2:=2*2*2*2*5*5*5*5*10*10+2*2*2*2*5*5*5*5*10+2*2*5*5*10+2*2*5*5+10+5+2;
a3:=2*2*2*2*5*5*5*5*10*10+2*2*2*2*5*5*5*5*10+2*2*5*5*10+2*2*5*5+10+5+2+2;
a4:=if(date<a1,1,0);
a5:=if(date<a2,1,0);
a6:=if(date<a3,1,0);
a39:=1;{a4*a5*a6;}
a40:=0+((5-2)*2)+((5-2)*2)+2-((5-2)*2-2);
a41:=((5-2)*2)*((5-2)*2-2)-((5-2)*2)-2-(((5-2)*2+((5-2)*2))/((5-2)*2+2-((5-2)*2)))+0;
a8:=(2*2*2*2*2-5*5-10+2+2+2*2*2*2*2-5*5-10+2+2+2*2*2*2*2-5*5-10+2+2)/(5-2);
a42:=hhvall(hhv(barpos,count(c,0)));
a43:=ref(h,3)=(hhv(h,2*3+1));
a44:=filter(a43,3);
a45:=backset(a44,3+1);
a46:=filter(a45,3);
a47:=ref(l,3)=(llv(l,2*3+1));
a48:=filter(a47,3);
a49:=backset(a48,3+1);
a50:=filter(a49,3);
a51:=
[url=http://www.70822.com/soft/sort013/sort03/down-138686.html]波浪理论 源码[/url]