summaryrefslogtreecommitdiff
path: root/frontends/amiga/dist/Rexx/YT_play.nsrx
blob: a8e29162f67b2cec3f49a2b1d0721f7ecaff28c2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
/* YT play.nsrx by Chris Handley
   This script auto-plays a YouTube video using YT (OS4Depot:video/misc/yt.lha)
*/

options results

if ~open('yt','AppDir:YT','R') then do
	GETSCREENNAME
	address command 'requestchoice >NIL: "NetSurf" "YT must be installed for this script to function.*n*nIt can be downloaded from OS4Depot:video/misc/yt" "OK" PubScreen='||result
	OPEN 'http://os4depot.net/?function=showfile&file=video/misc/yt.lha' NEWTAB ACTIVE		/* This doesn't work due to a NetSurf(?) bug */
	exit
end
close('yt')

GETURL
/*address command 'requestchoice >NIL: "TEST" "'||result||'" "OK"'*/
address command 'AppDir:YT <>CON:0/30/640/256/YT/AUTO/CLOSE "'||result||'" AutoPlay'

/*TOBACK*/		/* ideally we'd bring Workbench to front */