BorderGame

Bene ragazzi, siccome ho deciso di lasciare la programmazione di hack/bot vi passo tutti i miei progetti.. (ne escludo qualcuno..)
Se non partono alcuni, vuol dire che dovete aggiornare pointer..
Preciso che ZoomHack è sato fatto con libreria di @[narutomega96]
Bot per tutte le versioni:

Codice PHP:

#cs ---
;Author:             SCL
;Lenguage:          Italiano
;AutoIT Version:    3.1.1.0
;Script Functions:
   Exp & Job Bot. Exp Bot: Arma primaria; Job Bot: Arma secondaria. Enjoy nostrucchi.
#ce ---
#RequireAdmin
msgbox(0, "Exp & Job Bot tutte le versioni. (x32)", "Stai usando il Bot creato da SCL per il forum: nostrucchi.altervista.org")

HotKeySet("{F1}", "Avvia")
HotKeySet("{ESC}","ESCI")
HotKeySet("{F3}","Pausa")
HotKeySet("{F2}","Avvia1")

$Title = "Exp & Job Bot tutte le versioni. (x32)"
$Author = "SCL"

While 1 
    ToolTip("Exp & Job Bot tutte le versioni. (x32) by SCL - F1 starta bot[EXP], F2 starta bot[JOB]- F3 stoppa solo per 1 minuto ed ESC per chiudere il Bot.",0,0)
Sleep(100)
WEnd

Func Avvia()
ToolTip("Exp & Job Bot tutte le versioni. (x32) by SCL - F3 stoppa solo per 1 minuto ed ESC per chiudere il Bot.",0,0)
While 1
ControlSend($Title, "", "", "{SPACE}")
sleep(350)
ControlSend($Title, "", "", "{SPACE}")
Sleep(350)
ControlSend($Title, "", "", "w")
sleep(350)
ControlSend($Title, "", "", "w")
sleep(350)
ControlSend($Title, "", "", "w")
Sleep(350)
ControlSend($Title, "", "", "{SPACE}")
sleep(350)
ControlSend($Title, "", "", "{SPACE}")
Sleep(350)
WEnd
EndFunc

Func Pausa()
sleep (60000)
EndFunc

Func ESCI()
Exit 0
msgbox(0, "Bot All Version (x32)", "Hai usato il bot per versioni 32 bit creato da SCL.")
Sleep(100)
EndFunc

While 1 
    msgbox(0, "Exp & Job Bot tutte le versioni. (x32) by SCL - F3 stoppa solo per 1 minuto ed ESC per chiudere il Bot.",0,0)
    Sleep(100)
WEnd

Func Avvia1()
While 1
ToolTip("Exp & Job Bot tutte le versioni. (x32) by SCL - F3 stoppa solo per 1 minuto ed ESC per chiudere il Bot.",0,0)
ControlSend($Title, "", "", "z")
Sleep(500)
ControlSend($Title, "", "", "z")
Sleep(500)
ControlSend($Title, "", "", "z")
Sleep(500)
ControlSend($Title, "", "", "z")
Sleep(500)
WEnd
EndFunc 

Hack MiniGame Generali:

Codice PHP:

#RequireAdmin

Global $Taglialegnax99_Var = 0,$Cavax99_Var = 0,$Sparax99_Var = 0,$Stagnox99_Var = 0,$Combox10_Var = 0,$Munizioniillimitatespara_Var = 0, $Roccia_Illuminata_Var = 0
Global $Taglialegnax99_g = 1,$Cavax99_g = 1,$Sparax99_g = 1,$Stagnox99_g = 1,$Combox10_g = 1,$Munizioniillimitatespara_g = 1, $Roccia_Illuminata_g = 1


Opt("TrayMenuMode",1)

AdlibRegister("Aggiornamento",20)

