| "CME Loader" полуавтомат |
extern string call = "SEP15 EURO FX CALL";
extern string put = "SEP15 EURO FX PUT";
int h=FileOpen("cme.txt",FILE_READ|FILE_TXT,'\n');
//--- прочитаем данные из файла
while(!FileIsEnding(h))
{
//--- прочитаем строку
str=FileReadString(h,str_size);
...
//--- закроем файл
FileClose(h);
}
}
//--- если есть подстрока call
if(StringFind(str,call,0)>0)
...
//--- если есть подстрока put
if(StringFind(str,put,0)>0)
...
//читаем подстроку со страйком
strike=StringSubstr(str,0,4);
//читаем подстроку с премией
prem=StringSubstr(str,27,5);
void PutHLine(double price,const int width,const ENUM_LINE_STYLE style,const color clr)
{
const string name="HLine";
ObjectCreate(0,name,OBJ_HLINE,0,0,price);
//--- установим цвет линии
ObjectSetInteger(0,name,OBJPROP_COLOR,clr);
//--- установим стиль отображения линии
ObjectSetInteger(0,name,OBJPROP_STYLE,style);
//--- установим толщину линии
ObjectSetInteger(0,name,OBJPROP_WIDTH,width);
}
void PutText(const string text,const string font,const int font_size,double price,datetime time,const ENUM_ANCHOR_POINT anchor,const color clr)
{
const string name="Text"+TimeToStr(TimeCurrent());
//--- создадим объект "Текст"
ObjectCreate(0,name,OBJ_TEXT,0,time,price);
//--- установим текст
ObjectSetString(0,name,OBJPROP_TEXT,text);
//--- установим шрифт текста
ObjectSetString(0,name,OBJPROP_FONT,font);
//--- установим размер шрифта
ObjectSetInteger(0,name,OBJPROP_FONTSIZE,font_size);
//--- установим способ привязки
ObjectSetInteger(0,name,OBJPROP_ANCHOR,anchor);
//--- установим цвет
ObjectSetInteger(0,name,OBJPROP_COLOR,clr);
}
PutHLine(StringToDouble(strike)/1000+StringToDouble(prem)*0.001,2,STYLE_SOLID,Red);
.
17 мая 2015
|
04 сентября 2015
|
Комментарии (2)
Тем более, что в субботу мне скинула её последнюю версию. Думаю, скоро и топик появится или обновится по этому поводу.
27 Oxy Сообщений: 3430 - ..ιllιlι.lι.ιllι.ιlι..
35 AM2 Автор Сообщений: 16665 - Андрей
Зарегистрируйтесь или авторизуйтесь, чтобы оставить комментарий