هوامير البورصة

23-10-2012, 09:57 PM

المشاركه #625

منادي_2005

كاتب قدير

تاريخ التسجيل: Oct 2005

المشاركات: 8,424

اقتباس:

المشاركة الأصلية كتبت بواسطة ryof

اتمني ان تكونو بأتم صحه وعافيه

[/color]

شاكر ومقدر مشاركتك

اقتباس:

المشاركة الأصلية كتبت بواسطة فهد الهزاع

الله يسعدك ويوفقك ويبارك لك يا ابومحمد

مجهوود ولا أروع بالأضافه لـ سعة صدرك وكرم أخلاقك

وفقك الله

حياك أخوي فهد شرفتني بموضوعي

25-10-2012, 09:11 PM

المشاركه #627

Fahad_IB

عضو هوامير المميز

تاريخ التسجيل: Nov 2011

المشاركات: 441

30-10-2012, 01:44 AM

المشاركه #628

رحم الله والديك اخي وحبيبي ابو محمد في هذا الساعه الشريفه في الثلث الليل الاخير

الله يوفقك ويرحم من ورثك ويطول في عمرهم

ويخلي لك ذريتك وتذوق برهم امين يارب

اخي الغالي هل بالامكان ان تشير لأهم المؤشرات التي ارتكزت عليها في طرحك لهذا الموضوع

خاصة وان الموقف كان يستدعي الخوف والحذر

http://www.hawamer.com/vb/showthread.php?t=1121314

تحياتي لك

دمت لنا اخا برا رفيقا

مغليك

30-10-2012, 09:08 AM

المشاركه #629

منادي_2005

كاتب قدير

تاريخ التسجيل: Oct 2005

المشاركات: 8,424

اقتباس:

المشاركة الأصلية كتبت بواسطة الأصالة

رحم الله والديك اخي وحبيبي ابو محمد في هذا الساعه الشريفه في الثلث الليل الاخير

الله يوفقك ويرحم من ورثك ويطول في عمرهم

ويخلي لك ذريتك وتذوق برهم امين يارب

اخي الغالي هل بالامكان ان تشير لأهم المؤشرات التي ارتكزت عليها في طرحك لهذا الموضوع

خاصة وان الموقف كان يستدعي الخوف والحذر

http://www.hawamer.com/vb/showthread.php?t=1121314

تحياتي لك

دمت لنا اخا برا رفيقا

مغليك

كل شيء بوقته حلوووو

وكل عام وأنت بخير

30-10-2012, 03:53 PM

المشاركه #630

الأصالة

أبو ابراهيم

تاريخ التسجيل: Feb 2006

المشاركات: 9,466

اقتباس:

المشاركة الأصلية كتبت بواسطة منادي_2005

كل شيء بوقته حلوووو

وكل عام وأنت بخير

تسلم يا عيوني.... بانتظارك

الله لا يحرمنا منك ومن طلتك الحلوه يا عسل

30-10-2012, 05:18 PM

المشاركه #631

الأصالة

أبو ابراهيم

تاريخ التسجيل: Feb 2006

المشاركات: 9,466

السلام عليكم

مؤشر عثرت عليه في احد المواقع الاجنبية

