You last visited: Today at 06:09
Advertisement
AllinOneHack/Bot
Discussion on AllinOneHack/Bot within the Nostale forum part of the MMORPGs category.
07/13/2011, 13:00
#1
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
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...
07/13/2011, 13:07
#3
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
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
07/13/2011, 13:16
#5
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
07/13/2011, 14:44
#6
elite*gold: 112
Join Date: Jan 2010
Posts: 1,531
Received Thanks: 414
Quote:
Originally Posted by
Furkiii
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
07/13/2011, 14:55
#7
elite*gold: 43
Join Date: Jul 2011
Posts: 537
Received Thanks: 160
Quote:
Ich muss sagen überarbeite diesen lieber noch mal !
& AllinOneHack verstehe ich was anderes !
Also versuche es bissel sauberer zu Programmieren
Lg.Del
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
07/13/2011, 15:04
#9
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.
07/13/2011, 15:30
#10
elite*gold: 175
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.
07/13/2011, 16:59
#11
elite*gold: 0
Join Date: Apr 2010
Posts: 384
Received Thanks: 137
Close pls
07/13/2011, 17:42
#12
elite*gold: 113
Join Date: Dec 2009
Posts: 16,685
Received Thanks: 4,450
Auf Wunsch.
#closed
All times are GMT +2. The time now is 06:09 .