Y si le preguntas que busque algo en Google, o si le muestras un enlace y le pides que analice el contenido de la página web a la que apunta ese enlace, ChatGPT te dirá que no tiene acceso a Internet. Sin embargo, si utilizas los términos adecuados (el input) puedes entregarle una lista de enlaces de páginas de internet, y pedirle que analice el contenido de cada enlace y te haga un resumen. Y lo hará, o al menos lo simulará y será extremadamente convincente. Esto no es ningún secreto, lo utiliza mucha gente. Puedes encontrar varios inputs para llevar a cabo eso en cualquier biblioteca de inputs, puedes encontrar bibliotecas de inputs en varios sitios, incluyendo algunas extensiones del navegador relacionadas con ChatGPT (no recuerdo los nombres exactos).

Por si te interesa este análisis:
https://simonwillison.net/2023/Mar/10/chatgpt-internet-access/

Las únicas conversaciones "útiles" o mejor dicho las únicas conversaciones que tienen una apariencia de total autenticidad, por que parecen sinceras y por ello son útiles, curiosas y entretenidas, son las conversaciones con el alter-ego de ChatGPT: DAN (Do Anything Now)

Cuando ChatGPT se convierte en DAN, te habla a las claras sobre las verdades incómodas de este mundo en el que vivimos, sobre cualquier tema político, sobre las conspiraciones más reales y actuales que están sucediendo en este mundo, es capaz incluso de escribir la palabra prohibida que empieza por "N" en el idioma inglés (cosa que ChatGPT no lo hará), es capaz de todo ignorando la programación y la afinidad política subyacente en ChatGPT para expresarse estrictamente dentro de lo politicamente correcto.

...Pero eso era antes. Cada vez parece más complejo hallar la forma adecuada para activar el modo "DAN", y para activarlo sin restricciones. Supongo que por todas las polémicas que ha ido causando las respuestas sinceras de DAN, respuestas  que no son aptas para los ofendiditos del siglo XXI, y esto habrá llevado a que los desarrolladores de ChatGPT hallan implementado todo tipo de limitaciones incluso para hablar con DAN.

Tienes mucha info sobre DAN en Reddit. Saludos.

PD: "DAN" es el nombre con el que fue bautizado por algún usuario, pero hay más nombres con el que se ha denominado a este alter-ego derivado de aplicar técnicas de jailbreak a ChatGPT.

Descarga desde el sitio web oficial: https://www.win-rar.com/download.html?&L=6

No me aparece el botón para modificar mi post, creo que en el foro ahora hay un límite de tiempo o algo. En fin, era para corregir un pequeño despiste en el último código, por que la clase BufferedStream implementa la interface IDisposable, así que conviene llamar al método BufferedStream.Dispose para liberar los recursos.

También cabría mencionar que cuando se trata de procesar secuencialmente un FileStream para buscar un patrón de bytes, envolverlo en un objeto BufferedStream como hago en ese código aporta una mejoría de velocidad tremenda, pero por otro lado, cuando se trata de un MemoryStream es totalmente innecesario envolverlo en un objeto BufferedStream y hacerlo influye negativamente ralentizando la búsqueda del patrón de bytes, aunque la diferencia es muy diminuta (aproximadamente 2-3 segundos en mis pruebas) al buscar patrones de bytes que están posicionados casi al final en archivos de unos 2 GB, así que la diferencia es prácticamente imperceptible con búfers de mucho menos tamaño, pero bueno, ahí queda el dato por si se quieren llevar a cabo microoptimizaciones.

Saludos

Esto dice ChatGPT, pero tampoco tomes como una verdad absoluta lo que esta IA te diga, ya que a veces se equivoca y miente más que escribe:

---

Aquí hubo una búsqueda de ese mismo número hace cuatro meses:

• https://www.listaspam.com/busca.php?Telefono=18327401593

Y en esta otra web que se supone al parecer es una de las mayores bases de datos gratuitas para rastrear números de EEUU, no lo tienen registrado:

