; DEMUNPACK ; ========= ; ; .; Command file to unpack the demonstration programs out of the relevant .; library. It takes as input [if used with DLV1] whether or not the .; Symbolic Debugger is required. .; .enable substitution ; .if p1 eq "" .ask DBG Has the Symbolic Debugger been delivered. .if p1 eq "DBG" .sett DBG .if p1 eq "NODBG" .setf DBG ; .if p2 eq "" .asks LIBDIR Name/UIC of RTL/2 library directory .if p2 ne "" .sets LIBDIR p2 ; ; Unloading all common non Debugger files ; lbr dcaltk.cmd=demlibcmd.ulb/ex:dcaltk lbr dcl1tk.cmd=demlibcmd.ulb/ex:dcl1tk lbr dcl2tk.cmd=demlibcmd.ulb/ex:dcl2tk lbr dcomlv.cmd=demlibcmd.ulb/ex:dcomlv lbr dcomtk.cmd=demlibcmd.ulb/ex:dcomtk lbr demcal.cmd=demlibcmd.ulb/ex:demcal lbr demclk.cmd=demlibcmd.ulb/ex:demclk lbr demcom.cmd=demlibcmd.ulb/ex:demcom lbr learn.cmd=demlibcmd.ulb/ex:learn lbr lrntk.cmd=demlibcmd.ulb/ex:lrntk lbr iddemo.cmd=demlibcmd.ulb/ex:iddemo lbr fppdemo.cmd=demlibcmd.ulb/ex:fppdemo lbr rmsbld.cmd=demlibcmd.ulb/ex:rmsbld lbr rmstst.cmd=demlibcmd.ulb/ex:rmstst ; lbr dcalm.cnd=demlibsrc.ulb/ex:dcalm lbr dcalp.cnd=demlibsrc.ulb/ex:dcalp lbr learn.rtl=demlibsrc.ulb/ex:learn lbr demcl1.rtl=demlibsrc.ulb/ex:demcl1 lbr demcl2.rtl=demlibsrc.ulb/ex:demcl2 lbr demcom.rtl=demlibsrc.ulb/ex:demcom lbr iddemo.rtl=demlibsrc.ulb/ex:iddemo lbr fppdemo.rtl=demlibsrc.ulb/ex:fppdemo lbr rmstst.cnd=demlibsrc.ulb/ex:rmstst lbr rsxrms.cnd=demlibsrc.ulb/ex:rsxrms lbr rtlxrf.xrf=demlibsrc.ulb/ex:rtlxrf .iff DBG .goto dundbg ; ; Common Debugger modules. ; lbr debug.cmd=demlibcmd.ulb/ex:debug lbr exampl.cmd=demlibcmd.ulb/ex:exampl lbr mytask.cmd=demlibcmd.ulb/ex:mytask lbr debug1.rtl=demlibsrc.ulb/ex:debug1 lbr debug2.rtl=demlibsrc.ulb/ex:debug2 lbr test4.rtl=demlibsrc.ulb/ex:test4 .; .dundbg: ; ; Create common task build file ; .open #1 demetc.cmd .data #1 'LIBDIR'rtlrtsrsx/lb:rsxba1:stream .data #1 'LIBDIR'rsxio/lb,rtlrtsrsx/lb .data #1 'LIBDIR'rtlexc/lb .data #1 'LIBDIR'rtlrtsrsx/lb .close #1 ; ; End of library extractions. ;