logo





قديم 15-07-2007, 09:47 AM
  المشاركه #1
عضو هوامير المؤسس
تاريخ التسجيل: Aug 2005
المشاركات: 113
 

[php]
C1 = Ref(C, -1);
uc = C > C1; dc = C <= C1;
ud = C > O; dd = C <= O;

green = 1; blue = 2; yellow = 3; red = 4; white = 5;
VType = IIf(ud,
IIf(uc, green, yellow),
IIf(dd,
IIf(dc, red, blue), white));
/* green volume: up-day and up-close*/
gv = IIf(VType == green, V, 0);
/* yellow volume: up-day but down-close */
yv = IIf(VType == yellow, V, 0);
/* red volume: down-day and down-close */
rv = IIf(VType == red, V, 0);
/* blue volume: down-day but up-close */
bv = IIf(VType == blue, V, 0);
/* split up volume of up-close days from down-close days - (for the purposes of this volume display indi***or, up-days that closed down from the previous close are considered bearish volume days, and conversely, down-days that nevertheless closed up from the previous close are considered bullish volume days - my testing indi***es this is more accurate than using ordinary up-days and down-days) */
uv = gv + bv; uv1 = Ref(uv, -1); /* up volume */
dv = rv + yv; dv1 = Ref(dv, -1); /* down volume */
/* create moving average period parameters */
VolPer = Param("Adjust Vol. MA per.", 9, 9, 9, 9);
ConvPer = Param("Adjust Conv. MA per.", 1, 1, 1, 1);
/* create triple exponential moving avearges of separate up and down volume moving averages */
MAuv = WMA(uv, VolPer ); mauv1 = Ref(mauv, -1);
MAdv = WMA(dv, VolPer ); madv1 = Ref(madv, -1);
MAtv = WMA(V, VolPer );//total volume


/* Volume Segment Switches - toggle via parameter window */
bullvolume = Param("Show Bull Volume", 1, 1, 1, 1);
bearvolume = Param("Show Bear Volume", 1, 1, 1, 1);
totalvolume = Param("Show Total Volume", 0, 0, 0, 0);
/* plot volume lines and histograms if toggled on: */
slope9 = Param("slope9",3,3,3,3);
slope14= Param("slope14",5,5,5,5);
Color9= IIf(MA(MAuv , slope9 ) > Ref (MA(MAuv , slope9 ) , -1 ), colorBrightGreen, colorRed );
Plot( MA( MAuv , slope9 ), "",Color9 , 5);
colBull = IIf(MAuv > Ref( MAuv , -1 ), colorBrightGreen, colorRed );
Color14= IIf(MA(MA(MAuv , slope9 ),slope14) > Ref ((MA(MA(MAuv , slope9 ),slope14) ), -1 ), colorBrightGreen, colorRed );
Plot( MA(MA(MAuv , slope9 ),slope14) , "",Color14, 5);
/* buy & sell trading rules */
Buy = Cross( MAuv , MA(MAuv , slope9 ) );Sell = Cross( MA(MAuv , slope9 ) ,MAuv );Buy = Cross( MAuv , MA(MAuv , slope9 ) );
PlotShapes( IIf(Buy ,1 ,0) ,5 , 0, MAuv ,-30);Sell = Cross( MA(MAuv , slope9 ) ,MAuv );
PlotShapes( IIf(Sell ,2 ,0) ,4 , 0, MAuv ,-30);

Plot(MAuv, "Average Bull Volume", colBull , 5);





/* Rise/Fall Convergence variables: */
Converge = MAuv;
Converge1 = Ref(Converge, -0);
ConvergeUp = MA( MAuv , slope9 )< MA(MA(MAuv , slope9 ),slope14) ;
ConvergeOver = Converge > 0;
rising = ConvergeUp AND ConvergeOver ;
falling = !ConvergeUp AND ConvergeOver ;




/********************************************************
Convergence Rise/Fall Shadows:
(provides a more easily visible display of rising and falling bull/bear volume convergence) - toggle via parameter window
-posiitive Volume exceeding negative Volume: Light shadow
-negative volume exceeding positive volume: dark shadow
-if you use standard gray background - best shadows are:
-my greys: 14 = (216, 216, 216); 15 = (168, 168, 168));
-best substitute? using AB color constants?
-light: colorpalegreen; dark: colorRose;?
-(depends on your color scheme - customize to your tastes)
**********************************************************/

/* uncomment if you use my custom color greys: */
riseFallColor = IIf(rising, colorBrown ,colorBrown ); //my custom shadow greys
/* comment out if you use my custom color gray shadows: */
/* riseFallColor = IIf(rising, colorPaleGreen,colorRose); */
/* Rise/Fall Convergence Plot Switch - toggle via parameter window */
riseFallShadows = Param("Show RiseFallShadows", 1, 1, 4, 5);
if(riseFallShadows){
Plot(IIf(falling , 2,4), "", riseFallColor, 1 |styleArea |styleLeftAxisScale |1);
}

/* Rise/Fall Convergence variables: */
Converge = MAuv;
Converge1 = Ref(Converge, -0);
ConvergeUp = MA( MAuv , slope9 )< MA(MA(MAuv , slope9 ),slope14) ;
ConvergeOver = Converge > 0;
falling2= ConvergeUp AND ConvergeOver ;
rising2 = !ConvergeUp AND ConvergeOver ;




