怎么将这些代码组合到一个脚本中(附代码)

basc

#region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=C:\Windows\system32\SHELL32.dll|-136
#AutoIt3Wrapper_Outfile=C:\11shalong.exe
#endregion ;**** 参数创建于 ACNWrapper_GUI ****
;;沙龙

#include<ie.au3>
$ie = _IECreate("http://222.222.222.222")
$form1 = _IEFormGetCollection($ie, "form1");;;表单名称
$oQuery = _IEFormElementGetObjByName($form1, "uc_top1$loginout$txtusername")
_IEFormElementSetValue($oQuery, "44200000040")
$oQuery = _IEFormElementGetObjByName($form1, "uc_top1$loginout$txtpwd")
_IEFormElementSetValue($oQuery, "963852")
$oSubmit = _IEFormElementGetObjByName($form1, "uc_top1$loginout$btnlogin");从上面的form1表单里找一个名字叫btnLogin的单元
_IEAction($oSubmit, "click");做click的点击
If FileExists("ie.ini") Then
       
                Global $z
                $ys = IniRead("ie.ini", "config", "ys", "");;时间延时
                                Sleep($ys2)
                $1 = IniRead("ie.ini", "config", "1", "");;第1个坐标
                $2 = IniRead("ie.ini", "config", "2", "");;第2个坐标
                $3 = IniRead("ie.ini", "config", "3", "");;第3个坐标
                $4 = IniRead("ie.ini", "config", "4", "");;第4个坐标
                $5 = IniRead("ie.ini", "config", "5", "");;第5个坐标
                $6 = IniRead("ie.ini", "config", "6", "");;第6个坐标
                $7 = IniRead("ie.ini", "config", "7", "");;第7个坐标
                $8 = IniRead("ie.ini", "config", "8", "");;第8个坐标
                $9 = IniRead("ie.ini", "config", "9", "");;我要试用的坐标
                $10 = IniRead("ie.ini", "config", "10", "");;标语输入框
                $11 = IniRead("ie.ini", "config", "11", "");;标语输入框
                $12 = IniRead("ie.ini", "config", "12", "");;标语输入框
                $13 = IniRead("ie.ini", "config", "13", "");;标语输入框
                $14 = IniRead("ie.ini", "config", "14", "");;标语输入框
                $15 = IniRead("ie.ini", "config", "15", "");;标语输入框
                $16 = IniRead("ie.ini", "config", "16", "");;标语输入框
                $17 = IniRead("ie.ini", "config", "17", "");;标语输入框
                $29 = IniRead("ie.ini", "config", "29", "");;标语输入框
                $18 = IniRead("ie.ini", "config", "18", "");;标语输入框
                $19 = IniRead("ie.ini", "config", "19", "");;标语输入框
                $20 = IniRead("ie.ini", "config", "20", "");;标语输入框
                $21 = IniRead("ie.ini", "config", "21", "");;标语输入框
                $22 = IniRead("ie.ini", "config", "22", "");;标语输入框
                $23 = IniRead("ie.ini", "config", "23", "");;标语输入框
                $24 = IniRead("ie.ini", "config", "24", "");;标语输入框
                $25 = IniRead("ie.ini", "config", "25", "");;标语输入框
                $26 = IniRead("ie.ini", "config", "26", "");;标语输入框
                $27 = IniRead("ie.ini", "config", "27", "");;标语输入框
                $28 = IniRead("ie.ini", "config", "28", "");;标语输入框
                $start = IniRead("ie.ini", "config", "start", "");;标语输入框
                $over = IniRead("ie.ini", "config", "over", "");;标语输入框
                $shalong = IniRead("ie.ini", "config", "shalong", "");;标语输入框
                $huaxing = IniRead("ie.ini", "config", "huaxing", "");;标语输入框
                $dongfang = IniRead("ie.ini", "config", "dongfang", "");;标语输入框
                $nanyang = IniRead("ie.ini", "config", "nanyang", "");;标语输入框
                $zhian = IniRead("ie.ini", "config", "zhian", "");;标语输入框
                $zhengchang = IniRead("ie.ini", "config", "zhengchang", "");;标语输入框
                $a = StringSplit($1, ',')
                $b = StringSplit($2, ',')
                $c = StringSplit($3, ',')
                $d = StringSplit($4, ',')
                $e = StringSplit($5, ',')
                $f = StringSplit($6, ',')
                $g = StringSplit($7, ',')
                $h = StringSplit($8, ',')
                $i = StringSplit($9, ',')
                $j = StringSplit($10, ',')
                $k = StringSplit($11, ',')
                $l = StringSplit($12, ',')
                $m = StringSplit($13, ',')
                $n = StringSplit($14, ',')
                $o = StringSplit($15, ',')
                $p = StringSplit($16, ',')
                $q = StringSplit($17, ',')
                $z3 = StringSplit($29, ',')
                $r = StringSplit($18, ',')
                $s = StringSplit($19, ',')
                $t = StringSplit($20, ',')
                $u = StringSplit($21, ',')
                $v = StringSplit($22, ',')
                $w = StringSplit($23, ',')
                $x = StringSplit($24, ',')
                $y = StringSplit($25, ',')
                $z = StringSplit($26, ',')
                $z1 = StringSplit($27, ',')
                $z2 = StringSplit($28, ',')
               
                MouseClick("left", $a[1], $a[2])
                Sleep($ys)
                MouseClick("left", $b[1], $b[2])
                Sleep($ys)
                MouseClick("left", $c[1], $c[2])
                Sleep($ys)
                MouseClick("left", $d[1], $d[2])
                Sleep($ys)
                MouseClick("left", $e[1], $e[2])
               
                Send(@year&"-"&@mon&"-"&@mday& " " &$start)  
                Sleep($ys)
                MouseClick("left", $f[1], $f[2])
                Sleep($ys)
                Send("{BS 19}")
                Sleep($ys)
                Send(@year&"-"&@mon&"-"&@mday& " " &$over)  
                MouseClick("left", $g[1], $g[2])
                Sleep($ys)
                MouseClick("left", $h[1], $h[2])
                Sleep($ys)
                Send($shalong)
                MouseClick("left", $i[1], $i[2])
                Sleep($ys)
                MouseClick("left", $j[1], $j[2])
                Sleep($ys)
                MouseClick("left", $k[1], $k[2])
                Sleep($ys)
                MouseClick("left", $l[1], $l[2])
                Sleep($ys)
                MouseClick("left", $m[1], $m[2])
                Sleep($ys)
                Send($zhian)
                MouseClick("left", $n[1], $n[2])
                Sleep($ys)
                MouseClick("left", $o[1], $o[2])
                Sleep($ys)
                MouseClick("left", $p[1], $p[2])
                Sleep($ys)
                MouseClick("left", $q[1], $q[2])
                Send($zhengchang)
                Sleep($ys)
                MouseClick("left", $z3[1], $z3[2])
                Sleep($ys)
                Send("{enter}")
                ;;;;;;;;;;;;;;;;开始保安巡查;;;;;;;;;;;;;;;;;;;;;
                MouseClick("left", $r[1], $r[2])
                Sleep($ys)
                MouseClick("left", $s[1], $s[2])
                Sleep($ys)
                MouseClick("left", $t[1], $t[2])
                Sleep($ys)
                MouseClick("left", $u[1], $v[2])
                Sleep($ys)
                MouseClick("left", $v[1], $v[2])
                Sleep($ys)
                Send($shalong)
                MouseClick("left", $w[1], $w[2])
                ;;Sleep($ys)
                Send($zhengchang)
                MouseClick("left", $x[1], $x[2])
                Sleep($ys)
                MouseClick("left", $y[1], $y[2])
                Sleep($ys)
                MouseClick("left", $z[1], $z[2])
                Sleep($ys)
                MouseClick("left", $z1[1], $z1[2])
                Sleep($ys)
                MouseClick("left", $z2[1], $z2[2])
                Sleep($ys)
                Send("{enter}")
                ProcessClose("iexplore.exe")
               
       
Else
        MsgBox(0, "basc提示", "没有发现配置文件，程序将退出")
EndIf

问题:点击坐标不变,需要修改的地方为IE登陆的用户密码,还有代码中的Send($shalong)
我有4个用户,不想编译4个EXE,能否整合到一个EXE文件中,求解