老师，能否帮我把这个文华指标改成开拓者的！

hbshylove

这个也是顾比的公式，是文化版的，论坛上有两个顾比的公式，但是都和我用的这个不太一样，希望老师能帮忙改一下，下面是文华的源码。
HH1:=IF(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IF(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:IF(K2=1,HH2,LL2),COLORYELLOW;
G1:=VALUEWHEN(ISLASTBAR,G);
DRAWNUMBER(L>0,G1,G1,0,COLORCYAN);
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1,HIGH,W1=1,HT,COLORCYAN);
DRAWLINE(W1=1,LOW,W1=1,LT,COLORCYAN);
DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED);
DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED);
STICKLINE(W1>0,OPEN,CLOSE,COLORCYAN,1);
STICKLINE(W1<=0,OPEN,CLOSE,COLORRED,1);
STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,COLORRED,0);
STICKLINE(W2>0&&W1>0,OPEN,CLOSE,COLORCYAN,0);
MA60: MA(CLOSE, 60), COLORGREEN;
MA5: MA(CLOSE, 7), COLORWHITE;

hbshylove

还有一个，这两个指标都是我必须要用的，麻烦老师了。

MA1691:REF(VOL,111111),COLORBLACK;
VAR1:=(HHV(HIGH,13)-LLV(LOW,13));
VAR2:=(HHV(HIGH,13)-CLOSE);
VAR3:=(CLOSE-LLV(LOW,13));
VAR4:=(((VAR2/VAR1)*100)-70);
VAR5:=(((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60)))*100);
VAR6:=((((2*CLOSE)+HIGH)+LOW)/4);
VAR7:=SMA(((VAR3/VAR1)*100),3,1);
VAR8:=LLV(LOW,34);
VAR9:=(SMA(VAR7,3,1)-SMA(VAR4,9,1));
VAR10:=IF((VAR9>100),(VAR9-100),0);
VAR11:=HHV(HIGH,34);
VAR12:=EMA((((VAR6-VAR8)/(VAR11-VAR8))*100),13);
VAR13:=EMA(((0.667*REF(VAR12,1))+(0.333*VAR12)),2);
STICKLINE(((VAR12-VAR13)>0),VAR12,VAR13,COLORRED,0);
STICKLINE(((VAR12-VAR13)<0),VAR12,VAR13,COLORGREEN,0);
MA11:EMA(VAR13,5),COLORYELLOW ;

tradeblazer

1. Vars
   
2.     NumericSeries HH1;
   
3.     NumericSeries LL1;
   
4.     NumericSeries K1;
   
5.     NumericSeries HH2(0);
   
6.     NumericSeries LL2(0);
   
7.     NumericSeries K2(0);
   
8.     Numeric GG;
   
9. Begin
   
10.     If(CurrentBar ==0)
    
11.     {
    
12.         HH2 = 0;
    
13.         LL2 = 0;
    
14.         K2 = 0;
    
15.     }Else
    
16.     {
    
17.         HH2 = HH2[1];
    
18.         LL2 = LL2[1];
    
19.         K2 = K2[1];
    
20.     }
    
21.    
    
22.     HH1 = IIF(H<H[2]&&H[1]<H[2],H[2],0);
    
23.     LL1 = IIF(L>L[2]&&L[1]>L[2],L[2],0);
    
24.     If(HH1>0) HH2 = HH1;
    
25.     If(LL1>0) LL2 = LL1;
    
26.     K1 = IIF(C>HH2,-3,IIF(C<LL2,1,0));
    
27.     If(K1<>0) K2 = K1;
    
28.     GG = IIF(K2==1,HH2,LL2);
    
29.         PlotNumeric("gg",gg);
    
30.         If(Close >= GG)
    
31.         {
    
32.                 PlotNumeric("Open",Min(Open,Close));
    
33.                 PlotNumeric("Close",Max(Open,Close));
    
34.                 PlotNumeric("High",High);
    
35.                 PlotNumeric("Low",Low);
    
36.         }Else
    