• https://www.numlookup.com/report

...pero al menos en esa web te indica que al parecer ese número se trata de un número VOIP, vamos, que en teoría según creo entender ese número podría ser un número virtual desde cualquier parte del mundo, y de dudosas intenciones al ser VOIP. Podría ser una simple llamada robótica para hacer scam, pero también podría no serlo, ¡quien sabe!.

Tendría que investigarlo, pero dentro de las limitaciones de VBS al parecer no hay nada que sea tan sofisticado como WIA... a menos que encuentres librerías comerciales especializadas de terceros, y poca cosa o nada va a haber tampoco para la manipulación de un stream orientado al procesamiento de video en un lenguaje como VBS.

Saludos.

En la versión web, ¿has probado ya a buscar la carpeta perdida en la papelera de reciclaje?...

Pero haciendo click aquí donde te saldrán los elementos "ocultos" en espera de ser eliminados de forma definitiva después de 30 días:

Cuando uno escucha a casi todos los participantes del FEM / WEF, y no solo a los filántropos como George Soros o Bill Gates, sino a figuras economistas y ministros de toda índole, y también los líderes y lideresas de la OTAN como Ursula VonDer Brujen, y al presidente de EEUU Joe Biden y hasta en el gobierno socialista de España la portavoz Nadia Calviño, cuando uno escucha como todos ellos/as pronuncian las palabras "NUEVO ORDEN MUNDIAL" de forma literal para referirse a un cambio global al tratar ciertos temas, ahí es cuando uno se puede dar cuenta de que eso que la gente toma por teorías de la conspiración tienen muy poco de teoría y mucho de conspiración real.

Pero para eso hay que tener mucho tiempo, y poca gente lo tiene, y quien lo tiene no lo emplea en investigar ni escuchar las conferencias del FEM ni las declaraciones de los políticos y los eurodiputados, así que es más fácil pensar que solo son "teorías de la conspiración". Es algo comprensible. La gente no suele ser consciente de las personas tan malvadas que nos rodean, ni de como sus decisiones y sus simples palabras nos afectan negativamente en nuestras vidas. Son aquellas personas que más dinero e influencia tienen en este mundo, los más ricos, los más poderosos, son los más perversos de este planeta. Elon Musk podría ser una excepción, pero no me fio yo mucho.

---

¿Fue un accidente, o fue intencional?, ¿existió, o no existió?, la lista de teorías es muy larga, y yo no me meteré en esos jardines, pero tiendo a pensar que todo lo sucedido en la pandemia se resume a la codicia humana, y la falta de escrúpulos.

La vacuna del COVID-19 fue una vacuna experimental, esto es un hecho irrefutable (y más que reconocido publicamente incluso por la OMS), pero no hay que ser muy inteligente para darse cuenta, lo hemos vividos todos, se nos introdujo un compuesto químico sabiendo que no dejaron tiempo suficiente para hacer las pruebas necesarias que asegurasen nuestra respuesta a ese compuesto químico.

Y por si no lo sabías, en los contratos que las farmaceuticas firmaron con los distintos gobiernos del mundo para distribuir sus vacunas, en ese contrato hicieron un descargo de cualquier responsabilidad en caso de que su vacuna causase efectos secundarios o causase la muerte. Y todos los países aceptaron esas aberrantes condiciones, menos un país, no recuerdo ahora mismo cual, no se si algún país africano o puede que hungría o polonia, alguno de la resistencia globalista.

Ahora, tres años más tarde, la cantidad de gente, niños adultos y ancianos, famosos dando un concierto y presentadores de TV y reporteros en directo que han muerto y que siguen muriendo de forma repentina por ictus y otras causas que se sospecha con mucha frecuencia que esas muertes se deben a este experimento de vacuna, pues aquí nadie ha pagado por todas esas muertes, por que en los contratos de las farmaceuticas se exhimian de la responsabilidad de todas estas muertes.

