|
21-08-2007, 09:57
|
|
|
|
مؤشر لمستخدمي ايمي بروكر
مؤشر لمستخدمي ايمي بروكر
أشكر استاذي الغالي على وضع هذا المؤشر
The advisor
ماوضعته هو حب التعاون وحب نشر الخير لجميع الأعضاء
فبتعاون نكسب العلم بإذن الله عزوجل
المعذره الإتصال ضعيف جدا العمل اخلصته بالساعة 4 فجرة لهذا اليوم 21/8
واشتغل الانترنت 9صباحا ياعيني :11air:
وضعت لكم ملف بإسم The advisor.exe
في وقت التحميل ضعه على سطح المكتب
طبعا البرنامج وضعته بملف مضغوط فك الضغط
نحمل الملف
اضغط كلك يمين وحفظ بإسم
http://www.mixq8.info/uploads23/1187...%20advisor.zip
بعد التحميل
نغلق برنامج ايمي بروكر
بعدها نبدأ بخطوة مهمه جدا وهي ان تعمل لك ملف خاص للمؤشرات التي تقوم بإضافتها على برنامج ايمي بروكر
نقوم بالتالي
نذهب الى جهاز كمبيوتر و+ ثم نختار الهارد الذي نشتغل عليه اما ( D - C ) فأنا اشتغل على D
بعدها نذهب الى Program Files
بعدها نذهب الى AmiBroker
بعدها نذهب الى وهو ملف المؤشرات Formulas
هنا نضيف ملف وتسمية على حسب ماتريد وانا وضعت MAZIN_0
اذا اصبح مسار هذا الملف هو كتالي
D:\Program Files\AmiBroker\Formulas\MAZIN_0
ننظر بالصورة الآن
بعدها نذهب الى الملف الذي اعطيتكم هو وهو ملف اخي الغالي The advisor
الذي فيه المؤشر
نقوم بالعمل التالي
نضغط عليه
ننظر الآن بالصورة
وبعدها نضع مسار الملف
والذي عملناه سابقا
D:\Program Files\AmiBroker\Formulas\MAZIN_0
ثم نضغط على انستول
ننظر بالصورة الآن
نذهب الى الملف نجد انه تم اضافة المؤشر وايضا هنالك طريقة ننسخ المؤشر ونذهب الى نفس الملف ونلصق المؤشر
الآن نقوم بعمل الخيارات التي عملها اخي الغالي The advisor
فالصورة واضح جدا
نقوم الآن بتشغيل برنامج ايمي بروكر
ونذهب الى قائمة المؤشرات
وسوف نجد التالي ننظر بالصورة الآن
اما عملية شرح المؤشر فهي واضحه بعمليات الخروج والدخول ايضا
الشركة هي شــــــــــــــــــــــــــمــــــــــــــــــــــ ــــــــــــــــس
نلاحظ ايضا اللون الاخضر الي وضعت عليه رقم 1
تعطي ايضا اشارات دخول بسيطة وهي تفيد حينما تعتمد على بعض المؤشرات الاخرى السريعة وهي تنفع للمضارب في هذه الحالة
تقبلوا اجمل تحياتي محبكم دئما
مـــــــــــــازن
|
21-08-2007, 17:14
|
|
|
بارك الله فيك
اخي مازن هل يمكن اضافته لمباشر برو
اوللمؤشر معادله لتعديلها في مباشر
ولك الشكر والتقدير
|
21-08-2007, 19:14
|
 |
.: فريق المتابعة اليومية :.
|
|
|
|
|
|
21-08-2007, 20:31
|
|
|
بارك الله فيكم وهذا واجبي
كل ماهو جديد واراه مفيد سوف اطرحه بقدر المستطاع بالطريقة المناسبه لكم
دعواتكم لي بالتوفيق
|
21-08-2007, 23:49
|
 |
