View difference between Paste ID: T5ahvBtw and g64CHRj0
SHOW: | | - or go back to the newest paste.
1-
alias rrover { 
1+
2-
  unset %rroul | unset %rroul1 | unset %rroul2 | unset %rroulturn | unset %chamber
2+
3
    set %rroul1 $nick
4
    set %rroulturn $nick
5
    describe # $nick is ready to face another person in a russian roulette face off, type !rr to join them.
6
    .timerrroulette 1 20 endrr
7
  }
8-
    describe # $nick is ready to face another person in a russian roulette face off, type !rroulette to join them.
8+
9-
   timerrroulette 1 20 /describe # I'm afraid no-one wanted to face $nick $+ .
9+
    .timerrroulette off
10-
    timerrroulette2 1 20 /2prover
10+
11
    set %rroul on
12
    describe # $nick joins %rroul1 in a russian roulette face off! %rroul1 will go first!
13
    describe # %rroul1 loads 1 bullet, and puts the cylinder inside the revolver, and spins it around...
14
    .timer 1 1 describe # All set! Your up %rroulturn - type !shoot to play.
15
    set %rr.chamber $rand(1,6)
16-
    describe # %rroul1 loads 1 bullet, and puts the cylinder inside the revolver, and spins it around
16+
17-
    set %chamber $rand(1,6)
17+
  elseif (%rroul == on) {
18-
    timerrroulette off
18+
    describe # Sorry, you need to wait for the current game between %rroul1 and %rroul2 to be over.
19-
    timerrroulette2 off
19+
20
}
21
alias endrr {
22
  describe # I'm afraid no one wanted to play russian roulette.
23
  unset %rr*
24-
    if (( %rroulturn == $nick )) && (( %2proul1 == $nick )) {
24+
25-
      if (( %chamber == 1 )) {
25+
26-
        describe # BANG!!!
26+
27-
        describe # $nick dies so %rroul2 wins!!
27+
    var %other $iif(%rroulturn == %rroul1,%rroul2,%rroul1)
28-
        rrover
28+
    if ( %rroulturn == $nick ) {
29
      if (( %rr.chamber == 1 )) {
30
        describe # BANG!!! >> You dead.
31
        .timer 1 1 describe # $nick dies so %other wins!!
32-
        describe # $nick lives! They pass the revolver to %rroul2
32+
        unset %rr*
33-
        dec %chamber
33+
34-
        set %rroulturn %rroul2
34+
35
        describe # CLICK!!!
36
        .timer 1 1 describe # $nick lives! They pass the revolver to %other
37-
    if (( %rroulturn == $nick )) && (( %rroul2 == $nick )) {
37+
        dec %rr.chamber
38-
      if (( %chamber == 1 )) {
38+
        set %rroulturn %other
39-
        describe # BANG!!!
39+
40-
        describe # $nick dies so %rroul1 wins!!
40+
41-
        rrover
41+
    elseif ($nick == %other) {
42
      describe # Sorry $nick $+ , it's not your turn. You need to wait for $+(%rroulturn,.)
43
    }
44
    else {
45-
        describe # $nick lives! They pass the revolver to %rroul1
45+
      describe # Sorry, you need to wait for the current game between %rroul1 and %rroul2 to be over.
46-
        dec %chamber
46+
47-
        set %rroulturn %rroul1
47+
48
  else {
49
    describe # The game hasn't started. Type !rr to start russian roulette!
50
  }
51-
elseif (( $nick == %2proul1 )) && (( %2proul != on )) {
51+