#include <StructureConstants.au3>
#include <Misc.au3>
#include <GDIplus.au3>
#include <NosLib.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("", 160, 165, 0, 0, BitOR($WS_POPUP, $WS_BORDER))
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetBkColor(0xC8C8C8)
$Group1 = GUICtrlCreateGroup("Hack Generali", 8, 8, 97, 81)
GUICtrlSetBkColor(-1, 0xC8C8C8)
$Checkbox1 = GUICtrlCreatecheckbox("ZoomHack", 16, 24, 113, 17)
GUICtrlSetBkColor(-1, 0xC8C8C8)
$Checkbox2 = GUICtrlCreatecheckbox("SpeedHack", 16, 56, 113, 17)
GUICtrlSetBkColor(-1, 0xC8C8C8)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("~~~Nostrucchi~~~", 8, 96, 97, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###+

$Sito = TrayCreateItem("Nostrucchi.altervista.org")
TrayCreateItem("")
$Esci = TrayCreateItem("Esci")

WinSetTrans($Form1, "", "153")

TrayTip("Crediti", "Hack creato da SCL attraverso l'uso della libreria di narutomega96", 5000)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _Form2()
        Case $Checkbox1
            _ZoomHack()
        Case $Checkbox2
            _SpeedHack()
        Case $Esci
            Exit 0
        Case $Sito
            ShellExecute("www.nostrucchi.altervista.org")
    EndSwitch
WEnd

Func _Form2()
    #Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 117, 162, 397, 184, BitOR($WS_POPUP, $WS_BORDER))
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetBkColor(0xC8C8C8)
$Label1 = GUICtrlCreateLabel("MiniGameHack:", 8, 8, 80, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Tagliax99", 8, 32, 97, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Cavax99", 8, 48, 97, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Stagnox99", 8, 64, 97, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Sparax99", 8, 80, 97, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Combox10", 8, 96, 97, 17)
$Checkbox6 = GUICtrlCreateCheckbox("RocciaIlluminata", 8, 112, 97, 17)
$Checkbox7 = GUICtrlCreateCheckbox("Munizioni Infinite", 8, 128, 97, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Taglialegnax99_Var
            If $Taglialegnax99_Var = 1 Then
                $Taglialegnax99_Var = 0
                GUICtrlSetBkColor($Taglialegnax99_Var,0x7a7a7a)
            Else
                $Taglialegnax99_Var = 1
                GUICtrlSetBkColor($Taglialegnax99_Var,0x18DF18)
            EndIf
        Case $Cavax99_Var
            If $Cavax99_Var = 1 Then
                $Cavax99_Var = 0
                GUICtrlSetBkColor($Cavax99_Var,0x7a7a7a)
            Else
                $Cavax99_Var = 1
                GUICtrlSetBkColor($Cavax99_Var,0x18DF18)
            EndIf
        Case $Sparax99_Var
            If $Sparax99_Var = 1 Then
                $Sparax99_Var = 0
                GUICtrlSetBkColor($Sparax99_Var,0x7a7a7a)
            Else
                $Sparax99_Var = 1
                GUICtrlSetBkColor($Sparax99_Var,0x18DF18)
            EndIf
        Case $Stagnox99_Var
            If $Stagnox99_Var = 1 Then
                $Stagnox99_Var = 0
                GUICtrlSetBkColor($Stagnox99_Var,0x7a7a7a)
            Else
                $Stagnox99_Var = 1
                GUICtrlSetBkColor($Stagnox99_Var,0x18DF18)
            EndIf
        Case $Combox10_Var
            If $Combox10_Var = 1 Then
                $Combox10_Var = 0
                GUICtrlSetBkColor($Combox10_Var,0x7a7a7a)
            Else
                $Combox10_Var = 1
                GUICtrlSetBkColor($Combox10_Var,0x18DF18)
            EndIf
        Case $Munizioniillimitatespara_Var
            If $Munizioniillimitatespara_Var = 1 Then
                $Munizioniillimitatespara_Var = 0
                GUICtrlSetBkColor($Munizioniillimitatespara_Var,0x7a7a7a)
            Else
                $Munizioniillimitatespara_Var = 1
                GUICtrlSetBkColor($Munizioniillimitatespara_Var,0x18DF18)
            EndIf
        Case $Roccia_Illuminata_Var
            If $Roccia_Illuminata_Var = 1 Then
                $Roccia_Illuminata_Var = 0
                GUICtrlSetBkColor($Roccia_Illuminata_Var,0x7a7a7a)
            Else
                $Roccia_Illuminata_Var = 1
                GUICtrlSetBkColor($Roccia_Illuminata_Var,0x18DF18)
            EndIf
    EndSwitch
WEnd
EndFunc
            
Func Aggiornamento()
    If $Taglialegnax99_Var = 1 Then
        _MemoryPointerWrite(0x007BA60C,$P,$Taglialegnax99_Array,9999,"DWORD")
        $Taglialegnax99_g = 0
    Else
        If $Taglialegnax99_g = 0 Then
            _MemoryPointerWrite(0x007BA60C,$P,$Taglialegnax99_Array,2,"DWORD")
            $Taglialegnax99_g = 1
        EndIf
    EndIf
    If $Cavax99_Var = 1 Then
        _MemoryPointerWrite(0x007BA60C,$P,$Cavax99_Array,9999,"DWORD")
        $Cavax99_g = 0
    Else
        If $Cavax99_g = 0 Then
            _MemoryPointerWrite(0x007BA60C,$P,$Cavax99_Array,3,"DWORD")
            $Cavax99_g = 1
        EndIf
    EndIf
    If $Sparax99_Var = 1 Then
        _MemoryPointerWrite(0x007BA60C,$P,$Sparax99_Array,9999,"DWORD")
        $Sparax99_g = 0
    Else
        If $Sparax99_g = 0 Then
            _MemoryPointerWrite(0x007BA60C,$P,$Sparax99_Array,2,"DWORD")
            $Sparax99_g = 1
        EndIf
    EndIf
    If $Stagnox99_Var = 1 Then
        _MemoryPointerWrite(0x007BA60C,$P,$Stagnox99_Array,9999,"DWORD")
        $Stagnox99_g = 0
    Else
        If $Stagnox99_g = 0 Then
            _MemoryPointerWrite(0x007BA60C,$P,$Stagnox99_Array,2,"DWORD")
            $Stagnox99_g = 1
        EndIf
    EndIf
    If $Combox10_Var = 1 Then
        _MemoryPointerWrite(0x007BA60C,$P,$Combox10_Array,9,"DWORD")
        $Combox10_g = 0
    Else
        If $Combox10_g = 0 Then
            _MemoryPointerWrite(0x007BA60C,$P,$Combox10_Array,2,"DWORD")
            $Combox10_g = 1
        EndIf
    EndIf
    If $Munizioniillimitatespara_Var = 1 Then
        _MemoryPointerWrite(0x007BA60C,$P,$Munizioniillimitatespara_Array,9999,"DWORD")
        $Munizioniillimitatespara_g = 0
    Else
        If $Munizioniillimitatespara_g = 0 Then
            _MemoryPointerWrite(0x007BA60C,$P,$Munizioniillimitatespara_Array,10,"DWORD")
            $Munizioniillimitatespara_g = 1
        EndIf
    EndIf
    If $Roccia_Illuminata_Var = 1 Then
        _MemoryPointerWrite(0x007BA60C,$P,$RocciaLuccicante_Array,9999,"DWORD")
        $Roccia_Illuminata_g = 0
    Else
        If $Roccia_Illuminata_g = 0 Then
            _MemoryPointerWrite(0x007BA60C,$P,$RocciaLuccicante_Array,0,"DWORD")
            $Roccia_Illuminata_g = 1
        EndIf
    EndIf
EndFunc 

Taglialegna combo x10:

Codice PHP:

Global $Combox10_SCL_g = 1
Global $Combox10_SCL_Var = 0
#RequireAdmin

Dim $Combox10_SCL_Array[3] = [0x0,0x0c,0x9CC]

#include <Pointer.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("TaglialegnaComboX10 by SCL", 215, 41, -1, -1)
$Combox10_SCL_Label = GUICtrlCreateLabel("Combo x10.SCL:", 8, 12, 84, 19)
$Combox10_SCL_Button = GUICtrlCreateButton("Disabilitato", 100, 8, 105, 25, $WS_GROUP)
GUICtrlSetBkColor(-1,0xFF0000)
GUISetState(@SW_SHOW)


$P = _MemoryOpen(ProcessExists("NostaleX.dat"))
AdlibRegister("Aggiornamento",80)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Combox10_SCL_Button
If $Combox10_SCL_Var = 1 Then
$Combox10_SCL_Var = 0
GUICtrlSetBkColor($Combox10_SCL_Button,0xFF0000)
GUICtrlSetData($Combox10_SCL_Button,"Disativato")
Else
$Combox10_SCL_Var = 1
GUICtrlSetBkColor($Combox10_SCL_Button,0x18DF1)
GUICtrlSetData($Combox10_SCL_Button,"Abilitato")
EndIf
EndSwitch
Sleep(10)
WEnd

Func Aggiornamento() 
If $Combox10_SCL_Var = 1 Then 
_MemoryPointerWrite(0xFD81FFA1,$P,$Combox10_SCL_Array, 9,"DWORD") 
$Combox10_SCL_g = 0 
Else 
If $Combox10_SCL_g = 0 Then 
_MemoryPointerWrite(0xFD81FFA1,$P,$Combox10_SCL_Array, 0,"DWORD") 
$Combox10_SCL_g = 1 
EndIf 
EndIf 
EndFunc 

Source da montare: ZoomHack

Codice PHP:

Func _ZoomHack()
    While 1
    _MemoryPointerWrite(0x00634D38,$P,$Off_ZoomHack, "5", "Float")
    _MemoryWrite(0x006252C4, $P, "5", "Float")
    WEnd
EndFunc 

Grazie

mi dispiace per te. Sad

Non devi dispiacerti.. ^^
Ho solo smesso di fare hack per nostale, perchè qualcuno, senza far nomi, dopo che le pubblicavo diceva che erano di un altra persona.. tutto qui..

So gia tutto. Smile

e ni dispiace lo stesso.cmq grz per il codice degli hack.

Fanne buon uso <.<
E non farti bannare xD
Per chi non so sa, sono scritte in AutoIT

scusami ma come faccio a farli partire con autoit??

Apri AutoIT v3, salvi il progetto con un nome. Cerchi il progetto, fai tasto destro, e fai Run Script

Okk^^ provero mi dai link dowload auto it
?

Google is your friend

Scrivi su google: AutoIT V3
Scarichi il programma, copi, incolli e fai partire hack.

scusami ma dove incollo?

-.- non rispondo siccome siamo OT...
Cerca qualche guida sul web, o apri un nuovo 3AD

Non andate OT!

Complimenti SCL Smile

Di nulla Grafra Smile

Comunque credo che molta gente non sappia che farsene di questo codice se non sanno trovare gli addres xD

Più che addres devono cercare pointer! xD
Se non erro i bot vanno...

Usano gli offset di narutomega96 xD basta l addres però è un inizio per qualcuno di creare hack minigame per nosit Smile

SI, tanto per fare pubblicità a quel genio, vi ricordo che potete usare la sua libreria Big Grin

Adesso non so link, fatevela dare da lui! D:
Vi posto suo profilo: @[narutomega96]

SCL

Raiden

SCL

Raiden

SCL

lougyt

SCL

lougyt

Rameel

SCL

lougyt

SCL

Diedarrow13

Gafra96

SCL

Gafra96

SCL

Gafra96

SCL