Untitled

on $*:TEXT:*:#LVP.echo: {
  if ($regex($1-,/\*\*\* (.+) has bought the property (.+)!/Si) > 0) {
    set %propUser = $regml(1)
    set %propName = $regml(2)
    set %list $+ %propUser = empty;
    if(%list [ $+ [ $propUser ] ] == empty) {
      set %list $+ %propUser = %propName
    } else {
      set %list $+ %propUser = %list [ $+ [ $propUser ] ] $+ , %propName
    }
    echo List from %propUser $+ : %list [ $+ [ %propUser ] ] (Last Official message: $1- $+ )
  }
}