Anti Google Cheat in #quiz and color Script v1.0

By halifaxboy2009 on Jun 01, 2010

This has an Anti Google Cheat for #quiz when you do a quiz and in other channel this would be color script, This script put a random letter that can not be seen where the space is. Please feel free to let me know of any bugs in the script

;----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
;;; Addon: Anti Google Cheat in #quiz and Coulour Script v1.0
;;; Creator: craig
;;;;Contact
;;; IRC: irc.chat-box.org
;;; in #home
;;;;WWW.Chat-Box.Org
;;; Chat-Box
;----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

on 1:load: { echo -a 11,02Thanks For Loading Craig Colors Script 2010 | if ($group(#colors) != on) { enable #colors } }
on 1:unload: { echo -a 11,02Tanks for Using Craig Colors Script 2010 }

alias Colors  { 
  if ($group(#colors) == on) { .disable #colors }
  else { .enable #colors }
}
#colors off
on *:input:*: {
  if ($left($1,1) != /) {
    if ($chr(33) isin $1) { /say $1- | HALT }
    if ($chan == #quiz) { /say 11,02 $+ $replace($1-,$chr(32), 02 $+ $chr(44) $+ 02 $+ $r(a,z) $+ 11 $+ $chr(44) $+ 02 $+ ) | HALT }
    if (/* !iswm $1) { var %color = $iif(c !isin $chan(#).mode,$+($+($chr(3),11,$chr(44)),02,$chr(2),$1-)) | say %color | halt }
    halt
  }
}
#colors end
menu  menubar,nicklist,query,channel {
  Turn Colors $iif($group(#colors) == on,Off,On):Colors
}

Like Page Follow Author

Comments

Jethro - Jun 01, 2010

If you know the $iif identifier, why not just do:

alias colors { $iif($group(#colors) == on,dis,en) $+ able #colors }

And you only need one halt/haltdef

#colors off
on *:input:*:{
  if ($left($1,1) != /) {
    haltdef
    if ($chr(33) isin $1) { say $1- }
    elseif ($chan == #quiz) {
      say 11,02 $+ $replace($1-,$chr(32), 02 $+ $chr(44) $+ 02 $+ $r(a,z) $+ 11 $+ $chr(44) $+ 02 $+ )
    }
    else { 
      var %color = $iif(c !isin $chan(#).mode,$+($+($chr(3),11,$chr(44)),02,$chr(2),$1-)) | say %color
    }
  }
}
#colors end

Respond