Цифровой фильтр SATL на тиковом графике

mandor

Интересно иногда посмотреть на индикатор, наложенный на тиковый график.
Вот вам пример цифрового фильтра SATL, применённого к тиковому графику для MT3.
Игзиб SATL (смена направления) может служить сигналом для покупки или продажи.
Сохраните текст в файле "Ticker SATL.mql" и поместите в папку "experts\indikators" терминала MT3.
Текс программы приводится ниже.

mandor

/*[[
Name := SATL на тиковом графике
Author := © 2003-2005 ® Mandor
Link := mandorr@gmail.com
Notes := Обработка тикового графика цифровым фильтром SATL
Update on every tick := Yes
Separate Window := Yes
First Color := Gray
First Draw Type := Line
First Symbol := 160
Use Second Data := Yes
Second Color := Red
Second Draw Type := Line
Second Symbol := 160
]]*/

Variables: nCounter(0),nEndBar(0);
Variables: nVolume(0),nBars(0),nBid(0),nBidPrev(0);
Variables: dValue(0),dValue2(0);

SetLoopCount(0);

// Текущая цена
nBid=Round(Bid/Point);
If nBid=0 Then Begin
Exit;
End;

// Установка начальных значений
If nBars=0 Then Begin
nBars=Bars;
nBidPrev=nBid;
nVolume=0;
Exit;
End;

// Нарисовался новый бар
If nBars<>Bars Then Begin
nBars=Bars;
// Сместить график на 1 бар вправо
nEndBar=nVolume-1;
For nCounter=1 To nEndBar Begin
dValue =GetIndexValue (nCounter);
dValue2=GetIndexValue2(nCounter);
SetIndexValue (nCounter-1,dValue );
SetIndexValue2(nCounter-1,dValue2);
End;
// Очистка следов
SetIndexValue (nEndBar,0);
SetIndexValue2(nEndBar,0);
End;

// Новая цена
If nBid=nBidPrev Then Begin
Exit; // чужой тик
End;
nBidPrev=nBid;
nVolume=nVolume+1;
If nVolume>Bars-2 Then nVolume=Bars-2;

// Сместить график на 1 бар влево
nEndBar=nVolume-1;
For nCounter=nEndBar DownTo 0 Begin
dValue =GetIndexValue (nCounter);
dValue2=GetIndexValue2(nCounter);
SetIndexValue (nCounter+1,dValue );
SetIndexValue2(nCounter+1,dValue2);
End;

// Вывод цены
dValue=nBid*Point;
SetIndexValue(0,dValue);

If nVolume<66 Then Begin
Exit;
End;

mandor

// Вывод SATL
dValue2=0
+0.061300193647900*GetIndexValue( 0)
+0.061053441792900*GetIndexValue( 1)
+0.060562194485200*GetIndexValue( 2)
+0.059830983458600*GetIndexValue( 3)
+0.058866479194700*GetIndexValue( 4)
+0.057677491761000*GetIndexValue( 5)
+0.056274753913300*GetIndexValue( 6)
+0.054670907167500*GetIndexValue( 7)
+0.052880260949200*GetIndexValue( 8 )
+0.050918648488800*GetIndexValue( 9)
+0.048803221764800*GetIndexValue(10)
+0.046552212989400*GetIndexValue(11)
+0.044184792694700*GetIndexValue(12)
+0.041720699793300*GetIndexValue(13)
+0.039180132534900*GetIndexValue(14)
+0.036583401269900*GetIndexValue(15)
+0.033950815919300*GetIndexValue(16)
+0.031302393037730*GetIndexValue(17)
+0.028657638687890*GetIndexValue(18 )
+0.026035412351450*GetIndexValue(19)
+0.023453611398010*GetIndexValue(20)
+0.020929140026230*GetIndexValue(21)
+0.018477559070790*GetIndexValue(22)
+0.016113138782940*GetIndexValue(23)
+0.013848617008260*GetIndexValue(24)
+0.011695163596700*GetIndexValue(25)
+0.009662348038970*GetIndexValue(26)
+0.007758009042020*GetIndexValue(27)
+0.005988443936220*GetIndexValue(28 )
+0.004358120905260*GetIndexValue(29)
+0.002869957651850*GetIndexValue(30)
+0.001525149008968*GetIndexValue(31)
+0.000323412782766*GetIndexValue(32)
-0.000736977701003*GetIndexValue(33)
-0.001659208874661*GetIndexValue(34)
-0.002447530152685*GetIndexValue(35)
-0.003107468931666*GetIndexValue(36)
-0.003645284015020*GetIndexValue(37)
-0.004068274039910*GetIndexValue(38 )
-0.004384299122040*GetIndexValue(39)
-0.004601788243180*GetIndexValue(40)
-0.004729687026460*GetIndexValue(41)
-0.004776987340700*GetIndexValue(42)
-0.004753095170960*GetIndexValue(43)
-0.004666945647540*GetIndexValue(44)
-0.004527720721590*GetIndexValue(45)
-0.004344092815710*GetIndexValue(46)
-0.004124507708690*GetIndexValue(47)
-0.003877013147020*GetIndexValue(48 )
-0.003608803360950*GetIndexValue(49)
-0.003327242888150*GetIndexValue(50)
-0.003038274514648*GetIndexValue(51)
-0.002747946123224*GetIndexValue(52)
-0.002460708392554*GetIndexValue(53)
-0.002180913143814*GetIndexValue(54)
-0.001912446053497*GetIndexValue(55)
-0.001657693002912*GetIndexValue(56)
-0.001420080062330*GetIndexValue(57)
-0.001199761556779*GetIndexValue(58 )
-0.000999943963044*GetIndexValue(59)
-0.000819181988388*GetIndexValue(60)
-0.000657957908991*GetIndexValue(61)
-0.000517309323044*GetIndexValue(62)
-0.000396364178524*GetIndexValue(63)
-0.000613240031793*GetIndexValue(64);
SetIndexValue2(0,dValue2);
// Конец

mandor

Желающие могут получить файлы "Ticker SATL.mql" и "Ticker SATL.exp" этого индикатора по почте. Разумеется бесплатно.

mandor

Индикатор можно при желании модифицировать.
Варианты для расчёта SATL:
- выбирать из потока тиков каждый N-ый;
- брать среднее значение каждых N тиков;
- брать скользящее среднее N последних тиков.

Последний вариант возможно самый интересный.
Применить к тиковому графику SMA с коротким периодом.
Применить к SMA фильтр SATL.
Если будет желание сделаю такой индикатор и выложу в этой теме.
Одна проблема: как назвать такой индикатор?
Может Ticker SMA SATL или TSS?