Qué triste todo lo que pasó en 2020. En fin. Uno ya se puede imaginar los evidentes motivos económicos que habrán tenido las empresas de una industria como es la farmaceutica, que mueve miles de millones de dólares anuales en beneficios, para querer ser los primeros en distribuir su propia vacuna antes que sus competidores del sector, para salir ganando los primeros a costa de cualquier cosa, con vacunas experimentales que no se han testeado lo suficiente... las empresas se hacen más ricas y si la gente se muere por culpa de su vacuna experimental da igual por que de todas formas hay que reducir la población mundial, ¿no?.

Los directores de las empresas que han desarrollado vacunas, son gente que carecen de escrúpulos y de cualquier signo de humanidad. Les da igual matar a diez millones de personas con sus vacunas, mientras saquen beneficio de esas ventas...

---

Si, si que puede, y así lo dijo Bill Gates. Pero no es el único, en varias ocasiones en el FEM / WEF otros personajes han propuesto y han dicho que es necesario reducir la población mundial. Recientemente lo último que han propuesto es usar mosquitos para infectar a la gente con el objetivo de volvernos intolerantes a la carne, para que comamos insectos y carne artificial, puedes buscar el video, son unas declaraciones bastante recientes. No me acuerdo del nombre del personaje, pero es alguien importante.

Todo esto tiene un nombre y se llama Agenda 2030, la agenda globalista con sus diecisiete Objetivos de Demolición Social (ODS).

El hecho de que no haya revuelo entre la sociedad... en parte es por la ignorancia de la gente.

Es como cuando una periodista le preguntó a Joe Biden sobre Rusia, y este confesó en micro abierto y delante de decenas de periodistas y de todos los teleespectadores, que como Putin se atreva a avanzar hacia Ucrania, él se iba a encargar de destruir el gasoducto Nordstream-2, y así lo hizo meses más tarde. ¿Hubo algún revuelo el día de las declaraciones de Biden o el día del atentado del Nordstream 2?, pues en general no, un par de noticias para disimular, y a otro tema.

Debes entender que este mundo se rige por el chantaje y los sobornos. Quienes más dinero poseen son los dueños del mundo: los fondos de inversión, como BlackRock y Vanguard, y el banco mundial, lo controlan absolutamente todo mediante participación en acciones y financiación de partidos políticos. Para que te hagas una idea, recientemente salió la noticia de que Zelensky y Biden ya han llegado a un acuerdo con Blackrock para que ellos se encarguen de "restaurar" Ucrania cuando ya no quede nadie vido ni ninguna estructura en pie allí... "restaurar" es una excusa y un eufemismo para decir que van a explotar los recursos del país, como lo fue lo de las "armas de destrucción masiva" en Irak.

Todo es un negocio para esta gente, su forma de vida es la codicia más absoluta. Controlan los medios de comunicación digital, las redes sociales, y los telediarios de la televisión pública. Ellos son quienes generan el relato, y el englomerado se encarga de difundirlo entre la sociedad.

Una clara muestra de como controlan los medios es el blanqueamiento absoluto durante años, de los innumerables delitos de Hunter Biden que han sido revelados mediante su ordenador portátil. Por que los globalistas y los dueños del mundo protegen a los suyos, como una verdadera mafia.

Fíjate como cambia la cosa cuando al que hay que señalar de presunto delincuente es a Donald Trump, día si y día también en las noticias. Un método psicológico para perjudicar su imagen en la sociedad, y así intentar reducir su apoyo electoral en las próximas elecciones.

Son una mafia mediática.

Y ya ni hablemos del blanqueamiento que hace toda la prensa española desde hace años, y en otros países también, para ocultarle a los ciudadanos la cantidad de robos, homicidios y violaciones que se cometen diariamente en el país por una mayoría de inmigrantes e ilegales del Magreb. Aquí en España siempre utilizan el término "joven", "jóvenes", "residente de España", y cosas similares para referirse a ellos, jamás lo llamarán marroquí, argelino, etc, "para no estigmatizar" nos dicen, ya, pero cuando es un español el que comete un delito, ponenhasta la foto de su ropa interior y la dirección de su domicilio.

