PORTFOLIO_EX ROBOT_STEP_1; DESCRIPTION ROBOT_STEP_1; CLIENTS_LIST ALL_CLIENTS; FIRMS_LIST ALL_FIRMS; USE_CASE_SENSITIVE_CONSTANTS; PROGRAM ' начальные параметры LowLevel =8500 ' нижний уровень HiLevel = 9100 ' верхний уровень SecCode = "SRU1" ' название инструмента ClassCode = "SPBFUT" ' код класса инструмента ' получаем лучшую цену спроса PriceBid =0 + GET_PARAM (ClassCode,SecCode,"BID") ' получаем лучшую цену предложения PriceOffer =0 + GET_PARAM (ClassCode,SecCode,"OFFER") ' получаем количество дней до экспирации ExpDays =0 + GET_VALUE(GET_PARAM_EX (ClassCode,SecCode,"DAYS_TO_MAT_DATE"), "PARAM_IMAGE") ' получаем время сервера SERVER_TIME=GET_INFO_PARAM("SERVERTIME") ' проверяем достижение уровней ' если цена спроса выше HI уровня надо продавать IF PriceBid >= HiLevel SERVER_TIME ="SELL" END IF ' если цена спроса ниже LOW уровня надо покупать IF PriceOffer <= LowLevel SERVER_TIME = "BUY" END IF ' выводим данные в таблицу OUTPUT=CREATE_MAP() OUTPUT=SET_VALUE(OUTPUT,"BID",PriceBid) OUTPUT=SET_VALUE(OUTPUT,"OFFER",PriceOffer) OUTPUT=SET_VALUE(OUTPUT,"HI",HiLevel) OUTPUT=SET_VALUE(OUTPUT,"LOW",LowLevel) OUTPUT=SET_VALUE(OUTPUT,"CODE",SecCode) OUTPUT=SET_VALUE(OUTPUT,"TIME",SERVER_TIME) OUTPUT=SET_VALUE(OUTPUT,"EXP",ExpDays) DELETE_ALL_ITEMS() ADD_ITEM(1,OUTPUT) END_PROGRAM PARAMETER TIME; PARAMETER_TITLE TIME; PARAMETER_DESCRIPTION Время_Сервера; PARAMETER_TYPE STRING(10); END PARAMETER CODE; PARAMETER_TITLE CODE; PARAMETER_DESCRIPTION Инструмент; PARAMETER_TYPE STRING(10); END PARAMETER EXP; PARAMETER_TITLE EXP; PARAMETER_DESCRIPTION Экспирация; PARAMETER_TYPE NUMERIC (10,0); END PARAMETER BID; PARAMETER_TITLE BID; PARAMETER_DESCRIPTION Цена_Спроса; PARAMETER_TYPE NUMERIC (10,2); END PARAMETER OFFER; PARAMETER_TITLE OFFER; PARAMETER_DESCRIPTION Цена_Предложения; PARAMETER_TYPE NUMERIC (10,2); END PARAMETER HI; PARAMETER_TITLE HI; PARAMETER_DESCRIPTION Верхний_Уровень; PARAMETER_TYPE NUMERIC (10,2); END PARAMETER LOW; PARAMETER_TITLE LOW; PARAMETER_DESCRIPTION Нижний_Уроень; PARAMETER_TYPE NUMERIC (10,2); END