- 精华
- 0
- 在线时间
- 443 小时
- UID
- 50057
- 积分
- 304
- 帖子
- 175
- 阅读权限
- 50
- 注册时间
- 2011-6-27
- 最后登录
- 2015-1-4
- 精华
- 0
- UID
- 50057
- 积分
- 304
- 帖子
- 175
- 主题
- 17
- 阅读权限
- 50
- 注册时间
- 2011-6-27
- 最后登录
- 2015-1-4
|
本帖最后由 ggyyff 于 2013-4-6 22:23 编辑
把26楼的语法按TB修正了一下 编译能通过 程序还是有问题 大神们继续修改吧- Params
- Numeric RISK(3);
- Numeric MONYRISK(2.0);
- Numeric value2(1);
- vars
- Numeric value3(18);
- NumericSeries value4;
- NumericSeries value5;
- NumericSeries value6;
- NumericSeries value7;
- NumericSeries value8;
- NumericSeries value9;
- NumericSeries value11;
- NumericSeries value12;
- NumericSeries value13;
- NumericSeries Value14;
- NumericSeries value19;
- NumericSeries const;
- NumericSeries Range;
- NumericSeries avg;
- NumericSeries val;
- NumericSeries BS105;
- NumericSeries MyLot(0);
- Numeric offSetDots(0);
- NumericSeries high0;
- NumericSeries low0;
- NumericSeries lowN;
- NumericSeries closeN;
- NumericSeries highN;
- NumericSeries value10(10000);
- Begin
- If(Date != Date[1] )
- {
- value19 = MONYRISK*AvgTrueRange(10)*BigPointValue;
- Value2 = Risk;
- value3 = 18 + 3*value2;
- }
-
- value11 = Average(C, 9);
- value12 = Average(C, value3);
- value13 = AvgTrueRange(10);
- value4=(high+low)/2;
- value5=2*value4-low[risk];
- value6=2*value4-high[risk];
- IF (close[risk]<value4)
- {
- value4=value5;
- }
- Else
- {
- value4=value6;
- }
-
- If (nthcon (value4 > value4[1] and value4[1] < value4[2], 2) > -1 and L[1] > value4[1])
- value5 = value4[1] - value13 ;
- If (NthCon (value4 < value4[1] and value4[1] > value4[2], 2) > -1 and H[1] < value4[1])
- value6 = value4[1] + value13 ;
- If (value11[1] < value12[1] and value11 > value12)
- value5 = TrueLow -value13;
- If (value11[1] > value12[1] and value11 < value12)
- value5 = TrueHigh + value13;
- If (Abs( O - C[1] ) >= 1.618*value13)
- {
- If (value11 > value12)
- value5 = Low - value13;
- If (value11 < value12)
- value14 = High + value13;
- }
- //value7 = BS105(L, 2.40, value13, value9 );
- if (c-2.4*Value13<value9)
- {
- value7=value9;
- }
- Else
- {
- value7=c-2.4*Value13;
- }
-
- if(c-2.4*Value13<value10)
- {
- value8=value10;
- }
- Else
- {
- value8=c-2.4*Value13;
- }
- value9=value7;
- value10 = value8;
- If ((L - value9) > value19/BigPointValue)
- value9 = L - (1.50 + 0.1*Risk)*value13;
- If (value10 - H > value19/BigPointValue)
- value10 = H + (1.50 + 0.1*Risk)*value13;
- If (value11 >= value12 and value5 >= value9)
- value9 = value5;
- If (value11 <= value12 and value6 <= value10)
- value10 = value6;
- If (value11 <= value12 and value5 <= value9)
- value9 = value5;
- If (value11 >= value12 and value6 >= value10)
- value10 = value6;
- If (NthCon(value11 >= value12, 2) > -1 and value9 <= value9[1])
- value9 = value9[1] ;
- If (NthCon(value11 <= value12, 2) > -1 and value10 >= value10[1])
- value10 = value10[1] ;
-
-
- If (value9 > 0 and value11 >= value12 and value9 <= H)
- {
- PlotNumeric( "BuyStop2",value9);
- // Buy(MyLot,Open+offSetDots);
- }
- If (value10 > 0 and value10 < 1000000000 and value11 <= value12 and value10 >= L)
- {
- PlotNumeric( "SellStop2",value10);
- // SellShort(MyLot,Open-offSetDots);
- }
- End
复制代码 把26楼的语法按TB修正了一下 编译能通过 程序还是有问题 大神们继续修改吧 |
|