ألف شكر reemeaaaah فيه شيء واحد بس اللي ما ضط اللي هو
رموز الشركات ...
انا قلت لك ان اللي طلع لي في ALL رموز حرفيه مثلا AXB _DIS ما ادري وش هي له ...
ما طلعت لي ارقام الشركات .....
معليش غلبتك معي الله يعطيك العافيه
صيد^الخاطر : أختي أعيدي تحميل البيانات من جديد يمكن حدث خطأ في الخطوات أو خطأ في البيانات اللي حملتيها, وخبريني إذا ضبط معك أو لا.
اختي الحبيبة جزاك الله خير هالمعلومات
نزلت البرنامج وكل شئ معي تمام لكن فيz_ZigZagValid
مانزل لي فيه الا خط احمر واسم المؤشر لكن الاسهم الخضراء والحمراء ماهي موجوده

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

شوفي اذا الموقع زي موقع عرب ميتا ...فهو سهل تختارين بيانات اليوم المطلوب وتضغطين ارسل...ويجيك ملف TXT حمليه وبعدين حمليه في البرنامج كما في توضيح اختي ريميه من قبل...

واذا مو مثله فوالله ماعندي علم...عموما حطي رابط الموقع يمكن انا او وحده من الاخوات تقدر تساعدك في كيفية التحميل وياهلا فيك...

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


نورالحب: ضروري إنك تنسخي المؤشر كامل وماتغيري فيه شي عشان يشتغل صح والأسهم الحمراء والخضرء مو شرط تكون طالعه في المؤشر لأن السهم لسه ماعطى اشارة دخول أو خروج لكن إذا كانت الأسهم موطالعة في كامل المؤشر يعني مثلا من شهريين لليوم أو من سنه لليوم ففي خلل أحذفيه واعيدي تركيبه من جديد.
البرنامج يستخدم في التحليل الفني للأسهم, المؤشر يعطي اشارة دخول وخروج في السهم.

أختي ام بسام هذا مؤشر جديد حلو لقيته في احد المنتديات وهو يعطي فكره حلوه عن السهم من حيث انه يكتب لك معلومات على الشارت نفسه عن السهم ويعطيك اشارة دخول وخروج.
المؤشر هو:
_SECTION_BEGIN("MAIN");

Plot( Volume, _DEFAULT_NAME(), ParamColor("Color", colorBlueGrey ), ParamStyle( "Style", styleHistogram | styleOwnScale | styleThick, maskHistogram ), 2 );

//TRIX
trx=0;
trxh = 0;
periods = Param( "Periods", 15, 1, 200, 1 );
trx=Trix(periods);
trxh=C/100;

/*
//under study
tx=(Trix(3)*Trix(5)*Trix(7))/100;
tm=MA(tx,3);
Ch1=tx - tm;
*/

//RSI
RA=0;
periods = Param( "Periods", 15, 1, 200, 1 );
RA=RSI(periods);

//MFI
Mf=0;
periods = Param( "Periods", 15, 1, 200, 1 );
Mf=MFI(periods);

//get pfe
pds=10;
x=sqrt((ROC(C,9)*ROC(C,9))+100 );
y=Sum(sqrt((ROC(C,1)* ROC(C,1))+1),pds);
z=(x/y);
pfe=EMA(IIf(C>Ref(C,-9),z,-z)*100,5);



MAWeeklyMacd = Signal(6,13,5);
MACDRoc = maWeeklyMacd - Ref(maWeeklyMacd,-5);

//Cond1 - "V" bottom, NEW UP TREND
Cond1 = IIf(MACDRoc > Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) <= Ref(MACDRoc,-2),1,0);
//Cond2 - "V" top, NEW DOWN TREND
Cond2 = IIf(MACDRoc < Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) >= Ref(MACDRoc,-2),1,0);
//cond3 - Trend is Up
Cond3 = IIf(MACDRoc > Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) >= Ref(MACDRoc,-2),1,0);
//Cond4 - Trend is Down
Cond4 = IIf(MACDRoc < Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) <= Ref(MACDRoc,-2),1,0);
//Cond5 - Trend is Flat
Cond5 = IIf(MACDRoc== Ref(MACDRoc,-1) ,1,0);

MAMonthlyMacd = Signal(6,13,26);
MACDRoc = mamonthlyMacd - Ref(mamonthlyMacd,-26);

//Cond1 - "V" bottom, NEW UP TREND
Cond6 = IIf(MACDRoc > Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) <= Ref(MACDRoc,-2),1,0);
//Cond2 - "V" top, NEW DOWN TREND
Cond7 = IIf(MACDRoc < Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) >= Ref(MACDRoc,-2),1,0);
//cond3 - Trend is Up
Cond8 = IIf(MACDRoc > Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) >= Ref(MACDRoc,-2),1,0);
//Cond4 - Trend is Down
Cond9 = IIf(MACDRoc < Ref(MACDRoc,-1) AND Ref(MACDRoc,-1) <= Ref(MACDRoc,-2),1,0);
//Cond5 - Trend is Flat
Cond10 = IIf(MACDRoc== Ref(MACDRoc,-1) ,1,0);

