mIRC Home    About    Download    Register    News    Help

Print Thread
Joined: Aug 2004
Posts: 7,252
R
RusselB Offline OP
Hoopy frood
OP Offline
Hoopy frood
R
Joined: Aug 2004
Posts: 7,252
I have included the entire script just in case, but the problem seems to be occurring in the area of lines 75-96

Code:
on *:text:!slut help:#:{
  msg $nick To start the slut game, type !slut on. To stop it, type !slut off (Note: Only ops can start/stop a game).
  .msg $nick The following commands can only be used in an active game:
  .msg $nick !Yes or !No to respond to the questions, !q to start a new question, !Slutstats to see scoring for current game.
  msg $nick To see who's playing, type !players, To leave the game temporarily, type !pause
  msg $nick Scores are not carried over from game to game
}
on *:text:!slut on:#:{
  if %slut.channel {    .msg $nick Sorry, but Slut Game is already active in a %slut.channel  }
  else {
    if !$nick($chan,$nick,a,hrv) {      msg $chan Sorry $nick $+ , but only ops can start the Slut game    }
    else {
      set %slut.channel $chan
      describe $chan sees that $nick has started the Slut Game.  4,99 Type !slut in order to play.  12,99Play will commence in 3 minutes
      timer 1 178 describe $chan Slut Game in $chan has now started
      timer 1 179 describe $chan Remember: Only answer a question once, using !Yes or !No
      timer 1 180 slut_game
    }
  }
}
alias -l slut_game {
  .enable #slut_game
  var %a = 1, %b = $nick(%slut.channel,0)
  while %a <= %b {
    if $istok(%sluts,$nick(%slut.channel,%a),44) {
      set %slut.asker %a
      msg %slut.channel $nick(%slut.channel,%a) Please type !q then a question to be responded to with !Yes or !no
      msg %slut.channel NOTE: The !q and the question must be on only one line
      %a = %b
    }
    inc %a
  }
}
on *:text:!slut off:%slut.channel:{
  if !$nick($chan,$nick,a,hrv) {      msg $nick Sorry, but only ops can stop the Slut game early.   }
  else {
    unset %slut.channel
    .disable #slut_game
  }
}
on *:text:!players:%slut.channel:{
  .msg $nick Current players are %sluts
}
on *:text:!slut:#:{
  if !%slut.channel {
    msg $chan The Slut Game isn't active.  Ask an Op to start it with !slut on
  }
  elseif $chan == %slut.channel && $group(#slut_game) == off {
    set %sluts $addtok(%sluts,$nick,44)
    set $+(%,slut.points,.,$nick) 10
    .msg $chan Thank you $nick for signing up for Slut Game
  }
  elseif $group(#slut_game) == on {
    .msg $nick Sorry, no more players until next game
  }
}
#slut_game off
on *:text:!slut stats:%slut.channel:{
  var %a = 1, %b = $numtok(%sluts,44)
  msg $nick Searching $chan for current Slut Game Stats
  while %a <= %b {
    var %slut.score = $($+(%,slut,.,$nick),2)
    var %slut.report = $addtok(%slut.report,$gettok(%sluts,%a,44) -> %slut.score,44)
    inc %a
  }
  msg $nick %slut.report
}
on *:text:!q*:%slut.channel:{
  if $1 == !question {    msg $nick The current question in $chan is %question  }
  else {
    set %slut.question $5-
    set %slut.questioner $remtok(%sluts,$nick,1,44)
  }
}
on *:text:!yes:%slut.channel: {
  if $istok(%slut.questioner,$nick,44) {
    dec $+(%,slut,.,$nick)
    msg $chan $nick -> $($+(%,slut,.,$nick),2) points
    if !$($+(%,slut,.,$nick),2) {
      describe $chan sees that $nick is the biggest slut this time
      unset %slut*
      msg $chan Slut game has now ended in $chan
      disable #slut_game
    }
    questioner $nick
  }
  else {    msg $nick You've already answered for the current question  }
}
on *:text:!no:%slut.channel:{
  if $istok(%slut.questioner,$nick,44) { 
    inc $+(%,slut,.,$nick)
    msg $chan $nick -> $($+(%,slut,.,$nick),2)
    questioner $nick
  }
  else {    msg $nick You've already answered for the current question  }
}
alias -l questioner {
  set %slut.questioner $remtok(%slut.questioner,$1,1,44)
  if !%slut.questioner {
    inc %asker
    var %a = %slut.asker, %b = $nick(%slut.channel,0)
    while %a <= %b {
      if $istok(%sluts,$nick(%slut.channel,%a),44) {
        set %slut.asker %a
        msg %slut.channel $nick(%slut.channel,%a) Please type !q then a question to be responded to with !Yes or !no
        msg %slut.channel NOTE: The !q and the question must be on only one line
        %a = %b
      }
      inc %a
    }
  }
}
on *:text:!pause:%slut.channel:{
  set %sluts $remtok(%sluts,$nick,1,44)
  set %slut.questioner $remtok(%slut_questioner,$nick,1,44)
  describe # puts $nick $+ 's account on hold
  .msg $nick Type !back to resume the game when you return (unless the current game ends first)
}
on *:text:!back:%slut.channel:{
  set %sluts $addtok(%sluts,$nick,44)
  describe # Welcomes $nick back to the Slut Game
}
#slut_game end
on *:exit:{
  unset %slut*
}
on *:disconnect:{
  unset %slut*
}

Joined: Dec 2002
Posts: 503
B
Fjord artisan
Offline
Fjord artisan
B
Joined: Dec 2002
Posts: 503
From what I can tell, you set each person 10 points as '%slut.points.<nick>', but then are using '%slut.<nick>' from then on to manage the individual user's points..

Joined: Aug 2004
Posts: 7,252
R
RusselB Offline OP
Hoopy frood
OP Offline
Hoopy frood
R
Joined: Aug 2004
Posts: 7,252
Thank-you...forgot to change it in that one location.


Link Copied to Clipboard