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


أه يا الغالي لقتل عملية في الادارة مهام كيف سأقتله وأنا لا أعلم برامج التى تعمل فيه
يعني اريد قتل جميع عمليات في الادارة مهام ماعدا برامج ضروريه لتشغيل نظام ثم أعيد تشغيل الاكسبلور بعد 10 ثواني
 

توقيع : ramay
رابط البرنامج :d:

قبل الرابط في ملاحظات على مفاتيح الريجستري :d:

المفاتيح ألي إخترتها تختلف من جهاز لآخر أعتقد :d: مفاتيح SID

يمكن /بل أعتقد إن في طريقة للتعامل معها برمجياُ بس بصراحه أنا ما أعرفها لحد الان :b:

وأيضاً ملاحظة ثانية

في الدلة /

كود:
[COLOR=black]$regread = regread($regkey,"PATH")[/COLOR]
هنا قرأت بيانات القيمة path

فهل القيمة path موجوده فعلافي المفتاح
كود:
[COLOR=black]"HKEY_USERS\S-1-5-21-259654521-3341864835-4179435214-1000\Software\EasyBoot Systems\UltraISO\5.0\Registration"[/COLOR]
يمكن ماقريت ملاحظتي هذي ...

ماعليك سوى التعديل على بيانات المتغيرات وإسم القيمة في دالة regread

أنا قرأت القيمة path لأنها موجودة في المفتاح الي إخترته

:u:​
 
توقيع : waget
قبل الرابط في ملاحظات على مفاتيح الريجستري :d:​

المفاتيح ألي إخترتها تختلف من جهاز لآخر أعتقد :d: مفاتيح SID​

يمكن /بل أعتقد إن في طريقة للتعامل معها برمجياُ بس بصراحه أنا ما أعرفها لحد الان :b:​

وأيضاً ملاحظة ثانية​

في الدلة /​

كود:
[CENTER][COLOR=black]$regread = regread($regkey,"PATH")[/COLOR][/CENTER]
هنا قرأت بيانات القيمة path​





فهل القيمة path موجوده فعلافي المفتاح​
كود:
[CENTER][COLOR=black]"HKEY_USERS\S-1-5-21-259654521-3341864835-4179435214-1000\Software\EasyBoot Systems\UltraISO\5.0\Registration"[/COLOR][/CENTER]
يمكن ماقريت ملاحظتي هذي ...​







أنا قرأت القيمة path لأنها موجودة في المفتاح الي إخترته​


:u:​





كود:
"HKEY_USERS\S-1-5-21-259654521-3341864835-4179435214-1000\Software\EasyBoot Systems\UltraISO\5.0\Registration"
على ماأعتقد ان فيمة هذه يتم أنشاه Registration عندما اسجل برنامج مش عارف

المفاتيح ألي إخترتها تختلف من جهاز لآخر أعتقد :d: مفاتيح SID

يمكن /بل أعتقد إن في طريقة للتعامل معها برمجياُ بس بصراحه أنا ما أعرفها لحد الان :b:

أيضا يسجل هنا على ما أظن ممكن تفيدنا​
كود:
HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0
 
