myfreemp3源码(,myfreemp3)
本文目录一览:
- 1、知道网页中源代码MP3的地址,用什么下载工具可以将MP3下载下来?
- 2、可以调音量大小的MP3源码(易语言)谁给我一个?
- 3、求汇编程序的mp3源码(要带注释)
- 4、谁给我个易语言MP3播放器源码啊 要进度条和显示歌词和列表
- 5、查看MP3源码
知道网页中源代码MP3的地址,用什么下载工具可以将MP3下载下来?
通常可以用迅雷等工具下载
但是下载时要勾选“只从原始地址下载”,否则可能会下载失败
可以调音量大小的MP3源码(易语言)谁给我一个?
.版本 2
.版本 2
.程序集变量 yl, 整数型, , "1,2"
.支持库 eMMedia
.支持库 iext6
系统音量1.打开 (4104)
多功能条2.最大位置 = 系统音量1.取最大音量 () \ 100
系统音量1.取音量 (yl [1] [1], yl [1] [2])
多功能条2.位置 = (yl [1] [2] + yl [1] [1]) \ 100
.版本 2
.支持库 iext6
.支持库 spec
.支持库 eMMedia
.子程序 _多功能条2_位置被改变
.局部变量 yla, , , "1,2"
yla [1] [1] = 多功能条2.位置 × 100
yla [1] [2] = 多功能条2.位置 × 100
求汇编程序的mp3源码(要带注释)
mp3.asm
;
; 是否包括调试代码
;
DEBUG = 0
;
; Programmed by 罗云彬, bigluo@telekbird.com.cn
; Website:
; LuoYunBin's Win32 ASM page (罗云彬的编程乐园)
;
; 版本信息
; Mp3 播放测试程序 Ver 1.0 - 2000/06/08
;
.386
.model flat, stdcall
option casemap :none ; case sensitive
;
; Include 数据
;
include G:\masm32\include\windows.inc
include G:\masm32\include\user32.inc
include G:\masm32\include\kernel32.inc
include G:\masm32\include\comctl32.inc
include G:\masm32\include\comdlg32.inc
include G:\masm32\include\winmm.inc
includelib G:\masm32\lib\user32.lib
includelib G:\masm32\lib\kernel32.lib
includelib G:\masm32\lib\comctl32.lib
includelib G:\masm32\lib\comdlg32.lib
includelib G:\masm32\lib\winmm.lib
;
; Equ 数据
;
DLG_MAIN equ 1000
ID_BROWSE equ 1001
ID_FILE equ 1002
;
; 数据段
;
.data?
dwFlag dd ?
hWinMain dd ?
hInstance dd ?
hDevice dd ?
szBuffer db 256 dup (?)
stOpenFileName OPENFILENAME ?
.data
szCaption db "Error...",0
szError db "Error to play MP3 file!",0
szPlay db "Play",0
szStop db "Stop",0
szDevice db "MPEGVideo",0
szTitleSave db "Open MP3 file...",0
szExt db '*.mp3',0
szFilter db 'MP3 Files(*.mp3)',0,'*.mp3',0,'All Files(*.*)',0,'*.*',0,0
;
; 子程序声明
;
_ProcDlgMain PROTO :DWORD,:DWORD,:DWORD,:DWORD
;
; 代码段
;
.code
if DEBUG
include Debug.asm
endif
include Win.asm
;********************************************************************
_GetFileName proc
mov stOpenFileName.Flags,OFN_PATHMUSTEXIST or OFN_FILEMUSTEXIST
mov stOpenFileName.lStructSize,SIZEOF stOpenFileName
mov eax,hWinMain
mov stOpenFileName.hWndOwner,eax
mov stOpenFileName.lpstrFilter,offset szFilter ;扩展名
mov stOpenFileName.lpstrFile,offset szBuffer ;文件名缓冲
mov stOpenFileName.nMaxFile,255 ;文件名缓冲长度
mov stOpenFileName.lpstrInitialDir,0
mov stOpenFileName.lpstrTitle,offset szTitleSave
mov stOpenFileName.lpstrDefExt,offset szExt
invoke GetOpenFileName,offset stOpenFileName
.if eax == FALSE
ret
.endif
invoke SetDlgItemText,hWinMain,ID_FILE,addr szBuffer
call _StopPlayMP3
ret
_GetFileName endp
;********************************************************************
_PlayMP3 proc
local @stMCIOpen:MCI_OPEN_PARMS
local @stMCIPlay:MCI_PLAY_PARMS
mov @stMCIOpen.lpstrDeviceType,offset szDevice
mov @stMCIOpen.lpstrElementName,offset szBuffer
invoke mciSendCommand,0,MCI_OPEN,MCI_OPEN_TYPE or MCI_OPEN_ELEMENT,addr @stMCIOpen
mov eax,@stMCIOpen.wDeviceID
mov hDevice,eax
mov eax,hWinMain
mov @stMCIPlay.dwCallback,eax
invoke mciSendCommand,hDevice,MCI_PLAY,MCI_NOTIFY,addr @stMCIPlay
.if eax == 0
invoke SetDlgItemText,hWinMain,IDOK,offset szStop
mov dwFlag,1
.else
invoke MessageBox,hWinMain,addr szError,addr szCaption,MB_OK
.endif
ret
_PlayMP3 endp
;********************************************************************
_StopPlayMP3 proc
local @stMCIStop:MCI_GENERIC_PARMS
mov eax,hWinMain
mov @stMCIStop.dwCallback,eax
invoke mciSendCommand,hDevice,MCI_STOP,MCI_NOTIFY,addr @stMCIStop
invoke mciSendCommand,hDevice,MCI_CLOSE,MCI_NOTIFY,addr @stMCIStop
invoke SetDlgItemText,hWinMain,IDOK,offset szPlay
mov dwFlag,0
ret
_StopPlayMP3 endp
;********************************************************************
_ProcDlgMain proc uses ebx edi esi, \
hWnd:DWORD,wMsg:DWORD,wParam:DWORD,lParam:DWORD
mov eax,wMsg
.if eax == WM_CLOSE
invoke EndDialog,hWnd,NULL
.elseif eax == WM_INITDIALOG
mov eax,hWnd
mov hWinMain,eax
invoke _CenterWindow,eax
invoke SendDlgItemMessage,hWinMain,ID_FILE,EM_SETREADONLY,TRUE,NULL
.elseif eax == WM_COMMAND
mov eax,wParam
.if eax == ID_BROWSE
call _GetFileName
.elseif eax == IDOK
.if dwFlag == 0
call _PlayMP3
.else
call _StopPlayMP3
.endif
.endif
.else
;********************************************************************
; 注意:对话框的消息处理后,要返回 TRUE,对没有处理的消息
; 要返回 FALSE
;********************************************************************
mov eax,FALSE
ret
.endif
mov eax,TRUE
ret
_ProcDlgMain endp
;********************************************************************
start:
invoke InitCommonControls
invoke GetModuleHandle,NULL
mov hInstance,eax
invoke DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlgMain,0
invoke ExitProcess,NULL
end start
win.asm
.386
.model flat,stdcall
option casemap:none
include \masm32\include\windows.inc
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
WinMain proto :DWORD,:DWORD,:DWORD,:DWORD
.data
ClassName db "SimpleWinClass",0
AppName db "Our First Window",0
.data?
hInstance HINSTANCE ?
CommandLine LPSTR ?
.code
start:
invoke GetModuleHandle, NULL
mov hInstance,eax
invoke GetCommandLine
mov CommandLine,eax
invoke WinMain, hInstance,NULL,CommandLine, SW_SHOWDEFAULT
invoke ExitProcess,eax
WinMain proc hInst:HINSTANCE,hPrevInst:HINSTANCE,CmdLine:LPSTR,CmdShow:DWORD
LOCAL wc:WNDCLASSEX
LOCAL msg:MSG
LOCAL hwnd:HWND
mov wc.cbSize,SIZEOF WNDCLASSEX
mov wc.style, CS_HREDRAW or CS_VREDRAW
mov wc.lpfnWndProc, OFFSET WndProc
mov wc.cbClsExtra,NULL
mov wc.cbWndExtra,NULL
push hInstance
pop wc.hInstance
mov wc.hbrBackground,COLOR_WINDOW+1
mov wc.lpszMenuName,NULL
mov wc.lpszClassName,OFFSET ClassName
invoke LoadIcon,NULL,IDI_APPLICATION
mov wc.hIcon,eax
mov wc.hIconSm,eax
invoke LoadCursor,NULL,IDC_ARROW
mov wc.hCursor,eax
invoke RegisterClassEx, addr wc
INVOKE CreateWindowEx,NULL,ADDR ClassName,ADDR AppName,\
WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,\
CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,NULL,NULL,\
hInst,NULL
mov hwnd,eax
invoke ShowWindow, hwnd,SW_SHOWNORMAL
invoke UpdateWindow, hwnd
.WHILE TRUE
invoke GetMessage, ADDR msg,NULL,0,0
.BREAK .IF (!eax)
invoke TranslateMessage, ADDR msg
invoke DispatchMessage, ADDR msg
.ENDW
mov eax,msg.wParam
ret
WinMain endp
WndProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM
.IF uMsg==WM_DESTROY
invoke PostQuitMessage,NULL
.ELSE
invoke DefWindowProc,hWnd,uMsg,wParam,lParam
ret
.ENDIF
xor eax,eax
ret
WndProc endp
end start
谁给我个易语言MP3播放器源码啊 要进度条和显示歌词和列表
.版本 2
.支持库 edroptarget
.支持库 eMMedia
.程序集 窗口程序集_启动窗口
.程序集变量 文件, 文本型
.程序集变量 类型, 整数型
.子程序 _播放按钮_被单击
播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))
同步播放MP3 (列表框1.取项目文本 (列表框1.现行选中项), 0, 标签1, )
文件 = 列表框1.取项目文本 (列表框1.现行选中项)
类型 = _专辑图片_文件名取专辑图片类型 (文件)
_专辑图片_文件名取专辑图片_到图片框 (文件, 图片框1, 类型)
.子程序 _按钮1_被单击
通用对话框1.打开 ()
列表框1.加入项目 (通用对话框1.文件名, )
' ------------------------------------------------------------------------------------
' 打开对话框myfreemp3源码,然后在列表框中加入对话框中选择myfreemp3源码的文件
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
进度条1.位置 = 参数一
' ------------------------------------------------------------------------------------------------------
' 参数一是MP3的播放进度myfreemp3源码,进度条的位置将实时同步参数一
' myfreemp3源码:)
.子程序 _暂停按钮_被单击
暂停播放MP3 ()
.子程序 _继续按钮_被单击
继续播放MP3 ()
.子程序 _时钟1_周期事件
.如果真 (取MP3播放状态 () = 0)
_启动窗口.标题 = “等待播放”
.如果真结束
.如果真 (取MP3播放状态 () = -1)
_启动窗口.标题 = “暂停” + “ ” + 到文本 (进度条1.位置) + “%”
.如果真结束
.如果真 (取MP3播放状态 () = 1)
_启动窗口.标题 = 到文本 (“播放中” + “ ” + 到文本 (进度条1.位置) + “%”)
.如果真结束
' ------------------------------------------------------------------------------------------------------------------------
' 每1毫秒都会检测上面“如果真”的代码myfreemp3源码,真的真将会执行代码
.子程序 __启动窗口_位置被改变
.如果真 (_启动窗口.位置 = 2)
_启动窗口.可视 = 假
置托盘图标 (#托盘, _启动窗口.标题)
.如果真结束
' -------------------------------------------------------------------------------------------------------------------------
' 如果窗口被最小化,将会看不到窗口,程序将会放到托盘里
.子程序 __启动窗口_托盘事件
.参数 操作类型, 整数型
.如果真 (操作类型 = #单击左键)
_启动窗口.位置 = 1
_启动窗口.可视 = 真
.如果真结束
.如果真 (操作类型 = #单击右键)
弹出托盘菜单 (托盘菜单)
.如果真结束
' -----------------------------------------------------------------------------------------------------------------
' 如果单击了左键,将会把窗口回复,可以看到窗口
' 如果单击了右键,将会弹出“托盘菜单”这个菜单
.子程序 _播放_被选择
播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))
.子程序 _暂停_被选择
暂停播放MP3 ()
.子程序 _继续_被选择
继续播放MP3 ()
.子程序 _关闭_被选择
销毁 ()
.子程序 _恢复_被选择
_启动窗口.位置 = 2
_启动窗口.可视 = 真
.子程序 __启动窗口_创建完毕
.局部变量 左声道, 整数型
.局部变量 右声道, 整数型
拖放对象1.注册拖放控件 (取窗口句柄 ())
系统音量1.打开 (4)
滑块条1.最小位置 = 系统音量1.取最小音量 ()
滑块条1.最大位置 = 系统音量1.取最大音量 () ÷ 5
系统音量1.取音量 (左声道, 右声道)
滑块条1.位置 = 左声道 ÷ 5
' -------------------------------------------------------------------------------------------------------------------------
' 来自这里
' 注册那个命令是让窗口可以把文件拖放进来
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
列表框1.加入项目 (接收到的文件路径, )
' -----------------------------------------------------------------------------------------------------------------------------
' 把拖进来的文件加入到列表框里
.子程序 _图片框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
载入 (窗口1, _启动窗口, 真)
.子程序 _滑块条1_位置被改变
系统音量1.置音量 (滑块条1.位置 × 5, 滑块条1.位置 × 5)
' -------------------------------------------------------------------------------------------------------------
' 来自这里
查看MP3源码
在连接地址上单击鼠标右键.点最下面一个(属性).然后有一个.地址(URL)后面的连接就是啦.!
但是一般.像音乐网站的连接地址都被隐藏了的.!