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

function DeleteZayByNumber(class,emit,keyNumber)            
   transaction={
               ["CLASSCODE"] = class,                  
               ["SECCODE"] = emit,                     
               ["ACTION"] = "KILL_ORDER",               
               ["TRANS_ID"] = "333",
               ["ORDER_KEY"] = tostring(keyNumber),
            }
   transaction.CLIENT_CODE = "РОБОТ"
   local res = sendTransaction(transaction)               
   message(res)                                       
end

function DeleteAllZaySell(acc,emit,class)                  
   local NumOfCandlesM1 = getNumCandles (graphic_id)                  
   local t, n, _ = getCandlesByIndex(graphic_id, 0, NumOfCandlesM1-3, 3)   
   local N = getNumberOf("orders")                  
   local deleteCount = 0                              
   for i = 0,N-1 do
      local row = getItem("orders",i)
      if(row.account==acc and row.sec_code==emit and row.class_code==class) then                        
         if(bit.band(row.flags,1)>0) and                      
           (bit.band(row.flags,4)>0) then                  
            local keyNumber = math.floor(row.order_num)         
            DeleteZayByNumber(class,emit,keyNumber)            
            deleteCount = deleteCount + 1                  
         end
      end
   end
   return deleteCount                                 
end

function NewOtlLong(acc,emit,class)
   
   local NumOfCandlesM1 = getNumCandles (graphic_id)                     
   local t, n, _ = getCandlesByIndex(graphic_id, 0, NumOfCandlesM1-3, 3)      
   
   transaction={                                                
               ["ACCOUNT"] = acc,
               ["CLASSCODE"] = class,
               ["SECCODE"] = emit,
               ["ACTION"] = "NEW_STOP_ORDER",
               ["TRANS_ID"] = "001",
               ["OPERATION"] = "B",
               ["QUANTITY"] = "1",
               ["STOPPRICE"] = tostring((t[1].low)+60),
               ["PRICE"] = tostring((t[1].low)+60),
               ["EXPIRY_DATE"] = "GTC"
            }
   transaction.CLIENT_CODE = "РОБОТ"
   local res = sendTransaction(transaction)                        
   return 1                                                   
end

local price = tostring(StopShort.yvalue)

StopLong.yvalue

parame = GetLabelParams(graphic_id,label_id).yvalue или parame = GetLabelParams(graphic_id,label_id).YVALUE

message(tostring (parame))

local StopPointBuy = GetLabelParams(graphic_id,label_id)

MyAccount="SPBFUT00OI9"          -- сюда вбить свой код клиента; или вбить в настройки индикатора в квике
class_code="SPBFUT"
Emit="RIZ8"


is_run=true

function main()

   while is_run do
      Body()
   end
end

function OnStop(stop_flag)              
     is_run=false
     stop_flag=1
end

function Body()

function PosNowFunc(emit,account)                           --??? откуда здесь такие локальные переменные??? находим позицию по инструменту на фортс
   local nSize = getNumberOf("futures_client_holding")          --количество строк в таблице "Ограничения по клиентским счетам"
   if (nSize~=nil)then   
      for i = 0, nSize-1 do
         local row = getItem("futures_client_holding",i)
         if(row~=nil and row.sec_code == emit and row.trdaccid == account) then      --больше одной строки не должно быть для каждого инструмента
            return tonumber(row.totalnet)                                 --значение позиции на фортс   
         end
      end
   end
   return 0 
end

local PosNow = PosNowFunc(Emit,MyAccount)


if PosNow>0 then

message("Работает!")

end
end

MyAccount="---"          -- сюда вбить свой код клиента; или вбить в настройки индикатора в квике
class_code="SPBFUT"
Emit="RIZ8"
loss=100                   
loss_prosk=0
profit=110               -- количество пунктов от места входа в сделку до тейк профита; или вбить в настройки индикатора в квике
profit_otstup=0          -- отступ от максимума (параметр тейк-профита); или вбить в настройки индикатора в квике
profit_prosk=10          -- защитный спред (параметр тейк-профита); или вбить в настройки индикатора в квике

is_run=true

function main()

   while is_run do
      Body()
   end
end

function OnStop(stop_flag)              
     is_run=false
     stop_flag=1
end

function Body()

function PosNowFunc(emit,account)                           
   local nSize = getNumberOf("futures_client_holding")          --количество строк в таблице "Ограничения по клиентским счетам"
   if (nSize~=nil)then   
      for i = 0, nSize-1 do
         local row = getItem("futures_client_holding",i)
         if(row~=nil and row.sec_code == emit and row.trdaccid == account) then      --больше одной строки не должно быть для каждого инструмента
            return tonumber(row.totalnet)                                 --значение позиции на фортс   
         end
      end
   end
   return 0 
end

local PosNow = PosNowFunc(Emit,MyAccount)

local N=getNumCandles("M1")
t,n,l=getCandlesByIndex("M1", 0, N-6, 6)    --возвращает информацию о 5 последних свечах на графике с определённым идентификатором.

if PosNow>0 then

if t[5].low<t[4].low
and t[5].low<t[3].low
and t[5].low<t[2].low
and t[5].low<t[1].low
and t[5].low<t[0].low
then low_high=(t[5].low)-10
message("Стоп-лосс будет установлен по цене ".. tostring ((t[5].low)-10).."!")

elseif t[4].low<t[5].low
and t[4].low<t[3].low
and t[4].low<t[2].low
and t[4].low<t[1].low
and t[4].low<t[0].low
then low_high=(t[4].low)-10
message("Стоп-лосс будет установлен по цене ".. tostring ((t[4].low)-10).."!")


elseif t[3].low<t[5].low
and t[3].low<t[4].low
and t[3].low<t[2].low
and t[3].low<t[1].low
and t[3].low<t[0].low
then low_high=(t[3].low)-10
message("Стоп-лосс будет установлен по цене ".. tostring ((t[3].low)-10).."!")


elseif t[2].low<t[5].low
and t[2].low<t[4].low
and t[2].low<t[3].low
and t[2].low<t[1].low
and t[2].low<t[0].low
then low_high=(t[2].low)-10
message("Стоп-лосс будет установлен по цене ".. tostring ((t[2].low)-10).."!")

elseif t[1].low<t[5].low
and t[1].low<t[4].low
and t[1].low<t[3].low
and t[1].low<t[2].low
and t[1].low<t[0].low
then -- then low_high=(t[1].low)-10
message("Стоп-лосс будет установлен по цене ".. tostring ((t[1].low)-10).."!")

elseif t[0].low<t[5].low
and t[0].low<t[4].low
and t[0].low<t[3].low
and t[0].low<t[2].low
and t[0].low<t[1].low
then low_high=(t[0].low)-10
message("Стоп-лосс будет установлен по цене ".. tostring ((t[0].low)-10).."!")

end
end

if PosNow<0 then

message("Работает!")

end
end