| Make Tape formatter/cataloger
|
If "<ZMac$Dir>" = "" Then Error 0 !ZMac not seen
Set Here$Dir <Obey$Dir>
Echo Assembling
X Access <Here$Dir>.TapeBlock wr/r
Run <ZMac$Dir>.ZMac -o <Here$Dir>.TapeBlock -x <Here$Dir>.out/lst <Here$Dir>.TapeBlk/s
SetLoad <Here$Dir>.TapeBlock 3FDE8
SetExec <Here$Dir>.TapeBlock 3FDE8
Access <Here$Dir>.TapeBlock r/r