Юрий Волошин (Все сообщения пользователя)

os.setlocale('Russian_Russia.1251') --'ru_RU.CP1251' для FreeBSD, 'rus_RUS.CP1251' для линукса, 'Russian_Russia.1251' для Windows
b = 1
a = b + 0.5
message(tostring(a))

os.setlocale('Russian_Russia.1251') --'ru_RU.CP1251' для FreeBSD, 'rus_RUS.CP1251' для линукса, 'Russian_Russia.1251' для Windows
b = 1
a = b + 0,5
message(tostring(a))

message(string.upper('привет'))

os.setlocale('Russian_Russia.1251')
message(string.upper('привет'))

local result = getPortfolioInfoEx(firm, client, 2)
MinMargin = tonumber(result.min_margin)
InitMargin = tonumber(result.init_margin)
CorrectedMargin = tonumber(result.corrected_margin)
PortfolioValue = tonumber(result.portfolio_value)
UDS = (PortfolioValue-MinMargin)/(CorrectedMargin-MinMargin)

message(getPortfolioInfoEx(firm, client, 2).min_margin)
message(getPortfolioInfoEx(firm, client, 2).init_margin)
message(getPortfolioInfoEx(firm, client, 2).corrected_margin)
message(getPortfolioInfoEx(firm, client, 2).portfolio_value)

NPR1 = tonumber(getPortfolioInfoEx(firm, client, 2).rcv1)
NPR2 = tonumber(getPortfolioInfoEx(firm, client, 2).rcv2)

Prazdnik = string.find('08 March, 03 May, 04 November', os.date('%d %B'))
birzhaSPB = 'SPBXM'
birzhaSPBDE = 'SPBDE'
birzhaMSK = 'TQBR'
birzhaMSKrisk = 'TQPI'
birzhaNYSEbest = 'NYSE_BEST'
birzhaNasdaqBest = 'NASDAQ_BEST'
birzhaMSKvalyuta = 'CETS'
BabloKodUSD = 'USD000UTSTOM'
BabloKodEUR = 'EUR_RUB__TOM'
birzhaMSKvalyutaSmall = 'CETS_S1'
BabloKodUSDsmall = 'USD000SMALL'
BabloKodEURsmall = 'EUR000SMALL'

XXXXsFull[key].birzha = birzhaMSK

result = getParamEx(XXXXsFull[key].birzha, key, 'LOTSIZE')
if result.result == '1' then XXXXsFull[key].lot = result.param_value else message('Куу! LOTSIZE '..key, 3) end

function OnInit(script)
is_run = true
end

function OnStop()
is_run = false
end

function main()

birzhaSPB = 'SPBXM'
birzhaSPBDE = 'SPBDE'
birzhaMSK = 'TQBR'
birzhaNYSEbest = 'NYSE_BEST'
birzhaNasdaqBest = 'NASDAQ_BEST'
birzhaMSKvalyuta = 'CETS'
BabloKodUSD = 'USD000UTSTOM'
BabloKodEUR = 'EUR_RUB__TOM'
birzhaMSKvalyutaSmall = 'CETS_S1'
BabloKodUSDsmall = 'USD000SMALL'
BabloKodEURsmall = 'EUR000SMALL'

is_run_test = true
while is_run_test and is_run do is_run_test = false; message('Загрузка...'); sleep(9999)
for key in pairs(XXXXsFull) do local result = getParamEx(XXXXsFull[key].birzha, key, 'TRADINGSTATUS')
if result.result == '1' then elseif result.result == '0' then is_run_test = true else message('пипец is_run_test TRADINGSTATUS '..key, 3) end
if getBuySellInfo(firm, clients[1], XXXXsFull[key].birzha, key, 0).share == nil then is_run_test = true end
end --for key in pairs(XXXXsFull)
end --while is_run_test

sleep(9999)

-- дальше робот работает спокойно

while is_run do
USDRUB = getParamEx(birzhaMSKvalyuta, BabloKodUSD, 'LAST').param_value
EURRUB = getParamEx(birzhaMSKvalyuta, BabloKodEUR, 'LAST').param_value
EURUSD = EURRUB/USDRUB

-- дальше робот работает спокойно

if os.date('%H%M')=='2304' then is_run = false else sleep(9999) end -- настоящие торги закончены -- пора спать
end --while is_run

end --main()