自动导出数据

rypan

1. //------------------------------------------------------------------------
   
2. // 简称: dataExport
   
3. // 名称: 自动数据导出
   
4. // 类别: 公式应用
   
5. // 类型: 用户应用
   
6. // 输出:
   
7. //------------------------------------------------------------------------
   
8. Params
   
9. 
   
10. Vars
    
11.         String exportDir("d:/");
    
12.         String exportFile;
    
13.         String line;
    
14. Begin
    
15.         exportFile = exportDir + Symbol() + ".csv";
    
16.        
    
17.         //第一个Bar处，删除原来的行情文件
    
18.         If(BarStatus == 0){
    
19.                 FileDelete(exportFile);
    
20.         }
    
21.        
    
22.         line = DateToString(date());
    
23.         line = line + "," + Text(o);
    
24.         line = line + "," + Text(h);
    
25.         line = line + "," + Text(l);
    
26.         line = line + "," + Text(c);
    
27.         line = line + "," + Text(v);
    
28.         line = line + "," + Text(OpenInt);
    
29.        
    
30.         FileAppend(exportFile, line);
    
31. end

复制代码

对每个要自动导出的行情，建立一个超级图表，插入以上公式。所有超级图表可以建立一个工作室。

以后每次要自动导出行情时，只要重新编译一次公式即可。