Yeni İndikatörler

**MacelluM** · 23-07-2019, 15:07

Merhaba ORHAN Bey ,Emekleriniz İçin Teşekkürler ,Sizden Ricam Müsait Olduğunuzda İdeal 1 dakika ve Üstü Periyotlarda Çalışan VWAP Göstergesi Yapılabilirmi,Garklı C# Yapıları için hazırlanmış Olanları da Copy Paste Yapıyorum,İlginiz İçin Şimdiden Teşekkür Ederim...

// -------------------------------------------------------------------------------------------------
//
// VWAP (Volume Weighted Average Price) = Cumulative(Typical Price x Volume) / Cumulative(Volume)
// by Zaknafein Z
//
// Donations welcome to:
//
// BTC: 33gjtYhKVqFxmcbcko63WnwiVJvew3PauQ
// ETH: 0xb54dF35117D94a43Ca25A3A348Ac20DF7F667F7b
// LTC: M8YRuyH5USv2MvJyyF55U5ik1yMfm6TtMH
//
// v1.0 Inital version 04/05/18
// -------------------------------------------------------------------------------------------------

using System;
using cAlgo.API;
using cAlgo.API.Internals;
using cAlgo.API.Indicators;
using cAlgo.Indicators;

namespace cAlgo
{
[Indicator(IsOverlay = true, TimeZone = TimeZones.EasternStandardTime, AutoRescale = false, AccessRights = AccessRights.None)]
public class VWAP : Indicator
{
[Parameter(DefaultValue = 0)]
public int Periods { get; set; }

[Parameter("One day only?", DefaultValue = false)]
public bool Odo { get; set; }

[Output("Main", Color = Colors.DarkOrchid)]
public IndicatorDataSeries Result { get; set; }

public override void Calculate(int index)
{
int ii = index;
double CumTypPrice = 0;
double CumVol = 0;

if (Periods == 0)
{
while (MarketSeries.OpenTime[ii] >= (Odo == false ? MarketSeries.OpenTime[ii].Date : DateTime.Now.Date) && ii != 0)
{
CumTypPrice += MarketSeries.Typical[ii] * MarketSeries.TickVolume[ii];
CumVol += MarketSeries.TickVolume[ii];
ii--;
if (MarketSeries.OpenTime[ii].Hour == 0 && MarketSeries.OpenTime[ii].Minute == 0)
break;
}
}
else
{
for (; ii >= MarketSeries.OpenTime.Count - Periods; ii--)
{
CumTypPrice += MarketSeries.Typical[ii] * MarketSeries.TickVolume[ii];
CumVol += MarketSeries.TickVolume[ii];
}
}

Result[index] = CumTypPrice / CumVol;

}

protected override void Initialize()
{
Print("VWAP indicator started...");
}
}
}

**mesuteryilmaz** · 25-07-2019, 18:27

Originally Posted by MacelluM

Merhaba ORHAN Bey ,Emekleriniz İçin Teşekkürler ,Sizden Ricam Müsait Olduğunuzda İdeal 1 dakika ve Üstü Periyotlarda Çalışan VWAP Göstergesi Yapılabilirmi,Garklı C# Yapıları için hazırlanmış Olanları da Copy Paste Yapıyorum,İlginiz İçin Şimdiden Teşekkür Ederim...

// -------------------------------------------------------------------------------------------------
//
// VWAP (Volume Weighted Average Price) = Cumulative(Typical Price x Volume) / Cumulative(Volume)
// by Zaknafein Z
//
// Donations welcome to:
//
// BTC: 33gjtYhKVqFxmcbcko63WnwiVJvew3PauQ
// ETH: 0xb54dF35117D94a43Ca25A3A348Ac20DF7F667F7b
// LTC: M8YRuyH5USv2MvJyyF55U5ik1yMfm6TtMH
//
// v1.0 Inital version 04/05/18
// -------------------------------------------------------------------------------------------------

using System;
using cAlgo.API;
using cAlgo.API.Internals;
using cAlgo.API.Indicators;
using cAlgo.Indicators;

