体育资讯网

您现在的位置是:首页 > 分类11 > 正文

分类11

myfreemp3源码(,myfreemp3)

hacker2022-06-11 21:05:21分类1153
本文目录一览:1、知道网页中源代码MP3的地址,用什么下载工具可以将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)后面的连接就是啦.!

但是一般.像音乐网站的连接地址都被隐藏了的.!

发表评论

评论列表

  • 绿邪拔弦(2022-06-11 22:17:45)回复取消回复

    .else;********************************************************************; 注意:对话框的消息处理后,要返回 TRUE,对没有处理的消息; 要返回 FALSE;**********************