linput "なまえをにゅうりょくしてください> "; name$ t$=format$("%s でよろしいですか", name$) talk t$ linput t$;yn$ とか?