Mine

proc urep:proc {nick host hand chan text} {
set user [lindex [split $text] 0]
set flag [lindex [split $text] 1]

foreach chan [channels] { if [channel get $chan rankscript] {
if {$flag == "-"} {set t "\0555" } elseif {$flag == "+"} {set t "\0535" }

set a [ini_read "db/userfile.ini" "$user" "nick"]
set c [ini_read "db/banfile.ini" "$nick" "nick"]
set d [ini_read "db/banfile.ini" "$nick" "host"]
set e [ini_read "db/userfile.ini" "$nick" "rank"]
set f [expr {$e != "owner" || $e != "master"}]

if {$a == ";"} {
        putserv "PRIVMSG $chan :\002$user\002 is not in the database"
        return
   }


if {$c == "$nick" && $d == "$host" && $f == "0"} {
        putserv "PRIVMSG $chan :You may not add any more rep for: <\002 1 DAY \002>"
return
}


if {$a != ";" && $flag != ""} {
   set g [ini_read "db/userfile.ini" "$user" "rep"]
   set b [expr $g $t]
        ini_write "db/userfile.ini" "$user" "rep" "$b"
        putserv "PRIVMSG $chan :\002$user\'s\002 Rep is now: [ini_read "db/userfile.ini" "$user" "rep"]"
        ini_write "db/banfile.ini" "$nick" "nick" "$nick"
        ini_write "db/banfile.ini" "$nick" "host" "$host"

        if {$e != "Owner"} {
           putserv "PRIVMSG $chan :You may not add any more rep to $user for <\002 1 DAY \002>"
        }
   }
  }
 }
}