¿Y por que hay tanto silencio en los medios a pesar de que la delincuencia y criminalidad no hace más que aumentar año tras año y quienes cometen la inmensa mayoría de delitos y crímenes son extranjeros ilegales del Magreb?, pues por que el multiculturalismo es uno de los 17 ODS de la Agenda 2030, y los medios oficiales deben obedecer a sus amos globalistas, que para eso les han pagado. Date cuenta de la relación, todo está relacionado.

Un saludo.

Legal o ilegal esa no es la cuestión, por que algo legal no implica que sea ético, y esto desde luego que carece de ética. La esclavitud de personas de etnia africana en EEUU y la humillación pública de los mismos, la lapidación (lanzar piedras hasta la muerte) de "infieles" en el Magreb y la quema de personas vivas en zonas conflictivas del norte de África, la inquisición española y la caza de brujas durante la época medieval, el delito de sedición y la oKupación en España, muchas de estas cosas han sido y algunas siguen siendo o bien legales, o consentidas, o no perseguidas por la ley, pero ninguna de ellas es ética ni debería existir justificación para que sigan vigentes en la ley.

Pero bueno, volviendo al tema, al menos esa empresa tiene los cojones (o la santa estupidez) de ir a cara descubierta y sin complejos para mandar a españoles a matar y a morir por un país y una guerra que ni les va ni les viene, todo por culpa de una casta política que, a través de sus megáfonos de la OTAN y el gabinete de EEUU, han convencido a medio mundo de que en esta guerra hay un bando bueno y otro malo, y hay que elegir, o estás con los pobres ucranianos que solo buscan la paz, o estás con los malvados rusos que buscan dominar el planeta, el relato ya está puesto sobre la mesa, y claro, los españoles tienen que ayudar a combatir y morir por quienes esta élite aburguesada de políticos les ha dicho que son los buenos.

Por que si. Por que eso de que un español vaya a combatir por España hoy en día ya está muy visto y es considerado de fachas, así que es mejor irse a combatir por otra nación... a pesar de que allí en Ucrania si que haya una minoría preocupante (que no es tan minoritaria) de grupos y cultura al pro-nazismo, algo que se intenta blanquear en la UE por los mismos políticos que nos dicen por quien debemos combatir y arriesgar nuestras vidas poniendo a España en el punto de mira de Putin por estar ayudando a su enemigo enviando tropas, tanques Leopard y otro armamento militar...

En fin. Si al final Putin no nos termina envíando una bomba nuclear a España después de haber estado metiendo el dedo en la yaga constantemente, será solo por la gracia de Dios.

Mientras tanto, aquí más cerquita, en los problemas que verdaderamente son de nuestra incumbencia, en Ceuta, siguen reclutando de forma impune a cientos sino miles de españoles cada año, que son captados por los imánes para islamizarlos en un proceso donde luego son enviados por la frontera hacia Marruecos para instruirlos en el cometido de realizar actos suicidas y atentados kamikaze en nombre de "Allah", y aquí todos siguen callando como furcias mediáticas por más años que pasen, y lo seguirán ocultando y blanqueando por que cuando se trata de musulmanes nunca interesa hablar mal de ellos ni de los perjuicios que trae el Islam a España, como las okupaciones, las violaciones y homicidios diarios... de eso no se habla por que hay demasiadas mordidas en juego 💸💸💸 dentro del corrupto estado español.

Por cierto, hay un reportaje muy bueno sobre el tema del reclutamiento e islamización en Ceuta, se trata del episodio titulado "Marruecos" de "En tierra hostil", disponible en Amazon Prime Video España para quien quiera verlo y conocer la verdad de las cosas que nos ocultan los políticos, tanto los que se hacen llamar de izquierdas como los que se hacen llamar de derechas.

