如何将代码批量导入到雷达屏?
将股票代码批量导入到雷达屏可以通过EasyLanguage实现。首先,用StreamReader读取文件获得股票代码列表,然后用宏命令启动一个新的雷达屏并依此插入代码到雷达屏上。宏命令的指令列表见 TradeStation-帮助-TradeStation平台帮助-TradeStation桌面-命令行-命令行参考(所有命令)中查看。
#
示例1:使用EasyLanguage将代码批量插入到雷达屏上
using guosen;
using elsystem;
using tsdata.common;
using tsdata.marketdata;
using elsystem.collections;
using elsystem.io;
method void AnalysisTechnique_Initialized( elsystem.Object sender, elsystem.InitializedEventArgs args )
vars:Vector vec_Symbols,int loop;
begin
vec_Symbols = ReadFile("D:\symbols.txt");
Runcommand(".NRS");
for loop = 0 to vec_Symbols.Count-1
Begin
Runcommand(".ISY " + vec_Symbols[loop].ToString());
End;
end;
//从path读取股票代码列表,文件格式为每行一个股票代码
Method vector ReadFile(string path)
vars:StreamReader sr,string line,vector vec,bool isEnd;
Begin
isEnd = false;
vec = new Vector;
Try
sr = StreamReader.Create(path); //创建读入流
while(true)
Begin
line = sr.ReadLine(); //读取一行
if(line.Trim().Equals(""))then
Begin
print("Read to end.");//读取的文本为空字符串
break;
End
Else
vec.Push_Back(line); //以逗号为分隔拆分
End;
Return vec;
catch(elsystem.Exception ex)
print("File read exception. Not found or locked.");
Return null;
End;
End;
Symbols.txt 文件格式如下
603003.SH 603005.SH 603006.SH 603008.SH 603009.SH 603010.SH 603011.SH 603012.SH 603015.SH 603017.SH 603018.SH 603019.SH 603020.SH 603021.SH 603022.SH 603023.SH 603025.SH 603026.SH 603027.SH 603030.SH 603031.SH 603066.SH 603077.SH 603085.SH 603088.SH 603099.SH 603100.SH