学会用按键精灵教你画射击游戏的准心

1、首先，我们先来简单了解下，要用到的几个Api函数，吼吼SetROP2声明DeclareFunctionSetROP2Lib"gdi32"Alias"SetROP2"(ByValhdcAsLong,ByValnDrawModeAsLong)AsLong功能主要用于设定当前前景色的混合模式。R2_NOT就是取反的意思，即前景色为背景色的反色，经常用R2_NOT来画橡皮线，因为两次取反可以还原背景色。参数1.设备场景的句柄2.设备场景的新绘图模式返回值如执行成功，返回前一个绘图模式；零表示出错

2、GetWindowDC声明DeclareFunctionGetWindowDCLib"user32"Alias"GetWindowDC"(ByValhwndAsLong)AsLong功能获取整个窗口（包括边框、滚动条、标题栏、菜单等）的设备场景参数窗口句柄返回值设备句柄

3、CreatePen声明DeclareFunctionCreatePenLib"gdi32"Alias"CreatePen"(ByValnPenStyleAsLong,ByValnWidthAsLong,ByValcrColorAsLong)AsLong功能用指定的样式、宽度和颜色创建一个画笔参数画笔类型返回值如函数执行成功，就返回指向新画笔的一个句柄；否则返回零

4、SelectObject声明DeclareFunctionSelectObjectLib"gdi32"Alias"SelectObject"(ByValhdcAsLong,ByValhObjectAsLong)AsLong功能每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如，当前选定的画笔决定了在设备场景中描绘的线段颜色及样式参数1.一个设备场景的句柄2.一个画笔、位图、刷子、字体或区域的句柄返回值与以前选入设备场景的相同hObject类型的一个对象的句柄，零表示出错。如选定的对象是一个区域（Region），结果就是下列常数之一：SIMPLEREGION，COMPLEXREGION或NULLREGION对区域进行描述，GDI_ERROR表示出错

5、SelectObject声明DeclareFunctionSelectO水瑞侮瑜bjectLib"g颊俄岿髭di32"Alias"SelectObject"(ByValhdcAsLong,ByValhObjectAsLong)AsLong功能每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如，当前选定的画笔决定了在设备场景中描绘的线段颜色及样式参数1.一个设备场景的句柄2.一个画笔、位图、刷子、字体或区域的句柄返回值与以前选入设备场景的相同hObject类型的一个对象的句柄，零表示出错。如选定的对象是一个区域（Region），结果就是下列常数之一：SIMPLEREGION，COMPLEXREGION或NULLREGION对区域进行描述，GDI_ERROR表示出错

6、MoveToEx声明DeclareFunctionMoveToExLib"gdi32"Alias"MoveToEx"(ByValhdcAsLong,ByValxAsLong,ByValyAsLong,lpPointAsPOINTAPI)AsLong功能为指定的设备场景指定一个新的当前画笔位置。前一个位置保存在lpPoint中参数1.指向一个设备场景的句柄2.采用逻辑坐标表示的新画笔位置3.前一个画笔位置返回值非零表示成功，零表示失败

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

8、DeleteObject声明DeclareFunctionDeleteObjectLib"gdi32"Alias"DeleteObject"(ByValhObjectAsLong)AsLong功能用这个函数删除GDI对象，比如画笔、刷子、字体、位图、区域以及调色板等等。对象使用的所有系统资源都会被释放参数一个GDI对象的句柄返回值非零表示成功，零表示失败

9、我们拿桌面窗口做例子，在桌面窗口上画一个准心，准心随着鼠标移动而移动。脚本大致过程：1、获取当前鼠标坐标，以鼠标坐标作为画笔位置2、取设备句柄，这里设置取屏幕设备句柄3、创建一个画笔对象4、将创建的画笔对象载入到设备场景里（当前屏幕即是设备场景）。5、清屏一次，消除之前画笔对象画的准心6、指定好画笔开始的位置，（设置鼠标所在的坐标）7、以鼠标坐标为中心，画一条横线。以鼠标坐标为中心，画一条竖线8、加入Do……Loop循环，画一个准心删除一个准心，这样就实现了准心跟随鼠标移动而移动

