Hack per NosTale sicuri e funzionanti?

Vorrei tornare ad alti livelli in breve tempo....grazie in anticipo

1 risposta

Classificazione
  • 8 anni fa
    Risposta preferita

    Ciao a tutti, ho moooolte Hack per NosTale IT create da me e siccome tanto non gioco più a NosTale, posso darvi il source, in modo che le compiliate e le sfruttiate.

    Ovviamente ne io ne sciax2 ci assumiamo i rischi di ban ecc che comportano i programmi

    PS: Sono scritte in AutoIT

    Tipologie Hack:

    - Vite x99 tutti i minigiochi

    - Roccia sempre illuminata

    - Proiettili x99 Sparapolli

    - Combox10

    - Combo x100

    - SP Trasform

    Lascio il codice dell'hack Combox10 (Taglialegna) con i miei crediti.

    Codice:

    Global $Combox10_SCL_g = 1

    Global $Combox10_SCL_Var = 0

    #RequireAdmin

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

    #include <Pointer.au3>

    #include <ButtonConstants.au3>

    #include <EditConstants.au3>

    #include <GUIConstantsEx.au3>

    #include <StaticConstants.au3>

    #include <WindowsConstants.au3>

    Func Aggiornamento()

    If $Combox10_SCL_Var = 1 Then

    _MemoryPointerWrite(0xPointer,$P,$Combox10_SCL_Array, 9,"DWORD")

    $Combox10_SCL_g = 0

    Else

    If $Combox10_SCL_g = 0 Then

    _MemoryPointerWrite(0xPointer,$P,$Combox10_SCL_Array, 0,"DWORD")

    $Combox10_SCL_g = 1

    EndIf

    EndIf

    EndFunc

    Lascio il codice dell'hack D3D contenente SP trasform e hack tutti i minigiochi, crediti miei e di Narutomega96.

    Opt("TrayMenuMode",1)

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****

    #AutoIt3Wrapper_Compression=4

    #AutoIt3Wrapper_Run_Obfuscator=y

    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

    $P = IniRead("Settings.ini", "Global", "Nostale_Processo", "1")

    If $P = "1" Then

    $P = InputBox("Processo di Nostale", "Inserisci il processo di nostale consigliato: " & @CRLF & " - NostaleX.dat")

    If Not ProcessExists($P) Then

    MsgBox(0, "Riprova", "Devi aprire prima nostale")

    Exit

    EndIf

    IniWrite("Settings.ini", "Global", "Nostale_Processo", $P)

    EndIf

    AdlibRegister("Aggiornamento",20)

    Dim $Taglialegnax99_Var[3] = [0x0,0x0C,0x9C4]

    Dim $Cavax99_Var[3] = [0x0,0x0C,0xFBC]

    Dim $Sparax99_Var[3] = [0x0,0x0C,0x8C4]

    Dim $Stagnox99_Var[3] = [0x0,0x0C,0x16EC]

    Dim $Combox10_Var[3] = [0x0,0x0C,0x9CC]

    Dim $RocciaLuccicante_Var[3] = [0x0,0x0C,0x1008]

    Dim $Munizioniillimitatespara_Var[3] = [0x0,0x0C,0x908]

    #include <StructureConstants.au3>

    #include <Misc.au3>

    #include <GDIplus.au3>

    #include <GUIConstantsEx.au3>

    #include <StaticConstants.au3>

    #include <WindowsConstants.au3>

    #include <NosLib.au3>

    #Region ### START Koda GUI section ### Form=

    $Form1 = GUICreate("", 160, 258, 0, 0, BitOR($WS_POPUP, $WS_BORDER))

    GUICtrlSetState(-1, $GUI_DISABLE)

    GUISetBkColor(0x7a7a7a)

    $Group1 = GUICtrlCreateGroup("Minigame Hack", 0, 0, 121, 137)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Taglialegna = GUICtrlCreateCheckbox("Taglialegna x99", 8, 16, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Cava = GUICtrlCreateCheckbox("Cava x99", 8, 32, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Stagno = GUICtrlCreateCheckbox("Stagno x99", 8, 48, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Sparapolli = GUICtrlCreateCheckbox("Sparapolli x99", 8, 64, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Combo = GUICtrlCreateCheckbox("Combo x10", 8, 80, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Munizioni = GUICtrlCreateCheckbox("Munizioni Illimitate", 8, 96, 105, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Roccia = GUICtrlCreateCheckbox("Roccia Illuminata", 8, 112, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    GUICtrlCreateGroup("", -99, -99, 1, 1)

    $Group2 = GUICtrlCreateGroup("Hack Generali", 0, 136, 121, 89)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Checkbox8 = GUICtrlCreateCheckbox("Zoom Hack", 8, 152, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Button1 = GUICtrlCreateButton("Trasforma PG", 8, 192, 75, 25)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    $Checkbox9 = GUICtrlCreateCheckbox("Speed Hack", 8, 168, 97, 17)

    GUICtrlSetBkColor(-1, 0x7a7a7a)

    GUICtrlCreateGroup("", -99, -99, 1, 1)

    $Label1 = GUICtrlCreateLabel("~~~Nostrucchi~~~", 8, 232, 137, 20)

    GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")

    GUICtrlSetColor(-1, 0xFFFF00)

    GUISetState(@SW_SHOW)

    #EndRegion ### END Koda GUI section ###+

    $Credits = Display_Rotated_Text($Form1, "Narutomega96 & SCL", 128, 190, 90, 400, 17, 0xFFFF00, 0xFFFF00)

    GUICtrlSetColor($Credits, 0xFFFF00)

    PER ALTRO E MAGGIORNI INFO VAI QUI : http://www.sciax2.it/forum/nostale/hack-nostale-it...

Altre domande? Fai una domanda e ottieni le risposte che cerchi.