SetChartOptions(0,chartShowDates);
SetChartBkColor(16);
GraphXSpace=Param("GraphXSpace",10,-100,100,1);
SetBarFillColor(IIf(O>C,24,19));
Plot(C,"Price",IIf(O>C,32,34),64);
dtn=DateNum();
haC=EMA((O+H+L+C)/4,3); haO=AMA(Ref(haC,-1),0.5);
haH=Max(H,Max(haC,haO)); haL=Min(L,Min(haC,haO));
//==============================
_SECTION_BEGIN("HL Pivots");
//==============================
psh= ParamToggle("Pivot Shapes","Off|On",1);
plb= ParamToggle("Pivot Labels","Off|On",1);
snd= ParamToggle("Sound Alerts","Off|On",1);
lbk= Param("Hi Lo Lookback",350,50,5000,10);
nbz= Param("Swing Bars",20,5,150,1);
tht= Param("Hi Label Adjust",0.65,0.10,5,0.05)*ATR(5);
lbk= Min(BarCount-1,Lbk);
bc=BarCount-1;
//================
xH=H-H; xL=L-L; yH=H-H; yL=L-L; xR=H-H; xS=L-L;
xrb=0; xSb=0; yR0=0; yS0=0; xR0=0; xS0=0; xx=0;
xHH= HHVBars(H,nbz); xLL= LLVBars(L,nbz);
yHH= HHV(H,nbz); yLL= LLV(L,nbz);
viz= Status("BarVisible");
vbz= LastValue(Highest(IIf(viz,BarIndex(),0)));
_TRACE("Last visible bar: "+ vbz);
bct= (BarCount-1); = "";
if(xLL[bc]<xHH[bc]) { ="D"; } else { ="U"; }
for(i=0; i<lbk; i++) { bc=bct-i;
if(xLL[bc]<xHH[bc]) { if(=="U"){="D";
xx=bc-xLL[bc]; xL[xx]=1;
yL[xSb]=L[xx]; xS[xSb]=xx; xSb++; }
} else { if(=="D") { = "U";
xx=bc-xHH[bc]; xH[xx]=1; yH[xrb]=H[xx]; xR[xrb]=xx;xrb++; }}}
xP= 0; yP= 0; xS0= xS[0]; yS0=yL[0]; xR0= xR[0]; yR0= yH[0];
if(xS0>xR0) { xP=bc-xHH[bc]; yP= yHH[bc];
if(yR0<yP AND xP>xS0 AND xP<bc) { xH[xP]=1;
for(j=0; j<xrb; j++) { yH[xrb-j]= yH[xrb-(j+1)];
xR[xrb-j]= xR[xrb-(j+1)]; }
yH[0]= yP; xR[0]= xP; xrb++; }
} else { xP= bc-xLL[bc]; yP= yLL[bc];
if(yS0>yP AND xP>xR0 AND xP<bc) { xL[xP]=1;
for(j=0; j<xSb; j++) { yL[xSb-j]= yL[xSb-(j+1)]; xS[xSb-j]= xS[xSb-(j+1)]; }
yL[0]=yP; xS[0]=xP; xSb++; }}
ushp=shapeHollowUpArrow; dshp=shapeHollowDownArrow;
if(psh) { PlotShapes(xH*dshp,42,0,H,-10); PlotShapes(xL*ushp,43,0,L,-10); }
if(snd) {
AlertIf(xL==1,"SOUND C:\\Windows\\Media\\Windows XP Startup.wav","Audio alert",2);
AlertIf(xH==1,"SOUND C:\\Windows\\Media\\Ringin.wav","Audio alert",2); }
Buy=(xL); Sell=(xH); Cover=(xL); Short=(xH); Long=Flip(Buy,Sell); Shrt=Flip(Sell,Buy);
SellPrice=ValueWhen(Sell,H,1); BuyPrice= ValueWhen(Buy,L,1);
if(plb) {
for(i=0; i<BarCount; i++) {
if(Buy[i] )PlotText("\n\n"+ StrRight(NumToStr(L[i],6.2),5),i-1,L[i],43,16);
if(Sell[i])PlotText(StrRight(NumToStr(H[i],6.2),5),i-1,H[i]+tht[i],32,16); }
}
_SECTION_END();
//===========================
_SECTION_BEGIN("Sup / Res Lines");
SRswitch = ParamToggle("Sup / Res Lines","On,Off");
CHLswitch = ParamToggle("Hi Low / Close","Hi Low,Close");
NoLines = Param("No of Lines",3,1,10,1);
Sen = Param("Sensitivity",5,1,100,1);

Rcolor=ParamColor( "Res Color", colorGreen );
Rstyle=ParamStyle( "Res Style", styleLine );

Scolor=ParamColor( "Sup Color", colorBrown );
Sstyle=ParamStyle( "Sup Style", styleLine );

y=0;
x=0;

