الجزء الثاني :ـ
كتابة السكربتات بالشكل المناسب
حبايبي :q:,,, أنا لي طلبات لابد من فعلها حتى تكتمل الفائدة ويكون المرجو قد صار ,, وأنا أعرفكم ما تحتاجون توصية ,,
الأول و الأساسي ,,,, لا تكمل النزول في الصفحة إذا كنت لا تريد التطبيق لأنك سوف تستصعبها وهي سههههههههلة ,,,
الثاني ,,, لا تستبق الأمور إمشي خطوة خطوة ,, وجرب كل مثال ,,,
الثالث ,,, لا تعمل نسخ ولصق للأكواد إنت أكتبها بنفسك ,،,,,
الشرح سوف يكون باسلوب فهم الكود وهو الأساس وليس نسخ ولصق ,, حتى نبدع ,,, ولأني أريد الموضوع بابا للدخول في عالم الـ Autoit الراااااااااااااائع
إفتح محرر الأوتوات عن طريق :ـ
ابدأ ثم كافة البرامج ثم Autoit 3 ثم SciTE Script Editor
ستظهر نافذة تابع معي لا هنت ,,,
السكربتات التي تهمنا هنا هي :ـ
1. أكواد أساسية وما يمشي الموضوع من دون معرفتها ,,
2. أكواد جمالية وتكميلية ,,
نبدأ بالنوع الأول ثم نطبق عليه ثم ننتقل إلى النوع الثاني (ياليل ما أطولك)
للأهمية القصوى
جميع الأكواد التي بالصيغة التالية مقلوبة مثل :ـ
كود:
msgbox (0,"تم",تمت العملية بنجاح ")
والمقصود هو :ـ
كود:
msgbox (0,"تمت العملية بنجاح","تمت")
فتنبه لذلك ,,, ولا مشكلة فإن ذلك لن يؤثر في الكود ولكن يؤثر في طريقة عرض الرسائل ,,
فيكون المراد بالعنوان يظهر نص والعكس صحيح ,,,
تابع معي:ـ
1. أكواد أساسية في موضوعنا
هي ثلاثة :-
exit
إطفاء السكريت ويوضع كما هو ,,, exit
run \runwait
ويكون على الصيغة الآتية :ـ
كود:
run[wait] ("path\switch"]
شرح الكود :ـ
run من إسمه باين إنه تشغيل runwait هو يشغل الملف ولا يكمل تنفيذ السكربت إلا بعد إقفاله ,,, مثال 1 /
تريد تشغيل ملف إسمه file.exe
طيب تريد تشغيل الملف ولكن بعد إغلاقه تريد ظهور رسالة تفيد بأنه قد أقفل ,,
نكتب
كود:
[CENTER][FONT=Georgia]كود الرسالة (سيأتي)[/FONT]
ويمكن أيضا كتابة السويتش في مكان اسم الملف ,,
أرجوا إن المعلومة وصلت ,,,
msgbox
لعرض الرسائل
ويكون على الصيغة الآتية ,,
كود:
[CENTER][FONT=Georgia]msgbox (0\4 , "عنوان الرسالة (الذي يظهر في الشريط في الأعلى ) , "نص الرسالة ")[/FONT][/CENTER]
حيث :ـ
كتابة 0 يعني أنه سوف يظهر رسالة بزر ok أو موافق ,,,
كتابة 4 معناه أنه سوف يظهر رسالة بزر yes \ no نعم أو لا ,,
مع ملاحظة مهمة جدا الفاصلة في الأوتووات هي التي في حرف الواو هذي ,
ملاحظة :ـ
في حالة كون الرسالة نعم أو لا ,, لا بد من تعيين متغير ,,
مثال 2/
نكمل على الكود السابق ,,
[/CENTER]
كود:
[CENTER][FONT=Georgia]كود الرسالة[/FONT]
الرسالة ستكون :ـ هكذا :ـ
يكون كود الرسالة هو
كود:
msgbox (0,"","تم التعريب بنجاح")
طريب نرده يظهر رسالة ,, هل تريد تشغيل الملف ,,, نعم أولا ,,
نعين المتغير وسكون Ash نعينه بـ $ بحيث يكون كالتالي :ـ
نعين قيمته وهي الرسالة ,, هكذا :ـ
كود:
$ash = msgbox (4,"اذكر الله " , "هل تريد تشغيل الملف ")
الآن نضع القاعدة التي في جمييييييع لغات البرمجة وهي ,,, if ما فيه أسهل منها ,, وتكون على الصيغة التالية :ـ
كود:
[CENTER][FONT=Georgia]if الشيء المشترط then[/FONT]
[FONT=Georgia]الفعل إذا حدث الشي المشترط[/FONT]
endif[/CENTER]
مثال3 :ـ
نكمل ,,,
أول كتبنا الرسالة وعيننا متغير الآن نكمل ,,,
كود الرسالة :ـ
كود:
[CENTER][FONT=Georgia]$ash = msgbox (4,"اذكر الله " , "هل تريد تشغيل الملف ")[/FONT]
if $ash = 7 then
[FONT=Georgia]exit[/FONT]
[FONT=Georgia]endif[/FONT][/CENTER]
حيث 7 يعني إنك ضغطت على no أو لا ,,,
الكود في الأمثلة السابق كااااااااااااااااااااااامل ,,
كود:
[CENTER][FONT=Georgia]$ash = msgbox (4,"اذكر الله " , "هل تريد تشغيل الملف "([/FONT][/CENTER]
كود:
[CENTER][FONT=Georgia] exit[/FONT]
[FONT=Georgia] endif[/FONT]
[FONT=Georgia]runwait ("file.exe")[/FONT]
[FONT=Georgia]msgbox (0,"تم" , "تم التعريب بنجاح")[/FONT][/CENTER]
ملاحظة :ـ
في الكود السابق إذا ضغطت على لا no سوف يخرج بالأمر exit وإذا ضغطت على نعم yes سوف يقفز من if إلى endif لأن الشرط لم يتحقق ويقعل ما بعدها ,,,
الآن تدرب على الأكود واقعد شوي ,,, تسوي رسايل وأشياء ,,
نسيت شي مهم ,, عشان تجرب الأكواد إضغط على f5 واحفظ الملف بأي إسم ,,, وسيشتغل ,,,
ملاحظات على الطاير :ـ
ـ يمكن تنفيذ جميع أوامر الدوس في الأوتووات ,
ـ الملفات المضغوطة بالوينرار سويتشها دائما يكون
filename /s
حيث
filename اسم الملف ,,,,,,
تطبيق على الكلام اللي فات :ـ
تطبيق 1:ـ
لدينا :ـ
1/ملف تثبيت سويتشه :ـ
كود:
msiexec.exe /i "setup.msi" /qb
2/ملف كراك مصنوع بالطريقة السابقة اسمه :ـ
crack.exe
إذا سويتشه يكون :ـ
crack /s
لماذا ؟ (اقرأ ملاحظات على الطاير مرة أخرى)
مع عرض رسالة في البداية بـ نعم أو لا وعرض رسالة في النهاية تبين أن التثبيت قد انتهى
وعرض رسالة توديع في حالة الضغط على لا ,,,
نبدأ :ـ
كود الرسالة
كود:
[CENTER][FONT=Georgia]$ans = magbox (4,"بسم الله","هل تريد التثبيت ")[/FONT][/CENTER]
كود:
[CENTER][FONT=Georgia]msgbox (0,"إلى اللقاء","إلى اللقاء مع تحيات Ashalshaik")[/FONT]
[FONT=Georgia]exit[/FONT]
[FONT=Georgia]endif[/FONT][/CENTER]
هذا في حالة الرفض إذا في حالة الموافقة نكتب الكود بعدها على طول ,,
ويكون :-
تشغيل سويتش التثبيت
كود:
[CENTER][FONT=Georgia]runwait ("msiexec.exe /i "setup.msi" /qb")[/FONT][/CENTER]
طيب عندنا ملاحظة مهمة وهي إزالة أي علامة تنصيص من السويتش بشرط أن يكون اسم الملف لا يحتوي فراغات ,ليكون هكذا
كود:
msiexec.exe /i setup.msi /qb
ويكون كود تشغيل السويتش هو :ـ
كود:
runwait ("msiexec.exe /i setup.msi /qb")
طيب الآن سويتش الكراك ,,
سؤال :ـ
لماذا استخدمنا runwait ولم نستخدم run ؟
الجواب :ـ
لكي يكون استخراج الكراك بعد إكمال اتثبيت البرنامج ,, لأنه لو اشتغلوا مع بعض ,, يأتي الكراك ويضع ملفه ثم يأتي التثبيت ويضع الملف الغير مكرك بداله ,,,,
والآن كود رسالة التبليغ :ـ
كود:
[CENTER][FONT=Georgia]msgbox (0,"تمت العملية","تم التثبيت والتكريك")[/FONT][/CENTER]
وطبعا كود الخروج exit
العمل النهائي :ـ
كود:
[CENTER] $ans = magbox (4,"بسم الله","هل تريد التثبيت ")
if $ans = 7 then
[COLOR=indigo]msgbox (0,"إلى اللقاء","إلى اللقاء مع تحيات Ashalshaik"([/COLOR]
[COLOR=indigo]exit[/COLOR]
[COLOR=indigo]endif[/COLOR]
[COLOR=green]runwait ("msiexec.exe /i setup.msi /qb")[/COLOR]
[COLOR=green]runwait ("crack.exe /s")[/COLOR]
[COLOR=green]msgbox (0,"تمت العملية","تم التثبيت والتكريك")[/COLOR]
exit[/CENTER]
الأرجواني : في حالة الرفض
الأخضر : في حالة الموافقة
طيب ملاحظة :ـ
نلاحظ أن في حالة الرفض إنتهى بـ exit
لأنه لو ما وضعناه كان كمل وثبت البرنامج كأنك ضغطت على نعم ,,,
التجربة /
الآن انسخ جميع الملفات واحفظ ملف السكريبت في نفس المجلد وشغله ,,, سترى أنه تم التثصيب الصامت ,,,,
الآن نقول من أتقن ماسبق يكون 90% في جيبه ,, شفتوا إنه سهههههههههههههل ,,,
1. أكواد تكميلية وتجميلية ,,,
ونحتاج منها كودين ,,, هما :ـ
1/ التأكد من وجود ملف FileExists
2/إطفاء عملية في النظام (مهمة في حالة الكراك) ProcessClose
يتبع,,,:bleh:
.
