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

16-12-2009, 07:34 AM

المشاركه #1

M O L Y

خبيرة الويلث لاب

تاريخ التسجيل: May 2009

المشاركات: 850

Special Weekly

السلام عليكم ورحمة الله وبركاته

اسم المؤشر Special K(Weekly
على الاسبوعي

طبعا الشارت بتاريخ 15-11-2009
كنت منزلته من فترة

الكود

var k, Bar: integer;
var sKw: integer = CreateSeries();
SetDescription( sKw, 'Special K(Weekly)' );

// Weekly constants
var wA: array[1..12] of integer = [4, 5, 6, 8, 10, 13, 15, 20, 39, 52, 78, 104];
var wB: array[1..12] of integer = [4, 5, 6, 6, 10, 13, 15, 20, 26, 26, 26, 39];
var wC: array[1..12] of integer = [1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4];

for Bar := 104 to BarCount-1 do
begin
for k := 1 to 12 do
begin
sKw[bar] := sKw[bar] + EMA( bar, ROCSeries(#Close, wA[k]), wB[k] ) * wC[k];
end;
end;
SetColorScheme( #GREEN, #RED, #Olive, #black, #Gray, #Silver );
var kwPane: integer = CreatePane( 100, false, true );
PlotSeriesLabel( sKw, kwPane, #yellow, #Solid, 'Special K(Weekly)' );

{ by Mr.Pring's demand on 10/16/2008 }
PlotSeriesLabel( EMASeries( #Close,65 ), 0, #white, #Dotted, '65-week EMA' );
PlotSeriesLabel( SMASeries( SMASeries( sKw,26 ),52 ), kwPane, 6654, #Dotted, '52/26-week Double SMA' );
HideVolume();
SetLogScale( 0, true );
HidePaneLines;
UseUpdatedEMA( true );

{$I 'KSTMulti'}
var KSTLong: integer = KSTMultiSeries( #Close, 39, 26, 52, 26, 78, 26, 104, 39 );
var KSTLongPane: integer = CreatePane( 100, false, true );
SetPaneMinMax( KSTLongPane, -100, 100 );
DrawHorzLine( 0, KSTLongPane, 6798, #Thin );
var KSTLongEMA: integer = EMASeries( KSTLong, 26 );
PlotSeriesLabel( KSTLongEMA, KSTLongPane, 6654, #Dotted, '26-week EMA' );
PlotSeriesLabel( KSTLong, KSTLongPane, #yellow, #Thin, 'Long Term KST' );

ننتظر تجاربكم وارائكم واي اضافات يمكن نضيفها

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


إعلانات

16-12-2009, 07:39 AM

المشاركه #2

B O R S A

عضو هوامير المؤسس

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

المشاركات: 270

بارك الله في جهودك

كم انتي رائعه

16-12-2009, 07:40 AM

المشاركه #3

M O L Y

خبيرة الويلث لاب

تاريخ التسجيل: May 2009

المشاركات: 850

عملت تعديل بسيط وهو اضافة متوسطي الخاص مع ال CCI عن طريق الوان الشموع

الكود

var k, Bar: integer;
var sKw: integer = CreateSeries();
SetDescription( sKw, 'Special K(Weekly)' );
// Weekly constants
var wA: array[1..12] of integer = [4, 5, 6, 8, 10, 13, 15, 20, 39, 52, 78, 104];
var wB: array[1..12] of integer = [4, 5, 6, 6, 10, 13, 15, 20, 26, 26, 26, 39];
var wC: array[1..12] of integer = [1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4];
for Bar := 104 to BarCount-1 do
begin
for k := 1 to 12 do
begin
sKw[bar] := sKw[bar] + EMA( bar, ROCSeries(#Close, wA[k]), wB[k] ) * wC[k];
end;
end;
SetColorScheme( #GREEN, #RED, #Olive, #black, #Gray, #Silver );
var kwPane: integer = CreatePane( 100, false, true );
PlotSeriesLabel( sKw, kwPane, #yellow, #Solid, 'Special K(Weekly)' );
{ by Mr.Pring's demand on 10/16/2008 }
PlotSeriesLabel( EMASeries( #Close,65 ), 0, #white, #Dotted, '65-week EMA' );
PlotSeriesLabel( SMASeries( SMASeries( sKw,26 ),52 ), kwPane, 6654, #Dotted, '52/26-week Double SMA' );
HideVolume();
SetLogScale( 0, true );
HidePaneLines;
UseUpdatedEMA( true );

for Bar := 14 to BarCount - 1 do
begin
if CCI( Bar, 14 ) > 100 then
SetBarColor( Bar, #GREEN )
else if CCI( Bar,14 ) < -100 then
SetBarColor( Bar, #RED );
end;
{#OptVar1 59;5;100;1}
{#OptVar2 3;1;3;1}
{#OptVar3 1;1;2;1}
//59, 3, 1
{$I 'KSTMulti'}
var KSTLong: integer = KSTMultiSeries( #Close, 39, 26, 52, 26, 78, 26, 104, 39 );
var KSTLongPane: integer = CreatePane( 100, false, true );
SetPaneMinMax( KSTLongPane, -100, 100 );
DrawHorzLine( 0, KSTLongPane, 6798, #Thin );
var KSTLongEMA: integer = EMASeries( KSTLong, 26 );
PlotSeriesLabel( KSTLongEMA, KSTLongPane, 6654, #Dotted, '26-week EMA' );
PlotSeriesLabel( KSTLong, KSTLongPane, #yellow, #Thin, 'Long Term KST' );
{ Plot 52 week moving average on the daily chart }
var WSMA, WSMAP: integer;
SetScaleWeekly;
wsma := SMASeries( #Close, 52 );
RestorePrimarySeries;
wsmap := DailyFromWeekly( wsma );
PlotSeries( wsmap, 0, 2534, #Thick );
{ Draw the result of our commentary to the volume pane }
var COMMENTARYSTRING: string;
CommentaryString := ' DESIGNING BY M O L Y ^_^';
DrawText( CommentaryString, 0 , 200, 4, 5643,15 );

16-12-2009, 07:41 AM

المشاركه #4

حمودي2005

أبو ريـــم

تاريخ التسجيل: Mar 2007

المشاركات: 5,018

جزاك الله خير يا خبيرتنا الغاليه ..

ولا حرمك الله الاجر ان شاء الله .. لما تقدميه من خدمات لاخوانك ..

تلميذك .. حمودي

16-12-2009, 07:42 AM

المشاركه #5

M O L Y

خبيرة الويلث لاب

تاريخ التسجيل: May 2009

المشاركات: 850

تجديد للشارت بس بتاريخ 13-12-2009 وواضح بعد كسر الدعم 6254 الي محدد خسرنا 328 نقطة اصبح المتوسط مقاومة مهمة وهي على مستويات 6247

16-12-2009, 07:46 AM

المشاركه #6

M O L Y

خبيرة الويلث لاب

تاريخ التسجيل: May 2009

المشاركات: 850

اقتباس:

المشاركة الأصلية كتبت بواسطة B O R S A

بارك الله في جهودك

كم انتي رائعه

16-12-2009, 07:47 AM

المشاركه #7

M O L Y

خبيرة الويلث لاب

تاريخ التسجيل: May 2009

المشاركات: 850

اقتباس:

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

جزاك الله خير يا خبيرتنا الغاليه ..

ولا حرمك الله الاجر ان شاء الله .. لما تقدميه من خدمات لاخوانك ..

تلميذك .. حمودي

واياك يارب اخوي ابو ريم
الف شكر على مرورك الكريم

16-12-2009, 02:27 PM

المشاركه #8

ss88ss

عضو هوامير المؤسس

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

المشاركات: 1,675

الاخت مولي جزاك الله خير في ما تقدمينه لاخوانك في هذا المنتدى ...

هل فيه امكانية عمله على الايمي ؟

16-12-2009, 04:11 PM

المشاركه #9

راجي الهدى

سباق للخير

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

المشاركات: 7,691

ماشاء الله تبارك الله أم معاذ إبداع الله يرفع قدرك يارب

ويبارك لك في جهودك ويجعلها في ميزان حسناتك .

17-12-2009, 03:49 AM

المشاركه #10

ابونايف$

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

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

المشاركات: 6,646

بارك الله فيك

17-12-2009, 01:59 PM

المشاركه #11

$الموسيقار$

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

تاريخ التسجيل: Jul 2008

المشاركات: 3,652

بارك الله فيك ياختي الكريمة مولي
مبدعة دوماً الله يوفقك ويسعدك

17-12-2009, 05:59 PM

المشاركه #12

M O L Y

خبيرة الويلث لاب

تاريخ التسجيل: May 2009

المشاركات: 850

اقتباس:

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

الاخت مولي جزاك الله خير في ما تقدمينه لاخوانك في هذا المنتدى ...

هل فيه امكانية عمله على الايمي ؟

واياك يارب والف شكر على مرورك الكريم
بالنسبة للايمي اتمنى خبراء الايمي يفيدونك ماعندي بصراحة اي فكرة عن معادلات الايمي

صفحة 1 من 2

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

special, weekly

« [ويبينار] رحلة الإستثمار مع خبراء الأسواق العالمية | الدورة التدريبية " إحترافية التحليل الفني فى البورصة السعودية " »

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

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

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

اجعل كافة الأقسام مقروءة

06:51 PM