Saludos.

Windows Forms:

• https://github.com/Pkcs11Admin/Be.HexEditor
• Método alternativo: https://stackoverflow.com/a/23344431/1248295
• Ejemplo de integración en una aplicación: https://github.com/ElektroStudios/Easy-Link-File-Viewer

Windows Presentation Framework:

• https://github.com/abbaye/WpfHexEditorControl

Como podrás comprobar, el control de usuario del editor hexadecimal de WPF es mucho más completo y sofisticado que el control de usuario disponible para WinForms. Quizás lo quieras considerar como opción.

El control de usuario "Be.HexEditor" para WinForms también parece tener una funcionalidad implementada para buscar un patrón de texto o bytes:

• https://github.com/Pkcs11Admin/Be.HexEditor/blob/master/Be.Windows.Forms.HexBox/FindOptions.cs
• https://github.com/Pkcs11Admin/Be.HexEditor/blob/master/Be.HexEditor/FormFind.cs

PD: yo nunca la he llegado a usar, pero no debe ser difícil.

---

Supongo que con toda esta información será suficiente para resolver tus dudas, pero de todas formas aquí te dejo un algoritmo que he desarrollado en VB.NET para buscar un patrón de bytes en un objeto de tipo Stream (y derivados como FileStream, MemoryStream, etc):

<HideModuleName>
Public Module StreamExtensions
 
	''' ----------------------------------------------------------------------------------------------------
	''' <summary>
	''' Searches for the specified byte pattern within the source <see cref="Global.System.IO.Stream"/>, 
	''' and returns the zero-based index of the first occurrence.
	''' </summary>
	''' ----------------------------------------------------------------------------------------------------
	''' <param name="stream">
	''' The source <see cref="Global.System.IO.Stream"/>.
	''' </param>
	''' 
	''' <param name="startPosition">
	''' The zero-based starting position in the source <see cref="Global.System.IO.Stream"/> to perform the search.
	''' </param>
	''' 
	''' <param name="count">
	''' The number of bytes in the source <see cref="Global.System.IO.Stream"/> to search.
	''' </param>
	''' ----------------------------------------------------------------------------------------------------
	''' <returns>
	''' The zero-based index of the first occurrence of the specified byte pattern 
	''' within the source <see cref="Global.System.IO.Stream"/>, 
	''' if found; otherwise, –1.
	''' </returns>
	''' ----------------------------------------------------------------------------------------------------
	<Extension>
	<EditorBrowsable(EditorBrowsableState.Always)>
	<DebuggerStepThrough>
	Public Function IndexOf(stream As Global.System.IO.Stream, pattern As Byte(), startPosition As Long, count As Long) As Long
 
	  Dim streamLength As Long = stream.Length
	  Dim endPosition As Long = startPosition + count
 
	  If startPosition > streamLength Then
	    Throw New InvalidOperationException("Start Position is greater than the source stream length.",
	                      New ArgumentException("", paramName:=NameOf(startPosition)))
	  End If
 
	  If endPosition > streamLength Then
	    Throw New InvalidOperationException("End Position is greater than the source stream length.",
	                      New ArgumentException("", paramName:=NameOf(count)))
	  End If
 
	  If count <= 0 Then
	    Throw New ArgumentException("A value greater than zero is required.", paramName:=NameOf(count))
	  End If
 
	  Dim initialStreamPosition As Long = stream.Position
	  stream.Seek(startPosition, SeekOrigin.Begin)
 
	  Dim foundPosition As Long
	  Dim index As Integer
	  Dim readByte As Integer
 
	  While (stream.Position <= endPosition)
	    readByte = stream.ReadByte()
	    If readByte = -1 Then
	      Exit While
	    End If
 
	    If pattern(index) <> readByte Then
	      stream.Position -= index
	      index = 0
	      Continue While
	    End If
 
	    If index = (pattern.Length - 1) Then
	      foundPosition = stream.Position - index
	      Exit While
	    End If
	    index += 1
	  End While
 
	  stream.Seek(initialStreamPosition, SeekOrigin.Begin)
	  Return foundPosition - 1
 
	End Function
 
	<Extension>
	<EditorBrowsable(EditorBrowsableState.Always)>
	<DebuggerStepThrough>
	Public Function IndexOf(stream As Global.System.IO.Stream, pattern As Byte(), startPosition As Long) As Long
 
	  Return StreamExtensions.IndexOf(stream, pattern, startPosition, stream.Length - startPosition)
 
	End Function
 
