Oltaya Takılanlar - 2

[BJK Coccinella]

AGESA, MOBTL ve ORCAY haftalık dilimlerde boy göstermeye başladı, ilerisi için iyi bir gösterge...

Peki haftalık değerlendirme üzerinden bir süzgeç kullanılırsa durum ne olur? İşte haftalık % 10'luk dilim sonuçları...

[BJK Coccinella]

Aylık % 20'lik dilim...

[rosense]

Mehmet Emanet demiş ki;

Bir müddet indikatör ve taramalara ara veriyorum, 3 günde bayağı bir şeyler paylaştım , bunları inceleyin kurcalayın , sonra devam ederiz bunlar kısa olanlarıydı , system tester förmülülerinide, başka ind. Başka taramaları da paylaşacağım , kimseye para kaptırmayın

Buda temel analizcilere gelsin ..

Peg= (fk)/net kar büyümesi

Cola FK()/DKB()  

Colb DOB()/FK()

Filtre DOB()/FK() >2 and FK()/DKB()>0
and FK()/DKB()<1

**********

Bayram hediyesi 1

AL:

Yuzde:=5;

Short:=C - C*Yuzde/100;
Sh_Stop:=IF(Short>PREV OR REF(C,-1)<PREV,Short,PREV);

Long:=C + C*Yuzde/100;
Ln_Stop:=IF(Long<PREV OR REF(C,-1)>PREV,Long,PREV);

C>Ln_Stop AND Mov(C,20,Var)>Ott(C,20,1) AND 
MFI()>20 AND RSI()>30

**********

Bayram hediyesi 2

SAT:

Yuzde:=5;

Short:=C - C*Yuzde/100;
Sh_Stop:=IF(Short>PREV OR REF(C,-1)<PREV,Short,PREV);

Long:=C + C*Yuzde/100;
Ln_Stop:=IF(Long<PREV OR REF(C,-1)>PREV,Long,PREV);

C<Sh_Stop AND Mov(C,20,Var)<Ott(C,20,1) AND 
MFI()<80 AND RSI()<70

**********

Deyiştir geliştir 
Rakamlar
Yöntem (E yazan yer)
Periyot 

Denemeden korkma en sonunda grafiki gözle kontrol et, gözüne hoş gelen iyidir 

X:=QQEF(h,7,1);
FAHO:=MOV(X, 6,E);
FAHO1:=MOV(X,1,E);FAHO;FAHO1:99:21

**********

Deyiştir geliştir 
Rakamlar
Yöntem (Var yazan yer)
Periyot 
Denemeden korkma en sonunda grafiki gözle kontrol et, gözüne hoş gelen iyidir 

AL
if(MOV(C,40,VAR)>OTT(C,40,7),
Alpha(opt1>opt2),
Alpha(opt3>opt4))

SAT
if(MOV(C,40,VAR)>OTT(C,40,7),
Alpha(opt3<opt4),
Alpha(opt1<opt2))

**********

Deyiştir geliştir 
Rakamlar(most deyerleri)
Periyot 
Denemeden korkma en sonunda grafiki gözle kontrol et, gözüne hoş gelen iyidir 

m1:=PDI(15);
m2:=MDI(15);
MST:=MOST(C,30,0.5);
valuewhen(1,m1>m2,MST)

**********

Deyiştir geliştir 
Rakamlar(most deyerleri)
Periyot 
Denemeden korkma en sonunda grafiki gözle kontrol et, gözüne hoş gelen iyidir 
Ne anlatılmak istediğini 

Chat.openia sorun 

k1:=CROSS(c,MOST(c,30,0.5));
k2:=valuewhen(1.,k1,h);
c>MOST(c,30,0.5) AND c>K2+ATR(30)/2

**********


ayhan yılmaz'dan bayram şekeri :)

alttaki, epeydir meraklısı çok aranıp durular...
 benim de olsun diyeni bol..
"ekistrası" 14 farklı MA vs. :p

kodu geliştirmek, üstüne farklı indik/kod parçaları yazmak sizde gari! 
-sök, tak, parçala :) 
*** tabii ki "amibroker AFL"

