N'olacak bu Altın' ın hali @balık hodjam? :wu:
Printable View
N'olacak bu Altın' ın hali @balık hodjam? :wu:
Hani olması zor bi iş için balık kavağa çıkınca derler ya,
hah işte o balık bu öğlen budamak için badem ağaçlarına çıktı. :p
Dönüş yolunda komşumada altındaki 1835leri, trend kırılımlarını anlatıyordum.
Demekki badem ağacına çıkmasıda yetiyormuş. :evil:
Hay ben şansımın....
Abi fabl neydi? Sevgiydi, emekti...
Eline, ağzına, bademe çıkan yerlerine sağlık :evil:
#Evergrande olayı altın' a yarar...!
19xx USD ler hedefe girdi.
Üstü fena...
Özelden gelen MTF SuperTrend sorusuna istinaden 3 periyotlu kodu.
1,5,15dk.
Aslında soru Tradingview içindi ama...
Hem interne bağlantımın pörtlemesi, hem de Pine Script v5 geçişinden o iş biraz zaman alacak.
Bu arada pratik yapmış olmak için Ideal versiyonunu yazdım. İşine yarayan olursa ne âla.
1. kodda 1 dk. lığı yukarı kesince al veriyor, aşağı kesince sat:
Kod:// Bu sistem örnek amaçlı oluşturulmuştur. Kullanım sorumluluğu tamamen kullanıcıya aittir. Oluşacak sorunlardan İDealdata sorumlu tutulamaz.
// Sistem, SuperTrend isimli indikatör hesaplaması yapar ve hesaplanan çizgiye ait Al-Sat yön sinyalleri oluşturur.
//Sistem içeriği istenildiği gibi düzenlenebilir.
var v=Sistem.GrafikVerileri;
var Factor = 3;
var Pd = 10;
var period=Sistem.GrafikVerileriniOku(Sistem.Sembol, "1");
var period1=Sistem.GrafikVerileriniOku(Sistem.Sembol, "5");
var period2=Sistem.GrafikVerileriniOku(Sistem.Sembol, "15");
var MP = Sistem.GrafikFiyatOku(period, "OrtaNokta");
var MP1 = Sistem.GrafikFiyatOku(period1, "OrtaNokta");
var MP2 = Sistem.GrafikFiyatOku(period2, "OrtaNokta");
var ATRX = Sistem.AverageTrueRange(period, 1);
var ATRX1 = Sistem.AverageTrueRange(period1, 1);
var ATRX2 = Sistem.AverageTrueRange(period2, 1);
var ATR = Sistem.MA(ATRX, "Simple", Pd);
var ATR1 = Sistem.MA(ATRX1, "Simple", Pd);
var ATR2 = Sistem.MA(ATRX2, "Simple", Pd);
var C = Sistem.GrafikFiyatOku(period, "Kapanis");
var C1 = Sistem.GrafikFiyatOku(period1, "Kapanis");
var C2 = Sistem.GrafikFiyatOku(period2, "Kapanis");
var STR = Sistem.Liste(0);
var STS = Sistem.Liste(0);
var FUB = Sistem.Liste(0);
var FLB = Sistem.Liste(0);
var ST = Sistem.Liste(0);
var SuperTrend = Sistem.Liste(0);
for (int i=1; i < period.Count; i++)
{
STR[i] = MP[i] + (Factor*ATR[i]);
STS[i] = MP[i] - (Factor*ATR[i]);
}
for (int i=1;i<period.Count;i++)
{
FUB[i] = (STR[i] < FUB[i-1] || C[i-1] > FUB[i-1]) ? STR[i] : FUB[i-1];
FLB[i] = (STS[i] > FLB[i-1] || C[i-1] < FLB[i-1]) ? STS[i] : FLB[i-1];
ST[i] = (ST[i-1] == FUB[i-1] && C[i] < FUB[i]) ? FUB[i] : (ST[i-1] == FUB[i-1] && C[i] > FUB[i]) ? FLB[i] : (ST[i-1] == FLB[i-1] && C[i] > FLB[i]) ? FLB[i] : (ST[i-1] == FLB[i-1] && C[i] < FLB[i] ? FUB[i] : FUB[i]);
}
var ST1R1 = Sistem.Liste(0);
var ST1S1 = Sistem.Liste(0);
var FUB1 = Sistem.Liste(0);
var FLB1 = Sistem.Liste(0);
var ST1 = Sistem.Liste(0);
var SuperTrend11 = Sistem.Liste(0);
for (int i=1; i < period1.Count; i++)
{
ST1R1[i] = MP1[i] + (Factor*ATR1[i]);
ST1S1[i] = MP1[i] - (Factor*ATR1[i]);
}
for (int i=1;i<period1.Count;i++)
{
FUB1[i] = (ST1R1[i] < FUB1[i-1] || C1[i-1] > FUB1[i-1]) ? ST1R1[i] : FUB1[i-1];
FLB1[i] = (ST1S1[i] > FLB1[i-1] || C1[i-1] < FLB1[i-1]) ? ST1S1[i] : FLB1[i-1];
ST1[i] = (ST1[i-1] == FUB1[i-1] && C1[i] < FUB1[i]) ? FUB1[i] : (ST1[i-1] == FUB1[i-1] && C1[i] > FUB1[i]) ? FLB1[i] : (ST1[i-1] == FLB1[i-1] && C1[i] > FLB1[i]) ? FLB1[i] : (ST1[i-1] == FLB1[i-1] && C1[i] < FLB1[i] ? FUB1[i] : FUB1[i]);
}
ST1=Sistem.DonemCevir(v, period1, ST1);
var ST2R2 = Sistem.Liste(0);
var ST2S2 = Sistem.Liste(0);
var FUB2 = Sistem.Liste(0);
var FLB2 = Sistem.Liste(0);
var ST2 = Sistem.Liste(0);
var SuperTrend2 = Sistem.Liste(0);
for (int i=1; i < period2.Count; i++)
{
ST2R2[i] = MP2[i] + (Factor*ATR2[i]);
ST2S2[i] = MP2[i] - (Factor*ATR2[i]);
}
for (int i=1;i<period2.Count;i++)
{
FUB2[i] = (ST2R2[i] < FUB2[i-1] || C2[i-1] > FUB2[i-1]) ? ST2R2[i] : FUB2[i-1];
FLB2[i] = (ST2S2[i] > FLB2[i-1] || C2[i-1] < FLB2[i-1]) ? ST2S2[i] : FLB2[i-1];
ST2[i] = (ST2[i-1] == FUB2[i-1] && C2[i] < FUB2[i]) ? FUB2[i] : (ST2[i-1] == FUB2[i-1] && C2[i] > FUB2[i]) ? FLB2[i] : (ST2[i-1] == FLB2[i-1] && C2[i] > FLB2[i]) ? FLB2[i] : (ST2[i-1] == FLB2[i-1] && C2[i] < FLB2[i] ? FUB2[i] : FUB2[i]);
}
ST2=Sistem.DonemCevir(v, period2, ST2);
var hst=Sistem.Liste(0);
var SonYon = "";
for (int i=1; i < Sistem.BarSayisi; i++)
{
hst[i]=Math.Max(Math.Max(ST[i],ST1[i]),ST2[i]);
if(C[i-1] < ST[i-1] && C[i] > ST[i] && SonYon !="A")
{
Sistem.Yon[i] = "A";
SonYon = "A";
}
if(C[i-1] > ST[i-1] && C[i] < ST[i] && SonYon !="S")
{
Sistem.Yon[i] = "S";
SonYon = "S";
}
}
Sistem.Cizgiler[0].Deger = ST;
Sistem.Cizgiler[1].Deger = ST1;
Sistem.Cizgiler[2].Deger = ST2;
https://i.ibb.co/0qW7Zb2/ST.jpg
2. versiyon ise 1,5,15dk lar arasında hangisinin Super Trend değeri yüksekse,
onu yukarı kırınca al, aşağı kırınca sat...:
Kod:// Bu sistem örnek amaçlı oluşturulmuştur. Kullanım sorumluluğu tamamen kullanıcıya aittir. Oluşacak sorunlardan İDealdata sorumlu tutulamaz.
// Sistem, SuperTrend isimli indikatör hesaplaması yapar ve hesaplanan çizgiye ait Al-Sat yön sinyalleri oluşturur.
//Sistem içeriği istenildiği gibi düzenlenebilir.
var v=Sistem.GrafikVerileri;
var Factor = 3;
var Pd = 10;
var period=Sistem.GrafikVerileriniOku(Sistem.Sembol, "1");
var period1=Sistem.GrafikVerileriniOku(Sistem.Sembol, "5");
var period2=Sistem.GrafikVerileriniOku(Sistem.Sembol, "15");
var MP = Sistem.GrafikFiyatOku(period, "OrtaNokta");
var MP1 = Sistem.GrafikFiyatOku(period1, "OrtaNokta");
var MP2 = Sistem.GrafikFiyatOku(period2, "OrtaNokta");
var ATRX = Sistem.AverageTrueRange(period, 1);
var ATRX1 = Sistem.AverageTrueRange(period1, 1);
var ATRX2 = Sistem.AverageTrueRange(period2, 1);
var ATR = Sistem.MA(ATRX, "Simple", Pd);
var ATR1 = Sistem.MA(ATRX1, "Simple", Pd);
var ATR2 = Sistem.MA(ATRX2, "Simple", Pd);
var C = Sistem.GrafikFiyatOku(period, "Kapanis");
var C1 = Sistem.GrafikFiyatOku(period1, "Kapanis");
var C2 = Sistem.GrafikFiyatOku(period2, "Kapanis");
var STR = Sistem.Liste(0);
var STS = Sistem.Liste(0);
var FUB = Sistem.Liste(0);
var FLB = Sistem.Liste(0);
var ST = Sistem.Liste(0);
var SuperTrend = Sistem.Liste(0);
for (int i=1; i < period.Count; i++)
{
STR[i] = MP[i] + (Factor*ATR[i]);
STS[i] = MP[i] - (Factor*ATR[i]);
}
for (int i=1;i<period.Count;i++)
{
FUB[i] = (STR[i] < FUB[i-1] || C[i-1] > FUB[i-1]) ? STR[i] : FUB[i-1];
FLB[i] = (STS[i] > FLB[i-1] || C[i-1] < FLB[i-1]) ? STS[i] : FLB[i-1];
ST[i] = (ST[i-1] == FUB[i-1] && C[i] < FUB[i]) ? FUB[i] : (ST[i-1] == FUB[i-1] && C[i] > FUB[i]) ? FLB[i] : (ST[i-1] == FLB[i-1] && C[i] > FLB[i]) ? FLB[i] : (ST[i-1] == FLB[i-1] && C[i] < FLB[i] ? FUB[i] : FUB[i]);
}
var ST1R1 = Sistem.Liste(0);
var ST1S1 = Sistem.Liste(0);
var FUB1 = Sistem.Liste(0);
var FLB1 = Sistem.Liste(0);
var ST1 = Sistem.Liste(0);
var SuperTrend11 = Sistem.Liste(0);
for (int i=1; i < period1.Count; i++)
{
ST1R1[i] = MP1[i] + (Factor*ATR1[i]);
ST1S1[i] = MP1[i] - (Factor*ATR1[i]);
}
for (int i=1;i<period1.Count;i++)
{
FUB1[i] = (ST1R1[i] < FUB1[i-1] || C1[i-1] > FUB1[i-1]) ? ST1R1[i] : FUB1[i-1];
FLB1[i] = (ST1S1[i] > FLB1[i-1] || C1[i-1] < FLB1[i-1]) ? ST1S1[i] : FLB1[i-1];
ST1[i] = (ST1[i-1] == FUB1[i-1] && C1[i] < FUB1[i]) ? FUB1[i] : (ST1[i-1] == FUB1[i-1] && C1[i] > FUB1[i]) ? FLB1[i] : (ST1[i-1] == FLB1[i-1] && C1[i] > FLB1[i]) ? FLB1[i] : (ST1[i-1] == FLB1[i-1] && C1[i] < FLB1[i] ? FUB1[i] : FUB1[i]);
}
ST1=Sistem.DonemCevir(v, period1, ST1);
var ST2R2 = Sistem.Liste(0);
var ST2S2 = Sistem.Liste(0);
var FUB2 = Sistem.Liste(0);
var FLB2 = Sistem.Liste(0);
var ST2 = Sistem.Liste(0);
var SuperTrend2 = Sistem.Liste(0);
for (int i=1; i < period2.Count; i++)
{
ST2R2[i] = MP2[i] + (Factor*ATR2[i]);
ST2S2[i] = MP2[i] - (Factor*ATR2[i]);
}
for (int i=1;i<period2.Count;i++)
{
FUB2[i] = (ST2R2[i] < FUB2[i-1] || C2[i-1] > FUB2[i-1]) ? ST2R2[i] : FUB2[i-1];
FLB2[i] = (ST2S2[i] > FLB2[i-1] || C2[i-1] < FLB2[i-1]) ? ST2S2[i] : FLB2[i-1];
ST2[i] = (ST2[i-1] == FUB2[i-1] && C2[i] < FUB2[i]) ? FUB2[i] : (ST2[i-1] == FUB2[i-1] && C2[i] > FUB2[i]) ? FLB2[i] : (ST2[i-1] == FLB2[i-1] && C2[i] > FLB2[i]) ? FLB2[i] : (ST2[i-1] == FLB2[i-1] && C2[i] < FLB2[i] ? FUB2[i] : FUB2[i]);
}
ST2=Sistem.DonemCevir(v, period2, ST2);
var hst=Sistem.Liste(0);
var SonYon = "";
for (int i=1; i < Sistem.BarSayisi; i++)
{
hst[i]=Math.Max(Math.Max(ST[i],ST1[i]),ST2[i]);
if(C[i-1] < hst[i-1] && C[i] > hst[i] && SonYon !="A")
{
Sistem.Yon[i] = "A";
SonYon = "A";
}
if(C[i-1] > hst[i-1] && C[i] < hst[i] && SonYon !="S")
{
Sistem.Yon[i] = "S";
SonYon = "S";
}
}
Sistem.Cizgiler[0].Deger = ST;
Sistem.Cizgiler[1].Deger = ST1;
Sistem.Cizgiler[2].Deger = ST2;
https://i.ibb.co/5R4XTHV/st1.jpg
Önden alıp, "mal çakan" lardan değilim.
https://i.ibb.co/WnSnSdv/tvk.jpg
"Neyse O!"
Vallaa liste iyiiş yaptı :hi:
https://i.ibb.co/vvXQ379/liste.jpg