open "x.x" for input as file 1
	open "z.x" for output as file 2, recordtype list, recordsize 250

	ps$ = '<a href="ftp://moto:x@vax2.winona.msus.edu/faces/'
	pe$ = "</a>"

	print #2%, "<PRE>"
	when error use done
	until HellFreezesOver%
		linput #1%, a$
		a$ = edit$(a$,128%)
		a$ = left$(a$+space$(24%),24%)
		print #2%, ps$ + a$ + '">'+a$+ pe$,
	next
	end when
	handler done
	print #2%, "</PRE>"
	close 1,2
	end handler