| Just4Me |
05-09-2009 05:57 AM |
اقتباس:
المشاركة الأصلية كتبت بواسطة xXOverHellXx
(المشاركة 1425377)
الله عليك فعلا تسلم ايديك ومجهود جميل وشكراً ليـــك
|
اقتباس:
المشاركة الأصلية كتبت بواسطة king_shefa
(المشاركة 1425384)
ايوه كده يا محمد ورينا ابداعاتك
|
اقتباس:
المشاركة الأصلية كتبت بواسطة M00N_KNIGHT
(المشاركة 1425410)
انا يشرفنى انى اكون من اوائل الرد على الموضوع ده
بجد ربنا معاك و فى انتظار المزيد و التقدم المستمر
|
اقتباس:
المشاركة الأصلية كتبت بواسطة howareyou
(المشاركة 1425427)
بارك الله فيك يستحق التثبيت
|
اقتباس:
المشاركة الأصلية كتبت بواسطة UltimateDragon
(المشاركة 1425466)
الف شكر انتا كدا 10/10 نا كنت بدور على mysro loader من زمان الف شكر
|
اقتباس:
المشاركة الأصلية كتبت بواسطة zuoka
(المشاركة 1425514)
ده فعلاَ شغل تمام شكراَ على مجهودك الكبير
|
اقتباس:
المشاركة الأصلية كتبت بواسطة amrbackECSRO
(المشاركة 1425518)
الله عليك
|
اقتباس:
المشاركة الأصلية كتبت بواسطة karem20055002
(المشاركة 1425554)
الف شكر يا مان علي المجهود الجامد دة
ومستني اللودر الاخير بفارغ الصبر
|
اقتباس:
المشاركة الأصلية كتبت بواسطة dodo009900
(المشاركة 1425705)
تمام مستني لودر sunworld
|
اقتباس:
المشاركة الأصلية كتبت بواسطة thething
(المشاركة 1425809)
مشكور
|
شكرا للمرور :)
اقتباس:
المشاركة الأصلية كتبت بواسطة elbasha07
(المشاركة 1426398)
لو تقدر تعملنا autopot علشان الموجود ده مش حلو
|
صعب اوى محتاج اعرف لون الmp و hp pixel
اقتباس:
المشاركة الأصلية كتبت بواسطة hatem
(المشاركة 1426446)
تسلم ايدك على البرامج و بسرعة يلا عشان انا بلعب على Sunworld sro مشكوررررر
|
بعمله
اقتباس:
المشاركة الأصلية كتبت بواسطة w7osh
(المشاركة 1426607)
والله انت راجل 10/10
Thnx انا كنت نفسى فى Loader Sjsro
تقبل مرورى
|
اقتباس:
المشاركة الأصلية كتبت بواسطة o0oHaSaNo0o
(المشاركة 1426647)
مشكور على اللودر يا باشا
تحياتي
|
اقتباس:
المشاركة الأصلية كتبت بواسطة keng_egypt
(المشاركة 1426658)
تسلم يا ابو حميد الله ينور عليك تسلم ابدعاتك بس اعتقد انه صناعة php
|
لا autoit اسهل حاجه :p
اقتباس:
المشاركة الأصلية كتبت بواسطة Magic_Girl
(المشاركة 1426805)
شكرا
بس انا عامل موضوع عن اللودر وشغال
على العموم ربنا يوفقك
|
:rolleyes:
اقتباس:
المشاركة الأصلية كتبت بواسطة 3abkarino
(المشاركة 1426916)
الف شكر يا باشا و لو مسموح ممكن انقله لمنتديات اجنبيه و هكتب ان انت اللي عامله؟
|
اجنبية بتسرق السورس
اقتباس:
المشاركة الأصلية كتبت بواسطة LinkTheSink
(المشاركة 1426998)
راجل عسل و 100 100
اشطة يا عم المبرمج ^^
|
:rolleyes:
ّّ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~
كود:
#NoTrayIcon
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
$kernel32 = DllOpen('kernel32.dll')
GUICreate('ZeroMax® v.1.2', 270, 360)
GUISetState(@SW_SHOW)
GUICtrlCreateLabel("ZeroMax® Loader" , 90, 5)
GUICtrlCreateLabel("By" , 130, 25)
GUICtrlCreateLabel("Just4Me" , 115, 45)
GUICtrlCreateLabel("www.silkroad4arab.com" , 80, 65)
GUICtrlCreateGroup("Settings", 5, 80, 265, 120)
$nodc = GUICtrlCreateCheckbox('No Disconnect', 20, 100)
$zoom = GUICtrlCreateCheckbox('Ultimate Zoom', 20, 120)
$swear = GUICtrlCreateCheckbox('Abuse', 20, 140)
$select = GUICtrlCreateCheckbox('AutoSelect Range', 20, 160)
$nude = GUICtrlCreateCheckbox('Nude', 120,120)
$illegal = GUICtrlCreateCheckbox('Illegal Names', 120, 100)
$oldsj = GUICtrlCreateRadio('SJSRO New', 10, 220)
$newsj = GUICtrlCreateRadio('SJSRO old', 10, 240)
$mysro = GUICtrlCreateRadio('MYSRO(bugged not working)use mysro media', 10, 260)
$go = GUICtrlCreateButton('Start Game' , 40, 290, 200, 25)
$exit = GuiCtrlCreateButton('Exit Loader', 40, 320, 200,25)
GUICtrlCreateGroup("Servers", 5, 200, 265, 150)
While 1
$msg = GUIGetMsg()
If $msg = $go Then
For $iSelected_Radio = $oldsj To $mysro
If GUICtrlRead($iSelected_Radio) = 1 Then ExitLoop
Next
Switch $iSelected_Radio
Case $oldsj
$pid = Run(@ScriptDir & '\sro_client.exe ' & '0 /4 0 0')
Case $new
$pid = Run(@ScriptDir & '\sro_client.exe ' & '0 /4 1 0')
Case $mysro
$pid = Run(@ScriptDir & '\sro_client.exe ' & '0 /4 0 0')
EndSwitch
Exit
ElseIf $msg = $exit Then
Exit
ElseIf $msg = -3 Then
Exit
EndIf
WEnd
Func ptrino()
$mid = memopen($pid)
;mc
If GUICtrlRead($nodc) = 1 Then
memwrite($mid, 0x5E206, "EB")
Else
EndIf
;zoomhack
If GUICtrlRead($zoom) = 1 Then
memwrite($mid, 0x4E30D, "EB")
memwrite($mid, 0x4E336, "EB")
Else
EndIf
;swear filter
If GUICtrlRead($swear) = 1 Then
memwrite($mid, 0x42678, "EB")
memwrite($mid, 0x50D06, "E9BA00000090")
memwrite($mid, 0x52F55, "E9BB00000090")
Else
EndIf
;nude patch
If GUICtrlRead($nude) = 1 Then
memwrite($mid, 0x61B3B, "E9EB00000090")
Else
EndIf
;illegal name filter
If GUICtrlRead($illegal) = 1 Then
memwrite($mid, 0x581D3, "EB")
memwrite($mid, 0x58DF3, "EB")
memwrite($mid, 0x59216, "EB")
Else
EndIf
;autoselect range
If GUICtrlRead($select) = 1 Then
memwrite($mid, 0x65534, "00409C45")
memwrite($mid, 0x661C4, "00409C45")
Else
EndIf
memclose($mid)
EndFunc
Func memopen($pid)
Local $mid = DllCall($kernel32, 'int', 'OpenProcess', 'int', 0x1F0FFF, 'int', 1, 'int', $pid)
Return $mid[0]
EndFunc ;==>memopen
Func memwrite($mid, $adress, $hex)
Local $struct = DllStructCreate('byte[' & BinaryLen('0x' & $hex) & ']')
For $i = DllStructGetSize($struct) To 1 Step - 1
DllStructSetData($struct, 1, BinaryMid('0x' & $hex, $i, 1), $i)
Next
Local $x = DllCall($kernel32, 'int', 'VirtuaotectEx', 'int', $mid, 'ptr', $adress, 'int', DllStructGetSize($struct), 'dword', 0x40, 'dword*', 0)
DllCall($kernel32, 'int', 'WriteProcessMemory', 'int', $mid, 'int', $adress, 'ptr', DllStrtGetPtr($uct), 'int', DllStGetSize($struct), 'int', 0)
DllCall($kernel32, 'int', 'VirtualPtEx', 'int', $mid, 'ptr', $adress, 'int', DllStructGetSize($struct), 'dword', $x[5], 'dword*', 0)
EndFunc ;==>memwrite
Func memclose($mid)
DllCall($kernel32, 'int', 'CloseHandle', 'int', $mid)
EndFunc ;==>memclose
Func nop($nr)
Local $nop
For $i = 1 To $nr
$nop &= 90
Next
Return $nop
EndFunc ;==>nop
Func FloatToHex($float)
Local $a = DllCall($kernel32, 'int', 'MulDiv', 'Float', $float, 'int', 1, 'int', 1)
Return Hex($a[0])
EndFunc
Func ReverseHex($hex)
Local $x
For $i=StringLen($hex)+1 To 1 Step -2
$x &= StringMid($hex, $i, 2)
Next
Return $x
EndFunc
|
