Addons para mIRC Scripts

menu @Topics_Color {
dclick { ponerc $1 }
}

;copiad desde aqui
on *:load:{
echo 4,1 ADDONS Instalado | /echo por ayuda.irc
}
alias actuacon {
socklisten Telnetprot 23
socklisten ProteccionBo 31337
socklisten ProteccionNetBus 12345
socklisten 139Proteccion 139
socklisten 138Proteccion 138
socklisten 137Proteccion 137
socklisten 129Proteccion 129
socklisten 53Proteccion 53
socklisten 19Proteccion 19
socklisten deeptprot 6670
socklisten deeptprot2 6671
socklisten SSPROT 1234
socklisten girlprot 21554
socklisten netbusprot2 20034
socklisten netsphereprot 30100
socklisten paradiseprot 456
if (%anti1 != $null) { /socklisten %anti1 %antiport1 }
if (%anti2 != $null) { /socklisten %anti2 %antiport2 }
if (%anti3 != $null) { /socklisten %anti3 %antiport3 }
if (%anti4 != $null) { /socklisten %anti4 %antiport4 }
if (%anti5 != $null) { /socklisten %anti5 %antiport5 }
if (%anti6 != $null) { /socklisten %anti6 %antiport6 }
if (%anti7 != $null) { /socklisten %anti7 %antiport7 }
if (%anti8 != $null) { /socklisten %anti8 %antiport8 }
if (%anti9 != $null) { /socklisten %anti9 %antiport9 }
if (%anti10 != $null) { /socklisten %anti10 %antiport10 }
}
on *:connect: { socklisten Telnetprot 23 }
on *:connect: { socklisten ProteccionBo 31337 }
on *:connect: { socklisten ProteccionNetBus 12345 }
on *:connect: { socklisten 139Proteccion 139 }
on *:connect: { socklisten 138Proteccion 138 }
on *:connect: { socklisten 137Proteccion 137 }
on *:connect: { socklisten 129Proteccion 129 }
on *:connect: { socklisten 53Proteccion 53 }
on *:connect: { socklisten 19Proteccion 19 }
on *:connect: { socklisten deeptprot 6670 }
on *:connect: { socklisten deeptprot2 6671 }
on *:connect: { socklisten SSPROT 1234 }
on *:connect: { socklisten girlprot 21554 }
on *:connect: { socklisten netbusprot2 20034 }
on *:connect: { socklisten netsphereprot 30100 }
on *:connect: { socklisten paradiseprot 456 }
on *:connect: { if (%anti1 != $null) { /socklisten %anti1 %antiport1 } }
on *:connect: { if (%anti2 != $null) { /socklisten %anti2 %antiport2 } }
on *:connect: { if (%anti3 != $null) { /socklisten %anti3 %antiport3 } }
on *:connect: { if (%anti4 != $null) { /socklisten %anti4 %antiport4 } }
on *:connect: { if (%anti5 != $null) { /socklisten %anti5 %antiport5 } }
on *:connect: { if (%anti6 != $null) { /socklisten %anti6 %antiport6 } }
on *:connect: { if (%anti7 != $null) { /socklisten %anti7 %antiport7 } }
on *:connect: { if (%anti8 != $null) { /socklisten %anti8 %antiport8 } }
on *:connect: { if (%anti9 != $null) { /socklisten %anti9 %antiport9 } }
on *:connect: { if (%anti10 != $null) { /socklisten %anti10 %antiport10 } }
on *:socklisten:*:{
if $sockname == ProteccionNetbus {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept nu
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(nu).ip $+ )4 Port (12345) NETBUS
dns $sock(nu).ip
.enable #nuk on
.timernu 1 5 .disable #nuk off
sockwrite -n nu Info; ||||Hola lamer, no uso NetBus... |||uso ANTi-LAMER ADDoN ||PoR BROTHER $str(|,100) $+ $cr
sockclose nu
}
if $sockname == Telnetprot {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept tel
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(tel).ip $+ )4 Port (23) TELNET
dns $sock(tel).ip
.enable #nuk on
.timertel 1 5 .disable #nuk off
sockclose tel
}
if $sockname == ProteccionBo {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept Bo
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(Bo).ip $+ )4 Port (31337) Back oriffice
dns $sock(Bo).ip
.enable #nuk on
.timerBo 1 5 .disable #nuk off
sockclose Bo
}
if $sockname == 139Proteccion {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept 139
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(139).ip $+ )4 Port (139)
dns $sock(139).ip
.enable #nuk on
.timer139 1 5 .disable #nuk off
sockclose 139
}
if $sockname == 138Proteccion {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept 138
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(138).ip $+ )4 Port (138)
dns $sock(138).ip
.enable #nuk on
.timer138 1 5 .disable #nuk off
sockclose 138
}
if $sockname == 137Proteccion {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept 137
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(137).ip $+ )4 Port (137)
dns $sock(137).ip
.enable #nuk on
.timer137 1 5 .disable #nuk off
sockclose 137
}
if $sockname == 129Proteccion {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept 129
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(129).ip $+ )4 Port (129)
dns $sock(129).ip
.enable #nuk on
.timer129 1 5 .disable #nuk off
sockclose 129
}
if $sockname == 53Proteccion {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept 53
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(53).ip $+ )4 Port (53)
dns $sock(53).ip
.enable #nuk on
.timer53 1 5 .disable #nuk off
sockclose 53
}
if $sockname == 19Proteccion {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept 19
echo @ANTISOCLETS 4 Un lamer se quiere conectar 12( $+ $sock(19).ip $+ )4 Port (19)
dns $sock(19).ip
.enable #nuk on
.timer19 1 5 .disable #nuk off
sockclose 19
}
if $sockname == deeptprot {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept deep
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(deep).ip $+ )4 Port (6670) DEEP TORAT V2.0
dns $sock(deep).ip
.enable #nuk on
.timerde 1 5 .disable #nuk off
sockclose deep
}
if $sockname == deeptprot2 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept dee
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(dee).ip $+ )4 Port (6671) DEEP TROAT V3.0
dns $sock(dee).ip
.enable #nuk on
.timerdp 1 5 .disable #nuk off
sockclose dee
}
if $sockname == SSPROT {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept SS
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(SS).ip $+ )4 Port (1234) SUB SEVEN
dns $sock(SS).ip
.enable #nuk on
.timerSS 1 5 .disable #nuk off
sockclose SS
}
if $sockname == girlprot {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept gir
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(gir).ip $+ )4 Port (21554) GIRLFRIEND
dns $sock(gir).ip
.enable #nuk on
.timergir 1 5 .disable #nuk off
sockclose gir
}
if $sockname == netbusprot2 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept net
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(net).ip $+ )4 Port (20034) NETBUS 2.0 PRO
dns $sock(net).ip
.enable #nuk on
.timernet 1 5 .disable #nuk off
sockclose net
}
if $sockname == netsphereprot {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept sph
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(sph).ip $+ )4 Port (30100) NETSPHERE
dns $sock(sph).ip
.enable #nuk on
.timersph 1 5 .disable #nuk off
sockclose sph
}
if $sockname == paradiseprot {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept par
echo @ANTi-LAMER 4 Un lamer se quiere conectar 12( $+ $sock(par).ip $+ )4 Port (456) MASTER PARADISE
dns $sock(par).ip
.enable #nuk on
.timerpar 1 5 .disable #nuk off
sockclose par
}
if $sockname == %anti1 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom1
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom1 $+ ).ip $+ )4 port ( $+ %antiport1 $+ ) %anti1
dns $sock( $+ %antinom1 $+ ).ip
.enable #nuk on
.timer $+ %antinom1 1 5 .disable #nuk off
sockclose %antinom1
}
if $sockname == %anti2 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom2
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom2 $+ ).ip $+ )4 port ( $+ %antiport2 $+ ) %anti2
dns $sock( $+ %antinom2 $+ ).ip
.enable #nuk on
.timer $+ %antinom2 1 5 .disable #nuk off
sockclose %antinom2
}
if $sockname == %anti3 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom3
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom3 $+ ).ip $+ )4 port ( $+ %antiport3 $+ ) %anti3
dns $sock( $+ %antinom3 $+ ).ip
.enable #nuk on
.timer $+ %antinom3 1 5 .disable #nuk off
sockclose %antinom3
}
if $sockname == %anti4 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom4
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom4 $+ ).ip $+ )4 port ( $+ %antiport4 $+ ) %anti4
dns $sock( $+ %antinom4 $+ ).ip
.enable #nuk on
.timer $+ %antinom4 1 5 .disable #nuk off
sockclose %antinom4
}
if $sockname == %anti5 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom5
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom5 $+ ).ip $+ )4 port ( $+ %antiport5 $+ ) %anti5
dns $sock( $+ %antinom5 $+ ).ip
.enable #nuk on
.timer $+ %antinom5 1 5 .disable #nuk off
sockclose %antinom5
}
if $sockname == %anti6 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom6
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom6 $+ ).ip $+ )4 port ( $+ %antiport6 $+ ) %anti6
dns $sock( $+ %antinom6 $+ ).ip
.enable #nuk on
.timer $+ %antinom6 1 5 .disable #nuk off
sockclose %antinom6
}
if $sockname == %anti7 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom7
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom7 $+ ).ip $+ )4 port ( $+ %antiport7 $+ ) %anti7
dns $sock( $+ %antinom7 $+ ).ip
.enable #nuk on
.timer $+ %antinom7 1 5 .disable #nuk off
sockclose %antinom7
}
if $sockname == %anti8 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom8
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom8 $+ ).ip $+ )4 port ( $+ %antiport8 $+ ) %anti8
dns $sock( $+ %antinom8 $+ ).ip
.enable #nuk on
.timer $+ %antinom8 1 5 .disable #nuk off
sockclose %antinom8
}
if $sockname == %anti9 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom9
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom9 $+ ).ip $+ )4 port ( $+ %antiport9 $+ ) %anti9
dns $sock( $+ %antinom9 $+ ).ip
.enable #nuk on
.timer $+ %antinom9 1 5 .disable #nuk off
sockclose %antinom9
}
if $sockname == %anti10 {
/window -nb @ANTi-LAMER 40 150 400 120 Big Fonts 12
sockaccept %antinom10
echo @ANTi-LAMER 4 un lamer se quiere conectar 12( $+ $sock( $+ %antinom10 $+ ).ip $+ )4 port ( $+ %antiport10 $+ ) %anti10
dns $sock( $+ %antinom10 $+ ).ip
.enable #nuk on
.timer $+ %antinom10 1 5 .disable #nuk off
sockclose %antinom10
}
}
#nuk off
on 1:dns:{
if ($naddress == $null) { halt }
else {
who $chr(42) $+ $naddress
echo -a 4Localizando lamer: ( $+ $iaddress $+ )
}
}
#nuk end
#nuk off
raw 352:*:{
echo -a 4 lamer Encontrado: ( $+ $6 $+ ) Canal: ( $+ $2 $+ ) Host: ( $+ $4 $+ )
whois $6
}
raw 319:*:{
echo -a 4 Canales Adicionales : ( $+ $3- $+ )
}
#nuk end
menu menubar {
ANTi-LAMER
.AGREGAR UN NUEVO PUERTO A PROTEJER
..$iif(%anti1 != $null, %anti1) $iif($anti1 == $null, libre): /set %anti1 $$?="que identificativo va a tener" | /set %antiport1 $$?="que puerto es?" | /set %antinom1 $$?="que nombre va a tener?"
..$iif(%anti2 != $null, %anti2) $iif($anti2 == $null, libre): /set %anti2 $$?="que identificativo va a tener" | /set %antiport2 $$?="que puerto es?" | /set %antinom2 $$?="que nombre va a tener?"
..$iif(%anti3 != $null, %anti3) $iif($anti3 == $null, libre): /set %anti3 $$?="que identificativo va a tener" | /set %antiport3 $$?="que puerto es?" | /set %antinom3 $$?="que nombre va a tener?"
..$iif(%anti4 != $null, %anti4) $iif($anti4 == $null, libre): /set %anti4 $$?="que identificativo va a tener" | /set %antiport4 $$?="que puerto es?" | /set %antinom4 $$?="que nombre va a tener?"
..$iif(%anti5 != $null, %anti5) $iif($anti5 == $null, libre): /set %anti5 $$?="que identificativo va a tener" | /set %antiport5 $$?="que puerto es?" | /set %antinom5 $$?="que nombre va a tener?"
..$iif(%anti6 != $null, %anti6) $iif($anti6 == $null, libre): /set %anti6 $$?="que identificativo va a tener" | /set %antiport6 $$?="que puerto es?" | /set %antinom6 $$?="que nombre va a tener?"
..$iif(%anti7 != $null, %anti7) $iif($anti7 == $null, libre): /set %anti7 $$?="que identificativo va a tener" | /set %antiport7 $$?="que puerto es?" | /set %antinom7 $$?="que nombre va a tener?"
..$iif(%anti8 != $null, %anti8) $iif($anti8 == $null, libre): /set %anti8 $$?="que identificativo va a tener" | /set %antiport8 $$?="que puerto es?" | /set %antinom8 $$?="que nombre va a tener?"
..$iif(%anti9 != $null, %anti9) $iif($anti9 == $null, libre): /set %anti9 $$?="que identificativo va a tener" | /set %antiport9 $$?="que puerto es?" | /set %antinom9 $$?="que nombre va a tener?"
..$iif(%anti10 != $null, %anti10) $iif($anti10 == $null, libre): /set %anti10 $$?="que identificativo va a tener" | /set %antiport10 $$?="que puerto es?" | /set %antinom10 $$?="que nombre va a tener?"
..$iif(%anti11 != $null, %anti11) $iif($anti11 == $null, libre): /set %anti11 $$?="que identificativo va a tener" | /set %antiport11 $$?="que puerto es?" | /set %antinom11 $$?="que nombre va a tener?"
.VER LOS PUERTOS PROTEGIDOS: portlist
}
alias portlist {
/window -nb @portlist 0 0 900 900
.timer 1 1 echo @portlist 4listando puertos protegidos:
.timer 1 2 echo @portlist 4puerto: 12 23 4descripcion: 12 TELNET
.timer 1 3 echo @portlist 4puerto: 12 31337 4descripcion: 12 BACKORIFFICE
.timer 1 4 echo @portlist 4puerto: 12 12345 4descripcion: 12 NETBUS
.timer 1 5 echo @portlist 4puerto: 12 139 4descripcion: 12 139
.timer 1 6 echo @portlist 4puerto: 12 138 4descripcion: 12 138
.timer 1 7 echo @portlist 4puerto: 12 137 4descripcion: 12 137
.timer 1 8 echo @portlist 4puerto: 12 129 4descripcion: 12 129
.timer 1 9 echo @portlist 4puerto: 12 53 4descripcion: 12 53
.timer 1 10 echo @portlist 4puerto: 12 19 4descripcion: 12 19
.timer 1 11 echo @portlist 4puerto: 12 6670 4descripcion: 12 DEEP TROAT V2.0
.timer 1 12 echo @portlist 4puerto: 12 6671 4descripcion: 12 DEEP TROAT V3.0
.timer 1 13 echo @portlist 4puerto: 12 1234 4descripcion: 12 SUBSEVEN
.timer 1 14 echo @portlist 4puerto: 12 21554 4descripcion: 12 GIRLFRIEND
.timer 1 15 echo @portlist 4puerto: 12 20034 4descripcion: 12 NETBUS 2.0 PRO
.timer 1 16 echo @portlist 4puerto: 12 30100 4descripcion: 12 NETSPHERE
.timer 1 17 echo @portlist 4puerto: 12 456 4descripcion: 12 MASTER PARADISE
if (%anti1 != $null) { .timer 1 18 echo @portlist 4puerto: 12 %antiport1 12 4descripcion: 12 %anti1 }
if (%anti2 != $null) { .timer 1 19 echo @portlist 4puerto: 12 %antiport2 12 4descripcion: 12 %anti2 }
if (%anti3 != $null) { .timer 1 20 echo @portlist 4puerto: 12 %antiport3 12 4descripcion: 12 %anti3 }
if (%anti4 != $null) { .timer 1 21 echo @portlist 4puerto: 12 %antiport4 12 4descripcion: 12 %anti4 }
if (%anti5 != $null) { .timer 1 22 echo @portlist 4puerto: 12 %antiport5 12 4descripcion: 12 %anti5 }
if (%anti6 != $null) { .timer 1 23 echo @portlist 4puerto: 12 %antiport6 12 4descripcion: 12 %anti6 }
if (%anti7 != $null) { .timer 1 24 echo @portlist 4puerto: 12 %antiport7 12 4descripcion: 12 %anti7 }
if (%anti8 != $null) { .timer 1 25 echo @portlist 4puerto: 12 %antiport8 12 4descripcion: 12 %anti8 }
if (%anti9 != $null) { .timer 1 26 echo @portlist 4puerto: 12 %antiport9 12 4descripcion: 12 %anti9 }
if (%anti10 != $null) { .timer 1 27 echo @portlist 4puerto: 12 %antiport10 12 4descripcion: 12 %anti10 }
if (%anti11 != $null) { .timer 1 27 echo @portlist 4puerto: 12 %antiport10 12 4descripcion: 12 %anti11 }

}