Zabb

 ERROR: Esta es la imagen del 1^ER Parche de Enero, pero por confusiones con los Diseñadores.

Un programa creado para lanzar pociones de forma automática dentro del juego.

Public Class Form1
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim bmp As New Bitmap(1, 1)
        Using g As Graphics = Graphics.FromImage(bmp)
            g.CopyFromScreen(Windows.Forms.Cursor.Position, New Point(0, 0), New Size(1, 1))
        End Using
        Dim pixel As Drawing.Color = bmp.GetPixel(0, 0)
        Label1.Text$ = bmp.GetPixel(0, 0).ToString
        Dim p As New Point
        p.X = (Me.Width / 2) - (Label1.Width / 2)
        p.Y = Label1.Top
        Label1.Location = p
        PictureBox1.BackColor = pixel
        Me.Invalidate()
    End Sub
End Class

---------------------------------------------------------------------------------------

Code Snippet

Private colorToFind As KnownColor = 4928371

Private Sub b_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles b.Click

Threading.Thread.Sleep(1000)

Application.DoEvents()

Dim searchRectangle As New Rectangle(1, 1, 1280, 800)

Dim foundPt As Point = PixelSearch(searchRectangle, colorToFind)

Me.Text = String.Format("Pixel location in bitmap: ({0},{1})", foundPt.X.ToString, foundPt.Y.ToString)

' move mouse and click

Windows.Forms.Cursor.Position = New Point(foundPt.X + searchRectangle.X, foundPt.Y + searchRectangle.Y)

NativeMethods.MouseClick()

End Sub

' returns (-1, -1) if not found

Private Function PixelSearch(ByVal rec As Rectangle, ByVal colorToFind As Integer) As Point

' find the location in the bitmap

Dim x As Integer = -1

Dim y As Integer = -1

' First grab the screen

Using bm As New Bitmap(rec.Width, rec.Height)

' Copy a portion of the screen.

Dim topleft As Point = New Point(rec.X, rec.Y)

Using g As Graphics = Graphics.FromImage(bm)

g.CopyFromScreen(topleft, New Point, rec.Size)

End Using

' lock the bits

Dim bmd As BitmapData = bm.LockBits(New Rectangle(0, 0, bm.Width, bm.Height), ImageLockMode.ReadOnly, PixelFormat.Format32bppArgb)

' copy all pixels out into an integer array.

Dim pixels(bm.Width * bm.Height - 1) As Integer

Marshal.Copy(bmd.Scan0, pixels, 0, pixels.Length)

' find the color

For i As Integer = 0 To pixels.Length - 1

If pixels(i) = colorToFind Then

x = i Mod bm.Width

y = i \ bm.Width

Exit For

End If

Next

' unlock bm

bm.UnlockBits(bmd)

End Using

Return New Point(x, y)

End Function

---------------------------------------------------------------------------------------

Code Snippet
Option Strict On
Option Explicit On

Imports System.ComponentModel
Imports System.Drawing.Imaging
Imports System.Runtime.InteropServices

