.enable substitution.sets uic <uic>.parse uic "," group prog.gosub 100 dirfnd.mac;40.gosub 100 micro.mac;2.exit.100:	.parse comman ".;" file ext ver junk	.open 'file'.slp	.data 'comman'/au/-bf=[50,10]'file'.'ext';1	.closediff/ou='file'.slp/sl:dle001 [50,10]'file'.'ext' 'uic''comman'	.testfile 'file'.slp;2	.if <filerr> ne 1 .goto 200	append 'file'.slp;2 'file'.slp;1	delete 'file'.slp;2	.return.200:	delete 'file'.slp;*	; File 'comman' invalid differences	.return