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 | + |