توقيع : ramay
ramay;3020197 أيضا يسجل هنا على ما أظن ممكن تفيدنا [CODE قال:
HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0
[/CODE]


نعم تفيد لكن ليس في تسجيل البرنامج

بالنسبه للبرنامج رفض التنصيب الصامت :?: حاولت فيه أكثر من مره حتى إني نسخت
السويتش وإسم البرنامج من أداهUSSE
ووضعته مباشرة في run
كود:
Run('"Ui.exe" /s')
لم يفد في أي شيء :d:


 
توقيع : waget
هع :d:

كود:
[COLOR=#aa0000]$setupPath[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ff33ff][COLOR=#ff33ff]@scriptdir[/COLOR][/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Ui.exe"[/COLOR]
[COLOR=#aa0000]$silentSwitch[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]" /VERYSILENT /SP-"[/COLOR]
[COLOR=#aa0000]$mainFileName[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"UltraISO.exe"[/COLOR]
[COLOR=#aa0000]$programPath[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]RegRead[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]""[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#009933];check program installation path from registry and make sure if it is[/COLOR]
[COLOR=#009933];installed( sometime when you uninstall program registry entries will not be deleted .)[/COLOR]
[COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$programPath[/COLOR] [COLOR=#ff0000]<[/COLOR][COLOR=#ff0000]>[/COLOR] [COLOR=#9999cc]""[/COLOR] [COLOR=#0000ff]Then[/COLOR]
[COLOR=#aa0000]$CheckFileExist[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]FileExists[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$programPath[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\"[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$mainFileName[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$CheckFileExist[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]1[/COLOR] [COLOR=#0000ff]Then[/COLOR]
[COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"error"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]" UltraISO is alreadt Installed .."[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#0000ff]Exit[/COLOR]
[COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#009933]; silent install[/COLOR]
[COLOR=#aa0000]$silentInstall[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]Ru[/COLOR][COLOR=navy]nWait[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$setupPath[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$silentSwitch[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]RegWrite[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"Registration"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"REG_SZ"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"efa088d4ebe7a8fcc4c5f0f3c396e4d6"[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]RegWrite[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"UserName"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"REG_SZ"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"Netz.ru"[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]" Done "[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"Done"[/COLOR][COLOR=#ff0000])[/COLOR]

:smile:
 
توقيع : LINEZERO
هع :d:

كود:
[COLOR=#aa0000]$setupPath[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ff33ff][COLOR=#ff33ff]@scriptdir[/COLOR][/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Ui.exe"[/COLOR]
[COLOR=#aa0000]$silentSwitch[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]" /VERYSILENT /SP-"[/COLOR]
[COLOR=#aa0000]$mainFileName[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"UltraISO.exe"[/COLOR]
[COLOR=#aa0000]$programPath[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]RegRead[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]""[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#009933];check program installation path from registry and make sure if it is[/COLOR]
[COLOR=#009933];installed( sometime when you uninstall program registry entries will not be deleted .)[/COLOR]
[COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$programPath[/COLOR] [COLOR=#ff0000]<[/COLOR][COLOR=#ff0000]>[/COLOR] [COLOR=#9999cc]""[/COLOR] [COLOR=#0000ff]Then[/COLOR]
[COLOR=#aa0000]$CheckFileExist[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]FileExists[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$programPath[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\"[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$mainFileName[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$CheckFileExist[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]1[/COLOR] [COLOR=#0000ff]Then[/COLOR]
[COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"error"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]" UltraISO is alreadt Installed .."[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#0000ff]Exit[/COLOR]
[COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#009933]; silent install[/COLOR]
[COLOR=#aa0000]$silentInstall[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]Ru[/COLOR][COLOR=navy]nWait[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$setupPath[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$silentSwitch[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]RegWrite[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"Registration"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"REG_SZ"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"efa088d4ebe7a8fcc4c5f0f3c396e4d6"[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]RegWrite[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"UserName"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"REG_SZ"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"Netz.ru"[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]" Done "[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"Done"[/COLOR][COLOR=#ff0000])[/COLOR]
:smile:


هلا والله :d:

أموت وأعرف :hh: من وين جبت السويتش ..

حتى الدلخ Total Uninstall مو مطلع مفتاح الريجستري
كود:
[COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR]
إن معلومات التسجيل تنضاف فية برضه

^
قاعد يرقع :hh:
 
توقيع : waget
هلا والله :d:

أموت وأعرف :hh: من وين جبت السويتش ..

حتى الدلخ Total Uninstall مو مطلع مفتاح الريجستري
كود:
[COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][/CENTER]
إن معلومات التسجيل تنضاف فية برضه


^
قاعد يرقع :hh:


:p:​
 
توقيع : LINEZERO
هلا والله :d:​

أموت وأعرف :hh: من وين جبت السويتش ..​

حتى الدلخ Total Uninstall مو مطلع مفتاح الريجستري​
كود:
[CENTER][COLOR=#9999cc]"HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0"[/COLOR][/CENTER]
إن معلومات التسجيل تنضاف فية برضه​


^
قاعد يرقع :hh:​
بارك الله فيك أخي بندر كود رائع

أموت وأعرف :hh: من وين جبت السويتش ..​
لكن أنا الذي حيرني ان برنامج يعطيني شويتش متوقعت يكون شويتش خطأ
هذا مواقع فيه شويتش برامج لكن مش عارف أن كان بندر عنده مصدر أخره
وفيه نفس شويتش الذي جابه بندر:hh:

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
 
توقيع : ramay
بارك الله فيك أخي بندر كود رائع


لكن أنا الذي حيرني ان برنامج يعطيني شويتش متوقعت يكون شويتش خطأ
هذا مواقع فيه شويتش برامج لكن مش عارف أن كان بندر عنده مصدر أخره
وفيه نفس شويتش الذي جابه بندر:hh:

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

انا ماغش مثلكم من قوقل :d:​
 
توقيع : LINEZERO
بارك الله الله فيك بندرطيب بعض الاشياء في كود غامضه لماذا وضعته
كل لون أحمر ممكن توضيح
كود:
$setupPath = @scriptdir & "\Ui.exe"
$silentSwitch = " /VERYSILENT /SP-"
[COLOR=red]$mainFileName = "UltraISO.exe"[/COLOR]
$programPath = RegRead("HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0", "")
;check program installation path from registry and make sure if it is
;installed( sometime when you uninstall program registry entries will not be deleted .)
If $programPath <> [COLOR=red]""[/COLOR] Then
$CheckFileExist = FileExists($programPath & [COLOR=red]"\"[/COLOR] & $mainFileName)
If $CheckFileExist = 1 Then
MsgBox(0, "error", " UltraISO is alreadt Installed ..")
Exit
EndIf
EndIf
; silent install
$silentInstall = RunWait($setupPath & $silentSwitch)
RegWrite("HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0", "Registration", "REG_SZ", [COLOR=red]"efa088d4ebe7a8fcc4c5f0f3c396e4d6")   ;   ذه بيانات التى في دخل مفتاح تسجيل هل مفتاح برنامج لايصلح وضعه ويجب وضع بيانات بدله  [/COLOR]
[COLOR=red] [/COLOR]RegWrite("HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0", "UserName", "REG_SZ", "Netz.ru")
MsgBox(0, " Done ", "Done")
 
توقيع : ramay
كود:
$ramay = 100
While ($ramay > 8)
    MsgBox(0,"","Counter = " & $ramay)
   $ramay =  $ramay - 10
WEnd
 
توقيع : ramay
عوده مجدده ياشباب حاولت أعمل تنصيب صامت لبرنامج
MP3 To Ringtone Gold v3.16
طيب هذا برنامج يضع تسجبله كتالي​

يأنشاء مجلد في هذا مسار​
كود:
C:\Users\ramay\AppData\Local\VirtualStore\Program Files\[COLOR=red]AnMing[/COLOR]
واسم مجلد AnMing
ويأنشاء في داخله
مفتاح تسجيل باسم
key.dat
وهو مفتاح تسجيل بتعه
هل يوجد طريقة غير أن أخذ مفتاح تسجيل بتعه
يعني عن طريق ريجستري
:?:​
 
توقيع : ramay
عوده مجدده ياشباب حاولت أعمل تنصيب صامت لبرنامج

MP3 To Ringtone Gold v3.16
طيب هذا برنامج يضع تسجبله كتالي

يأنشاء مجلد في هذا مسار
كود:
C:\Users\ramay\AppData\Local\VirtualStore\Program Files\[COLOR=red]AnMing[/COLOR]
واسم مجلد AnMing
ويأنشاء في داخله
مفتاح تسجيل باسم
key.dat
وهو مفتاح تسجيل بتعه
هل يوجد طريقة غير أن أخذ مفتاح تسجيل بتعه
يعني عن طريق ريجستري

:?:




جاري التجربه :d:​
 
توقيع : LINEZERO
ارفع لي الكراك على الخاص :smile:
 
توقيع : LINEZERO
بارك الله الله فيك بندرطيب بعض الاشياء في كود غامضه لماذا وضعته
كل لون أحمر ممكن توضيح
كود:
$setupPath = @scriptdir & "\Ui.exe"
$silentSwitch = " /VERYSILENT /SP-"
[COLOR=red]$mainFileName = "UltraISO.exe"[/COLOR]
$programPath = RegRead("HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0", "")
;check program installation path from registry and make sure if it is
;installed( sometime when you uninstall program registry entries will not be deleted .)
If $programPath <> [COLOR=red]""[/COLOR] Then
$CheckFileExist = FileExists($programPath & [COLOR=red]"\"[/COLOR] & $mainFileName)
If $CheckFileExist = 1 Then
MsgBox(0, "error", " UltraISO is alreadt Installed ..")
Exit
EndIf
EndIf
; silent install
$silentInstall = RunWait($setupPath & $silentSwitch)
RegWrite("HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0", "Registration", "REG_SZ", [COLOR=red]"efa088d4ebe7a8fcc4c5f0f3c396e4d6")   ;   ذه بيانات التى في دخل مفتاح تسجيل هل مفتاح برنامج لايصلح وضعه ويجب وضع بيانات بدله  [/COLOR]
RegWrite("HKEY_CURRENT_USER\Software\EasyBoot Systems\UltraISO\5.0", "UserName", "REG_SZ", "Netz.ru")
MsgBox(0, " Done ", "Done")

المعذره مانتبهت :b:
كود:
[COLOR=red]$mainFileName = "UltraISO.exe"[/COLOR]

اسناد قيمه نصيه لمتغير ؛؛ لاستخدام المتغير بدال الجمله النصيه << غير ضروري :d:

كود:
If $programPath <> [COLOR=red]""[/COLOR] Then

عند قراءة قيم الرجستري ؛؛ فان القيم العائده اذا كانت القيمه موجوده لاتساوي "" :bleh:

كود:
$CheckFileExist = FileExists($programPath & [COLOR=red]"\"[/COLOR] & $mainFileName)
هذي لكتابة المسار المقروء من الرجستري + اسم البرنامج
يعني كاني كتبت مذا
PHP:
"C:\Program Files\UltraISO\UltraISO.exe"

:smile:
 
توقيع : LINEZERO
عدنا :d: واعتذر عن الغياب الي حصل
بسبب المشاكل النفسيه والارهاق والتعب الامتحانات
والجامعة ومشاغل الحياه وربنا يوفقنا في حياتنا وياكم يارب في الاخره

نطبق الدرس الاول
himoScript
PHP:
$hatem = ProcessWait("chrome.exe",5)
if $hatem = 0 then
    msgbox (0,"فشل","فشل")
Else
msgbox    (0,"تم","نجح")
    endif
</b>
PHP:
;تشغيل كمسؤول
Break(0)
MsgBox(0,"","تم منع إيقاف السيكريبت")
RunWait("regedit.exe")
Break(1)
MsgBox(0,"","تم السماح بإيقاف السيكريبت")
RunWait ("regedit.exe")
MsgBox(0,"","END")



=============================================================
;اخفاء الايقونه السكربت
PHP:
#NoTrayIcon
RunWait("regedit.exe")
MsgBox(0,"","END")

=========================================================
PHP:
لخاصيه 
; opt
; لم استخدمها بعد يالغالوالي فيما بعد  راح يتم تطبيقها
====================================================
PHP:
; [1]العبارة switch 
; قد تم تطبيقها من قبلي من قبل ساابحث عن مشاركتي  لضعها هنا
; هي احدى العاب الموجود عنا في غزة لعبه الاقل مرتبه
switch inputbox ("أدخل","لعبه الاقل هو الفائز")
     case ""
        msgbox(0,"","لم تدخل شيء ")
    Case 90 to 100
        msgbox(0,"","خاسر")
    Case 80 to 89
        msgbox(0,"","متوسط")
    Case 70 to 79
        msgbox(0,"","ناجح")
    Case else
        msgbox(0,"","متفوق")
endswitch
=================================================
PHP:
; عباره Select 
; اريد مثال اخر
:cr:

===========================================
PHP:
ShellExecute("http://www.zyzoom.org/vb/showpost.php?p=2986951&postcount=425")
ShellExecute(@DesktopDir&"\hatem.bat")
;تحرير الملف
لم اعمل عليها بعد
;فتح الملف ودمج القيم في الريجستري 
لم اعمل عليها بعد
;بالنسبة لتنصيب الصامت لملف الريجستري نستخدم هذي الطريقه :
;قد تعاملت معاها من قبل لاني من مستخدمين التثبيت الصامت وفاهم الكود
ShellExecute("regedit.exe","/s hatem.reg")
 
توقيع : format
[2]الحلقات..Nested loop


[2]الحلقات..Nested loop

اليوم راح نأخذ الحلقات المتداخله Nested loop

تهمنا كثير في المصفوفات << نأخذها لاحقاً

فكرتها نفس فكره الشروط المتداخله ..

إذا تحقق شرط العبارة الاولى يدخل الحلقة ..

ينفذ مابداخلها حتى يصل للحلقة الي داخلها ..

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

إذا تحقق شرطها هنا يدخل الحلقة ويبدأ ينفذها إلى الاخر

لاحظ هنا نحن أخذنا دورة واحده في الحلقة الاولى

وخلصنا جميع دورات الحلقة الثانية :)

يعني في كل دورة واحدة في الحلقة الاولى يدخل ينفذ جميع دوارات الحلقة الثانية

جربو هذا المثال بعد التجربه حاول تفهم الكود وإيش فايدة كل سطر :)

كود:
$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
 
توقيع : waget
أستفسار يا الغالي
لماذا أذا تحقق شرط عباره الاولى ينفذ عبارة ثانيه قبل ثم بعده ينفذ عباره الاولى ما فائده في ذلك
 
توقيع : ramay
لاهنت ياستاذ عبدالله

تطبيقي

كود:
[COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]9[/COLOR]
[COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]9[/COLOR]
[COLOR=#aa0000]$msg[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]""[/COLOR]
[COLOR=#0000ff]While[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$var[/COLOR] [COLOR=#ff0000]<[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]9[/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]9[/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]$msg[/COLOR] [COLOR=#ff0000]&[/COLOR][COLOR=#ff0000]=[/COLOR] [COLOR=#aa0000]$var2[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]" "[/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=#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=#ff33ff][COLOR=#ff33ff]@CR[/COLOR][/COLOR][COLOR=magenta]LF[/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=#0000ff]WEnd[/COLOR]

:smile:
 
توقيع : LINEZERO
أستفسار يا الغالي

لماذا أذا تحقق شرط عباره الاولى ينفذ عبارة ثانيه قبل ثم بعده ينفذ عباره الاولى ما فائده في ذلك


لنفرض انه يوجد لديك عدد من المجلدات
وداخل كل مجلد عدد من الملفات :d:

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

يعني تحط المجلدات كلها بدواره
وبداخل الدواره دواره للملفات الموجوده بداخل كل مجلد :u:
ثم تنتقل للمجلد الي بعده .. الخ :p:
 
توقيع : LINEZERO
الحالة
مغلق و غير مفتوح للمزيد من الردود.
عودة
أعلى