Cifre e armazene um mapa do tesouro na nuvem
Qualquer expressão da Wolfram Linguagem pode ser cifrada.
Gere uma chave simétrica forte derivada de uma senha secreta usando o método Blowfish.

skeletonKey = GenerateSymmetricKey["Avast ye!", Method -> "Blowfish"]

Cifre a localização do tesouro, armazenado em um GeoMarker e visualizado usando GeoGraphics, usando a chave gerada.


hiddenTreasure = Encrypt[skeletonKey, treasureMap]

Agora que os dados estão cifrados de forma segura usando uma chave local, carregue o mapa na Wolfram Cloud.

stowed = CloudPut[hiddenTreasure]
Para cobrir os rastros descarte o mapa original a chave usando Clear.

Clear[hiddenTreasure]

Clear[skeletonKey]
Como a chave foi derivada usando uma senha, você pode criar uma nova chave usando a entrada original.

newKey = GenerateSymmetricKey["Avast ye!", Method -> "Blowfish"]

A nova chave agora pode ser usada para referir-se ao mapa implementado na nuvem.

reclaimedMap = Decrypt[newKey, CloudGet[stowed]]

Extraia a localização do tesouro.

treasureLocation = reclaimedMap[[3, 2]]

Pergunte por instruções de viagem.

TravelDirections[{$GeoLocation, treasureLocation}]


Como não existe uma rota de direção para o tesouro, calcule a distância usando GeoDistance.

GeoDistance[$GeoLocation, treasureLocation]

Dada a distância, localize o aeroporto mais próximo ao tesouro.

airport = First[GeoNearest["Airport", treasureLocation]]

A distância do aeroporto para o tesouro.

GeoDistance[airport, treasureLocation]
