on *:TEXT:!bonusall:#testchannel: {
var %n = $nick(#,0)
var %i = 1
while (%i <= %n) {
var %nick = $nick(#,%i)
set %points $calc( $readini(Points.ini,n,$+(,#,.,%nick),Points) + 500 )
/writeini -n Points.ini $+(,#,.,%nick) Points %points
inc %i
}
{ msg $chan Everyone has been given 500 points! }
}