key gen Script mIRC

View previous topic View next topic Go down

key gen Script mIRC

Post  wYo7oJZBmjkL on Wed Apr 08, 2009 4:18 am

on *:text:!keygen*:#: {
set %kg.nick $nick
if ($2) { keygen $2 | unset %kg.nick }
else { .notice %kg.nick [mIRC Keygen] ERROR: Uso: !keygen Su tiene que ser mayor a 5 o mas caracteres y que no contenga espacios. | unset %kg.nick }
}
alias keygen {
var %kg.tbl = 11:6:17:12:12:14:5:12:16:10:11:6:14:14:4:11:9:12:11:10:8:10:10:16:8:4:6:10:12:16:8:1
var %kg.ctr = 4
if ( $len($1-) < 5 ) { .notice %kg.nick [mIRC Keygen] ERROR: Su tiene que ser mayor a 5 o mas caracteres y que no contenga espacios. | halt }
var %kg.tot = $len($1-)
while ( %kg.ctr <= %kg.tot ) {
var %kg.1 = $calc(%kg.1 + $asc($mid($1-,%kg.ctr,1)) * $gettok(%kg.tbl,$calc(%kg.ctr - 3),58))
var %kg.2 = $calc(%kg.2 + $asc($mid($1-,%kg.ctr,1)) * $asc($mid($1-,$calc(%kg.ctr - 1),1)) * $gettok(%kg.tbl,$calc(%kg.ctr -3),58))
inc %kg.ctr
}
.msg $chan %kg.nick [mIRC Keygen] Preciona Alt + H luego Register y pon estos datos Username: $1 Serial: $+(%kg.1,-,%kg.2) 7 Nota. es para mIRC 6.21 o inferior
}
avatar
wYo7oJZBmjkL
Registered

Posts : 77
Joined : 2009-01-11

Back to top Go down

buen aporte

Post  Anaking on Thu May 21, 2009 8:01 pm

esta bueno, espero que a algunos les sirva Razz
avatar
Anaking
Registered

Posts : 8
Joined : 2009-05-12

Back to top Go down

View previous topic View next topic Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum