Orhan Hocam nerelerdesiniz valla her gün geldiniz mi diye birkaç kez başlığa bakıyorum![]()
73D4F158-7D58-400C-A152-A85034B24E67.jpgE5445E39-E602-47FA-B78A-3ED33D882C24.jpg
çözmeme yardımcı olur musunuz
Orhan Hocam faydalı bir başlık olmuş elinize sağlık..
Orhan hocam paylasimlarini sabirsizlikla bekliyoruz umarim hersey yolundadir .
bang bang you shot me down..
Selamlar Orhan bey. Öncelikle emeklerinize sağlık sayenizde daha önce soğuduğum ve bu nedenle çok fazla fonksiyon yazamadığım için zorunlu olarak Tradingview kullanmak zorunda kalan biri olarak beni tekrar ideal! e sıcak bakmama sebep oldunuzAyrıca emeklerinize sağlık. Verdiğiniz bilgiler sonsuz değerli. Jurik RSI formül Tradingview, bunu ideale çevirirsek çok memnun olurum.
PHP Code:length = input(title="Length", type=integer, defval=14)
src = input(title="Source", type=source, defval=hlc3)
obLevel = input(title="OB Level", type=integer, defval=70)
osLevel = input(title="OS Level", type=integer, defval=30)
highlightBreakouts = input(title="Highlight Overbought/Oversold Breakouts ?", type=bool, defval=true)
f8 = 100 * src
f10 = nz(f8[1])
v8 = f8 - f10
f18 = 3 / (length + 2)
f20 = 1 - f18
f28 = 0.0
f28 := f20 * nz(f28[1]) + f18 * v8
f30 = 0.0
f30 := f18 * f28 + f20 * nz(f30[1])
vC = f28 * 1.5 - f30 * 0.5
f38 = 0.0
f38 := f20 * nz(f38[1]) + f18 * vC
f40 = 0.0
f40 := f18 * f38 + f20 * nz(f40[1])
v10 = f38 * 1.5 - f40 * 0.5
f48 = 0.0
f48 := f20 * nz(f48[1]) + f18 * v10
f50 = 0.0
f50 := f18 * f48 + f20 * nz(f50[1])
v14 = f48 * 1.5 - f50 * 0.5
f58 = 0.0
f58 := f20 * nz(f58[1]) + f18 * abs(v8)
f60 = 0.0
f60 := f18 * f58 + f20 * nz(f60[1])
v18 = f58 * 1.5 - f60 * 0.5
f68 = 0.0
f68 := f20 * nz(f68[1]) + f18 * v18
f70 = 0.0
f70 := f18 * f68 + f20 * nz(f70[1])
v1C = f68 * 1.5 - f70 * 0.5
f78 = 0.0
f78 := f20 * nz(f78[1]) + f18 * v1C
f80 = 0.0
f80 := f18 * f78 + f20 * nz(f80[1])
v20 = f78 * 1.5 - f80 * 0.5
f88_ = 0.0
f90_ = 0.0
f88 = 0.0
f90_ := nz(f90_[1]) == 0 ? 1 : nz(f88[1]) <= nz(f90_[1]) ? nz(f88[1]) + 1 : nz(f90_[1]) + 1
f88 := nz(f90_[1]) == 0 and (length - 1 >= 5) ? length - 1 : 5
f0 = f88 >= f90_ and f8 != f10 ? 1 : 0
f90 = f88 == f90_ and f0 == 0 ? 0 : f90_
v4_ = f88 < f90 and v20 > 0 ? (v14 / v20 + 1) * 50 : 50
rsx = v4_ > 100 ? 100 : v4_ < 0 ? 0 : v4_
rsxColor = rsx > obLevel ? #0ebb23 : rsx < osLevel ? #ff0000 : #f4b77d
plot(rsx, title="RSX", linewidth=2, color=rsxColor, transp=0)
transparent = color(white, 100)
maxLevelPlot = hline(100, title="Max Level", linestyle=dotted, color=transparent)
obLevelPlot = hline(obLevel, title="Overbought Level", linestyle=dotted)
hline(50, title="Middle Level", linestyle=dotted)
osLevelPlot = hline(osLevel, title="Oversold Level", linestyle=dotted)
minLevelPlot = hline(0, title="Min Level", linestyle=dotted, color=transparent)
fill(obLevelPlot, osLevelPlot, color=purple, transp=95)
obFillColor = rsx > obLevel and highlightBreakouts ? green : transparent
osFillColor = rsx < osLevel and highlightBreakouts ? red : transparent
fill(maxLevelPlot, obLevelPlot, color=obFillColor, transp=90)
fill(minLevelPlot, osLevelPlot, color=osFillColor, transp=90)
[TWITTER @soylucagatay - REVISIONIST]=[Algo-Stocks Tracking Trends-LT Investor]=[Temel Analiz bütündür basit doğruları söyler,Teknik Analiz parçadır yalan söylemez ama yanıltabilir]
[7UP REVISION]=[PETKM]-[ULUSE]-[ALKA]-[ANELE]-[ASELS]-[CEMTS]-[SODA]
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
Yer İmleri