Public Class Form1

    Private rand As Random
    Private colorToFind As Integer = &HFFFF0000 ' &HFF all rest are &HFE
    Private WithEvents b As New Button
    Private colorPoint As Point

    Sub New()
        ' This call is required by the Windows Form Designer.
        InitializeComponent()
        ' Add any initialization after the InitializeComponent() call.                
        b.Location = New Point(10, 10)
        b.Text = "go"
        Me.Controls.Add(b)
        rand = New Random
    End Sub

    ' Create a random colored bitmap, quickly.
    Private Function GetRandomColorBitmap(ByVal size As Size) As Bitmap
        Dim bm As New Bitmap(size.Width, size.Height)
        Dim bmd As BitmapData = bm.LockBits(New Rectangle(New Point, size), ImageLockMode.WriteOnly, PixelFormat.Format32bppArgb)
        Dim colors(size.Width * size.Height - 1) As Integer
        For i As Integer = 0 To colors.Length - 1
            colors(i) = rand.Next(Integer.MinValue, Integer.MaxValue) Or &HFE000000
        Next
        Marshal.Copy(colors, 0, bmd.Scan0, colors.Length)
        bm.UnlockBits(bmd)
        Return bm
    End Function

    ' The point just happens to be on the form, it can also be Off the form...
    Private Sub b_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles b.Click
        b.Visible = False
        MessageBox.Show("I'm going to draw 1 pixel on the form with a unique red color, then I'm going to wait for 1 second, then I'm going to draw random mess all over the form, and redraw the pixel on top, then I'm going to move the mouse over the pixel and click.")
        Using g As Graphics = Me.CreateGraphics
            colorPoint = New Point(rand.Next(0, Me.ClientSize.Width), rand.Next(0, Me.ClientSize.Height))
            g.FillRectangle(New SolidBrush(Color.FromArgb(colorToFind)), New Rectangle(colorPoint, New Size(1, 1)))
            g.DrawEllipse(Pens.Black, New Rectangle(colorPoint.X - 10, colorPoint.Y - 10, 20, 20))
        End Using
        Threading.Thread.Sleep(1000)
        Dim backg As Bitmap = GetRandomColorBitmap(Me.ClientSize)
        Using g As Graphics = Graphics.FromImage(backg)
            g.FillRectangle(New SolidBrush(Color.FromArgb(colorToFind)), New Rectangle(colorPoint, New Size(1, 1)))
          End Using
        Me.BackgroundImage = backg
        Application.DoEvents()
        Dim searchRectangle As New Rectangle
        searchRectangle.Location = Me.PointToScreen(New Point) ' top left of client area
        searchRectangle.Size = Me.ClientSize
        Dim foundPt As Point = PixelSearch(searchRectangle, colorToFind)
        Me.Text = String.Format("Pixel location in bitmap: ({0},{1})", foundPt.X.ToString, foundPt.Y.ToString)
        ' move mouse and click
        Cursor.Position = New Point(foundPt.X + searchRectangle.X, foundPt.Y + searchRectangle.Y)
        NativeMethods.MouseClick()
    End Sub

    Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
        b.Visible = True
        Dim pt As Point = Me.PointToClient(Cursor.Position)
        MessageBox.Show(String.Format("Point clicked:{0}{1}Color point:{2}", _
                pt.ToString, Environment.NewLine, colorPoint.ToString))
    End Sub

    ' returns (-1, -1) if not found
    Private Function PixelSearch(ByVal rec As Rectangle, ByVal colorToFind As Integer) As Point
        ' Right, there is one pixel on the form in the correct color.
        ' find the location in the bitmap
        Dim x As Integer = -1
        Dim y As Integer = -1
        ' First grab the screen
        Using bm As New Bitmap(rec.Width, rec.Height)
            ' Copy a portion of the screen. 
            Dim topleft As Point = New Point(rec.X, rec.Y)
            Using g As Graphics = Graphics.FromImage(bm)
                g.CopyFromScreen(topleft, New Point, rec.Size)
            End Using
            ' lock the bits
            Dim bmd As BitmapData = bm.LockBits(New Rectangle(0, 0, bm.Width, bm.Height), ImageLockMode.ReadOnly, PixelFormat.Format32bppArgb)
            ' copy all pixels out into an integer array.
            Dim pixels(bm.Width * bm.Height - 1) As Integer
            Marshal.Copy(bmd.Scan0, pixels, 0, pixels.Length)
            ' find the color
            For i As Integer = 0 To pixels.Length - 1
                If pixels(i) = colorToFind Then
                    x = i Mod bm.Width
                    y = i \ bm.Width
                    Exit For
                End If
            Next
            ' unlock bm
            bm.UnlockBits(bmd)
        End Using
        Return New Point(x, y)
    End Function

End Class

Friend Class NativeMethods

    <DllImport("user32.dll", SetLastError:=True)> _
