so i have the code for a quotes system
Code:
on *:TEXT:!quotes*:#: {
  if ( $$2 == edit) { 
    if ( $nick == dude22072 || $nick == Boothin || $nick == isopod_chan || $nick == swordspree || $nick == neo_obsidian || $nick == zackattack9909 || $nick == lordprevious ) {
      var %length $readini(quotes.ini, $$3, length)
      if ( $$4 <= $calc(%length + 0) ) {
        .writeini quotes.ini $$3 $$4 $5-
        msg # Quote $$4 for user $$3 has been edited to $5-
        query Edits.SayingsBot " Quote $$4 for user $$3 has been edited to $5- "
      }
      else {
        msg # Quote $$4 does not exist for $$3
      }
    }
  }
  if ( $$2 == addusertorandom) {
    if ( $nick == dude22072 || $nick == Boothin || $nick == isopod_chan || $nick == swordspree || $nick == neo_obsidian || $nick == zackattack9909 || $nick == lordprevious ) {
      var %length $readini(quotes.ini, users, length)
      var %newlength = $calc(%length + 1)
      .writeini quotes.ini users length %newlength
      .writeini quotes.ini users %newlength $$3
      msg # Added $$3 to overall random list. They are user %newlength
    }
  }
  if ( $$2 == info ) { msg $chan To use !quotes simply type !quotes say [USERNAME] [NUMBER] to view a quote. The "Number" can be "r" for a random quote from  the user. The user can be "random" for a random quote from anyone. Dates/Times are CST. }
  if ( $$2 == list ) { msg $chan A list of all quotes are at http://moddedbydude.net76.net/wiki/index.php/SayingsBot_Commands#Quotes }
  if ( $$2 == add ) {
    var %length $readini(quotes.ini, $$3, length)
    var %newlength = $calc(%length + 1)
    .writeini quotes.ini $$3 length %newlength
    .writeini quotes.ini $$3 %newlength $4-
    msg # Quote %newlength for $$3 added as\: $4-
    query Edits.SayingsBot " Quote %newlength for user $$3 has been added as $4- "
  }
  if ( $$2 == say ) {
    if ( $$3 == random ) {
      var %userslength $readini(quotes.ini, users, length)
      var %userrand = $rand(1,%userslength)
      var %user $readini(quotes.ini, users, %userrand)
      var %length $readini(quotes.ini, %user, length)
      var %rand = $rand(1,%length)
      var %quote $readini(quotes.ini, %user, %rand)
      if ( %quote == $null ) { msg $chan ERROR\. RANDOM HAS PICKED A NON\-EXSISTANT QUOTE\. THIS SHOULD NOT HAPPEN\! | return }
      msg # %user ( %rand ): %quote 
    } 
    else {
      if ( $$4 == r) {
        var %length $readini(quotes.ini, $$3, length)
        var %rand = $rand(1,%length)
        var %quote $readini(quotes.ini, $$3, %rand)
        if ( %quote == $null ) { msg $chan ERROR\. That user has no quotes\, or random has some issues to explain\! | return }
        msg # ( %rand ) %quote 
      }
      else {
        var %quote $readini(quotes.ini, $$3, $$4)
        if ( %quote == $null) { msg $chan Their is no $$4 quote for $$3 | return }
        msg # %quote
      }
    }
  }
}


I was wondering how to get "addusertorandom" to automatically run when its the user's first quote that has been added?

(quotes.ini if it effects anything)
Code:
[users]
length=12
1=zackattack9909
2=Harbingerofme
3=dude22072
4=poolala123
5=realgreenmonkey
6=sayingsbot
7=rngbiasbot
8=rosieosithis
9=dalenko
10=darkknightrdarius
11=boothin
12=pincemomo

[zackattack9909]
length=5
1="maybe the scripts are broken when I accidentially the whole thing last night?" -May 17th 2014 @ 18:31
2="just like my penis" "multiple functions"- April 5th 2014 @ 18:27
3="zackattack9909 throws a handful of cheese balls in the air to celebrate" -May 18th 2014 @ 21:39
4="its like finding the wierd part of youtube" "a couple clicks later, you're watching massive pimples being popped and videos on how to fist your partner" - May 20th, 2014 @ 19:20-19:21
5="my spelling is bad and I should feel bad :(" - May 21st @ 13:45

[Harbingerofme]
length=1
1="I NO SPEAK ENGLISH AS LANGUAGE NATIVE ok?" -Apr 18 2014 @11:12

[dude22072]
length=2
1="no. crystal took 969 hours. that is 16 gyms. 8 gyms in emerald so probally around 400-500 hours" - April 5th 2014 @ 17:52
2="everyone shutup and eat cake"- April 5th 2014 @ 18:39

[poolala123]
length=2
1="instructions unclear, chopped dick off"- April 5th 2014 @ 18:28
2="it was youu" "*dramatic music*" "*explosions*" "*helicopters*" "*more explosions*" -April 11th, 2014 @ 20:16

[realgreenmonkey]
length=2
1="I have no idea what is being said, but i attempt to sing along"- April 5th 2014 @ 19:02
2="I AM A FUKKEN MONKEH!" -Unknown date and time.

[testuser]
length=1
1=testest

[sayingsbot]
length=1
1="sayingsbot slaps rngbiasbot around a bit with a large trout" -Too much to count

[rngbiasbot]
length=1
1="rngbiasbot slaps sayingsbot around a bit with a large tuna" -Too much to count

[rosieosithis]
length=2
1="Nightbot remember that one time I kept talking about tits and you b& me" -April 11th 2014 @ 20:57
2="Nightbot doesn't like enormous nipples either, apparently" -April 11th 2014 @ 20:58

[dalenko]
length=1
1="This actually helps chaos theory.. and alot other cosmic & random theories." "Given an infinite amount of time, any single game ever created will be completed by pure randomness" "And if that's true for games, it's true for everything" "Every single combination of atoms. Every single possible outcome of the universe." "I should stop smoking..." - May 20th 2014 @ 16:51-16:53

[darkknightrdarius]
length=1
1="idk how what or when" "but i went from looking into paranormal stuff on facebook" "and somehow managed to find myself in a group posting porn" "no typing required. just clicking" - May 20th 2014 @ 18:29

[boothin]
length=1
1="hp; didn't click" - May 20th, 2014 @ 20:45

[pincemomo]
length=1
1="CURSE YOU DUDE!!!" "*Shakes fist angrily.*" -May 22nd, 2014 @ 19:33-19:34