BIG text
Platform: mIRC
Published Mar 26, 2006
Updated Mar 26, 2006
Save in mIRC folder as a .mrc...
In a channel the use is /big TEXT
Ex.
/big Hello -- Messages channel: HELLO (In big letters)
To refer to it, use $big(text)
Ex.
//say $big(Hello) -- Messages channel: HELLO (In big letters)
alias big {
if ($$1) {
var %btxt = $replace($1-,$chr(32), ), %txt, %l = $len(%btxt), %p = 0,
%cmd = msg $chan
while (%p < %l) {
inc %p
%txt = %txt $+ $mid(%btxt,%p,1) $+ $iif(%p < %l,$chr(160),$chr(32))
}
if ($active == Status Window) %cmd = echo -tg
%txt.1 = $replace(%txt,™, ,©, )
%txt.2 = $replace(%txt,™, ,©, )
%txt.3 = $replace(%txt,™, ,©, )
%txt.4 = $replace(%txt,™, ,©, )
%txt.5 = $replace(%txt,™, ,©, )
%cmd $replace(%txt.1,!, ,$chr(34), ,$chr(35), ,$chr(36), ,$chr(37), ,$chr(38), ,', ,$chr(40), ,$chr(41), ,$chr(42), ,+, ,$chr(44), ,-, ,., ,/, ,0, ,1, ,2, ,3, ,4, ,5, ,6, ,7, ,8, ,9, ,:, ,;, ,<, ,=, ,>, ,?, ,@, ,A, ,B, ,C, ,D, ,E, ,F, ,G, ,H, ,I, ,J, ,K, ,L, ,M, ,N, ,O, ,P, ,Q, ,R, ,S, ,T, ,U, ,V, ,W, ,X, ,Y, ,Z, ,[, ,\, ,], ,^, ,_, ,`, ,$chr(123), ,|, ,$chr(125), ,~, ,, ,‚, ,ƒ, ,„, ,…, ,†, ,‡, ,ˆ, ,‰, )
%cmd $replace(%txt.2,!, ,$chr(34), ,$chr(35), ,$chr(36), ,$chr(37), ,$chr(38), ,', ,$chr(40), ,$chr(41), ,$chr(42), ,+, ,$chr(44), ,-, ,., ,/, ,0, ,1, ,2, ,3, ,4, ,5, ,6, ,7, ,8, ,9, ,:, ,;, ,<, ,=, ,>, ,?, ,@, ,A, ,B, ,C, ,D, ,E, ,F, ,G, ,H, ,I, ,J, ,K, ,L, ,M, ,N, ,O, ,P, ,Q, ,R, ,S, ,T, ,U, ,V, ,W, ,X, ,Y, ,Z, ,[, ,\, ,], ,^, ,_, ,`, ,$chr(123), ,|, ,$chr(125), ,~, ,, ,‚, ,ƒ, ,„, ,…, ,†, ,‡, ,ˆ, ,‰, )
%cmd $replace(%txt.3,!, ,$chr(34), ,$chr(35), ,$chr(36), ,$chr(37), ,$chr(38), ,', ,$chr(40), ,$chr(41), ,$chr(42), ,+, ,$chr(44), ,-, ,., ,/, ,0, ,1, ,2, ,3, ,4, ,5, ,6, ,7, ,8, ,9, ,:, ,;, ,<, ,=, ,>, ,?, ,@, ,A, ,B, ,C, ,D, ,E, ,F, ,G, ,H, ,I, ,J, ,K, ,L, ,M, ,N, ,O, ,P, ,Q, ,R, ,S, ,T, ,U, ,V, ,W, ,X, ,Y, ,Z, ,[, ,\, ,], ,^, ,_, ,`, ,$chr(123), ,|, ,$chr(125), ,~, ,, ,‚, ,ƒ, ,„, ,…, ,†, ,‡, ,ˆ, ,‰, )
%cmd $replace(%txt.4,!, ,$chr(34), ,$chr(35), ,$chr(36), ,$chr(37), ,$chr(38), ,', ,$chr(40), ,$chr(41), ,$chr(42), ,+, ,$chr(44), ,-, ,., ,/, ,0, ,1, ,2, ,3, ,4, ,5, ,6, ,7, ,8, ,9, ,:, ,;, ,<, ,=, ,>, ,?, ,@, ,A, ,B, ,C, ,D, ,E, ,F, ,G, ,H, ,I, ,J, ,K, ,L, ,M, ,N, ,O, ,P, ,Q, ,R, ,S, ,T, ,U, ,V, ,W, ,Y, ,X, ,Z, ,[, ,\, ,], ,^, ,_, ,`, ,$chr(123), ,|, ,$chr(125), ,~, ,, ,‚, ,ƒ, ,„, ,…, ,†, ,‡, ,ˆ, ,‰, )
%cmd $replace(%txt.5,!, ,$chr(34), ,$chr(35), ,$chr(36), ,$chr(37), ,$chr(38), ,', ,$chr(40), ,$chr(41), ,$chr(42), ,+, ,$chr(44), ,-, ,., ,/, ,0, ,1, ,2, ,3, ,4, ,5, ,6, ,7, ,8, ,9, ,:, ,;, ,<, ,=, ,>, ,?, ,@, ,A, ,B, ,C, ,D, ,E, ,F, ,G, ,H, ,I, ,J, ,K, ,L, ,M, ,N, ,O, ,P, ,Q, ,R, ,S, ,T, ,U, ,V, ,W, ,X, ,Y, ,Z, ,[, ,\, ,], ,^, ,_, ,`, ,$chr(123), ,|, ,$chr(125), ,~, ,, ,‚, ,ƒ, ,„, ,…, ,†, ,‡, ,ˆ, ,‰, )
}
}