lam0r script (this 0wns)

[Skunk]

This script will add 0r to the end of every word if you type /0r then the text you want converted.

The below is an alias written by ybw for mIRC - you need to paste it in your aliases window (Alt+ A) in mIRC:/0r {
var %input = $1-
var %num = $numtok($1-,32)
var %theword
var %count = 1
:start
if ( %count > %num ) { goto end }
else {
var %current = $gettok(%input,%count,32)
%theword = %theword $addtok(%current,0r,r)
inc %count
goto start
}
:end
msg $chan %theword
}And here's GameGuru's adapted version:Originally posted by GameGuru
It's late and I'm tired, and I haven't been able to get $replace to work properly yet. So I've made a quick adaption of Andy's alias script.

To go in the Popups Section (Alt + P) (under the Channel view) (Alt + v then 2)
Activate 0r mode: set %0r 1 | echo -a 0r Mode activated!
Deactivate 0r mode: set %0r 0 | echo -a 0r Mode Deactivated!
Plus you can have this instead of or as well as the above bit in the Aliases (Alt + A)

/0r {
if (( %0r == $null ) || ( %0r == 0 ) { set %0r 1 | Echo -a 0r Mode Activated! }
if ( %0r == 1 ) { set %0r 0 | Echo -a 0r Mode Deactivated! }
}
To go in remote section of mIRC (Alt + R)
on *:input:#: {
if ( %0r == 1 ) {
var %input = $1-
var %num = $numtok($1-,32)
var %theword
var %count = 1
:start
if ( %count > %num ) { goto end }
else {
var %current = $gettok(%input,%count,32)
if ( $len(%current) < 4 ) { %theword = %theword %current | inc %count | goto start }
%theword = %theword $addtok(%current,0r,r)
inc %count
goto start
}
:end
msg $chan %theword
halt
}
else { return }
}

If I can be bothered I'll improve it a bit, but bear in mind that commands cannot be issued with "0r mode" active

[ybw]

I wrote an anti-0r script last night :P

[GameGuru]

I wonder why you did that? :E

[Bad-Co]

Found this on a IRC script site.
slightly edited!!


/0r {
%hl = $1-
%hl = $replace(%hl,cker,xor)
%hl = $replace(%hl,you,j00)
%hl = $replace(%hl,!,!!!!!!!1111)
%hl = $replace(%hl,are,R)
%hl = $replace(%hl,eam,aem)
%hl = $replace(%hl,ggo,go)
%hl = $replace(%hl,ou,AU)
%hl = $replace(%hl,the,teh)
%hl = $replace(%hl,eal,ale)
%hl = $replace(%hl,EE,33)
%hl = $replace(%hl,x,><)
%hl = $replace(%hl,oo,00)
%hl = $replace(%hl,ai,ae)
%hl = $replace(%hl,er,ar)
%hl = $replace(%hl,to,too)
%hl = $replace(%hl,li,lie)
%hl = $replace(%hl,ate,aet)
%hl = $replace(%hl,ike,iek)
%hl = $replace(%hl,ave,aev)
%hl = $replace(%hl,ease,eas)
%hl = $replace(%hl,is,si)
%hl = $replace(%hl,here,ere)
%hl = $replace(%hl,ks,X)
%hl = $replace(%hl,em,am)
%hl = $replace(%hl,ake,aek)
%hl = $replace(%hl,ade,aed)
%hl = $replace(%hl,eet,337)
%hl = $replace(%hl,le,al)
%hl = $replace(%hl,ly,let)
%hl = $replace(%hl,lie,li)
%hl = $replace(%hl,ine,e1ene)
%hl = $replace(%hl,em,erm)
%hl = $replace(%hl,read,re4ds)
%hl = $replace(%hl,ake,4eke)
%hl = $replace(%hl,nce,nsce)
%hl = $replace(%hl,umn,amn)
%hl = $replace(%hl,sy,s3y)
%hl = $replace(%hl,ter,t3r)
%hl = $replace(%hl,end,eand)
%hl = $replace(%hl,ove,uv)
%hl = $replace(%hl,ll,l)
%hl = $replace(%hl,am,4m)
%hl = $replace(%hl,dd,d)
%hl = $replace(%hl,io,oi)
%hl = $replace(%hl,in,ni)
%hl = $replace(%hl,I'm,im)
%hl = $replace(%hl,es,se)
%hl = $replace(%hl,ode,oed)
%hl = $replace(%hl,ith,tih)
%hl = $replace(%hl,itt,tit)
%hl = $replace(%hl,by,bye)
%hl = $replace(%hl,cks,xors)
%hl = $replace(%hl,ex,ex0r)
%hl = $replace(%hl,oa,ao)
%hl = $replace(%hl,oe,eo)
%hl = $replace(%hl,my,mi)
%hl = $replace(%hl,that,taht)
%hl = $replace(%hl,eak,eek)
%hl = $replace(%hl,ome,oem)
%hl = $replace(%hl,sib,sab)
%hl = $replace(%hl,well,wel)
%hl = $replace(%hl,imp,emp)
%hl = $replace(%hl,age,aeg)
%hl = $replace(%hl,said,saids)
%hl = $replace(%hl,rr,r)
%hl = $replace(%hl,ake,aek)
%hl = $replace(%hl,stl,sl)
%hl = $replace(%hl,ile,iel)
%hl = $replace(%hl,ock,oack)
%hl = $replace(%hl,sus,sis)
%hl = $replace(%hl,mm,m)
%hl = $replace(%hl,oose,ooes)
%hl = $replace(%hl,oes,ose)
%hl = $replace(%hl,ards,ardsds)
%hl = $replace(%hl,are,aer)
%hl = $replace(%hl,I'd,id)
%hl = $replace(%hl,ure,are)
%hl = $replace(%hl,own,on)
%hl = $replace(%hl,nim,nam)
%hl = $replace(%hl,rey,ray)
%hl = $replace(%hl,deo,deao)
%hl = $replace(%hl,what,wat)
%hl = $replace(%hl,script,scritp)
%hl = $replace(%hl,?,????!!!!!!!1111)
%hl = $replace(%hl,wel,wul)
%hl = $replace(%hl,why,Y)
%hl = $replace(%hl,one,1!!)
%hl = $replace(%hl,ear,aer)
%hl = $replace(%hl,ule,ool)
%hl = $replace(%hl,eau,yoo)
%hl = $replace(%hl,I'll,ill)
%hl = $replace(%hl,ight,ite)
%hl = $replace(%hl,but,btu)
%hl = $replace(%hl,try,trie)
%hl = $replace(%hl,ope,oep)
%hl = $replace(%hl,pp,p)
%hl = $replace(%hl,ore,oer)
%hl = $replace(%hl,and,nad)
%hl = $replace(%hl,get,gte)
%hl = $replace(%hl,hack,hax0r)
%hl = $replace(%hl,kick,kikc)
%hl = $replace(%hl,don't,dont)
%hl = $replace(%hl,haha,HAHAAHA!?!?!?!?!?!)
%hl = $replace(%hl,me,mee)
%hl = $replace(%hl,can,cna)
%hl = $replace(%hl,ie,ei)
%hl = $replace(%hl,ant,nat)
%hl = $replace(%hl,it,ti)
%hl = $replace(%hl,nre,naem)
%hl = $replace(%hl,rse,aem)
/msg # %hl
/unset %hl
}