****************

function MCGin(periods)
{
n=periods;
MD[0] = C[0];

for( i = 1; i < BarCount; i++ )
{
MD[ i ] = MD[ i - 1 ] + (C[i]-MD[i-1])/( N*(C[i] / MD[i-1])^4) ;
}
return MD;
}

function VWMA( p, period )
{
return Sum( p * V, period ) / Sum( V, period );
}

// T3 Average

function T3Avg(p,period)

{
s = 0.84;
e1=EMA(p,period);
e2=EMA(e1,Period);
e3=EMA(e2,Period);
e4=EMA(e3,Period);
e5=EMA(e4,Period);
e6=EMA(e5,Period);
c1=-s*s*s;
c2=3*s*s+3*s*s*s;
c3=-6*s*s-3*s-3*s*s*s;
c4=1+3*s+s*s*s+3*s*s;
Ti3=c1*e6+c2*e5+c3*e4+c4*e3;
return ti3;
}

function KAMA( P, Period )
{
Direction = P - Ref( P, -period );
Volatility = Sum( abs( P - Ref( P, -1 ) ), period );
Volatility = IIf( Volatility > 0, Volatility, 0.00001 );
ER = abs( Direction / Volatility );
FastSC = 2 / ( 2 + 1 );
SlowSC = 2 / ( 30 + 1 );
SSC = ER * ( FastSC - SlowSC ) + SlowSC;
Constant = SSC ^ 2;
return AMA( P, Constant );
}


function VarPeriodRSI( array, periods )
{
Chg = array - Ref( array, -1 );
pc = Max( Chg, 0 );
nc = Max( -Chg, 0 );

pa = AMA( pc, 1/periods );
na = AMA( nc, 1/periods );

return 100 * pa / ( pa + na );
}


Function MyAvgParam( type )
{
global AvgText;
global AvgType;
global AvgTextname;
ParamAverage =
ParamList( "Type",
List = "1 - McGinley Dynamic, 2 - SMA, 3 - EMA, 4 - WMA, 5 - DEMA, 6 - TEMA, 7 - WILDERS, 8 - LINEAR REGRESSION, 9 - TIME SERIES FORECAST, 10 - KAMA, 11 - VWMA, 12 - T3, 13 - Hull, 14 - VarPeriodRSI", type - 1 );

for ( i = 0; i < 16; i++ )
if ( StrExtract( List, i ) == ParamAverage )
AvgType = i + 1;

if ( AvgType == 1 )
AvgTextname = "McGinley Dynami";
else
if ( AvgType == 2 )
AvgTextname = "SMA";
else
if ( AvgType == 3 )
AvgTextname = "EMA";
else
if ( AvgType == 4 )
AvgTextname = "WMA";
else
if ( AvgType == 5 )
AvgTextname = "DEMA";
else
if ( AvgType == 6 )
AvgTextname = "TEMA";
else
if ( AvgType == 7 )
AvgTextname = "WILDERS";
else
if ( AvgType == 8 )
AvgTextname = "LINEARREG";
else
if ( AvgType == 9 )
AvgTextname = "TSF";
else
if ( AvgType == 10 )
AvgTextname = "KAMA";
else
if ( AvgType == 11 )
AvgTextname = "VWMA";
else
if ( AvgType == 12 )
AvgTextname = "T3";
else
if ( AvgType == 13 )
AvgTextname = "Hull";
else
if ( AvgType == 14 )
AvgTextname = "VarPeriodRSI";



AvgText = " - " + AvgTextname;
}