//GET SIMPL MOVING AVRAGE OF PERIODS 5,9,14,20,50

T=5;
KMA1=((C-MA(C,T))/MA(C,T))*100;
M1=MA(C,T);

T=9;
KMA2=((C-MA(C,T))/MA(C,T))*100;
M2=MA(C,T);

T=14;
KMA3=((C-MA(C,T))/MA(C,T))*100;
M3=MA(C,T);

T=20;
KMA4=((C-MA(C,T))/MA(C,T))*100;
M4=MA(C,T);

T=50;
KMA5=((C-MA(C,T))/MA(C,T))*100;
M5=MA(C,T);

//get res and sup
p = (H+L+C)/3;
r1 = (2*p)-L;
s1 = (2*p)-H;
r2 = p +(r1 - s1);
s2 = p -(r2 - s1);
R3 = P + (R2 - S2);
S3 = P - (R3 - S2);

Title=EncodeColor(colorDarkGre en)+"[ SA33.COM ]"+" [ "+EncodeColor(colorRed )+Name()+EncodeColor(colorDark Green)+"__ "+
EncodeColor(colorRed )+FullName()+EncodeColor(color DarkGreen)+" ]"+
EncodeColor(colorBlue)+" [ DATE : "+EncodeColor(colorBlue)+Date( )+
EncodeColor(colorDarkGreen)+" ]["+EncodeColor(colorRed)+

StrFormat("{{INTERVAL}}")+Enco deColor(colorDarkGreen)+"]"+"\n"+

EncodeColor(colorBlue)+"Open:" +EncodeColor(colorBlack)+O+
EncodeColor(colorBlue)+" Close: "+EncodeColor(colorBlack)+ C+
EncodeColor(colorBlue)+" High: "+EncodeColor(colorBlack)+ H+
EncodeColor(colorBlue)+" Low: "+EncodeColor(colorBlack)+ L+
EncodeColor(colorBlue)+" Val:"+EncodeColor(colorBlack)+ WriteVal(V,1,0)+"\n"+

EncodeColor(colorGreen)+"R1 "+EncodeColor(colorDarkGreen)+ r1+
EncodeColor(colorGreen)+" R2 "+EncodeColor(colorDarkGreen)+ r2+
EncodeColor(colorGreen)+" R3 "+EncodeColor(colorDarkGreen)+ r3+"\n"+

EncodeColor(colorRed)+"S1 "+EncodeColor(colorDarkRed)+s1 +
EncodeColor(colorRed)+" S2 "+EncodeColor(colorDarkRed)+s2 +
EncodeColor(colorRed)+" S3 "+EncodeColor(colorDarkRed)+s3 +"\n"+

EncodeColor(colorBlue)+WriteVa l(abs(KMA1),format=1.2)+"%"+Wr iteIf(KMA1>0,EncodeColor(color Green)+"above MA5p ",EncodeColor(colorRed)+"b elow MA5p ")+EncodeColor(colorBlue)+M1+" \n"+
EncodeColor(colorBlue)+WriteVa l(abs(KMA2),format=1.2)+"%"+Wr iteIf(KMA2>0,EncodeColor(color Green)+"above MA9p ",EncodeColor(colorRed)+"b elow MA9p ")+EncodeColor(colorBlue)+M2+" \n"+
EncodeColor(colorBlue)+WriteVa l(abs(KMA3),format=1.2)+"%"+Wr iteIf(KMA3>0,EncodeColor(color Green)+"above MA14p",EncodeColor(colorRed)+" below MA14p ")+EncodeColor(colorBlue)+M3+" \n"+
EncodeColor(colorBlue)+WriteVa l(abs(KMA4),format=1.2)+"%"+Wr iteIf(KMA4>0,EncodeColor(color Green)+"above MA20p",EncodeColor(colorRed)+" below MA20p")+EncodeColor(colorBlue) +M4+"\n"+
EncodeColor(colorBlue)+WriteVa l(abs(KMA5),format=1.2)+"%"+Wr iteIf(KMA5>0,EncodeColor(color Green)+"above MA50p",EncodeColor(colorRed)+" below MA50p")+EncodeColor(colorBlue) +M5+"\n"+

EncodeColor(colorDarkBlue)+"RS I indicates "+WriteIf(RA > Ref(RA ,-1) AND RA < 70 AND RA > 30 ,EncodeColor(colorGreen)+" BUY ",WriteIf( RA < Ref(RA ,-1) AND RA < 30 ,EncodeColor(colorRed)+" WATING STRONG BUY ",WriteIf( RA > Ref(RA ,-1) AND RA > 70 ,EncodeColor(colorRed)+" WATING STRONG Sell", EncodeColor(colorRed)+" Sell " )))+
EncodeColor(colorDarkBlue)+Wri teIf(RA > 70 OR RA < 30 ,EncodeColor(colorRed)+WriteVa l(ra), EncodeColor(colorBlue)+WriteVa l(ra))+"\n"+

