- 精华
- 0
- 在线时间
- 27 小时
- UID
- 22550
- 积分
- 52
- 帖子
- 2
- 阅读权限
- 30
- 注册时间
- 2010-12-29
- 最后登录
- 2016-10-31
- 精华
- 0
- UID
- 22550
- 积分
- 52
- 帖子
- 2
- 主题
- 1
- 阅读权限
- 30
- 注册时间
- 2010-12-29
- 最后登录
- 2016-10-31
|
刚注册了软件和开通模拟帐号,谢谢TB管理员的高效工作。
我从来没有学过编程,之前都是用文华和博易大师一类的软件,编程都是从网上抄来别人的,然后生吞活剥,胡改一气。
昨晚弄了一个通宵,想试着写个分形的公式,粗略看了所有的函数,竟然没找到绘图函数,是原本就没有还是我水平太差没弄懂??请各位帮忙指点。
在坛子里搜索了一下,找到一个别人写好的代码,但使用了PLOTNUMERIC,显示的线是连着的(如下图),太乱。
// 分形
Vars
NumericSeries Myn1;
NumericSeries Myn2;
Begin
If(High[2]==Highest(High[1],5))
{
Myn1=High[2];
}Else
{
Myn1=Myn1[1];
}
PlotNumeric("FU",Myn1,Red);
If(Low[2]==Lowest(Low[1],5))
{
Myn2=Low[2];
}Else
{
Myn2=Myn2[1];
}
PlotNumeric("FD",Myn2,Green);
End
//
(我不明白If(High[2]==Highest(High[1],5)))中,为什么用HIGH[1],我觉得应该用HIGH才对吧?)
只好自己改,最后只能用PLOTBAR来勉强实现,而且用PLOTBAR还只能分成两部分来做。
// 上分形
Vars
NumericSeries FUP;
Begin
If(High[2]==Highest(High,5))
{
FUP=High[2];
}
Else
{
FUP=FUP[1];
}
PlotBar("FUP",FUP,FUP,Red,2);
End
// 下分形
Vars
NumericSeries FDOWN;
Begin
If(Low[2]==Lowest(Low,5))
{
FDOWN=Low[2];
}
Else
{
FDOWN=FDOWN[1];
}
PlotBar("FDOWN",FDOWN,FDOWN,Green,2);
End
正在琢磨着突破分形的那根BAR上显示符号该怎么弄,估计够我晕的。
请各位指点是否还有更好更简洁的语句可以实现?
另外,上面红字部分如果改成
IIF(High[2]==Highest(High,5),FUP=High[2],FUP=FUP[1]);
是否可以?可改了以后就什么也不显示,哪出错了吗? |
附件: 你需要登录才可以下载或查看附件。没有帐号?注册
|