新手求助改写供模仿学习编程

bcqh800100203

请老师帮助给写成TB模式以供学习。谢谢！
CYC:=BARSLAST(DATE<>REF(DATE,1))+1;
昨高:=REF(HHV(H,N),N);
昨低:=REF(LLV(L,N),N);
开盘价:=VALUEWHEN(CYC=1,OPEN);
HH:=HHV(昨高,N);//N日HIGH的最高价

LL:=LLV(昨低,N);//N日LOW的最低价

bcqh800100203

小米老师劳驾您帮忙给写一下吧！先谢您了！

小米

1. Params
   
2.         Numeric N(5);
   
3. Vars
   
4.         NumericSeries dayopen;
   
5.         Numeric HH;
   
6.         Numeric LL;
   
7.         Numeric i;
   
8. Begin
   
9.         if(TrueDate(0)!=TrueDate(1))
   
10.         {
    
11.                 dayopen = open;  //开盘价
    
12.         }
    
13.        
    
14.          for i=1 to N   
    
15.         {
    
16.                  HH = Max(HighD(i),HighD(i-1)); //N日最高价
    
17.                  LL = Min(lowd(i),lowD(i-1));  //N日最低价
    
18.         }
    
19.         Commentary("HH="+Text(HH));
    
20.         Commentary("LL="+Text(LL));
    
21.         Commentary("dayopen="+Text(dayopen));
    
22. END
    
23.      

复制代码

bcqh800100203

非常感谢小米老师，谢谢您了!

小米

bcqh800100203 发表于 2018-6-21 10:25
非常感谢小米老师，谢谢您了!

不谢