Russ, I don't think your code:
>> How do I stop the Autocad text window from appearing when I run my lisp?
>> (setq InsPt (getpoint "\nSelect insertion point : "))
is the problem.
You maybe called the units command ?? This brings up the text screen.
Use the code:
(graphscr)
to go to force the graphics screen.
Use:
(textscr)
to go to force the text screen.
I hope this helps !