alias readlbl { if $isfile($shortfn($1-)) { var %x = 1;%y = 5 | while %x <= $lines($1-) { .timer 1 %y echo -a $read($1-,%x) | inc %y 10 | inc %x } } }