Jump to content
CYCho

zPlayer - My own little audio/video player

Recommended Posts

zPlayer is the name I used when I introduced the early version of this player in my blog back in early 2009 and, therefore, has nothing to do with the mobile media player of the same name which started marketing in 2015.

After I retired from active duty in 2002 I spent much time listening to music. First I started with CD's and LP's, then quickly moved on to mp3 files. I converted many of my CD's to mp3 and I collected many more from various sources which were freely available at the time. As the number of my mp3 files grew, I put them in folders according to their genres and my favorite classifications. I mainly used Windows Media Player to listen to them and I slowly began to dislike wmp because it had massive user interface while I just wanted to listen to music in the background while I was doing other work in the foreground, hopping between folders from time to time. It was the time I was beginning to learn AutoIt and I thought I should make my own player with AutoIt. Coming from a sales career with no experience in programming, it was not an easy task. Somehow, after about 2 years of learning and trying, I had my own audio player which worked with only hotkeys without any graphical interface. I gave it to some of my friends who were not as computer-savvy as I. They liked it but definitely wanted something to clcik with mouse. So I came up with very rude gui which took a form similar to what it is now.

The attached source files include one au3 file, one icon file and 14 jpg files. The jpg files are used for drawing a graphical player and are fileinstalled in @DocumentsCommonDir folder. This player uses WMPlayer.OCX as its engine and supports all audio file formats supported by wmp and additional codecs installed. I would like to thank @Bilgus for kind answers to my questions and would appreciate it if anyone could review the code and give me any suggestion. This player works for me, but I don't know whether the code is presentable as an example. I am posting this here with a hope to learn much from AutoIt community.

PS: 1. An error (Variable used before declaration) was reported and corrected - 02:00 hours GMT,  March 14, 2019

      2. An error in tray menu was corrected -10:00 hours GMT, March14, 2019

      3. AutoIt3Wrapper_Au3Check_Parameters definition was added at the top of the code and all ensuing errors were corrected. - 00:10 hours GMT, March 16 2019

      4. Some features were added. - 10:30 hours GMT, March 18, 2019
          a. Jumping to new play-back position in a file
          b. Support for a manually made playlist
          c. Ctrl+Alt+h hotkey to trigger a help message box

      5. The minimum resizing width of playlist window was set at 450. - 01:10 hours GMT, March 23, 2019

      6. Problems associated with actions taken while in 'paused' status was addressed. - 07:40 GMT, April 12, 2019

      7. An error was found and corrected in restoring previous play-back environment when the mode was 'Shuffled.' - 11:00 GMT, April 17, 2019

Main-Window.png

Playlist-Window.png

Please see Downloads section of this forum for source code files.

 

Edited by CYCho

Share this post


Link to post
Share on other sites

Hello @@CYCho,

Thank you for this example program.  I've made a few audio scripts and wanted to see another example.  When I run your script, I am asked to locate a folder with music.  I navigate to My Music folder select a folder that contains MP3s and receive a script crash.

