Есть код выводящий в Excell значения 30 свечей и 2 индикаторов Квик на 60мин свечах. Профи подскажите плс как поправить код для вывода значений и сигналов дневных свечей и недельных. Это 5 сек для профи.

Fri, 19 Feb 2016 01:45:38 +0300

Есть код выводящий в Excell значения 30 свечей и 2 индикаторов Квик на 60мин свечах. Профи подскажите плс как поправить код для вывода значений и сигналов дневных свечей и недельных. Это 5 сек для профи. Есть код выводящий в Excell значения 30 свечей и 2 индикаторов Квик на 60мин свечах. Профи подскажите плс как поправить код для вывода значений и сигналов дневных свечей и недельных. Это 5 сек для профи. в форуме Программирование на языке QPILE.
Вот код. Буду очень благодарен за подсказку. Понимаю что это элементарно, но не могу сам разобраться. Нужен код для вывода того же самого но на недельных и дневных свечах. С уважением.

PORTFOLIO_EX RI60_indicators_RIH6;
DESCRIPTION RI_D_indicators_RIH6;
CLIENTS_LIST ALL_CLIENTS;
FIRMS_LIST ALL_FIRMS;

USE_CASE_SENSITIVE_CONSTANTS

PROGRAM
secClass = "SPBFUT"
secCode = "RIH6"
timeFrame = 60
candleMaxCount = 30

DELETE_ALL_ITEMS()

dateTime = GET_DATETIME()
yearPart = GET_VALUE(dateTime, "YEAR")
monthPart = GET_VALUE(dateTime, "MONTH")
dayPart = GET_VALUE(dateTime, "DAY")
hourPart = GET_VALUE(dateTime, "HOUR")
minutePart = GET_VALUE(dateTime, "MIN")

minutePart = timeFrame * FLOOR(minutePart / timeFrame)

for i from 1 to candleMaxCount
if(i > 5000)
i = 10000
end if
dateString = GetDataString(yearPart, monthPart, dayPart)
timeString = GetTimeString(hourPart, minutePart)
candle = GET_CANDLE(secClass, secCode, "", timeFrame, "PRICE", dateString, timeString)
open = GET_VALUE(candle, "OPEN") + 0
if (open = 0)
candleMaxCount = candleMaxCount + 1
end if

if (open > 0)
high = GET_VALUE(Candle, "HIGH")
low = GET_VALUE(Candle, "LOW")
close = GET_VALUE(Candle, "CLOSE")
volume = GET_VALUE(candle, "VOLUME")
output = CREATE_MAP()
output = SET_VALUE(output, "Date", dateString)
output = SET_VALUE(output, "Time", timeString)
output = SET_VALUE(output, "OpenPrice", open)
output = SET_VALUE(output, "HighPrice", high)
output = SET_VALUE(output, "LowPrice", low)
output = SET_VALUE(output, "ClosePrice", close)
output = SET_VALUE(output, "Volume", volume)
Ind1 = GET_CANDLE_EX ("macdRI60",dateString, timeString)
LineCount_ind1 = GET_VALUE (Ind1,"COUNT")

Lines_ind1 = GET_VALUE (Ind1,"LINES")
FOR lineID FROM 0 TO LineCount_ind1-1
Line = GET_COLLECTION_ITEM (Lines_ind1, lineID)
close_ind = Get_Value (Line,"CLOSE")
output = SET_VALUE(output, "Ind1_Par"&(lineID+1), close_ind)
END FOR

Ind2 = GET_CANDLE_EX ("rsiRI60",dateString, timeString)
LineCount_ind2 = GET_VALUE (Ind2,"COUNT")

Lines_ind2 = GET_VALUE (Ind2,"LINES")
FOR lineID FROM 0 TO LineCount_ind2-1
Line = GET_COLLECTION_ITEM (Lines_ind2, lineID)
close_ind = Get_Value (Line,"CLOSE")
output = SET_VALUE(output, "Ind2_Par"&(lineID+1), close_ind)
END FOR

ADD_ITEM(i, output)
end if
minutePart = minutePart - timeFrame
if minutePart < 0
minutePart = 60 - timeFrame
hourPart = hourPart - 1
if hourPart < 0
hourPart = 23
dayPart = dayPart - 1
if dayPart < 1
dayPart = 31
monthPart = monthPart - 1
if monthPart < 1
monthPart = 12
yearPart = yearPart - 1
end if
end if
end if
end if
end for

func GetDataString(year, month, day)
if (LEN(month) < 2)
month = "0" & month
end if
if (LEN(day) < 2)
day = "0" & day
end if
result = year & month & day
end func

func GetTimeString(hour, min)
if (LEN(hour) < 2)
hour = "0" & hour
end if
if (LEN(min) < 2)
min = "0" & min
end if
result = hour & min & "00"
end func

END_PROGRAM

PARAMETER Date;
PARAMETER_TITLE Дата;
PARAMETER_DESCRIPTION Дата cвечки;
PARAMETER_TYPE STRING(30);
END

PARAMETER Time;
PARAMETER_TITLE Время;
PARAMETER_DESCRIPTION Время cвечки;
PARAMETER_TYPE STRING(30);
END

PARAMETER OpenPrice;
PARAMETER_TITLE Цена открытия;
PARAMETER_DESCRIPTION Цена открытия свечки;
PARAMETER_TYPE NUMERIC(10,0);
END

PARAMETER HighPrice;
PARAMETER_TITLE Максимальная цена;
PARAMETER_DESCRIPTION Максимальная цена свечки;
PARAMETER_TYPE NUMERIC(10,0);
END

PARAMETER LowPrice;
PARAMETER_TITLE Минимальная цена;
PARAMETER_DESCRIPTION Минимальная цена свечки;
PARAMETER_TYPE NUMERIC(10,0);
END

PARAMETER ClosePrice;
PARAMETER_TITLE Цена закрытия;
PARAMETER_DESCRIPTION Цена закрытия свечки;
PARAMETER_TYPE NUMERIC(10,0);
END

PARAMETER Volume;
PARAMETER_TITLE Объем;
PARAMETER_DESCRIPTION Объем сделок в свечке;
PARAMETER_TYPE NUMERIC(10,0);
END

PARAMETER Ind1_Par1;
PARAMETER_TITLE Инд.1 пар.1;
PARAMETER_DESCRIPTION Индикатор 1;
PARAMETER_TYPE NUMERIC(10,4);
END

PARAMETER Ind1_Par2;
PARAMETER_TITLE Инд.1 пар.2;
PARAMETER_DESCRIPTION Индикатор 1;
PARAMETER_TYPE NUMERIC(10,4);
END

PARAMETER Ind1_Par3;
PARAMETER_TITLE Инд.1 пар.3;
PARAMETER_DESCRIPTION Индикатор 1;
PARAMETER_TYPE NUMERIC(10,4);
END

PARAMETER Ind2_Par1;
PARAMETER_TITLE Инд.2 пар.1;
PARAMETER_DESCRIPTION Индикатор 2;
PARAMETER_TYPE NUMERIC(10,4);
END

PARAMETER Ind2_Par2;
PARAMETER_TITLE Инд.2 пар.2;
PARAMETER_DESCRIPTION Индикатор 2;
PARAMETER_TYPE NUMERIC(10,4);
END

PARAMETER Ind2_Par3;
PARAMETER_TITLE Инд.2 пар.3;
PARAMETER_DESCRIPTION Индикатор 2;
PARAMETER_TYPE NUMERIC(10,4);
END

END_PORTFOLIO_EX
19.02.2016 01:45:38, DMITRYQ DMITRYQ.