Function Average( array, period, type )
{
if ( Type == 1 )
//Value = PeGMA( Array, Period );
Value =MCGin( Period );
else
if ( Type == 2 )
Value = MA ( Array, Period );
else
if ( Type == 3 )
Value = EMA( Array, Period );
else
if ( Type == 4 )
Value = WMA( Array, Period );
else
if ( Type == 5 )
Value = DEMA( Array, Period );
else
if ( Type == 6 )
Value = TEMA( Array, Period );
else
if ( Type == 7 )
Value = Wilders( Array, Period );
else
if ( Type == 8 )
Value = LinearReg( Array, Period );
else
if ( Type == 9 )
Value = TSF( Array, Period );
else
if ( Type == 10 )
Value = KAMA( Array, Period );
else
if ( Type == 11 )
Value = VWMA( Array, Period );
else
if ( Type == 12 )
Value = T3Avg( Array, Period );
else
if ( Type == 13 )
Value = WMA( 2*WMA(Array,int(Period/2))- WMA(Array,Period),int(sqrt(Period)));
else
if ( Type == 14 )
Value = VarPeriodRSI( Array, period );

return Value;
}


function AddAverage( SectionText, DefaultPeriod, DefaultType, def_PriceField, Defaultshift, Defaultcolor, Defaultstyle, default_AvgSwitch )
{
global MyAverage_opt;
global MyAverage;
_SECTION_BEGIN( SectionText );
MyAverage_opt = ParamToggle( "On/Off", "Off|On", default_AvgSwitch );
MyAvgParam( DefaultType );
P = ParamField( "Price field", def_PriceField );
Period = Param( "Periods", DefaultPeriod, 2, 250, 1 );
Shift = Param( "Shift", Defaultshift, -50, 50, 1 );
MyAverage = Average( P, Period, AvgType );
MyAvgStyle = ParamStyle( "Style", Defaultstyle, maskAll );
MyAvgColor = ParamColor( "Color", Defaultcolor );

if ( MyAverage_opt )
Plot( MyAverage, _DEFAULT_NAME() + AvgText, MyAvgColor, MyAvgStyle | styleNoRescale, Null, Null, shift );

_SECTION_END();
}


SetChartBkColor( ParamColor("background",colorLightYellow) );

_SECTION_BEGIN("Main Parameters");
//AddparamUsefromChart(1);
side = 1;
MyAvgParam(1);
sia = Param("Smoothness if any", 5, 1, 200, 1 );
lia = Param("Length if any", 21, 1, 200, 1 );
Periods = Param("Periods", 20, 2, 300, 1 );


_SECTION_BEGIN("MACD");
A1= Average( C,12,AvgType )-Average( C,25,AvgType );
B1 =Average( C,25,AvgType )-Average( C,12,AvgType ) ;
//A1=EMA(C,12)-EMA(C,26);
//B1=EMA(C,26)-EMA(C,12);
BBtop=BBandTop(A1,periods,1);
BBbot=BBandBot(A1,periods,1);
Color=IIf(a1<0 AND a1>Ref(a1,-1), colorGreen,IIf(a1>0 AND a1>Ref(a1,-1) ,colorBrightGreen,IIf(a1>0 AND a1<Ref(a1,-1),colorCustom12,colorRed)));
Color1=IIf(a1<0 AND a1>Ref(a1,-1), colorPaleTurquoise,IIf(a1>0 AND a1>Ref(a1,-1) ,colorpaleGreen,IIf(a1>0 AND a1<Ref(a1,-1),colorrose,colorLightOrange)));
Plot(a1,"MACD",color,styleDots+styleLine+styleThick);

Plot(B1,"MACD",color,styleDots+styleLine+styleThick);
Plot(BBtop,"BBtop",colorDarkBlue,styleDashed);
Plot(BBbot,"BBbot",colorDarkBlue,styleDashed);
PlotOHLC(BBtop,BBbot,BBtop,BBbot,"",color1,stylecloud|styleClipMinMax,5,5.0,0,-1);
Plot(0,"",colorBlack,1);
_SECTION_END();
Write a note in this area. It's really easy to share with others. Click here ...

, 

[rosense]

HİSSE Senedi yatırımı yapacak arkadaşların dikkat etmesi gereken hususlar ....

