الموقع العربي الاول للعبة Silkroad Online - عرض مشاركة واحدة

**Just4Me** · 05-09-2009, 05:57 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة xXOverHellXx عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

الله عليك فعلا تسلم ايديك ومجهود جميل وشكراً ليـــك

اقتباس:

المشاركة الأصلية كتبت بواسطة king_shefa عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

ايوه كده يا محمد ورينا ابداعاتك

اقتباس:

المشاركة الأصلية كتبت بواسطة M00N_KNIGHT عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

انا يشرفنى انى اكون من اوائل الرد على الموضوع ده
بجد ربنا معاك و فى انتظار المزيد و التقدم المستمر

اقتباس:

المشاركة الأصلية كتبت بواسطة howareyou عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

بارك الله فيك يستحق التثبيت

اقتباس:

المشاركة الأصلية كتبت بواسطة UltimateDragon عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

الف شكر انتا كدا 10/10 نا كنت بدور على mysro loader من زمان الف شكر

اقتباس:

المشاركة الأصلية كتبت بواسطة zuoka عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

ده فعلاَ شغل تمام شكراَ على مجهودك الكبير

اقتباس:

المشاركة الأصلية كتبت بواسطة amrbackECSRO عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

الله عليك

اقتباس:

المشاركة الأصلية كتبت بواسطة karem20055002 عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

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

اقتباس:

المشاركة الأصلية كتبت بواسطة dodo009900 عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

تمام مستني لودر sunworld

اقتباس:

المشاركة الأصلية كتبت بواسطة thething عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

مشكور

شكرا للمرور :)

اقتباس:

المشاركة الأصلية كتبت بواسطة elbasha07 عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

لو تقدر تعملنا autopot علشان الموجود ده مش حلو

صعب اوى محتاج اعرف لون الmp و hp pixel

اقتباس:

المشاركة الأصلية كتبت بواسطة hatem عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

تسلم ايدك على البرامج و بسرعة يلا عشان انا بلعب على Sunworld sro مشكوررررر

بعمله

اقتباس:

المشاركة الأصلية كتبت بواسطة w7osh عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

والله انت راجل 10/10

Thnx انا كنت نفسى فى Loader Sjsro

تقبل مرورى

اقتباس:

المشاركة الأصلية كتبت بواسطة o0oHaSaNo0o عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

مشكور على اللودر يا باشا
تحياتي

اقتباس:

المشاركة الأصلية كتبت بواسطة keng_egypt عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

تسلم يا ابو حميد الله ينور عليك تسلم ابدعاتك بس اعتقد انه صناعة php

لا autoit اسهل حاجه :p

اقتباس:

المشاركة الأصلية كتبت بواسطة Magic_Girl عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

شكرا

بس انا عامل موضوع عن اللودر وشغال

على العموم ربنا يوفقك

اقتباس:

المشاركة الأصلية كتبت بواسطة 3abkarino عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

الف شكر يا باشا و لو مسموح ممكن انقله لمنتديات اجنبيه و هكتب ان انت اللي عامله؟

اجنبية بتسرق السورس

اقتباس:

المشاركة الأصلية كتبت بواسطة LinkTheSink عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

راجل عسل و 100 100

اشطة يا عم المبرمج ^^

ّّ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~

كود:

#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