mIRC Home    About    Download    Register    News    Help

Print Thread
Joined: Jan 2003
Posts: 237
X
xrn0id Offline OP
Fjord artisan
OP Offline
Fjord artisan
X
Joined: Jan 2003
Posts: 237
i need a script tha will generate a list like the folllowing:
a
b
c
d
e
f
g
etc..
aa
ab
ac
ba
bb
bc
etc...

does anybody know how i can do this?



;Check for Life

if (%life == $null) {
goto getlife
}
Joined: Dec 2002
Posts: 1,922
O
Hoopy frood
Offline
Hoopy frood
O
Joined: Dec 2002
Posts: 1,922
Why do you need that?

Joined: Dec 2002
Posts: 2,985
Hoopy frood
Offline
Hoopy frood
Joined: Dec 2002
Posts: 2,985
He seems too honest to be making a password cracker. Maybe it's a guessing game he's making. grin

On a serious note I can't see how it's possible. I thought of $rand(a,z) for a sec but that would hardly ever give meaningful words.

Joined: Dec 2002
Posts: 774
T
Hoopy frood
Offline
Hoopy frood
T
Joined: Dec 2002
Posts: 774
/help /while
/help variables
/help Text and Number Identifiers

with those you should be able to do the script...
Or you could read trough the forums to find a script which does the job with little modification...


Code:
//if ( khaled isgod ) echo yes | else echo no
Joined: Jan 2003
Posts: 237
X
xrn0id Offline OP
Fjord artisan
OP Offline
Fjord artisan
X
Joined: Jan 2003
Posts: 237
im not makign a pass cracker frown just a word dic.

ps. Stupid hostmysig.com

Last edited by xrn0id; 25/02/03 04:41 PM.


;Check for Life

if (%life == $null) {
goto getlife
}
Joined: Dec 2002
Posts: 271
N
Fjord artisan
Offline
Fjord artisan
N
Joined: Dec 2002
Posts: 271
well, you can just call a randome chr, for example, if i wanted a ten letter group, i could do:

alias make.word {
var %a = $iif($1,$ifmatch,5), %b
;If there Isnt A $1 Param, We Default To 5
while (%a) {
%b = %b $+ $chr($r(97,122))
dec %a
}
return %b
}


then just sent what you want to the alias:

//echo -a $make.word(15) which will return a 15 letter word,
or
//echo -a $make.word with no $1 param, which in this case, will return a 5 letter word.... some example with $make.word(10)


xgeaobfhzn
esnkcipuav
mrrvrxmcst
fshnrrtcix
ywpufbfsbt
rbhlsygkox
ornqhrgfne
fsgmljcmqp
hisimprntd
gssyfxyrpt
jxwhqeomdw
rvoggwuevo
lgtrkoniax
akjxvptitm

Joined: Jan 2003
Posts: 4
F
Self-satisified door
Offline
Self-satisified door
F
Joined: Jan 2003
Posts: 4
I did one of those once, and gave up again, the code works but it's SLOW AS HELL - trust me, mIRC breaks upon running it. Maybe you can optimize it a bit but not anywhere near enough what's necessary to make it all work.

If you cant find any good dictionary creators (assembly prefeered, blindingly fast) drop me a msg and I'll mail you one that's very good.

dic {
remove dic.txt

var %1 = a
var %2 = a
var %3 = a
var %4 = a
var %5 = a
var %6 = a
var %7 = a
var %8 = a

while ($asc(%1) <= 122) {
while ($asc(%2) <= 122) {
while ($asc(%3) <= 122) {
while ($asc(%4) <= 122) {
while ($asc(%5) <= 122) {
while ($asc(%6) <= 122) {
while ($asc(%7) <= 122) {
while ($asc(%8) <= 122) {
write dic.txt %1 $+ %2 $+ %3 $+ %4 $+ %5 $+ %6 $+ %7 $+ %8
set %8 $chr($calc($asc(%8) + 1))
}
var %8 = a
set %7 $chr($calc($asc(%7) + 1))
}
var %7 = a
set %6 $chr($calc($asc(%6) + 1))
}
var %6 = a
set %5 $chr($calc($asc(%5) + 1))
}
var %5 = a
set %4 $chr($calc($asc(%4) + 1))
}
var %4 = a
set %3 $chr($calc($asc(%3) + 1))
}
var %3 = a
set %2 $chr($calc($asc(%2) + 1))
}
var %2 = a
set %1 $chr($calc($asc(%1) + 1))
}
}

Joined: Jan 2003
Posts: 237
X
xrn0id Offline OP
Fjord artisan
OP Offline
Fjord artisan
X
Joined: Jan 2003
Posts: 237
whats your email?



;Check for Life

if (%life == $null) {
goto getlife
}

Link Copied to Clipboard