شـريـط الاهـداءات |
|
| قسم المواضيع المكررة و المخالفة هنا يتم وضع المواضيع المخالفة والمواضيع المكررة |
 |
|
|
أدوات الموضوع | تقييم الموضوع | انواع عرض الموضوع |
10-08-2008, 02:21 PM
|
#1 | ||||||||||||
 
|
بدل ما تقعد تعمل form كل شوية للبارتة وواحد يدخل ويروح طالع من البارتى وتطر تعملة من جديد وتتخنق لا البرنامج دة بيعملة اوتوماتيك الشرح اول حاجة تاخد السكربت الى انا حاطة تحت دة وتنقلة في note pad وتعملة save في اي حتة تعجبك وبعد متسطب البرنامج اللي انا حاطة فوق دة تفتحة من ال start حتلاقي برنامج موجود فية اسمة run script وتفتح منة الملف اللى انت عملتلو save حتطلعلك window حتدوس ok وبعد كدة في المربع حتكتب 1 وتدوس start بعد متكون فتحت اللعبة طبعا كل دقيقة تقريبا حيعمل form لل partyويعمل accept للناس لوحدة تحت السكربت حتلاقو صور عشان لو حد مش فاهم حاجة السكربت : MsgBox ( 0, "Party Script", "Start Script") #include <GuiConstants.au3> Opt("GUIOnEventMode", 1) Dim $PT Dim $PTC=600 ; time between paty checking (10 = 1 sec) Dim $res Dim $p=0 GuiCreate("BixParty", 150,100) GUISetOnEvent($GUI_EVENT_CLOSE, 'CLOSEButton') GuiCtrlCreateLabel("resolution"&@CR&"1 = 1024x768"&@CR&"2 = 1280x1024",5,5,80, 50) $resW=GUICtrlCreateInput($res,90, 10, 50, 20,$ES_NUMBER) GUICtrlSetLimit($resW,1) $Start = GUICtrlCreateButton("Start", 40, 60, 60, 25,$BS_FLAT) GUICtrlSetOnEvent($Start, "StartButton") GUISetState() While 1 Sleep(100) if winactive("SRO_Client") then $PT= $PT+1 ToolTip($PT,300,300) if $res=1 Then PatyChk() EndIf If $res=2 Then PatyChk2() EndIf AcptPty() endif WEnd Func StartButton() $res = GUICtrlRead($resW) GUICtrlSetData($Start,"Stop") GUICtrlSetData($Start,"Start") EndFunc Func PatyChk() if $PT >= $PTC then $PT = 0 if (PixelGetColor(10,240) <> 0) and (PixelGetColor(11,300) <> 0) then if (PixelGetColor(473,160)= 16777215) and (PixelGetColor(208,280) = 16777215 ) then send("e") Sleep(200) EndIf $p=0 send("e") Sleep(500) while (PixelGetColor(250,302) = 0) and $p<50 Sleep(50) $p=$p+1 wend $p=0 if (PixelGetColor(250,302) = 16777215) then MouseClick("left",610,590,1,0) Sleep(500) MouseClick("left",460,540,1,0) Endif send("e") Endif Endif Endfunc Func PatyChk2() if $PT >= $PTC then $PT = 0 if (PixelGetColor(12,244) <> 0) and (PixelGetColor(10,300) <> 0) then if (PixelGetColor(601,290)= 16777215) and (PixelGetColor(336,402) = 16777215 ) then send("e") Sleep(200) EndIf $p=0 send("e") Sleep(500) while (PixelGetColor(378,430) = 0) and $p<50 Sleep(50) $p=$p+1 wend $p=0 if (PixelGetColor(378,430) = 16777215) then MouseClick("left",745,720,1,0) Sleep(500) MouseClick("left",594,668,1,0) Endif send("e") Endif Endif Endfunc Func AcptPty() if PixelGetColor(10,300)<>0 Then if $res = 1 Then if (PixelGetColor(468,243) = 16777215) and (PixelGetColor(614,385) = 16777215) and (PixelGetColor(611,385) = 0) and (PixelGetColor(364,355) = 16777215) then MouseClick("left",470,500,1,0) Sleep(200) Endif EndIf If $res = 2 Then if (PixelGetColor(599,375) = 16777215) and (PixelGetColor(675,510) = 16777215) and (PixelGetColor(720,490) = 0) and (PixelGetColor(492,485) = 16777215) then MouseClick("left",600,630,1,0) Sleep(200) Endif EndIf EndIf Endfunc Func CLOSEButton() exit EndFunc الشرح بالصور      رابط التحميل من الموقع الاصلى اهو عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ] ودى صورة علشان تعرف انهو برنامج الى هتحملة  ودة البرنامج من رفعى انا على rapidshare فك الضغط falcon_2007 عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ] و نتيجة الفحص منى بردة عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ] الصور منقولة للامانة والاسكريبت انما رابط التحميل انا الى عاملة ونتيجة الفحص انا الى عاملهم يا ريت كلمة شكر لو تقدر |
||||||||||||
|
|
| إعلانات google |
|
|
|
11-08-2008, 12:31 AM
|
#2 | ||||||||||||
|
فين الردود
|
||||||||||||
|
|
|
11-08-2008, 08:50 AM
|
#3 | ||||||||||||
  
