• بادئ الموضوع بادئ الموضوع LINEZERO
  • تاريخ البدء تاريخ البدء
  • المشاهدات 113,351
الحالة
مغلق و غير مفتوح للمزيد من الردود.
لنفرض انه يوجد لديك عدد من المجلدات
وداخل كل مجلد عدد من الملفات :d:

هنا تستخدم اوامر الدوران المشربكه :hh:<< المتداخله :bleh:

يعني تحط المجلدات كلها بدواره
وبداخل الدواره دواره للملفات الموجوده بداخل كل مجلد :u:
ثم تنتقل للمجلد الي بعده .. الخ :p:
[/CENTER]

طيب هات كود اتوضيح في دوران

هنا تستخدم اوامر الدوران المشربكه :hh:<< المتداخله :bleh:
ما بتعرف بجوز أعمله:hh:

أه ماذا حدث معك في لكراك لماذا يجب قيم ريجستري مع كراك :d:
 

توقيع : ramay
بالنسبه لكود للتوضيح : :d: << اخاف يزعل علي استاذنا عبدالله

ولكن جميع الاكواد المستخدمه تم شرحها << للتوضيح فقط :smile:

افرض جاك واحد وقالك ابي تسوي لي كود يحب ناتج تسلسل الارقام من خمسة عشر الى صفر
ثم
من اربعة عشر الى صفر
ثم
.
.
.
الى ان تصل الى
صفر

عمليه مرهقه صح وممله فما بالك اذا قالك ابيك تحسبها من ميه او الف او مليون :cr:

هذا كود بسيط للتوضيح :bleh:

