This is a edit i got a script from a friend phil24. credit to the original owner, To use type /failradar nick
alias failradar {
var %gaybar = 1
var %green = $rand(1,100)
var %red = $calc(100 - %green)
var %gbar = 9,9
var %rbar = 4,4
while (%gaybar <= %green) {
var %gbar %gbar $+ |
inc %gaybar
}
var %gaybar = 1
while (%gaybar <= %red) {
var %rbar %rbar $+ |
inc %gaybar
}
.timer 1 1 describe $active is scanning $nick($active,$nick($active,$1)) using his Radar of Fail Dicks
.timer 1 2 describe $active %gbar $+ %rbar $+ $nick($active,$nick($active,$1)) is $iif(%green > %red,04 $+ %green $+ %,09 $+ %green $+ %) Retarded!
.timer 1 3 msg $active $iif(%green > %red,OMFG! That's one big ass Fail Dick Dick!,Wow $+ $chr(44) $nick($active,$nick($active,$1)) isn't that much of a fail dick at all!) $+
why use loop?? use $str and why using $nick($active,$nick($active,$1)) that return "$1" so use just $1
and is
$iif(%green > %red,04 $+ %green $+ %,09 $+ %green $+ %) Retarded!
can be
is $iif(%green > %red,04,09) $+ %green $+ % Retarded!
alias failradar {
var %gaybar 1,%green $r(1,100),%red $calc(100 - %green),%gbar 9,9 $+ $str($chr(124),[ %green ]),%rbar 4,4 $+ $str($chr(124),[ %red ])
.timer 1 1 describe $active is scanning $1 using his Radar of Fail Dicks
.timer 1 2 describe $active %gbar $+ %rbar $+ $1 is $iif(%green > %red,04,09) $+ %green $+ % Retarded!
.timer 1 3 msg $active $iif(%green > %red,OMFG! That's one big ass Fail Dick Dick!,Wow $+ $chr(44) $1 isn't that much of a fail dick at all!) $+
}