;[原创]迷你歌词(MiniLyrics)　2.7.233　安装并写入INI文件进行注册。
;我认为这个安装过程比较典型与实用，看看应该不错。
;因为我不喜欢用winamp而用foobar2000,这里我只选支持后者，其他都不支持。

;简单介绍一下以下要用到的函数
;ButtonNN 后面的NN表示控件名编号
;ControlClick ( "窗口标题", "按钮文本描述", "ButtonNN") 相当于用鼠标点击一下，此窗口中的ButtonNN按钮。
;ControlCommand ( "窗口标题", "按钮文本描述", "ButtonNN", "UnCheck", "" )此句作用是不选择此复选框。
;ControlCommand ( "窗口标题", "支按钮文本描述", "ButtonNN", "Check", "" )此句作用是选择此复选框，即打上勾。
;$var=ControlGetText("窗口标题", "按钮文本描述", "EditNN")此句的作用是读出文件框EditNN的内容到变量$var。
ControlCommand("窗口标题","", "ComboBoxNN","SelectString", '下拉框或列表框内容')
;此句是选择下拉框或列表框的内容，"SelectString",是表示要选择下拉框中的内容。：而 'Base'是下
;IniWrite ( "aa.ini", "MiniLyrics", "RegName", "www.crsky.com" )此句的作用是，在ini文件中建立一个设置项,在[MiniLyrics]区下的键值：RegName=www.crsky.com

run("MINILYRICS.EXE");运行程序

WinWaitActive("Installer Language")
ControlClick ( "Installer Language", "OK", "Button1")
;要求选择语言，默认就是简体中文，按OK就行了。

WinWaitActive("MiniLyrics 2.7.233 安装 : 授权条款")
ControlClick ( "MiniLyrics 2.7.233 安装 : 授权条款", "我同意(&I)", "Button2");这个简单，与上面类似，授权同意就行了。

WinWaitActive("MiniLyrics 2.7.233 安装: 请选择您想安装的播放器","支持 Winamp2")
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 Winamp2", "Button4", "UnCheck", "" )
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 Winamp5", "Button6", "UnCheck", "" )
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 Foobar2000", "Button8", "Check", "" )
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 RealOne Player", "Button11", "UnCheck", "" )
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 Windows Media Player 9.0 (您需要先安装Windows Media Player)", "Button10", "UnCheck", "" )
ControlClick ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "下一步(&N) >", "Button2" )
;这里我只选择支持foobar2000播放器，设置为选择（即打上勾），其他全不选，
;如想要支持其他播放器，只要把uncheck改为check就可以了。
;选择后，按下一步就可以了。

WinWaitActive("MiniLyrics 2.7.233 安装: 请选择您想安装的播放器","支持 QCD Player")
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 QCD Player", "Button17", "UnCheck", "" )
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 iTunes", "Button13", "UnCheck", "" )
ControlCommand ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "支持 MUSICMATCH Jukebox", "Button15", "UnCheck", "" )
ControlClick ( "MiniLyrics 2.7.233 安装: 请选择您想安装的播放器", "下一步(&N) >", "Button2" )
;同上

WinWaitActive("MiniLyrics 2.7.233 安装 : 安装选项")
ControlCommand("MiniLyrics 2.7.233 安装 : 安装选项","", "ComboBox1","SelectString", 'Base')
ControlClick ("MiniLyrics 2.7.233 安装 : 安装选项", "下一步(&N) >", "Button2" )
;这里因为这个软件就是一个插件，我不需要他完全安装，所以只要最基本的base就行了。
;所以在下拉框里选择Base

WinWaitActive("MiniLyrics 2.7.233 安装 : 安装目录")
Dim $var,$inifile$var = ControlGetText("MiniLyrics 2.7.233 安装 : 安装目录", "", "Edit1")
ControlClick ( "MiniLyrics 2.7.233 安装 : 安装目录", "安装(&I)", "Button2" )
;这里让你设置安装目录，我设为默认。只是安装的目录保存到变量$var，作为后面注册用。

WinWaitActive("MiniLyrics 2.7.233 安装 : 完成")
ControlClick ( "MiniLyrics 2.7.233 安装 : 完成", "关闭(&L)", "Button2" )
;这里简单，安装完成，点击关闭按钮就可以了。

$inifile=$var&"/Minilyric.ini"IniWrite ( $inifile, "MiniLyrics", "RegName", "www.crsky.com" )
IniWrite ( $inifile, "MiniLyrics", "RegCode", "56454DB301GGGF1F" )
;因为这个软件注册是要写入ini文件的，不想很多软件是写入注册表的。
;而autoit提供了ini文件的操作，通过刚才的变量$var，得到要写入的INI文件。
;这里的MiniLyrics是ini的区域，即（在文件中用[MiniLyrics]）表示的单独一排。
;在安装好后，这个区域是没有的，不过用iniWrite函数后会自动生成的。