alias ScriptStuff {
var %a
var %b
var %l
var %s
var %x
var %y = $script(0)
echo -- scripts loaded: %y
%x = 1
while (%x <= %y) {
%s = $script(%x)
%b = $lines(%s)
%a = 1
echo $+(script[,%x,]) = %s
echo ----------
while (%a < %b) {
echo $+(line[,%a,]) = $read(%s,%a)
inc %a
}
echo ----------
inc %x
}
}