set wifi_interface to do shell script "networksetup -listallhardwareports | awk '/^Hardware Port: (Wi-Fi|AirPort)$/{getline;print $2}'"
set hardware_wifi_mac to do shell script "networksetup -getmacaddress " & wifi_interface & " | awk '{print $3}'"
set wifi_status to do shell script ("networksetup -getairportpower " & wifi_interface & " | awk '{print $4}'")
if wifi_status is not "On" then
display dialog "Bitte WLAN-Schnittstelle aktivieren und
Skript neu starten." with title "WLAN-Schnittstelle ist nicht aktiviert!" buttons {"OK"} default button 1 with icon 0
else
set neue_wifi_mac to "1a:2b:3c:4d:5e:6f"
do shell script "sudo ifconfig " & wifi_interface & " lladdr " & neue_wifi_mac with administrator privileges
set aktuelle_wifi_mac to do shell script "ifconfig " & wifi_interface & " | grep ether"
set aktuelle_wifi_mac to do shell script "echo " & quoted form of aktuelle_wifi_mac & " | sed -e 's/[ ether]//g'"
display dialog "Hardware MAC-Adresse: " & hardware_wifi_mac & "
Aktuelle MAC-Adresse: " & aktuelle_wifi_mac
end if