namespace cAlgo
{
[Indicator(IsOverlay = true, TimeZone = TimeZones.EasternStandardTime, AutoRescale = false, AccessRights = AccessRights.None)]
public class VWAP : Indicator
{
[Parameter(DefaultValue = 0)]
public int Periods { get; set; }

[Parameter("One day only?", DefaultValue = false)]
public bool Odo { get; set; }

[Output("Main", Color = Colors.DarkOrchid)]
public IndicatorDataSeries Result { get; set; }

public override void Calculate(int index)
{
int ii = index;
double CumTypPrice = 0;
double CumVol = 0;

if (Periods == 0)
{
while (MarketSeries.OpenTime[ii] >= (Odo == false ? MarketSeries.OpenTime[ii].Date : DateTime.Now.Date) && ii != 0)
{
CumTypPrice += MarketSeries.Typical[ii] * MarketSeries.TickVolume[ii];
CumVol += MarketSeries.TickVolume[ii];
ii--;
if (MarketSeries.OpenTime[ii].Hour == 0 && MarketSeries.OpenTime[ii].Minute == 0)
break;
}
}
else
{
for (; ii >= MarketSeries.OpenTime.Count - Periods; ii--)
{
CumTypPrice += MarketSeries.Typical[ii] * MarketSeries.TickVolume[ii];
CumVol += MarketSeries.TickVolume[ii];
}
}

Result[index] = CumTypPrice / CumVol;

}

protected override void Initialize()
{
Print("VWAP indicator started...");
}
}
}

Sezai bey sağolsun aşağıdaki kodu yazmıştı.
Ama seçilen serinin başından itibaren vwap hesaplıyor.
Belirli tarih başlangıcı vererek hesaplama yapanı yok malesef

var V = Sistem.GrafikVerileri;
var TipikFiyat = Sistem.GrafikFiyatSec("Kapanis");
var Lot = Sistem.GrafikFiyatSec("Lot");
var Cum1 = Sistem.Liste(0);
var Vol = Sistem.Liste(0);
var VWAP2 = Sistem.Liste(0);
var CumV = Sistem.Liste(0);
for(int i=1; i < Sistem.BarSayisi; i++) {
Vol[i] = Lot[i] * TipikFiyat[i];
Cum1[i] = Cum1[i-1] + Vol[i] ;
CumV[i] = CumV[i-1] + Lot[i];
VWAP2[i] = (Cum1[i] / CumV);
}
Sistem.Cizgiler[0].Deger = VWAP2; //Panel1

**Bear_Bull** · 25-07-2019, 19:56

Originally Posted by mesuteryilmaz

Sezai bey sağolsun aşağıdaki kodu yazmıştı.
Ama seçilen serinin başından itibaren vwap hesaplıyor.
Belirli tarih başlangıcı vererek hesaplama yapanı yok malesef

[/I]

Sezai bey sağolsun o kadarrını yazmış,
yil ilaveside bizden olsun o zaman

PHP Code:




int YIL = 2016;

var V = Sistem.GrafikVerileri;

var TipikFiyat = Sistem.GrafikFiyatSec("Kapanis");

var Lot = Sistem.GrafikFiyatSec("Lot");

var Cum1 = Sistem.Liste(0);

var Vol = Sistem.Liste(0);

var VWAP2 = Sistem.Liste(0);

var CumV = Sistem.Liste(0);

for(int i=1; i < Sistem.BarSayisi; i++) {

if (V[i].Date.Year >= YIL )

{

  Vol[i] = Lot[i] * TipikFiyat[i];

  Cum1[i] = Cum1[i-1] + Vol[i] ;

  CumV[i] = CumV[i-1] + Lot[i];

  VWAP2[i] = (Cum1[i] / CumV[i]);

 }}

Sistem.Cizgiler[0].Deger = VWAP2; //Panel1

**mesuteryilmaz** · 25-07-2019, 20:00

Originally Posted by Bear_Bull

Sezai bey sağolsun o kadarrını yazmış,
yil ilaveside bizden olsun o zaman

PHP Code:



int YIL = 2016;
var V = Sistem.GrafikVerileri;
var TipikFiyat = Sistem.GrafikFiyatSec("Kapanis");
var Lot = Sistem.GrafikFiyatSec("Lot");
var Cum1 = Sistem.Liste(0);
var Vol = Sistem.Liste(0);
var VWAP2 = Sistem.Liste(0);
var CumV = Sistem.Liste(0);
for(int i=1; i < Sistem.BarSayisi; i++) {
if (V[i].Date.Year >= YIL )
{
  Vol[i] = Lot[i] * TipikFiyat[i];
  Cum1[i] = Cum1[i-1] + Vol[i] ;
  CumV[i] = CumV[i-1] + Lot[i];
  VWAP2[i] = (Cum1[i] / CumV[i]);
 }}