Private Shared Function SendInput( _
ByVal cInputs As Integer, _
ByVal pInputs() As INPUT, _
ByVal cbSize As Integer) As Integer
    End Function

    Private Structure INPUT
        Public dwType As Integer
        Public mi As MOUSEINPUT
    End Structure

    <StructLayout(LayoutKind.Sequential)> _
    Private Structure MOUSEINPUT
        Public dx As Integer
        Public dy As Integer
        Public mouseData As UInteger
        Public dwFlags As UInteger
        Public time As UInteger
        Public dwExtraInfo As IntPtr
    End Structure

    Private Const INPUT_MOUSE As Integer = 0
    Private Const MOUSEEVENTF_LEFTDOWN As Integer = &H2
    Private Const MOUSEEVENTF_LEFTUP As Integer = &H4
    Private Const MOUSEEVENTF_MIDDLEDOWN As Integer = &H20
    Private Const MOUSEEVENTF_MIDDLEUP As Integer = &H40
    Private Const MOUSEEVENTF_MOVE As Integer = &H1
    Private Const MOUSEEVENTF_ABSOLUTE As Integer = &H8000
    Private Const MOUSEEVENTF_RIGHTDOWN As Integer = &H8
    Private Const MOUSEEVENTF_RIGHTUP As Integer = &H10

    ' not accurate!
    Public Shared Sub MoveMouseAndClick(ByVal x As Integer, ByVal y As Integer)
        Dim inputs(2) As INPUT
        For i As Integer = 0 To inputs.Length - 1
            inputs(i).dwType = INPUT_MOUSE
        Next
        inputs(0).mi.dwFlags = MOUSEEVENTF_MOVE Or MOUSEEVENTF_ABSOLUTE
        ' oh, this isn't accurate. I've abandoned it and used Cursor.Position instead.
        inputs(0).mi.dx = Convert.ToInt32(Math.Ceiling(x * 65535 / Screen.PrimaryScreen.Bounds.Width))
        inputs(0).mi.dy = Convert.ToInt32(Math.Ceiling(y * 65535 / Screen.PrimaryScreen.Bounds.Height))
        inputs(1).mi.dwFlags = MOUSEEVENTF_LEFTDOWN
        inputs(2).mi.dwFlags = MOUSEEVENTF_LEFTUP
        Dim cbSize As Integer = Marshal.SizeOf(inputs(0))
        Dim result As Integer = SendInput(inputs.Length, inputs, cbSize)
        If result = 0 Then
            Throw New System.ComponentModel.Win32Exception
        End If
    End Sub

    Public Shared Sub MouseClick()
        Dim inputs(1) As INPUT
        For i As Integer = 0 To inputs.Length - 1
            inputs(i).dwType = INPUT_MOUSE
        Next
        inputs(0).mi.dwFlags = MOUSEEVENTF_LEFTDOWN
        inputs(1).mi.dwFlags = MOUSEEVENTF_LEFTUP
        Dim cbSize As Integer = Marshal.SizeOf(inputs(0))
        Dim result As Integer = SendInput(inputs.Length, inputs, cbSize)
        If result = 0 Then
            Throw New System.ComponentModel.Win32Exception
        End If
    End Sub
End Class

---------------------------------------------------------------------------------------

If Start = True Then
Do Until Stop = True
Try
Pixelsearch1
Mouseclick(pixelsearch1)
Catch
Try
Pixelsearch2
Mouseclick(pixelsearch2)
End Try
End Try
Loop
EndIf

---------------------------------------------------------------------------------------

Code Snippet
Option Strict On
Option Explicit On

Imports System.ComponentModel
Imports System.Drawing.Imaging
Imports System.Runtime.InteropServices

