Any help me to complete this functions

#include <guiconstants.au3>
#include <guiconstantsex.au3>
#include <inet.au3>
 
$interface=guicreate("My Gui",303,454,5,5)
guisetfont(7,400,0,"verdana")
guictrlcreatetab(0,0,642,21)
guictrlcreatetabitem("Info")

$hostname=guictrlcreateinput(@computername,1,22,150,17)=guictrlcreatelabel("HOSTNAME",151,24)
;$domain=guictrlcreateinput(,1,40,150,17)=guictrlcreatelabel("DOMAIN",151,42)
$username=guictrlcreateinput(@username,1,58,150,17)=guictrlcreatelabel("USERNAME",151,60)
;$macaddress=guictrlcreateinput(,1,76,150,17)=guictrlcreatelabel("MAC ADDRESS",151,78)
$publicaddress=guictrlcreateinput(_getip(),1,94,150,17)=guictrlcreatelabel("IP EXTERNAL",151,96)
$ipaddress=guictrlcreateinput(@ipaddress1,1,112,150,17)=guictrlcreatelabel("IP INTERNAL",151,114)
;$ipsubnet=guictrlcreateinput(,1,130,150,17)=guictrlcreatelabel("NETMASK",151,132)
;$defaultipgateway=guictrlcreateinput(,1,148,150,17)=guictrlcreatelabel("GATEWAY",151,150)
;$dnsserversearchorder=guictrlcreateinput(,1,166,150,17)=guictrlcreatelabel("DNS",151,168)

guictrlcreatetabitem("Ping")
$01=guictrlcreateinput(ping("10.1.0.1",4000)&"ms",1,22,150,17)=guictrlcreatelabel("SERV-01",151,24)
$02=guictrlcreateinput(ping("10.1.0.2",4000)&"ms",1,40,150,17)=guictrlcreatelabel("SERV-02",151,42)
$03=guictrlcreateinput(ping("10.1.0.3",4000)&"ms",1,58,150,17)=guictrlcreatelabel("SERV-03",151,60)
$04=guictrlcreateinput(ping("10.1.0.4",4000)&"ms",1,76,150,17)=guictrlcreatelabel("SERV-04",151,78)
$05=guictrlcreateinput(ping("10.1.0.5",4000)&"ms",1,94,150,17)=guictrlcreatelabel("SERV-05",151,96)

guisetstate()

while 1
$fechar = guigetmsg()
select
case $fechar = $gui_event_close
guidelete()
tooltip("O programa está parando todos os serviços, por favor aguarde.",0,0)
sleep(3000)
tooltip("O programa está sendo finalizado, obrigado.",0,0)
sleep(3000)
exit
endselect
wend