/* Linkup script for Miami */

if ~show('L','rexxsupport.library') then do
	if addlib('rexxsupport.library',0,-30,0) then nop
	else do
		call showerror('This script needs the rexxsupport.library to work properly.  This file can be found on your original Workbench 2+ disks and should be placed in Libs:')
		exit 20
	end
end

if ~show('P','MIAMI.1') then do
        Address COMMAND	
        'Run <>NIL: Miami DEBUG=5'
	do until show('P','MIAMI.1')
		call delay(50)  /* needs rexxsupport.library */
	end
end

Address COMMAND
'Sys:RexxC/WaitForPort MIAMI.1'
'Wait 1 Secs'

Address MIAMI.1
'ONLINE'
exit