pirproom.cmd

# Bestow pirps on the whole room
#
# Usage:
#  .pirproom #
#  default is 1
#
# By Hanryu
# Please report any bugs to #Hanryu0052 (discord) or [email protected]
# This script may be reused in whole or in part as long as credit is given
#https://pastebin.com/aJmqKRJC
# 2024-10-03
#   change from $roomplayers to also here to avoid huge crowds messing up the var
debug 10

var points 3
if_1 then {var points %1}

send set roombrief
waitfor Ok.
send look
waitforre Also here: (.+)\.
var names $1

if %names == "" then goto end
eval names replacere("%names", "Also here: ", "")
eval names replacere("%names", ", ", "|")
eval names replacere("%names", " and ","|")
eval names replacere("%names", "\.","")
eval names replacere("%names", " \(\w+\)", "")
eval names replacere("%names", "[\w'-]+ ", "")
eval names replacere("%names", "\|", " ")
send .pirp %points %names
end:
exit