Youtube_Play ActiveX Videolan

Compartilhe seus scripts, funções, ferramentas e programas

Moderator: Gio

garry
Posts: 1902
Joined: 22 Dec 2013, 12:50

Youtube_Play ActiveX Videolan

31 Dec 2018, 15:48

;- ActiveX example for videolan (vlc.exe)
;- Play Youtube-Video ( if allowed to embed )

Code: Select all

;- modified = 20190106  - added 2nd letras
;- created  = 20181231
;- ActiveX example for videolan (vlc.exe)
;- Play Youtube-Video ( if allowed to embed )
;------------------------------------------------------
setworkingdir,%a_scriptdir%
Filename1=VLCPlugin_Youtube-Play    ;- only videos allowed for embed
Gui,2:default
Gui,2:-border
Gui,2: -DPIScale
Gui,2: Color, Black,Black 

;id1=iCKMzrPy4t4;aquela janela virada pro mar
;id1=_b9R_x_imBM;ROMANIA Drumul Transfăgărășan 
id1=9KrYzzpHgrY;Dia da espiga / A Rua dos Meus Ciúmes - Anabela
;id1=sraZaL6jylM;Lilian de Celis-El Relicario
stringsplit,c,id1,`;
F1=https://www.youtube.com/watch?v=%c1%
gosub,text1

wa:=A_screenwidth
ha:=A_screenHeight
xx:=101
LW:=(wa*88)/xx ,LH:=(ha*88)/xx,wm:=(wa*88.7)/xx,hm:=(ha*90)/xx,GW:=(wa*99.5)/xx,GH:=(ha*96)/xx  
x1:=(wa*1.5)/xx,y1:=(ha*2) /xx,x2:=(wa*1.2) /xx,y2:=(ha*1) /xx
;vlc1        =%A_programfiles%\VideoLAN\VLC\vlc.exe    ;- check path for vlc.exe
;xxa=Shell.Explorer     ;- IExplorer
;xxa=Mozilla.Browser    ;- Mozilla Firefox
xxb=VideoLAN.VLCPlugin.2
;-- picture/text --
xp:=(wa*90.3)/xx,yp:=(ha* 1.8)/xx,wp:=(wa* 8.4)/xx,hp:=(ha*88.9)/xx
GUI,2:Font,s11 cYellow,Lucida Console
   Gui,2:Add,ActiveX, x%x1% y%y1% w%lw%  h%lh% vVlcx,%xxb%
   Gui,2:Add,Edit, x%xp% y%yp% w%wp%  h%hp% -hscroll -vscroll vEd1,%e1%
   Gui,2:add,GroupBox,x%x2% y%y2% w%WM% h%HM%
GUI,2:Font,s14 cGray,Lucida Console
y:=(ha*92)/xx  
Gui,2:Add,Text,x%x2% y%y% , %c2%   ( use ESC to quit )
Gui,2:Add,text,x0 y0 h0 w0 vT1
Gui,2:Show,x0 y0 w%gw% h%gh%,%filename1%
GuiControl,2: Focus,T1
vlcx.playlist.add(F1,"","""""")
vlcx.playlist.next()
settimer,aas1,165000
return
2Guiclose:
exitapp
esc::exitapp
;--------------
aas1:
gosub,text2
Guicontrol,2:,ed1,%e2%
settimer,aas1,off
return
;-------------
text1:
e1=
(

Óh! Ih! Oh! Ai!
Esta vida é uma cantiga
E este dia d' alegria
Vale um ano d' aflição

Óh! Ih! Oh! Ai!
Porque este dia da espiga
É o arauto do dia
Em que o trigo há-de dar pão!

Jorra o vinho dos pichéis
Para os lábios das moçoilas
Mais vermelhas que papoilas
Co'as larachas dos Manéis

Há merendas pelos prados
Gargalhadas pelo ar
E à beirinha dos valados
Ouve a gente murmurar

Maria, são teus olhos azeitonas!
Cachopa, são teus lábios qual cereja!
E os teus seios, cachos d'uvas que abandonas
À vindima desta boca que os deseja!

Tomam todos os caminhos
Um sabor de romaria
E até mesmo os pobrezinhos
Fingem ter alegria

E, na volta, já sentindo
Que foi tudo um sonho em vão
Inda há ecos, repetindo
Pelo espaço esta canção

Maria, são teus olhos azeitonas!
Cachopa, são teus lábios qual cereja!
E os teus seios, cachos d'uvas que abandonas
À vindima desta boca que os deseja!
)
return

text2:
e2=
(


Na rua dos meus ciúmes
Onde eu morei e tu moras
Vi-te passar fora de horas
Com a tua nova paixão

De mim não esperes queixumes
Quer seja desta ou daquela
Pois sinto só pena dela
E até lhe dou o meu perdão
Na rua dos meus ciúmes
Deixei o meu coração

Saudades são fé perdida
São folhas mortas ao vento
E eu piso sem um lamento
Na tua rua ao passar
E ainda que me custe a vida
Não há-de-ver-me chorar
Na rua dos meus ciúmes

Deixei o meu coração.
)
return
;============ END script Youtube PLAY =====================================

Return to “Scripts e Funções”

Who is online

Users browsing this forum: No registered users and 22 guests