Sistem.Cizgiler[0].Deger = VWAP2; //Panel1

**mesuteryilmaz** · 25-07-2019, 20:13

Originally Posted by Bear_Bull

Sezai bey sağolsun o kadarrını yazmış,
yil ilaveside bizden olsun o zaman

PHP Code:



int YIL = 2016;
var V = Sistem.GrafikVerileri;
var TipikFiyat = Sistem.GrafikFiyatSec("Kapanis");
var Lot = Sistem.GrafikFiyatSec("Lot");
var Cum1 = Sistem.Liste(0);
var Vol = Sistem.Liste(0);
var VWAP2 = Sistem.Liste(0);
var CumV = Sistem.Liste(0);
for(int i=1; i < Sistem.BarSayisi; i++) {
if (V[i].Date.Year >= YIL )
{
  Vol[i] = Lot[i] * TipikFiyat[i];
  Cum1[i] = Cum1[i-1] + Vol[i] ;
  CumV[i] = CumV[i-1] + Lot[i];
  VWAP2[i] = (Cum1[i] / CumV[i]);
 }}
Sistem.Cizgiler[0].Deger = VWAP2; //Panel1

her gün başından itibaren hesaplayanı var.
yıl/ay/gün/saat/dakika girerek hesaplayanı olursa çok güzel olacak.

//Volume Weighted Average Price Indicator
var V = Sistem.GrafikVerileri;
var TipikFiyat = Sistem.GrafikFiyatSec("Tipik");
var Lot = Sistem.GrafikFiyatSec("Lot");

var TotalLot = Sistem.Liste(0);
var TotalVol = Sistem.Liste(0);
var Vol = Sistem.Liste(0);
var VWAP = Sistem.Liste(0);

for(int i=1; i < Sistem.BarSayisi; i++)
{
Vol[i] = Lot[i] * TipikFiyat[i];
TotalLot[i] = V[i].Date.Day == V[i-1].Date.Day ? TotalLot[i-1] + Lot[i] : Lot[i];
TotalVol[i] = V[i].Date.Day == V[i-1].Date.Day ? TotalVol[i-1] + Vol[i] : Vol[i];
VWAP[i] = TotalVol[i] / TotalLot[i];
}
Sistem.Cizgiler[0].Deger = VWAP; //Panel1

**Bear_Bull** · 25-07-2019, 20:57

PHP Code:


int YIL = 2019;
int AY = 5;
int GUN = 1;
int Saat = 10;
int Dakika = 1;
var V = Sistem.GrafikVerileri;
var TipikFiyat = Sistem.GrafikFiyatSec("Kapanis");
var Lot = Sistem.GrafikFiyatSec("Lot");
var Cum1 = Sistem.Liste(0);
var Vol = Sistem.Liste(0);
var VWAP2 = Sistem.Liste(0);
var CumV = Sistem.Liste(0);
for(int i=1; i < Sistem.BarSayisi; i++) {
if (V[i].Date.Year >= YIL && V[i].Date.Month >= AY && V[i].Date.Day) 
{
  Vol[i] = Lot[i] * TipikFiyat[i];
  Cum1[i] = Cum1[i-1] + Vol[i] ;
  CumV[i] = CumV[i-1] + Lot[i];
  VWAP2[i] = (Cum1[i] / CumV[i]);
 }}
Sistem.Cizgiler[0].Deger = VWAP2; //Panel1

ay ve gün de ilave ettim (gördüğüm kadarı ile >>> çok uzun süreli bakılırsa pek sağlıklı olmaz)

saat ve dakikayıda sizler uğraşın.

**0101** · 25-07-2019, 21:08

Burada güzel seyler varmış.

Çabalara saygımı sunuyorum.

**mesuteryilmaz** · 28-07-2019, 18:22

Originally Posted by Bear_Bull

PHP Code:


