View difference between Paste ID: hTYe2GYw and 5fuvD7f6
SHOW: | | - or go back to the newest paste.
1
on *:TEXT:!buyherz &:#:{
2-
  if (%raffle == 1) {
2+
  if (!%raffle) { msg $chan Raffle is currently closed! }
3-
    if ($2 > 10) {
3+
  else {
4-
      msg $chan Sorry $nick but you can only buy up to 10 Herz at a Time.
4+
    if ($int($2) < 1) { msg $chan Do you really want to buy no Herz, $nick $+ ..? }
5
    elseif ($int($2) > 10) { msg $chan Sorry $nick but you can only buy up to 10 Herz at a Time. }
6-
    if ($2 < 11) {
6+
    else {
7-
      var %i = 0
7+
      var %i = 0, %ticket = $int($2)
8-
      var %ticket = $2
8+
      var %topic = $+(#,.,$nick), %user = $readini(Points.ini,%topic,Points), %end = 10 * %ticket, %delete = %user - %end
9-
      var %topic = $+(#,.,$nick)
9+
10-
      var %user = $readini(Points.ini,%topic,Points)
10+
        writeini -n $qt(Points.ini) %topic Points %delete
11-
      var %end = 10 * %ticket
11+
12-
      var %delete = %user - %end
12+
          write $qt(Raffle.txt) $nick
13
          inc %i
14-
        writeini -n Points.ini %topic Points %delete
14+
15
        msg $chan $nick you have bought %ticket Herz with %end Beatz.
16-
          write Raffle.txt $nick
16+
17-
          %i = %i + 1
17+
18
  }
19
}
20
on *:TEXT:!raffle &:#:{
21
  if ($nick isop #) {
22
    if (($2 == open) && (!%raffle)) || (($2 == close) && (%raffle))  {
23-
  if (%raffle == 0) {
23+
      msg $chan RAFFLE IS NOW $replace($upper($2!!),CLOSE,CLOSED)
24-
    msg $chan Raffle is currently closed!
24+
      if ($2 == open) { set %raffle 1 }
25
      else unset %raffle
26
      write -c $qt(Raffle.txt)
27-
on *:TEXT:*:#:{
27+
28-
  if ($1 = !raffle) && ($2 == open) {
28+
29-
    if ($nick isop #) {
29+
30-
      if (%raffle == 0) {
30+
on *:TEXT:!roll:#:{
31-
        msg $chan RAFFLE IS NOW OPEN!!
31+
  if ($nick isop #) && (%raffle) {
32-
        set %raffle 1
32+
    msg $chan RAFFLE IS NOW BEING ROLLED, GOOD LUCK!!
33-
        write -c Raffle.txt
33+
    .timerCD 1 3 msg $chan /me $!calc( $!timer(CD).reps + 1 ) $!+ !
34
    .timer 1 4 msg $chan AND THE WINNER IS:
35
    .timer 1 5 msg $chan $read(Raffle.txt, n)
36
    unset %raffle
37-
  if ($1 = !raffle) && ($2 == close) {
37+
    write -c $qt(Raffle.txt)
38-
    if ($nick isop #){
38+
39-
    if (%raffle == 1){
39+