function OnAllTrade(price)
   if price >= min_price+X then
      OpenOrders()
      ...
   end
end

function OpenOrders()
   ...
end

       if  start  =   true   then 
      
       end 
      start  =   false  

local fRun = true

local first = getNumberOf("all_trades")-1
local last = first

function OnAllTrade(alltrade)
    last = last+1
end

function main()
    while fRun do
        while first ~= last do
            first = first+1
            local alltrade = getItem("all_trades", first)
            if alltrade then
                message("Новая сделка № "..tostring(alltrade.trade_num))
            end
        end
        sleep(1000)
    end
end

function OnStop(s)
    fRun = false
end

is_run = true
first=getNumberOf("all_trades")

function OnAllTrade(all_trade)
   start = true
end

function main()
   while is_run = true do

      if start = true then
      
         for k=first,getNumberOf("all_trades")-1 do
            first = k+1
         end
      
      end
      start = false

   end
end

function OnStop()
   is_run = false
end

if first == getNumberOf("all_trades") then
   sleep(1000)

first=getNumberOf("all_trades")

function main()
while true do

if first == getNumberOf("all_trades") then
   sleep(1000)
else

for k=first,getNumberOf("all_trades")-1 do
   local trade = getItem("all_trades", k)
   if trade then
      
      получение сигнала - выставление и снятие заявок;
                     присвоение новых значений переменным
                     
   end
   first = k+1
end

for i=0,getNumberOf("orders")-1 do

   снятие лишних заявок "на ходу" 

end

end
end
end

local fRun = true

function OnParam(class_code, sec_code)
    if class_code =="SPBFUT" and sec_code == "SiM8" then
        local low  = getParamEx(class_code, sec_code, "LOW")
        local high = getParamEx(class_code, sec_code, "HIGH")
        if low.result == "1" and high.result == "1" then
            message("low.param_value\t= "..low.param_value.."\nhigh.param_value\t= "..high.param_value)
        end
    end
end

function main()
    while fRun do
        sleep(1000)
    end
end

function OnStop(s)
    fRun = false
end