لتبليغ الإدارة عن موضوع أو رد مخالف يرجى الضغط على هذه الأيقونة الموجودة على يمين المشاركة لتطبيق قوانين المنتدى


سجل من هنا
العودة   هوامير البورصة السعودية > >
التسجيل اضف الموقع لمفضلتك بحث جوجل فوركس هوامير التقويم البحث مشاركات اليوم اجعل كافة الأقسام مقروءة
 

تكفون ابي معادلة ل الايمي بروكر

منتدى التحليل الفني والاساسي



إضافة رد
 
أدوات الموضوع انواع عرض الموضوع
قديم 02-05-2014, 11:37 PM  
#13
!مشعل!
عضو هوامير المميز
 
تاريخ التسجيل: May 2011
المشاركات: 2,110

رد: تكفون ابي معادلة ل الايمي بروكر

اقتباس:
المشاركة الأصلية كتبت بواسطة & كبرياء رجل & مشاهدة المشاركة
المعادلة فيها خطاء الرجاء رفعها من جديد رفع الله درجه المجتهد لإخوانه المسلمين
المعادله شغاله تمام 100% أخوي كبرياء ,
شنو الخطأ أو صوره للخطأ إن أمكن ..

المعادله للنسخ :
كود:
SetChartOptions(0, chartShowArrows | chartShowDates);
SetChartBkColor(ParamColor("Outer Panel", colorBlack));
SetChartBkGradientFill(ParamColor("Upper Chart", colorDarkGrey), ParamColor("Lower Chart", colorDarkGrey));
GraphXSpace = Param("GraphXSpace", 10, 0, 100, 1);
 
colorHighliter = IIf(C >= O, ColorRGB(0, 128, 0), ColorRGB(128, 0, 0));
 
//Demand Point
colorDemandPoint = ParamColor("Demand Line", ColorRGB(0, 128, 255));
DemandPoint = (Ref(L, -1) < Ref(L, -2)) & (L < Ref(L, -1)) & (L < Ref(L, 1)) & (Ref(L, 1) < Ref(L, 2));
 
//Supply Point
colorSupplyPoint = ParamColor("Supply Line", ColorRGB(255, 128, 0));
SupplyPoint = (Ref(H, -1) > Ref(H, -2)) & (H > Ref(H, -1)) & (H > Ref(H, 1)) & (Ref(H, 1) > Ref(H, 2));
 
CountTrendBars = 0;
CurrentBar = BarCount - 1;
dx0 = dx1 = dy0 = dy1 = 0;
sx0 = sx1 = sy0 = sy1 = 0;
for (i = 0; i < BarCount; i++) {
    CurrentBar = (BarCount - 1) - i;
    if (DemandPoint[CurrentBar]) {
        if (dx1 == 0 & dy1 == 0) {
            dx1 = CurrentBar;
            dy1 = L[CurrentBar];
        } else {
            dx0 = CurrentBar;
            dy0 = L[CurrentBar];
        }
        if (dx0 != 0 & dx1 != 0 & dy0 != 0 & dy1 != 0) {
            if (dy0 < dy1) {
                a = (-dy0 + dy1) / (-dx0 + dx1);
                b = dy0 - dx0 * a;
                for (j = dx1; j < BarCount; j++) {
                    if (j != dx1) {
                        y2 = a * j + b;
                        if (C[j] < y2) {
                            dy1 = y2;
                            dx1 = j;
                            colorHighliter[j] = ColorRGB(128, 0, 128);
                            CountTrendBars[j] = dx1 - dx0 - 1;
                            break;
                        }
                    }
                }
                if (dy1 != y2) {
                    dy1 = y2;
                    dx1 = BarCount - 1;
                }
                Plot(LineArray(dx0, dy0, dx1, dy1, 0), "", colorDemandPoint, styleLine, Null, Null, 0, 0, 2);
            }
            dx1 = dx0;
            dy1 = dy0;
            dx0 = dy0 = 0;
        }   
    }
    if (SupplyPoint[CurrentBar]) {
        if (sx1 == 0 & sy1 == 0) {
            sx1 = CurrentBar;
            sy1 = H[CurrentBar];
        } else {
            sx0 = CurrentBar;
            sy0 = H[CurrentBar];
        }
        if (sx0 != 0 & sx1 != 0 & sy0 != 0 & sy1 != 0) {
            if (sy0 > sy1) {
                a = (-sy0 + sy1) / (-sx0 + sx1);
                b = sy0 - sx0 * a;
                for (j = sx1; j < BarCount; j++) {
                    if (j != sx1) {
                        y2 = a * j + b;
                        if (C[j] > y2) {
                            sy1 = y2;
                            sx1 = j;
                            colorHighliter[j] = ColorRGB(128, 128, 0);
                            CountTrendBars[j] = sx1 - sx0 - 1;
                            break;
                        }
                    }
                }
                if (sy1 != y2) {
                    sy1 = y2;
                    sx1 = BarCount - 1;
                }
                Plot(LineArray(sx0, sy0, sx1, sy1, 0), "", colorSupplyPoint, styleLine, Null, Null, 0, 0, 2);
            }
            sx1 = sx0;
            sy1 = sy0;
            sx0 = sy0 = 0;
        }   
    }   
}
 
