| Make Spectrum Printout Routines
|
If "<ZMac$Dir>" = "" Then Error 0 !ZMac not seen
Set Here$Dir <Obey$Dir>
Dir <Here$Dir>
Echo Assembling
X Access <Here$Dir>.Printout wr/r
X Access <Here$Dir>.Print/tap wr/r
Run <ZMac$Dir>.ZMac -o <Here$Dir>.Printout -x <Here$Dir>.out/lst <Here$Dir>.PRINTF0/s
SetSpec <Here$Dir>.Printout
ZX.MkTAP <Here$Dir>.Print/tap <Here$Dir>.PRINTOUT PRINTOUT
ZX.MkTAP <Here$Dir>.Print/tap <Here$Dir>.^.^.Harston.Testfiles.MDump MDUMP -append
Access <Here$Dir>.Printout r/r
Access <Here$Dir>.Print/tap r/r