Jump to content
phil-alex

record webstream

Recommended Posts

phil-alex

Hey everyone, 

I've looked through pages and pages and tried about 20 different scripts, but nothing is working. 

 

I'm trying to open Vlc  

Run("C:\Program Files (x86)\VideoLAN\VLC\vlc.exe"), "", @SW_MAXIMIZE)

 Send("^N")

MemoWrite(" http://128.100.197.46:80/ ")
Send("{ENTER}")

Run("\Program Files\Audacity\audacity.exe", "", @SW_MAXIMIZE)

Send("+t")
    Send("{ENTER}")
    Send("{TAB 3}")
       MemoWrite("Result 1: "  _Date_Time_DOSDateTimeToFileTime(0x3621, 0x11EF))
   Send("{ENTER}")

 

 

I've tried many different variations, including using the @programFilesDir function... directly going to "Audacity.exe" (like the example in the help files using Notepad.exe)

 

any help?

 

Thanks,

Phil

Share this post


Link to post
Share on other sites
JLogan3o13

@phil-alex welcome to the forum. You will find that comments such as "it's broke, help" don't elicit a lot of help from the community. Please explain where you're having problems - does VLC launch? MemoWrite isn't used much anymore, which version of AutoIt are you using? Does the Send work?

As you can see, the more information you provide, the better we can assist.


√-1 2^3 ∑ π, and it was delicious!

Share this post


Link to post
Share on other sites
aa2zz6

Maybe include a WinWait or a sleep() so that the Send("^N") isn't automatically running before the program is fully loaded.

 

Run("", "", @SW_MINIMIZE)
Opt("WinTitleMatchMode", 2)
WinWait("")
sleep()
WinSetState("", "", @SW_MINIMIZE)

 

Edited by aa2zz6

Share this post


Link to post
Share on other sites
phil-alex
13 hours ago, JLogan3o13 said:

@phil-alex welcome to the forum. You will find that comments such as "it's broke, help" don't elicit a lot of help from the community. Please explain where you're having problems - does VLC launch? MemoWrite isn't used much anymore, which version of AutoIt are you using? Does the Send work?

As you can see, the more information you provide, the better we can assist.

The real issue I'm having is that the script isn't working at all... and it was working not 2 months ago.

 

I have Autoit V3.

My problems were that it worked before, I updated both audacity and vlc and now nothing works.

Send did work previously, and the memowrite I saw in the help section.

 

 

Share this post


Link to post
Share on other sites
phil-alex
13 hours ago, aa2zz6 said:

Maybe include a WinWait or a sleep() so that the Send("^N") isn't automatically running before the program is fully loaded.

 

Run("", "", @SW_MINIMIZE)
Opt("WinTitleMatchMode", 2)
WinWait("")
sleep()
WinSetState("", "", @SW_MINIMIZE)

Good call

 

Share this post


Link to post
Share on other sites
nend

Why dont you use inetget to retrieve the stream, shoutcast streams are mp3 streams and you can download them and play them without converting them.

Share this post


Link to post
Share on other sites
phil-alex
14 hours ago, nend said:

Why dont you use inetget to retrieve the stream, shoutcast streams are mp3 streams and you can download them and play them without converting them.

good idea, but it's a stream only. They don't save the shows, but I don't get to hear the show almost ever because of the nature of my work... which is why I want to record the stream.

Share this post


Link to post
Share on other sites
phil-alex

does any body know how to input the date?

 

for example, 

I want to type 

 Send("Drill Squad - ***")

 

the *** is the current date. For example Nov, 1, 2017 or something like that.

 

;VLC Portion
   Run(@HomeDrive & '\Program Files (x86)\VideoLAN\VLC\vlc.exe', "", @SW_MAXIMIZE)
   WinWait("[CLASS:audacity]", "", 5)
      Send("^{n}")
      Send("http://128.100.197.46:80/")
      WinWait("[CLASS:vlc]", "", 1)
      Send("{ENTER}")

         ;Audacity Portion
   Run(@ScriptDir & '\audacity.exe', "", @SW_MAXIMIZE)

    
    WinWait("[CLASS:audacity]", "", 5)

    Send("+t")
    Send("{TAB 4}")
   Send("{ENTER}")
   WinWait("[CLASS:audacity]", "", 3)
   Send("Drill Squad -")
   Send("{ENTER}")
   WinWait("[CLASS:audacity]", "", 1)
   Send("{ENTER}")
   Send("{TAB}")
   Send("{ENTER}")

 

Thanks

Share this post


Link to post
Share on other sites
1957classic

See if this works for you.

 

Send("Drill Squad - " & @MON & "-" & @MDAY & "-" & @YEAR)

 

  • Like 1

Share this post


Link to post
Share on other sites
nend
10 hours ago, phil-alex said:

good idea, but it's a stream only. They don't save the shows, but I don't get to hear the show almost ever because of the nature of my work... which is why I want to record the stream.

good idea, but it's a stream only
What do you mean with this?
You can record the stream realtime with inetget Just use this 

InetGet("http://128.100.197.46:80/", @ScriptDir & "\Record.mp3")

You can also download it on the background (see the help file for inetget)
 

You can also use my software http://trayradio.com/UK/ to insert you own stream and play and record it.

Edited by nend
  • Like 1

Share this post


Link to post
Share on other sites
phil-alex
6 hours ago, nend said:

good idea, but it's a stream only
What do you mean with this?
You can record the stream realtime with inetget Just use this 

InetGet("http://128.100.197.46:80/", @ScriptDir & "\Record.mp3")

You can also download it on the background (see the help file for inetget)
 

You can also use my software http://trayradio.com/UK/ to insert you own stream and play and record it.

Hey, 

 

So I didn't mean anything by that. Since I'm new to scripting and learning about it from this forum, YouTube and the help files, I don't really know a whole lot. So, from the help file it just seemed like it could only be used as a auto download. I didn't know I didn't know there was a record function. 

 

Thanks for the though. I'll try it out later on. 

:)

Share this post


Link to post
Share on other sites
phil-alex
12 hours ago, 1957classic said:

See if this works for you.

 

Send("Drill Squad - " & @MON & "-" & @MDAY & "-" & @YEAR)

 

Looks good, I'll try it later on tonight. 

 

Thanks! 

Share this post


Link to post
Share on other sites
phil-alex
18 hours ago, 1957classic said:

See if this works for you.

 

Send("Drill Squad - " & @MON & "-" & @MDAY & "-" & @YEAR)

 

That's the ticket!!!!

 

perfect. Now I just have to get the computer to turn on at a specific time lol... Google here I come.

 

Thanks again!

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×