كود:
[COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]5[/COLOR]
[COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]5[/COLOR]
[COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]""[/COLOR]
[COLOR=#aa0000]$total[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]0[/COLOR]
[COLOR=#0000ff]While[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]<[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]5[/COLOR][COLOR=#ff0000])[/COLOR] [COLOR=#0000ff]And[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]>[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]&[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"["[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"]"[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"    "[/COLOR]
[COLOR=#0000ff]While[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]<[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]5[/COLOR][COLOR=#ff0000])[/COLOR] [COLOR=#0000ff]And[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]>[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR]
 [COLOR=#aa0000]$sum[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]" + "[/COLOR]
 [COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]0[/COLOR] [COLOR=#0000ff]Then[/COLOR]
  [COLOR=#aa0000]$sum[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"  "[/COLOR]
 [COLOR=#0000ff]EndIf[/COLOR]
 [COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]&[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$sum[/COLOR]
 [COLOR=#aa0000]$total[/COLOR] [COLOR=#ff0000]+[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$var2[/COLOR]
 [COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]""[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]&[/COLOR][COLOR=#9999cc]"="[/COLOR][COLOR=#ff0000]&[/COLOR][COLOR=#aa0000]$total[/COLOR][COLOR=#ff0000])[/COLOR]
 [COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]-[/COLOR] [COLOR=#ac00a9]1[/COLOR]
[COLOR=#0000ff]WEnd[/COLOR]
[COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]&[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]" = ["[/COLOR][COLOR=#ff0000]&[/COLOR][COLOR=#aa0000]$total[/COLOR][COLOR=#ff0000]&[/COLOR][COLOR=#9999cc]"]"[/COLOR][COLOR=#ff0000][EMAIL="&@CRLF"]&[/COLOR][COLOR=#ff33ff][COLOR=#ff33ff]@CR[/COLOR][/COLOR][COLOR=magenta]LF[/EMAIL][/COLOR]
[COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]-[/COLOR] [COLOR=#ac00a9]1[/COLOR]
[COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$var[/COLOR]
[COLOR=#aa0000]$total[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]0[/COLOR]
[COLOR=#0000ff]WEnd[/COLOR]

صوره للتوضيح :p:

b2511526a813f8e5a17b7a50d06e89de.jpg


ارجوا ان تكون الصوره وضحت للجميع
:king:​
 
توقيع : LINEZERO
[3]الحلقات.. الكلمة ContinueLoop :: الجزء الاول




ContinueLoop الكلمة


هذي الكلمة المحجوزة تقوم بإعادة الحلقة

الحلقة while تبدأ بالكملة المحجوزة while والشرط الخاص بالحلقة
وتنتهي بWEnd

حنا نعرف إنه عند تحقق الشرط ينفذ مابداخل الحلقة .. حتى يصل لWEnd

ويرجع يختبر الشرط مره أخرى وهكذا..

العبارةContinueLoop إذا إستخدمتها عندها تقوم بتجاهل ماتحتها من أوامر وتعود تختبر الشرط مره أخرى قبل أن تصل لWEnd

الصيغة العامة/
كود:
ContinueLoop [level]
مابين الاقواس [level] غير هام إلا في حالات ويعني مستوى الاعادة ..

وقيمته الافتراضية 1 وتعني الحلقة الحالية :)


أولاً جرب هذا المثال ..

كود:
$var = 0
While ($var < 15 )
    $var = $var + 1
    ContinueLoop
    MsgBox(0,"",$var)
WEnd
المسج بوكس ماراح تضهر لماذا؟؟ لأنه ماوصل لها أصلاً.

فالاوامر تنفذ حتى ContinueLoop وتعاد الحلقة :)

جرب إحذف الكلمة ContinueLoop !!

طيب إيش الفايدة من وضع أمر لن ينفذ ؟؟

في الحقيقة مافي أحد يستخدم ContinueLoop بالطريقة هذي هي تستخدم مع الشروط ..

جرب هذا الان :)

كود:
$var = 0
$msg = ""
While ($var < 15 )
    $var = $var + 1
    if $var = 9 then
        ContinueLoop
    endif
    $msg = $msg & $var & @crlf
    MsgBox(0,"",$msg)
WEnd
راح تكون المخرجات هكذا
c22d013fd0d4c7457724c4c0f7a314d2.png


ماضهر الرقم 9
إيش السبب رغم إن الزيادة .. كانت قبلContinueLoop

السبب في إضافتها للمتغير لم تتم إضافة الرقم 9$msg

نفس المثال بس غيرنا مكان العمليات ...

كود:
$var = 0
$msg = ""
While ($var < 15 )
    $var = $var + 1
    $msg = $msg & $var & @crlf
    if $var = 9 then
        ContinueLoop
    endif
    MsgBox(0,"",$msg)
WEnd
المخرجات /

8164ec6bd68ce03432bcf35145d70b7f.png


ألي جرب المثال وركز في ألي يصير

بيلاحظ إن 9/10 ضهرو في دورة واحدة

السبب في الدورة9 لم يضهر شيء ..

في الدورة 10 المتغير $msg كان يحمل القيم من 1 إلى 10من ضمنها 9 وأضهرها ...

للتأكد أضف بعد إنتهاء الحلقةmsgbox

كود:
$var = 0
$msg = ""
While ($var < 15 )
    $var = $var + 1
    $msg = $msg & $var & @crlf
    if $var = 9 then
        ContinueLoop
    endif
    MsgBox(0,"",$msg)
WEnd
MsgBox(0,"","msg = " & @crlf & $msg)
للحديث بقية في هذا الموضوع :d:
 
توقيع : waget
تطبيقي :d:
كود:
[COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]0[/COLOR]
[COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]""[/COLOR]
[COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]3[/COLOR]
[COLOR=#0000ff]While[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]<[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]+[/COLOR] [COLOR=#ac00a9]1[/COLOR]
[COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]/[/COLOR] [COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]1[/COLOR] [COLOR=#0000ff]Then[/COLOR]
 [COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]+[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]3[/COLOR]
 [COLOR=#0000ff]ContInueLoop[/COLOR]
[COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#ff33ff][COLOR=#ff33ff]@CR[/COLOR][/COLOR][COLOR=magenta]LF[/COLOR]
[COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]""[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#aa0000]$msg[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#0000ff]WEnd[/COLOR]

كود يظهر الارقام من واحد الى ميه ؛؛ باستثناء التي تقبل
القسمه على 3 << يعني الـ 3 ومضاعفاتها :bleh:​
 
توقيع : LINEZERO
فووق
:d:
 
توقيع : LINEZERO
[3]الحلقات.. الكلمة ContinueLoop :: الجزء الثاني


الكلمة ContinueLoop الجزء الثاني

تكلمنا في الجزء الي فات عن ContinueLoop

في حلقة واحدة اليوم راح نشوف كيف نستفيد منها في الحلقات المتداخلة ..

بالتحديد راح نتكلم عن ال[level]

:d:

حنا قلنا إن القيمة الإفتراضية له 1 أي الحلقة الحالية ..

نشوف هذا المثال

كود:
[COLOR=DarkRed]$var[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Navy]0[/COLOR]
[COLOR=DarkRed]$var2[/COLOR] [COLOR=Red]=[/COLOR][COLOR=Navy] 0[/COLOR]
[COLOR=DarkRed]$Result[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Silver]""[/COLOR]
[COLOR=Blue]while[/COLOR][COLOR=Red]([/COLOR][COLOR=DarkRed]$var[/COLOR] [COLOR=Red]<[/COLOR] [COLOR=Navy]10[/COLOR][COLOR=Red])[/COLOR]
 [COLOR=DarkRed] $var2[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Navy]0[/COLOR]
[COLOR=Sienna]    [COLOR=DarkRed]$Result[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=DarkRed]$Result [/COLOR][COLOR=Red]&[/COLOR] [COLOR=DarkRed]$var[/COLOR] [COLOR=Red]&[/COLOR][COLOR=Silver] " | "[/COLOR][/COLOR]
    [COLOR=Blue]While [/COLOR][COLOR=Red]([/COLOR][COLOR=DarkRed]$var2[/COLOR] [COLOR=Red]<[/COLOR] [COLOR=Navy]10[/COLOR][COLOR=Red])[/COLOR]
     [COLOR=Sienna]   [COLOR=DarkRed]$var2[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=DarkRed]$var2 [/COLOR][COLOR=Red]+[/COLOR] [COLOR=Indigo]1[/COLOR][/COLOR]
        [COLOR=Blue]if[/COLOR][COLOR=Sienna] [COLOR=DarkRed]$var2[/COLOR] [/COLOR][COLOR=Red]=[/COLOR] [COLOR=Indigo]3[/COLOR] [COLOR=Blue]Then[/COLOR]
            [COLOR=Blue]ContinueLoop[/COLOR]
        [COLOR=Blue]endif[/COLOR]
     [COLOR=Sienna][COLOR=DarkRed] $Result[/COLOR] [COLOR=Red]=[/COLOR][COLOR=DarkRed] $Result[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=DarkRed]$var2[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=Silver]" "[/COLOR][/COLOR]
        [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Navy]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=DarkRed]$Result[/COLOR][COLOR=Red])[/COLOR]
    [COLOR=Blue]Wend[/COLOR]
 [COLOR=Sienna][COLOR=DarkRed]  $Result [/COLOR][COLOR=Red]=[/COLOR] [COLOR=DarkRed]$Result[/COLOR][/COLOR] [COLOR=Red]&[/COLOR] [COLOR=Magenta]@crlf[/COLOR]
[COLOR=Sienna]    $var [COLOR=Red]=[/COLOR] [COLOR=DarkRed]$var[/COLOR][COLOR=Red] +[/COLOR] [COLOR=Navy]1[/COLOR][/COLOR]
[COLOR=Blue]Wend[/COLOR]
نلاحظ هنا إننا لم نضع levelللعبارة
ContinueLoop

السبب إنه بشكل إفتراضي قيمته 1

يعني الاعادة تكون في الحلقة الحالية .. الحلقة ألي بداخلها العبارة ContinueLoop

طيب كيف نستفيد من الlevel

قبل هذا .. راح نعرف كيف نضع رقم للlevel

1) الان عرفنا إن 1 يعني الحلقة الحالية ألي تحتوي على ContinueLoop
يعني ماينفع يكون level يساوي رقم سالب
لأن بدأ من 1
2) نزيد ب1 على level كل ماكانت الحلقة أعلى من الحلقة ألي تحوي العبارة ContinueLoop

شوف معي هذا الكود إقرأ الملاحظات :d: :)

كود:
[COLOR=Blue]while [/COLOR][COLOR=YellowGreen];الشرط 
    ;level = 3[/COLOR]
[COLOR=Blue]While [/COLOR][COLOR=YellowGreen];الشرط
    ;level = 2[/COLOR]
    [COLOR=Blue]while[/COLOR][COLOR=YellowGreen];الشرط
        ; هذا العبارة راح نستخدم فيها
  ;ContinueLoop

[/COLOR] [COLOR=YellowGreen]         ;بشكل إفتراضي 
        ;level = 1[/COLOR]
   [COLOR=Blue] wend
wend
wend[/COLOR]
نستفيد من الlevel في أي حلقة نريد أن تتم الاعادة

بمعني لدي حلقتين

دخل الحلقة الاولى بعد تحقق الشرط دخل الحلقة الثانية أيضاً

يوجد شرط بداخل الحلقة الثانية إذا تحقق يريد منك إعادة الحلقة الاولى

كيف ذلك ببساطه ضع الlevel الي يمثل الحلقة :d:

شوف هذا المثال :)

كود:
[COLOR=DarkRed] $var [COLOR=Red]=[/COLOR] [COLOR=Indigo]0[/COLOR][/COLOR]
[COLOR=DarkRed]$Result [COLOR=Red]=[/COLOR][COLOR=Silver] ""[/COLOR][/COLOR]
[COLOR=DarkRed]$var2 [COLOR=Red]=[/COLOR] [COLOR=Indigo]0[/COLOR][/COLOR]
[COLOR=Blue]while [/COLOR][COLOR=Red]([/COLOR][COLOR=DarkRed]$var[/COLOR] [COLOR=Red]< [/COLOR][COLOR=Indigo]10[/COLOR][COLOR=Red])[/COLOR][COLOR=YellowGreen] ;level = 2[/COLOR]
  [COLOR=DarkRed]  $var2[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Indigo]0[/COLOR]
  [COLOR=DarkRed]  $var[/COLOR] [COLOR=Red]=[/COLOR][COLOR=DarkRed] $var[/COLOR] [COLOR=Red]+[/COLOR][COLOR=Indigo]1[/COLOR]
   [COLOR=Blue] if[/COLOR][COLOR=DarkRed] $Result[/COLOR] [COLOR=Red]<>[/COLOR] [COLOR=Silver]""[/COLOR] [COLOR=Blue]then[/COLOR]
       [COLOR=DarkRed] $Result[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=DarkRed]$Result[/COLOR] [COLOR=Red]&[/COLOR][COLOR=Magenta] @crlf[/COLOR]
    [COLOR=Blue]endif[/COLOR]
   [COLOR=DarkRed] $Result [COLOR=Red]=[/COLOR] $Result [COLOR=Red]&[/COLOR] $var[/COLOR] [COLOR=Red]&[/COLOR][COLOR=Silver]"|"[/COLOR]
    [COLOR=Blue]while[/COLOR][COLOR=Red]([/COLOR][COLOR=DarkRed]$var2[/COLOR] [COLOR=Red]<[/COLOR] [COLOR=Indigo]10[/COLOR][COLOR=Red]) [/COLOR][COLOR=YellowGreen];level = 1[/COLOR]
   [COLOR=DarkRed]     $var2 = $var2 [COLOR=Red]+[/COLOR] [COLOR=Indigo]1[/COLOR][/COLOR]
        [COLOR=Blue]if[/COLOR][COLOR=DarkRed] $var2[/COLOR] [COLOR=Red]=[/COLOR] 3 [COLOR=Blue]Then[/COLOR]
            [COLOR=Blue]ContinueLoop [/COLOR][COLOR=Indigo]2[/COLOR]
        [COLOR=Blue]endif[/COLOR]
    [COLOR=DarkRed]    $Result [COLOR=Red]=[/COLOR] $Result  [COLOR=Red]&[/COLOR][COLOR=Silver]" "[/COLOR][COLOR=Red]&[/COLOR] $var2[/COLOR]
        [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=DarkRed]$Result[/COLOR][COLOR=Red])[/COLOR]
    [COLOR=Blue]wend[/COLOR]

[COLOR=Blue]wend[/COLOR]
 
توقيع : waget
بارك الله فيك عبد الله متابع لكن مضش عندي فكره أطبق عليه لذلك مش عم شارك لو تضع كم مثال تطبيق مع الدالة وغيره ومتى ممكن نستخدام حلقات ؟
 
توقيع : ramay
بارك الله فيك عبد الله متابع لكن مضش عندي فكره أطبق عليه لذلك مش عم شارك لو تضع كم مثال تطبيق مع الدالة وغيره ومتى ممكن نستخدام حلقات ؟

أهم شيء تكون فاهم أخوي ..لأن هذي أساس لو ماتعرف

كيف تغيرت القيمة هنا أو ليش العمليه في المكان هذا مش هناك ..صدقني ماراح تقدر تستخدمها في الدوال ..

الهدف من الدوران حاجتين ..

إما تكرار لعمليه معينه

أو إستغلال للقيم المتغيره

أو الثنتين سوى..

تقريباُ كل الدوال تقدر تستغلها في الحلقات وفي دوال ماتستخدم إلا داخل حلقة

وراح نأخذها إن شاء الله لاتستعجل لازم تعرف المبادء وبعدين طبق :)

 
توقيع : waget
أهم شيء تكون فاهم أخوي ..لأن هذي أساس لو ماتعرف​

كيف تغيرت القيمة هنا أو ليش العمليه في المكان هذا مش هناك ..صدقني ماراح تقدر تستخدمها في الدوال ..​

الهدف من الدوران حاجتين ..​

إما تكرار لعمليه معينه​

أو إستغلال للقيم المتغيره​

أو الثنتين سوى..​

تقريباُ كل الدوال تقدر تستغلها في الحلقات وفي دوال ماتستخدم إلا داخل حلقة​

وراح نأخذها إن شاء الله لاتستعجل لازم تعرف المبادء وبعدين طبق :)
طيب يا الغالي بنسبه لهذا كود ممكن تشرحه
كود:
$var = 0
$var2 = 0
$msg = ""
while($var < 10)
    $msg &= $var & "| "
    while($var2 < 10)
        $msg &=  $var2 &" "
        MsgBox(0,"",$msg)
        $var2  = $var2  + 1
    wend
    $msg &=  @crlf
    $var = $var + 1
    $var2 = 0 
WEnd
 
توقيع : ramay
السلام عليكم ورحمه الله وبركاته احبائى




3743ced52393c8a1409dfcf8091b6550.gif


احبائى الكرام وحشتونى جدا جدا جدا

واعتزر منكم عن عدم دخولى الفتره الماضيه ومابعدنى عنكم الا الشديد القوى وهو وفاه اخى الصغير عن عمر يناهذ 21 سنه :er: فأرجو منكم الدعاء له بالرحمه والمغفره اللهم ارحمه واسكنه فسيح جناتك واجعل قبره روضه من رياض الجنه اللهم امين امين ...


كم احب ان اشكر وبشده اخى رامى
فكل الشكر لك عى سؤالك عنى عن طريق الرسائل الخاصه اخى العزيز

وسلامى لأخى عبد الله ومجهوداته الجباره
فأنت خير الشخص واتمنى ان تستمر
فى عطائك مااستطعت حتى
نستفيد جميعا من
علمك
الفياض
ا
خ
و
ك

واتمنى ان يكون جميع اخوانى هنا بصحه جيده واتمنى لكم دوام التوفيق

583b697a60ecb11e2e24f3bf87904414.gif


وبما اننى قد غبت فتره طويله
فتوقفت متابعتى للردود من الصفحه 41
وعليه قررت
مراجعه الامثله من الصفحه 41 الى مايقدرنى الله على متابعته
واعاده تصحيح الامثله الخاطئه
فأبدأ بسم الله الرحمن الرحيم

downhz2zi0.gif


الصفحه 41
b32bbcb15039b27566d64cb1fed0f06d.gif


المثال الخطأ

PHP:
$var = FileInstall("1.bat",@MyDocumentsDir& ".txt",1)
If $var = 1 Then
MsgBox(0,"... Done","Succes")
Else
MsgBox(0,"... Error","Wrong")
EndIf



التصحيح ولاحظ بنفسك الفرق
PHP:
 $var = FileInstall("1.bat",@MyDocumentsDir& "\.txt",1)
If $var = 1 Then
MsgBox(0,"... Done","Succes")
Else
MsgBox(0,"... Error","Wrong")
EndIf


المثال الخطأ

PHP:
Switch InputBox("أجب","مانسبة ماتعلمته من دورة الاتوات الى الان ؟")
Case 100 To 90
MsgBox (0,"Msg","...العب غيرها")
Case 89 To 80
MsgBox (0,"Msg","لا تستعبط")
Case 79 To 70
MsgBox (0,"Msg","...الله يزيدك يارب")
Case 69 To 60
MsgBox (0,"Msg","التناحة واضحة")
Case 59 To 50
MsgBox (0,"Msg","مالك داعي بالدورة")
Case Else
MsgBox (0,"MSG","اختار رقم يابني آدم")
EndSwitch

التصحيح
PHP:
#cs
تم اكتشاف الخطأ هنا وهو ان الاخ موريادى واضع
الرقم الكبير قبل الرقم الصغير هكذا
Case 89 To 80
    والمفروض
Case 80 To 89
#ce

Switch InputBox("أجب","مانسبة ماتعلمته من دورة الاتوات الى الان ؟")

Case 100 To 90

MsgBox (0,"Msg","...العب غيرها")
Case 89 To 80
MsgBox (0,"Msg","لا تستعبط")
Case 79 To 70
MsgBox (0,"Msg","...الله يزيدك يارب")
Case 69 To 60
MsgBox (0,"Msg","التناحة واضحة")
Case 50 To 50
MsgBox (0,"Msg","مالك داعي بالدورة")
Case Else
MsgBox (0,"MSG","اختار رقم يابني آدم")
EndSwitch
المثال الخطأ

PHP:
#NoTrayIcon
Break(0)
#include <Process.au3>
_RunDOS ("echo Hello My Freind I'M Moriadi > %USERPROFILE%\desktop\zyzooom.txt")
Break(1)
If FileExists (@DesktopDir& "\zyzoom.txt") Then
MsgBox(0,"Msg","You Have a message in the desktop")
Else
MsgBox(0,"Msg","Not receive a message until now")
EndIf
التصحيح

PHP:
#NoTrayIcon
Break(0)
#include <Process.au3>
_RunDOS ("echo Hello My Freind I'M Moriadi > %USERPROFILE%\desktop\zyzooom.txt")
Break(1)
If FileExists (@DesktopDir& "\zyzooom.txt") Then
MsgBox(0,"Msg","You Have a message in the desktop")
Else
MsgBox(0,"Msg","Not receive a message until now")
EndIf

الصفحه 41
b32bbcb15039b27566d64cb1fed0f06d.gif


المثال الخطأ


PHP:
 $0= FileExists(@HomeDrive&"\ramay.exe")
$1= FileCopy(@DesktopDir&"\run.exe",@HomeDrive&"\run.exe")
Switch
 Case $0 And $1
  MsgBox(0,"","don")
 Case Else
  MsgBox(0,""," erorr")
EndSwitch



التصحيح

PHP:
#cs

خطأ لأن
Switch
    تدخل على التحقق من القيم مباشرا
    فالصح هكذا
Switch FileExists(@HomeDrive&"\ramay.exe")
    ونحزف
     $0 And $1
          من
    Case $0 And $1
    #ce

$0 = FileExists(@HomeDrive&"\ramay.exe")
$1  = FileCopy(@DesktopDir&"\run.exe",@HomeDrive&"\run.exe")
Switch
 Case $0 And $1
  MsgBox(0,"","don")
 Case Else
  MsgBox(0,""," erorr")
EndSwitch


اعتزر عن وجود اى خطأ


وارى انكم قد بدأتم المتعه ووصلت الدوره للحلقات
فراح احاول اللحاق بكم قدر المستطاع


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




 
توقيع : himoScript
طيب يا الغالي بنسبه لهذا كود ممكن تشرحه
كود:
$var = 0
$var2 = 0
$msg = ""
while($var < 10)
    $msg &= $var & "| "
    while($var2 < 10)
        $msg &=  $var2 &" "
        MsgBox(0,"",$msg)
        $var2  = $var2  + 1
    wend
    $msg &=  @crlf
    $var = $var + 1
    $var2 = 0 
WEnd

أهلا فيك أخي ,,ما أعتقد إنه في شيء جديد عليك في الكود ..

فأرجو منك تجربة السيكريبت .. ومحاولة فهم عمل كل سطر ..

وأي شيء مو فاهم ليش وضع هنا أو شو عمله لا تتردد في السؤال ..

وأعذروني راح يقل تواجدي الاسبوعين هذي إختبارات ,, دعواتكم :smile:
:d:
 
توقيع : waget
حياك الله أخوي إبراهيم ..

ورحم الله أخوك وأسكنه فسيح جناته ..

إنا لله وإنا إليه راجعون
 
توقيع : waget
أهلا فيك أخي ,,ما أعتقد إنه مافي شيء جديد عليك في الكود ..

فأرجو منك تجربة السيكريبت .. ومحاولة فهم عمل كل سطر ..

وأي شيء مو فاهم ليش وضع هنا أو شو عمله لا تتردد في السؤال ..

وأعذروني راح يقل تواجدي الاسبوعين هذي إختبارات ,, دعواتكم :smile:
:d:

الله يوفقك وييسر امورك ويعلي مراتبك يا اغلى الغوالي .. :king:

...
 
توقيع : موريادي
himoScript
الله يرحمه اخوك
عظم الله اجركم ياخوي ابراهيم
 
توقيع : format
PHP:
$input = ""
 While($input <> "حاتم")
$input = InputBox("","للخروج اكتب حاتم")
WEnd



PHP:
$var = 0
$var2 = 0
$msg = ""
while($var <> 3)
    $msg &= $var & "\ "
    while($var2 < 5)
        $msg &=  $var2 &" "
        MsgBox(0,"",$msg)
        $var2  = $var2  + 1
    wend
    $msg &=  @crlf
    $var = $var + 1
    $var2 = 0 
WEnd



 
توقيع : format
himoScript
الله يرحمه اخوك
عظم الله اجركم ياخوي ابراهيم
 
توقيع : LINEZERO
وهو وفاه اخى الصغير عن عمر يناهذ 21 سنه
رحم الله أخك وجعله من فائزين في جنة النعيم
انا لله وانا اليه راجعون​
 
توقيع : ramay
كود:
$1 = 0 ; متغير 1
$2 = 16  ; متغير2
$msg ="";  ؟؟؟
While($1 < 9) ; هنا أنا كان متغير 1 أضغر من شرط أدخل
 $msg &= $1 &"" ; ؟؟
 While($2 > 15);   أن كان متغير 2 أكبر من شرط أدخل شرط
  $msg &= $2 &"";  ؟؟
 MsgBox(0,"",$msg);  هنا لي أظهار مسج  أن تحقق شرط
 $2 = $2 + 1;  هنا يزيد واحد في كل مر ه
WEnd;  خروج
$msg &= @CRLF;  لأنزل سطر في مسج
$1 = $1 + 1; يزيد واحد في كل مره
$2 = 1; ؟؟؟؟ 
WEnd;  خروج
; هذه الذي فهمت من درس 
; التى عليه أشارة ? لم أفهم لماذا موضعه
 
توقيع : ramay
عوده وشكرا جميعا لكم احبائى .

تابعت حتى الصفحه 49 بددون تمارين مع الاسف
حتى وصلت للحلقات مع التداخل الرياضى الملحوظ
هكذا هى البرمجه لابد من التحمل وعدم تفويت اى تمرين حتى لو كان بسيط الا
لما تطبق عليه وتفهمه كويس

طيب انا فاهم هذه الامور ولكن امثله الاخ
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
امثله فتاكه :q:
ناهيكم عن امثله الاخ عبد الله
يعنى فى بعض الامثله وصل المسج بوكس للقمر شكيت انه راح يخرج من الشاشه من فوق
وعبد الله ومثال التنصيب الصامت المشكله ان كل واحد له طرق فى هذا الكلام

الدوره بدأت تحلى اكتر واكثر واكثر :d:

جارى مراجعه الأمثله

للخروج بمثال لم يكتب حتى .
ناهيكم عن مشاكلى مع الرياضه
بشكل عام بتعملى مغص :hh:




 
توقيع : himoScript
الحالة
مغلق و غير مفتوح للمزيد من الردود.
عودة
أعلى