geoCodingLibで逆住所ジオコーディング

逆住所ジオコーディング（住所→緯度経度）/逆住所ジオコーディング（緯度経度→住所）のための、よくありがちなObjective-CのコードをCocoa Framework化した「geoCodingLib」を呼び出して、逆住所ジオコーディングを行うAppleScriptです。

Cocoa Frameworkを呼び出すため、実行にはScript Debuggerあるいは同ソフトから書き出した拡張アプレット環境が必要です。Apple純正のスクリプトエディタでは実行できません。

–> geoCodingLib.framework(Universal Binary)

AppleScript名：geoCodingLibで逆住所ジオコーディング.scptd

—
–　　Created by: Takaaki Naganoya
–　　Created on: 2023/03/16
—
–　　Copyright © 2023 Piyomaru Software, All Rights Reserved
—

use AppleScript version "2.4" — Yosemite (10.10) or later
use framework "Foundation"
use framework "CoreLocation"
use framework "geoCodingLib"
use scripting additions

set aLat to 35.7356786
set aLong to 139.6516811
set aLoc to current application’s CLLocation’s alloc()’s initWithLatitude:(aLat) longitude:(aLong)
set aRes to my getAddressOf:aLoc
–> 東京都練馬区豊玉北6丁目12-1

–緯度経度→住所
on getAddressOf:aLocation
　　set aGeo to current application’s geocodingLib’s alloc()’s init()
　　aGeo’s getAddress:aLocation
　　
　　delay 1.0E-4
　　
　　repeat 1000 times
　　　　delay 1.0E-4
　　　　set aRes to aGeo’s placeAddress()
　　　　if aRes is not equal to missing value then exit repeat
　　end repeat
　　
　　if aRes is equal to missing value then return false
　　return aRes as string
end getAddressOf: