Register for your free account! | Forgot your password?

Go Back   elitepvpers Coders Den AutoIt
You last visited: Today at 11:54

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Frage

Discussion on Frage within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #16
 
elite*gold: 50
Join Date: Mar 2010
Posts: 1,373
Received Thanks: 521
Sieht dannach aus, als wären Teile aus einem dekompilierten Skript übernommen worden...
jacky919 is offline  
Old   #17
 
elite*gold: 10
Join Date: Mar 2012
Posts: 117
Received Thanks: 46
Quote:
Originally Posted by jacky919 View Post
Sieht dannach aus, als wären Teile aus einem dekompilierten Skript übernommen worden...
Stimmt schon eigentlich das was ich ganze zeit Probiere meins ist das :

PHP Code:
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GDIPlus.au3>
#include <GUIConstantsEx.au3>
$Static Dec("245B4C")
Global 
$Fee$SPtime 1$Klasse
FileInstall
("C:\Dokumente und Einstellungen\PC\Desktop\AutoIt\GUI.png", @TempDir "\Nos2.png"1)
Global 
$PNGSRCGUIBK = @TempDir "\Nos2.png"
Global Const $AC_SRC_ALPHA 1
$GUI 
GUICreate("Clientside Hack"654266, -1, -1$WS_POPUPBitOR($WS_EX_CONTROLPARENT$WS_EX_LAYERED$WS_EX_TOPMOST))
_GDIPlus_Startup()
Global 
$HIMAGEGUIBK _GDIPlus_ImageLoadFromFile($PNGSRCGUIBK)
BITMAP($GUI$HIMAGEGUIBK255)
$GUISUB GUICreate("Clientside Hack"580390, -1, -1$WS_POPUPBitOR($WS_EX_LAYERED$WS_EX_MDICHILD$WS_EX_TOPMOST), $GUI)
$Label1 GUICtrlCreateLabel("Aussehen"72165117)
$Label2 GUICtrlCreateLabel("Waffe"40563317)
$Input1 GUICtrlCreateInput(""24807321)
$Label3 GUICtrlCreateLabel("Rüstung"136564417)
$Input2 GUICtrlCreateInput(""120807321)
$Label5 GUICtrlCreateLabel("Hut"481282117)
$Input3 GUICtrlCreateInput(""241527321)
$Button1 GUICtrlCreateButton("Change!"1201367541$WS_GROUP)
$Label6 GUICtrlCreateLabel("Waffe"722564917)
$Label7 GUICtrlCreateLabel("Farbe"482883117)
$Input4 GUICtrlCreateInput(""243127321)
GUICtrlSetState(-1,$GUI_DISABLE)
$Label8 GUICtrlCreateLabel("Upgrade"1362884517)
$Input5 GUICtrlCreateInput(""1203127321)
GUICtrlSetState(-1,$GUI_DISABLE)
$Button2 GUICtrlCreateButton("Change!"2434417125$WS_GROUP)
GUICtrlSetState(-1,$GUI_DISABLE)
$Radio13 GUICtrlCreateRadio("Magier (W)"29628811317)
$Radio14 GUICtrlCreateRadio("Bogenschütze (W)"29631211317)
$Radio15 GUICtrlCreateRadio("Schwertkämpfer (W)"29633611317)
$Radio16 GUICtrlCreateRadio("Abenteurer (W)"29636011317)
$Label4 GUICtrlCreateLabel("Feen- und Klassenhack"2962415017)
$Radio1 GUICtrlCreateRadio("Feuerfee (unbekannt)"2965612517)
$Radio2 GUICtrlCreateRadio("Wasserfee (unbekannt)"2968013517)
$Radio3 GUICtrlCreateRadio("Schattenfee (unbekannt)"29610413517)
$Radio4 GUICtrlCreateRadio("Lichtfee (unbekannt)"29612813517)
$Radio5 GUICtrlCreateRadio("Feuerfee (mall)"29616010517)
$Radio6 GUICtrlCreateRadio("Wasserfee (mall)"29618410517)
$Radio7 GUICtrlCreateRadio("Schattenfee (mall)"29620810517)
$Radio8 GUICtrlCreateRadio("Lichtfee (mall)"29623210517)
$Radio9 GUICtrlCreateRadio("Feuerfee (boost)"4445611317)
$Radio10 GUICtrlCreateRadio("Wasserfee (boost)"4448011317)
$Radio11 GUICtrlCreateRadio("Schattenfee (boost)"44410411317)
$Radio12 GUICtrlCreateRadio("Lichtfee (boost)"44412811317)
$Radio17 GUICtrlCreateRadio("Magier (M)"42416011317)
$Radio18 GUICtrlCreateRadio("Bogenschütze (M)"42418411317)
$Radio19 GUICtrlCreateRadio("Schwertkämpfer (M)"42420611317)
$Radio20 GUICtrlCreateRadio("Abenteurer (M)"42423211317)
GUICtrlSetColor(-116777215)
GUISetBkColor(5789784)
_WinAPI_SetLayeredWindowAttributes($GUISUB5789784)
GUISetState(@SW_SHOW$GUI)
GUISetState(@SW_SHOW$GUISUB)
#endregion ### END Koda GUI section ###

