on $*:text:/!taskai (duoti)/Si:#: {
if ((%floodduoti) || ($($+(%,floodduoti.,$nick),2))) { return }
set -u1 %floodduoti On
set -u2 %floodduoti. $+ $nick On
if ($4 < 0) { PRIVMSG $nick Skaiciu rasyk be minuso :) | return }
if ($0 < 4) { PRIVMSG $nick Klaida: Rasyk !taskai <duoti> <nick> [skaicius] | return }
var %taskai = $get.pts(#,$nick)
if (%taskai < $4) msg # $+($nick,$chr(44)) Tu turi tik %taskai tasku
else {
add.pts # $3 $4
add.pts # $nick $calc( - $4)
PRIVMSG $nick Tu davei $3 $4 tasku }
{ PRIVMSG $3 Tau $nick dave $4 tasku }
}