• For question 1:

    Code:
    $regsubex($spacerep($gettok(%temp,2,166)), /(?<=^|\s)(\d+)(?=\s|$)/g, -\1-)


  • For question 2:

    I think what you're looking for is $readn. eg.
    Code:
    if ($read(dir/bla.txt, w, $+(*,$nick,*))) { echo -a $nick in line $readn }

Spelling mistakes, grammatical errors, and stupid comments are intentional.