for( i = 1; i < NoLines+1 ; i++ )
{
Y[i]=LastValue(Peak(IIf(CHLswitch,C,H),Sen,i));
x[i]=BarCount - 1 - LastValue(PeakBars(IIf(CHLswitch,C,H),Sen,i));
Line = LineArray( x[i], y[i], Null, y[i], 1 );
Plot( IIf(SRswitch,Null,Line), "", Rcolor, Rstyle );

Y[i]=LastValue(Trough(IIf(CHLswitch,C,L),Sen,i));
x[i]=BarCount - 1 - LastValue(TroughBars(IIf(CHLswitch,C,L),Sen,i));
Line = LineArray( x[i], y[i], Null, y[i], 1 );
Plot( IIf(SRswitch,Null,Line), "", Scolor, Sstyle );
}
_SECTION_END();

_SECTION_BEGIN("Background");
SetChartOptions(0,chartShowArrows|chartShowDates);
priceTitle=StrFormat("---- {{NAME}} ---------- {{VALUES}}");
Title ="Averages" + priceTitle;

if( ParamToggle("Tooltip shows", "All Values|Only Prices" ) )
{
ToolTip=StrFormat("Open: %g\nHigh: %g\nLow: %g\nClose: %g (%.1f%%)\nVolume: "+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C, 1 )));
}

SetChartBkColor(ParamColor("Outer panel color ",colorBlack)); // color of outer border
SetChartBkGradientFill( ParamColor("Inner panel color upper half",colorBlack),ParamColor("Inner panel color lower half",colorBlack)); // color of inner panel
_SECTION_END();

31-10-2012, 12:36 AM

المشاركه #632

الأصالة

أبو ابراهيم

تاريخ التسجيل: Feb 2006

المشاركات: 9,466

مؤشر رائع تم طرحه من قبل استاذي ابو محمد وفيه زيادة ملف جديد وشرح لكيفية الاضافه لمن اشتكى من عدم قدرة على نقل الملفات بطريقة صحيحه

http://files.myopera.com/gunavadhi/files/nirvana.zip

لا تحرمونا صالح الدعاء

للعلم الاشارة ثابتة وتم كسر المؤشر

صورة للموشر

بالتوفيق

31-10-2012, 03:58 AM

المشاركه #633

منادي_2005

كاتب قدير

تاريخ التسجيل: Oct 2005

المشاركات: 8,424

حياك أخي ابو ابراهيم وشاكر ومقدر ما تقدمــــــــــــه لأخوانك

31-10-2012, 05:13 AM

المشاركه #634

Fahad_IB

عضو هوامير المميز

تاريخ التسجيل: Nov 2011

المشاركات: 441

الله يعطيك العافية
ابي معادلة تميز شمعة المطرقة Bullish Hammer بلون ازرق اذا كان موشر rsi تحت 30 ,,, و تميز شمعة الرجل المشنوق candle Hanging man بلون اصفر .
مع الفلتر .............. وشكراً

01-11-2012, 08:50 PM

المشاركه #635

منادي_2005

كاتب قدير

تاريخ التسجيل: Oct 2005

المشاركات: 8,424

معادلات للأمي بروكر لن تجدها في أي موقع وخاصة المعادلة الثانية ولو لم أجد منها فائدة لما طرحتها بموضوع مستقل

تفضـــــــــلوا

متوسطــــــــات غير للمتوسط اللي تبي من خلال أعدادت المعادلة

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 )) ));
Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

//-- Author: KelvinHand
//TP - Typical Price (H+L+C)/2
//MP - Median Price (H+L)/2
//WP - Weight Price (H+L+C+C)/4

MAType = ParamList("Type", "SMA,EMA,WMA,TSF,DEMA,TEMA,LinearReg,Wilders");
Periods = Param("Periods", 20, 1, 500 );
iPrice = ParamList("Price", "C,O,H,L,MP,TP,WP");

Shift = Param("Shift", 0, -50, 50 );

cColor = ParamColor("Color", ColorCycle);
iStyle = ParamStyle("Style", styleLine, maskAll);

