Register for your free account! | Forgot your password?

Go Back   elitepvpers > MMORPGs > Nostale
You last visited: Today at 08:39

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

Advertisement



AllinOneHack/Bot

Discussion on AllinOneHack/Bot within the Nostale forum part of the MMORPGs category.

Closed Thread
 
Old   #1
 
Furkiii's Avatar
 
elite*gold: 0
Join Date: Apr 2010
Posts: 384
Received Thanks: 137
Closepls/AllinOne Source public

Da eh nur blöde Kommentare kommen

#Closerequest

Source/Script :

Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Pointer.au3>
#include <Assembler.au3>
 

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Furkiii'S MinigameHack AllinOne", 536, 307, 192, 139, BitOR($WS_MAXIMIZEBOX,$WS_MINIMIZEBOX,$WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_TABSTOP,$WS_HSCROLL,$WS_VSCROLL,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetCursor (0)
GUISetBkColor(0x3399FF)
GUICtrlCreateLabel("99Noss!", 99, 56, 0, 2)
$Button1 = GUICtrlCreateButton("99NOSS", 48, 128, 131, 49, 0)
GUICtrlSetBkColor(-1, 0x008080)
$Button2 = GUICtrlCreateButton("Starten", 256, 136, 75, 25, 0)
GUICtrlSetBkColor(-1, 0x008000)
$Button3 = GUICtrlCreateButton("Beenden", 400, 136, 75, 25, 0)
GUICtrlSetBkColor(-1, 0x800000)
$Button4 = GUICtrlCreateButton("NosTale DE", 48, 184, 129, 49, 0)
GUICtrlSetBkColor(-1, 0x808000)
$Button5 = GUICtrlCreateButton("Starten", 256, 192, 75, 25, 0)
GUICtrlSetBkColor(-1, 0x008000)
$Button6 = GUICtrlCreateButton("Beenden", 400, 200, 75, 25, 0)
GUICtrlSetBkColor(-1, 0x800000)
$Button7 = GUICtrlCreateButton("NosTale TR", 48, 240, 131, 49, 0)
GUICtrlSetBkColor(-1, 0x008000)
$Button8 = GUICtrlCreateButton("Starten", 256, 256, 75, 25, 0)
GUICtrlSetBkColor(-1, 0x008000)
$Button9 = GUICtrlCreateButton("Beenden", 400, 257, 73, 23, 0)
GUICtrlSetBkColor(-1, 0x800000)
$Button10 = GUICtrlCreateButton("SpammBot", 48, 16, 75, 25, 0)
$Button11 = GUICtrlCreateButton("LevelBot", 256, 16, 75, 25, 0)
$Button12 = GUICtrlCreateButton("Credits", 400, 16, 75, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			
			
		Case $Button2
				$Adresse = 0x04D7DCC
            $Prozess = _memoryopen(ProcessExists("NostaleX.dat"))
            _MemoryASMWrite($Adresse,"81C2 0E450000",$Prozess)
			
			$Adresse = 0x04D7E2B
            $Prozess = _memoryopen(ProcessExists("NostaleX.dat"))
            _MemoryASMWrite($Adresse,"81C2 0C500000",$Prozess)
			
			$Adresse = 0x04D7D64
            $Prozess = _memoryopen(ProcessExists("NostaleX.dat"))
            _MemoryASMWrite($Adresse,"81C2 0A500000",$Prozess)
			
		Case $Button3
			Exit
			
		Case $Button4
			
		Case $Button5
			
			$Adresse = 0x04E5EA0
            $Prozess = _memoryopen(ProcessExists("NostaleX.dat"))
            _MemoryASMWrite($Adresse,"81C2 5A460000",$Prozess)
			
			    $Adresse = 0x04E5F67
            $Prozess = _memoryopen(ProcessExists("NostaleX.dat"))
            _MemoryASMWrite($Adresse,"81C2 5C460000",$Prozess)
			
			    $Adresse = 0x04E5F08
            $Prozess = _memoryopen(ProcessExists("NostaleX.dat"))
            _MemoryASMWrite($Adresse,"81C2 5F460000",$Prozess)
			
		Case $Button6
			Exit
			
		Case $Button7
			
		Case $Button8
			 $Adresse = 0x04E5F04
            $Prozess = _memoryopen(ProcessExists("NostaleX.dat"))
            _MemoryASMWrite($Adresse,"81C2 7E210000",$Prozess)
			
		Case $Button9
			Exit
		
	Case $Button10
		HotKeySet("{esc}", "close")

$text = InputBox("", "hier text zum spamen eingeben")

sleep(4000)

while 1 
	Send($text) 
	Send("{enter}") 
	sleep(3000)

WEnd

func close() 
	Exit
EndFunc

Case $Button11
HotKeySet("{F2}","Pause")
HotKeySet("{ESC}","Beenden")
HotKeySet("{F1}","Starten")

MsgBox (0, "HotKeySetListe!", "F1=Starten F2= Pausieren ESC= Beenden ") 

While 1
Sleep(1000)
WEnd

Func Starten()
While 1
ControlSend("NosTale", "", 0, "{space}")
Sleep(100)
ControlSend("NosTale", "", 0, "{space}")
Sleep(50)
ControlSend("NosTale", "", 0, "{x}")
WEnd
EndFunc

Func Pause()
While 1
Sleep(1000)
WEnd
EndFunc

Func Beenden()
Exit
EndFunc

Case $Button12
	MsgBox (0, "Credits", "Credits:Furkiii") 

	EndSwitch
WEnd
Furkiii is offline  
Thanks
2 Users
Old 07/13/2011, 13:04   #2
 
elite*gold: 11
Join Date: Jul 2010
Posts: 633
Received Thanks: 167
da leecht er meine Idee... die ich von nem anderen geleecht habe...
DoDo1997 is offline  
Old 07/13/2011, 13:07   #3
 
~*LightYagami*~'s Avatar
 
elite*gold: 0
Join Date: Jun 2010
Posts: 246
Received Thanks: 41
Werde ich gleich mal ausprobieren
Kriegst auch ein Thanks dafür

Mfg Light
~*LightYagami*~ is offline  
Old 07/13/2011, 13:12   #4
 
elite*gold: 112
Join Date: Jan 2010
Posts: 1,531
Received Thanks: 414
Der "Hack" ist sauber. Aber sehr schlecht gecoded.
Wenn ihr ein Button drückt, und es versucht zu beenden ohne einer Taste, dann müsst ihr unten rechts auf das Icon des Programmes rechtsklick machen und dann auf Exit
¿Freaky¿ is offline  
Thanks
1 User
Old 07/13/2011, 13:16   #5
 
Furkiii's Avatar
 
elite*gold: 0
Join Date: Apr 2010
Posts: 384
Received Thanks: 137
Quote:
Der "Hack" ist sauber. Aber sehr schlecht gecoded.
Wenn ihr ein Button drückt, und es versucht zu beenden ohne einer Taste, dann müsst ihr unten rechts auf das Icon des Programmes rechtsklick machen und dann auf Exit
1. Bin Anfänger
2. Verstehe ich nicht was du meinst
3. Wenn du Beenden meinst dan auf irgendeine RoteButton wo steht Beenden da schließt sich dan das Fenster O_o
Furkiii is offline  
Old 07/13/2011, 14:44   #6
 
elite*gold: 112
Join Date: Jan 2010
Posts: 1,531
Received Thanks: 414
Quote:
Originally Posted by Furkiii View Post
1. Bin Anfänger
2. Verstehe ich nicht was du meinst Wenn du nicht verstehst was ich meine, dann musst du auch hinschreiben was du nicht verstehst
3. Wenn du Beenden meinst dan auf irgendeine RoteButton wo steht Beenden da schließt sich dan das Fenster O_o Schonmal auf LevelBot gedrückt? Weil dann funktioniert keine Taste mehr bei dir nur noch der HotKey Set
¿Freaky¿ is offline  
Old 07/13/2011, 14:55   #7
 
elite*gold: 43
Join Date: Jul 2011
Posts: 537
Received Thanks: 160
Quote:
AllinOneHack
Ich muss sagen überarbeite diesen lieber noch mal !

& AllinOneHack verstehe ich was anderes !

Also versuche es bissel sauberer zu Programmieren

Lg.Del
Deledt is offline  
Old 07/13/2011, 15:03   #8
 
elite*gold: 16
Join Date: Nov 2010
Posts: 609
Received Thanks: 353
@DoDo von mir?

B2T: Die Form könnte viel kleiner sein und von den ganzen Farben bekommt man Krebs
TheEvil² is offline  
Old 07/13/2011, 15:04   #9
 
GsC RedRum's Avatar
 
elite*gold: 4
Join Date: Feb 2010
Posts: 1,244
Received Thanks: 454
Quote:
Wenn ihr ein Button drückt, und es versucht zu beenden ohne einer Taste, dann müsst ihr unten rechts auf das Icon des Programmes rechtsklick machen und dann auf Exit
Dein Crackmaker ist auch nicht besser das funktioniert dort genausowenig.
GsC RedRum is offline  
Old 07/13/2011, 15:30   #10
 
elite*gold: 175
The Black Market: 233/4/1
Join Date: Apr 2011
Posts: 4,923
Received Thanks: 401
Ist doch jetzt egal, er hat sich bestimmt Mühe geben, und möchte
diese Arbeit mit uns teilen.
Hydroxyandrost is offline  
Old 07/13/2011, 16:59   #11
 
Furkiii's Avatar
 
elite*gold: 0
Join Date: Apr 2010
Posts: 384
Received Thanks: 137
Close pls
Furkiii is offline  
Old 07/13/2011, 17:42   #12
 
elite*gold: 113
The Black Market: 133/2/0
Join Date: Dec 2009
Posts: 16,685
Received Thanks: 4,450
Auf Wunsch.

#closed
Rorc is offline  
Thanks
1 User
Closed Thread




All times are GMT +1. The time now is 08:39.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

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