Bluetoothのオン、オフ状態を取得する

AppleScript名：Bluetoothのオン、オフ状態を取得する

— Created 2017-07-25 by Takaaki Naganoya
— 2017 Piyomaru Software
use AppleScript version "2.4"
use scripting additions
use framework "Foundation"
use framework "IOBluetooth"

set pRes to getBluetoothPowerState() of me

on getBluetoothPowerState()
　　set aCon to current application’s IOBluetoothHostController’s alloc()’s init()
　　set pRes to (aCon’s powerState()) as boolean
end getBluetoothPowerState