/********************************************************
Convergence Rise/Fall Shadows:
(provides a more easily visible display of rising and falling bull/bear volume convergence) - toggle via parameter window
-posiitive Volume exceeding negative Volume: Light shadow
-negative volume exceeding positive volume: dark shadow
-if you use standard gray background - best shadows are:
-my greys: 14 = (216, 216, 216); 15 = (168, 168, 168));
-best substitute? using AB color constants?
-light: colorpalegreen; dark: colorRose;?
-(depends on your color scheme - customize to your tastes)
**********************************************************/

/* uncomment if you use my custom color greys: */
riseFallColor = IIf(rising2 , 18 ,19 ); //my custom shadow greys
/* comment out if you use my custom color gray shadows: */
/* riseFallColor = IIf(rising, colorPaleGreen,colorRose); */
/* Rise/Fall Convergence Plot Switch - toggle via parameter window */
riseFallShadows = Param("Show RiseFallShadows", 1, 1, 4, 5);
if(riseFallShadows){
Plot(IIf(falling2, 2,4), "", riseFallColor, 1 |styleArea |styleLeftAxisScale |1);
}
[/php]

الموضوع الأصلي : اضغط هنا    ||   المصدر : منتدى هوامير البورصة السعودية

 
 
قديم 15-07-2007, 09:50 AM
  المشاركه #2
عضو هوامير المؤسس
تاريخ التسجيل: Aug 2005
المشاركات: 113
 

[/IMG]



قديم 15-07-2007, 10:21 AM
  المشاركه #3
عضو هوامير المؤسس
تاريخ التسجيل: Aug 2005
المشاركات: 1,815
 

لك الشكر الجزيل.........



قديم 15-07-2007, 10:59 AM
  المشاركه #4
محللة هوامير "رحمها الله"
تاريخ التسجيل: Aug 2005
المشاركات: 1,848
 

ماشاء الله تبارك الله
انا معجبة بمؤشراتك والوانها
اتمنى تسجلها في مكتبة الايمي بروكر

دمت بحفظ الله




قديم 15-07-2007, 11:07 AM
  المشاركه #5
عضو قدير
تاريخ التسجيل: Apr 2005
المشاركات: 7,158
 

باااااااارك الله فيك ,,,..,..,.

لك الشكر الجزيل.........




قديم 15-07-2007, 11:30 AM
  المشاركه #6
عضو هوامير المؤسس
تاريخ التسجيل: Aug 2005
المشاركات: 113
 

اقتباس:
المشاركة الأصلية كتبت بواسطة ام عزام
ماشاء الله تبارك الله
انا معجبة بمؤشراتك والوانها
اتمنى تسجلها في مكتبة الايمي بروكر

دمت بحفظ الله
جزاك الله كل خير
بالنسبة للمؤشرات انا اقوم بتعديلات على مؤشرات موجودة في المكتبة




قديم 15-07-2007, 12:43 PM
  المشاركه #7
محللة هوامير "رحمها الله"
تاريخ التسجيل: Aug 2005
المشاركات: 1,848
 

اقتباس:
المشاركة الأصلية كتبت بواسطة abosliman2005m
جزاك الله كل خير
بالنسبة للمؤشرات انا اقوم بتعديلات على مؤشرات موجودة في المكتبة
هلا فيك

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

وهذا ابداع - تحتاجه المكتبة

وبعض المؤشرات مسجل عليها - انها تطوير لمؤشر كذا ( وهو موجود في المكتبة اصلا )

وفقنا الله واياك الى مايحبه ويرضاه




قديم 16-07-2007, 08:37 AM
  المشاركه #8
سباق للخير
تاريخ التسجيل: Aug 2006
المشاركات: 7,691
 

جزاك الله كل خير يالغالي.



قديم 17-07-2007, 02:25 AM
  المشاركه #9
عضو هوامير المميز
تاريخ التسجيل: Mar 2007
المشاركات: 44
 

بصراحة بدون تعليق كفيت ووفيت
ياخي وينك من زمان
وسؤالي اقد اغير الكود باي طريقة كانت واضيفة للميتا ستوك




قديم 17-07-2007, 03:40 AM
  المشاركه #10
عضو هوامير المميز
تاريخ التسجيل: Jul 2006
المشاركات: 90
 

جزاك الله كل خير



قديم 22-07-2007, 06:33 AM
  المشاركه #11
عضو هوامير المميز
تاريخ التسجيل: Jul 2006
المشاركات: 808
 

جزاك الله خيرا ابا سليمان.....وعندي سؤال لك......كيف السبيل الى معرفة لغة المؤشرات......هل عندك مرجع باللغة العربية......جزاك الله خيرا



قديم 23-07-2007, 11:14 PM
  المشاركه #12
كاتب مميز
تاريخ التسجيل: Jun 2005
المشاركات: 3,421
 

ابو سليمان راااااااااااااااااااااااااااااائع انت فعلاً
مشكور اخي







الكلمات الدلالية (Tags)

متوسط

,

الشراء

,

كمية


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

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

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

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



02:50 PM