发表于:2005-08-05 04:11只看该作者
2楼
你要的程序是怎么计算的呢?或者把原来不能用的程序贴上来我来修改也可以。
韬客社区www.talkfx.co
3楼
在老正的帖子里,我也找不着了:')
韬客外汇论坛TALKFOREX.COM
发表于:2005-08-05 04:23只看该作者
4楼
光看名字也不知道要怎么写啊,哈哈。。。
韬客社区www.talkfx.co
5楼
在老正"新三价线(TLB) mt4指标"的帖子里,第2页
韬客外汇论坛TALKFOREX.COM
发表于:2005-08-05 05:48只看该作者
6楼
不如你找到后把程序贴上来?
韬客社区www.talkfx.co
7楼
CODE: [Copy to clipboard]
/*[[
Name := Three Line Break
Separate Window := No
First Color := Blue
First Draw Type := Histogram
First Symbol := 159
Use Second Data := Yes
Second Color := Red
Second Draw Type := Histogram
Second Symbol := 159
]]*/
Vars: CurrentBar(0), CurrentTrend (0), TotalBars (0), Value1 (0), Value2 (0);
Vars: LowestBox (0), HighestBox (0);
Arrays: BoxHigh[3] (-1000), BoxLow[3] (1000);
TotalBars = Bars;
CurrentBar = TotalBars-1;
If (Close[CurrentBar] < Open[CurrentBar]) Then {
CurrentTrend = -1;
BoxHigh[2] = Open[CurrentBar];
BoxLow[2] = Close[CurrentBar];
Value1 = Low[CurrentBar];
Value2 = High[CurrentBar];
} Else {
CurrentTrend = 1;
BoxHigh[2] = Close[CurrentBar];
BoxLow[2] = Open[CurrentBar];
Value1 = High[CurrentBar];
Value2 = Low[CurrentBar];
};
SetIndexValue(CurrentBar, Value1);
SetIndexValue2(CurrentBar, Value2);
SetLoopCount(0);
For CurrentBar = TotalBars-2 Downto 0 Begin
Value1 = 0;
Value2 = 0;
LowestBox = Min(Min(BoxLow[2], BoxLow[1]), BoxLow[0]);
HighestBox = Max(Max(BoxHigh[2], BoxHigh[1]), BoxHigh[0]);
If (((CurrentTrend > 0) And (Close[CurrentBar] < LowestBox)) Or
(CurrentTrend < 0) And (Close[CurrentBar] < BoxLow[2])) Then {
Value1 = Low[CurrentBar];
Value2 = High[CurrentBar];
BoxLow[0] = BoxLow[1];
BoxHigh[0] = BoxHigh[1];
BoxLow[1] = BoxLow[2];
BoxHigh[1] = BoxHigh[2];
BoxHigh[2] = BoxLow[2];
BoxLow[2] = Close[CurrentBar];
CurrentTrend = -1;
} Else If (((CurrentTrend < 0) And (Close[CurrentBar] > HighestBox)) Or
(CurrentTrend > 0) And (Close[CurrentBar] > BoxHigh[2])) Then {
Value1 = High[CurrentBar];
Value2 = Low[CurrentBar];
BoxLow[0] = BoxLow[1];
BoxHigh[0] = BoxHigh[1];
BoxLow[1] = BoxLow[2];
BoxHigh[1] = BoxHigh[2];
BoxLow[2] = BoxHigh[2];
BoxHigh[2] = Close[CurrentBar];
CurrentTrend = 1;
};
SetIndexValue(CurrentBar, Value1);
SetIndexValue2(CurrentBar, Value2);
End;
韬客外汇论坛TALKFOREX.COM
发表于:2005-08-05 07:54只看该作者
8楼
看上去好像没什么问题
[ 本帖最后由 maningok 于 2005-8-5 15:55 编辑 ]
未命名.gif

韬客社区www.talkfx.co
9楼
原帖由 maningok 于 2005-8-5 15:54 发表 看上去好像没什么问题

韬客外汇论坛TALKFOREX.COM
11楼


韬客外汇论坛TALKFOREX.COM
12楼


韬客外汇论坛TALKFOREX.COM
13楼


韬客外汇论坛TALKFOREX.COM
14楼


韬客外汇论坛TALKFOREX.COM
15楼
再求~哪位帮帮忙?:handshake:handshake:handshake
韬客外汇论坛TALKFOREX.COM