|
Título: Tengo esta duda Publicado por: Valkyr en 30 Septiembre 2006, 19:07 pm Hola, tengo este codigo
Código: CLS Y no se si es visual basic o que lenguaje es, en caso de que sea visual basic, tengo de compilador el Microsoft Visual Basic 2005 express, y nose como meter el codigo ni nada ya que no se programacion en vb. Espero no ser una molestia. Muchas gracias de antemano y Saludos. Título: Re: Tengo esta duda Publicado por: Zeroql en 30 Septiembre 2006, 19:40 pm ese lenguaje es basic, sis tienes qbasic lo puedes ejecutar tranquilamente... ò no se si funcione pero intenta programar no con form si no como instancia de simbolo de sistema . depronto funcione.
Título: Re: Tengo esta duda Publicado por: _Sergi_ en 1 Octubre 2006, 01:38 am Eso es QuickBasic, necesitas un editor de QuickBasic. Pudes usar por ejemplo Microsoft QuickBasic. La versión 1.1 viene en el CD de Windows 95 y Windows 98 dentro del directorio .../OLD/DOS/.
Sólo tienes que abrir QuickBasic, pegar el código entero y pulsar F5. Si quieres más, bájate algún buen tutorial de QB o bien mira la documentación adjunta (QB.HLP) que encontrarás en la carpeta que te dije. Por ejemplo, COLOR sirve para cambiar el color del texto, SCREEN para cambiar los modos de pantalla (1-13) y LOCATE mueve el cursor de texto (hay dos cursores, el de textos y el de gráficos) a una posición de la pantalla. Un saludo PD: Si no tienes los CDs de Windows, puedes usar Firstbasic (http://www.powerbasic.com/files/pub/), pero éste programa es shareware y es difícil encontrarlo crackeado ya que es para DOS. Busca los archivos que necesitas en google, la mula etc. PD2: QuickBasic 1.1 no permite compilar (generar EXE), necesitas QuickBasic 4.5 Título: Re: Tengo esta duda Publicado por: Valkyr en 5 Octubre 2006, 15:53 pm Me he pillado el quickbasic 4.5 pero esque para meter estos simbolos
Código: "ÊØÚؤ›‘ÛÝߘÎËÒÇÚӜՒÉ×ךÃÖ•ÞÓÞ×וáÕØÑÌ”ØÒÜ" Gracias y saludos. Título: Re: Tengo esta duda Publicado por: Zeroql en 6 Octubre 2006, 03:17 am tenes que usar el codigo ascii
es como esto alt + 64 =@ alt+126=~ alt+192=└ alt+96=` alt+92=\ y asi consecutivamente. Título: Re: Tengo esta duda Publicado por: Valkyr en 6 Octubre 2006, 18:17 pm Pues acabo de intentar probar y no he encontrado una tabla ascii con esos caracteres y en donde se mete el codigo fuente en el programa el qbasic no me funciona hacer eso de alt+69 por ejemplo :-( :-( . Que puedo hacer para poder sacar esos caracteres?????
Título: Re: Tengo esta duda Publicado por: _Sergi_ en 9 Octubre 2006, 04:17 am 1. Puedes encontrar una tabla ASCII en la ayuda que viene con el IDE de QuickBasic 4.5. De ahi, puedes copiar y pegar lo que se te antoje.
2. Si no sabes hacer eso, siempre puedes usar el comando pegar de la consola de Windows. Pulsa ALT + ENTRAR para asegurarte de que estás en modo ventana, luego pulsa ALT + BARRA ESPACIADORA y selecciona "Edición/Pegar" Un saludo Título: Re: Tengo esta duda Publicado por: Valkyr en 10 Octubre 2006, 00:31 am Si, e conseguio hacerlo, y muchas gracias. Pero ahora tengo otro problema, yo lo que quiero hacer es descifrar esa cadena, y no tengo ni la mas remota idea de como se puede hacer. Supongo que podria ser como invertir la funcion del programa pero no tengo ni idea. Si alguno de vd. saben como se hace esto que poste la respuesta porfavor que es muy importante.
Espero no ser mucha molestia. Muchas gracias y saludos. Valkyr=Jazz. Título: Re: Tengo esta duda Publicado por: <--v1c1ous--> en 10 Octubre 2006, 15:16 pm Por lo que lei del codigo, lo que posteaste es para descifrar una cadena ¿como que no podes?.
Tiene que estar cifrada a la inversa del codigo que posteaste obviamente. Título: Re: Tengo esta duda Publicado por: Valkyr en 11 Octubre 2006, 00:15 am Ems perdona pero no entiendo como se hace eso XD, esque nose nada de programacion en este lenguaje, espero que no sea mucho pedir que me ayuden alguno ha hacer lo que dice hotmail_pop3.
Muchas gracias por toda la ayuda. Saludos Valkyr. Título: Re: Tengo esta duda Publicado por: Valkyr en 17 Octubre 2006, 20:52 pm Haber si con esta informacion que me dio hotmail_pop3
Citar No hay problema, te entiendo, siempre que se nececita algo nadie contesta, je. Lei tu post para no responderte cualquier cosa. Perimero te explico: El codigo que descifra es este: Citar DO WHILE A < LEN(CR$) A = A + 1 B = B + 1: IF B > LEN(N$) THEN B = 1 C = C + 1: IF C > LEN(C$) THEN C = 1 D = ASC(MID$(CR$, A, 1)) - (ASC(MID$(N$, B, 1)) + ASC(MID$(C$, C, 1))) Loop3: IF D < 1 THEN D = D + 255: GOTO Loop3 M$ = M$ + CHR$(D) LOOP Lo que hace es correr los caracter ASCI segun el String "123456" restarlos y sumarlos usando como valores A,B y C de los otros String que los obtiene de la cadena cifrada. En pocas palabras y para que entiendas, cuando se cifra corre caracteres ASCI e "inventa otros", el codigo desencriotado es menor al cifrado. La inversa a eso seria sumar todo lo que resta y demas, osea, en donde suma 5 caracteres y agrega X caracteres hacer lo inverso, restarle 5 caracteres y sacar X caracteres. Y usa como llave de "encriptacion/desencriptacion" los Strings: Citar N$ = "123456" 'CODIGO UNO PARA descifrar C$ = "123456" 'CODIGO DOS PARA descifrar CR$ = "" Parece complicado pero no lo es. Saludos. Haber si alguien me puede echar una mano. Saludos y gracias. Título: Re: Tengo esta duda Publicado por: Zeroql en 18 Octubre 2006, 19:35 pm pero en que se te puede ayudar si ya te han dichjo todo
Título: Re: Tengo esta duda Publicado por: Valkyr en 18 Octubre 2006, 20:58 pm Ya, pero esque nose como se hace todo lo que me han dicho, ya dije que yo no se nada de programacion en este lenguaje, ni en vb, ni en qb ni en ninguno XD. Quizas estoy pidiendo demasiado, pero esque nose hacer esto y lo necesito.
Muchas gracias por todo. Saludos. Título: Re: Tengo esta duda Publicado por: Zeroql en 18 Octubre 2006, 23:10 pm CLS 'limpia la pantalla SCREEN 12 'posiscion del texto en la pantalla COLOR 15 ' color que se va a usar para el texto LOCATE 1, 20: PRINT "PROGRAMA CREADO POR: -=CICKLOW CIS WOLW=-" 'texto mostrado en la pantalla COLOR 9 LOCATE 5, 20: PRINT "descifrando INFORMACION!!" SLEEP 4 'tiempo de espera para seguir con la operacion N$ = "123456" 'CODIGO UNO PARA descifrar 'N$,C$ se usan para la variables C$ = "123456" 'CODIGO DOS PARA descifrar CR$ = "" ' variable A = 0: B = 0: C = 0: M$ = "" operacion CR$ = "ÊØÚؤ›‘ÛÝߘÎËÒÇÚӜՒÉ×ךÃÖ•ÞÓÞ×וáÕØÑÌ”ØÒÜ" 'INFORMACION cifrada 'la info que esta cifrada DO WHILE A < LEN(CR$) proceso de repeticion A = A + 1 'variable contadora B = B + 1: IF B > LEN(N$) THEN B = 1 si. sino C = C + 1: IF C > LEN(C$) THEN C = 1 D = ASC(MID$(CR$, A, 1)) - (ASC(MID$(N$, B, 1)) + ASC(MID$(C$, C, 1))) 'se envia a D los valores en caractres del texto cifrado Loop3: 'finalizar el repetir IF D < 1 THEN D = D + 255: GOTO Loop3 ' si esto es igual a lo otro valla a repeteir #3 M$ = M$ + CHR$(D) 'variable donde se almacena los caracteres ya descifrados LOOP COLOR 5 LOCATE 12, 20: PRINT "INFORMACION descifrada CON EXITO" COLOR 10 LOCATE 15, 13: esto esta hecho en Qick basic (D.O.S) si sabes algo de programacion no importa el lenguaje debes a ver reconocido al menos unas lineas, es tanto esto de algoritmos... bueno espero que haya sido de utilidad. Título: Re: Tengo esta duda Publicado por: elmaro en 19 Octubre 2006, 04:59 am para que necesitas saber que es esa cadena cifrada??
es un ejemplo? o enverdad es algo importante??? si es importante simplemente pregunta a kien la cifro y que te la desencripte si es que no sabes ocmo hacerlo, xq ya se te dijo como hacerlo,. lo que te resta es bajarte un manual de qbasic y seguir paso a paso para poder correr el codigo a la perfeccion Título: Re: Tengo esta duda Publicado por: erbuson en 19 Octubre 2006, 12:06 pm Hola:
Si dispones de la fuente original, unicamente debes añadir después de LOCATE 12, 20: PRINT "INFORMACION descifrada CON EXITO" COLOR 10 LOCATE 15, 13: la instruccion PRINT M$ y te aparecerá el texto descifrado, aunque creo que te vas a llevar una soprpresa. Un saludo Título: Re: Tengo esta duda Publicado por: Valkyr en 19 Octubre 2006, 19:40 pm Nose que pasa que cuando le doy a empezar, sale Expected: end-of-statement y lo e copiado el codigo perfectamente :huh:
Título: Re: Tengo esta duda Publicado por: xDie en 19 Octubre 2006, 21:51 pm Nose que pasa que cuando le doy a empezar, sale Expected: end-of-statement y lo e copiado el codigo perfectamente :huh: Tienes qeu decir cuando termian el programa poenr un End al finalCódigo: CLS http://www.upseros.com/compiladores/qbasic45.zip Salu2 :) Título: Re: Tengo esta duda Publicado por: Valkyr en 20 Octubre 2006, 00:26 am Código: CLS aunque creo que te vas a llevar una soprpresa. ¿Porque dices que me voy a llevar una sorpresa?¿Esque has conseguido descifrar la informacion?.Saludos y Muchas gracias por todo lo que me estan ayudando. Título: Re: Tengo esta duda Publicado por: CeLaYa en 20 Octubre 2006, 02:04 am Alguna vez vi que alguien escribio que no estamos aqui para hacerle el trabajo a otros, no se si sea verdad que no sabes nada de programación y quieras aprender o estes buscando alguien que te haga la chamba, pero como hoy ando de buenas hay te va la cadena descifrada:
http://www.binari0s.com.ar/virus/ykloh.php si deberas quieres aprender a programar entonces de tarea te dejo hacer funcionar el codigo el VB, es de lo mas sencillo que pueda haber, "solo copiar y pegar" Título: Re: Tengo esta duda Publicado por: Valkyr en 21 Octubre 2006, 00:42 am Yo no queria aprender, solo queria desencriptarla para un reto, y como de qbasic o vbasic no se nada de nada pues no lo pude hacer yo solo, y ademas no puedo ponerme a aprender este lenguaje ahora porque tengo otras cosas que estudiar, y apenas tengo tiempo para ello, yo no pedi a nadie apuntandole con una pistola para que me resolviese el problema, yo postee, y ustedes me ayudaron, lo cual estoy profundamente agradecido, asique si piensas que esto es hacerme el trabajo pues lo veo muy bien, eres libre de pensar lo que quieras pero ya digo que no pedi a nadie que por fuerza me resolviese el problema solo digo eso.
Muchas gracias de nuevo por todo y espero no haber sido mucha molestia y no haberles robado mucho tiempo. Gracias y saludos. Título: Re: Tengo esta duda Publicado por: Zeroql en 21 Octubre 2006, 01:05 am la cadena desecriptad es una pagina web
|