10、代码：DeclareFunction取设备句柄Lib"user32"Alias"GetWindowDC"(ByValhwndAsLong)AsLongDeclareFunction创建画笔对象Lib"gdi32"Alias"CreatePen"(ByValnPenStyleAsLong,ByValnWidthAsLong,ByValcrColorAsLong)AsLongDeclareFunction选入场景Lib"gdi32.dll"Alias"SelectObject"(ByValhwndAsLong,ByValhwndAsLong)AsLongDeclareFunction指定画笔位置Lib"gdi32"Alias"MoveToEx"(ByValhdcAsLong,ByValxAsLong,ByValyAsLong,ByValxAsLong)AsLongDeclareFunction画直线Lib"gdi32"Alias"LineTo"(ByValhdcAsLong,ByValxAsLong,ByValyAsLong)AsLongDeclareFunction删除对象Lib"gdi32"Alias"DeleteObject"(ByValhObjectAsLong)AsLong//取设备句柄（窗口句柄）[返回设备句柄，整数型]//创建画笔对象（类型，宽度，颜色）[返回对象句柄]//选人场景（设备句柄，场景句柄）//指定画笔位置(设备句柄，X，Y，坐标结购)//画直线（设备句柄，终点X，终点Y）//删除对象（对象句柄）DoGetCursorPosx,y设备句柄=取设备句柄(0)//窗口句柄为0时，取屏幕设备句柄，如在指定窗口画就填写窗口句柄对象句柄=创建画笔对象(1,2,255)//参数1为类型，参数2为线条粗细，参数3为10进制的颜色值（255是红色）TracePrint设备句柄TracePrint对象句柄TracePrint选入场景(设备句柄,对象句柄)//此操作相当于windows画图时鼠标选择了画笔按钮。CallPlugin.Msg.HideScrTXT()TracePrint指定画笔位置(设备句柄,x-50,y,坐标结构)//坐标结构不要使用，按键不支持此数据类型TracePrint画直线(设备句柄,x+50,y)//画横线TracePrint指定画笔位置(设备句柄,x,y-50,坐标结构)//坐标结构不要使用，按键不支持此数据类型TracePrint画直线(设备句柄,x,y+50)//画竖线loopTracePrint删除对象(对象句柄)'画完以后记得释放对象

11、另一种方法，通过SetROP2函数实现。前一种方法，是使用屏幕刷新CallPlugin.Msg.HideScrTXT()用屏幕刷新来实现，画完一个准心刷新一次屏幕，把前面的画的准心清除掉。SetROP2函数是使用反色来覆盖掉前一次画的准心。

12、脚本大致思路：1、画准心前，先取屏幕背景色的反色作为画笔的颜色，并且记录好当前鼠标坐标。2、画一个准心。3、画完之后，再次取反色，第一次获取屏幕背景色的反色，然后第二次再取反色，那这次取到的就是屏幕的背景色了。然后利用原来记录好的鼠标坐标，画一个准心，相当于把之前画的准心用屏幕背景色再画一次进行覆盖。4、循环画准心，达到鼠标移动，准心跟着移动的效果。

13、代码：DeclareFunction反色Lib"gdi32"Alias"SetROP2"(ByVal茑霁酌绡hdcAsLong,ByValnDrawModeAsLong)AsLongDeclareFunction取设备句柄Lib"user32"Alias"GetWindowDC"(ByValhwndAsLong)AsLongDeclareFunction创建画笔对象Lib"gdi32"Alias"CreatePen"(ByValnPenStyleAsLong,ByValnWidthAsLong,ByValcrColorAsLong)AsLongDeclareFunction选入场景Lib"gdi32.dll"Alias"SelectObject"(ByValhwndAsLong,ByValhwndAsLong)AsLongDeclareFunction指定画笔位置Lib"gdi32"Alias"MoveToEx"(ByValhdcAsLong,ByValxAsLong,ByValyAsLong,ByValxAsLong)AsLongDeclareFunction画直线Lib"gdi32"Alias"LineTo"(ByValhdcAsLong,ByValxAsLong,ByValyAsLong)AsLongDeclareFunction删除对象Lib"gdi32"Alias"DeleteObject"(ByValhObjectAsLong)AsLong//反色（设备句柄，绘图模式）//取设备句柄（窗口句柄）[返回设备句柄，整数型]//创建画笔对象（类型，宽度，颜色）[返回对象句柄]//选人场景（设备句柄，场景句柄）//指定画笔位置(设备句柄，X，Y，坐标结购)//画直线（设备句柄，终点X，终点Y）//删除对象（对象句柄）//x1，y1绘制坐标x2，y2上次绘制坐标Dimx1,x2,y1,y2设备句柄=取设备句柄(0)//取桌面窗口设备句柄，如在指定窗口画就填写窗口句柄对象句柄=创建画笔对象(1,2,0)//参数1为类型，参数2为线条粗细，参数3为10进制的颜色值（这里用到了反色api准心是背景反色就不设置颜色了）TracePrint设备句柄TracePrint对象句柄TracePrint选入场景(设备句柄,对象句柄)//此操作相当于windows画图时鼠标选择了画笔按钮。Do反色设备句柄,6//R2_NOT绘图模式的值是6TracePrint指定画笔位置(设备句柄,x2-50,y2,坐标结构)//坐标结构不要使用，按键不支持此数据类型TracePrint画直线(设备句柄,x2+50,y2)//画横线TracePrint指定画笔位置(设备句柄,x2,y2-50,坐标结构)//坐标结构不要使用，按键不支持此数据类型TracePrint画直线(设备句柄,x2,y2+50)//画竖线GetCursorPosx1,y1反色设备句柄,6TracePrint指定画笔位置(设备句柄,x1-50,y1,坐标结构)//坐标结构不要使用，按键不支持此数据类型TracePrint画直线(设备句柄,x1+50,y1)//画横线TracePrint指定画笔位置(设备句柄,x1,y1-50,坐标结构)//坐标结构不要使用，按键不支持此数据类型TracePrint画直线(设备句柄,x1,y1+50)//画竖线x2=x1y2=y1loop