Quik Lua

Сайт продукта: https://forum.quik.ru/forum10/
Lua — язык программирования, который используется в программировании торговых роботов под популярный в России терминал Quik.
  1. Раздаю x64 lua библиотеки для Quik8
    В рамках добра. 
    Для тех кто любит плюшки на lua.
    Пересобрал либины w32.dll и ffi.dll для Квика v8.0
    ffi проверил на прилагаемом к ней тесте — работает, w32.dll не проверял, сами скажите если что не так.

    На всякий случай напоминаю, это в рамках добра, так что требовать от меня вы ничего не можете. 
    Если надо что-то изменить — попросите, будет время и желание — сделаю.

    Исходный код w32.dll не менялся вообще, у ffi я внёс минимальные изменения в заголовочный файл чтобы всё собралось.
    Возможны некоторые косяки с изменением размера данных в w32.dll, ранее я ей никогда не пользовался. Проверяйте.
    Исходники брал с гита.
    ссылки:
    ffi - 
    www.dropbox.com/s/mqtpqyhi4b35lcq/ffi.dll?dl=1

    w32 -
    www.dropbox.com/s/1b6kb98uiad7pnc/w32.dll?dl=1
    ps: собирал на windows 10, на более ранних скорее всего не взлетит у вас.

    Авто-репост. Читать в блоге >>>
  2. Индикатор "Горизонтальные объемы"
    пока первая версия, в ближайшие дни доработаю
    Индикатор "Горизонтальные объемы"

    регулируется параметрами:
    Индикатор "Горизонтальные объемы"

    Авто-репост. Читать в блоге >>>
  3. bot.quikluacsharp.ru - позвольте представиться
    bot.quikluacsharp.ru - позвольте представиться
       Много лет мы занимаемся автоматизацией торговли наших клиентов в терминале Quik, но до сих пор не представились на просторах SmartLab. Исправляемся:)
       Приглашаем Вас, особенно тех, кто с нами еще не знаком, посетить наш основной ресурс quikluacsharp.ru  и дополнительную страницу для приема заказов bot.quikluacsharp.ru для того, чтобы мы смогли узнать друг друга лучше.
       Вы всегда можете обратиться к нам за любой помощью. Те, кто нас давно знают, подтвердят, что мы всегда отвечаем на любые вопросы, которые Вы задаете в комментариях на нашем основном сайте, помогаем Вам как самостоятельно написать своего робота, так и берем выполнение этой задачи полностью на себя, делая это на должном уровне.
    bot.quikluacsharp.ru - позвольте представиться

    Авто-репост. Читать в блоге >>>
  4. Учимся сами создавать торговые советники для Quik


    С ЧЕГО НАЧАТЬ САМОСТОЯТЕЛЬНОЕ ОБУЧЕНИЕ?


    Во первых, Вам потребуются удобные среды разработки (программы, где Вы сможете писать свой код), о том, где их взять и как установить прочтите здесь. Для написания скриптов QLua Вам понадобится только Notepad++.

    Во вторых, получите терминал QUIK с демо-счетом, можете получить его либо в компании Arqa (разработчик терминала) по данной ссылке, либо у практически любого брокера.

    И в третьих, начинайте изучать QLua.
    Рекомендую начать с раздела меню «QLua(Lua) основы», в частности со статей: «База скрипта в QLua (lua)» и «Функции обратного вызова, встроенные в QLua», остальные статьи данного раздела используйте как справочники при написании скрипта, в них практически к каждой функции есть пример кода с комментариями.

    Следующим шагом переходите к разделу меню «QUIK + QLua(Lua)», в нем речь идет о том, как взаимодействует скрипт с терминалом QUIK, как обменивается данными, все так же с примерами и комментариями. Особое внимание обратите на раздел «Блоки кода», в особенности на статью в нем: «Пример простого торгового движка „Simple Engine“ QLua(Lua)», разобрав код которой Вам многое станет понятнее, хоть по началу такой подход может показаться несколько сложным.


    читать дальше на смартлабе
  5. Коллеги, есть у кого-нибудь скрипт, позволяющий складывать значения нескольких индикаторов вместе?

     Необходимо сложить показания нескольких индикаторов по идентификаторам и вывести в виде графика. Может кто-то уже писал для себя? 

     Буду признателен, если поделитесь.
    читать дальше на смартлабе
  6. Кто сможет поправить робота lua?(не бесплатно) запускаю, всё ок торгует, но через какое то время, тупо перестаёт торговать.

    Кто сможет поправить робота lua?(не бесплатно)запускаю, всё ок торгует, но через какое то время, тупо перестаёт торговать.
    читать дальше на смартлабе
  7. Добрый вечер!
    Брокер Сбербанк
    Quik 7.19.3.1
    TSLab 2.0.33.0
    Возникли проблемы при настройке программы. Воспользовались инструкцией (во вложении) отсутствует папка Providers и соответственно дальнейший путь к файлу. Сталкивались ли Вы с такой проблемой?
  8. Господа алготрейдеры, подскажите, плиз, простейший пошаговый пример, как подключиться напрямую из qlua к локально установленному MSSQL (включая какую dll куда класть и что писать). Гугл не помогает.

    Господа алготрейдеры, подскажите, плиз, простейший пошаговый пример, как подключиться напрямую из qlua к локально установленному MSSQL (включая какую dll куда класть и что писать). Гугл не помогает.
    читать дальше на смартлабе
  9. Доработал zigzag5

    работа индикатора заключается в том, чтоб показать ближашие горизонтальные уровни (один снизу, другой сверху) и один наклонный

    Доработал zigzag5
    код индикатора:
    Settings=              
            {                          
                Name = "Zigzag5",   -- название индикатора
                delta=2,                  -- параметр индикатора                          
                deltaY=1,                  -- параметр индикатора   			
                linedeltaY=0.75,                  -- параметр индикатора   				
                line=                                     
                    {                               
                        {  
                            Name = "zigzagline3",
                            Type =TYPE_LINE,
                            Width = 2,
                            Color = RGB(0,255, 0)
                        },
                        {  
                            Name = "upline",
                            Type =TYPE_LINE,
                            Width = 2,
                            Color = RGB(255,0, 0)
                        },
                        {  
                            Name = "lowline",
                            Type =TYPE_LINE,
                            Width = 2,
                            Color = RGB(0,0, 255)
                        },
                        {  
                            Name = "declineline",
                            Type =TYPE_LINE,
                            Width = 2,
                            Color = RGB(255,0, 0)
                        },
                        {  
                            Name = "upline2",
                            Type =TYPE_LINE,
                            Width = 1,
                            Color = RGB(255,0, 0)
                        },
                        {  
                            Name = "lowline2",
                            Type =TYPE_LINE,
                            Width = 1,
                            Color = RGB(0,0, 255)
                        },
                        {  
                            Name = "declineline2",
                            Type =TYPE_LINE,
                            Width = 1,
                            Color = RGB(255,0, 0)
                        }				
                    }
           }
    	
    	
    function getradius(x, y)
      return math.sqrt(Settings.deltaY*y*y+x*x)
    end
    
    function koef(val)
      return 1 - 1/(1-1/val)
    end
    
    
    function Init()
    
      vMin = 0
      vMax = 0
      vMinindex = 0
      vMaxindex = 0
      voldMinindex = 0
      voldMaxindex = 0
      upval = 0
      lowval = 0
      upindex = 1
      lowindex = 1  
      veu = nil
      vel = nil
      curfrom = 1
      curto = 1
    
      return 7
    end
    
    
    function OnCalculate(index)
      local printz = 0
      vsize = Size()	  
    
      ve = nil
      veu = nil
      vel = nil 
      curv = nil 
      veu2 = nil
      vel2 = nil 
      curv2 = nil  
      
      if index == 1 then
        vMin = C(index)
        vMax = C(index)
        vMinindex = index
        vMaxindex = index
        voldMinindex = index
        voldMaxindex = index
        ve = C(index)  
    	  
      else
             
        if voldMaxindex >= voldMinindex then
            
           
    	  if C(index) > (1 + Settings.delta/100)*vMin then
             
            vMin = C(index)  
            vMax = C(index) 
            vMaxindex = index
            voldMinindex = vMinindex 
            vFrom = voldMaxindex  
            vTo = vMinindex
            printz = 1		
    		
            if (C(vMinindex) > C(vsize)) and (upval > koef(getradius(vsize - vMinindex, C(vMinindex) - C(vsize)))) then
    		  upval = koef(getradius(vsize - vMinindex, C(vMinindex) - C(vsize)))
    		  upindex = vMinindex
    		end
            if (C(vMinindex) < C(vsize)) and (lowval > koef(getradius(vsize - vMinindex, C(vMinindex) - C(vsize)))) then
    		  lowval = koef(getradius(vsize - vMinindex, C(vMinindex) - C(vsize)))
    		  lowindex = vMinindex
    	   end	
    	   
    	    curfrom = voldMaxindex
    	    curto = voldMinindex	  	   
    	      	    
          else      
    	  
            if vMin > C(index) then
              vMin = C(index)
              vMinindex = index
              vFrom = voldMaxindex      
              vTo = index
              printz = 0
    		  curto = index		
            else
              vFrom = vMinindex 
              vTo = index
              printz = 0
            end 		
    	  
    	    curfrom = voldMaxindex	
    		
          end
    	 
     	 
        else
         
        if voldMaxindex <= voldMinindex then
    	  
          if C(index) < (1 - Settings.delta/100)*vMax then
    	     	  
            vMax = C(index) 
            vMin = C(index)  
            vMinindex = index
            voldMaxindex = vMaxindex
            vFrom = voldMinindex
            vTo = vMaxindex
            printz = 1
    	
            if (C(vMaxindex) > C(vsize)) and (upval > koef(getradius(vsize - vMaxindex, C(vMaxindex) - C(vsize)))) then
    		  upval = koef(getradius(vsize - vMaxindex, C(vMaxindex) - C(vsize)))
    		  upindex = vMaxindex
    		end                   
            if (C(vMaxindex) < C(vsize)) and (lowval > koef(getradius(vsize - vMaxindex, C(vMaxindex) - C(vsize)))) then
    		  lowval = koef(getradius(vsize - vMaxindex, C(vMaxindex) - C(vsize)))
    		  lowindex = vMaxindex
    		end		
    		
    	    curfrom = voldMinindex		
    	    curto = voldMaxindex
    		
          else 
    	    	    
            if vMax < C(index) then
              vMax = C(index)
              vMaxindex = index
              vFrom = voldMinindex    
              vTo = index
              printz = 0
    		  curto = index		
            else  
              vFrom = vMaxindex  
              vTo = index        
              printz = 0
            end
    		
    	    curfrom = voldMinindex
    		
          end  
    
    	
        end
        end
     
        if (printz == 1) or (Size() == index) then
          for i = vFrom, vTo do
            k = (C(vTo)- C(vFrom))/(vTo- vFrom)
            v = i*k + C(vTo) - vTo*k
            SetValue(i, 1, v)
            ve = v
          end   
          if (Size() == index) then
            ve = C(index)
            if voldMaxindex >= voldMinindex then
              vFrom = voldMaxindex 
              vTo = vMinindex
            end 
            if voldMaxindex <= voldMinindex then  
              vFrom = voldMinindex
              vTo = vMaxindex
            end 
            for i = vFrom, vTo do
              k = (C(vTo)- C(vFrom))/(vTo- vFrom)
              v = i*k + C(vTo) - vTo*k
              SetValue(i, 1, v)
            end  
               
            -- up level line 
            if upindex ~= nil then
    		  if C(upindex) > C(index) then		
                for i = upindex, index do
                  SetValue(i, 2, C(upindex))
                  SetValue(i, 5, C(upindex)-Settings.linedeltaY*C(vsize)/100)			  
                end  	
                veu = C(upindex)	
              end 		  
    		end
    		
    		-- low level line 
    		if lowindex ~= nil then
    		  if C(lowindex) < C(index) then
                for i = lowindex, index do
                  SetValue(i, 3, C(lowindex))
                  SetValue(i, 6, C(lowindex)+Settings.linedeltaY*C(vsize)/100)				  
                end  			
                vel = C(lowindex)
             end
           end		
            
           if voldMaxindex >= voldMinindex then     
    	    vsign = -1
    		if curfrom == voldMinindex then
    		  vsign = -1
    		end
    		if curfrom == voldMaxindex then
    		  vsign = 1
    		end		
    
            -- inclined line
    	    if curto- curfrom > 0 then
    	     maxcurv = 0
    	     k = (C(curto)- C(curfrom))/(curto- curfrom)
             for i = curfrom, curto  do        
              curv = i*k + C(curto) - curto*k	
              if vsign == -1 then  		  
     		    if L(i) < curv then
    		      if maxcurv < curv - L(i) then
    		        maxcurv = curv - L(i)
                  end
                end
    		  else
     		    if H(i) > curv then
    		      if maxcurv < H(i) - curv then
    		        maxcurv = H(i) - curv
                  end
                end		  
    		  end
             end   		
             for i = curfrom, index  do
              curv = i*k + C(curto) - curto*k + vsign*maxcurv	  
              SetValue(i, 4,curv)
    		  curv2 = curv+ vsign*Settings.linedeltaY*C(vsize)/100
    		  SetValue(i, 7,curv2)		  
             end   		
    	    end
    	    curv = nil	
    	   end 
    	  
           if voldMaxindex <= voldMinindex then
    	    vsign = -1
    		if curfrom == voldMaxindex then
    		  vsign = 1
    		end		
    		if curfrom == voldMinindex then
    		  vsign = -1
    		end			
      
            -- inclined line
            if curto- curfrom > 0 then
             maxcurv = 0
             k = (C(curto)- C(curfrom))/(curto- curfrom)
             for i = curfrom, curto  do        
              curv = i*k + C(curto) - curto*k		  
              if vsign == -1 then  		  
     		    if L(i) < curv then
    		      if maxcurv < curv - L(i) then
    		        maxcurv = curv - L(i)
                  end
                end
    		  else
     		    if H(i) > curv then
    		      if maxcurv < H(i) - curv then
    		        maxcurv = H(i) - curv
                  end
                end		  
    		  end
             end   		
             for i = curfrom, index  do
              k = (C(curto)- C(curfrom))/(curto- curfrom)
              curv = i*k + C(curto) - curto*k + vsign*maxcurv	  		
              SetValue(i, 4,curv)
    		  curv2 = curv+ vsign*Settings.linedeltaY*C(vsize)/100
    		  SetValue(i, 7,curv2)
             end   		     
            end
    	    curv = nil		
           end	  
    	          
          end
        end
    
      end  
      
      return ve, veu, vel, curv, veu2, vel2, curv2  
      
    end




    читать дальше на смартлабе
  10. zigzag5 переработал алгоритм горизонтальных уровней

    zigzag5 модернизировал чтоб горизонтальные уровни рисовались более интеллектуально

    zigzag5 переработал алгоритм горизонтальных уровней
    zigzag5 переработал алгоритм горизонтальных уровней
    читать дальше на смартлабе
  11. trans2quik кто подключал!? нужно сделать небольшой проект, кто сможет взяться? 3к оплата нужно подключить trans2quik к моему quik настроить, далее получить bid ask high low и тд.

    trans2quik кто подключал!?нужно сделать небольшой проект, кто сможет взяться?3к оплатанужно подключить trans2quik к моему quik настроить, далее получить bid ask high low и тд.
    читать дальше на смартлабе
  12. STATDIVVOL индикатор статистического отклонения с учетом объема

    индикатор статистического отклонения с учетом объема
    STATDIVVOL индикатор статистического отклонения с учетом объема

    Settings={
    Name="STATDIVVOL",
    period=10,
      line=
      {
        {
          Name="curve",
          Color=RGB(0,0,255),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name="line",
          Color=RGB(255,0,0),
          Type=TYPE_LINE,
          Width=1
        }
      } 
    }
    
    function Init()
      return 2
    end
    
    function OnCalculate(index)
      local sum1=0
      local sum2=0  
      if index < Settings.period then
        return nil, nil
      else   	
        for i=index-Settings.period+1, index do  
          if C(i) > O(i) then
            sum1 = sum1 + (C(i) - O(i))*V(i)
            sum2 = sum2 + (C(i) - O(i))*V(i)
          else
            sum2 = sum2 + (O(i) - C(i))*V(i)
          end  
        end 
        sum1 = sum1/sum2    
      end
      
      return sum1, 0.5
    
    end

    с весовыми коэффициентами
    STATDIVVOL индикатор статистического отклонения с учетом объема
    читать дальше на смартлабе
  13. Zigzag4 с наклонными уровнями

    доработал предыдущий зигзаг где были только горизонтальные теперь наклонные появились
    выглядит так:
    Zigzag4 с наклонными уровнями
    код индикатора:
    читать дальше на смартлабе
  14. zigzag с уровнями на lua под quik

    индикатор:
    https://dropmefiles.com/yZqHe
    Модифицировал zigzag в плане добавления ближайших уровней к текущей цене:
    zigzag с уровнями на lua под quik
    код индикатора:
    Settings=              
            {                          
                Name = "Zigzag3",   -- название индикатора
                delta=2,                  -- параметр индикатора                          
                line=                                     
                    {                               
                        {  
                            Name = "zigzagline3",
                            Type =TYPE_LINE,
                            Width = 2,
                            Color = RGB(120,90, 140)
                        },
                        {  
                            Name = "upline",
                            Type =TYPE_LINE,
                            Width = 2,
                            Color = RGB(255,0, 0)
                        },
                        {  
                            Name = "lowline",
                            Type =TYPE_LINE,
                            Width = 2,
                            Color = RGB(0,0, 255)
                        }					
                    }
           }
    
    
    function Init()
    
      vMin = 0
      vMax = 0
      vMinindex = 0
      vMaxindex = 0
      voldMinindex = 0
      voldMaxindex = 0
      upval = 9999999
      lowval = 9999999  
      upindex = 1
      lowindex = 1  
      veu = nil
      vel = nil
    
      return 3
    end
    
    
    function OnCalculate(index)
      local printz = 0
      vsize = Size()	  
      
      if index == 1 then
        vMin = C(index)
        vMax = C(index)
        vMinindex = index
        vMaxindex = index
        voldMinindex = index
        voldMaxindex = index
        ve = C(index)  
    	  
      else
             
        if voldMaxindex >= voldMinindex then
          if C(index) > (1 + Settings.delta/100)*vMin then
            vMin = C(index)  
            vMax = C(index) 
            vMaxindex = index
            voldMinindex = vMinindex 
            vFrom = voldMaxindex  
            vTo = vMinindex
            printz = 1		
            if (C(vMinindex) > C(vsize)) and (upval > C(vMinindex) - C(vsize)) then
    		  upval = C(vMinindex) - C(vsize)
    		  upindex = vMinindex
    		end
            if (C(vMinindex) < C(vsize)) and (lowval > C(vsize)- C(vMinindex)) then
    		  lowval = C(vsize) - C(vMinindex)
    		  lowindex = vMinindex
    		end		
    		
    		
          else     
            if vMin > C(index) then
              vMin = C(index)
              vMinindex = index
              vFrom = voldMaxindex      
              vTo = index
              printz = 0
            else
              vFrom = vMinindex 
              vTo = index
              printz = 0
            end 
          end
        else
         
        if voldMaxindex <= voldMinindex then
          if C(index) < (1 - Settings.delta/100)*vMax then
            vMax = C(index) 
            vMin = C(index)  
            vMinindex = index
            voldMaxindex = vMaxindex
            vFrom = voldMinindex
            vTo = vMaxindex
            printz = 1
            if (C(vMaxindex) > C(vsize)) and (upval > C(vMaxindex) - C(vsize)) then
    		  upval = C(vMaxindex) - C(vsize)
    		  upindex = vMaxindex
    		end
            if (C(vMaxindex) < C(vsize)) and (lowval > C(vsize)- C(vMaxindex)) then
    		  lowval = C(vsize) - C(vMaxindex)
    		  lowindex = vMaxindex
    		end			
          else 
            if vMax < C(index) then
              vMax = C(index)
              vMaxindex = index
              vFrom = voldMinindex    
              vTo = index
              printz = 0
            else  
              vFrom = vMaxindex  
              vTo = index        
              printz = 0
            end
          end  
        end
        end
     
        if (printz == 1) or (Size() == index) then
          for i = vFrom, vTo do
            k = (C(vTo)- C(vFrom))/(vTo- vFrom);
            v = i*k + C(vTo) - vTo*k
            SetValue(i, 1, v)
            ve = v
          end   
          if (Size() == index) then
            ve = C(index)
            if voldMaxindex >= voldMinindex then
              vFrom = voldMaxindex 
              vTo = vMinindex
            end 
            if voldMaxindex <= voldMinindex then  
              vFrom = voldMinindex
              vTo = vMaxindex
            end 
            for i = vFrom, vTo do
              k = (C(vTo)- C(vFrom))/(vTo- vFrom);
              v = i*k + C(vTo) - vTo*k
              SetValue(i, 1, v)
            end  
    
    		if upindex ~= nil then
    		  if C(upindex) > C(index) then		
                for i = upindex, index do
                  SetValue(i, 2, C(upindex))
                end  	
                veu = C(upindex)	
              end 		  
    		end
    		if lowindex ~= nil then
    		  if C(lowindex) < C(index) then
                for i = lowindex, index do
                  SetValue(i, 3, C(lowindex))
                end  			
    		    vel = C(lowindex)
    		  end
    		end		
    
    
    
          end
        end
    
      end   
      return ve, veu, vel
    end

    читать дальше на смартлабе
  15. qlua и лимитные заявки

    Вопрос к спецам !
    Всем привет,!
    пытаюсь написать робота на qlua.
    возник вопрос, можно ли как то написать на qlua что бы робот анализировал стакан и выставлял лимитную заявку?
    цена то меняется, и если выставляешь лимитную заявку и она не сработала то так и будет висеть.
    можно как то сделать что бы она снималась и выставлялась новая?
    читать дальше на смартлабе
  16. quik вопрос по синтаксису lua

    не могу понять почему два цикла не дает сделать:
    Settings={
    Name="XXX",
    period=25,
      line=
      {
        {
          Name="curve",
          Color=RGB(255,0,0),
          Type=TYPE_LINE,
          Width=1
        }
      } 
    }
    
    function Init()  
      return 1
    end
    
    function OnCalculate(index)
      if index < Settings.period then
        return nil
      else
    
        for i=index-Settings.period+1, index do  
        do
          j=1
        end
        for k=1, 10 do  
        do
          j=1
        end
    
    
      end 
    
      return 2
    end
    
    end
    если второй цикл убираю for k=1, 10 do do j=1 end
    то работает, с ним не работает
    читать дальше на смартлабе
  17. STATDIV3 доработанный индикатор для quik на языке lua

    если индикатор больше 0, то покупаем, если ниже то продаем

    скачать можно здесь:dropmefiles.com/09FCu
    как устанавливать смотрите предыдущие статьи: https://smart-lab.ru/blog/528424.php
    название STATDIV3 это доработанный STATDIV


    поведение индикатора на графике:
    STATDIV3 доработанный индикатор для quik на языке lua


    сам код индикатора:
    Settings={
    Name="STATDIV3",
    period=50,
      line=
      {
        {
          Name="curve",
          Color=RGB(0,0,255),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name="line",
          Color=RGB(255,0,0),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name="MA",
          Color=RGB(0,0,255),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name="MA2",
          Color=RGB(0,128,128),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name="line2",
          Color=RGB(0,0,255),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name="line3",
          Color=RGB(0,128,128),
          Type=TYPE_LINE,
          Width=1
        }
      } 
    }
    
    function Init()
      cache_ind={}
      cache_ind2={}
      cache_ind3={}
      return 2
    end
    
    function OnCalculate(index)
      if index < Settings.period then
        return nil
      else
        local sum1=0
        local sum2=0
        local sum0=0
        local sum02=0
        local sum03=0
        for i=index-Settings.period+1, index do  
        do
          if C(i) > O(i) then
            sum1 = sum1 + C(i) - O(i)
            sum2 = sum2 + C(i) - O(i)
          else
            sum2 = sum2 + O(i) - C(i)
          end  
        end 
        cache_ind[index] = sum1/sum2    
        if index > Settings.period+12 then 
    --[[
          sum0 = 1*cache_ind[index]+
                (1)*cache_ind[index-1]+
                (1)*cache_ind[index-2]+
                (1)*cache_ind[index-3]+
                (1)*cache_ind[index-4]+
                (1)*cache_ind[index-5]+
                (1)*cache_ind[index-6]+
                (1)*cache_ind[index-7]+
                (1)*cache_ind[index-8]+
                (1/2)*cache_ind[index-9]+
                (1/3)*cache_ind[index-10]+
                (1/4)*cache_ind[index-11]+
                (1/5)*cache_ind[index-12]
    --]]
          sum0 = 1*cache_ind[index]+
                (1/2)*cache_ind[index-1]+
                (1/3)*cache_ind[index-2]+
                (1/4)*cache_ind[index-3]+
                (1/5)*cache_ind[index-4]+
                (1/6)*cache_ind[index-5]+
                (1/7)*cache_ind[index-6]+
                (1/8)*cache_ind[index-7]+
                (1/9)*cache_ind[index-8]+
                (1/10)*cache_ind[index-9]+
                (1/11)*cache_ind[index-10]+
                (1/12)*cache_ind[index-11]+
                (1/13)*cache_ind[index-12]
    
        end
    --[[
        sum0 = sum0/(1+1+1+1+1+1+1+1+1+1/2+1/3+1/4+1/5)
    --]]
        sum0 = sum0/(1+1/2+1/3+1/4+1/5+1/6+1/7+1/8+1/9+1/10+1/11+1/12+1/13)
    
           
        cache_ind2[index] = sum0
        if index > Settings.period+50 then   
          sum02 = 1*cache_ind2[index]+
                (1)*cache_ind2[index-1]+
                (1)*cache_ind2[index-2]+
                (1)*cache_ind2[index-3]+
                (1)*cache_ind2[index-4]+
                (1)*cache_ind2[index-5]+
                (1)*cache_ind2[index-6]+
                (1)*cache_ind2[index-7]+
                (1/2)*cache_ind2[index-8]+
                (1/3)*cache_ind2[index-9]+
                (1/4)*cache_ind2[index-10]+
                (1/5)*cache_ind2[index-11]+
                (1/6)*cache_ind2[index-12]
    --[[
          sum02 = 1*cache_ind2[index]+
                (1/2)*cache_ind2[index-1]+
                (1/3)*cache_ind2[index-2]+
                (1/4)*cache_ind2[index-3]+
                (1/5)*cache_ind2[index-4]+
                (1/6)*cache_ind2[index-5]+
                (1/7)*cache_ind2[index-6]+
                (1/8)*cache_ind2[index-7]+
                (1/9)*cache_ind2[index-8]+
                (1/10)*cache_ind2[index-9]+
                (1/11)*cache_ind2[index-10]+
                (1/12)*cache_ind2[index-11]+
                (1/13)*cache_ind2[index-12]
    --]]
        end
        sum02 = sum02/(1+1+1+1+1+1+1+1+1/2+1/3+1/4+1/5+1/6)
    --[[
        sum02 = sum02/(1+1/2+1/3+1/4+1/5+1/6+1/7+1/8+1/9+1/10+1/11+1/12+1/13)
    --]]
        cache_ind3[index] = sum0 - sum02
        if index > Settings.period+50 then   
          sum03 = 1*cache_ind3[index]+
                (1/2)*cache_ind3[index-1]+
                (1/3)*cache_ind3[index-2]+
                (1/4)*cache_ind3[index-3]+
                (1/5)*cache_ind3[index-4]+
                (1/6)*cache_ind3[index-5]+
                (1/7)*cache_ind3[index-6]+
                (1/8)*cache_ind3[index-7]+
                (1/9)*cache_ind3[index-8]+
                (1/10)*cache_ind3[index-9]+
                (1/11)*cache_ind3[index-10]+
                (1/12)*cache_ind3[index-11]+
                (1/13)*cache_ind3[index-12]
        end
        sum03 = sum03/(1+1/2+1/3+1/4+1/5+1/6+1/7+1/8+1/9+1/10+1/11+1/12+1/13)
    
      end  
    
      if sum1/sum2 > 0.5 and sum03 > 0 then
        sum1 = sum03
      else
        if sum1/sum2 < 0.5 and sum03 < 0 then
          sum1 = sum03 
        else 
          sum1 = 0
        end
      end
    
      return sum1, 0
    end
    
    end
     всем удачи!

    читать дальше на смартлабе
  18. Доработал индикатор STATDIV на lua для quik

    пользоваться можно так:
    если касная кривая выше 0,5 и синяя выше зеленой то логуем
    если красная ниже 0,5 и синяя ниже зеленой то шортим
    принимаю пожелания по изменению кода индикатора
    Доработал индикатор STATDIV на lua для quik


    скачать можно здесь:
    dropmefiles.com/y4kpv

    как установить:
    в папке quik создаете папку LuaIndicators туда кидаете текстовый файл с раcширением .lua и содержанием приведенного индикатора, потом запускаете quik и добавляете как обычный индикатор к графику с именем STATDIV

    продолжение темы: smart-lab.ru/blog/528145.php

    код:

    Settings={
    Name=«STATDIV»,
    period=25,
      line=
      {
        {
          Name=«curve»,
          Color=RGB(255,0,0),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name=«line»,
          Color=RGB(255,0,0),
          Type=TYPE_LINE,
          Width=1
        },
        {
          Name=«MA»,
          Color=RGB(0,0,255),
    читать дальше на смартлабе
  19. для тех кто хочет много бабок зарабатывать

    публикую индикатор собственной разработки под quik, написанный на lua
    если его значение больше 0,5 то выставляете заявку на покупку с тек профитом >= стоплоссу
    гарантированно будете зарабатывать
    подключить его можно так:
    в папке quik создаете папку LuaIndicators туда кидаете текстовый файл с раcширением .lua
    и содержанием приведенного индикатора, потом запускаете quik и добавляете как обычный индикатор к графику
    название его в списке будет STATDIV (статистическое отклонение)
    на рисунке отобразил его работу с периодом 25 и 50
    его суть в том чтоб показать куда отклонено статистическое распределение вероятностей, вверх или вниз за определенный период
    проще говоря, куда вероятнее пойдет рынок вниз или вверх
    если значение индикатора выше 0,5 то разрешено лонговать, если ниже то разрешено шортить
    рекомендации по подбору периода: период для этого индикатора выбираете как период между двумя
    последними локальными вершинами
    позже могу математически привести целесообразность его использования
    читать дальше на смартлабе
  20. QUIK робот, как проверить что создаваемая заявка отвечает требованию ГО

    Пишу алгоритм и возникает ситуация, что при размещении заявки ФОРТС возникает сообщение

    Ошибка создания заявки. [GW][332] «Нехватка средств по лимитам клиента.».

    Не могу сообразить, как предварительно до отправки заявки в систему проверить, что она отвечает требования достаточности средств по лимитам. 

    Друзья, коллеги, роботорговцы, подскажите как проверить, что заявка на фортсе проходит под имеющееся свободное ГО ?


    читать дальше на смартлабе
  21. QUIK робот как проврить что создвамая заявка до отправки отвчает требванию ГО? Вознкает ситуция ошбка создния заявки. [GW][332] «Нехватка средствГО" ?

    QUIK робот как проврить что создвамая заявка до отправки отвчает требванию ГО? Вознкает ситуция ошбка создния заявки. [GW][332] «Нехватка средствГО"?
    читать дальше на смартлабе
  22. Lua индикатор тикера ищу.

    Доброго времени всем.
    Я ищу Lua индикатор в Quik, который пишет на графике в левом верхнем углу название инструмента. Однажды наткнулся на него в интернете, счёл что бесполезная вещь и не стал его сохранять. А вот теперь понадобился и самому, но не могу вспомнить где я его видел. Может он есть у кого или кто-нить знает с какого ресурса его можно качнуть? Буду очень признателен в помощи его отыскать.
    читать дальше на смартлабе
  23. Изучаем QLua: Относительный ATR

    Доброго дня

    Решил попробовать написать некоторые индикаторы для Quik.
    Была прочитана книга по языку Роберту Иерузалимски «Программирование на языке Lua» и Документация по языку LUA в QUIK и примеры.
    Надо заметить, что язык мне понравился. В нем так мало и так много одновременно!

    Первый блин индикатор — что-то похожее на Волатильность Чайкина, только попроще.
    Идея: хочется изучить циклы волатильности. За основу берем ATR. Но если рассматривать большие интервалы, то цена может гулять в больших пределах, соответственно приводим ее к текущей цене.
    Сделал первый вариант, получил ошибки выполнения — надо добавить обработку ошибок.
    Следующий вариант заработал, я посмотрел — очень большой разброс, надо добавить сглаживание. 
    Добавил сглаживание, разброс стал поменьше, но все равно немного не то. Добавил отдельное сглаживание для диапазона и для цены (предполагая, что цена меняется медленнее чем периоды волатильности). Уже лучше.
    А что если брать не цену закрытия, а например среднюю? Добавил, но оказалось что влияние мизерное.
    В общем, уже можно поиграться. 
    Исходник

    Продолжаю эксперименты. 
    читать дальше на смартлабе
  24. Изучаем QLua: Ассиметричные фракталы

    Добрый.
    В одном из видео автор рассказывал об уровнях и использовал индикатор фрактал. Но для того чтобы потенциальные точки находились быстрее, он использовал ассиметричный показатель, например, 4 слева и 3 справа.
    Такой индикатор можно построить с помощью Lua.
    Параметры: количество свечей слева и справа
    Отображение в виде треугольников. Один треугольник было плохо видно, я добавил несколько )
    Второй раз пошло легче. Работаем дальше

    Исходник

    yadi.sk/d/gDeCrw-2FPwNVQ

     


    читать дальше на смартлабе
  25. Как автоматизировать передачу однотипных заявок каждый день?

    Всем привет!
    Скажите, как можно автоматизировать процесс массового создания заявок на покупку бумаг на Московской Бирже каждый день?
    Специфика следующая: есть на мониторинге 10-20 корп. облигаций.
    Для каждой бумаги есть цена и кол-во, которое я хочу купить (заявка), несколько ниже текущей рыночной цены. Заявки на покупку НЕ условные.
    Цена и кол-во бумаг в моих заявках в теч. дня не меняются (для простоты).
    На следующий день цена актуализируется (может поменяться) после ручного пересмотра. Но может и не поменяться. То есть опять нужно загрузить список из этих заявок.
    Можно, конечно, каждое утро вручную заводить каждую из этих 10-20 заявок, но на это уходит минут 10 каждый день, плюс повышается вероятность ошибки/опечатки.
    Список заявок могу вести в Excel.

    Подскажите, можно ли либо сделать так, чтобы заявки на покупку на фондофом рынке МБ не отменялись после окончания сессии (либо автоматически пересоздавались), либо как-то упростить процедуру массового ввода заявок с помощью какого-нибудь механизма экспорта таблицы/списка заявок?

    P.S. Работаю в Quik/WebQuik/ЛК Открытии.
    читать дальше на смартлабе
Чтобы купить акции, выберите надежного брокера: