diff --git a/Makefile b/Makefile
index d7902095..fa902186 100644
--- a/Makefile
+++ b/Makefile
@@ -1,6 +1,6 @@
 EMULATOR ?= simh
 
-SRC = system syseng sysen1 sysen2 sysnet kshack midas _teco_ rms klh
+SRC = system syseng sysen1 sysen2 sysnet kshack midas _teco_ rms klh dragon channa
 MINSYS = _ sys sys3 device
 RAM = bin/boot/ram.262
 NSALV = bin/boot/salv.rp06
diff --git a/build/build.tcl b/build/build.tcl
index 76258831..84fa6077 100644
--- a/build/build.tcl
+++ b/build/build.tcl
@@ -215,11 +215,36 @@ respond "*" ":midas device;jobdev arc_syseng;arcdev\r"
 expect ":KILL"
 respond "*" ":link device;jobdev ar,device;jobdev arc\r"
 
-respond "*" ":print channa;..new. (udir)\r"
 respond "*" ":midas channa;atsign taraka_syseng; dragon\r"
 expect ":KILL"
 respond "*" ":link sys; atsign dragon,channa; atsign taraka\r"
 
+respond "*" ":midas channa;rakash dmpcpy_syseng; dmpcpy\r"
+expect ":KILL"
+
+respond "*" ":midas channa;rakash modems_syseng; modems\r"
+expect ":KILL"
+respond "*" ":link channa;ts modems,channa;rakash modems\r"
+
+respond "*" ":midas channa;rakash netime_sysen1; netime\r"
+expect ":KILL"
+respond "*" ":link channa;ts netime,channa;rakash netime\r"
+
+respond "*" ":link dragon;hourly modems,channa;ts modems\r"
+
+# sources dump tape now creates dragon directory and populates
+# with an initial dragon; dragon hoard file, which is required
+# by PFT
+#
+# respond "*" ":print dragon;..new. (udir)\r"
+#
+respond "*" ":midas dragon;rakash pfthmg_syseng; pft\r"
+respond "mcp=" "0\r"
+expect ":KILL"
+respond "*" ":link channa; rakash pfthmg,dragon; rakash pfthmg\r"
+
+respond "*" ":link sys; ts p,sys; ts peek\r"
+
 respond "*" $emulator_escape
 create_tape "out/output.tape"
 type ":dump\r"