Mensajes

lee un poco el foro hay informacion sobre esto, solo es un hook al teclado y con hotkeys (creoq eu asi se le llama)

Dulces lunas!¡.

[Switch para pasar datos GraNDES]

eso seguro es perdida de datos, usa un doevents antes de el sendata

doevents: ws.senddata datos

yen el servidor  o resector ue no tenga nintun doevents en el evento dataarrival (si pones un doevents se volveara el estring: es por esperiencia propia con el winsock ).


otra cosa, no uses el select case en el data arrival, solo usalo para obtener los datos, y usa algo asi como Switch para pasar datos GraNDES


Winsock emisor[/i]

Código [Seleccionar] Expandir



botonSend ()
{
   ws.senddata "EnvOn" ' //    Peticion para saber si esta listo el resector
}

DataArrival()
{
dim datos as string
dim spli()
   spli = split(datos,"|")
   select case spli(0)
       case "Envon"
           if cbool(spli(1) then
               doEvents: ws.senddata Tramision ' //    Se envian los datos de la variable "Transmison"
               doEvents: ws.sendata "Envoff" ' //    Le indico al resector el termino y la ultilizacion del proceso select case
           end if
        case "Envon"
            if cbool(spli(1) then
                ' //    Me dio weba seguir con el codigo asi ue lo lo demas es cosa tuya
            end if
        ' //    Otros select case etc...
   end select
}


WinSock Receptor[/i]

Código [Seleccionar] Expandir



DataArrival()
{
   dim datos as string
   static resect as boolean
   ws.getdata datos, vbstring
   if right(datos,len("Envon"))="Envon" then
       resect = true
       Ws.sendata "Envon|" & true
   elseif right(datos,len("Envoff"))="Envoff" then
       resect = false
       Ws.sendata "Envoff|" & true
   else
       call procesodondeestaelselectcase(datos) ' //    en este proceso hacer el split con la variable en el parametro.
   end if
}



Dulces Lunas!¡.

@danicasasm

Es una vaiante que ocuparia mas recursos de procesador al momento de buscar un dicho registro con la instruccion  "each".

Aqui dejo algo del codigo que posteo el autor de este hilo a como yo lo haria:


OJO son dos funciones alternativas usar solo una segun se desee:

Código (vb) [Seleccionar] Expandir




Private Type Lista
    Direccion                   As String
    Descr                       As String
    Checksum                    As String
    LocalFile                   As String
    Destino                     As String
    Comprimido                  As String
End Type

Dim Down()                      As Lista

' //    Get_List devuelve la cantidad de registros cargados o anidados.
' //---------------------------------------------------------------------
' //    NRegToADD   = LeerIni("FILES", "Count", TEMP & "\" & nomArchivo)
' //    Structr     = Structr
' //    RegCon      = True/False
Public Function Get_List(ByVal NRegToADD As Long, ByRef Structr() As Lista, ByVal RegCon As Boolean) As Long
Dim I                               As Long
Dim Salto                           As Boolean
Dim CantRegEx                       As Long

    If NRegToADD <= 0 Then Salto = True                             ' //    Se agregara algo?
    If Salto = False Then
        If RegCon And Not (Not (Structr) = -1) Then                 ' //    Se continua o se resetea? y esta inicialisada la matriz?
            CantRegEx = UBound(Structr) - LBound(Structr)           ' //    Cantidad de Registros actuales
            ReDim Preserve Structr(CantRegEx + NRegToADD)           ' //    Se continua
        Else
            ReDim Structr(NRegToADD - 1)                            ' //    Se Resetea
        End If
        For I = LBound(Structr) To UBound(Structr)                  ' //    Se inicia en 0 pero aun asi uso lbound()
            File = "file" & I
            Structr(I).Direccion = LeerIni(File, "url", TEMP & "\" & nomArchivo)
            Structr(I).Descr = LeerIni(File, "descr", TEMP & "\" & nomArchivo)
            Structr(I).Checksum = LeerIni(File, "newchecksum", TEMP & "\" & nomArchivo)
            Structr(I).LomocalFile = LeerIni(File, "localversion", TEMP & "\" & nomArchivo)
            Structr(I).Comprimido = LeerIni(File, "compressed", TEMP & "\" & nomArchivo)
        Next
        Get_List = I                                                ' //    Se devuelve la cantidad de registros cargados
    End If
End Function


' //    Get_List devuelve la cantidad de registros cargados o anidados.
' //---------------------------------------------------------------------
' //    strfile     = TEMP & "\" & nomArchivo
' //    Structr     = Structr
' //    RegCon      = True/False
Public Function Get_ListFromFileIni(strFile As String, ByRef Structr() As Lista, ByVal RegCon As Boolean) As Long
Dim I                               As Long
Dim Salto                           As Boolean
Dim CantRegEx                       As Long
Dim NRegToADD                       As Long
   
    NRegToADD = LeerIni("FILES", "Count", strFile)                  ' //    cargamos la cantidad de registros a cargar
    If NRegToADD <= 0 Then Salto = True                             ' //    Se agregara algo?
    If Salto = False Then
        If RegCon And Not (Not (Structr) = -1) Then                 ' //    Se continua o se resetea? y esta inicialisada la matriz?
            CantRegEx = UBound(Structr) - LBound(Structr)           ' //    Cantidad de Registros actuales
            ReDim Preserve Structr(CantRegEx + NRegToADD)           ' //    Se continua
        Else
            ReDim Structr(NRegToADD - 1)                            ' //    Se Resetea
        End If
        For I = LBound(Structr) To UBound(Structr)                  ' //    Se inicia en 0 pero aun asi uso lbound()
            File = "File" & I
            Structr(I).Direccion = LeerIni(File, "url", strFile)
            Structr(I).Descr = LeerIni(File, "descr", strFile)
            Structr(I).Checksum = LeerIni(File, "newchecksum", strFile)
            Structr(I).LomocalFile = LeerIni(File, "localversion", strFile)
            Structr(I).Comprimido = LeerIni(File, "compressed", strFile)
        Next
        Get_ListFromFileIni = I                                     ' //    Se devuelve la cantidad de registros cargados
    End If
End Function




Dulces Lunas!¡.

esto es algo curioso y a la vez tonto, pero yo antes igual lo hacia asi que bueno:

prog_sub.value = prog_sub.value + bytesSent
prog_sub.Value = bytes

no tiene caso...

dulces lunas!¡.

[no se entiende a simple vista nada ademas de verse Mal hecho sin estarlo o tal vez si...]

Por favor usa Geshi y da tabulaciones/indecta tu codigo que no se entiende a simple vista nada ademas de verse Mal hecho sin estarlo o tal vez si....

es obvio lo que haces es cargar a lo bruto un archivo en la memoria

Size = LOF(1)
ReDim arrData(Size - 1)

esa variable toma en un peso identico al que ocupa el archivo dado en el hd, lo que puedes hacer es cortar y mandar por tramos dicho archivo ( es decir simular un corte de un archivo dependiendo los bytes deseados en memoria ) y posteriormente mandar ese tramo, al termino cargar otro tramo/pedazo y mandarlo, ( yo habitualmente solo cargo de una rchivo de 1 giga por decir algo solo 255 kbytes a 1 mega en una vaiable y asi los mando de esta forma la memoria no se ve tan incrementada mas de lo que he dicho )



Edito usa una regla de 3 para calcular el proceso en el Progressbar o de lo contrario le crearas un overflow


P.d.: Apoco no te da errores el no cerrar los procesos:  

private sub upload_Click() y csocketplus_DataArrival



Dulces Lunas!¡.

solo se me ocurre un metodo con clases, pero es algo enredado si te lo explico pero aun asi haber si te sirve xP

Una Clase con las siguientes variables:


    IDClass' Este seria el ID de la clase algo asi como el md5 de algo, mas no del archivo descrito por "File & i"
    Direccion
    Descr
    Checksum
    LocalFile
    Comprimido

Despues declaras las propiedades Get y Let de la clase respectiva )
Para el uso al principio de tu programa cargas TODO el INI en las dichosas clases (Que se crean apartir de una mtriz tipo clase)
Despues haces lo que te plasca con tu archivo ini, al dado caso el archivo ya estara cargado en el programa en las dichas clases.
De esta forma si modificas el ini puedes obtar por obtener la configuracion anterior que se cargo en el archivo ini.

Claro, la solución es: usar el buscador, leerte un manual o derivados, este tipo de dudas estan muy documentatadas en la internet y este foro.

Dulces Lunas!¡.

yo tengo el VB6 en $W7 64 bits sin problemas. hay mucha informacion en este foro sobre como instalarlo sin errores.

Dulces Lunas!¡.

[Hasta ahora se me ocurrió hacer un Asistente de médicos, vendría a ser un programa en donde el médico puede guardar, ver, editar o agregar fichas de pacientes. Para que dejen ya esos porta fichas enormes que ocupan tanto espacio.]

Hola comunidad. Se me dio por hacer un programa que sea rentable, que se adapte bien a las necesidades del consumidor y que sea simple usarlo.
Hasta ahora se me ocurrió hacer un Asistente de médicos, vendría a ser un programa en donde el médico puede guardar, ver, editar o agregar fichas de pacientes. Para que dejen ya esos porta fichas enormes que ocupan tanto espacio.
La idea de este post es que tiren sus idea, ya hechas, o ideas a futuro.

Un post rentable  


Saludos

Disculpa pero los folders y esos papeles que tu dices son necesarios para quien sea, un documento virtual no es validado legalmente tan facilmente, tu crees que no se hacen en algunos lugares, claro que se hacen programas para ello pero no son tan nesesarios para tener documentos sin procesar es decir un documento que solo estara hay por estar. Pero igual no soy medico ni similar a un abogado para saber sobre leyes. Quisas en un futuro cuando ya esten los robots como cirujanos en todas partes!¡ o un tanto mas lejos, cuando los doctores tengan mas conocimientos sobre el uso de las PC para su asimilación de documentación:

Tomando que primordialmente:

El doctor sera quien escriba el diagnostico en el computador.
Debera tener ademas conocimientos medicos, velocidad con el teclado ( No lo creo, la medicina exige mas tiempo en su area )
Debera tener conocimientos basicos sobre PC.


P.D.: Si el medico es lento con la PC, por obvias razones no seria tan rentable una [PC+Doctor].

Es en mi punto de vista igual me equivoco!¡

Dulces Lunas!¡.

Espero que sirva asi (No lo hice en el VisualBasic por que aun no lo tengo instalado en esta PC)

Código (vb) [Seleccionar] Expandir


'Espero que agregues a los creditos jajaja

Dim ProcessesDumps () as variant
ProcessesDumps = Array(
   Array("0x4C8259", Array("0xA1", "0x38", "0xBD", "0x4C", "0x00", "0x8B", "0x00", "0x8B", "0x4D", "0xFC", "0xBA", "0xC0", "0x82", "0x4C", "0x00", "0xE8", "0x1F", "0xF1", "0xFF", "0xFF", "0x33", "0xDB", "0xE8", "0xF8", "0xBE", "0xF3", "0xFF", "0x33", "0xC0", "0x5A", "0x59", "0x59")),  
   Array("0x4C5F31", Array("0x7C", "0x23", "0x8B", "0x45", "0xFC", "0x80", "0x38", "0xC1", "0x75", "0x1B", "0x8B", "0x45", "0xFC", "0x80", "0x78", "0x02", "0xF3", "0x75", "0x12", "0x8B", "0x45", "0xFC", "0x80", "0x78", "0x03", "0x00", "0x75", "0x09", "0x8B", "0x45", "0xFC", "0x80")),  
   Array("0x4CCB71", Array("0xA1", "0x40", "0xFD", "0x4C", "0x00", "0x8B", "0x00", "0x8B", "0x4D", "0xFC", "0xBA", "0xD8", "0xCB", "0x4C", "0x00", "0xE8", "0xAB", "0xF2", "0xFF", "0xFF", "0x33", "0xDB", "0xE8", "0xE0", "0x75", "0xF3", "0xFF", "0x33", "0xC0", "0x5A", "0x59", "0x59")),  
   Array("0x4CA831", Array("0x89", "0x55", "0xFC", "0x8B", "0x45", "0xFC", "0xE8", "0xC8", "0xA3", "0xF3", "0xFF", "0x33", "0xC0", "0x55", "0x68", "0x96", "0xA8", "0x4C", "0x00", "0x64", "0xFF", "0x30", "0x64", "0x89", "0x20", "0x8B", "0x45", "0xFC", "0xE8", "0xC2", "0xA1", "0xF3")),  
   Array("0x44E08C", Array("0x64", "0x89", "0x25", "0x00", "0x00", "0x00", "0x00", "0x83", "0xEC", "0x58", "0x53", "0x56", "0x57", "0x89", "0x65", "0xE8", "0xFF", "0x15", "0x04", "0xF4", "0x48", "0x00", "0x33", "0xD2", "0x8A", "0xD4", "0x89", "0x15", "0xD8", "0x0A", "0x4D", "0x00")),  
   Array("0x4851C2", Array("0x75", "0x1C", "0x53", "0x8B", "0xCE", "0xFF", "0x75", "0xE4", "0xFF", "0x75", "0xE0", "0x57", "0xE8", "0x90", "0x01", "0xFE", "0xFF", "0xEB", "0x0B", "0x53", "0x57", "0xFF", "0x76", "0x1C", "0xFF", "0x15", "0x9C", "0xF5", "0x48", "0x00", "0x8B", "0x86")),  
   Array("0x4307BE", Array("0x75", "0x0A", "0x6A", "0x1C", "0xE8", "0x49", "0x01", "0x00", "0x00", "0x83", "0xC4", "0x04", "0xE8", "0xB1", "0x30", "0x00", "0x00", "0x85", "0xC0", "0x75", "0x0A", "0x6A", "0x10", "0xE8", "0x36", "0x01", "0x00", "0x00", "0x83", "0xC4", "0x04", "0xC7")),  
   Array("0x44397B", Array("0x75", "0x07", "0x8B", "0xCF", "0xE8", "0xF8", "0xF2", "0xFF", "0xFF", "0x5F", "0x5E", "0xC2", "0x08", "0x00", "0x53", "0x56", "0x8B", "0x74", "0x24", "0x0C", "0x57", "0xFF", "0x76", "0x04", "0xFF", "0x15", "0xC4", "0x9B", "0x49", "0x00", "0x8B", "0xD8")),  
   Array("0x40970E", Array("0x68", "0xB4", "0x98", "0x40", "0x00", "0x64", "0xA1", "0x00", "0x00", "0x00", "0x00", "0x50", "0x64", "0x89", "0x25", "0x00", "0x00", "0x00", "0x00", "0x83", "0xEC", "0x68", "0x53", "0x56", "0x57", "0x89", "0x65", "0xE8", "0x33", "0xDB", "0x89", "0x5D")),  
   Array("0x12C5B8", Array("0x75", "0x07", "0x8B", "0x1E", "0x83", "0xEE", "0xFC", "0x11", "0xDB", "0x72", "0xED", "0xB8", "0x01", "0x00", "0x00", "0x00", "0x01", "0xDB", "0x75", "0x07", "0x8B", "0x1E", "0x83", "0xEE", "0xFC", "0x11", "0xDB", "0x11", "0xC0", "0x01", "0xDB", "0x73")),  
   Array("0x5AA16C", Array("0xE8", "0x13", "0x40", "0xFF", "0xFF", "0xE8", "0x86", "0x2C", "0xFC", "0xFF", "0x8B", "0x03", "0xBA", "0xD4", "0xA2", "0x5A", "0x00", "0xE8", "0xC2", "0x98", "0xEE", "0xFF", "0x8B", "0x03", "0x83", "0xC0", "0x50", "0xBA", "0xF0", "0xA2", "0x5A", "0x00")),  
   Array("0x4CBE2B", Array("0x8D", "0x55", "0xF0", "0xB9", "0x04", "0x00", "0x00", "0x00", "0x8B", "0xC7", "0xE8", "0x02", "0x15", "0xF5", "0xFF", "0x8B", "0x55", "0xF0", "0x8B", "0xC3", "0xE8", "0x8C", "0xF7", "0xFD", "0xFF", "0x8D", "0x55", "0xF0", "0xB9", "0x04", "0x00", "0x00")),  
   Array("0x401350", Array("0xEB", "0x10", "0x66", "0x62", "0x3A", "0x43", "0x2B", "0x2B", "0x48", "0x4F", "0x4F", "0x4B", "0x90", "0xE9", "0x98", "0xC0", "0x47", "0x00", "0xA1", "0x8B", "0xC0", "0x47", "0x00", "0xC1", "0xE0", "0x02", "0xA3", "0x8F", "0xC0", "0x47", "0x00", "0x52")),  
   Array("0x401401", Array("0xE8", "0xB6", "0xFF", "0xFF", "0xFF", "0x50", "0x50", "0xFF", "0x35", "0x8B", "0xC0", "0x47", "0x00", "0xE8", "0xAD", "0x54", "0x07", "0x00", "0xFF", "0x35", "0x8B", "0xC0", "0x47", "0x00", "0xE8", "0xB6", "0x54", "0x07", "0x00", "0x5F", "0xC3", "0xB9")),  
   Array("0x401320", Array("0xEB", "0x10", "0x66", "0x62", "0x3A", "0x43", "0x2B", "0x2B", "0x48", "0x4F", "0x4F", "0x4B", "0x90", "0xE9", "0x98", "0x20", "0x47", "0x00", "0xA1", "0x8B", "0x20", "0x47", "0x00", "0xC1", "0xE0", "0x02", "0xA3", "0x8F", "0x20", "0x47", "0x00", "0x52")),  
   Array("0x4013B0", Array("0xE8", "0xD7", "0xFF", "0xFF", "0xFF", "0xB9", "0xB4", "0x00", "0x00", "0x00", "0x51", "0x6A", "0x08", "0xE8", "0xF4", "0x00", "0x07", "0x00", "0x50", "0xE8", "0x60", "0x01", "0x07", "0x00", "0x0B", "0xC0", "0x75", "0x0A", "0xB8", "0xFD", "0x00", "0x00")),  
   Array("0x401320", Array("0xEB", "0x10", "0x66", "0x62", "0x3A", "0x43", "0x2B", "0x2B", "0x48", "0x4F", "0x4F", "0x4B", "0x90", "0xE9", "0x98", "0x90", "0x46", "0x00", "0xA1", "0x8B", "0x90", "0x46", "0x00", "0xC1", "0xE0", "0x02", "0xA3", "0x8F", "0x90", "0x46", "0x00", "0x52")),  
   Array("0x4013F9", Array("0xE8", "0x1A", "0x21", "0x06", "0x00", "0xA3", "0x8B", "0x90", "0x46", "0x00", "0x83", "0xF8", "0x00", "0x73", "0x91", "0xB8", "0xFC", "0x00", "0x00", "0x00", "0xE8", "0x7A", "0xFF", "0xFF", "0xFF", "0xC3", "0x83", "0x3D", "0x8B", "0x90", "0x46", "0x00")),  
   Array("0x512134", Array("0x75", "0x05", "0x8A", "0x16", "0x46", "0x12", "0xD2", "0x73", "0xEA", "0x02", "0xD2", "0x75", "0x05", "0x8A", "0x16", "0x46", "0x12", "0xD2", "0x73", "0x4F", "0x33", "0xC0", "0x02", "0xD2", "0x75", "0x05", "0x8A", "0x16", "0x46", "0x12", "0xD2", "0x0F")),  
   Array("0x512014", Array("0xB8", "0x00", "0x00", "0x00", "0x00", "0x60", "0x0B", "0xC0", "0x74", "0x68", "0xE8", "0x00", "0x00", "0x00", "0x00", "0x58", "0x05", "0x53", "0x00", "0x00", "0x00", "0x80", "0x38", "0xE9", "0x75", "0x13", "0x61", "0xEB", "0x45", "0xDB", "0x2D", "0x37")),  
   Array("0x40E04E", Array("0x53", "0x68", "0x61", "0x64", "0x6F", "0x77", "0x42", "0x65", "0x61", "0x73", "0x74", "0x2E", "0x41", "0x53", "0x41", "0x46", "0x2D", "0x46", "0x32", "0x31", "0x34", "0x39", "0x42", "0x33", "0x31", "0x35", "0x35", "0x5C", "0x4D", "0x79", "0x20", "0x44")),  
   Array("0x401414", Array("0x68", "0xA4", "0x22", "0x40", "0x00", "0xE8", "0xEE", "0xFF", "0xFF", "0xFF", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x30", "0x00", "0x00", "0x00", "0x40", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x18", "0x8E", "0xF7", "0x08")),  
   Array("0x401E04", Array("0x68", "0x28", "0x20", "0x41", "0x00", "0xE8", "0xEE", "0xFF", "0xFF", "0xFF", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x30", "0x00", "0x00", "0x00", "0x40", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0xE3", "0x90", "0x67", "0x9A")),  
   Array("0x454181", Array("0xBE", "0x00", "0x90", "0x43", "0x00", "0x8D", "0xBE", "0x00", "0x80", "0xFC", "0xFF", "0x57", "0x83", "0xCD", "0xFF", "0xEB", "0x10", "0x90", "0x90", "0x90", "0x90", "0x90", "0x90", "0x8A", "0x06", "0x46", "0x88", "0x07", "0x47", "0x01", "0xDB", "0x75")),  
   Array("0x40C0B0", Array("0x70", "0x6C", "0x69", "0x63", "0x61", "0x74", "0x69", "0x6F", "0x6E", "0x31", "0x5C", "0x6F", "0x62", "0x6A", "0x5C", "0x52", "0x65", "0x6C", "0x65", "0x61", "0x73", "0x65", "0x5C", "0x53", "0x70", "0x65", "0x65", "0x64", "0x20", "0x48", "0x61", "0x63")),  
   Array("0x59F001", Array("0xE8", "0x00", "0x00", "0x00", "0x00", "0x5D", "0x50", "0x51", "0xEB", "0x0F", "0xB9", "0xEB", "0x0F", "0xB8", "0xEB", "0x07", "0xB9", "0xEB", "0x0F", "0x90", "0xEB", "0x08", "0xFD", "0xEB", "0x0B", "0xF2", "0xEB", "0xF5", "0xEB", "0xF6", "0xF2", "0xEB")),  
   Array("0x5674D4", Array("0x55", "0x8B", "0xEC", "0x83", "0xC4", "0xEC", "0x53", "0x33", "0xC0", "0x89", "0x45", "0xEC", "0xB8", "0x2C", "0x70", "0x56", "0x00", "0xE8", "0xC6", "0xFA", "0xE9", "0xFF", "0x8B", "0x1D", "0x98", "0xD8", "0x56", "0x00", "0x33", "0xC0", "0x55", "0x68")),  
   Array("0x574EC0", Array("0x55", "0x8B", "0xEC", "0x83", "0xC4", "0xEC", "0x53", "0x33", "0xC0", "0x89", "0x45", "0xEC", "0xB8", "0xE0", "0x49", "0x57", "0x00", "0xE8", "0xCE", "0x20", "0xE9", "0xFF", "0x8B", "0x1D", "0xF8", "0xB8", "0x57", "0x00", "0x33", "0xC0", "0x55", "0x68")),  
   Array("0x591F94", Array("0x55", "0x8B", "0xEC", "0x83", "0xC4", "0xEC", "0x53", "0x33", "0xC0", "0x89", "0x45", "0xEC", "0xB8", "0x5C", "0x1A", "0x59", "0x00", "0xE8", "0x26", "0x50", "0xE7", "0xFF", "0x8B", "0x1D", "0x20", "0x89", "0x59", "0x00", "0x33", "0xC0", "0x55", "0x68")),  
   Array("0x5CF354", Array("0x55", "0x8B", "0xEC", "0x83", "0xC4", "0xEC", "0x53", "0x33", "0xC0", "0x89", "0x45", "0xEC", "0xB8", "0x44", "0xED", "0x5C", "0x00", "0xE8", "0x62", "0x7E", "0xE3", "0xFF", "0x8B", "0x1D", "0xD4", "0x5A", "0x5D", "0x00", "0x33", "0xC0", "0x55", "0x68")),  
   Array("0x40FBB6", Array("0x55", "0x8B", "0xEC", "0x6A", "0xFF", "0x68", "0x48", "0x3D", "0x41", "0x00", "0x68", "0x3C", "0xFD", "0x40", "0x00", "0x64", "0xA1", "0x00", "0x00", "0x00", "0x00", "0x50", "0x64", "0x89", "0x25", "0x00", "0x00", "0x00", "0x00", "0x83", "0xEC", "0x68")),  
   Array("0x438510", Array("0x60", "0xBE", "0x00", "0x20", "0x42", "0x00", "0x8D", "0xBE", "0x00", "0xF0", "0xFD", "0xFF", "0x57", "0x83", "0xCD", "0xFF", "0xEB", "0x10", "0x90", "0x90", "0x90", "0x90", "0x90", "0x90", "0x8A", "0x06", "0x46", "0x88", "0x07", "0x47", "0x01", "0xDB")),  
   Array("0x4BCFA4", Array("0x55", "0x8B", "0xEC", "0x83", "0xC4", "0xF0", "0x53", "0x56", "0x57", "0xB8", "0xC4", "0xCC", "0x4B", "0x00", "0xE8", "0xB1", "0x9B", "0xF4", "0xFF", "0x8B", "0x3D", "0xB0", "0x03", "0x4C", "0x00", "0x68", "0xDC", "0xD0", "0x4B", "0x00", "0x6A", "0x04")),  
   Array("0x473BBC", Array("0x55", "0x8B", "0xEC", "0x83", "0xC4", "0xF4", "0xB8", "0x04", "0x3A", "0x47", "0x00", "0xE8", "0xE0", "0x26", "0xF9", "0xFF", "0xA1", "0x1C", "0x5C", "0x47", "0x00", "0x8B", "0x00", "0xE8", "0x04", "0xBE", "0xFC", "0xFF", "0x8B", "0x0D", "0xE4", "0x5C")),  
   Array("0x55DE8C", Array("0x87", "0xDE", "0xF7", "0xFA", "0x9F", "0xCA", "0x05", "0x5D", "0x83", "0x67", "0x02", "0x86", "0x59", "0xBF", "0xF1", "0xB6", "0x5B", "0x1F", "0x04", "0x6E", "0x79", "0x00", "0x18", "0x57", "0x8A", "0xD0", "0xA6", "0xFA", "0x8E", "0x5A", "0xE0", "0xD8")),  
   Array("0x4217E0", Array("0x60", "0xBE", "0x00", "0xD0", "0x41", "0x00", "0x8D", "0xBE", "0x00", "0x40", "0xFE", "0xFF", "0x57", "0xEB", "0x0B", "0x90", "0x8A", "0x06", "0x46", "0x88", "0x07", "0x47", "0x01", "0xDB", "0x75", "0x07", "0x8B", "0x1E", "0x83", "0xEE", "0xFC", "0x11")),  
   Array("0x493C90", Array("0x60", "0xBE", "0x00", "0xC0", "0x45", "0x00", "0x8D", "0xBE", "0x00", "0x50", "0xFA", "0xFF", "0x57", "0xEB", "0x0B", "0x90", "0x8A", "0x06", "0x46", "0x88", "0x07", "0x47", "0x01", "0xDB", "0x75", "0x07", "0x8B", "0x1E", "0x83", "0xEE", "0xFC", "0x11")),  
   Array("0x4320F0", Array("0x53", "0x00", "0x5F", "0x00", "0x56", "0x00", "0x45", "0x00", "0x52", "0x00", "0x53", "0x00", "0x49", "0x00", "0x4F", "0x00", "0x4E", "0x00", "0x5F", "0x00", "0x49", "0x00", "0x4E", "0x00", "0x46", "0x00", "0x4F", "0x00", "0x00", "0x00", "0x00", "0x00")),  
   Array("0x4340F0", Array("0x53", "0x00", "0x5F", "0x00", "0x56", "0x00", "0x45", "0x00", "0x52", "0x00", "0x53", "0x00", "0x49", "0x00", "0x4F", "0x00", "0x4E", "0x00", "0x5F", "0x00", "0x49", "0x00", "0x4E", "0x00", "0x46", "0x00", "0x4F", "0x00", "0x00", "0x00", "0x00", "0x00")),  
   Array("0x4360F0", Array("0x53", "0x00", "0x5F", "0x00", "0x56", "0x00", "0x45", "0x00", "0x52", "0x00", "0x53", "0x00", "0x49", "0x00", "0x4F", "0x00", "0x4E", "0x00", "0x5F", "0x00", "0x49", "0x00", "0x4E", "0x00", "0x46", "0x00", "0x4F", "0x00", "0x00", "0x00", "0x00", "0x00")),  
   Array("0x440020", Array("0x5F", "0xE4", "0xAD", "0x60", "0x36", "0x56", "0x43", "0x4D", "0x92", "0xBD", "0xC8", "0x6F", "0xF8", "0xDE", "0xE1", "0xBD", "0x01", "0x00", "0x00", "0x00", "0x46", "0x3A", "0x5C", "0x44", "0x6F", "0x63", "0x75", "0x6D", "0x65", "0x6E", "0x74", "0x73")),  
   Array("0x416014", Array("0xB8", "0x00", "0x00", "0x00", "0x00", "0x60", "0x0B", "0xC0", "0x74", "0x68", "0xE8", "0x00", "0x00", "0x00", "0x00", "0x58", "0x05", "0x53", "0x00", "0x00", "0x00", "0x80", "0x38", "0xE9", "0x75", "0x13", "0x61", "0xEB", "0x45", "0xDB", "0x2D", "0x37")),  
   Array("0xAF4014", Array("0xB8", "0x00", "0x00", "0x00", "0x00", "0x60", "0x0B", "0xC0", "0x74", "0x68", "0xE8", "0x00", "0x00", "0x00", "0x00", "0x58", "0x05", "0x53", "0x00", "0x00", "0x00", "0x80", "0x38", "0xE9", "0x75", "0x13", "0x61", "0xEB", "0x45", "0xDB", "0x2D", "0x37")),  
   Array("0x48C000", Array("0xFC", "0xCF", "0xAB", "0xE7", "0x6D", "0x3A", "0x89", "0xBC", "0xB2", "0x9F", "0x73", "0x23", "0xA8", "0xFE", "0xB6", "0x49", "0x5D", "0x39", "0x5D", "0x8A", "0xCB", "0x63", "0x8D", "0xEA", "0x7D", "0x2B", "0x5F", "0xC3", "0xB1", "0xE9", "0x83", "0x29")),  
   Array("0x4380F0", Array("0x53", "0x00", "0x5F", "0x00", "0x56", "0x00", "0x45", "0x00", "0x52", "0x00", "0x53", "0x00", "0x49", "0x00", "0x4F", "0x00", "0x4E", "0x00", "0x5F", "0x00", "0x49", "0x00", "0x4E", "0x00", "0x46", "0x00", "0x4F", "0x00", "0x00", "0x00", "0x00", "0x00")),  
   Array("0x401704", Array("0x68", "0x84", "0x24", "0x40", "0x00", "0xE8", "0xEE", "0xFF", "0xFF", "0xFF", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x30", "0x00", "0x00", "0x00", "0x40", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x72", "0x80", "0x61", "0xF6")),  
   Array("0x401B28", Array("0x68", "0xD8", "0x2A", "0x40", "0x00", "0xE8", "0xF0", "0xFF", "0xFF", "0xFF", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x30", "0x00", "0x00", "0x00", "0x40", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0x00", "0xB9", "0xE3", "0x0E", "0xC3")))


Dulces Lunas!¡.