"E:\Programming\AutoIt\AutoIt_Forum\zPlayer\zPlayer\zPlayer.au3" (554) : ==> Variable used without being declared.:
If WinExists($winListView) Then
If WinExists(^ ERROR

 

Edited by Xandy

Share this post


Link to post
Share on other sites

Your code appears good.  I learned about FileInstal() because of how you use it to copy images.

I was curious if holding CTRL, ALT, or SHIFT would get the keys stuck, if used with Send("Volume UP").  The solution for that is SendEx(), which will force the modifiers keys to first be released.

But I didn't execute your script to a point where I could check this.

Edited by Xandy

Share this post


Link to post
Share on other sites

Thank you, script is working for me now.  Modifier keys are not becoming stuck.  Maybe this doesn't happen with HotKeySet(..) or Send("Volume Up/Down").  Either way nm.

The reason I stopped using the script (for now) is it was eating my CTRL+ARROWS.  I like to use these shortcuts to navigate words in a text.  There are several solutions to this problem, I could remap the hotkeys.  I could change the Song Next keys to respond to _IsPressed("11") And _IsPressed("25") and then your script would not eat the keys, yet still respond to them.  The song would change and my cursor would jump between words.  Not sure what I want to do yet.

Edited by Xandy

Share this post


Link to post
Share on other sites

If it hasn't been a problem for you.  It most likely not an issue and there is nothing to worry about.  If a key ever gets stuck wrap your Send() calls with a SendEx() call, just copy SendEx() from the Internet and use SendEx($string) instead of Send($string).  I wouldn't bother though, not if, keys aren't getting stuck.  I'm almost sorry I said anything.  There's no need to fix it if it isn't broken.

Share this post


Link to post
Share on other sites

According as @Bilgus suggested, "#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w- 4 -w 5 -w 6 -w- 7" was added at the top of the code and all ensuing errors were corrected. Most of the errors were related with lack of keyword "Local" before assigning value to a local variable, and it seemed to be purely a matter of good coding practice. I'm glad I learned this though.

Edited by CYCho

Share this post


Link to post
Share on other sites

Some features were added.
1. Now you can click the slider in the graphical player to jump move the play-back position in a file.
2. The player now supports a manually made playlist with actual music files in other folders. This feature can be used for creating a playlist for a special occasion. For example, some carols can be included in the playlist and put in "Carols" folder: actual music files may reside anywhere in the computer.
3. A small help message box was added and can be triggered by Ctrl+Alt+h.

Edited by CYCho

Share this post


Link to post
Share on other sites
Posted (edited)

I made several big and small updates during the past one year period and uploaded the latest version in Downloads section. As I started this project as a learning process, I would greatly appreciate any comments or suggestions for improvement. Thank you.

Edited by CYCho

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

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By CYCho
      This file includes all the source codes and a compiled .exe version of zPlayer, which is a stand-alone, simple, intuitive and easy-to-use, yet fully functional media player.  I made this to suit my purpose and you can tweak it to your taste. The source code is only about 1300 lines and only standard #include files were used.
      zPlayer was my first AutoIt project through which I was hoping to learn coding. A media player capable of playing back audio and video files was my initial goal, but video was beyond my capacity for my lack of coding experience. So zPlayer was born as an audio-only player and remained so up to Version 2.0.1.5.
      Just recently I decided to add video function to zPlayer now that I had gained some experience. I thought it would be possible, but I didn't expect it to be this simple. I made minimal changes to the existing code and added only about 80 lines and, voila, I have an integrated audio and video player, starting from Version 3.0.0.1.
      This player has the following features:
      - Play back all formats of media files which can be played back by the Windows Media Player in your computer
      - Depending on the file types specified by the user in zPlayer.ini file this player can be either audio only, video only or both.
      - Video window is independent of other windows and, when it is maximized, increases the immersion of the user
      - Graphical player similar to embedded Windows Media Player
      - Forward, backward, pause, repeat, shuffle function
      - Increase/decrease/mute sound volume
      - Change folders and create playlist for all media files in that folder and its subfolders, and support for manually-made playlists
      - Save play-back environment when terminating and resume that environment when restarting
      - With one click, you can see internet search results for the file selected in playlist
      - With a double-click, you can play back an item in the playlist
      - Search strings in the playlist
      - Option to see long file names including folder names
      - Resize the playlist and video windows, and restore them to their default positions
      - Very small footprint: very low CPU and memory usage, with only about 1MB when compiled
      - You can even hide all the windows and manipulate the player with hotkeys only
      Note: zPlayer is the name I used when I introduced the early version of this player in my blog back in early 2009 and, therefore, has nothing to do with the mobile media player of the same name which started marketing in 2015.
    • By nacerbaaziz
      hello autoit team
      please i need your help
      i found that the youtube provide a way to get any video informations with this link
      https://youtube.com/get_video_info?video_id=id
      but it incoded i can not read it
      can any one tell me how to decode that please?
    • By nacerbaaziz
      goodmorning; autoit team
      please their are any youtube search way working?
      because i was using the get source and split it to get the result but know it does not working any way.
      is the youtube disabled that? and is their any other simple way to do that?
      i tested all examples found in this post but also it don't work
      https://www.autoitscript.com/forum/topic/123945-youtube-search/
      and here is the example that i use to and it don't work any more
      local $hSearchOpenHNDL, $hSearchConnect, $sSearchGet local $a_UrlsArray[1][5] local $b_ButtonsDisabled = false, $b_SearchBTNFocus = false, $b_SearchListFocus, $h_SearchFocusHND local $Return = "0" local $s_OpenStringY = "/feed/trending" local $ChannelUrl = "", $channelName = "" if Not ($a_YoutubeSearchArray[0][0] = 0) then GUICtrlSetData($searchInp, $s_youtubeSearchLastSearch) $s_OpenStringY = "/results?search_query=" & StringReplace(GUICtrlRead($searchInp), " ", "+") $a_UrlsArray = $a_YoutubeSearchArray for $i = 1 to $a_UrlsArray[0][0] _GUICtrlListBox_AddString($SearchList, $a_UrlsArray[$i][0] & $a_UrlsArray[$i][2] & $a_UrlsArray[$i][3]) next _GUICtrlListBox_SetCurSel($SearchList, $I_youtubeSearchLastIndex-1) GUICtrlSetState($SearchList, $GUI_focus) else if Ping("youtube.com", 1000) > 1 then $hSearchOpenHNDL = _WinHttpOpen('') if not (@Error) then $hSearchConnect = _WinHttpConnect($hSearchOpenHNDL, "youtube.com") if Not (@Error) then $sSearchGet = _WinHttpSimpleRequest($hSearchConnect, "get", $s_OpenStringY) if not (@Error) then local $a_strings = _StringBetween($sSearchGet, '<a href="/watch', "<ul") local $title = "" local $url = "" local $length = "" local $result = "" GUICtrlSetData($SearchList, "") ReDim $a_UrlsArray[1][5] for $i = 0 to UBound($a_strings)-1 $url = _StringBetween($a_strings[$i], "?", '"') if @error then ContinueLoop $url = "https://www.youtube.com/watch?" & $url[0] $title = _StringBetween($a_strings[$i], 'dir="', '</a>') if @error then ContinueLoop $title = $title[0] $title = StringRegExpReplace($title, '(.*\"\>)', "") if StringRegExp($a_strings[$i], '[0-9]{1,2}\:[0-9]{1,2}\:[0-9]{1,2}', 0) = 1 then $length = StringRegExp($a_strings[$i], '[0-9]{1,2}\:[0-9]{1,2}\:[0-9]{1,2}', 2) elseIf StringRegExp($a_strings[$i], '[0-9]{1,2}\:[0-9]{1,2}', 0) = 1 then $length = StringRegExp($a_strings[$i], '[0-9]{1,2}\:[0-9]{1,2}', 2) else $length = "" endIf if IsArray($length) then $length = ": (" & $length[0] & ")" else $length = "" endIf $ChannelUrl = stringRegexpReplace($a_strings[$i], '(^.*?<a.*?\"(\/user|\/channel))+', "$2") $channelName = stringRegexpReplace($ChannelUrl, '(.*?\".*?>)(.*</a>)+', "$2") $ChannelUrl = stringRegexpReplace($ChannelUrl, '(\".*)+', "") $channelName = stringRegexpReplace($channelName, '(</a>.*)+', "") $result &= $title & @crlf & $url & @crlf ReDim $a_UrlsArray[UBound($a_UrlsArray)+1][5] $a_UrlsArray[UBound($a_UrlsArray)-1][0] = $title $a_UrlsArray[UBound($a_UrlsArray)-1][1] = $url $a_UrlsArray[UBound($a_UrlsArray)-1][2] = $length if not ($channelName = "") then $a_UrlsArray[UBound($a_UrlsArray)-1][3] = ", (" & $channelName & ")" if not ($channelUrl = "") then $a_UrlsArray[UBound($a_UrlsArray)-1][4] = "https://www.youtube.com" & $channelUrl $a_UrlsArray[0][0] = UBound($a_UrlsArray)-1 _GUICtrlListBox_AddString($SearchList, $a_UrlsArray[UBound($a_UrlsArray)-1][0] & $length & $a_UrlsArray[UBound($a_UrlsArray)-1][3]) next endIf endIf endIf endIf endIf  
      i hope any one can help me
      thanks in advance
×
×
  • Create New...