While 1
    
If GUICtrlRead($Input4) > 999 Then GUICtrlSetData($Input4999)
    If 
GUICtrlRead($Input4) > 900 Then GUICtrlSetData($Input4900)
    
$nMsg GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit
        Case 
$Button1
            _Change
()
        Case 
$Button2
            _Change2
()
        Case 
$Radio1
            $Fee 
1336934424
            _Fee
()
        Case 
$Radio2
            $Fee 
1336934425
            _Fee
()
        Case 
$Radio3
            $Fee 
1336934427
            _Fee
()
        Case 
$Radio4
            $Fee 
1336934423
            _Fee
()
        Case 
$Radio5
            $Fee 
1325400305
            _Fee
()
        Case 
$Radio6
            $Fee 
1325400306
            _Fee
()
        Case 
$Radio7
            $Fee 
1325400309
            _Fee
()
        Case 
$Radio8
            $Fee 
1325400307
            _Fee
()
        Case 
$Radio9
            $Fee 
1336934404
            _Fee
()
        Case 
$Radio10
            $Fee 
1336934405
            _Fee
()
        Case 
$Radio11
            $Fee 
1336934403
            _Fee
()
        Case 
$Radio12
            $Fee 
1336934402
            _Fee
()
        Case 
$Radio13
            $Klasse 
"3"
            
_Klasse()
        Case 
$Radio14
            $Klasse 
"2"
            
_Klasse()
        Case 
$Radio15
            $Klasse 
"1"
            
_Klasse()
        Case 
$Radio16
            $Klasse 
"0"
            
_Klasse()
        Case 
$Radio17
            $Klasse 
"131"
            
_Klasse()
        Case 
$Radio18
            $Klasse 
"130"
            
_Klasse()
        Case 
$Radio19
            $Klasse 
"129"
            
_Klasse()
        Case 
$Radio20
            $Klasse 
"128"
            
_Klasse()
    EndSwitch
WEnd

Func _Fee
()
    Global 
$OffsetFee[3] = [00x1940x44]
    
$MemOpen _MemoryOpen(ProcessExists("NostaleX.dat"))
    
$BaseAddr _MemoryGetBaseAddress($MemOpen1)
    
$Addr "0x" Hex($BaseAddr $Static)
    
_MemoryPointerWrite($Addr$MemOpen$OffsetFee$Fee"dword")
    
_MemoryClose($MemOpen)
EndFunc   ;==>_Fee

Func _Klasse
()
    Global 
$OffsetKlasse[3] = [00x1540x2C]
    
$MemOpen _MemoryOpen(ProcessExists("NostaleX.dat"))
    
$BaseAddr _MemoryGetBaseAddress($MemOpen1)
    
$Addr "0x" Hex($BaseAddr $Static)
    
_MemoryPointerWrite($Addr$MemOpen$OffsetKlasse$Klasse"dword")
    
_MemoryClose($MemOpen)
EndFunc   ;==>_Klasse

Func _Change
()
    Global 
$OffsetHut[3] = [00x1540x30]
    Global 
$OffsetWaffe[3] = [00x1540x33]
    Global 
$OffSetRuessi[3] = [00x1540x2E]
    
$MemOpen _MemoryOpen(ProcessExists("NostaleX.dat"))
    
$BaseAddr _MemoryGetBaseAddress($MemOpen1)
    
$Addr "0x" Hex($BaseAddr $Static)
    If 
Not GUICtrlRead($Input2) = "" Then
        _MemoryPointerWrite
($Addr$MemOpen$OffSetRuessiGUICtrlRead($Input2), "dword")
    EndIf
    
Sleep(300)
    If 
Not GUICtrlRead($Input3) = "" Then
        _MemoryPointerWrite
