on *:text:!test:#: {
timer.PlayerNo 1 125 msg # $lines(Name.txt) people are taking part.
timer.Time 1 150 HowMany #JB_uk
}
alias HowMany {
if ($lines(Name.txt) == 1) goto oneplayer
elseif ($lines(Name.txt) == 2) goto twoplayers
elseif ($lines(Name.txt) == 3) goto threeplayers
elseif ($lines(Name.txt) == 4) goto fourplayers
elseif ($lines(Name.txt) == 5) goto fiveplayers
elseif ($lines(Name.txt) == 6) goto sixplayers
:oneplayer
OnePlayer
:twoplayers
msg # There are Two Players in the game.
:threeplayers
msg # There are Three Players in the game.
:fourplayers
msg # There are Four Players in the game.
:fiveplayers
msg # There are Five Players in the game.
:sixplayers
msg # There are Six Players in the game.
}
alias OnePlayer {
var %rn1 $rand(1,6)
if (%rn1 == 1) {
msg $chan Very good
}
if (%rn1 == 2) {
msg $chan It went ok I guess.
}
if (%rn1 == 3) {
msg $chan It went very well for you.
}
if (%rn1 == 4) {
msg $chan It went well for you
}
if (%rn1 == 5) {
msg $chan It didn't go as planned.
}
if (%rn1 == 6) {
msg $chan It didn't go well for you.
}
}