|
|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - Kesar
Páginas: [1]
1
« en: Lunes 20 de Septiembre de 2004, 19:54 »
Hola hippie, disculpa la tardanza, es que tuve problemas con el pc. Te pongo el codigo tal cual lo tengo, pero como no tengo ni idea de perl no se si falta algo o no  pero creo que solo usa la MIME::Base64 ## u'll need MIME::Base64 to get it to work aka C:\>echo install MIME-Base64|ppm $nicething = '-'x60; system('cls'); print "\t".$nicething."\n"; print "\t".' Obscure'."\n"; print "\t".$nicething."\n"; if (@ARGV) {$passwd = $ARGV[0]} else {print "\t\t usage: MDecode.pl userlist.dat\n\n";exit;} sub decode{ $decoded = ''; $f = ''; ($y) = @_; use MIME::Base64; $decoded = decode_base64($y); $a = unpack("H*",$decoded); ## this is the offset hex table ## this simple encryption just adds/subtracts a certain value ## for each character. @off = (54,68,65,20,73,65,74,75,70,20,70,72,'6f',63,65,'9f'); $w = 0; foreach $love (@off){ $h = substr($a,$w,2); $d = hex $h; $l = hex $love; $letter = $d - $l; $aa = pack("I*",$letter); $q = substr($aa,0,1); $f = $f.$q; $w = $w + 2; } $f = substr($f,0,length($decoded)); return $f; } if (open (PASSF,$passwd)){ while (<PASSF>){ $dom = substr ($_,0,45); $dom =~ s/ //g; $user = substr ($_,45,30); $user =~ s/ //g; $enc = substr ($_,195,19); $enc =~ s/ //g; push(@enc,$enc); push(@user,$user); push(@dom,$dom); } close(PASSF); $x = 0; while ($x != $#enc+1){ print "\t\t".$user[$x].'@'.$dom[$x]."\t-->\t".&decode($enc[$x])."\n"; $x++; } } else {print "\t\t\tCould not open $passwd"};
2
« en: Viernes 10 de Septiembre de 2004, 16:59 »
Hola, Bien, vamos por pasos, nostromo tiene razon, y esa es la mejor forma de aprender javascript, aunk tb es cierto k no es la mas facil  Lo que yo te voy a recomendar ahora son tres programas con los cuales vas a programar igual que con el block de notas, si a mano, es decir tendras que escribir todo el codigo, de hecho esta es la mejor forma de aprender javascript, pero estos programas si tienen algunas muy buenas ayudas: - AceHTML PRO (no el freeware, el freeware no te servira): un gran editor de paginas html, pero que reconoce casi al 100% todos los comandos javascript y que ademas, te trae muchos scripts para hacer efectos de imagenes, textos ... de ejemplo, y lo mejor, trae una ayuda sobre javascript espectacular. - MSE7.exe (Microsoft Script Editor): este programa se te instala en el disco duro cuando tu instalas una Microsoft Office 2000, XP o 2003, buscalo en la carpeta office10, office11 ... depende de tu version de office, o sino en inicio buscar  . Bueno, es otro fenomenal editor de paginas web pero que reconoce perfectamente el javascript y ademas tiene la mejor ayuda sobre javascript que yo he visto, bueno alomejor la mejor no es pero si k es muy buena. - Visual J++, como su nombre indica es el visual java, que programa mejor que este te vas a encontrar? este es un fantastico editor de paginas web, que reconoce de una forma espectacular el javascript y que ademas te reconoce las propiedades, es decir que cuando tu pones window. el te abre un cuadro con las propiedades del objeto window para que tu elijas la que quieras. Para finalizar, como complemento a estos y para aprender algunos truquillos sobre javascript bajate el aascripter, que es un programita que trae algunos scripts con efectos para paginas web. Saludos ...
3
« en: Viernes 10 de Septiembre de 2004, 16:47 »
Te adjunto un archivo zip que tiene un archivo de texto asm y un .com con el cual puedes probar el programa,
puedes probar el programa con esta cadena de texto: t9vXUaWY
Saludos
4
« en: Lunes 30 de Agosto de 2004, 16:10 »
GRACIAS Super_G, Ahora veo k realmente si era complicado y muy dificil intentar traducirlo, ahora a ver si soy capaz de seguir yo. Gracias otra vez, y si te gustó el programita y lo quieres tener entero pidemelo que te lo mando, de todas formas, si te apetece continuar con la traducción no te prives de hacerlo  , GRACIAS
5
« en: Viernes 27 de Agosto de 2004, 18:03 »
Bien supongo que lo que tu quieres hacer es abrir un simple popUp, pos eso se hace de muchas formas, por ej así: Primero la cabecera de la pagina creas la funcion que abrira los popUps <head> <script language="JavaScript"> function abreVentana(url){ var izq = 0; //Variable para la posicion x de la ventana var arr = 0; //Variable para la posicion y de la ventana izq = (screen.width/2)-225; //Centramos la ventana en el eje x arr = (screen.height/2)-100; //Centramos la ventana en el eje y //Abrimos la ventana con las barras de herramientas que queramos //Simplemente ponemos yes o no a la variable v = window.open(url,"respuestas","toolbar=no,location=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,width=450,height=200"); //Movemos la ventana al centro de la pantalla v.moveTo(izq,arr); //Ponemos el foco en la ventana, para evitar k se vaya detras del //navegador v.focus(); } </head>
Y despues en cada enlace que querramos que abra una ventana pos llamamos a la funcion javascript y le pasamos la direccion de la ventana que vamos a abrir Ej1 <a href="javascript:;" onClick="abreVentana('http://www.pentared.com')">Abrir ventana</a>
Ej2 <a href="javascript:;" onClick="abreVentana('productos.htm')">Ver productos</a>
________________________ Un saludo Kesar
6
« en: Viernes 27 de Agosto de 2004, 17:52 »
Antes de nada, daros las gracias a todos por leer mi post e intentar ayudarme. Mi problema es k nunca he programado en ensamblador y ahora necesito saber que es lo que hace la siguiente funcion, pero por mas que busco no doy encontrado el significado de las lineas de la misma. ¿Alguien podria traducirme a grandes rasgos las lineas mas complicadas? el resto ya lo intentare averiguar yo, gracias ... por cierto, solo es una parte del codigo que tengo, digo esto por si alguien pregunta porque esta incompleto. Gracias otra vez start: mov si,offset ParamStr mov dx,offset Usage xor ax,ax lodsb or al,al jz ExitPrint mov cx,ax mov di,si lodsb repe scasb jcxz ExitPrint mov dx,di dec dx inc cx repne scasb xor ax,ax dec di stosb mov si,dx call MD_decode mov dx,si ExitPrint: mov ah,9 int 21h ret MD_decode proc near ; In/Out: si -> string in asciz push si xor dx,dx xor cx,cx mov di,si push offset MD_xlat2 mov bx,offset MD_xlat1 loop1: xor ax,ax lodsb or al,al jz short exit xlat cmp al,'@' jnb short exit shl dx,6 add cl,6 or dx,ax cmp cl,8 jb short next sub cl,8 mov ax,dx shr ax,cl mov ah,cl ; save bx mov cx,bx ; pop bx sub al,[bx] inc bx push bx mov bx,cx ; restore bx mov cl,ah ; stosb next: jmp short loop1 exit: ; xor al,al mov al,'$'; for this realisation stosb pop bx pop si retn MD_decode endp
7
« en: Viernes 27 de Agosto de 2004, 17:44 »
Hola a todos, yo soy programador web, pero no se programar en perl  , y acaba de llegar esta funcion a mis manos y tengo k traducirla a javascript, por eso simplemente necesitaria que alguien me comentase el significado de las lineas que os marco con -------------------??, ya que creo k sabiendo el significado de esas lines yo podria entender la funcion y así podría pasarla a javascript, Muchas gracias a todos sub decode{ $decoded = ''; $f = ''; ($y) = @_; use MIME::Base64; -------------------?? $decoded = decode_base64($y); $a = unpack("H*",$decoded);-------------------?? ## this is the offset hex table ## this simple encryption just adds/subtracts a certain value ## for each character. @off = (54,68,65,20,73,65,74,75,70,20,70,72,'6f',63,65,'9f');-------------------?? $w = 0; foreach $love (@off){-------------------?? $h = substr($a,$w,2);-------------------?? $d = hex $h;-------------------?? $l = hex $love; $letter = $d - $l; $aa = pack("I*",$letter);-------------------?? $q = substr($aa,0,1); $f = $f.$q; $w = $w + 2; } $f = substr($f,0,length($decoded)); return $f; }
Páginas: [1]
|
|
|
Mostrar Mensajes
