development-point

development-point (https://vb.development-point.com/index.php)
-   قسم إختراق الأجـهـزه والأيـمـيـلات (https://vb.development-point.com/forumdisplay.php?f=17)
-   -   ،Autoit V3 ,Crypter Data V1.1 + ,سورس (https://vb.development-point.com/showthread.php?t=3004)

‏windows 8 11-08-2012 02:30 AM

،Autoit V3 ,Crypter Data V1.1 + ,سورس
 


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

http://up.arab-x.com/Mar10/iTS30053.png

هده ايقونة البرنامج :

http://img11.hostingpics.net/pics/418143icon.png


http://up.arab-x.com/Mar10/iTS30053.png

هده صورة لواجهة البرنامج مع شرح أثناء تشفير و فك تشفير نص او بالأحرى أسمي :15: :

http://img11.hostingpics.net/pics/140529Sanstitre1.png



http://up.arab-x.com/Mar10/iTS30053.png
وهذه صورة أخرى أيضا :


http://img11.hostingpics.net/pics/689517Sanstitre2.png
http://up.arab-x.com/Mar10/iTS30053.png

هنا سأشرح البرنامج بسيط ولا يحتاج الى شرح :

عمل البرنامج هوا تشفير النصوص التي تقوم أنت بأدخالها وتشفيرها.
http://up.arab-x.com/Mar10/iTS30053.png
كل ما عليك فعله هوا أن تدخل النص المراد أدخاله في Input الاولى من تم تضغط على الزر Crypte Data
http://up.arab-x.com/Mar10/iTS30053.png
ولفك تشفير النص قم بنسخ كود الهيكس وأدخله الى Input 3 التي هيا في المجموعة Decrypte
تم أضغط على الزر المسمى Décrypte Data
http://up.arab-x.com/Mar10/iTS30053.png
الان نأتي الى صورة من جوزء من السورس كود :


http://img11.hostingpics.net/pics/267993Sours.png

http://up.arab-x.com/Mar10/iTS30053.png
ملاحضة لغة البرمجة : Autoit V3
http://up.arab-x.com/Mar10/iTS30053.png
أخوتي مكان وضعي للملف التنفيذي اي البرنامج بأمتداد exe

قررت وضع السورس كود كاملا ليستفيد الاعضاء أكثر

وخاصتا بسبب ان حاسوبي مفيرس :29:
http://up.arab-x.com/Mar10/iTS30053.png
هنا السورس كود كاملا :

كود:

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

AutoIt Version: 1.1.0.0

Author: MII3A_H4CK3R

Script Function: Crypter Data

Template AutoIt script.

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

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=..\..\..\fam fam fam\Icon\djack.ICO
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvo ker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include
#include
#include
#include
#include
#Region ### START Koda GUI section ### Form=D:\M!I3A-Soft\All Prger\Forms\Crypter Data.kxf
$Form1 = GUICreate("Crypter Data V1.1 By MII3A_H4CK3R", 322, 530, 192, 124)
GUISetBkColor(0xFFFFFF)
$Pic1 = GUICtrlCreatePic(@ScriptDir&*/5"\stock-vector-yellow-and-black-biohazard-warning-sign-vector-11226514.jpg", -9, -59, 340, 276)
$Group1 = GUICtrlCreateGroup(" ", 8, 264, 305, 113)
$Button1 = GUICtrlCreateBuلقثيtton("Crypt Data", 128, 344, 75, 25)
$Input1 = GUICtrlCreateInput("", 16, 280, 289, 21)
$Input2 = GUICtrlCreateInput("", 16, 312, 289, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup(" ", 8, 400, 305, 113)
$Input3 = GUICtrlCrea4569teInput("", 16, 416, 289, 21)
$Input4 = GUICtrlCreateInput("", 16, 448, 289, 21)
$Button2 = GUICtrlCreateButton("Décrypt Data", 128, 480, 75, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic2 = GUICtrlCreatePic("D:\M!I3A-Soft\fam fam fam\Mini\icon_padlock.gif", 16, 256, 17, 17)
$Pic3 = GUICtrlCreatePic("D:\M!I3A-Soft\fam fam fam\Mini\icon_key.gif", 16, 392, 17, 17)
$Label1 = GUICtrlCreateLabel("Crypter Data V1.1 By MII3A_H4CK3R", 63, 240, 215, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1

Local $String = GUICtrlRead($Input1)

Local $Hex =Error($String)

GUICtrlSetData($Input2,$Hex)

case $Button2

Local $string2 = GUICtrlRead($Input3)

Local $Hex2= Error($String2)

GUICtrlSetData($Input4,$Hex2)

EndSwitch

WEnd

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

AutoIt Version: 1.1.0.0

Author: MII3A_H4CK3R

Script Function: Crypter Data

Template AutoIt script.

#ce ----------------------------------------------------------------------------
http://up.arab-x.com/Mar10/iTS30053.png
للامانة الموضوع منقول للافادة
:SnipeR (75):

Virus!Clown 11-08-2012 03:54 PM

رد: ،Autoit V3 ,Crypter Data V1.1 + ,سورس
 
بارك الله فيك حبيبي

DR.ZA3 11-11-2012 06:44 PM

رد: ،Autoit V3 ,Crypter Data V1.1 + ,سورس
 
يعطيك الف عافية


الساعة الآن 05:03 PM

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
development-point

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47