学会用按键精灵制作脚本教程：教你画射击游戏的准心

《学会用按键精灵制作脚本教程：教你画射击游戏的准心》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、学会用按键精灵制作脚本之纯API教程：教你画射击游戏的准心     来源：按键学院【按键精灵】有的时候，玩枪击游戏，不想一直使用脚本。想偶尔手动，但是又因为没有准心时常打不准，锵锵锵~那为什么不自己画一个准心呢？我们一起来学习下这个准心要如何画吧~首先，我们先来简单了解下，要用到的几个Api函数，吼吼SetROP2声明DeclareFunctionSetROP2Lib"gdi32"Alias"SetROP2"(ByValhdcAsLong,ByValnDrawModeAsLong)AsLong功能主要用于设定当前前景色的混合模式。R2_NOT就是取反的意思，即前景色为背景色的反色，经常用

2、R2_NOT来画橡皮线，因为两次取反可以还原背景色。参数1.设备场景的句柄  2.设备场景的新绘图模式返回值如执行成功，返回前一个绘图模式；零表示出错GetWindowDC声明DeclareFunctionGetWindowDCLib"user32"Alias"GetWindowDC"(ByValhwndAsLong)AsLong功能获取整个窗口（包括边框、滚动条、标题栏、菜单等）的设备场景参数窗口句柄返回值设备句柄CreatePen声明DeclareFunctionCreatePenLib"gdi32"Alias"CreatePen"(ByValnPenStyleAsLong,ByVa

3、lnWidthAsLong,ByValcrColorAsLong)AsLong功能用指定的样式、宽度和颜色创建一个画笔参数画笔类型返回值如函数执行成功，就返回指向新画笔的一个句柄；否则返回零SelectObject声明DeclareFunctionSelectObjectLib"gdi32"Alias"SelectObject"(ByValhdcAsLong,ByValhObjectAsLong)AsLong功能每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如，当前选定的画笔

4、决定了在设备场景中描绘的线段颜色及样式参数1.一个设备场景的句柄    2.一个画笔、位图、刷子、字体或区域的句柄返回值与以前选入设备场景的相同hObject类型的一个对象的句柄，零表示出错。如选定的对象是一个区域（Region），结果就是下列常数之一：SIMPLEREGION，COMPLEXREGION或NULLREGION对区域进行描述，GDI_ERROR表示出错MoveToEx声明DeclareFunctionMoveToExLib"gdi32"Alias"MoveToEx"(ByValhdcAsLong,ByValxAsLong,ByValyAsLong,lpPointAsPOI

5、NTAPI)AsLong功能为指定的设备场景指定一个新的当前画笔位置。前一个位置保存在lpPoint中参数1.指向一个设备场景的句柄  2.采用逻辑坐标表示的新画笔位置3.前一个画笔位置返回值非零表示成功，零表示失败LineTo声明DeclareFunctionLineToLib"gdi32"Alias"LineTo"(ByValhdcAsLong,ByValxAsLong,ByValyAsLong)AsLong功能用当前画笔画一条线，从当前位置连到一个指定的点。这个函数调用完毕，当前位置变成x,y点参数1设备场景的句柄  2.线段终点位置，采用逻辑坐标表示。这个点不会实际画出来；它不属

6、于线段的一部分返回值非零表示成功，零表示失败DeleteObject声明DeclareFunctionDeleteObjectLib"gdi32"Alias"DeleteObject"(ByValhObjectAsLong)AsLong功能用这个函数删除GDI对象，比如画笔、刷子、字体、位图、区域以及调色板等等。对象使用的所有系统资源都会被释放参数一个GDI对象的句柄返回值非零表示成功，零表示失败我们拿桌面窗口做例子，在桌面窗口上画一个准心，准心随着鼠标移动而移动。脚本大致过程：1、获取当前鼠标坐标，以鼠标坐标作为画笔位置2、取设备句柄，这里设置取屏幕设备句柄1、创建一个画笔对象2、将创

7、建的画笔对象载入到设备场景里（当前屏幕即是设备场景）。3、清屏一次，消除之前画笔对象画的准心4、指定好画笔开始的位置，（设置鼠标所在的坐标）5、以鼠标坐标为中心，画一条横线。以鼠标坐标为中心，画一条竖线6、加入Do……Loop循环，画一个准心删除一个准心，这样就实现了准心跟随鼠标移动而移动代码：DeclareFunction取设备句柄Lib"user32"Alias"GetWindowDC"(ByValhwndAsLong)AsLo