Someone

alias spam {
  set %i 0
  set %j 0
  set %output 
  while (%i < $1) {
    while (%j < $1) {
      set %output %output $+  $+ $rand(1,15) $+ , $+ $rand(1,15) $+ $2-
      inc %j
    }
    say %output
    inc %i
    set %j 0
    set %output $chr(32)
  }
}