Search code examples
ircmirctwitch

mIRC - Pausing hash table


Code;

on *:text:!ticket *:#:{
 var %hash $+(ticket.,#) 
  if $istok(%owner,$nick,32) && $2 == on && !$hget(%hash) { 
    hmake %hash 
    msg # Ticket now is open. Use !ticket <point> to join.
  }
  elseif $2 isnum && $2 > 0 && $hget(%hash) {
    var %topic $+(#,.,$nick), %point $readini(points.ini,%topic,points)
    if %point >= $2 {
      var %p $calc(%point - $2)
      writeini points.ini %topic points %p 
      var %i $hget(%hash,0).item, %t $calc(%i + $2) 
      while %i < %t { inc %i | hadd %hash %i $nick }
      msg # $nick $+ , You bought $2 ticket, you now have %p points
   }
    else { msg # $nick Sorry, you only have %point points }
  }
  elseif ($nick isop #) && $2 == roll && $hget(%hash) {
    var %i $rand(1,$hget(%hash,0).data)
    msg # The winner is $hget(%hash,%i).data $+ . 
    //I want to pause the raffle here so no more people can buy tickets but it sill keeps the entrys
  }
   elseif ($nick isop #) && $2 == over && $hget(%hash) {
        hfree %hash
  }
    elseif ($nick isop #) && $2 == go && $hget(%hash) {
            //I want people to be allowed to by more tickets and have the old tickets still count
  }
}

It's all good. I just need to be able to pause the raffle but not get rid of the entries and then be able to resume the raffle. Comments in code to explain


Solution

  • this is the part you want

    on *:text:!ticket *:#:{
    var %hash $+(ticket.,#) 
    if $istok(%owner,$nick,32) && $2 == on && !$hget(%hash) { 
    hmake %hash 
    msg # Ticket now is open. Use !ticket <point> to join.
    }
    elseif $2 isnum && $2 > 0 && $hget(%hash) {
    var %topic $+(#,.,$nick), %point $readini(points.ini,%topic,points)
    if %point >= $2 && !%pause {
    // here script will check if %pause is not set, so script will run normal, if yes, it wont work
      var %p $calc(%point - $2)
      writeini points.ini %topic points %p 
      var %i $hget(%hash,0).item, %t $calc(%i + $2) 
      while %i < %t { inc %i | hadd %hash %i $nick }
      msg # $nick $+ , You bought $2 ticket, you now have %p points
     }
    else { msg # $nick Sorry, you only have %point points }
    }
    elseif ($nick isop #) && $2 == roll && $hget(%hash) {
    var %i $rand(1,$hget(%hash,0).data)
    msg # The winner is $hget(%hash,%i).data $+ . 
    inc -u10 %pause
    //10 is time in seconds you can choose whatever time you want, so in this way, no one  can buy tickets for 10 seconds
    }
    elseif ($nick isop #) && $2 == over && $hget(%hash) {
    hfree %hash
    }
    elseif ($nick isop #) && $2 == go && $hget(%hash) {
    unset %pause
    // if someone typed "roll" and then you want to buy more tickes, typing "go" will just unset %pause
    // you can set %pause for more time, or just an unlimmited time
    }
    }
    

    i didnt test it yet