record webstream

[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

[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.

[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 October 31, 2017 by aa2zz6

[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.

 

 

[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

 

[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.

[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.

[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

[1957classic]

See if this works for you.

 

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

 

[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 November 2, 2017 by nend

[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. 

[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! 

[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!