Points System

By Diddy on Apr 01, 2005

I got this request from a guy named DemonicGoblin. He got me interested in iut, and I decided to go all out in making one. I'd like to thank xDaeMoN for pointing out some incorrect things, which helped me find other problems just like them, therefore making the script work as it should. The Script works like this; You can give people "points" for whatever reason. just type "!points add ". You can take some away with "!points del ". If the name you entered does not have an "account", it creates that person an account in the first of 15 available "slots" This script is meant for mIRC bots, not users. I used "owner" in the user tab of my bot with my adress so that others may not use the command. If you keep getting problems, just change "owner" to a wildcard "*". I hope you find this script useful to you in some way! :D If you have any problems with this or another of my scripts, you can comment below or email me at DiddyPZC@GMail.com.

;                                   Points System v1.0
;                          Copyright A.D. 2005
;
;           this script is meant for use with mIRC Bots, not users!
;              
;          You may freely use and edit this script to your own needs, just
;                            leave this header in here, thanks.
;

on owner:text:!points:#: {
  if ($2 == add) {
    if ($3 == %nickpoints1) {
      set %points1 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints1 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points1 $+ .
      halt
    }
    elseif ($3 == %nickpoints2) {
      set %points2 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints2 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points2 $+ .
      halt
    }
    elseif ($3 == %nickpoints3) {
      set %points3 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints3 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points3 $+ .
      halt
    }
    elseif ($3 == %nickpoints4) {
      set %points4 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints4 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points4 $+ .
      halt
    }
    elseif ($3 == %nickpoints5) {
      set %points5 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints5 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points5 $+ .
      halt
    }
    elseif ($3 == %nickpoints6) {
      set %points6 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints6 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points6 $+ .
      halt
    }
    elseif ($3 == %nickpoints7) {
      set %points7 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints7 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points7 $+ .
      halt
    }
    elseif ($3 == %nickpoints8) {
      set %points8 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints8 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points8 $+ .
      halt
    }
    elseif ($3 == %nickpoints9) {
      set %points9 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints9 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points9 $+ .
      halt
    }
    elseif ($3 == %nickpoints10) {
      set %points10 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints10 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points10 $+ .
      halt
    }
    elseif ($3 == %nickpoints11) {
      set %points11 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints11 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points11 $+ .
      halt
    }
    elseif ($3 == %nickpoints12) {
      set %points12 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints12 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points12 $+ .
      halt
    }
    elseif ($3 == %nickpoints13) {
      set %points13 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints13 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points13 $+ .
      halt
    }
    elseif ($3 == %nickpoints14) {
      set %points14 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints14 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points14 $+ .
      halt
    }
    elseif ($3 == %nickpoints15) {
      set %points15 $calc($4 + %points1)
      msg $chan Congratulations, %nickpoints15 $+ ! You have just earned yourself $4 shiny new point(s)! :) You now have a total of %points15 $+ .
      halt
    }
    else {
      if (%nickpoints1 == $null) {
        set %nickpoints1 $3
        set %points1 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints2 == $null) {
        set %nickpoints2 $3
        set %points2 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints3 == $null) {
        set %nickpoints3 $3
        set %points3 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints4 == $null) {
        set %nickpoints4 $3
        set %points4 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints5 == $null) {
        set %nickpoints5 $3
        set %points5 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints6 == $null) {
        set %nickpoints6 $3
        set %points6 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints7 == $null) {
        set %nickpoints7 $3
        set %points7 $4
        msg $chan You have been added to the points database, $3 $ +! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints8 == $null) {
        set %nickpoints8 $3
        set %points8 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints9 == $null) {
        set %nickpoints9 $3
        set %points9 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints10 == $null) {
        set %nickpoints10 $3
        set %points10 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints11 == $null) {
        set %nickpoints11 $3
        set %points11 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints12 == $null) {
        set %nickpoints12 $3
        set %points12 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints13 == $null) {
        set %nickpoints13 $3
        set %points13 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints14 == $null) {
        set %nickpoints14 $3
        set %points14 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      elseif (%nickpoints15 == $null) {
        set %nickpoints15 $3
        set %points15 $4
        msg $chan You have been added to the points database, $3 $+ ! $nick has chosen to start you off with $4 point(s), too! :)
        halt
      }
      else {
        halt
      }
    }
    else {
      halt
    }
  }
  elseif ($2 == del) {
    if ($3 == %nickpoints1) {
      set %points1 $calc(%points1 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points1 $+ .
      halt
    }
    elseif ($3 == %nickpoints2) {
      set %points2 $calc(%points2 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points2 $+ .
      halt
    }
    elseif ($3 == %nickpoints3) {
      set %points3 $calc(%points3 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points3 $+ .
      halt
    }
    elseif ($3 == %nickpoints4) {
      set %points4 $calc(%points4 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points4 $+ .
      halt
    }
    elseif ($3 == %nickpoints5) {
      set %points5 $calc(%points5 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points5 $+ .
      halt
    }
    elseif ($3 == %nickpoints6) {
      set %points6 $calc(%points6 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points6 $+ .
      halt
    }
    elseif ($3 == %nickpoints7) {
      set %points7 $calc(%points7 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points7 $+ .
      halt
    }
    elseif ($3 == %nickpoints8) {
      set %points8 $calc(%points8 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points8 $+ .
      halt
    }
    elseif ($3 == %nickpoints9) {
      set %points9 $calc(%points9 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points9 $+ .
      halt
    }
    elseif ($3 == %nickpoints10) {
      set %points10 $calc(%points10 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points10 $+ .
      halt
    }
    elseif ($3 == %nickpoints11) {
      set %points11 $calc(%points11 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points11 $+ .
      halt
    }
    elseif ($3 == %nickpoints12) {
      set %points12 $calc(%points12 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points12 $+ .
      halt
    }
    elseif ($3 == %nickpoints13) {
      set %points13 $calc(%points13 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points13 $+ .
      halt
    }
    elseif ($3 == %nickpoints14) {
      set %points14 $calc(%points14 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points14 $+ .
      halt
    }
    elseif ($3 == %nickpoints15) {
      set %points15 $calc(%points15 - $4)
      msg $chan Sorry, $3 $+ ... You have lost $4 point(s). You now have a total of %points15 $+ .
      halt
    }
    else {
      if (%nickpoints1 == $null) {
        set %nickpoints1 $3
        set %points1 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints2 == $null) {
        set %nickpoints2 $3
        set %points2 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints3 == $null) {
        set %nickpoints3 $3
        set %points3 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints4 == $null) {
        set %nickpoints4 $3
        set %points4 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints5 == $null) {
        set %nickpoints5 $3
        set %points5 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints6 == $null) {
        set %nickpoints6 $3
        set %points6 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints7 == $null) {
        set %nickpoints7 $3
        set %points7 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints8 == $null) {
        set %nickpoints8 $3
        set %points8 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints9 == $null) {
        set %nickpoints9 $3
        set %points9 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints10 == $null) {
        set %nickpoints10 $3
        set %points10 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints11 == $null) {
        set %nickpoints11 $3
        set %points11 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints12 == $null) {
        set %nickpoints12 $3
        set %points12 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints13 == $null) {
        set %nickpoints13 $3
        set %points13 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints14 == $null) {
        set %nickpoints14 $3
        set %points14 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      elseif (%nickpoints15 == $null) {
        set %nickpoints15 $3
        set %points15 0
        msg $chan $3 has no account! o_O. $3 now has an account with 0 point(s).
        halt
      }
      else {
        halt
      }
    }
    else {
      halt
    }
  }
  else {
    halt
  }
}

Comments

Sign in to comment.
thomgarcia   -  Sep 30, 2007

You said \"I used \"owner\" in the user tab of my bot with my adress so that others may not use the command.\" what do you mean by that ?? i can assign person to have access to !points command ??

 Respond  
thomgarcia   -  Sep 30, 2007

hey , is it work in the new version of mirc ?? and why who will perform the !points command ?? me or in my bot ?? another thing , i\'ll change the owner to * , and nothing is happen.. !points add ..

 Respond  
Noutrious   -  Jun 01, 2007

As the idea is good, i agree with xDaeMoN - the code is pretty bad.

 Respond  
xDaeMoN   -  Jun 01, 2007

This script can still be condensed about 50% or more. You can also make it not limited only to 15 nicks. But for the current code, you can use a while loop to check each variable (%nickpointsN) if it\'s for that nick then add/delete the points. Those \"else halt\" at the end are not needed.

 Respond  
Noutrious   -  Jul 18, 2006

I like it :)

 Respond  
henrikthesexy   -  Jul 17, 2005

nice snippet

 Respond  
supergeo   -  Apr 01, 2005

Nice Job :)

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.