alias -1 addPoints {
if ($1 !isnum) { echo 2 -st $1 is not number. | halt }
var %topic $+($chan,.,$nick)
var %points $calc($readini(Points.ini,%topic,Points) + $1)
writeini -n Points.ini %topic Points %points
return %points
}
alias -1 lookUpPoints {
var %topic $+($chan,.,$nick)
var %points $readini(Points.ini,$topic,Points)
return %points
}
alias doaddpoints {
if ($3 !isnum { echo 2 =st $3 není číslo. Hodnota musí být číslo. | halt }
var %topic $+($1,.,$2)
var %points $calc($readini(Points.ini,%topic,Points) + $3)
writeini -n Points.ini %topic Points $points
echo -a Added points for %topic
}
alias dorempoints {
var %topic $+($1,.,$2)
remini -n Points.ini %topic Points
echo -a Removed points for %topic
}
on *:TEXT:!points:#: {
msg # $nick má právě $readini(Points.ini,$+(#,.,$nick),Points) bodů.
}
on *:TEXT:!pointlist:#: {
msg # I CANT EVEN MAKE THIS :(
}
on $*:text:/!points (add|remove)/Si:#:{
if ($nick isop #) {
if ($0 < 3) { msg # Špatný paremetr: příkaz je !points <add|remove> <user> [number] | return }
writeini -n Points.ini $+(#,.,$3) Points $calc($readini(Points.ini,$+(#,.,$3),Points) $iif($2 == add,+,-) $iif($4 isnum,$4,1))
{ msg $chan $3 má právě $readini(Points.ini,$+(#,.,$3),Points) bodů. )
}
else {msg $chan Tento příkaz je povolen pouze moderátorům. }
}
on !*:join:#:{
$+(.timerpoints.,#,.,$nick) 0 300 add.pts $+(#,.,$nick)
add.pts $+(#,.,$nick)
}
on !*:part:#:$+(.timerpoints.,#,.,$nick) off
alias -l add.pts {
writeini -n Points.ini $1 Points $calc($readini(Points.ini,$1,Points) + 1)
}