Dünya para birimleri endeksi ("sabun köpüğünün" nasıl patladığı açıkça görülüyor) - sayfa 9

Yeni yorum
 

//+------------------------------------------- --------------------+
//| Çoklu_MA_V1.mq4 |
//| Telif Hakkı © 2010, MetaQuotes Yazılım A.Ş. |
//| https://www.metaquotes.net// |
//+------------------------------------------- --------------------+
#property telif hakkı "Telif hakkı © 2010, MetaQuotes Software Corp."
#özellik bağlantısı " https://www.metaquotes.net// "

#özellik göstergesi_separate_window
#özellik göstergesi_tamponları 1
#özellik göstergesi_color1 Sarı
//---- giriş parametreleri
harici int nokta=1;
//---- arabellekler
çift CloseBuffer[];

dize sembolü[28]={
"AUDCAD","AUDCHF","AUDJPY","AUDNZD","AUDUSD","CADCHF","CADJPY","CHFJPY","EURAUD","EURCAD","EURCHF","EURGBP","EURJPY ","EURNZD","EURUSD","GBPAUD","GBPCAD",
"GBPCHF","GBPJPY","GBPUSD","NZDCAD","NZDCHF","NZDJPY","NZDUSD","USDCAD","USDCHF","USDJPY","GBPSGD"};
int Barsi[28],BarsMin;
//+------------------------------------------- --------------------+
//| özel gösterge başlatma işlevi |
//+------------------------------------------- --------------------+
int init()
{
//---- göstergeler
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,CloseBuffer);
göstergeDigits(2);
GöstergeShortName("Multi_MA_V1");
//----
dönüş(0);
}
//+------------------------------------------- --------------------+
//| özel gösterge sıfırlama işlevi |
//+------------------------------------------- --------------------+
int tanım()
{
//----

//----
dönüş(0);
}
//+------------------------------------------- --------------------+
//| özel gösterge yineleme işlevi |
//+------------------------------------------- --------------------+
int başlangıç()
{
//----
int s;
//----
if(HesapDengesi()!=0)
{
for(s=0;s<28;s++)
{
if(MarketInfo(symbol[s],MODE_TRADEALLOWED)==yanlış || iOpen(sembol[s],0,0)==0)
{
Alert("Multi_MA_V1 göstergesi için cihaz için veri yok ",symbol[s]);return(0);
}
else if(MarketInfo(symbol[s],MODE_TRADEALLOWED)==true || iOpen(symbol[s],0,0)!=0)
{
//---- minimum çubuk sayısının hesaplanması (görüntülenen grafiğin uzunluğu)
if(BarsMin==0)
{
Barsi[s]=iBars(sembol[s],0);
}
BarsMin=Barsi[ArrayMinimum(Barsi)];
}
}
}

//----
int limiti;
int counted_bars=IndicatorCounted();

//---- Son hesaplanan çubuk yeniden hesaplanacak
if(counted_bars>0) counted_bars--;
limit=bars-counted_bars;
if(limit>BarsMin)limit=BarsMin;
//---- Ana döngü
çift Toplam, Toplam1;
for(int i=0;i<limit;i++)
{
Toplam = 0;
Toplam1=0;
for(s=0;s<28;s++)
{
int bar=iBarShift(sembol[s],0,Zaman[i]);
Sum+=iMA(sembol[s],0,nokta,0,MODE_SMA,PRICE_CLOSE,bar)/28 ;
}
CloseBuffer[i]=Toplam;
}
//----
dönüş(0);
}
//+------------------------------------------- --------------------+

 

//+------------------------------------------- ------ ----------------------+
//| Multi_MA_V2(spred).mq4 |
//| Telif Hakkı © 2010, MetaQuotes Yazılım A.Ş. |
//| https://www.metaquotes.net// |
//+------------------------------------------- --------------------+
#property telif hakkı "Telif hakkı © 2010, MetaQuotes Software Corp."
#özellik bağlantısı " https://www.metaquotes.net// "

#özellik göstergesi_separate_window
#özellik göstergesi_tamponları 1
#özellik göstergesi_color1 Sarı
//---- giriş parametreleri
dış int nokta=13;
harici interperiod1=21;
//---- arabellekler
çift CloseBuffer[];

dize sembolü[28]={
"AUDCAD","AUDCHF","AUDJPY","AUDNZD","AUDUSD","CADCHF","CADJPY","CHFJPY","EURAUD","EURCAD","EURCHF","EURGBP","EURJPY ","EURNZD","EURUSD","GBPAUD","GBPCAD",
"GBPCHF","GBPJPY","GBPUSD","NZDCAD","NZDCHF","NZDJPY","NZDUSD","USDCAD","USDCHF","USDJPY","GBPSGD"};
int Barsi[28],BarsMin;
//+------------------------------------------- ------ ----------------------+
//| özel gösterge başlatma işlevi |
//+------------------------------------------- --------------------+
int init()
{
//---- göstergeler
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,CloseBuffer);
göstergeDigits(2);
GöstergeShortName("Multi_MA_V1");
//----
dönüş(0);
}
//+------------------------------------------- --------------------+
//| özel gösterge sıfırlama işlevi |
//+------------------------------------------- ------ ----------------------+
int tanım()
{
//----

//----
dönüş(0);
}
//+------------------------------------------- ------ ----------------------+
//| özel gösterge yineleme işlevi |
//+------------------------------------------- --------------------+
int başlangıç()
{
//----
int s;
//----
if(HesapDengesi()!=0)
{
for(s=0;s<28;s++)
{
if(MarketInfo(symbol[s],MODE_TRADEALLOWED)==yanlış || iOpen(sembol[s],0,0)==0)
{
Alert("Multi_MA_V1 göstergesi için cihaz için veri yok ",symbol[s]);return(0);
}
else if(MarketInfo(symbol[s],MODE_TRADEALLOWED)==true || iOpen(symbol[s],0,0)!=0)
{
//---- minimum çubuk sayısının hesaplanması (görüntülenen grafiğin uzunluğu)
if(BarsMin==0)
{
Barsi[s]=iBars(sembol[s],0);
}
BarsMin=Barsi[ArrayMinimum(Barsi)];
}
}
}

//----
int limiti;
int counted_bars=IndicatorCounted();

//---- Son hesaplanan çubuk yeniden hesaplanacak
if(counted_bars>0) counted_bars--;
limit=bars-counted_bars;
if(limit>BarsMin)limit=BarsMin;
//---- Ana döngü
çift Toplam, Toplam1;
for(int i=0;i<limit;i++)
{
Toplam = 0;
Toplam1=0;
for(s=0;s<28;s++)
{
int bar=iBarShift(sembol[s],0,Zaman[i]);
Sum+=((iMA(sembol[s],0,period,0,MODE_SMA,PRICE_CLOSE,bar)-iMA(symbol[s],0,period1,0,MODE_SMA,PRICE_CLOSE,bar))-1) /28 ;
}
CloseBuffer[i]=Toplam;
}
//----
dönüş(0);
}
//+------------------------------------------- ------ ----------------------+

 
Teşekkürler.
 

Ap için lütfen saymayın!

Ne yani çocuklar, bu konu hakkında başka kimsenin bir sözü yok mu?

hrenfx'a (ona saygı duyun) kalır mı?

https://www.mql5.com/ru/code/10096

123456789
Yeni yorum