diff --git a/build/lisp.tcl b/build/lisp.tcl
index 29d0835c..6341df99 100644
--- a/build/lisp.tcl
+++ b/build/lisp.tcl
@@ -956,8 +956,9 @@ respond "_" "setup\r"
 respond "_" "unedit\r"
 respond "_" "\032"
 type ":kill\r"
-respond "*" ":lisp loader\r"
-respond "?" "Y\r"
-respond "?" "LLOGO\r"
-respond "?" "1700\r"
-respond "ILOPR;" ":kill\r"
+respond "*" ":lisp\r"
+respond "Alloc?" "n"
+respond "*" "(load 'loader)"
+typed  "YES\r"
+respond "?" "NLLOGO\r"
+respond "?" "1000\r"