switch (iPrice)
{
case "O" : p = Open; break;
case "H" : p = High; break;
case "L" : p = Low; break;
case "MP" : p = (H+L)/2; break;
case "TP" : p = (H+L+C)/3; break;
case "WP" : p = (H+L+C+C)/4; break;
default: p = Close; break;
}

switch (MAType)
{
case "EMA": iMA = EMA( P, Periods ); break;
case "WMA": iMA = WMA( P, Periods ); break;
case "DEMA": iMA = DEMA( P, Periods ); break;
case "TEMA": iMA = TEMA( P, Periods ); break;
case "Wilders": iMA = Wilders( P, Periods ); break;
case "TSF": iMA = TSF( P, Periods ); break;
case "LinearReg": iMA = LinearReg( P, Periods ); break;

default: iMA = MA( P, Periods ); break;
}

ShortName = MAType+Periods+iPrice;
if (Shift !=0)
ShortName = ShortName + "x"+Shift;

Plot( iMA, ShortName, cColor, iStyle, 0, 0, Shift);

هذا أهداء خااااااااااااااااااص

ماكد مع متوسطات وغيره أتمنى الأستفدادة منه بالدرجة القصوى

_SECTION_BEGIN("Background");
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),ParamColor("BgBottom", colorBlack), colorLightGrey);
_SECTION_END();

_SECTION_BEGIN("Enable/Disable");
ShowMACDLine = ParamToggle("Show MACD Line?", "No|Yes");
ShowBB = ParamToggle("Show MACD-BB?", "No|Yes", 1);
ShowStdDev = ParamToggle("Show MA For StdDev?", "No|Yes", 1);
_SECTION_END();

_SECTION_BEGIN("Styles");
sShapeBtwBB = ParamList("Shape between BB", "Small|Big", 1);
_SECTION_END();

_SECTION_BEGIN("Colors");
cMacdLine=ParamColor("MACD Line", colorOrange);
cUprBB = ParamColor("UpperBand", colorBlueGrey);
cLwrBB = ParamColor("LowerBand", colorBlueGrey);

cMacdGeUprBB = ParamColor("MacdGeUprBB", colorBrightGreen);
cMacdLeLwrBB = ParamColor("MacdLeLwrBB", ColorRGB(255,0,255));

cMacdLtUprBB = ParamColor("MacdLtUprBB", colorRed);
cMacdGtLwrBB = ParamColor("MacdGtLwrBB", colorDarkGreen);

cZLUp = ParamColor("Above Zeroline", ColorRGB(0,0,140));
cZLDn = ParamColor("Below Zeroline", ColorRGB(130,0,0));

_SECTION_END();

_SECTION_BEGIN("MACDBB");
r1 = Param("Fast MA Period", 12);
r2 = Param("Slow MA Period", 26);
//r3 = Param("Signal Period", 9);

r4 = Param("StdDev Period", 10);
SDCnt = Param("StdDev", 1.0, 1,10, 0.1);

MAforStdDev = ParamList("MA for StdDev", "SMA|EMA");

_SECTION_END();

g_m= EMA(C,r1)-EMA(C,r2);
m1 = Ref(g_m, -1);

if (MAforStdDev=="EMA")
g_s = EMA(g_m,r4);
else
g_s = MA(g_m,r4);

SD = StDev( g_m, r4);

BBtop= g_s + SDCnt*sD;
BBbot= g_s - SDCnt*sD;

if (ShowMACDLine) Plot(g_m,"",cMacdLine);

if (ShowBB)
{
ThisColor = IIf(g_m>=BBtop AND g_m>=m1, cMacdGeUprBB,
IIf(g_m<=BBbot AND g_m<=m1, cMacdLeLwrBB,
IIf(g_m>g_s, cMacdLtUprBB, cMacdGtLwrBB)));

Plot(g_m,"MACD", ThisColor,styleDots|styleNoLine);

if (sShapeBtwBB=="Big")
{
ThisShape = IIf(g_m>BBtop, shapeNone,
IIf(g_m<BBbot, shapeNone,
shapeSmallCircle));

PlotShapes( ThisShape, ThisColor,0,Null, 0 );
}

}

