Applescript - WAN-IP in eine Text datei schreiben ?

Ich benutze nun Location Helper (gibt's umsonst im App Store). Das basiert auf CoreLocation, ist AppleScript fähig und hat nebenbei ganz praktische JSON-Funktionen. Hier mal ein Beispielskript:

Code: 
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000][B]on[/B] [/COLOR][COLOR=#0433ff][B]run[/B][/COLOR][COLOR=#000000] {[/COLOR]theType[COLOR=#000000], [/COLOR]theKind[COLOR=#000000]}[/COLOR][/FONT][/COLOR]
[FONT=Verdana]    [B]if[/B] [COLOR=#4f8f00]theType[/COLOR] [B]is not[/B] [B]in[/B] {"weather", "address"} [B]then[/B][/FONT]
[FONT=Verdana]        [B]return[/B] "Wrong Type. Choose \"weather\" or \"address\"."[/FONT]
[FONT=Verdana]    [B]end[/B] [B]if[/B][/FONT]
[FONT=Verdana]    [B]try[/B][/FONT]
[FONT=Verdana]        [B]set[/B] [COLOR=#4f8f00]theKind[/COLOR] [B]to[/B] [COLOR=#4f8f00]theKind[/COLOR] [B]as[/B] [COLOR=#0433ff][I]integer[/I][/COLOR][/FONT]
[FONT=Verdana]    [B]on[/B] [B]error[/B][/FONT]
[FONT=Verdana]        [B]return[/B] "Wrong Kind. Must be an integer."[/FONT]
[FONT=Verdana]    [B]end[/B] [B]try[/B][/FONT]
[FONT=Verdana]    [/FONT]
[FONT=Verdana]    [B]tell[/B] [COLOR=#0433ff][I]application[/I][/COLOR] "Location Helper"[/FONT]
[COLOR=#5E6161][FONT=Verdana][COLOR=#000000]        [/COLOR]--get address[/FONT][/COLOR]
[COLOR=#0433FF][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR][COLOR=#4f8f00]locInfo[/COLOR][COLOR=#000000] [B]to[/B] ([/COLOR][B]reverse geocode location[/B][COLOR=#000000])[/COLOR][/FONT][/COLOR]
[COLOR=#5E6161][FONT=Verdana][COLOR=#000000]        [/COLOR]--format address[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]fullAddress[COLOR=#000000] [B]to[/B] [/COLOR]formatted_address[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]results[COLOR=#000000] [B]of[/B] [/COLOR]locInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]streetName[COLOR=#000000] [B]to[/B] [/COLOR]long_name[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 2 [B]of[/B] [/COLOR]address_components[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]results[COLOR=#000000] [B]of[/B] [/COLOR]locInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]streetNumber[COLOR=#000000] [B]to[/B] [/COLOR]long_name[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]address_components[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]results[COLOR=#000000] [B]of[/B] [/COLOR]locInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]country[COLOR=#000000] [B]to[/B] [/COLOR]long_name[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 9 [B]of[/B] [/COLOR]address_components[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]results[COLOR=#000000] [B]of[/B] [/COLOR]locInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]PLZ[COLOR=#000000] [B]to[/B] [/COLOR]long_name[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 10 [B]of[/B] [/COLOR]address_components[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]results[COLOR=#000000] [B]of[/B] [/COLOR]locInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]city[COLOR=#000000] [B]to[/B] [/COLOR]short_name[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 5 [B]of[/B] [/COLOR]address_components[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]results[COLOR=#000000] [B]of[/B] [/COLOR]locInfo[/FONT][/COLOR]
[FONT=Verdana]        [/FONT]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]address[COLOR=#000000] [B]to[/B] {[/COLOR]fullAddress[COLOR=#000000], [/COLOR]streetName[COLOR=#000000], [/COLOR]streetNumber[COLOR=#000000], [/COLOR]PLZ[COLOR=#000000], [/COLOR]city[COLOR=#000000], [/COLOR]country[COLOR=#000000]}[/COLOR][/FONT][/COLOR]
[COLOR=#5E6161][FONT=Verdana][COLOR=#000000]        [/COLOR]--get weather[/FONT][/COLOR]
[FONT=Verdana]        [B]set[/B] [COLOR=#4f8f00]weatherInfo[/COLOR] [B]to[/B] [COLOR=#0433ff][B]read JSON from[/B][/COLOR] ([COLOR=#012fbe][B]do shell script[/B][/COLOR] "curl -s http://openweathermap.org/data/2.1/find/name?q=" & [COLOR=#4f8f00]city[/COLOR])[/FONT]
[COLOR=#0433FF][FONT=Verdana][COLOR=#000000]        [/COLOR][B]quit[/B][/FONT][/COLOR]
[FONT=Verdana]    [B]end[/B] [B]tell[/B][/FONT]
[FONT=Verdana]    [/FONT]
[COLOR=#5E6161][FONT=Verdana][COLOR=#000000]    [/COLOR]--format weather [/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]    [B]set[/B] [/COLOR]currentTemperature[COLOR=#000000] [B]to[/B] [/COLOR]temp[COLOR=#000000] [B]of[/B] [/COLOR]main[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]|list|[COLOR=#000000] [B]of[/B] [/COLOR]weatherInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]    [B]set[/B] [/COLOR]minTemperature[COLOR=#000000] [B]to[/B] [/COLOR]temp_min[COLOR=#000000] [B]of[/B] [/COLOR]main[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]|list|[COLOR=#000000] [B]of[/B] [/COLOR]weatherInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]    [B]set[/B] [/COLOR]maxTemperature[COLOR=#000000] [B]to[/B] [/COLOR]temp_max[COLOR=#000000] [B]of[/B] [/COLOR]main[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]|list|[COLOR=#000000] [B]of[/B] [/COLOR]weatherInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]    [B]set[/B] [/COLOR]humidity[COLOR=#000000] [B]to[/B] [/COLOR]humidity[COLOR=#000000] [B]of[/B] [/COLOR]main[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]|list|[COLOR=#000000] [B]of[/B] [/COLOR]weatherInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]    [B]set[/B] [/COLOR]pressure[COLOR=#000000] [B]to[/B] [/COLOR]pressure[COLOR=#000000] [B]of[/B] [/COLOR]main[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]|list|[COLOR=#000000] [B]of[/B] [/COLOR]weatherInfo[/FONT][/COLOR]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]    [B]set[/B] [/COLOR]clouds[COLOR=#000000] [B]to[/B] [/COLOR]|description|[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]weather[COLOR=#000000] [B]of[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR][COLOR=#000000] 1 [B]of[/B] [/COLOR]|list|[COLOR=#000000] [B]of[/B] [/COLOR]weatherInfo[/FONT][/COLOR]
[FONT=Verdana]    [/FONT]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]    [B]set[/B] [/COLOR]weather[COLOR=#000000] [B]to[/B] {[/COLOR]currentTemperature[COLOR=#000000], [/COLOR]minTemperature[COLOR=#000000], [/COLOR]maxTemperature[COLOR=#000000], [/COLOR]humidity[COLOR=#000000], [/COLOR]pressure[COLOR=#000000], [/COLOR]clouds[COLOR=#000000]}[/COLOR][/FONT][/COLOR]
[FONT=Verdana]    [/FONT]
[FONT=Verdana]    [B]if[/B] [COLOR=#4f8f00]theType[/COLOR] [B]is[/B] "weather" [B]then[/B][/FONT]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]theInfo[COLOR=#000000] [B]to[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR]theKind[COLOR=#000000] [B]of[/B] [/COLOR]weather[/FONT][/COLOR]
[FONT=Verdana]    [B]else[/B] [B]if[/B] [COLOR=#4f8f00]theType[/COLOR] [B]is[/B] "address" [B]then[/B][/FONT]
[COLOR=#4F8F00][FONT=Verdana][COLOR=#000000]        [B]set[/B] [/COLOR]theInfo[COLOR=#000000] [B]to[/B] [/COLOR][COLOR=#0433ff][I]item[/I][/COLOR]theKind[COLOR=#000000] [B]of[/B] [/COLOR]address[/FONT][/COLOR]
[FONT=Verdana]    [B]end[/B] [B]if[/B][/FONT]
[FONT=Verdana]    [B]return[/B] [COLOR=#4f8f00]theInfo[/COLOR][/FONT]
[FONT=Verdana][B]end[/B] [COLOR=#0433ff][B]run[/B][/COLOR][/FONT]
 
Zurück
Oben Unten