.: نائب المشرف العام :.
|
|
|
|
هلا وغلا بمازن
مشكووووووووووووووووور
ياغالي
ماقصرت
|
22-08-2007, 00:34
|
|
|
|
|
22-08-2007, 01:12
|
|
|
باركـ الله فيكـ
وفقكـ الله لما يحبه ويرضاهـ وباركـ الله لكـ في علمكـ وعملكـ
|
22-08-2007, 05:54
|
|
|
اشكر الجميع على الردود فبارك الله فيكم ورزقكم الله من حيث لاتعلمون
ومروركم لموضوعي يزيدة ضياء وبهجة
فتقبلوا اجمل تحياتي
حمل المؤشر مرة اخرى
http://members.lycos.co.uk/mazin11/Theadvisor.zip
اقتباس:
معادلة المؤشر
_SECTION_BEGIN("Specific parameters");
AcousticSwitch = ParamToggle("Acoustic alert","Off,On",1);
EmailSwitch = ParamToggle("Email alert","Off,On",0);
Offset = Param("Maximum deviation",20,0.01,200,0.01);
Centering = ParamToggle("Range centering","Off,On",0);
SuColor = ParamColor("Lower range",colorGreen);
ReColor = ParamColor("Upper range",colorRed);
SU = Param("Lower level",-100,-100,100,1);
RE = Param("Upper level",100,-100,100,1);
Indcolor = ParamColor("Indi***or color",colorBlue);
Indstyle = ParamStyle("Indi***or style",styleLine,maskAll);
Taio = 100*tbTysc()/tbTysf(tbTyse(abs(tbTysd())));
_SECTION_END();
Ind = Taio; //Enter your indi***or here
ALON = AcousticSwitch|EmailSwitch;
SuAL_L = IIf(Centering,SU-Offset,SU);
SuAL_H = SU+Offset;
ReAL_L = RE-Offset;
ReAL_H = IIf(Centering,RE+Offset,Re);
//////////////////////////////////////////////////////////////
//buy alert 1
Buy_1 = Ind<SuAL_H & Ind>=SuAL_L;//Indi***or in support range
Buytext_1 = "Indi***or in lower range";
lastdatetime = LastValue(DateTime());
if( LastValue(Buy_1)
AND lastdatetime > Nz(StaticVarGet( "AlertFlag1"+Name() ) ) )
{ StaticVarSet( "AlertFlag1"+Name(),Lastdatetime );
AlertIf(True AND AcousticSwitch,"SOUND C:\\Windows\\Media\\Ding.wav",Buytext_1,1,0,1);
AlertIf(True AND EmailSwitch,"EMAIL",Buytext_1,1,0,1);
}
//////////////////////////////////////////////////////////////
//Buy alert 2
Buy_2 = Cross(Ind,SuAL_H); //Indi***or breaks out of lower range
Buytext_2 = "Indi***or left lower range";
lastdatetime = LastValue(DateTime());
if( LastValue(Buy_2)
AND lastdatetime > Nz(StaticVarGet( "AlertFlag2"+Name() ) ) )
{ StaticVarSet( "AlertFlag2"+Name(),Lastdatetime );
AlertIf(True AND AcousticSwitch,"SOUND C:\\Windows\\Media\\Ding.wav",Buytext_2,1,0,1);
AlertIf(True AND EmailSwitch,"EMAIL",Buytext_2,1,0,1);
}
//////////////////////////////////////////////////////////////
//Sell alert 1
Sell_1 = Cross(ReAL_L,Ind);//Indi***or breaks out of upper range
Selltext_1 = "Indi***or left upper range";
lastdatetime = LastValue(DateTime());
if( LastValue(Sell_1)
AND lastdatetime > Nz(StaticVarGet( "AlertFlag3"+Name() ) ) )
{ StaticVarSet( "AlertFlag3"+Name(),Lastdatetime );
AlertIf(True AND AcousticSwitch,"SOUND C:\\Windows\\Media\\Ding.wav",Selltext_1,2,0,1);
AlertIf(True AND EmailSwitch,"EMAIL",Selltext_1,2,0,1);
}
//////////////////////////////////////////////////////////////
//Sell alert 2
Sell_2 = Ind>ReAL_L & Ind<=ReAL_H;//Indi***or in upper range
Selltext_2 = "Indi***or in upper range";
lastdatetime = LastValue(DateTime());
if( LastValue(Sell_2)
AND lastdatetime > Nz(StaticVarGet( "AlertFlag4"+Name() ) ) )
{ StaticVarSet( "AlertFlag4"+Name(),Lastdatetime );
AlertIf(True AND AcousticSwitch,"SOUND C:\\Windows\\Media\\Ding.wav",Selltext_2,2,0,1);
AlertIf(True AND EmailSwitch,"EMAIL",Selltext_2,2,0,1);
}
Buy = Buy_1 OR Buy_2;
Sell = Sell_1 OR Sell_2;
//////////////////////////////////////////////////////////////
Plot(Ind,"Indi***or",Indcolor,Indstyle);
Plot(SU,"Low-Level",SuColor,styleDashed);
Plot(RE,"High-Level",ReColor,styleDashed);
Shift = 10;
x=Cum(1); Lx = x >=LastValue(x)-Shift;
CV = IIf(Version()>=4.72,1,0);
Plot(IIf(Lx & CV,SuAL_L,-1e10),"",SuColor,styleNoRescale+styleNoLabel,0,0,S hift);
Plot(IIf(Lx & CV,SuAL_H,-1e10),"",SuColor,styleNoRescale,0,0,Shift);
Plot(IIf(Lx & CV,ReAL_L,-1e10),"",ReColor,styleNoRescale,0,0,Shift);
Plot(IIf(Lx & CV,ReAL_H,-1e10),"",ReColor,styleNoRescale+styleNoLabel,0,0,S hift);
Nd = IIf(Su==0&Re>0,1,IIf(Re==0&Su>0,2,IIf(Su==0 & Re==0,3,0)));
SetChartOptions(0,chartShowDates);
Title = "Tradingbasis.com - Alert 2" +
EncodeColor(Sucolor)+" Low level: " + WriteVal(SU,1.1)+
" (" + WriteVal(SuAL_L,1.1)+" to "+WriteVal(SuAL_H,1.1)+")"+
EncodeColor(Recolor)+" High level: " + WriteVal(RE,1.1)+
" (" + WriteVal(ReAL_L,1.1)+" to "+WriteVal(ReAL_H,1.1)+")\n"+
EncodeColor(colorBlue)+"Max. deviation = "+WriteVal(Offset,1.2)+" points"
+ " Activated alerts:"
+WriteIf(AcousticSwitch AND NOT Emailswitch," acoustic",
WriteIf(EmailSwitch AND NOT AcousticSwitch," email",
WriteIf(EmailSwitch AND AcousticSwitch," accoustic & email"," none")));
_SECTION_BEGIN("StochRSI");
SetChartOptions(0,0,chartGrid20|chartGrid80);
Periods = Param( "Periods", 10, 1, 50, 1 );
StochRSIstyle = ParamStyle("Style", styleLine );
StochRSI=(Sum(RSI(Periods)-LLV(RSI(Periods),Periods),3)/Sum(HHV(RSI(Periods),Periods)-LLV(RSI(Periods),Periods),3))*100;
StochRSIcolor = IIf( StochRSI > Ref(StochRSI,-1), ParamColor("Up Color", colorGreen ), ParamColor("Down Color", colorRed ));
Plot( StochRSI, _DEFAULT_NAME(), StochRSIcolor, StochRSIstyle );
_SECTION_END();
|
اما استراتجية وضع المؤشر كتالي نضغط على المؤشر كلك يمين وبعدها ضع نفس الخصائص
وهذه الصورة
البعض يشتكي من خطأ بالمعادلة
الإصدار الايمي بروكر الذي تجنب عملية المشكلة 4.90
فهو عندي وشغال معايا عدل والحمدلله
اعتذر عن التاخير بسبب دخولي القليل لعالم الانترنت
تقبلوا تحياتي اخوكم مازن
التعديل الأخير تم بواسطة : mazin_0 بتاريخ 22-08-2007 الساعة 05:56.
|
22-08-2007, 06:24
|
|
|
بارك الله فيك أخي مازن ويعطيك الف عافية
|
22-08-2007, 06:52
|
 |
.: مشرف بوابة عالم الرياضة :.
|
|
|
|
يــعــطــيــك الــعــافــيــه
|
تعليمات المشاركة
|
لا تستطيع كتابة مواضيع
لا تستطيع كتابة ردود
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك
كود HTML معطلة
|
|
|
الساعة الآن: 03:30
جميع المواضيع والمشاركات والتي يكتبها أحد أعضاء
الموقع تقع على مسؤولية كاتبها وتعبر عن رأيه الشخصي. ولاتعبٌر بأي حال عن رأي
الإدارة
| |
