大家帮忙看看我这个小工具怎么优化一下啊

zlymaster

咱还是菜鸟呢  同志们别笑哈！~~我总感觉那个调用ini文件太乱了。。。。能简化一下不？

#include <Constants.au3>
TraySetToolTip("猪之禅网吧工具Ver1.0");托盘图标鼠标停靠显示气泡文字
Opt("TrayMenuMode", 1) ; 默认托盘菜单项目(脚本已暂停/退出脚本) (Script Paused/Exit) 将不显示.
$about = TrayCreateItem("关于程序", -1, -1, 1)
TrayItemSetState(-1, $TRAY_CHECKED)
TrayCreateItem("")
$exit = TrayCreateItem("退出程序")
TraySetState()
;开机延迟
$time1 = IniRead("option.ini", "自动运行", "time1", "3000")
$time2 = IniRead("option.ini", "自动运行", "time2", "3000")
$time3 = IniRead("option.ini", "自动运行", "time3", "3000")
$time4 = IniRead("option.ini", "自动运行", "time4", "3000")
;调用开机运行程序列表
$run1 = IniRead("option.ini", "自动运行", "RUN1", "NotFound")
$run2 = IniRead("option.ini", "自动运行", "RUN2", "NotFound")
$run3 = IniRead("option.ini", "自动运行", "RUN3", "NotFound")
$run4 = IniRead("option.ini", "自动运行", "RUN4", "NotFound")
$run5 = IniRead("option.ini", "自动运行", "RUN5", "NotFound")
;调用关闭窗口名单
$ad1 = IniRead("option.ini", "查杀窗口", "ad1", "NotFound")
$ad2 = IniRead("option.ini", "查杀窗口", "ad2", "NotFound")
$ad3 = IniRead("option.ini", "查杀窗口", "ad3", "NotFound")
$ad4 = IniRead("option.ini", "查杀窗口", "ad4", "NotFound")
$ad5 = IniRead("option.ini", "查杀窗口", "ad5", "NotFound")
$ad6 = IniRead("option.ini", "查杀窗口", "ad6", "NotFound")
$ad7 = IniRead("option.ini", "查杀窗口", "ad7", "NotFound")
$ad8 = IniRead("option.ini", "查杀窗口", "ad8", "NotFound")
$ad9 = IniRead("option.ini", "查杀窗口", "ad9", "NotFound")
$ad10 = IniRead("option.ini", "查杀窗口", "ad10", "NotFound")
$ad11 = IniRead("option.ini", "查杀窗口", "ad11", "NotFound")
$ad12 = IniRead("option.ini", "查杀窗口", "ad12", "NotFound")
$ad13 = IniRead("option.ini", "查杀窗口", "ad13", "NotFound")
$ad14 = IniRead("option.ini", "查杀窗口", "ad14", "NotFound")
$ad15 = IniRead("option.ini", "查杀窗口", "ad15", "NotFound")
$ad16 = IniRead("option.ini", "查杀窗口", "ad16", "NotFound")
$ad17 = IniRead("option.ini", "查杀窗口", "ad17", "NotFound")
$ad18 = IniRead("option.ini", "查杀窗口", "ad18", "NotFound")
$ad19 = IniRead("option.ini", "查杀窗口", "ad19", "NotFound")
$ad20 = IniRead("option.ini", "查杀窗口", "ad20", "NotFound")
$ad21 = IniRead("option.ini", "查杀窗口", "ad21", "NotFound")
$ad22 = IniRead("option.ini", "查杀窗口", "ad22", "NotFound")
$ad23 = IniRead("option.ini", "查杀窗口", "ad23", "NotFound")
$ad24 = IniRead("option.ini", "查杀窗口", "ad24", "NotFound")
$ad25 = IniRead("option.ini", "查杀窗口", "ad25", "NotFound")
$ad26 = IniRead("option.ini", "查杀窗口", "ad26", "NotFound")
$ad27 = IniRead("option.ini", "查杀窗口", "ad27", "NotFound")
$ad28 = IniRead("option.ini", "查杀窗口", "ad28", "NotFound")
$ad29 = IniRead("option.ini", "查杀窗口", "ad29", "NotFound")
$ad30 = IniRead("option.ini", "查杀窗口", "ad30", "NotFound")
;自动运行程序开始
Run($run1)

Sleep($time1)
Run($run2)

Sleep($time2)
Run($run3)

Sleep($time3)
Run($run4)

Sleep($time4)
Run($run5)

Sleep(1000)
;开始循环关闭指定窗口
While 1


        WinKill($ad1)
        WinKill($ad2)
        WinKill($ad3)
        WinKill($ad4)
        WinKill($ad5)
        WinKill($ad6)
        WinKill($ad7)
        WinKill($ad8)
        WinKill($ad9)
        WinKill($ad10)
        WinKill($ad11)
        WinKill($ad12)
        WinKill($ad13)
        WinKill($ad14)
        WinKill($ad15)
        WinKill($ad16)
        WinKill($ad17)
        WinKill($ad18)
        WinKill($ad19)
        WinKill($ad20)
        WinKill($ad21)
        WinKill($ad22)
        WinKill($ad23)
        WinKill($ad24)
        WinKill($ad25)
        WinKill($ad26)
        WinKill($ad27)
        WinKill($ad28)
        WinKill($ad29)
        WinKill($ad30)


        $msg = TrayGetMsg()

        Select

                Case $msg = 0

                        ContinueLoop

                Case $msg = $about

                        MsgBox(64, "猪之禅网吧工具Ver1.0", "作者：E腾网络猪之禅" & @CR & "╭︿︿︿╮" & @CR & "{/ $  $ /}" & @CR & " ( (oo) ) " & @CR & " ︶ ︶ ︶ " & @CR & "Q   Q：121203299")

                Case $msg = $exit

                        ExitLoop

        EndSelect
WEnd
Exit

tianya1631

那你就不读取ini文件，直接把相应的值赋给变量不就行了．

蜘蛛抱蛋

这个。。可以用数组代替吧

zlymaster

数组。。谢了  我研究研究去！

zwanlei

可以用inireadsection啊

t87564833

不用数组痛苦死你，加个新东西都得去重新编译