sub Fprint(txt$)
function Input$(prompt$)
sub tst(byref x)