diff --git a/build/misc.tcl b/build/misc.tcl
index 86d42746..d73f17db 100644
--- a/build/misc.tcl
+++ b/build/misc.tcl
@@ -1,5 +1,18 @@
 log_progress "ENTERING BUILD SCRIPT: MISC"
 
+respond "*" ":midas /t sysbin; midas 324bin_midas; midas 324\r"
+respond "\n" "itssw==1\r"
+respond "\n" "ptr==100\r"
+respond "\n" "ldbi=ildb\r"
+respond "\n" "dpbi=idpb\003"
+expect ":KILL"
+
+respond "*" ":job midas\r"
+respond "*" ":load sysbin; midas 324bin\r"
+respond "*" "purify\033g"
+respond "TS MIDAS" "midas;ts 324\r"
+respond "*" ":kill\r"
+
 respond "*" ":print teach;..new. (udir)\r"
 type ":vk\r"
 
diff --git a/build/muddle.tcl b/build/muddle.tcl
index 9a4a3c94..c73f58f1 100644
--- a/build/muddle.tcl
+++ b/build/muddle.tcl
@@ -1,19 +1,6 @@
 log_progress "ENTERING BUILD SCRIPT: MUDDLE"
 
 respond "*" ":cwd mudsys\r"
-respond "*" ":midas /t midasm_midas\r"
-respond "\n" "itssw==1\r"
-respond "\n" "ptr==100\r"
-respond "\n" "ldbi=ildb\r"
-respond "\n" "dpbi=idpb\003"
-expect ":KILL"
-
-respond "*" ":job midasm\r"
-respond "*" ":load midasm bin\r"
-respond "*" "purify\033g"
-respond "TS MIDAS" "mudsys;ts midasm\r"
-respond "*" ":kill\r"
-
 respond "*" ":midas ts stinkm_stink\r"
 expect ":KILL"
 
diff --git a/src/mudsys/midas.324 b/src/midas/midas.324
similarity index 100%
rename from src/mudsys/midas.324
rename to src/midas/midas.324
diff --git a/src/mudsys/assem.xfile b/src/mudsys/assem.xfile
index f0df8adb..06b8dccb 100644
--- a/src/mudsys/assem.xfile
+++ b/src/mudsys/assem.xfile
@@ -1,38 +1,38 @@
 :Build TS MDL for ITS
-:midasm pure
-:midasm specs
-:midasm const
-:midasm ldgc
-:midasm utilit
-:midasm uuoh
-:midasm mudits
-:midasm mappur
-:midasm core
-:midasm atomhk
-:midasm interr
-:midasm nfree
-:midasm gchack
-:midasm readch
-:midasm agcmrk
-:midasm reader
-:midasm print
-:midasm bufmod
-:midasm arith
-:midasm maps
-:midasm primit
-:midasm stbuil
-:midasm eval
-:midasm decl
-:midasm main
-:midasm mudsqu
-:midasm fopen
-:midasm putget
-:midasm create
-:midasm save
-:midasm ipc
-:midasm agc
-:midasm amsgc
-:midasm initm
+:midas;324 pure
+:midas;324 specs
+:midas;324 const
+:midas;324 ldgc
+:midas;324 utilit
+:midas;324 uuoh
+:midas;324 mudits
+:midas;324 mappur
+:midas;324 core
+:midas;324 atomhk
+:midas;324 interr
+:midas;324 nfree
+:midas;324 gchack
+:midas;324 readch
+:midas;324 agcmrk
+:midas;324 reader
+:midas;324 print
+:midas;324 bufmod
+:midas;324 arith
+:midas;324 maps
+:midas;324 primit
+:midas;324 stbuil
+:midas;324 eval
+:midas;324 decl
+:midas;324 main
+:midas;324 mudsqu
+:midas;324 fopen
+:midas;324 putget
+:midas;324 create
+:midas;324 save
+:midas;324 ipc
+:midas;324 agc
+:midas;324 amsgc
+:midas;324 initm
 :
 To link and initialize:
 	:stinkm