Public Class Form1

    Private rand As Random
    Private colorToFind As Integer = &HFFFF0000 ' &HFF all rest are &HFE
    Private WithEvents b As New Button
    Private colorPoint As Point

    Sub New()
        ' This call is required by the Windows Form Designer.
        InitializeComponent()
        ' Add any initialization after the InitializeComponent() call.                
        b.Location = New Point(10, 10)
        b.Text = "go"
        Me.Controls.Add(b)
        rand = New Random
    End Sub

    ' Create a random colored bitmap, quickly.
    Private Function GetRandomColorBitmap(ByVal size As Size) As Bitmap
        Dim bm As New Bitmap(size.Width, size.Height)
        Dim bmd As BitmapData = bm.LockBits(New Rectangle(New Point, size), ImageLockMode.WriteOnly, PixelFormat.Format32bppArgb)
        Dim colors(size.Width * size.Height - 1) As Integer
        For i As Integer = 0 To colors.Length - 1
            colors(i) = rand.Next(Integer.MinValue, Integer.MaxValue) Or &HFE000000
        Next
        Marshal.Copy(colors, 0, bmd.Scan0, colors.Length)
        bm.UnlockBits(bmd)
        Return bm
    End Function

    ' The point just happens to be on the form, it can also be Off the form...
    Private Sub b_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles b.Click
        b.Visible = False
        MessageBox.Show("I'm going to draw 1 pixel on the form with a unique red color, then I'm going to wait for 1 second, then I'm going to draw random mess all over the form, and redraw the pixel on top, then I'm going to move the mouse over the pixel and click.")
        Using g As Graphics = Me.CreateGraphics
            colorPoint = New Point(rand.Next(0, Me.ClientSize.Width), rand.Next(0, Me.ClientSize.Height))
            g.FillRectangle(New SolidBrush(Color.FromArgb(colorToFind)), New Rectangle(colorPoint, New Size(1, 1)))
            g.DrawEllipse(Pens.Black, New Rectangle(colorPoint.X - 10, colorPoint.Y - 10, 20, 20))
        End Using
        Threading.Thread.Sleep(1000)
        Dim backg As Bitmap = GetRandomColorBitmap(Me.ClientSize)
        Using g As Graphics = Graphics.FromImage(backg)
            g.FillRectangle(New SolidBrush(Color.FromArgb(colorToFind)), New Rectangle(colorPoint, New Size(1, 1)))
          End Using
        Me.BackgroundImage = backg
        Application.DoEvents()
        Dim searchRectangle As New Rectangle
        searchRectangle.Location = Me.PointToScreen(New Point) ' top left of client area
        searchRectangle.Size = Me.ClientSize
        Dim foundPt As Point = PixelSearch(searchRectangle, colorToFind)
        Me.Text = String.Format("Pixel location in bitmap: ({0},{1})", foundPt.X.ToString, foundPt.Y.ToString)
        ' move mouse and click
        Cursor.Position = New Point(foundPt.X + searchRectangle.X, foundPt.Y + searchRectangle.Y)
        NativeMethods.MouseClick()
    End Sub

    Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
        b.Visible = True
        Dim pt As Point = Me.PointToClient(Cursor.Position)
        MessageBox.Show(String.Format("Point clicked:{0}{1}Color point:{2}", _
                pt.ToString, Environment.NewLine, colorPoint.ToString))
    End Sub

    ' returns (-1, -1) if not found
    Private Function PixelSearch(ByVal rec As Rectangle, ByVal colorToFind As Integer) As Point
        ' Right, there is one pixel on the form in the correct color.
        ' find the location in the bitmap
        Dim x As Integer = -1
        Dim y As Integer = -1
        ' First grab the screen
        Using bm As New Bitmap(rec.Width, rec.Height)
            ' Copy a portion of the screen. 
            Dim topleft As Point = New Point(rec.X, rec.Y)
            Using g As Graphics = Graphics.FromImage(bm)
                g.CopyFromScreen(topleft, New Point, rec.Size)
            End Using
            ' lock the bits
            Dim bmd As BitmapData = bm.LockBits(New Rectangle(0, 0, bm.Width, bm.Height), ImageLockMode.ReadOnly, PixelFormat.Format32bppArgb)
            ' copy all pixels out into an integer array.
            Dim pixels(bm.Width * bm.Height - 1) As Integer
            Marshal.Copy(bmd.Scan0, pixels, 0, pixels.Length)
            ' find the color
            For i As Integer = 0 To pixels.Length - 1
                If pixels(i) = colorToFind Then
                    x = i Mod bm.Width
                    y = i \ bm.Width
                    Exit For
                End If
            Next
            ' unlock bm
            bm.UnlockBits(bmd)
        End Using
        Return New Point(x, y)
    End Function

End Class

Friend Class NativeMethods

    <DllImport("user32.dll", SetLastError:=True)> _
