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