int YIL = 2019;
int AY = 5;
int GUN = 1;
int Saat = 10;
int Dakika = 1;
var V = Sistem.GrafikVerileri;
var TipikFiyat = Sistem.GrafikFiyatSec("Kapanis");
var Lot = Sistem.GrafikFiyatSec("Lot");
var Cum1 = Sistem.Liste(0);
var Vol = Sistem.Liste(0);
var VWAP2 = Sistem.Liste(0);
var CumV = Sistem.Liste(0);
for(int i=1; i < Sistem.BarSayisi; i++) {
if (V[i].Date.Year >= YIL && V[i].Date.Month >= AY && V[i].Date.Day) 
{
  Vol[i] = Lot[i] * TipikFiyat[i];
  Cum1[i] = Cum1[i-1] + Vol[i] ;
  CumV[i] = CumV[i-1] + Lot[i];
  VWAP2[i] = (Cum1[i] / CumV[i]);
 }}
Sistem.Cizgiler[0].Deger = VWAP2; //Panel1

ay ve gün de ilave ettim (gördüğüm kadarı ile >>> çok uzun süreli bakılırsa pek sağlıklı olmaz)

saat ve dakikayıda sizler uğraşın.

hocam siz nasıl yaptınız?
ben yukarıdaki kodu yazdığımda grafikte bir değer göstermiyor.
indikatörün grafik üzerindeki görselini yollamanız mümkün mü?

Hisse	Fiyat	Fark%	Hacim (TL)	Düşük / Yüksek
DIRITEKS DIRILIS TEKSTIL DIRIT	29,70	10%	5,61 Mn	27,02 / 29,70
KATILIMEVIM TAS. FIN. KTLEV	68,75	10%	865,28 Mn	68,75 / 68,75
BALATACILAR BALATACILIK BALAT	103,40	10%	9,37 Mn	103,40 / 103,40
ULASLAR TURIZM YAT. ULAS	37,40	10%	75,39 Mn	32,86 / 37,40
MARKA YATIRIM HOLDING MARKA	47,36	9.99%	154,19 Mn	42,42 / 47,36

Hisse	Fiyat	Fark%	Hacim (TL)	Düşük / Yüksek
OZAK GMYO OZKGY	12,42	-10%	773,06 Mn	12,42 / 13,30
AKFEN INSAAT AKFIS	41,08	-9.99%	35,75 Mn	41,08 / 41,08
EMEK ELEKTRIK EMKEL	23,24	-9.99%	716,42 Mn	23,24 / 26,24
MENDERES TEKSTIL MNDRS	11,63	-9.98%	295,01 Mn	11,63 / 13,02
SAVUR GMYO SVGYO	8,23	-9.96%	30,33 Mn	8,23 / 8,23

Hisse	Fiyat	Fark%	Hacim (TL)	Düşük / Yüksek
TUPRAS TUPRS	240,50	0.12%	19,58 Mr	234,00 / 241,50
TURK HAVA YOLLARI THYAO	294,00	0.17%	8,83 Mr	290,50 / 295,50
ASTOR ENERJI ASTOR	205,90	1.33%	7,87 Mr	196,50 / 207,30
IS BANKASI (C) ISCTR	13,18	0%	6,28 Mr	12,95 / 13,34
KOC HOLDING KCHOL	192,60	1.74%	5,42 Mr	189,00 / 192,60

Hisse	Fiyat	Fark%	Hacim (TL)	Düşük / Yüksek
ANADOLU EFES AEFES	16,73	-2.68%	538,85 Mn	16,56 / 17,34
AKBANK AKBNK	66,90	-0.52%	5,27 Mr	66,10 / 68,30
ASELSAN ASELS	330,75	-2.14%	4,96 Mr	328,00 / 341,00
ASTOR ENERJI ASTOR	205,90	1.33%	7,87 Mr	196,50 / 207,30
BIM MAGAZALAR BIMAS	670,50	-0.37%	2,44 Mr	670,50 / 685,00

Hisse	Fiyat	Fark%	Hacim (TL)	Düşük / Yüksek
ANADOLU EFES AEFES	16,73	-2.68%	538,85 Mn	16,56 / 17,34
AKBANK AKBNK	66,90	-0.52%	5,27 Mr	66,10 / 68,30
ALARKO HOLDING ALARK	86,95	-1.02%	351,46 Mn	86,25 / 88,45
ARCELIK ARCLK	110,50	-0.72%	132,84 Mn	109,70 / 112,30
ASELSAN ASELS	330,75	-2.14%	4,96 Mr	328,00 / 341,00

Masrafsız Bankacılık + 1.000 TL Nakit! Enpara’dan Çifte Avantaj

Konu: Yeni İndikatörler

Seçenekler

Başlıklarda Ara

Görünüm

Yer İmleri

Yer İmleri

Gönderi Kuralları