Private Shared Function SendInput( _
ByVal cInputs As Integer, _
ByVal pInputs() As INPUT, _
ByVal cbSize As Integer) As Integer
    End Function

    Private Structure INPUT
        Public dwType As Integer
        Public mi As MOUSEINPUT
    End Structure

    <StructLayout(LayoutKind.Sequential)> _
    Private Structure MOUSEINPUT
        Public dx As Integer
        Public dy As Integer
        Public mouseData As UInteger
        Public dwFlags As UInteger
        Public time As UInteger
        Public dwExtraInfo As IntPtr
    End Structure

    Private Const INPUT_MOUSE As Integer = 0
    Private Const MOUSEEVENTF_LEFTDOWN As Integer = &H2
    Private Const MOUSEEVENTF_LEFTUP As Integer = &H4
    Private Const MOUSEEVENTF_MIDDLEDOWN As Integer = &H20
    Private Const MOUSEEVENTF_MIDDLEUP As Integer = &H40
    Private Const MOUSEEVENTF_MOVE As Integer = &H1
    Private Const MOUSEEVENTF_ABSOLUTE As Integer = &H8000
    Private Const MOUSEEVENTF_RIGHTDOWN As Integer = &H8
    Private Const MOUSEEVENTF_RIGHTUP As Integer = &H10

    ' not accurate!
    Public Shared Sub MoveMouseAndClick(ByVal x As Integer, ByVal y As Integer)
        Dim inputs(2) As INPUT
        For i As Integer = 0 To inputs.Length - 1
            inputs(i).dwType = INPUT_MOUSE
        Next
        inputs(0).mi.dwFlags = MOUSEEVENTF_MOVE Or MOUSEEVENTF_ABSOLUTE
        ' oh, this isn't accurate. I've abandoned it and used Cursor.Position instead.
        inputs(0).mi.dx = Convert.ToInt32(Math.Ceiling(x * 65535 / Screen.PrimaryScreen.Bounds.Width))
        inputs(0).mi.dy = Convert.ToInt32(Math.Ceiling(y * 65535 / Screen.PrimaryScreen.Bounds.Height))
        inputs(1).mi.dwFlags = MOUSEEVENTF_LEFTDOWN
        inputs(2).mi.dwFlags = MOUSEEVENTF_LEFTUP
        Dim cbSize As Integer = Marshal.SizeOf(inputs(0))
        Dim result As Integer = SendInput(inputs.Length, inputs, cbSize)
        If result = 0 Then
            Throw New System.ComponentModel.Win32Exception
        End If
    End Sub

    Public Shared Sub MouseClick()
        Dim inputs(1) As INPUT
        For i As Integer = 0 To inputs.Length - 1
            inputs(i).dwType = INPUT_MOUSE
        Next
        inputs(0).mi.dwFlags = MOUSEEVENTF_LEFTDOWN
        inputs(1).mi.dwFlags = MOUSEEVENTF_LEFTUP
        Dim cbSize As Integer = Marshal.SizeOf(inputs(0))
        Dim result As Integer = SendInput(inputs.Length, inputs, cbSize)
        If result = 0 Then
            Throw New System.ComponentModel.Win32Exception
        End If
    End Sub
End Class

No todos los codigos son correctos porque el original lo perdi, así que deje todos los que probamos para que tu mismo apliques el codigo de forma que te sirva.

1. Como este programa no se fija en un (.exe) en particular da igual si inicias el juego o el programa primero
2. Iniciar como Administrador.
3. Presiona (Alt + Rbutton "Click Der") para Iniciar/Parar/Re-posicionar el programa.
4. Presiona (Alt + Lbutton "Click Izq") para aplicar un area sombreada.
5. Presiona (Alt + Mbutton "Boton de medio del mouse") para obtener información adicional.

Esto es una guía de como evadir las reglas del juego para lograr falsificar tus estadísticas, subir de nivel rápido, obtener las armas que quieras de forma permanente.

¿Que contiene esta guía?

1. Fase: Crear multi-cuentas, subirlas a +10 y conseguir más de 100.000 ZP en Booster y/o Armas (Cada mes)
2. Fase: Empezar a subir el KDA.
3. Fase: Falsificar las partidas.
4. Fase: Conseguir Axeso Cash gratis.
5. Fase: Entrar en el TOP de algún mapa y siempre estar en 1* Lugar.
6. Fase: Conseguir cualquier arma permanente solo con ZP y subir del nivel 0 al 40 en poco más de un MES.
7. Fase: Completar misiones especiales.

Todo en base de mi experiencia personal, conseguí subir mi cuenta en un mes al nivel 40, con un KDA de +3.80 y tener la M468 (+2)/Hunter (+2)/Glock 18 (+2)

