简单的CD控制程序，只支持单光驱

游侠无极限

;---------------- . T' H1 y/ P* v h( |5 S;编译模式="DLG" ;---------------- P, x2 k4 ? [- J' l$ P& C.386 4 \% _7 k! K; i8 D* ^.Model Flat, StdCall : f7 Q; o6 p0 mOption Casemap :None ;;------------------------------------------------------- + K$ T" a0 R7 b8 ?4 U% X! a Include windows.inc Include user32.inc Include kernel32.inc ; g1 N" h) O. a3 A \4 W; W, uinclude shell32.inc include winmm.inc ) P3 k5 N0 X$ ^ nincludelib winmm.lib includelib shell32.lib : a s7 E# u5 {& [, Z, o fIncludeLib user32.lib IncludeLib kernel32.lib ;------------------------------------------------------- 3 z- H- Q0 n# _% u+ k: J;过程声明 : g* ]( V" P% n _/ u2 g8 T# WDlgProc proto :DWORD,:DWORD,:DWORD,:DWORD " `$ M+ ]0 }# v! D3 O. e;------------------------------------------------------- # u8 [0 e9 B2 Q) r .const . t4 I7 l$ P, _3 f6 Z ^/ C ;常数定义,只使用一次的ID无需定义为常数,这里仅做为例子 DLG_MAIN equ 101 IDI_TRAY equ 0 ; m5 k/ u& C0 R, M9 D4 d IDR_POPMNU equ 102 2 ?# i: O5 ^, |" f& O" `/ U g IDM_OPEN equ 40001 IDM_CLOSE equ 40002 IDM_EXIT equ 40003 7 G' i$ H5 e/ W% o& P( o6 r szTipText db 'CD Door',0 szOpen db 'set CDAudio door open',0 szClose db 'set CDAudio door closed',0 .data ;数据段 myicon NOTIFYICONDATA <> j7 _" k, A7 }6 Q) D2 A' u' W; G.data? hInstance dd ? - y. j$ c+ q; ? hIconA dd ? " \1 J+ y: f8 O& \: q hMenu dd ? $ R0 t S) _3 { z% N;------------------------------------------------------- ; L4 \- ]1 E5 _7 ?1 ` .CODE 7 L# J' i, p/ Z6 h! X8 \START: ( `& u6 l# L4 y6 g. _( d, K6 [ invoke GetModuleHandle,NULL mov hInstance,eax invoke DialogBoxParam,hInstance,DLG_MAIN,0,offset DlgProc,0 invoke ExitProcess,0 ;当参数类型为DWORD时,不需要进行类型声明,以下过程详细应该为: ;DlgProc proc hWndWORD,uMsgWORD,wParamWORD,lParamWORD DlgProc proc hWnd,uMsg,wParam,lParam local @ptOINT .if uMsg==WM_INITDIALOG invoke LoadIcon,hInstance,103 + G5 H- d1 h7 N- h7 b; r mov hIconA,eax invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax invoke LoadMenu,hInstance,IDR_POPMNU ;mov hMenuExit,eax Z$ x9 F9 ^5 D0 N. q# b% @3 G invoke GetSubMenu,eax,0 mov hMenu,eax 4 z3 E R. o, q) @/ t" X; k: p! @.elseif uMsg==WM_COMMAND 7 h. E m X A* S! j8 K% q mov eax,wParam .if ax==IDCANCEL invoke EndDialog,hWnd,TRUE ! A) o! e1 H, L) g0 ^+ x .elseif ax == IDOK 1 d' @1 `6 p$ X ;mov IsTray,TRUE mov myicon.cbSize,sizeof NOTIFYICONDATA ;需填入NOTIFYICONDATA数据结构的长度 + G' V/ N( d. D& l/ a push hWnd & v* I1 x6 f& Z, ~ pop myicon.hwnd ; m/ U# M, n; f; k mov myicon.uFlags,NIF_ICON+NIF_MESSAGE+NIF_TIP ;设置uCallbackMessage,hIcon,szTip是否有效 mov myicon.uID,IDI_TRAY ;为图标所设置的ID值 push hIconA ! ]; @. \! {) L2 u6 ` pop myicon.hIcon ;显示在状态栏上的图标 " w5 g& H% I! I9 a7 ]2 V& i mov myicon.uCallbackMessage,WM_USER + 1 ;消息编号 8 F& S& q5 J) f invoke lstrcpy,addr myicon.szTip,addr szTipText ;提示信息 7 y: ?' H3 L, p) h7 `& m invoke Shell_NotifyIcon,NIM_ADD,addr myicon * p" l( n% h/ F3 y N% m, _ invoke ShowWindow,hWnd,SW_HIDE .elseif ax == IDM_EXIT ! v) R5 G2 _2 Z; A. |' p9 L invoke EndDialog,hWnd,TRUE : l/ m' n0 T7 ? invoke Shell_NotifyIcon,NIM_DELETE,addr myicon .elseif ax == IDM_OPEN invoke mciSendStringA,offset szOpen,0,0,0 3 n, o3 U" l# s; B3 W5 e .elseif ax == IDM_CLOSE invoke mciSendStringA,offset szClose,0,0,0 .endif .elseif uMsg==WM_CLOSE invoke EndDialog,hWnd,FALSE 9 s; ~; E9 y/ s* H5 A# @( {) L3 ]: `.elseif uMsg == WM_USER + 1 .if wParam == IDI_TRAY ;.if lParam == WM_LBUTTONDOWN ;invoke SendMessage,hWnd,WM_SYSCOMMAND,SC_RESTORE,NULL .if lParam == WM_RBUTTONDOWN invoke GetCursorPos,addr @pt 2 p- {% S" R& X. z& \$ U; B4 {+ G invoke SetForegroundWindow,hWnd ! T8 D( o: u3 B# Q9 F# L' X& F invoke TrackPopupMenu,hMenu,TPM_RIGHTBUTTON,@pt.x,@pt.y,NULL,hWnd,NULL ! T) c6 R9 o/ `# s9 J invoke PostMessage,hWnd,WM_NULL,0,0 .endif .endif " _7 v# S) E# g! F, s' K.else 7 p* p7 w- K1 D! F, f7 j: y% Q! k5 E mov eax,FALSE # R1 {1 k# n0 }) s0 ^ ret .endif mov eax,TRUE ) k7 m2 J. H H: ~( ^0 {ret # c. b+ |- W+ F& {DlgProc endp * c1 r4 L2 g7 F. t0 ~ END START S- X* `# {. ^

老兄，你这是展示汇编的强大还是展示汇编的繁琐？
打开/关闭光驱只要调用mciSendString API函数就可以了，任何语言都比汇编简单
: |+ r2 p* r' W+ q% z; S; O" Y打开 mciSendString("set CDAudio door open",0,0, 0)
关闭 mciSendString("set CDAudio door closed", 0,0, 0)

" A) _8 f( \  q0 D1 [, i& G) F" H

游侠无极限

可是汇编做出来的最小^_^
我编译出来都不到4k，FAT32的一个蔟也不到