|
©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــ¤©§¤°حلو ووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــ¤©§¤°حلو ووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــ¤©§¤°حلو ووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــ¤©§¤°حلو ووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــ¤©§¤°حلو ووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــ¤©§¤°حلو ووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ـــــــــــــــــــــــــــــــــ¤©§¤°حلوووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ـــــــــــــــــــــ¤©§¤°حلوووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــــ ــــــــ ¤©§¤°حلوووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــــــــــــــ¤© §¤°حلوووو°¤§© ©§¤°تسلموو°¤§©¤ـــــــــــــــــــــ¤©§¤°حلوووو°¤§ © ©§¤°تسلموو°¤§©¤ـــــــــــــ¤©§¤°حلوو°¤§© ©§¤°تسلموو°¤§©¤ــ¤©§¤°حلوو°¤§© مشكوووووووووووووووووووووور مشكوووووووووووووووور |
||||||||||||
|
|
|
11-08-2008, 04:48 PM
|
#4 | |||||||||||||
|
اقتباس:
|
|||||||||||||
|
|
|
17-08-2008, 12:52 PM
|
#5 | ||||||||||||
|
:d:d مشكوووووووووووووور:d:d |
||||||||||||
|
|
|
17-08-2008, 02:09 PM
|
#6 | ||||||||||||
|
شكرا لمروركم
|
||||||||||||
|
|
|
17-08-2008, 03:33 PM
|
#7 | ||||||||||
|
مش شغال عندى يا باشا
|
||||||||||
|
|
|
17-08-2008, 03:55 PM
|
#8 | ||||||||||
|
Thxxxxxxxxxx
|
||||||||||
|
|
|
19-08-2008, 03:35 AM
|
#9 | |||||||||||||
|
اقتباس:
|
|||||||||||||
|
|
|
19-08-2008, 07:14 AM
|
#10 | ||||||||||
 
|
thxxx
|
||||||||||
|
|
|
19-08-2008, 07:21 AM
|
#11 | ||||||||||
|
thnx man
|
||||||||||
|
|
|
19-08-2008, 08:38 PM
|
#12 | ||||||||||
 
|
thx
|
||||||||||
|
|
|
19-08-2008, 09:54 PM
|
#13 | ||||||||||
|
Thx pro
|
||||||||||
|
|
|
20-08-2008, 06:12 PM
|
#14 | ||||||||||
 
|
Thx man^^ واتمنى ان تاتى لنل ببرامج احسن |
||||||||||
|
|
|
20-08-2008, 06:16 PM
|
#15 | ||||||||||
|
مع انى مانزلتهوش xD
|
||||||||||
|
|
|
| يتصفح الموضوع حالياً : 1 (0 عضو و 1 زائر) | |
|
|
المواضيع المتشابهه
|
||||
| الموضوع | كاتب الموضوع | المنتدى | الردود | آخر مشاركة |
| hازاي اخلي السروكينج يعمل auto party و auto accept party | hos9797 | قسم الاستفسارات ومشاكل وحلول ال Sroking | 1 | 14-06-2011 03:56 AM |
| Auto Party Script عشا البارتي تفضل في الفورم على طول | patoot2007 | قـسـم الـبـرامـج الـمـسـاعـدة | 13 | 11-04-2008 03:08 PM |
.gif){kind=icon}
العرض العادي