de forma permanente sin haber gastado ni un solo dolar. Cabe aclarar que nunca compre las armas en promoción.

Si quieres tener esto y aun más debes tener en cuenta que depende de echarle 4+ horas o 3+ al día a este proceso así que depende en gran medida que tanto vicio le metes al juego y que tanto deseas tener todo antes de llegar al lvl 50. Si solo vienes por un consejo de la lista al menos compártelo con tus amigos que estén interesados.

Para esta primera fase empezaremos fijando cuando creamos nuestra cuenta principal (La que subiremos completamente), como bien saben el juego regala a todos los jugadores 20.000 ZP cada mes el dia que te registraste. Si fue un 31 y es Febrero el primero del mes te lo dan, es importante anotar la fecha y no olvidarla. Ahora sigue estos pasos:

1. Ve a la página de Axeso5 y logeate.
2. Dirígete a  y ve debajo (Busca la casilla de zula y copia tu referido algo así: )

3. Ya cuando lo tengas copia ese link en un block de notas.

Ahora a crear cuentas en 5 min:

1. Crear E-mail: Ve a Aol.com (Aquí el Link)
2. Llena los datos (Consigue el código ZIP) / (Consigue el Numero de Telefono para el SMS) (Por si el número no lo acepta) *No coloques tu numero verdadero*
3. Usa una contraseña global para tus cuentas falsas, no uses la contraseña de tu cuenta principal.
4. Logeate en la bandeja de mensajes del correo.
5. Usar el código referido: Recuerdas tu código que copiaste en el block, pegarlo en el navegador y crea una nueva cuenta.
6. ¿No te ha llegado nada?: El correo de Aol es diferente al convencional, tienes que ver donde diga (NEW MESSAGE) *En la notificación*
7. Ve a Zula y Logeate: Crea nombres noobs como (Danielitocra4k2001 / Esepro7756) que no levanten sospecha.
8. Sube la cuenta a 10: Para hacer esto rápido ve a jugar con ella y en una hora la subes (En sabotage tardas, lo mejor es Team Deathmach)
9. Anota la fecha de registro de tu cuenta nueva y añade a tu cuenta principal, y repite el proceso cuantas veces quieras (Preferiblemente no el mismo día)

Ahora cada vez que entres a ellas seras para pasarte ya sea armas o esto:  cajas que 6 usos valen exactamente 20 mil ZP. 

Si tenias dudas por lo del referido es para sumar puntos y si eres interesado en conseguir alguno de los premios te servirá y si no pues en un futuro lo harán.

Ahora si tienes 8 cuentas distribuidas en diferentes días minimamente ya puedes presumir de tener 60% ZP / 60% de XP / 55% MATERIALES de forma permanente en el juego, así leveleas más rápido y consigues dinero más rápido.

Bueno en primera este proceso es muy aburrido, pero trae beneficios como ser aceptado en muchos clanes de alta gama, tener amigos de gran kda .. etc.

(Si sabes jugar bien y tenes un kda alto así  no sea propio te abre muchas puertas) y si no presumes tanto seras el centro de atención en partidas.

Aquí ya necesitas 2 cuentas simultaneas, si no las tienes ni te molestes en seguir leyendo esta fase.

Así debe ser la Config de las salas:

*El mapa debe ser obligadamente ese*

Si tu cuenta es nueva o reiniciaste estadisticas: 

• Alternar esta fase (2) con la (6), es decir Jugar Matar 40+ y Morir 18- (Así el sistema no te añade al monitoreo de cuentas sospechosas, si eso pasa olvídate de seguir el tutorial que te banearan).
• Como alternas con la Fase 6 entonces es: Jugaras Wanted 1 y Luego Team Deathmach 1, así todo el rato.
• ¿Pero que hago en cada una?: En wanted: Matar 40+ y Morir 18- (15 min si lo haces rápido) | En team deathmach: Matar: 30 (Máximo) y no morir. (5 min si lo haces rápido)
• Como eres nuevo empezaras con un kda de 2.00+, y cada vez que hagas esto subirá de a 4-6 puntos por partida de Team Deathmach sin morir, y cuando tengas más de 5 mil kills bajara la cifra a 3 puntos por partida, ira bajando poco a poco, así que te conviene rilo subiendo rápido al radio que te parezca menos sospechoso con tus habilidades. (EJ: Soy más o menos bueno [4.10+]/Soy más o menos medio bueno [3.70+]/Soy malo pero tengo esperanzas de mejorar [4.80])