37.         {
    
38.                 PlotNumeric("Open",Max(Open,Close));
    
39.                 PlotNumeric("Close",Min(Open,Close));
    
40.                 PlotNumeric("High",High);
    
41.                 PlotNumeric("Low",Low);
    
42.         }
    
43. End

复制代码

hbshylove

谢谢 tradeblazer。
第二个指标还是我自己学着来吧，不懂再问你吧。

hedgehog

原帖由 hbshylove 于 2009-1-22 13:52 发表
还有一个，这两个指标都是我必须要用的，麻烦老师了。

MA1691:REF(VOL,111111),COLORBLACK;
VAR1:=(HHV(HIGH,13)-LLV(LOW,13));
VAR2:=(HHV(HIGH,13)-CLOSE);
VAR3:=(CLOSE-LLV(LOW,13));
VAR4:=(((VAR2/VAR1)*100)-70) ...

MA1691要引用的VOL数据太靠前
而TB在商品样本数里面只能设置80000个样本
所以基本上确定是不可以的
不过以下是代码
你可以参考

1. //------------------------------------------------------------------------
   
2. Vars
   
3.         NumericSeries VAR1;
   
4.         Numeric VAR2;
   
5.         NumericSeries VAR3;
   
6.         NumericSeries VAR4;
   
7.         Numeric VAR5;
   
8.         NumericSeries VAR6;
   
9.         NumericSeries VAR7;
   
10.         NumericSeries VAR8;
    
11.         Numeric VAR9;
    
12.         Numeric VAR10(0);
    
13.         NumericSeries VAR11;
    
14.         NumericSeries VAR12;
    
15.         NumericSeries VAR13;
    
16.         Numeric MA1691;
    
17.         Numeric MA11;
    
18.        
    
19. Begin
    
20.         PlotNumeric("MA1691",VOL[111111]);
    
21.        
    
22.         VAR1=(HIGHEST(HIGH,13)-LOWEST(LOW,13));
    
23.         VAR2=(HIGHEST(HIGH,13)-CLOSE);
    
24.         VAR3=(CLOSE-LOWEST(LOW,13));
    
25.         VAR4=(((VAR2/VAR1)*100)-70);
    
26.         VAR5=(((CLOSE-LOWEST(LOW,60))/(HIGHEST(HIGH,60)-LOWEST(LOW,60)))*100);
    
27.         VAR6=((((2*CLOSE)+HIGH)+LOW)/4);
    
28.         VAR7=SMA(((VAR3/VAR1)*100),3,1);
    
29.         VAR8=LOWEST(LOW,34);
    
30.         VAR9=(SMA(VAR7,3,1)-SMA(VAR4,9,1));
    
31.        
    
32.         IF (VAR9>100)
    
33.                 VAR10=VAR9-100;
    
34.         Else        VAR10=0;       
    
35.         VAR11=Highest(HIGH,34);
    
36.         VAR12=EMA((((VAR6-VAR8)/(VAR11-VAR8))*100),13);
    
37.         VAR13=EMA(((0.667*VAR12[1])+(0.333*VAR12)),2);
    
38.         PlotNumeric("MA11",EMA(VAR13,5));
    
39.         If (VAR12-VAR13>0)
    
40.         {
    
41.                 PlotNumeric("Open",VAR13);
    
42.         PlotNumeric("Close",VAR12);
    
43.         PlotNumeric("High",High);
    
44.         PlotNumeric("Low",Low);
    
45.         }Else
    
46.         {
    
47.                 PlotNumeric("Open",VAR13);
    
48.         PlotNumeric("Close",VAR12);
    
49.         PlotNumeric("High",High);
    
50.         PlotNumeric("Low",Low);
    
51.         }
    
52. End
    
53. //------------------------------------------------------------------------
    
54. // 编译版本        GS2004.06.12
    
55. // 用户版本        2009/02/05 16:07
    
56. // 版权所有        hedgehog
    
57. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
    
58. //                        每一版本的TrabeBlazer公式修改和重写的权利
    
59. //------------------------------------------------------------------------

复制代码