Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re: Re: Re: Play mp3 by perl.

by IndyZ (Friar)
on Apr 01, 2002 at 23:41 UTC ( [id://155880]=note: print w/replies, xml ) Need Help??


in reply to Re: Re: Play mp3 by perl.
in thread Play mp3 by perl.

I'm afraid the code disappeared with most of my other projects in the Great Grinding Hard Drive Crash. The project itself was pretty simple and shouldn't be hard to reimplement.

I just used a flat text file with lines in the format of "DAY:HH:MM", so for example, "FRI:5:45" for Friday at 5:45 AM. The program ran as in infinite loop, sleeping 45 seconds at a time, then running through and comparing the times in the configuration file to the current time. If it found a match it would jump into playback mode.

In this mode, a file was selected (hardcoded) and the volume reduced to zero. It would also unlink the file ~/.alarm if it existed. The playback loop would then begin, incrementing the volume slowly until either ~/.alarm was created or the volume was at 100% for a full minute. The program would then reset the volumn to a normal level, stop play, and reenter the main loop.

I had an icon on my desktop that ran "touch ~/.alarm", so all that I had to do was turn on the monitor and click on it.

--
IndyZ

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://155880]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (7)
As of 2024-04-25 16:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found