.; ini.cmd - install a utility into the system task directory
.; p1	name of the prototype task		...foo
.; p2	where to look to find task		$foo
.; p3	what the task is
.; #1	a command file to be run to clean up what we did
	.enable substitution
	.enable escape
.retry:
	.ifins 'p1' .exit <succes>
	ins 'p2'/task='p1'
	.if <exstat> = <succes> .goto ok
	; PROBLEM -- I wanted to use task 'p1' but I couldn''t find it
	; I need it for 'p3'
	.asks junk type <ESCAPE> to continue regardless, <RETURN> to retry
	.ift <escape> .goto banzai
	; PAUSING so you can correct problem before retrying
	.pause
	.goto retry
.banzai:
.ok:
	.data #1 rem 'p1'
	.exit <succes>