Si tu cuenta es antigua pero no quieres reiniciar las estadísticas: 

• Dependen en gran medida de tu nivel, si eres 10 - 29: En un par de horas que le dediques al siguiente método te sera rápido, si eres 29 - 40: Tardaras un poquito más pero no tanto como lo seria si fueras 40 - 50.
• También de que KDA tengas y la cantidad de enemigos que has matado pero el caso es el mismo, todos pueden subirlo aunque tarden un poco más en lograrlo.
• 1. Debes jugar 3 partidas en Team Deathmach Matando 30 veces y sin morir. (15 min si lo haces rápido)
• 2. Jugar 2 Partidas en Team Deathmach Matando solo 10 veces y sin morir. (5 min si lo haces rápido)
• 3. Jugar alguna partida normal y morir normalmente (Mínimo debes morir 10) y puedes matar tanto como quieras (Depende de la partida)
• 4. Reiniciar el proceso.

Dudas en cuanto a esta fase:

1. Que pasa si me detecto el sistema, ya sea porque me pase o lo que sea: Juega 5 Partidas normales, y modifica el proceso disminuyendo muertes etc, tratado de morir mínimo 1 vez por partida, así evitas ser detectado (COMPROBADO ESTA SOLUCIÓN)
2. Cuando tenga el suficiente KDA que hago: Juega normal, cuando pierdas 5 puntos lo vuelves a subir y así hasta que lo tengas estático.
3. Y si mi habilidad no corresponde a mi KDA y sospechan: Evita dar información, que más fácil caes si hablas que si no dices nada.
4. Quiero subirlo por mi cuenta sin este proceso: Juega solo a sniper y en sabotage, evita morir .. no te hagas el pro si eres malo, rushear es pésima idea y cuida tu posición. Y wanted es tu peor enemigo, jugar wanted para farmear baja el kda mucho (Así digan que no, es verdad yo lo comprobé) 
5. ¿Que pasa con las asistencias?: Las asistencias no se pueden falsificar, te toca jugar partidas normales de Team Deathmach (Donde consigues más).

Es más simple de lo que parece, solo cambia la configuración de la sala (Solo importa el modo) y con tu otra cuenta entras - esperan a estar los Dos y ya.. la otra cuenta sale y tu ganas, tarda como 1 min para hacer 2 veces esto.

Es recomendable hacerlo porque solo Wanted y Team Deathmach sin casi Sabotage es extraño para jugadores normales.

No existe un hack / bot / script para esto, toca de la forma manual, pero te puedo dar algun que otro consejo que otros no te han dado:

1. 
2. En la ventana de Axeso $
3. 
4. Ve hasta el pie de página
5. 
6. 
7. Lo ideal seria ver un vídeo pero a veces no se puede, entonces has esto (No es recomendable, haslo con cuentas prueba)
8. Consigue te un programa que cambie tu IP como 360 Turbo VPN u otros y entra en tu cuenta fake y mira el video, cuando tengas bastante te auto pasas los items comprados desde tu cuenta fake a tu cuenta principal en Zula.
9. Si no te dio para un video, te toco los Ads.
10. Llenar toda esa información aburre por lo que busca Bots para llenarlas.
11. Si no hay bots, no lo hagas.. ya que hacerlo manual tarda más de 30 min x encuesta.

¿Quieres estar en ese top?, muy fácil .. aquí hay dos formas de hacerlo:

1. Con el BOT / Otra cuenta: 

El mapa: (EJ: Favela)

• Entrar los dos normalmente
• Cuando esten los dos mata al bot (Solo una vez) y este salga.
• Importante debe estar SIN CONTRASEÑA.

2. Normal sin usar doble cuenta:

• Jugar solo en ese mapa en concreto que quieres estar, mínimo matar 1 vez (no importa si quedas de 1 o ultimo en la partida)
• Ganar la partida
• Cada vez que abandonas una partida Pierdes 3 puntos, si pierdes una partida no afecta.