//Stop Loss & Targets
for (i = 0; i < BarCount; i++) {
    CurrentBar = (BarCount - 1) - i;
    if (colorHighliter[CurrentBar] == ColorRGB(128, 0, 128)) {
        StopLoss = 0;
        for (j = CurrentBar - CountTrendBars[CurrentBar]; j <= CurrentBar; j++) {
            StopLoss = Max(H[j], StopLoss);
        }
        if (CurrentBar - (BarCount - 1) != 0) {
            t1 = C[CurrentBar] - (StopLoss - C[CurrentBar]);
            t2 = C[CurrentBar] - ((StopLoss - C[CurrentBar]) * 1.272);
            t3 = C[CurrentBar] - ((StopLoss - C[CurrentBar]) * 1.618);
            Plot(LineArray(CurrentBar, StopLoss + 0.01, BarCount - 1, StopLoss + 0.01, 0), "", ColorRGB(255, 0, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, C[CurrentBar], BarCount - 1, C[CurrentBar], 0), "", ColorRGB(255, 255, 0), styleDots, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, t1, BarCount - 1, t1, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, t2, BarCount - 1, t2, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, t3, BarCount - 1, t3, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            PlotText("Stop Loss\n@" + WriteVal(StopLoss + 0.01, 1.2), BarCount, StopLoss + 0.01, ColorRGB(255, 255, 255));
            PlotText("T1 @" + WriteVal(t1, 1.2), BarCount, t1, ColorRGB(255, 255, 255));
            PlotText("T2 @" + WriteVal(t2, 1.2), BarCount, t2, ColorRGB(255, 255, 255));
            PlotText("T3 @" + WriteVal(t3, 1.2), BarCount, t3, ColorRGB(255, 255, 255));
        }
        break;
    }
    if (colorHighliter[CurrentBar] == ColorRGB(128, 128, 0)) {
        StopLoss = 9999;
        for (j = CurrentBar - CountTrendBars[CurrentBar]; j <= CurrentBar; j++) {
            StopLoss = Min(L[j], StopLoss);
        }
        if (CurrentBar - (BarCount - 1) != 0) {
            t1 = C[CurrentBar] + (C[CurrentBar] - StopLoss);
            t2 = C[CurrentBar] + ((C[CurrentBar] - StopLoss) * 1.272);
            t3 = C[CurrentBar] + ((C[CurrentBar] - StopLoss) * 1.618);
            Plot(LineArray(CurrentBar, StopLoss - 0.01, BarCount - 1, StopLoss - 0.01, 0), "", ColorRGB(255, 0, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, C[CurrentBar], BarCount - 1, C[CurrentBar], 0), "", ColorRGB(255, 255, 0), styleDots, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, t1, BarCount - 1, t1, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, t2, BarCount - 1, t2, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            Plot(LineArray(CurrentBar, t3, BarCount - 1, t3, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 0, 1);
            PlotText("Stop Loss\n@" + WriteVal(StopLoss - 0.01, 1.2), BarCount, StopLoss - 0.01, ColorRGB(255, 255, 255));
            PlotText("T1 @" + WriteVal(t1, 1.2), BarCount, t1, ColorRGB(255, 255, 255));
            PlotText("T2 @" + WriteVal(t2, 1.2), BarCount, t2, ColorRGB(255, 255, 255));
            PlotText("T3 @" + WriteVal(t3, 1.2), BarCount, t3, ColorRGB(255, 255, 255));
        }       
        break;
    }
}
 
//Price
SetBarFillColor(colorHighliter);
Plot(C, "Close", IIf(colorHighliter == ColorRGB(128, 0, 128), ColorRGB(255, 0, 255), IIf(colorHighliter == ColorRGB(128, 128, 0), ColorRGB(255, 255, 0), IIf(C > O, ColorRGB(0, 255, 0), IIf(C < O, ColorRGB(255, 0, 0), ColorRGB(255, 255, 255))))), styleCandle, Null, Null, 0, 0, 1);
 
//Volume
/*colorVolume = ParamColor("Volume Area", ColorRGB(0, 0, 0));
Plot(Volume, "", colorVolume, styleArea | styleOwnScale | styleNoLabel, Null, Null, 0, 0, 1);*/
 
Title = Name() + " - {{INTERVAL}} - {{DATE}} - Open = " + NumToStr(O, 1.2) + ", High = " + NumToStr(H, 1.2) + ", Low = " + NumToStr(L, 1.2) + ", Close = " + NumToStr(C, 1.2) + " (" + WriteVal(ROC(C, 1), 1.2) + "%)"; /*, Volume = " + WriteVal(Volume, 1.2);*/

موفق
!مشعل! غير متواجد حالياً   رد مع اقتباس
قديم 03-05-2014, 01:08 AM   #14
Stock112
عضو هوامير المميز
 
تاريخ التسجيل: Jul 2006
المشاركات: 52

رد: تكفون ابي معادلة ل الايمي بروكر

المعادلة بعد التعديل في ملف txt

http://upload.hawamer.com/d.php?hash...GY3RZH4I856C1S
Stock112 غير متواجد حالياً   رد مع اقتباس
قديم 03-05-2014, 04:11 AM   #15
!مشعل!
عضو هوامير المميز
 
تاريخ التسجيل: May 2011
المشاركات: 2,110

رد: تكفون ابي معادلة ل الايمي بروكر

اقتباس:
المشاركة الأصلية كتبت بواسطة Stock112 مشاهدة المشاركة
المعادلة بعد التعديل في ملف txt

http://upload.hawamer.com/d.php?hash...GY3RZH4I856C1S
شكراً لك , لكن وش كان الخلل ؟ لانها شغاله معي
!مشعل! غير متواجد حالياً   رد مع اقتباس
قديم 03-05-2014, 03:34 PM   #16
& كبرياء رجل &
عضو هوامير المميز
 
تاريخ التسجيل: Oct 2007
العمر: 33
المشاركات: 189

رد: تكفون ابي معادلة ل الايمي بروكر

اقتباس:
المشاركة الأصلية كتبت بواسطة !مشعل! مشاهدة المشاركة


شكراً لك , لكن وش كان الخلل ؟ لانها شغاله معي
ياإخوان تم حل مشكله الخطاء فى المعادلة والخلل كان فى بعض نسخ الايمى بروكر
إسم المعادلة Trend Line Breakout وهذه المعادلة بعد تصحيحها


SetChartOptions(0, chartShowArrows | chartShowDates);
SetChartBkColor(ParamColor("Outer Panel", colorBlack));
SetChartBkGradientFill(ParamColor("Upper Chart", colorDarkGrey), ParamColor("Lower Chart", colorDarkGrey));
GraphXSpace = Param("GraphXSpace", 10, 0, 100, 1);

colorHighliter = IIf(C >= O, ColorRGB(0, 128, 0), ColorRGB(128, 0, 0));

//Demand Point
colorDemandPoint = ParamColor("Demand Line", ColorRGB(0, 128, 255));
DemandPoint = (Ref(L, -1) < Ref(L, -2)) & (L < Ref(L, -1)) & (L < Ref(L, 1)) & (Ref(L, 1) < Ref(L, 2));

//Supply Point
colorSupplyPoint = ParamColor("Supply Line", ColorRGB(255, 128, 0));
SupplyPoint = (Ref(H, -1) > Ref(H, -2)) & (H > Ref(H, -1)) & (H > Ref(H, 1)) & (Ref(H, 1) > Ref(H, 2));

CountTrendBars = 0;
CurrentBar = BarCount - 1;
dx0 = dx1 = dy0 = dy1 = 0;
sx0 = sx1 = sy0 = sy1 = 0;
for (i = 0; i < BarCount; i++) {
CurrentBar = (BarCount - 1) - i;
if (DemandPoint[CurrentBar]) {
if (dx1 == 0 & dy1 == 0) {
dx1 = CurrentBar;
dy1 = L[CurrentBar];
} else {
dx0 = CurrentBar;
dy0 = L[CurrentBar];
}
if (dx0 != 0 & dx1 != 0 & dy0 != 0 & dy1 != 0) {
if (dy0 < dy1) {
a = (-dy0 + dy1) / (-dx0 + dx1);
b = dy0 - dx0 * a;
for (j = dx1; j < BarCount; j++) {
if (j != dx1) {
y2 = a * j + b;
if (C[j] < y2) {
dy1 = y2;
dx1 = j;
colorHighliter[j] = ColorRGB(128, 0, 128);
CountTrendBars[j] = dx1 - dx0 - 1;
break;
}
}
}
if (dy1 != y2) {
dy1 = y2;
dx1 = BarCount - 1;
}
Plot(LineArray(dx0, dy0, dx1, dy1, 0), "", colorDemandPoint, styleLine, Null, Null, 0, 02);
}
dx1 = dx0;
dy1 = dy0;
dx0 = dy0 = 0;
}
}
if (SupplyPoint[CurrentBar]) {
if (sx1 == 0 & sy1 == 0) {
sx1 = CurrentBar;
sy1 = H[CurrentBar];
} else {
sx0 = CurrentBar;
sy0 = H[CurrentBar];
}
if (sx0 != 0 & sx1 != 0 & sy0 != 0 & sy1 != 0) {
if (sy0 > sy1) {
a = (-sy0 + sy1) / (-sx0 + sx1);
b = sy0 - sx0 * a;
for (j = sx1; j < BarCount; j++) {
if (j != sx1) {
y2 = a * j + b;
if (C[j] > y2) {
sy1 = y2;
sx1 = j;
colorHighliter[j] = ColorRGB(128, 128, 0);
CountTrendBars[j] = sx1 - sx0 - 1;
break;
}
}
}
if (sy1 != y2) {
sy1 = y2;
sx1 = BarCount - 1;
}
Plot(LineArray(sx0, sy0, sx1, sy1, 0), "", colorSupplyPoint, styleLine, Null, Null, 0, 02);
}
sx1 = sx0;
sy1 = sy0;
sx0 = sy0 = 0;
}
}
}

//Stop Loss & Targets
for (i = 0; i < BarCount; i++) {
CurrentBar = (BarCount - 1) - i;
if (colorHighliter[CurrentBar] == ColorRGB(128, 0, 128)) {
StopLoss = 0;
for (j = CurrentBar - CountTrendBars[CurrentBar]; j <= CurrentBar; j++) {
StopLoss = Max(H[j], StopLoss);
}
if (CurrentBar - (BarCount - 1) != 0) {
t1 = C[CurrentBar] - (StopLoss - C[CurrentBar]);
t2 = C[CurrentBar] - ((StopLoss - C[CurrentBar]) * 1.272);
t3 = C[CurrentBar] - ((StopLoss - C[CurrentBar]) * 1.618);
Plot(LineArray(CurrentBar, StopLoss + 0.01, BarCount - 1, StopLoss + 0.01, 0), "", ColorRGB(255, 0, 0), styleDots | styleNoLabel, Null, Null,0, 1);
Plot(LineArray(CurrentBar, C[CurrentBar], BarCount - 1, C[CurrentBar], 0), "", ColorRGB(255, 255, 0), styleDots, Null, Null,0, 1);
Plot(LineArray(CurrentBar, t1, BarCount - 1, t1, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null,0, 1);
Plot(LineArray(CurrentBar, t2, BarCount - 1, t2, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 1);
Plot(LineArray(CurrentBar, t3, BarCount - 1, t3, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null,0, 1);
PlotText("Stop Loss\n@" + WriteVal(StopLoss + 0.01, 1.2), BarCount, StopLoss + 0.01, ColorRGB(255, 255, 255));
PlotText("T1 @" + WriteVal(t1, 1.2), BarCount, t1, ColorRGB(255, 255, 255));
PlotText("T2 @" + WriteVal(t2, 1.2), BarCount, t2, ColorRGB(255, 255, 255));
PlotText("T3 @" + WriteVal(t3, 1.2), BarCount, t3, ColorRGB(255, 255, 255));
}
break;
}
if (colorHighliter[CurrentBar] == ColorRGB(128, 128, 0)) {
StopLoss = 9999;
for (j = CurrentBar - CountTrendBars[CurrentBar]; j <= CurrentBar; j++) {
StopLoss = Min(L[j], StopLoss);
}
if (CurrentBar - (BarCount - 1) != 0) {
t1 = C[CurrentBar] + (C[CurrentBar] - StopLoss);
t2 = C[CurrentBar] + ((C[CurrentBar] - StopLoss) * 1.272);
t3 = C[CurrentBar] + ((C[CurrentBar] - StopLoss) * 1.618);
Plot(LineArray(CurrentBar, StopLoss - 0.01, BarCount - 1, StopLoss - 0.01, 0), "", ColorRGB(255, 0, 0), styleDots | styleNoLabel, Null, Null, 0, 01);
Plot(LineArray(CurrentBar, C[CurrentBar], BarCount - 1, C[CurrentBar], 0), "", ColorRGB(255, 255, 0), styleDots, Null, Null, 0, 01);
Plot(LineArray(CurrentBar, t1, BarCount - 1, t1, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 01);
Plot(LineArray(CurrentBar, t2, BarCount - 1, t2, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 01);
Plot(LineArray(CurrentBar, t3, BarCount - 1, t3, 0), "", ColorRGB(0, 255, 0), styleDots | styleNoLabel, Null, Null, 0, 01);
PlotText("Stop Loss\n@" + WriteVal(StopLoss - 0.01, 1.2), BarCount, StopLoss - 0.01, ColorRGB(255, 255, 255));
PlotText("T1 @" + WriteVal(t1, 1.2), BarCount, t1, ColorRGB(255, 255, 255));
PlotText("T2 @" + WriteVal(t2, 1.2), BarCount, t2, ColorRGB(255, 255, 255));
PlotText("T3 @" + WriteVal(t3, 1.2), BarCount, t3, ColorRGB(255, 255, 255));
}
break;
}
}

//Price
SetBarFillColor(colorHighliter);
Plot(C, "Close", IIf(colorHighliter == ColorRGB(128, 0, 128), ColorRGB(255, 0, 255), IIf(colorHighliter == ColorRGB(128, 128, 0), ColorRGB(255, 255, 0), IIf(C > O, ColorRGB(0, 255, 0), IIf(C < O, ColorRGB(255, 0, 0), ColorRGB(255, 255, 255))))), styleCandle, Null, Null, 0, 01);

//Volume
/*colorVolume = ParamColor("Volume Area", ColorRGB(0, 0, 0));
Plot(Volume, "", colorVolume, styleArea | styleOwnScale | styleNoLabel, Null, Null, 0, 0, 1);*/

Title = Name() + " - {{INTERVAL}} - {{DATE}} - Open = " + NumToStr(O, 1.2) + ", High = " + NumToStr(H, 1.2) + ", Low = " + NumToStr(L, 1.2) + ", Close = " + NumToStr(C, 1.2) + " (" + WriteVal(ROC(C, 1), 1.2) + "%)"; /*, Volume = " + WriteVal(Volume, 1.2);*/
& كبرياء رجل & غير متواجد حالياً   رد مع اقتباس
قديم 05-05-2014, 10:29 AM   #17
AL_BADR
عضو هوامير المميز
 
تاريخ التسجيل: Apr 2005
العمر: 52
المشاركات: 1,207

رد: تكفون ابي معادلة ل الايمي بروكر

بارك الله فيك
AL_BADR غير متواجد حالياً   رد مع اقتباس
إضافة رد



مواقع النشر (المفضلة)

أدوات الموضوع
انواع عرض الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع




08:43 PM


الاعلان بمنتدى هوامير البورصة
تشغيل وتطوير افاق الإقتصاد
Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
جميع المواضيع و الردود المطروحة لا تعبر عن رأي المنتدى بل تعبر عن رأي كاتبها وقرار البيع والشراء مسؤليتك وحدك

بناء على نظام السوق المالية بالمرسوم الملكي م/30 وتاريخ 2/6/1424هـ ولوائحه التنفيذية الصادرة من مجلس هيئة السوق المالية: تعلن الهيئة للعموم بانه لا يجوز جمع الاموال بهدف استثمارها في اي من اعمال الاوراق المالية بما في ذلك ادارة محافظ الاستثمار او الترويج لاوراق مالية كالاسهم او الاستتشارات المالية او اصدار التوصيات المتعلقة بسوق المال أو بالاوراق المالية إلا بعد الحصول على ترخيص من هيئة السوق المالية.