($Addr$MemOpen$OffsetHutGUICtrlRead($Input3), "dword")
    EndIf
    
Sleep(300)
    If 
Not GUICtrlRead($Input1) = "" Then
        _MemoryPointerWrite
($Addr$MemOpen$OffsetWaffeGUICtrlRead($Input1), "dword")
    EndIf
    
_MemoryClose($MemOpen)
EndFunc   ;==>_Change

Func _Change2
()
    Global 
$OffsetPlus[3] = [00x1540x1D]
    Global 
$OffsetLeuchten[3] = [00x1540x16]
    
$MemOpen _MemoryOpen(ProcessExists("NostaleX.dat"))
    
$BaseAddr _MemoryGetBaseAddress($MemOpen1)
    
$Addr "0x" Hex($BaseAddr $Static)
    If 
Not GUICtrlRead($Input5) = "" Then
        
If GUICtrlRead($Input5) < 895 Then GUICtrlSetData($Input5895)
        
_MemoryPointerWrite($Addr$MemOpen$OffsetPlus"1542224" GUICtrlRead($Input5), "dword")
    EndIf
    If 
Not GUICtrlRead($Input4) = "" Then
        
If GUICtrlRead($Input4) < 100 Then GUICtrlSetData($Input4100)
        
_MemoryPointerWrite($Addr$MemOpen$OffsetLeuchtenGUICtrlRead($Input4) & "0000""dword")
    EndIf
    
_MemoryClose($MemOpen)
EndFunc   ;==>_Change2




Func BITMAP
($HGUI$HIMAGE$IOPACITY)
    
Local $HSCRDC$HMEMDC$HBITMAP$HOLD$PSIZE$TSIZE$PSOURCE$TSOURCE$PBLEND$TBLEND
    $HSCRDC 
_WinAPI_GetDC(0)
    
$HMEMDC _WinAPI_CreateCompatibleDC($HSCRDC)
    
$HBITMAP _GDIPlus_BitmapCreateHBITMAPFromBitmap($HIMAGE)
    
$HOLD _WinAPI_SelectObject($HMEMDC$HBITMAP)
    
$TSIZE DllStructCreate($TAGSIZE)
    
$PSIZE DllStructGetPtr($TSIZE)
    
$TSOURCE DllStructCreate($TAGPOINT)
    
$PSOURCE DllStructGetPtr($TSOURCE)
    
$TBLEND DllStructCreate($TAGBLENDFUNCTION)
    
$PBLEND DllStructGetPtr($TBLEND)
    
DllStructSetData($TBLEND"Alpha"$IOPACITY)
    
DllStructSetData($TBLEND"Format"$AC_SRC_ALPHA)
    
DllStructSetData($TSIZE"X"_GDIPlus_ImageGetWidth($HIMAGE))
    
DllStructSetData($TSIZE"Y"_GDIPlus_ImageGetHeight($HIMAGE))
    
_WinAPI_UpdateLayeredWindow($HGUI$HSCRDC0$PSIZE$HMEMDC$PSOURCE0$PBLEND$ULW_ALPHA)
    
_WinAPI_ReleaseDC(0$HSCRDC)
    
_WinAPI_SelectObject($HMEMDC$HOLD)
    
_WinAPI_DeleteObject($HBITMAP)
    
_WinAPI_DeleteDC($HMEMDC)
 
EndFunc   ;==>BITMAP 
Wo liegt den hier der fehler der dreck will einfach nicht klappen ;(
fasdasfda is offline  
Old   #18
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
Quote:
Originally Posted by fasdasfda View Post
Wo liegt den hier der fehler der dreck will einfach nicht klappen ;(
Lern die Schei*** oder lass es sein.
omer36 is offline  
Old   #19
 
elite*gold: 10
Join Date: Mar 2012
Posts: 117
Received Thanks: 46
Also der Hack klappt jetz ...
#Close please
fasdasfda is offline  
Reply


Similar Threads Similar Threads
Frage zu Bot machen-Maus Frage-Button Frage
02/16/2012 - AutoIt - 10 Replies
Hallo, Elitepvpers hat echt für alles ein Ort :D Geil. Also...Bin AutoIt anfänger. Ich bin dabei ein Bot für das Online Game Runescape zu machen. Ich hette 2 Fragen(FÜR DEN MOMMENT :) ): Kann ich machen das AutoIt inaktiv die Maus benutzt,also werend der Bot läuft das ich bzw. man im Internet surft oder was anderes macht`?



All times are GMT +2. The time now is 11:54.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.