home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format 121
/
af121sub.adf
/
ffchecker.lzx
/
ffchecker
/
goweb.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1981-03-11
|
958b
|
41 lines
/* FFchecker gotourl.rexx written by Gavin Mclean
** (fast@f1world.demon.co.uk)
** for use with FFchecker. */
/*--------- Enter the Path to your Browser : ----------*/
BROWSER = "dh1:internet/ibrowse/ibrowse"
/*---------- ARexx port of Browser : ---------*/
APORT = "IBROWSE"
/*--------------------------------------------*/
PARSE ARG url
OPTIONS RESULTS
url="http://www.f1world.demon.co.uk/f1gp/"
Display:
SELECT
WHEN SHOW("P", "IBROWSE") THEN Browser("IBROWSE","GOTOURL "url)
WHEN SHOW("P", "AWEB.1") THEN Browser("AWEB.1","OPEN "url)
WHEN SHOW("P", "AMOSAIC.1") THEN Browser("AMOSAIC.1","JUMP URL "url)
WHEN SHOW("P", "VOYAGER") THEN Browser("VOYAGER","GOTOURL "url)
OTHERWISE NoBrowser()
END
Browser:
PARSE ARG port,loadpage
ADDRESS(port)
loadpage
EXIT
NoBrowser:
ADDRESS COMMAND 'Run ' BROWSER
ADDRESS COMMAND "WaitForPort" APORT
Display()
EXIT