动手制作一个属于自己的3D版QQ二维码

1、打开QQ二维码图片，拖放到电脑左上角。

2、打开按键精灵，新建一个空白脚本

3、点击按键精灵上面一排的“抓抓”，弹出放大镜窗口。

4、1，把鼠标指针移动到二维码左上角，观察放大镜窗口。点击键盘上下左右按键，将鼠标指针移动到刚好在二维码左上角。

2，按住 ctrl+alt+1 ("1"必须是键盘字母上排的数字键才行)。

3，坐标与颜色栏第一个框里会生成二维码左上角坐标，记为（X1,Y1）。

4，同理，按住 ctrl+alt+2 键，坐标栏第二个框里就是右下角坐标了，记为（X2,Y2）。

5、点击按键精灵代码编辑窗口上面的“源文件”，复制并粘贴下面的代码（直接粘贴可能不会自动分行，自己分下）：

Dim d, X, Y, c, n, X1, Y1, X2, Y2     :n = 25     :X1 = 29     :Y1 = 77     :X2 = 478     :Y2 = 526     :d = (X2 - X1) / n     :c = ""     :For Y = Y1 + d / 2 To Y2 - d / 2 Step d     :For X = X1 + d / 2 To X2 - d / 2 Step d     :IfColor X, Y, "000000", 2 Then     :c = c & X & "," & Y & vbCrLf & d / 2 & vbCrLf & vbCrLf     :End If     :Next     :Next     :c = "C" & vbcrlf & c     :Call Plugin.File.WriteFileEX("D:\QQ圆形二维码坐标.txt", c)     :

6、其中 n是二维码阶数(QQ二维码一排有25个方格)。

我是把它保存到 D:\QQ圆形二维码坐标.txt，这个自己选择，文件名自己修改。

将抓抓得到的坐标（X1,Y1）,（X2,Y2）以及 n 分别替换掉上面代码中的值。

7、点击调试，再点击F10运行，过几秒就好了。

8、1，进入电脑D盘，打开 QQ圆形二维码坐标.txt 文本。

2，全选，复制。

9、打开AutoCAD,将复制的文本粘贴到命令行里面。他会自动完成二维码，然后上下镜像一下就完成了二维码的转化。后期处理可以根据个人的喜欢，想做什么样就做什么样的。

10、下面是二维码TXT版的代码:

Dim d, X, Y, c, n, X1,Y1,X2,Y2     :n = 25     :X1=22     :Y1=78     :X2=471     :Y2=527     :d = (X2-X1)/n     :c=""     :For Y = Y1 + d/2 To Y2 - d/2 Step d     :For X = X1 + d/2 To X2 - d/2 Step d     :IfColor X,Y,"000000",2 Then     :c = c & "▇"     :Else c= c & "  "     :End If     :Next     :c=c & vbcrlf     :NeXt     :Call Plugin.File.WriteFileEX("D:\QQ二维码TXT版.txt", c)     :

11、下面是方形二维码代码:

Dim d, X, Y, c, n, X1,Y1,X2,Y2     :n = 25     :X1=22     :Y1=78     :X2=471     :Y2=527     :d = (X2-X1)/n     :c=""     :For Y = Y1 + d/2 To Y2 - d/2 Step d     :For X = X1 + d/2 To X2 - d/2 Step d     :IfColor X,Y,"000000",2 Then     :c=c & X-d/2 & "," & Y-d/2  & vbCrLf & X+d/2 & "," & Y+d/2 & vbCrLf & vbCrLf     :End If     :NeXt     :Next     :c="rectang" & vbcrlf  & c    :Call Plugin.File.WriteFileEX("D:\QQ方形二维码坐标.txt", c)     :

12、以上是做圆形，方形和TXT版的代码，有些AutoCAD基础的朋友可以修改下命令和代码结构。只要想得到的图形都可以变为你的二维码哦。有兴趣就快来动手吧^_^！