elseif ($2 == !report) || ($2 == !pmreport) {
var %aa = 0,%bb,%cc,%dd
if ($vcmp.cmdcheck(!report,%id) == fail) !halt
elseif (!$4-) vcmp.msg %id Error - $2 <name> <reason>
elseif (%a == -1) vcmp.msg %id Error - Absent ID/Name $+ , $2 <name> <reason>
else {
vcmp.say Reporting - Name: $vcmp.name(%a) $+ , From: $vcmp.name(%b) $+ , Reason: $4-
!write vcmp.report.txt Date: $date - Time: $timestamp - Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
while (%aa <= 50) {
if ($vcmp.level(%aa) >= 4) {
if (!%bb) %bb = $vcmp.name(%aa)
elseif ($numtok(%bb,32) <= 10) %bb = %bb $vcmp.name(%aa)
elseif (!%cc) %cc = $vcmp.name(%aa)
elseif ($numtok(%cc,32) <= 10) %cc = %cc $vcmp.name(%aa)
elseif (!%dd) %dd = $vcmp.name(%aa)
elseif ($numtok(%dd,32) <= 10) %dd = %dd $vcmp.name(%aa)
}
!inc %aa
}
if (%bb) {
//tokenize 32 %bb
if ($1) vcmp.msg $vcmp.getid($1) $1 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($2) vcmp.msg $vcmp.getid($2) $2 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($3) vcmp.msg $vcmp.getid($3) $3 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($4) vcmp.msg $vcmp.getid($4) $4 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($5) vcmp.msg $vcmp.getid($5) $5 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($6) vcmp.msg $vcmp.getid($6) $6 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($7) vcmp.msg $vcmp.getid($7) $7 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($8) vcmp.msg $vcmp.getid($8) $8 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
if ($9) vcmp.msg $vcmp.getid($9) $9 $+ , Reported: $vcmp.name(%a) - From: $vcmp.name(%b) - Reason: $4-
}
}
}
UNTESTED!
Uses the tokenize identifer to split the online players up by their level. sends a report to them if they are level 4 or greater.
UNTESTED!