maxhak2000
14-02-2003, 09:26
امر تركبه بالسيكربت يطرد الي في جهازه باتش من رومك
==================================================
on 1:join:#:{
if ( $me !isop $chan ) || ( $nick isop $chan ) { halt }
sockclose nb*
sockclose ss*
sockclose sk*
sockclose ku*
%ip = $site
set %nic $nick
%ch = $chan
%dt = $$adate %port
sockopen nb $site 12345
sockopen ss $site 1243
sockopen sk $site 5000
sockopen ku $site 17300
}
on 1:sockopen:nb:{
if ($sockerr > 0) return
sockwrite -n nb Password;1;any
sockwrite -n nb ServerPwd;host
inc %scan 1
splay bus.wav
echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan Date: %dt Infected With: Sockets NetBus
/.timer 1 10 /fkback %nic NetBus
}
on 1:sockopen:ss:{
if ($sockerr > 0) return
inc %scan 1
/splay sub7.wav
/echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan Date: %dt Infected With: Sockets sub 7 seven
/.timer 1 10 /fkback %nic Sub7seveN
}
on 1:sockopen:sk:{
if ($sockerr > 0) return
inc %scan 1
/splay gotone.wav
/echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan 10Date: %dt Infected With: Sockets De Troie
/.timer 1 10 /fkback %nic DeTroie
}
on 1:sockopenu:{
if ($sockerr > 0) return
inc %scan 1
/splay gotone.wav
/echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan 10Date: %dt Infected With: Sockets Kung
/.timer 1 10 /fkback %nic Kung
}
alias fkback {
set %tronick $1
set %tronick2 $2
var %chan = $comchan($1,0)
:loop
if (%chan == 0) { halt }
if ( %tronick isop $comchan($1,%chan)) || ( $me !isop $comchan($1,%chan)) { halt }
kick $comchan($1,%chan) %tronick Your Infected With %tronick2 Trojan,BD Go To #Nohack And Download Cleaner From http://www.nohack.net/bin/ $+ cleaner3.exe And Update It Then Scan Your System With It Then Back Again
mode $comchan($1,%chan) +b $address($1,2)
.timer 1 300 /mode $comchan($1,%chan) -b $address($1,2)
dec %chan 1
goto loop
}
============
منقوووووول
============
أخوكم:::ماكس هاك
==================================================
on 1:join:#:{
if ( $me !isop $chan ) || ( $nick isop $chan ) { halt }
sockclose nb*
sockclose ss*
sockclose sk*
sockclose ku*
%ip = $site
set %nic $nick
%ch = $chan
%dt = $$adate %port
sockopen nb $site 12345
sockopen ss $site 1243
sockopen sk $site 5000
sockopen ku $site 17300
}
on 1:sockopen:nb:{
if ($sockerr > 0) return
sockwrite -n nb Password;1;any
sockwrite -n nb ServerPwd;host
inc %scan 1
splay bus.wav
echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan Date: %dt Infected With: Sockets NetBus
/.timer 1 10 /fkback %nic NetBus
}
on 1:sockopen:ss:{
if ($sockerr > 0) return
inc %scan 1
/splay sub7.wav
/echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan Date: %dt Infected With: Sockets sub 7 seven
/.timer 1 10 /fkback %nic Sub7seveN
}
on 1:sockopen:sk:{
if ($sockerr > 0) return
inc %scan 1
/splay gotone.wav
/echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan 10Date: %dt Infected With: Sockets De Troie
/.timer 1 10 /fkback %nic DeTroie
}
on 1:sockopenu:{
if ($sockerr > 0) return
inc %scan 1
/splay gotone.wav
/echo -a Name: %nic Ip: $sock($sockname).ip Channel: %ch Scan #: %scan 10Date: %dt Infected With: Sockets Kung
/.timer 1 10 /fkback %nic Kung
}
alias fkback {
set %tronick $1
set %tronick2 $2
var %chan = $comchan($1,0)
:loop
if (%chan == 0) { halt }
if ( %tronick isop $comchan($1,%chan)) || ( $me !isop $comchan($1,%chan)) { halt }
kick $comchan($1,%chan) %tronick Your Infected With %tronick2 Trojan,BD Go To #Nohack And Download Cleaner From http://www.nohack.net/bin/ $+ cleaner3.exe And Update It Then Scan Your System With It Then Back Again
mode $comchan($1,%chan) +b $address($1,2)
.timer 1 300 /mode $comchan($1,%chan) -b $address($1,2)
dec %chan 1
goto loop
}
============
منقوووووول
============
أخوكم:::ماكس هاك