👨🏾‍🚀 🧓🏻 🛀 हम GTA सैन एंड्रियास के लिए एक धोखा लिखते हैं 🧚🏿 👨‍❤️‍👨 👨🏽‍🤝‍👨🏻

प्रत्येक गेमर जल्द या बाद में खेल के कुछ स्तरों के पारित होने, धोखा देने की संभावना आदि को सरल बनाने के बारे में सोचता है। इसके लिए, वे आर्टमनी जैसे विशेष कार्यक्रमों का सहारा लेते हैं, लेकिन यह हमेशा संभव नहीं होता है और कभी-कभी यह अपने लक्ष्यों को प्राप्त करने के लिए समय-समय पर डेटा को सही करने के लिए थका रहा है। विभिन्न चीट और प्रशिक्षक इस प्रक्रिया को स्वचालित करने में मदद करते हैं। धोखा के निर्माण पर बाद में चर्चा की जाएगी।

खेल GTA सैन एंड्रियास को एक परीक्षण विषय के रूप में चुना गया था और हम इसे यातना देंगे। गेम पिक्चर को "ट्विस्ट" करने के लिए, जैसा कि हमें ज़रूरत है, यह मेमोरी के कुछ क्षेत्रों को बदलने के लिए पर्याप्त है। यह कैसे करना है? दरअसल, विंडोज में, प्रक्रियाएं एक-दूसरे से अलग हो जाती हैं और बस एक और प्रक्रिया की स्मृति में नहीं आती हैं। बेशक, आप WinAPI फ़ंक्शन WriteProcessMemory () का उपयोग कर सकते हैं, लेकिन हम गेम कोड में हमारे कोड को जोड़कर इसे अलग तरीके से करेंगे। इसे करने के कई तरीके हैं, जिसमें आवश्यक प्रक्रिया में इंजेक्शन भी शामिल है, लेकिन एंटीवायरस इस पद्धति को पसंद नहीं करते हैं और अलार्म उठा सकते हैं। इसलिए, हम प्रोग्राम चलाने के साथ फ़ोल्डर में पहले पुस्तकालयों की तलाश के लिए विंडोज संपत्ति का उपयोग करते हैं, और फिर अन्य स्थानों पर। यह विधि, एक नियम के रूप में, एंटीवायरस के लिए संदिग्ध नहीं है।
आपको यह देखने की जरूरत है कि प्रोग्राम से कौन से लाइब्रेरीज़ आयात किए गए हैं, उनमें से कौन से फ़ंक्शंस आयात किए गए हैं और इसके लिए DLL फ़िल्टर लिखें। GTA सैन एंड्रियास के मामले में, Dinput8.dll एक ऐसी लाइब्रेरी बन गई, जिसमें से केवल एक फ़ंक्शन आयात किया जाता है - DirectInput8Create () ।
अब आपको अपना खुद का DLL बनाने की आवश्यकता है, जिसमें, अन्य बातों के अलावा, DirectInput8Create () फ़ंक्शन को निर्यात किया जाना चाहिए जब कॉल किया जाता है, जिसे उसी नाम के WWindows सिस्टम लाइब्रेरी से बुलाया जाना चाहिए। अन्यथा, खेल बाधित हो जाएगा!
आप लगभग किसी भी प्रोग्रामिंग भाषा में DLL बना सकते हैं। मैंने PureBasic को चुना।

धोखा कोड