EncodeColor(colorDarkBlue)+"MF I indicates "+WriteIf(MF > Ref(MF ,-1) AND MF < 80 AND MF > 20 ,EncodeColor(colorGreen)+" BUY ",WriteIf( MF < Ref(MF ,-1) AND MF < 20 ,EncodeColor(colorRed)+" WATING STRONG BUY ",WriteIf( MF > Ref(MF ,-1) AND MF > 80 ,EncodeColor(colorRed)+" WATING STRONG Sell", EncodeColor(colorRed)+" Sell " )))+
EncodeColor(colorDarkBlue)+Wri teIf(MF > 80 OR MF < 20 ,EncodeColor(colorRed)+WriteVa l(MF), EncodeColor(colorBlue)+WriteVa l(MF))+"\n"+

EncodeColor(colorDarkBlue)+"TR IX indicates "+WriteIf(trx > Ref(trx ,-1) AND trx < trxh ,EncodeColor(colorGreen)+" BUY ",WriteIf( trx < Ref(trx ,-1) AND trx < 0 ,EncodeColor(colorRed)+" WATING STRONG BUY ",WriteIf( trx > Ref(trx ,-1) AND trx > trxh ,EncodeColor(colorRed)+" WATING STRONG Sell", EncodeColor(colorRed)+" Sell " )))+
EncodeColor(colorDarkBlue)+Wri teIf(trx > trxh OR trx < 0 ,EncodeColor(colorRed)+WriteVa l(trx), EncodeColor(colorBlue)+WriteVa l(trx))+"\n"+

//EncodeColor(colorDarkBlue)+"MA ( TRIX ) "+WriteIf(CH1 > 0 ,EncodeColor(colorGreen)+" BUY ", EncodeColor(colorRed)+" Sell " )+"\n"+

EncodeColor(colorDarkBlue)+"PF E indicates MAIN TREND = " +WriteIf(pfe>10,EncodeColor(co lorGreen)+ " UP TREND ",WriteIf(pfe>-10 AND pfe<10, EncodeColor(colorBlue)+" Consolidation Phase is in place",EncodeColor(colorRed)+ " DOWN TREND "))+"\n"+
EncodeColor(colorDarkBlue)+"PF E indicates CURRENTLY TREND = "+WriteIf(pfe>Ref(pfe,-1),EncodeColor(colorGreen)+" Rising which is Up Trend OR weakening Down Trend", EncodeColor(colorRed)+" falling which is Down trend OR weakening uptrend ")+"\n"+
EncodeColor(colorDarkBlue)+"WE EKLY -" +WriteIf(Cond1==1,EncodeColor( colorGreen)+" NEW UP TREND ", WriteIf(Cond2==1,EncodeColor(c olorRed)+" NEW DOWN TREND ", WriteIf(Cond3==1,EncodeColor(c olorGreen)+" Trend is Up ",WriteIf(Cond4==1,EncodeColor (colorRed)+" Trend is Down ",WriteIf(Cond5==1,EncodeColor (colorRed)+" Trend is Flat ","")))))+"\n"+
EncodeColor(colorDarkBlue)+"MO NTHLY -" +WriteIf(Cond6==1,EncodeColor( colorGreen)+" NEW UP TREND ", WriteIf(Cond7==1,EncodeColor(c olorRed)+" NEW DOWN TREND ", WriteIf(Cond8==1,EncodeColor(c olorGreen)+" Trend is Up ",WriteIf(Cond9==1,EncodeColor (colorRed)+" Trend is Down ",WriteIf(Cond10==1,EncodeColo r(colorRed)+" Trend is Flat ","")))));


_SECTION_END();

_SECTION_BEGIN("BUY&SELL=SIGNA L");

k=1; /* factor de multiplicare*/

/*R rezistenta pentru ziua curenta*/
R = Ref(Close, -1)+k*Ref(ATR(10),-1);
/*S rezistenta pentru ziua curenta*/
S = Ref(Close, -1)-k*Ref(ATR(10),-1);

Buy=Close>R;
Sell=Close<S;

Cump=IIf(Close>R,1,0);
Vanz=IIf(Close<S,1,0);

Plot(Close,"Close",colorBlack, styleCandle);
//Plot(R, "Res",colorGreen,styleDots );
//Plot(S, "Sup:",colorRed,styleDots) ;


Buy = ExRem( Buy, Sell ); //Elimina semnalele buy consecutive
Sell = ExRem( Sell, Buy ); //Elimina semnalele sell consecutive

shape = Buy * shapeUpArrow + Sell * shapeDownArrow;

fig=Cump*shapeHollowUpArrow + Vanz*shapeHollowDownArrow;

PlotShapes( fig, IIf( Cump, colorGreen , colorRed), 0, IIf( Cump, Low-2, High+2)); //Pentru a vizualiza semnalele consecutive eliminate de ExRem
PlotShapes( shape, IIf( Buy, colorGreen, colorRed ), 0, IIf( Buy, Low-2, High+2));

AlertIf( Buy, "", "ATR 10-1 Sistem", 1 );
AlertIf( Sell, "", "ATR 10-1 Sistem",2);

GraphXSpace = 3;

_SECTION_END();


الساعة الآن 12:03 .