NOTA: Todos los meses el primero de ellos se reinician lo TOP, y después de 3 días sale la lista definitiva, y cada día se refresca.

Intenta aplicarlo en esa fecha y gana de seguido 20 partidas, luego el siguiente día otras 20, y el tercero otras 20 .. y ya el resto de días con que ganes 10 veces ya vale.

Si no sales en el top es porque no tienes las suficientes partidas, hay gente más viciada que uno.

Si no tienes multicuenta o bot, no farmees .. y que pierdes más de lo que ganas. Con que tengas los Booster ya puedes jugar en partidas normales que igual sacas el doble que los demás.

Los requisitos para esto es lo siguiente:

• Tener multi-cuenta / bot
• Los XP/ZP booster al 60% ambos. (Si quieres terminar rápido y conseguir tu arma o subir al nivel buscado)
• Tener las dos cuentas el extra de 25% de resurrección rápida.

Información:

• En promedio tardas 15 Min por partida y recolectas 700+ XP / 2500+ ZP
• En 1 hora seguida haces 10.000 ZP y 3000+ XP aprox. 
• En un día que le dediques haces más de 50.000 ZP y Subes un nivel

Configuración de sala:

Mapa: Sitio en Construcción

Mínimo de tiempo: 20 Minutos.

Modo: Wanted

Como se hace:

1. Empiezas tú siempre
2. Te alternas entre tu bot y tú
3. Cuando tu bot llegue a 17 o 18 Muertes ya no vuelve a matar.
4. Colócate Sniper cuando ya este en ese rango de muertes por haberte matado.
5. Colócate encima del medio donde los dos barriles rojos.
6. Mueve el bot para que lo veas y un headshot lo mates
7. Matalo hasta que termine.
8. Si no quieres perder KDA alterna con la Fase 2.

Si te aburres juega partidas normales y vuelve a repetir el proceso.

Misiones Diarias (En 20 min lo completas):

- Jugando Deathmach con bot

- Saliendo del mapa en tu multi-cuenta

Misiones Semanales (En un día lo haces):

- Muertes con armas lo completas con wanted y en team deathmach

- El resto saliendo del mapa con la multi. 

Misiones Mensuales (En 3 días lo completas)

- Al igual que todo con multi lo completas

- Si no tienes, entonces pidele algún amigo que abandone las partidas.

Misiones Especiales:

- Si son misiones donde te piden matar con un arma, subiendo el KDA es como lo logras (Fase 2)

- Si son de tiempo, el juego solo cuenta este si te quedas dentro de algun modo sin importar si ganas o pierdes, no vale estar en el lobby ni nada.

1. DNS más rápido

2. Iniciar Test

3. Aplicar servidor DNS

4. Ve a Configuración del programa.

5. Configura de esta manera.

Este es un código fuente de un proyecto que deje a medias hace muchos meses atrás y como no tengo nociones de volver con este, les dejo el código para futuros programadores que quieran tener un diseño elegante y  facil sin hacer uso de temas, creado únicamente con elementos del sistema windows que vienen por defecto en todos los sistemas. El programa fue creado pensando en las distintas clases del juego de simulación de ciudad pixel, además dentro del código les dejo unas hermosas animaciones para que jueguen con ellas en lo que gusten. El apartado gráfico fue de mi parte, el código lo desarrolle en conjunto con Jeskqq quien me colaboro con la animación y algún otro elemento que corrigió. El autouptate no lo incluyo en este código fuente porque posee muchos errores y por ello para poder pasarles un código limpio decidí eliminarlo.

Esta es una herramienta pensada para los jugadores dentro de los minijuegos de habbo que usan el metodo de "Kick" como parte de su minijuego (Ej: San fermin / Si te escondes .. etc) .. Evitando las molestias de kick por medio del menú normal o escribiendo el comando. 

Solo das click encima del jugador y luego presionas la tecla predilecta que escogiste y listo, el programa hace el resto.

1.  Abre la pestaña del hotel dentro de tu navegador (Pref. Google/MX Nitro/Explorer/MX5)
2. Cuando estes en el inicio del juego abre el Script
3. Y listo.

NOTA: También puedes iniciarlo a fuera del hotel, pero para evitar el enganche en el nav, y solo aplicar el macro en el juego es mejor dentro del hotel.