nikolz (Все сообщения пользователя)

name="KEZ_Casper"
Settings={Name =name,period = 28,period2 = 28}


function OnCalculate(i)
   if i==1 then
     VuEma,Vu,Pu,Pd,F = 1,0,0,0,0
      message("VuEma = " .. VuEma)
   end
   local d=C(i)-O(i);
   Pu=H(i)-L(i); pd=Pu-d;
   if 0>d then  d=Pu; Pu=Pd;  Pd=d end     -- отрицательная свеча
    Vd=(Pd*V(i))/(Pu + Pd)
    Vu= V(i)-Vd
    F=2/(Settings.period + 1)
    VuEma = Vu * F + VuEma * (1 - F)
    return Vu, -Vd, VuEma
end

function Init()
   local t={}   Settings.line=t;
    t[#t+1]={ Name = "Casper", Color = RGB(255, 0, 0), Type = TYPE_LINE, Width = 1}
    t[#t+1]={ Name = "A",     Color = RGB(0, 100, 100), Type = TYPE_LINE, Width = 1}
    t[#t+1]={ Name = "B",  Color = RGB(100, 100, 0),  Type = TYPE_LINE,  Width = 1}
   return #t
end

local t1=t[sec]  if t1==nil then t1={};t[sec]=t1; end
t1[#t1+1]=AddLabel(tag, label_params);

local t1=t[sec]; for j=1,#t1 do  DelLabel(tag,t1[j] ) end

# Lua 5.4
command.go.*.lua=D:/lua54/lua54.exe -e "io.stdout:setvbuf 'no'" "$(FileNameExt)"
command.compile.*.lua=D:/lua54/luac54.exe -o "$(FileName).luac" "$(FileNameExt)"
# Lua 5.3
#command.go.*.lua=D:/lua53/lua53.exe -e "io.stdout:setvbuf 'no'" "$(FileNameExt)"
#command.compile.*.lua=D:/lua53/luac53.exe -o "$(FileName).luac" "$(FileNameExt)"

print(_VERSION)

>D:/lua54/lua54.exe -e "io.stdout:setvbuf 'no'" "tes24.lua" 
Lua 5.4
>Exit code: 0

>D:/lua53/lua53.exe -e "io.stdout:setvbuf 'no'" "tes24.lua" 
Lua 5.3
>Exit code: 0

>D:/LuaJIT210/luajit.exe -e "io.stdout:setvbuf 'no'" "tes24.lua" 
Lua 5.1
>Exit code: 0

>D:/lua54/lua54.exe -e "io.stdout:setvbuf 'no'" "test2020.lua" 
>Exit code: 0
>D:/lua54/luac54.exe -o "test2020.luac" "test2020.lua"
>Exit code: 0

>D:/lua53/lua53.exe -e "io.stdout:setvbuf 'no'" "test2020.lua" 
>Exit code: 0
>D:/lua53/luac53.exe -o "test2020.luac" "test2020.lua"
>Exit code: 0

>D:/lua54/lua54.exe -e "io.stdout:setvbuf 'no'" "test2020.lua" 
>Exit code: 0
>D:/lua54/luac54.exe -o "test2020.luac" "test2020.lua"
>Exit code: 0

[/CODE] [URL=/user/62/]nikolz[/URL], Тут видимо дело в версиях, в Lua 5.3 есть поддержка Lua 5.1, а Lua 5.4 уже нет такой поддержки, да и изменения есть серьезные, которые не поддерживаются в ранних версиях.
[URL=/user/3132/]Nikolay[/URL],  Так ведь просто удобно, нажал кнопочку и привет. Потом просто привычка, быстрая проверка кода, не отходя от "кассы". [QUOTE]
[/QUOTE]
[/QUOTE]
вот запускаю скрипт в lua5.4  Он работает и в lua 5.3 и и lua5.1[CODE]>D:/lua54/lua54.exe -e "io.stdout:setvbuf 'no'" "test2020.lua" 
>Exit code: 0

>D:/lua54/luac54.exe -o "test2020.luac" "test2020.lua"
>Exit code: 0

>D:/lua53/lua53.exe -e "io.stdout:setvbuf 'no'" "Moex.lua" 
engines

id;name;title
1;stock;Фондовый рынок и рынок депозитов
2;state;Рынок ГЦБ (размещение)
3;currency;Валютный рынок
4;futures;Срочный рынок
5;commodity;Товарный рынок
6;interventions;Товарные интервенции
7;offboard;ОТС-система
9;agro;Агро
1012;otc;ОТС с ЦК
1282;quotes;Квоты

markets

id;trade_engine_id;trade_engine_name;trade_engine_title;market_name;market_title;market_id;marketplace;is_otc;has_history_files;has_history_trades_files;has_trades;has_history;has_candles;has_orderbook;has_tradingsession;has_extra_yields;has_delay
5;1;stock;Фондовый рынок и рынок депозитов;index;Индексы фондового рынка;5;INDICES;0;1;0;1;1;1;0;1;0;0
1;1;stock;Фондовый рынок и рынок депозитов;shares;Рынок акций;1;MXSE;0;1;1;1;1;1;1;1;0;1
2;1;stock;Фондовый рынок и рынок депозитов;bonds;Рынок облигаций;2;MXSE;0;1;1;1;1;1;1;1;1;1

>D:/lua53/luac53.exe -o "Moex.luac" "Moex.lua"
>Exit code: 0

# Lua 5.4
command.go.*.lua=D:/lua54/lua54.exe -e "io.stdout:setvbuf 'no'" "$(FileNameExt)"
command.compile.*.lua=D:/lua54/luac54.exe -o "$(FileName).luac" "$(FileNameExt)"

Просто проверка концепции:
Кодw32 = require("w32")

run = true
evt = false

function OnInit()
  evt = w32.CreateEvent(nil, 0, 0, nil)
end

function OnStop()
 run = false
 w32.SetEvent(evt)
end

function main()
  while run do
     w32.WaitForSingleObject(evt, 1000000)
  end
  w32.CloseHandle(evt)
end

В колбеках вызываете SetEvent - main сразу просыпается.

local str = 'abc'