HİSSEDE YATIRIM YAPARKEN DİKKAT EDİLMESİ GEREKEN HUSUSLAR
* Hisse seçerken temel analiz yapmamak, duyumlarla hisse seçmek
*Hangi fiattan aldığına bakmadan maliyetlenmek, teknik analiz kullanmamak.
*Hisseyi almadan STOP LOSS ve hedef fiatı belirlememek.
*Konjontüre göre hisse seçmememk, tek hisseye yatırım yapmak.
*Farklı sektörlerden hisse seçip riski dağıtmamak.
*Hedef fiata geldiğinde kanaatkar olmamak, zarar ettiğinde kol kesmemek.
*Kardaki tatmini, zararda uygulamamak ve beklemek.
*En dipten almak, en tepeden satmaya çalışmak.
*Kazanınca aşırı özgüven, kaybedince panik ve stres yapmak.
*Sermayesinden fazla risk alıp vadeli işlemlerde kaldıraç kullanmak
*Kar ve Zararda pisikolojisini ve stresini yönetememek.
*Vade ve Yatırım riskini önceden belirlememek.
Sık sık hisse değiştirip tepeden maliyetlenmek.
*Önceden belirlediğin stratejiye bağlı kalmamak. 
*Kar ve Zarar arttıkça riski büyütmek.
*Anlık sürü pisikolojisine göre hareket etmek.
*Yatırım yaparken riskini henge etmemek.
*hisse yatırımında en önemli kural görünmeyeni önceden görmek METEHAN katkısı..
*En önemlisi KENDİNİ TANIMAMAK. 

[METEHAN]

hisse yatırımında en önemli kural görünmeyeni önceden görmektir gerisi hikayedir fk lara yada pd lere yansıdıktan sonra anca ucundan koklatırlar ...

[rosense]

Borsa İstanbul'da İşlem Gören Bazı Şirket ve Bankaların 2.Çeyrek Bilanço Açıklama Tarihleri ....

Borsa İstanbul'da 2.çeyrek bilanço sezonu 26 Temmuz 2023 tarihinde Akbank ve TAV Havalimanları ile başlayacak.

Borsa İstanbul'da işlem gören şirketlerin ve bankaların 2023 yılı ikinci çeyrek dönemine ilişkin konsolide olmayan banka ve şirketler için finansal sonuçlarını son gönderme tarihi 9 Ağustos 2023 olarak açıklandı. Finansal sonuçların son gönderilme tarihi konsolide banka ve şirketler için ise 21 Ağustos 2023 olarak belirlendi.









Sermayesinin 30 katından fazla özkaynağı olan 50 milyonun altındaki şirketler.

Yüksek bedelsiz listesi güncel rasyolarla.
2023 Büyük bedelsizlerin yılı olacağını daha önce çok kez belirtmiştim.

Listede eksik kağıtlar var.
Kendinizde bu rasyolara ekleme çıkarmalar yapabilirsiniz. Örnek:thyao gibi.

[BJK Coccinella]

Hangi senet, hangi periyotta, hangi yüzdelik bant içinde, kaç bardır hareket ediyor ? 60 dk’lık periyot ve % 1’lik bant süzgeci şu şekilde oluştu;

[BJK Coccinella]

Sermayesinin 30 katından fazla özkaynağı olan 50 milyonun altındaki şirketler.

Yüksek bedelsiz listesi güncel rasyolarla.
2023 Büyük bedelsizlerin yılı olacağını daha önce çok kez belirtmiştim.

Listede eksik kağıtlar var.
Kendinizde bu rasyolara ekleme çıkarmalar yapabilirsiniz. Örnek:thyao gibi.

Bu tablodaki senetlerin rasyoları senetle ilgili maliyet oluşturmak için yeterli değil.

Tamam temeline bakalım ama senede giriş çıkış zamanlamasının Teknik Analiz yöntemleri ile gerçekleştirilebileceğini düşünüyorum.

Hemşerim iyi niyetini anlıyorum ama bu mesajı twitter'a gönderen kişinin elinde bu tablodaki senetlerden en az bir ya da ikisinin olduğunu tahmin ediyorum.

Alıntılamayı eksik yapmazsak mesajı gönderenin de vebal almasını önlemiş oluruz.