;   GTA San Andreas. Prototype pDirectInput8Create(hinst, dwVersion.l, riidltf, *ppvOut, *punkOuter) ;  . Procedure.s GetSysDir() Protected Result.s="", len, *Mem *Mem=AllocateMemory(#MAX_PATH) If *Mem Len=GetSystemDirectory_(*Mem, #MAX_PATH) Result=PeekS(*Mem, Len)+"\" FreeMemory(*Mem) EndIf ProcedureReturn Result EndProcedure Procedure.b TestMemory(*Pointer, Size) ;       . Protected mbi.MEMORY_BASIC_INFORMATION Protected Result.b = #False, dwWrote If Size dwWrote = VirtualQuery_(*Pointer, @mbi, SizeOf(MEMORY_BASIC_INFORMATION)) If dwWrote If mbi\BaseAddress+mbi\RegionSize >= *Pointer+Size If mbi\Protect & (#PAGE_READONLY | #PAGE_READWRITE | #PAGE_EXECUTE_READ | #PAGE_EXECUTE_READWRITE) Result = #True EndIf EndIf EndIf EndIf ProcedureReturn Result EndProcedure Procedure WriteMemF(*Address, Infa.f) ;    Float . If TestMemory(*Address, 4) PokeF(*Address, Infa) EndIf EndProcedure Procedure WriteMemL(*Address, Infa.l) ;    Long . If TestMemory(*Address, 4) PokeL(*Address, Infa) EndIf EndProcedure Procedure.l ReadMemL(*Address) ;    Long . If TestMemory(*Address, 4) ProcedureReturn PeekL(*Address) Else ProcedureReturn -1 EndIf EndProcedure Procedure WinTimer() Protected *Point Static Count ;  (  1000000,  ). Maney = ReadMemL($00B7CE50) If Maney>=0 And Maney<1000000 WriteMemL($00B7CE50, 1000000) EndIf ;   . If TestMemory($00B6F5F0, SizeOf(Integer)) *Point = PeekI($00B6F5F0) If TestMemory(*Point, 4) ; . WriteMemF(*Point+1344, 100) ; . WriteMemF(*Point+1352, 100) ; ,   . WriteMemL(*Point+1504, 1000) WriteMemL(*Point+1508, 1000) ; ,   . WriteMemL(*Point+1532, 1000) WriteMemL(*Point+1536, 1000) ; SMG,   . WriteMemL(*Point+1560, 1000) WriteMemL(*Point+1564, 1000) ; ,   . WriteMemL(*Point+1588, 1000) WriteMemL(*Point+1592, 1000) ; ,   . WriteMemL(*Point+1616, 1000) WriteMemL(*Point+1620, 1000) ; ,   . WriteMemL(*Point+1644, 1000) WriteMemL(*Point+1648, 1000) ; ,   . WriteMemL(*Point+1672, 1000) WriteMemL(*Point+1676, 1000) ; /,   . WriteMemL(*Point+1700, 1000) WriteMemL(*Point+1704, 1000) EndIf EndIf ; . If TestMemory($00BA18FC, SizeOf(Integer)) *Point = PeekI($00BA18FC) If TestMemory(*Point, 4) ;   . WriteMemF(*Point+1216, 1000) EndIf EndIf If Count>10 Count=0 ;  -   ( 1000). WriteMemL($00B791B4, 1000) ;  -   ( 1000). WriteMemL($00B791B8, 1000) ;  -   ( 1000). WriteMemL($00B790A0, 1000) ;  -   ( 1000). WriteMemL($00B7919C, 1000) ;  -  ( 1000). WriteMemL($00B791C4, 1000) ;  -   ( 1000). WriteMemL($00B791A4, 1000) ;  -  ( 1000). WriteMemF($00B793DC, 1000) ;  -  ( 1000). ;WriteMemF($00B79480, 1000) ;  -  ( 1000). WriteMemF($00B793D8, 1000) ;  -  AK47 ( 1000). WriteMemF($00B794B4, 1000) ;  -    ( 1000). WriteMemF($00B794A8, 1000) ;  -  Desert Eagle ( 1000). WriteMemF($00B7949C, 1000) ;  -  M4 ( 1000). WriteMemF($00B794B8, 1000) ;  -  - ( 1000). WriteMemF($00B794AC, 1000) ;  -   ( 1000). WriteMemF($00B79494, 1000) ;  -  SMG ( 1000). WriteMemF($00B794B0, 1000) ;  -   ( 1000). WriteMemF($00B794A4, 1000) ;  -   ( 1000). WriteMemF($00B794A0, 1000) ;  -     ( 1000). WriteMemF($00B79498, 1000) Else Count+1 EndIf EndProcedure ;      . Procedure Thread(*Void) Shared hWnd_SanAndreas Protected Count Delay(4000) Count=0 Repeat ;   . hWnd_SanAndreas=FindWindow_(0, "GTA: San Andreas") If hWnd_SanAndreas<>0 ;    SetTimer_(hWnd_SanAndreas, 10, 800, @WinTimer()) ;    Break ;   . EndIf Delay(100) Count+1 If Count>20 ;   . Beep_(1000,200) Break EndIf ForEver EndProcedure ;      DLL. ProcedureDLL AttachProcess(Instance) Global WinAPI_DirectInput8Create=0, hLib_Dinput8, ThreadID ;   Dinput8.dll hLib_Dinput8 = LoadLibrary_(GetSysDir()+"Dinput8.dll") If hLib_Dinput8 WinAPI_DirectInput8Create.pDirectInput8Create = GetProcAddress_(hLib_Dinput8, "DirectInput8Create") EndIf If WinAPI_DirectInput8Create=0 MessageRequester("", "   ."+Chr(10)+" .") EndIf ;   . ThreadID=CreateThread(@Thread(), 0) EndProcedure ;      DLL. ProcedureDLL DetachProcess(Instance) Shared hWnd_SanAndreas If hLib_Dinput8 FreeLibrary_(hLib_Dinput8) hLib_Dinput8 = 0 EndIf If ThreadID And IsThread(ThreadID) KillThread(ThreadID) ThreadID=0 EndIf If hWnd_SanAndreas<>0 And IsWindow_(hWnd_SanAndreas) KillTimer_(hWnd_SanAndreas, 10) hWnd_SanAndreas=0 EndIf EndProcedure ;     WinAPI DirectInput8Create. ProcedureDLL DirectInput8Create(hinst, dwVersion.l, riidltf, *ppvOut, *punkOuter) If WinAPI_DirectInput8Create ProcedureReturn WinAPI_DirectInput8Create(hinst, dwVersion, riidltf, *ppvOut, *punkOuter) EndIf EndProcedure

DLL लोड होने पर सिस्टम द्वारा अटैचप्रोसेस () प्रक्रिया को कहा जाता है। यह Dinput8.dll सिस्टम लाइब्रेरी को लोड करता है। इस मामले में, पूर्ण लोडिंग पथ स्पष्ट रूप से इंगित किया गया है, अन्यथा पुस्तकालय खुद लोड हो जाएगा, लेकिन हमें इसकी आवश्यकता नहीं है! पुस्तकालय के सफल लोडिंग पर, हमें इसके DirectInput8Create () फ़ंक्शन के लिए एक संकेतक मिलता है। विफलता के मामले में, एक संदेश उपयोगकर्ता को विफलता के बारे में सूचित करता है। उसके बाद, एक समानांतर धागा शुरू होता है और ऑपरेशन समाप्त होता है। हमें प्रोग्राम को "हैंग" करने के लिए एक स्ट्रीम की आवश्यकता है। थ्रेड (थ्रेड () प्रक्रिया) में, गेम विंडो को "GTA: San Andreas" शीर्षक से खोजा जाता है। जैसे ही खिड़की मिलती है, एक टाइमर उस पर "लटका" होता है और प्रवाह इस पर काम करना बंद कर देता है। बेशक, कोई भी टाइमर के बिना कर सकता था और स्ट्रीम में सभी क्रियाएं कर सकता था, लेकिन सुरक्षा कारणों से, खेल की मुख्य धारा से मेमोरी को संशोधित करने का निर्णय लिया गया था।
WinTimer () प्रक्रिया को टाइमर पर प्रत्येक 800 मिलीसेकंड पर कहा जाता है। यह आवश्यक चर के मूल्यों को बदलता है। लेकिन परिवर्तन से पहले, यह जांचना आवश्यक है कि यह पता प्रक्रिया के लिए सुलभ है या नहीं।
धोखा कवच, खिलाड़ी और वाहन स्वास्थ्य, खिलाड़ी कौशल, साथ ही राउंड की संख्या के उचित स्तर को बनाए रखता है। इसके अलावा, खिलाड़ी को नींबू के रुपये दिए जाते हैं और अगर वह उन्हें खर्च करता है, तो वे पतली हवा से बाहर निकल जाते हैं।
यह धोखा उन लोगों से अपील करेगा जो पुलिस के साथ युद्ध का खेल शुरू करना चाहते हैं। उनके लिए खिलाड़ी को तबाह करना मुश्किल होगा, जब तक कि वह प्वाइंट-ब्लैंक पर शूटिंग नहीं कर लेता।

इस कोड से आपको Dinput8.dll नाम का एक DLL बनाना होगा और इसे गेम के साथ उसी फ़ोल्डर में रखना होगा।
वास्तव में DLL प्राप्त करने के लिए, आपको IDE में कोड लोड होने पर "निष्पादन योग्य फ़ाइल प्रारूप" सूची में संकलक के गुणों में "साझा Dll" का चयन करना होगा।

हम GTA सैन एंड्रियास के लिए एक धोखा लिखते हैं

More articles: