alias -l lookUpbobcoins {
var %topic $+($chan,.,$nick)
var %bobcoins $readini(bobcoins.ini,%topic,bobcoins)
return %bobcoins
}
alias doaddbobcoins {
if ($3 !isnum) { echo 2 -st $3 isn't a number.It need to be a number. | halt }
var %topic $+($1,.,$2)
var %bobcoins $calc($readini(bobcoins.ini,%topic,bobcoins) + $3)
writeini -n bobcoins.ini %topic bobcoins %bobcoins
echo -a Added bobcoins for %topic
}
alias dorembobcoins {
var %topic $+($1,.,$2)
remini -n bobcoins.ini %topic bobcoins
echo -a Removed bobcoins for %topic
}
on *:text:!bobcoins:#:{
if ((%floodbobcoins) || ($($+(%,floodbobcoins.,$nick),2))) { return }
set -u10 %floodbobcoins On
set -u30 %floodbobcoins. $+ $nick On
if ($readini(bobcoins.ini,$+(#,.,$nick),bobcoins) > 0) {
msg # $nick e pe val,are $readini(bobcoins.ini,$+(#,.,$nick),bobcoins) bobcoins!
}
else { msg # $nick nu are nici un bobcoin! }
}
on $*:text:/!bobcoins (add|remove)/Si:#: {
if ($nick isop #)
if ($0 < 3) { msg # Prea putini parametri,foloseste !bobcoins <add|remove> <user> [numar] | return }
writeini -n bobcoins.ini $+(#,.,$3) bobcoins $calc($readini(bobcoins.ini,$+(#,.,$3),bobcoins) $iif($2 == add,+,-) $iif($4 isnum,$4,1))
msg # $nick acum are $readini(bobcoins.ini,$+(#,.,$nick),bobcoins) bobcoins.
}
on !*:join:#:{
$+(.timerbobcoins.,#,.,$nick) 0 1800 add.pts $+(#,.,$nick)
add.pts $+(#,.,$nick)
}
on !*:part:#:$+(.timerbobcoins.,#,.,$nick) off
alias -l add.pts {
writeini -n bobcoins.ini $1 bobcoins $calc($readini(bobcoins.ini,$1,bobcoins) + 0)
}
on $*:text:!bobcoinsmod:#: {
if ($nick isop #) {
msg # Cel cu cei mai multi bobcoinsi este $calc($readini(bobcoins.ini,bobcoins)
}
}
