Navegación

    UniversoJuegos
    • Registrarse
    • Conectarse
    • Buscar
    • Recientes
    • Etiquetas
    • Popular
    • Usuarios
    • Grupos
    • Buscar
    1. Inicio
    2. Anghios
    3. Mensajes

    Anghios (@Anghios)

    1114
    Reputación
    11317
    Mensajes
    2243
    Visitas
    3
    Seguidores
    2
    Siguiendo
    • Perfil
    • Siguiendo
    • Seguidores
    • Temas
    • Mensajes
    • Mejor valorados
    • Grupos

    Information about Anghios

    Registrado
    Última vez conectado
    Sitio web
    www.twitter.com/anghios

    Publicados por Anghios

    • GetDFiles versión 0.9.281012r1 LIBRE!

      @LoGoo said:

      Nunca he dicho que soy hacker ni nada solo me ha interesado ese nombre y tal que se yo ni que este intentando joderte o algo ya ves tu.. tampoco te creas gran programador que se te sube el autoestima por las nubes :|||:

      Además, nuestro foro no tiene fama de que un Administrador responsable de miles de usuarios haga aplicaciones de gestión de servidores para robar files y dedicados y que todo su equipo de moderadores le apoye aun sabiendo el "delito" que comete.
      ¿Granuja? You know? 😄

      En fin, no más discusiones.

      publicado en Guías
    • GetDFiles versión 0.9.281012r1 LIBRE!

      @LoGoo said:

      Bueno lo de las keys tambien me fije pero como trollees el cliente de ellos me da igual

      ¿Pero de verdad sabes lo que dices? _xD_
      ¿Desde cuando un decompilador externo en consola de comandos va a trollear un cliente?

      Tira a acostarte anda _xD_
      En fin, colaré el source, me repugna la gente que va de lista y no tiene ni idea de NADA. Que sabe abrir un programa con VBDecompiler y se cree hacker _xD_

      actu.vb

      Public Class actu
          Dim version_actual As String = "0.5.20912r2"
          Dim version_nueva As String
          Dim url_descarga As String
      
          Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
              descargar_app.RunWorkerAsync()
              ProgressBar1.Value = 70
          End Sub
      
          Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles descargar_app.DoWork
             
      
          End Sub
      
          Public Sub checkver()
              Dim request2 As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://mep.universojuegos.es/getdfiles_dm/versiones/version_nueva.txt")
              Dim response2 As System.Net.HttpWebResponse = request2.GetResponse()
              Dim sr2 As System.IO.StreamReader = New System.IO.StreamReader(response2.GetResponseStream)
              version_nueva = sr2.ReadLine()
              url_descarga = sr2.ReadLine()
              Label1.Text = "Versión actual: " & version_actual
              Label2.Text = "Versión disponible: " & version_nueva
              If version_actual <> version_nueva Then
                  Button1.Enabled = True
              End If
          End Sub
      
          Private Sub actualizar_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
              CheckForIllegalCrossThreadCalls = False
              Dim comp_conex_internet As New System.Threading.Thread(AddressOf checkver)
              comp_conex_internet.Start()
          End Sub
      
          Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs)
              changelog.Show()
          End Sub
      
          Private Sub descargar_app_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles descargar_app.DoWork
              ' MsgBox("Se está descargando la nueva versión, esta función puede tomar varios segundos", vbInformation)
              If My.Computer.FileSystem.FileExists("versionnueva.rar") Then
                  My.Computer.FileSystem.DeleteFile("versionnueva.rar")
              End If
              My.Computer.Network.DownloadFile(url_descarga, "./versionnueva.rar")
              MsgBox("Se ha descargado la nueva versión del programa. La aplicación se reiniciará para aplicar la actualización.", vbInformation)
              Shell("system\install.bat")
              Application.Exit()
          End Sub
      
          Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
              descargar_app.RunWorkerAsync()
              ProgressBar1.Value = 70
          End Sub
      
          Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
              Process.Start("http://foro.universojuegos.es/memberlist.php?mode=viewprofile&u=787")
          End Sub
      
          Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked
              Process.Start("http://foro.universojuegos.es/memberlist.php?mode=viewprofile&u=979")
          End Sub
      
          Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
              changelog.Show()
          End Sub
      End Class
      

      Changelog.vb

      Public Class changelog
      
          Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
      
          End Sub
      End Class
      

      Form1.vb

      Public Class Form1
          Dim ruta As String = CurDir() & "\"
          Dim ruta_archivo As String
          Dim escogido As String
          Dim archivo_dropeado As String
          Dim rutafile As String
          Dim cienxcien As Boolean = False
          Dim evadir As Boolean = False
      
          Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      
              ' Shell(ruta & "a.exe -b -x -u C:\Users\Anghios\Desktop\Test\" & TextBox1.Text, AppWinStyle.NormalFocus)
      
             
              If BackgroundWorker1.IsBusy = False Then
                  BackgroundWorker1.RunWorkerAsync()
                  Timer1.Start()
              Else
                  MsgBox("El proceso de desencriptado ya está iniciado, por favor aguarde hasta que termine el vigente.", vbInformation)
              End If
      
          End Sub
      
      
      
      
          'CONSOLA
          Private Sub Ejecutar(ByVal strExe As String, ByVal strArgumentos As String, ByVal ArchivoTrabajado As String)
              Dim startInfo As ProcessStartInfo = New ProcessStartInfo(strExe, strArgumentos)
              'fftt
              startInfo.UseShellExecute = False
              startInfo.ErrorDialog = False
              startInfo.CreateNoWindow = True
              startInfo.RedirectStandardOutput = True
              Try
                  Dim p As Diagnostics.Process = System.Diagnostics.Process.Start(startInfo)
                  Dim sr As System.IO.StreamReader = p.StandardOutput
                  Dim cadenaSalida As String = sr.ReadToEnd()
                  sr.Close()
                  'MsgBox(cadenaSalida)
                  If cadenaSalida.Contains("dump completed") Then
                      MsgBox("El archivo " & archivo_dropeado & " ha sido desencriptado correctamente", vbInformation)
                      cienxcien = True
                  Else
                      evadir = True
                      MsgBox("Hubo un error al desencriptar. Contacte con Anghios a través de UniversoJuegos.es", vbCritical)
      
      
                  End If
              Catch ex As Exception
                  MsgBox(ex.ToString)
                  MsgBox(ex.Message)
              End Try
          End Sub
      
          Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
      
              Dim archivo As String = archivito.Text.ToString.Substring(0, archivito.Text.ToString.Length - 4)
              Ejecutar(ruta & "system\a.exe", "-b -x -u " & rutafile, "")
      
          End Sub
      
      
          Private Sub Form1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop
              If e.Data.GetDataPresent("FileDrop", True) = True Then
                  Dim datei As String() = DirectCast(e.Data.GetData("FileDrop"), Object)
                  archivito.Text = My.Computer.FileSystem.GetName(datei(0))
                  archivo_dropeado = My.Computer.FileSystem.GetName(datei(0))
                  rutafile = My.Computer.FileSystem.GetFileInfo(datei(0)).ToString
                  Button1.Enabled = True
                  Button1.Text = "Desencriptar " & archivo_dropeado & " de " & Form2.ListBox1.SelectedItem.ToString
                  Label3.Enabled = True
                  Button1.Enabled = True
                  rutafile = rutafile.ToString.Substring(0, rutafile.ToString.Length - 4)
                  Me.Show()
                  ProgressBar1.Value = 0
                  Label3.Text = "Desencriptado: 0%"
                  evadir = False
                  cienxcien = False
              End If
          End Sub
          Private Sub Form1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragEnter
              e.Effect = DragDropEffects.All
          End Sub
      
          Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
              Application.ExitThread()
          End Sub
      
      
          Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
              Label1.Text = "Servidor seleccionado: " & Form2.ListBox1.SelectedItem.ToString
          End Sub
      
          Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
              Application.Restart()
          End Sub
      
          Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
              Timer2.Start()
              If evadir = True Then
                  ProgressBar1.Value = 0
                  Timer1.Stop()
                  Timer2.Stop()
                  ProgressBar1.Value = 0
              End If
              If ProgressBar1.Value = 80 Then
                  Timer1.Stop()
                  Timer2.Stop()
              Else
                  If ProgressBar1.Value + 3 > 100 Then
                      ProgressBar1.Value = 100
                  Else
                      ProgressBar1.Value = ProgressBar1.Value + 3
                  End If
      
                  Label3.Text = "Desencriptado: " & ProgressBar1.Value & "%"
              End If
          End Sub
      
          Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
              If cienxcien = True Then
                  ProgressBar1.Value = 100
                  Timer1.Stop()
                  Label3.Text = "Desencriptado: 100%"
                  Timer2.Stop()
              End If
          End Sub
      End Class
      

      Form2.vb

      Public Class Form2
          Dim ruta As String = CurDir() & "\"
          Dim comprobar As String
          Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
              Try
                  If My.Computer.FileSystem.FileExists("a.exe") Then
                      My.Computer.FileSystem.MoveFile("a.exe", _
              "system\a.exe")
                  End If
              Catch ex As Exception
              End Try
          End Sub
      
          Public Function leerycambiar()
              If comprobar = "" Then
                  MsgBox("Primero debe seleccionar un servidor.", vbCritical)
              ElseIf ListBox1.SelectedItem.ToString = "Metin2Fireblood" Then
                  'METIN2FIREBLOOD
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=58275755794F5150614373454C49534F" & vbNewLine & _
                 "xTea2=22B8B40464B26E1FAEEA1800A6F6FB1C" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              ElseIf ListBox1.SelectedItem.ToString = "Metin2Pegaso" Then
                  'METIN2PEGASO
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=D57C44A9794C4D7F2B29A663E85794DB" & vbNewLine & _
                 "xTea2=722CEDAA309E98DED8C38BF0C04F93C6" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              ElseIf ListBox1.SelectedItem.ToString = "Metin2Panamera" Then
                  'METIN2PANAMERA
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=546338506554754C366B514536786276" & vbNewLine & _
                 "xTea2=425165474753376A3863463446654230" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              ElseIf ListBox1.SelectedItem.ToString = "Metin2Guabina" Then
                  'METIN2GUABINA
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=317531353875343968323267332F2829" & vbNewLine & _
                 "xTea2=22B8B40464B26E1FAEEA1800A6F6FB1C" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              ElseIf ListBox1.SelectedItem.ToString = "Metin2Dream" Then
                  'METIN2DREAM
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=265D35533535385334313737343F2324" & vbNewLine & _
                 "xTea2=22B8B40464B26E1FAEEA1800A6F6FB1C" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              ElseIf ListBox1.SelectedItem.ToString = "ArcangelesMT2" Then
                  'ARCANGELESMT2
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=B99EB0026F69810563989B2879181A00" & vbNewLine & _
                 "xTea2=22b8b40464b26e1faeea1800a6f6fb1c" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              ElseIf ListBox1.SelectedItem.ToString = "Metin2Terramistica" Then
                  'METIN2TERRAMISTICA
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=554218F1F2AB1B12A413B5F1AF27ABF1" & vbNewLine & _
                 "xTea2=22B8B40464B26E1FAEEA1800A6F6FB1C" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              ElseIf ListBox1.SelectedItem.ToString = "Metin2Drakon" Then
                  'METIN2DRAKON
                  Dim escribir As New IO.StreamWriter(ruta & "infero_settings.ini")
                  escribir.WriteLine("[Extensions]" & vbNewLine & _
                   "eIndex=.eix" & vbNewLine & _
                   "ePackage=.epk" & vbNewLine & _
                "[Encryption]" & vbNewLine & _
                   "xTea1=7A61737465726465616474726F6C6C64" & vbNewLine & _
                 "xTea2=6F6D676675636B796F7572677579736E" & vbNewLine & _
                "Magic_1=4D434F5A" & vbNewLine & _
                "Magic_2=45504B44 ")
                  escribir.Close()
                  Form1.Show()
                  Me.Hide()
              End If
      
              Return True
          End Function
      
          Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
              leerycambiar()
              
          End Sub
      
          Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
              actu.Show()
          End Sub
      
          Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs)
              MsgBox("blaster de dmx")
          End Sub
      
          Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
              comprobar = ListBox1.SelectedItem.ToString
          End Sub
      End Class
      

      Ala, a dormir.

      publicado en Guías
    • GetDFiles versión 0.9.281012r1 LIBRE!

      ¿Una función?
      Si de verdad has mirado la aplicación podrás comprobar que no hay ninguna función y/o variable llamada "testcmdoculto" LOL xD Lo único extraño que puedes encontrar son "keys" del M2 como variable "private".

      Si quieres el source, solo pídemelo 😛

      publicado en Guías
    • Iphone 5 concept Design ........

      @Joaking said:

      @Oveer said:

      No he visto el video pero supongo que es para criticar el iPhone xD

      Me apuesto mis cojones a que si te dicen que te dan un iPhone gratis lo cogeriais sin pensarlo xD

      pero para venderlo y comprarme un S3

      publicado en Off topic
    • Nueva seccion, (politica)

      Yo lo veo bien, pero vamos, lo suelo enfocar más a off-topic (como subsección, me refiero) pero la idea me mola.
      Estuve mirándome por wikipedia sobre todos los partidos, todos sus actos (vaya tochacos xD) y me molaría que me explicasen un poquito más de los Republicanos (que por ahora es por la que más me decanto :3)

      publicado en Ideas
    • GetDFiles versión 0.9.281012r1 LIBRE!

      @LoGoo said:

      testcmdoculto? de que se trata :icon_redface:

      Wups, se me olvidó cambiarlo.
      Era el nombre del proyecto, tenía la otra versión del GetDFiles pero en ese puse en práctica como ocultar un cmd y devolver en una variable todo su contenido en valor string. Y eso es gracias a Blaster así que me funcionó lo que hice y pasé de hacer un nuevo proyecto, pero vamos que si le molesta a alguien lo cambio _xD_

      publicado en Guías
    • GetDFiles versión 0.9.281012r1 LIBRE!

      Ese error es propio del "a.exe", baja la dll desde aquí y métela en la carpeta system del decripter 🙂

      publicado en Guías
    • GetDFiles versión 0.9.281012r1 LIBRE!

      Subido a la versión 0.5.20912r2, encontraréis varios cambios bastante interesantes 🙂

      Aquí os dejo el changelog:

      [v0.5.20912r2]
      ·Arreglado algunos textos provisionales en de la fase beta.
      ·Evitada la edición libre de algunos textos.
      ·Añadida una funcion para no poder pulsar el botón si no has añadido un archivo. Para evitar errores  inútiles.
      ·Quitado el mensaje molesto a la hora de desencriptar un archivo.
      ·Añadida una barra de progreso y un porcentaje a la hora de desencriptar un archivo.
      
      [v0.5.20912r1]
      ·Arreglado el sistema de bypasseo cuando no seleccionabas un servidor.
      ·Mejorada la inferfaz a la hora de desencriptar cualquier archivo.
      ·Reorganizado y optimizado el sistema de actualización de la aplicación.
      ·Cambiado el main de la aplicación para una vista más simple, directa y predecible.
      ·Añadida una ventana de Changelog para un vistazo rápido y limpio.
      publicado en Guías
    • GetDFiles versión 0.9.281012r1 LIBRE!

      Bueno, realmente tengo ganas, pero mis principios me dicen que no.
      Esos chavales son de respetar, no han robado cosas que no sean "libres" (por usuario, aparte de las cosillas de ymir) y no se meten en broncas, no sacan partido con item-shop ni son corruptos. Aunque he de decir que kekoroto me ha lanzado muchas piedras a la cabeza, seguiré manteniendo la compostura.
      Se lo merecen, aunque eso no dura para siempre _xD_

      publicado en Guías
    • GetDFiles versión 0.9.281012r1 LIBRE!

      [alinear-centro]

      **LISTA DE SERVIDORES:

      Lothira2
      EWMT2
      BlackMetin2
      InfinityMetin2
      AtlantisWorld
      BambooMT2
      ExplosionMT2
      KetaMetin2
      Metin2Oyunu
      Mistery2Master
      DiamondLand
      Metin2Guantana
      Metin2Fenix
      Metin2Maximus
      MetinZ
      Metin2Fireblood
      Metin2Pegaso
      Metin2Panamera
      Metin2Guabina
      Metin2Dream
      ArcangelesMT2
      Metin2Terramistica
      Metin2Drakon
      

      Para todo aquel mundo que no lo sepa, GetDFiles es una "compañía" formada por varias personas las cuales creen que éticamente la organización de Metin2 no funciona bien. Mayormente, porque hay gente que dice: ESTE CLIENTE ES MIO. Cuando es una copia barata de la de Ymir.

      Es decir, todo lo de su cliente es suyo, inclusive contando archivos "robados" a otros servidores o incluso a Ymir. Así que si para los admins de los servidores no hay "leyes", por qué para los usuarios de a pie sí? No me parece justo, así que he creado GetDFiles, en versión estable (funciona totalmente bien, tiene un peso reducido y es fácil de usar 🙂 ).
      Con dicha herramienta puedes desencriptar cualquiera cliente de los que hayan en la lista. Cualquier cliente puede ser añadido, así que solamente tenéis que decirme cuál necesitáis.

      GetDFiles empezó como una organización lucrativa (he de adminir los errores) por el cual vendía el ancho de banda como acceso a X archivos desencriptados de Y servidores.
      Eramos 3 personas en el grupo. Salva, xSmaD, y yo.
      Salva se encargaba de hacer la web (yo no tengo ni zorra xD) y xSmaD (a.k.a Deviart) y yo nos dedicábamos a desencriptar clientes y subirlos a la web.

      Yo me fui de vacaciones y claro, era un poco cansino tener que subir 1GB a una web, gastar ancho de banda de UJ y varios inconvenientes más, así que me ideé una aplicación para hacerlo de forma directa en el cual el usuario solo requiere precisar del cliente que desea desencriptar.

      He de decir que sin la ayuda Deviart, MrLucifer y Tim13666 no podría haber logrado esto. La verdad es que tampoco es un logro muy allá, pero el proceso de desencriptar clientes es largo, delicado y asqueroso, sucio y aburrido, así que lo traigo de forma directa para que con solamente un click, tengáis todo lo que necesitáis 🙂
      También me gustaría añadir unas palabras a DiosesMX, el cual bueno... hemos tenido nuestros roces y tal pero tengo que reconocer que si no es por Blaster y una pequeña modificación que hizo a un Source de mi Descompilador no podría haberlo hecho como a mi me hubiera gustado, así que Blaster, si lees esto; gracias.

      En fin, después de todo este royazo de ética moral, vida "personal", proyectos, ideas y agradecimientos, me dispongo a presentarlos la versión estable y la que será definitiva (aunque habrán actualizaciones constantes en la aplicación para mejorar varios aspectos que me gustaría tocar más adelante 😄

      Ahora consta de unos cuantos servidores, los cuales puedes ver en esta foto:

      No son todos los que hay en realidad, porque también se añadirán muchísimos más. El diseño es provisional y tal, así que si encontráis cosas fuera de lo normal... sorry xD

      Esta nueva versión no te muestra ninguna "ventana" negra que te dice si se ha desencriptado el archivo, la función actual es bastante más potente porque a parte de no ver ninguna ventana, te avisa en ESPAÑOL (ya era hora xD) cuando un archivo ha sido desencriptado o cuando no. Por supuesto, este método de desencriptado es mucho mejor que el anterior, puesto que si hay un archivo que no puede dumpear (volvar/desencriptar) salta al siguiente de forma automática.

      ¿Qué inconvenientes tiene la aplicación?

      Realmente son muy escasos 🙂 Y no es por echarme flores _xD_
      El problema más grande que veo, es que no acepta rutas de dumpeo, es decir, los archivos .EPK/.EIX deben estar en la misma carpeta que el desencriptador. En caso contrario, el archivo desencriptado se creará en la carpeta donde se encuentra el archivo .epk/.eix
      El otro fastidio es que no se puede (por ahora) ordenar por servidores, así que, sorry. Esa función me encantaba.

      En fin, me gustaría que estuviérais atentos a la parte de "Actualizar programa", con pasarse 10 minutos por ahí sobra para saber si he actualizado algo.

      En fin, espero que os guste.

      PD: MUY IMPORTANTE, SI ENCONTRÁIS ALGÚN ERROR O NO PODÉIS DESENCRIPTAR ALGÚN ARCHIVO DE LOS SERVIDOERS QUE HAY EN LA LISTA, DECIDLO AQUÍ. Es normal que me haya podido saltar algunos pasos y haberme dejado algo importante de algún servidor.

      La versión se puede descargar desde la antigua (haciendo click en Actualizar) o descargando desde el siguiente link.

      DOWNLOAD: http://puu.sh/1acHY
      [/alinear-centro]**

      publicado en Guías
    • 1
    • 2
    • 43
    • 44
    • 45
    • 46
    • 47
    • 979
    • 980
    • 45 / 980