win32汇编----挂机锁
3月份写的代码，今天一看。晕。思路都忘光了。看来有必要把注释加上啊。还好当初加了些上去。（希望能同道合者交流）
功能：
1.锁定屏幕，禁止其他人操作。
2.添加了显示图片透明度，方便游戏者挂机（设置透明度为0即显示全部屏幕，但无法对计算机进行操作）
3.添加了播放MP3的功能，这样方便挂机后不用打开其他播放器即可听音乐。
（待修改的地方：图片不可变，有时间添加一个可载入图片功能，这样就可以让用户自己设置挂机图片了。禁止使用Ctrl+Alt+Del功能使用的是修改注册表，懒。。有时间研究一下其它方法）
程序下载：
http://m.99081.com/a33445621/挂机锁.rar
.386
.model flat, stdcall
option casemap :none
include windows.inc
include user32.inc
includelib user32.lib
include kernel32.inc
includelib kernel32.lib
include comdlg32.inc
includelib comdlg32.lib
include gdi32.inc
includelib gdi32.lib
include debug.inc ;因为使用了CTEXT宏，所以要加入debug.inc和debug.lib
includelib debug.lib
include winmm.inc ;使用了音乐播放函数
includelib winmm.lib
include advapi32.inc ;使用了注册表函数
includelib advapi32.lib
KBDLLHOOKSTRUCT struct ;低层键盘钩子要用到的数据结构，RadASM没包含，只能自己定义
vkCode DWORD ? ;LowLevelKeyboardProc过程中_lParam是这个数据结构
scanCode DWORD ?
flags DWORD ?
time DWORD ?
dwExtraInfo DWORD ?
KBDLLHOOKSTRUCT ends
IDB_BMP equ 1000
DLG_MAIN equ 1000
DLG_SHOW equ 1002
ICO_MAIN equ 1001
IDC1_SHOWTEXT equ 1001
IDC1_PASS equ 1003
IDC1_REPASS equ 1002
IDC1_OK equ 1004
IDC1_EXIT equ 1005
IDC2_OK equ 1006
IDC2_PASS equ 1007
IDC1_ICO equ 1008
IDC1_PROMPT equ 1009
IDC1_SCROLL equ 1010
IDC1_COUNT equ 1011
IDC1_ABOUT equ 1012
IDC1_FILE equ 1006
IDC1_BROWSE equ 1008
IDC1_PLAY equ 1013
.data?
hInstance dd ? ;主窗口的句柄
hWinDlg1 dd ? ;主窗口的句柄
hInstance1 dd ? ;锁屏窗口的句柄
hWinMain dd ? ;锁屏窗口的句柄
hBitMap dd ? ;锁屏窗口背景图标的句柄
hIcon dd ? ;图标
hHook dd ? ;钩子句柄
dwFlag dd ? ;密码是否相等的标志,0为密码不匹配，1为匹配，2无意
szPassWordBuf db 128 dup (?) ;主窗口第一个密码框的Buffer,即IDC1_PASS的Buffer
dwLength dd ? ;用来存入输入的密码长度
szShowText db 128 dup (?) ;屏幕显示内容的Buffer
dwPos dd ? ;滚动条的位置
szFileName db MAX_PATH dup (?)
hDevice dd ?
dwFlag2 dd ?
.const
szClassName db 'Class',0 ;类的名字
szPassWordFmt db '请记住您的密码:%s',0
szTaskBar db 'Shell_traywnd',0 ;获取任务栏句柄的时候要用到字符串
szAbout db ' By:未秋叶已落 ',0dh,0ah,' QQ:307727654 ',0dh,0ah,' 渭南*师
院',0dh,0ah,' 2009.3.21',0
szSubKey db 'Software/Microsoft/windows/CurrentVersion/Policies/System',0
szValueName db 'DisableTaskMgr',0
szValue db '1',0 ;用来锁定注册表
szFilter db 'Mp3 File(*.mp3)',0,'*.mp3',0,0
szDevice db "MPEGVideo",0
.code
LowLevelKeyboardProc proc _dwCode,_wParam,_lParam ;钩子的过程
invoke CallNextHookEx,hHook,_dwCode,_wParam,_lParam
.if _dwCode == HC_ACTION
mov ebx,_lParam
assume ebx:ptr KBDLLHOOKSTRUCT ;屏蔽掉一些系统键
.if [ebx].vkCode == VK_DELETE || [ebx].vkCode == VK_LWIN ||/
[ebx].vkCode == VK_TAB || [ebx].vkCode == VK_SHIFT ||/
[ebx].vkCode == VK_MENU || [ebx].vkCode == VK_ESCAPE||/
[ebx].vkCode == VK_RWIN || [ebx].vkCode == VK_CONTROL
invoke FindWindow,addr szTaskBar,0 ;获取任务栏句柄
invoke EnableWindow,eax,FALSE ;设置任务栏为不可用
mov eax,1
.endif
.endif
ret
LowLevelKeyboardProc endp
_CmpPassWord proc _lpPassWord1,_lpPassWord2,_dwPassWordlength ;比对两个密码是否一样
pushad
mov dwFlag,2
mov esi,_lpPassWord1
mov edi,_lpPassWord2
mov ecx,_dwPassWordlength
xor edx,edx
cld
@@:
lodsb
cmp al,[edi+edx]
jnz @F
dec ecx
inc edx
test ecx,ecx
jnz @B
mov dwFlag,1
ret
@@:
mov dwFlag,0
popad
ret
_CmpPassWord endp
_ProcDlgMain1 proc uses ebx edi esi hWnd,uMsg,wParam,lParam ;进入的主窗口
LOCAL @szRePassWord[128]:byte ;第二个密码框的Buffer
LOCAL @szBuffer[128]:byte ;用来显示密码的Buffer
mov eax,uMsg
.if eax == WM_CLOSE
invoke EndDialog,hWnd,NULL
invoke ExitProcess,NULL
.elseif eax == WM_INITDIALOG
push hWnd
pop hWinDlg1
invoke LoadIcon,hInstance,ICO_MAIN ;装载图标文件
mov hIcon,eax
invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax ;设置图标
invoke SetDlgItemText,hWnd,IDC1_SHOWTEXT,/
CTEXT("请误操作此电脑！谢谢合作！") ;设置屏幕显示内容的初始值
invoke CheckDlgButton,hWnd,IDC1_PROMPT,BST_CHECKED;初始化显示密码为已选状态
invoke SendDlgItemMessage,hWnd,IDC1_SCROLL,SBM_SETRANGE,0,255;初始化滚动条0-255
invoke SendDlgItemMessage,hWnd,IDC1_SCROLL,SBM_SETPOS,100,TRUE;初始化滚动条位置
为100
invoke SetDlgItemInt,hWnd,IDC1_COUNT,100,FALSE;初始化滚动条记数为100
mov dwPos,100 ;初始化滚动条位置的变量为100
.elseif eax == WM_COMMAND
.if wParam == IDC1_OK
invoke GetDlgItemText,hWnd,IDC1_SHOWTEXT,addr szShowText,/
sizeof szShowText ;获取屏幕显示的文字
invoke GetDlgItemText,hWnd,IDC1_PASS,addr szPassWordBuf,/
sizeof szPassWordBuf ;获取第一个密码框密码
mov dwLength,eax
invoke GetDlgItemText,hWnd,IDC1_REPASS,addr @szRePassWord,/
sizeof @szRePassWord ;获取第二个密码框密码
.if eax != dwLength ;判断两次密码的长度是否一志
invoke MessageBox,hWnd,CTEXT("两次输入密码不一样"),/
CTEXT("错误"),MB_OK or MB_ICONWARNING
ret
.elseif eax == 0
invoke MessageBox,hWnd,CTEXT("密码不能为空"),/
CTEXT("错误"),MB_OK or MB_ICONEXCLAMATION
ret
.endif
invoke _CmpPassWord,addr szPassWordBuf,/
addr @szRePassWord,dwLength;比较密码是否一志
.if dwFlag == 0
invoke MessageBox,hWnd,CTEXT("两次输入密码不一样"),/
CTEXT("错误"),MB_OK or MB_ICONWARNING
.elseif dwFlag == 1
invoke IsDlgButtonChecked,hWnd,IDC1_PROMPT;检查显示密码选项
.if eax == BST_CHECKED
invoke wsprintf,addr @szBuffer,addr szPassWordFmt,/
addr szPassWordBuf ;用来显示密码
invoke MessageBox,hWnd,addr @szBuffer,CTEXT("提示"),/
MB_OK or MB_ICONEXCLAMATION
.endif
invoke EndDialog,hWnd,NULL ;关闭对话框
call _WinMain ;显示挂机窗口
.endif
ret
.elseif wParam == IDC1_EXIT
invoke EndDialog,hWnd,NULL
invoke ExitProcess,NULL
.elseif wParam == IDC1_ABOUT
invoke MessageBox,hWnd,offset szAbout,CTEXT("挂机锁v1.0"),MB_OK
.elseif wParam == IDC1_BROWSE
call _GetFile
.elseif wParam == IDC1_PLAY
.if dwFlag2 == 0
call _PlayMP3
.else
call _StopPlayMP3
.endif
.endif
.elseif eax == WM_HSCROLL ;wParam的高16位是滚动条当前位置
mov eax,wParam ;wParam的低16位是滚动条动作码
.if ax == SB_LINELEFT
dec dwPos
.elseif ax == SB_LINERIGHT
inc dwPos
.elseif ax == SB_PAGELEFT
sub dwPos,10
.elseif ax == SB_PAGERIGHT
add dwPos,10
.elseif ax == SB_THUMBPOSITION || ax == SB_THUMBTRACK
mov eax,wParam
shr eax,16 ;wParam的高16位是滚动条当前位置
mov dwPos,eax
.else
mov eax,TRUE
ret
.endif
cmp dwPos,0
jge @F
mov dwPos,0
@@:
cmp dwPos,255
jle @F
mov dwPos,255
@@:
invoke SetDlgItemInt,hWnd,IDC1_COUNT,dwPos,FALSE
invoke SendDlgItemMessage,hWnd,IDC1_SCROLL,SBM_SETPOS,dwPos,TRUE
.else
mov eax,FALSE
ret
.endif
mov eax,TRUE
ret
_ProcDlgMain1 endp
_ProcDlgMain2 proc uses ebx edi esi hWnd,uMsg,wParam,lParam ;输入密码窗口
LOCAL @szPassWord[128]:byte ;输入密码的Buffer
LOCAL @stRect:RECT
LOCAL @hKey
mov eax,uMsg
.if eax == WM_CLOSE
invoke EndDialog,hWnd,NULL
.elseif eax == WM_INITDIALOG
invoke GetWindowRect,hWnd,addr @stRect ;获取窗口的尺寸
invoke ClipCursor,addr @stRect ;限制鼠标移动范围
invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,hIcon ;设置对话框图标
.elseif eax == WM_COMMAND
.if wParam == IDC2_OK
invoke GetDlgItemText,hWnd,IDC2_PASS,addr @szPassWord,/
sizeof @szPassWord
.if eax == 0
invoke MessageBox,hWnd,CTEXT("密码不能为空!"),/
CTEXT("错误"),MB_OK or MB_ICONWARNING
ret
.elseif eax != dwLength ;判断密码的长度是否一志
invoke MessageBox,hWnd,CTEXT("输入密码不正确！"),/
CTEXT("错误"),MB_OK or MB_ICONEXCLAMATION
ret
.endif
invoke _CmpPassWord,addr szPassWordBuf,addr @szPassWord,eax
.if dwFlag == 0
invoke MessageBox,hWnd,CTEXT("输入密码不正确！"),/
CTEXT("错误"),MB_OK or MB_ICONWARNING
.elseif dwFlag == 1
invoke FindWindow,addr szTaskBar,0 ;获取任务栏句柄
invoke EnableWindow,eax,TRUE ;设置任务栏为可用
invoke UnhookWindowsHookEx,hHook ;卸载钩子
; invoke ExitProcess,NULL ;退出程序
invoke ShowWindow,hWinDlg1,SW_SHOWNORMAL
invoke DestroyWindow,hWinMain
invoke EndDialog,hWnd,NULL
invoke GetWindowRect,hWnd,addr @stRect
invoke ClipCursor,addr @stRect
invoke RegOpenKeyEx,HKEY_CURRENT_USER,addr szSubKey,/
0,KEY_ALL_ACCESS,addr @hKey
invoke RegDeleteValue,@hKey,addr szValueName
invoke RegCloseKey,@hKey ;用来解锁注册表
.endif
.endif
.else
mov eax,FALSE
ret
.endif
mov eax,TRUE
ret
_ProcDlgMain2 endp
_WinMain proc ;锁屏窗口
LOCAL @stWndClass:WNDCLASSEX
LOCAL @stMsg:MSG
invoke GetModuleHandle,NULL
mov hInstance1,eax
invoke RtlZeroMemory,addr @stWndClass,sizeof @stWndClass
push hInstance1
pop @stWndClass.hInstance
mov @stWndClass.cbSize,sizeof WNDCLASSEX
mov @stWndClass.lpfnWndProc,offset _ProcWinMain
mov @stWndClass.lpszClassName,offset szClassName
mov @stWndClass.style,CS_DBLCLKS
invoke LoadCursor,hWinMain,IDC_ARROW
mov @stWndClass.hCursor,eax
invoke RegisterClassEx,addr @stWndClass
invoke CreateWindowEx,WS_EX_TOPMOST,offset
szClassName,0,WS_POPUPWINDOW,0,0,0,0,0,0,hInstance,0
mov hWinMain,eax
invoke ShowWindow,eax,SW_SHOWMAXIMIZED
invoke UpdateWindow,hWinMain
.while TRUE
invoke GetMessage,addr @stMsg,NULL,0,0
.break .if eax == 0
invoke TranslateMessage,addr @stMsg
invoke DispatchMessage,addr @stMsg
.endw
ret
_WinMain endp
_ProcWinMain proc uses ebx edi esi hWnd,uMsg,wParam,lParam ;锁屏窗口过程
LOCAL @stPs:PAINTSTRUCT
LOCAL @hDc,@hBmpDc
LOCAL @stRect:RECT
LOCAL @hKey,@dwSize
mov eax,uMsg
.if eax == WM_CLOSE
invoke DestroyWindow,hWinMain
invoke PostQuitMessage,NULL
.elseif eax == WM_CREATE
invoke LoadBitmap,hInstance1,IDB_BMP
mov hBitMap,eax
invoke GetWindowLong,hWnd,GWL_EXSTYLE ;设置窗口透明度dwPos.
or eax,WS_EX_LAYERED
invoke SetWindowLong,hWnd,GWL_EXSTYLE,eax
invoke SetLayeredWindowAttributes,hWnd,0,dwPos,LWA_ALPHA
invoke SetWindowsHookEx,WH_KEYBOARD_LL,LowLevelKeyboardProc,/
hInstance,NULL ;Hook键盘消息过程为LowLevelKeyboardProc
mov @dwSize,sizeof szValue
invoke RegCreateKeyEx,HKEY_CURRENT_USER,addr
szSubKey,0,NULL,NULL,KEY_ALL_ACCESS,NULL,addr @hKey,NULL
invoke RegSetValueEx,@hKey,addr szValueName,0,REG_SZ,addr szValue,@dwSize
invoke RegCloseKey,@hKey ;用来锁定注册表
.elseif eax == WM_PAINT ;显示背景图片
invoke BeginPaint,hWinMain,addr @stPs
mov @hDc,eax
invoke CreateCompatibleDC,@hDc
mov @hBmpDc,eax
invoke SelectObject,@hBmpDc,hBitMap
invoke GetClientRect,hWinMain,addr @stRect
invoke BitBlt,@hDc,0,0,@stRect.right,@stRect.bottom,@hBmpDc,0,0,SRCCOPY
invoke DrawText,@hDc,addr szShowText,-1,addr @stRect,DT_CENTER or /
DT_SINGLELINE or DT_VCENTER ;显示屏幕文字
invoke DeleteDC,@hBmpDc
invoke EndPaint,hWinMain,addr @stPs
.elseif eax == WM_LBUTTONDOWN
invoke DialogBoxParam,hInstance,DLG_MAIN,hWnd,offset _ProcDlgMain2,NULL
.else
invoke DefWindowProc,hWnd,uMsg,wParam,lParam
ret
.endif
xor eax,eax
ret
_ProcWinMain endp
_PlayMP3 proc
local @stMCIOpen:MCI_OPEN_PARMS
local @stMCIPlay:MCI_PLAY_PARMS
mov @stMCIOpen.lpstrDeviceType,offset szDevice
mov @stMCIOpen.lpstrElementName,offset szFileName
invoke mciSendCommand,0,MCI_OPEN,MCI_OPEN_TYPE or MCI_OPEN_ELEMENT,addr @stMCIOpen
mov eax,@stMCIOpen.wDeviceID
mov hDevice,eax
mov eax,hWinDlg1
mov @stMCIPlay.dwCallback,eax
invoke mciSendCommand,hDevice,MCI_PLAY,MCI_NOTIFY,addr @stMCIPlay
.if eax == 0
invoke SetDlgItemText,hWinDlg1,IDC1_PLAY,CTEXT("停止")
mov dwFlag2,1
.endif
ret
_PlayMP3 endp
_StopPlayMP3 proc
local @stMCIStop:MCI_GENERIC_PARMS
mov eax,hWinDlg1
mov @stMCIStop.dwCallback,eax
invoke mciSendCommand,hDevice,MCI_STOP,MCI_NOTIFY,addr @stMCIStop
invoke mciSendCommand,hDevice,MCI_CLOSE,MCI_NOTIFY,addr @stMCIStop
invoke SetDlgItemText,hWinDlg1,IDC1_PLAY,CTEXT("播放")
mov dwFlag2,0
ret
_StopPlayMP3 endp
_GetFile proc
LOCAL @stOF:OPENFILENAME
invoke RtlZeroMemory,addr @stOF,sizeof @stOF
mov @stOF.lStructSize,sizeof @stOF
push hWinDlg1
pop @stOF.hwndOwner
mov @stOF.lpstrFilter,offset szFilter
mov @stOF.lpstrFile,offset szFileName
mov @stOF.nMaxFile,MAX_PATH
mov @stOF.Flags,OFN_FILEMUSTEXIST or OFN_PATHMUSTEXIST
invoke GetOpenFileName,addr @stOF
.if eax
invoke SetDlgItemText,hWinDlg1,IDC1_FILE,addr szFileName
call _StopPlayMP3
.endif
ret
_GetFile endp
start:
invoke GetModuleHandle,NULL
mov hInstance,eax
invoke DialogBoxParam,hInstance,DLG_SHOW,NULL,offset _ProcDlgMain1,NULL
invoke ExitProcess,NULL
end start
win32汇编----挂机锁相关推荐
- 使用键盘钩子实现挂机锁屏，输入密码解除
使用键盘钩子实现挂机锁屏,输入密码解除 新建.net 4.5 的windows窗体应用程序SystemLockDemo,将默认的form1重命名为FormLaunch. 钩子和windows API类 ...
- 【win32汇编】0x01 开篇一些乱七八糟的话
之前弄完了16位汇编,现在正式学习win32汇编,首先就是一些原理了,其实就是在16位的基础上增加了一些内容,其程序主要的结构记录如下 (1)指令集 .386 这是指定指令集 必须工作 ...
- Win32汇编_基础
Win32汇编_基础 包含全部段的源程序结构: .386 .model flat, stdcall Option casemap:none ;<一些include语句> .stack [堆 ...
- 选择“Win32汇编”的三大理由？
选择Win32汇编的理由是什么呢? 在DOS时代,学习汇编就是学习系统底层编程的代名词,仅要成为一名入门级的汇编程序员,就需要学习从CPU结构.CPU工作方式.各种硬件的编程方法到DOS工作方式等范围 ...
- win32汇编实现拼接SQL语句
字符串合并,在汇编语言,一般是用loop循环和cx寄存器,自己编程实现: 如果是win32汇编,可以使用movsb指令: 一般开发应用程序都会碰到拼接SQL语句,在C#这些语言用字符串连接的加号就可以 ...
- Win32汇编获取和设置文本框的内容
看一下Win32汇编如何获取和设置文本框的内容: 资源文件如下: #include <resource.h>#define ICO_MAIN 0x1000 //图标 #define DLG ...
- Win32汇编基本编程框架
Win32汇编编程框架如下: .386 .model flat,stdcall option casemap:none <一些include语句> .stack [堆栈段的大小] .dat ...
- Win32 汇编环境和入门程序图解
一 安装 在安装的最后,执行VBS脚本,在桌面建立快捷方式:执行快捷方式,会调入Win32汇编的编辑器qeditor.exe,进入到开发环境 二 构建Hello World程序 ;.386是伪指令 告 ...
- Win32 汇编语句模板
Win32 汇编语句模板 一 变量 ;句柄 hInstance dd 0 hWnd dd 0 hPen dd 0 hPend dd 0 oldPen dd 0;过程变量 hInst :DWORD hP ...
最新文章
- Java程序员必看！java值类型和引用类型的区别
- 为游戏开发者总结的20个 Unity 建议和技巧
- 一步一步图文介绍SpriteKit使用TexturePacker导出的纹理集Altas
- 电商美工必备，品质超高的万能套用促销PSD分层模板，宝藏！
- C++中内存分配方式、空指针及野指针的区别
- TweenLite中文帮助手册
- service下载任务
- Linux宝库名人轶事栏目 | 我与中国开源软件二十年（二）
- Cookie的SameSite属性
- Ubuntu 制作光盘镜像文件
- JQuery移动动画实现点击按钮切换图片--JQuery基础
- 腾讯地图获取所选区域坐标
- RocketMQ学习笔记(2)
- invoice-message【发票样式模板】使用
- 计算机显示器的视频接口有什么不同,电脑显示器用VGA还是HDMI好有什么区别
- 【01】花卉识别-基于tensorflow2.3实现
- Pycharm配置编译器
- 标准流程Invalid bound statement (not found)出现原因和最特殊的解决方法
- PS 学习笔记 18-加深工具组
- 网站升级改版服务器,网站程序升级改版 让网站无损失过渡
热门文章
- c语言怎么写出2次元方程,三次樣条C语言的实现.doc
- mysql 5.6 for centos_编译安装MySQL 5.6.16 for CentOS 6.4
- php detime,php读取 mssql数据datatime时间字段的问题
- 通达信公式作副图监控
- 【Windows Server 2019】NTP服务的配置和管理——使用GUI与CLI设置
- input回退消失 vue_vue中iE11 input select使用backspace使浏览器回退解决-Go语言中文社区...
- 马云正式卸任！发表“退休”感言！
- SPDK vhost target
- 来电语音播报软件下载apk_来电播报安卓版下载|来电播报app下载_v1.2.6_9ht安卓下载...
- 对 e 妹儿公司的字符串处理