if (ShowStdDev)
Plot(g_s,"MidBand", colorDarkGrey, styleDashed|styleNoLabel);

if (ShowBB)
{
Plot(BBtop,"UprBand",cUprBB, styleNoLabel);
Plot(BBbot,"LwrBand",cLwrBB, styleNoLabel);
}

Plot(0,"", IIf(g_m>=0, colorBlue, colorRed), styleNoLabel);

RequestTimedRefresh( 0 );

صورة المؤشرين

01-11-2012, 08:57 PM

المشاركه #636

منادي_2005

كاتب قدير

تاريخ التسجيل: Oct 2005

المشاركات: 8,424

SetBarsRequired(100000,100000);

Len = Param("FFT Length", 1024, 64, 10000, 10 );

Len = Min( Len, BarCount );

x = BarIndex();
x1 = x - BarCount + Len;

input = C;
a = LastValue( LinRegIntercept( input, Len - 1 ) );
b = LastValue( LinRegSlope( input, Len - 1 ) );

Lr = a + b * x1;

data = input - Lr;// de-trending

ffc = FFT(data,Len);

for( i = 0; i < Len - 1; i = i + 2 )
{
amp[ i ] = amp[ i + 1 ] = sqrt(ffc[ i ]^ 2 + ffc[ i + 1 ]^2);
phase[ i ] = phase[ i + 1 ] = atan2( ffc[ i + 1], ffc[ i ] );
}

auto = ParamToggle("Auto dominant cycle", "No|Yes", 1 );
sbar = Param( "Which FFT bin", 1, 0, 50 );

skipbin1 = ParamToggle("Skip 1st FFT bin", "No|Yes", 1 );

if( auto )
{
sbar = int( LastValue(ValueWhen( amp == LastValue(Highest( IIf( skipbin1 AND x < 4, 0 , amp ) )), x / 2 )) );
}

fv = Status("firstvisiblebar");

thisbar = Ref( int(x/2) == sbar, -fv);
//Plot( Ref(amp,-fv),
//"amplitude (bin " + Ref( int(x/2), -fv ) +")", IIf( thisbar, colorRed, colorBlack ),styleArea);

Plot( IIf( BarCount - BarIndex() < Len, data, Null ) ,
"de-trended input ("+Len+" bars)", colorBlack,styleBar|styleLeftAxisScale );
Plot( cos( phase[ sbar * 2 ] + (sbar) * x1 * 2 * 3.1415926 / Len ),
" dominant cycle "+ Len/(sbar) + "(" + sbar + " bin) bars", colorBlue, styleOwnScale );

GraphZOrder=10;
GraphXSpace = 10;

الصور المرفقة

مواضيع مدمجة عن معادلات الأمي بروكر

فهد الهزاع

أبو أويس
محلل فني

منادي_2005

كاتب قدير

Fahad_IB

عضو هوامير المميز

الأصالة

أبو ابراهيم

منادي_2005

كاتب قدير

الأصالة

أبو ابراهيم

الأصالة

أبو ابراهيم

الأصالة

أبو ابراهيم

منادي_2005

كاتب قدير

Fahad_IB

عضو هوامير المميز

منادي_2005

كاتب قدير

منادي_2005

كاتب قدير

أدوات الموضوع
مشاهدة صفحة طباعة الموضوع أرسل هذا الموضوع إلى صديق

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة لا تستطيع الرد على المواضيع لا تستطيع إرفاق ملفات لا تستطيع تعديل مشاركاتك BB code is متاحة الابتسامات متاحة كود [IMG] متاحة كود HTML معطلة قوانين المنتدى

مواضيع مدمجة عن معادلات الأمي بروكر

أبو أويس محلل فني

كاتب قدير

عضو هوامير المميز

أبو ابراهيم

كاتب قدير

أبو ابراهيم

أبو ابراهيم

أبو ابراهيم

كاتب قدير

عضو هوامير المميز

كاتب قدير

كاتب قدير

أبو أويس
محلل فني