alias qnotice { var %:q = 1 | while %:q <= $query(0) { var %:y = 1 | while %:y <= $lines(text.txt) { .notice $query(%:q) $read(text.txt,%:y) | inc %:y } | inc %:q } }