home *** CD-ROM | disk | FTP | other *** search
/ Amiga ACS 1998 #4 / amigaacscoverdisc1998-041998.iso / utilities / shareware / comm / ibrowsescripts / rexx / showmiami.ibrx < prev   
Encoding:
Text File  |  1980-02-04  |  469 b   |  26 lines
  1. /* ShowMiami Sören Forsberg 1998 */
  2. /*
  3.    If not running, starts and show  miami and inhibits the auto-online setting
  4.    If running un-iconifies and brings to front ( if the calling window is in front)
  5. */
  6.   ADDRESS 'COMMAND'
  7.  
  8.  
  9.  
  10.  
  11.     IF ~SHOW('Ports','MIAMI.1') THEN DO
  12.       ADDRESS 'COMMAND'
  13.       'Run MIAMI:Miami DONTCONNECT SETTINGS miami:miami.default'
  14.       'SYS:RexxC/WaitForPort MIAMI.1'
  15.  
  16.     END
  17.  
  18.  
  19.     IF SHOW('Ports','MIAMI.1') THEN DO
  20.       ADDRESS 'MIAMI.1'
  21.      
  22.       'SHOW'
  23.     END
  24.  
  25.  
  26.