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

游侠无极限

;---------------- ;编译模式="DLG" ;---------------- ! f" n$ y v4 i4 R0 H+ z.386 .Model Flat, StdCall Option Casemap :None ;;------------------------------------------------------- % H J7 \$ A# X! nInclude windows.inc # x! Q+ ~0 |5 J' s5 b! i* zInclude user32.inc # q$ }6 X+ T, ~3 GInclude kernel32.inc s$ L9 }7 Q, p% \0 `- yinclude shell32.inc include winmm.inc & Y# Z7 H, e5 G- t4 D# Jincludelib winmm.lib includelib shell32.lib - s% [# u- O: H. qIncludeLib user32.lib IncludeLib kernel32.lib " N2 i0 s, L7 b;------------------------------------------------------- 2 e, U( \$ j5 d; _% _ ;过程声明 + m' ~ G0 ]4 W0 R: e* Y2 v. [5 qDlgProc proto :DWORD,:DWORD,:DWORD,:DWORD * D) ? P& q$ B3 @, {+ @. b+ p) l3 W;------------------------------------------------------- 4 }1 @, q: c8 \6 r+ _, I5 } .const ;常数定义,只使用一次的ID无需定义为常数,这里仅做为例子 DLG_MAIN equ 101 8 Y$ i( \# s. F/ H; f IDI_TRAY equ 0 3 t& w& [1 [( T6 j! V- K IDR_POPMNU equ 102 IDM_OPEN equ 40001 IDM_CLOSE equ 40002 ) B- |1 C; l0 h5 b! m3 u* m( p/ o IDM_EXIT equ 40003 szTipText db 'CD Door',0 szOpen db 'set CDAudio door open',0 , y" K- u* n6 q3 q szClose db 'set CDAudio door closed',0 .data ;数据段 & }* [$ i+ f$ o& ~ * S; ` U; }- H" omyicon NOTIFYICONDATA <> .data? hInstance dd ? f8 d' T" {1 @( X hIconA dd ? hMenu dd ? ;------------------------------------------------------- ) }% T/ l7 T5 m% V6 e.CODE START: invoke GetModuleHandle,NULL ; }# r G: ]* j7 u& K mov hInstance,eax invoke DialogBoxParam,hInstance,DLG_MAIN,0,offset DlgProc,0 invoke ExitProcess,0 5 ^; z6 K1 [/ K4 _% _7 G) D) D* K & }1 @. Q4 y) i;当参数类型为DWORD时,不需要进行类型声明,以下过程详细应该为: ;DlgProc proc hWndWORD,uMsgWORD,wParamWORD,lParamWORD DlgProc proc hWnd,uMsg,wParam,lParam % B2 r8 B* w* g2 O! ]1 \ local @ptOINT .if uMsg==WM_INITDIALOG , j, \* z$ g% O invoke LoadIcon,hInstance,103 mov hIconA,eax 3 V! |% v* Z! f invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax ! `5 f& Y' X8 ?7 x invoke LoadMenu,hInstance,IDR_POPMNU 6 l# o% V# f4 `- Q ;mov hMenuExit,eax invoke GetSubMenu,eax,0 - X, z9 Y- P: W6 X. E1 k mov hMenu,eax 2 L1 T' m) k6 ^: N8 f% e& I8 w" _.elseif uMsg==WM_COMMAND " O6 F* K( k( f$ i" D# s7 V, P1 P mov eax,wParam .if ax==IDCANCEL / _4 \9 g. y. u1 c9 W- y: s1 @# U invoke EndDialog,hWnd,TRUE 8 e3 C4 _; D* Y: }1 W! I .elseif ax == IDOK ;mov IsTray,TRUE mov myicon.cbSize,sizeof NOTIFYICONDATA ;需填入NOTIFYICONDATA数据结构的长度 1 [* | m; a/ O' C5 | push hWnd # x* z- c( S% c! }. [ pop myicon.hwnd $ y2 I) ]( l3 e3 g) l* D mov myicon.uFlags,NIF_ICON+NIF_MESSAGE+NIF_TIP ;设置uCallbackMessage,hIcon,szTip是否有效 mov myicon.uID,IDI_TRAY ;为图标所设置的ID值 7 a& C, y- a$ ~+ k# b2 I; U* S push hIconA 3 N& |6 g- `' x- ]( O pop myicon.hIcon ;显示在状态栏上的图标 mov myicon.uCallbackMessage,WM_USER + 1 ;消息编号 invoke lstrcpy,addr myicon.szTip,addr szTipText ;提示信息 ' L( G5 s' S( E9 C, v6 x+ J* h% d invoke Shell_NotifyIcon,NIM_ADD,addr myicon invoke ShowWindow,hWnd,SW_HIDE .elseif ax == IDM_EXIT ( g" y! \/ F$ b1 c invoke EndDialog,hWnd,TRUE invoke Shell_NotifyIcon,NIM_DELETE,addr myicon .elseif ax == IDM_OPEN invoke mciSendStringA,offset szOpen,0,0,0 2 [6 X( C6 Z7 O2 _ .elseif ax == IDM_CLOSE invoke mciSendStringA,offset szClose,0,0,0 .endif .elseif uMsg==WM_CLOSE , w' y, j/ P6 R; y- K7 F6 z$ i invoke EndDialog,hWnd,FALSE .elseif uMsg == WM_USER + 1 & O- b+ H3 D! B .if wParam == IDI_TRAY ;.if lParam == WM_LBUTTONDOWN 1 }7 _% e2 i5 X* ]: O4 ]' j. @5 P# K ;invoke SendMessage,hWnd,WM_SYSCOMMAND,SC_RESTORE,NULL .if lParam == WM_RBUTTONDOWN + s! s8 E; \. \7 [& n! P invoke GetCursorPos,addr @pt ) |5 W0 c; f6 t: a( D f6 |6 O+ S invoke SetForegroundWindow,hWnd 4 K- J4 o1 p' ^3 n* C invoke TrackPopupMenu,hMenu,TPM_RIGHTBUTTON,@pt.x,@pt.y,NULL,hWnd,NULL invoke PostMessage,hWnd,WM_NULL,0,0 .endif .endif , G, l, D. r6 C: [.else mov eax,FALSE : ], G: K% l8 g% U! }9 m ret .endif mov eax,TRUE $ l3 r# f2 K. V5 bret , U! v4 `+ g5 _DlgProc endp 3 j( P. D4 k( Q. ]/ I4 C END START & d1 g/ P/ w; _7 t3 Q . n( z- B9 X5 t5 U% Z/ t

老兄，你这是展示汇编的强大还是展示汇编的繁琐？
/ s% P+ s& I5 d! m" C3 _打开/关闭光驱只要调用mciSendString API函数就可以了，任何语言都比汇编简单
! t+ R  R3 i4 [5 _( H- C打开 mciSendString("set CDAudio door open",0,0, 0)
' p% T3 b# T- y9 m0 R关闭 mciSendString("set CDAudio door closed", 0,0, 0)

" t8 t- G8 x5 v! Q4 Y9 i& h, ^

游侠无极限

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