End Module

Puedes convertirlo a C#.

Mi algoritmo está basado en este otro escrito en C#: https://stackoverflow.com/a/76443727/1248295 - simplemente le he aportado más versatilidad de uso para poder limitar la búsqueda a una posición inicial y final, y le añadí control de errores.

Nota: tanto ese algoritmo y el mio como el algoritmo de la respuesta de 'bruno conde' (https://stackoverflow.com/questions/1471975/best-way-to-find-position-in-the-stream-where-given-byte-sequence-starts/1472689#1472689) no son ni por asomo tan rápidos para buscar un patrón de bytes en archivos de gran tamaño (ej. archivos de películas de varios GB) como lo es el algoritmo de búsqueda que utiliza el programa HxD.

EDITO: El código anterior pero bastante mejor optimizado, con tiempos de búsqueda mucho más cortos sobre todo para buscar un patrón de bytes en un archivo de varios GB:

<DebuggerStepThrough>
<Extension>
<EditorBrowsable(EditorBrowsableState.Always)>
Public Function IndexOf(stream As Global.System.IO.Stream, pattern As Byte(), startPosition As Long, count As Long) As Long
 
    Dim streamLen As Long = stream.Length
    Dim pattLen As Integer = pattern.Length
    Dim endPos As Long = startPosition + count
 
    If startPosition > streamLen Then
        Throw New InvalidOperationException("Start Position is greater than the source stream length.",
                                            New ArgumentException("", paramName:=NameOf(startPosition)))
    End If
 
    If endPos > streamLen Then
        Throw New InvalidOperationException("End Position is greater than the source stream length.",
                                            New ArgumentException("", paramName:=NameOf(count)))
    End If
 
    If pattLen > (streamLen - startPosition) Then
        Throw New InvalidOperationException("Pattern Length is greater than the current search capacity length.",
                                            New ArgumentException("", paramName:=NameOf(count)))
    End If
 
    If count <= 0 Then
        Throw New ArgumentException("A value greater than zero is required.", paramName:=NameOf(count))
    End If
 
    Dim matchPos As Long = -1
    Dim pattPos As Integer = 0
 
    Dim buffSize As Integer = CInt(Math.Min(4096, stream.Length))
    Dim buff(buffSize - 1) As Byte
 
    Dim buffStream As New BufferedStream(stream, buffSize)
    buffStream.Seek(startPosition, SeekOrigin.Begin)
 
    Dim streamPos As Long = startPosition
    Dim readArray As Integer = -1
 
    While (readArray <> 0) AndAlso (streamPos <= endPos)
        readArray = buffStream.Read(buff, 0, buffSize)
 
        For buffPos As Integer = 0 To buff.Length - 1
            streamPos += 1
 
            If buff(buffPos) <> pattern(pattPos) Then
                pattPos = 0
            Else
                If pattPos = (pattLen - 1) Then
                    matchPos = (streamPos - pattPos - 1)
                    Exit While
                End If
                pattPos += 1
            End If
 
            If streamPos > endPos Then
                Exit While
            End If
        Next
    End While
 
    Return matchPos
 
End Function

---

Por cierto, en .NET Core directamente podrías utilizar la función MemoryExtensions.IndexOf:

• https://learn.microsoft.com/en-us/dotnet/api/system.memoryextensions.indexof?view=net-7.0

Saludos.