DEPLOYMENT & SOURCE CODE FOR:​
Instant Apps for the Apple Watch
with the Wolfram Language

Open in Programming Cloud
Open in Mathematica Online
This notebook accompanies Stephen Wolfram’s blog post “Instant Apps for the Apple Watch with the Wolfram Language”.

Using the Apps

To use the apps defined in this notebook, you need to deploy them to your Wolfram Cloud account. Do this by pressing the Deploy as App button in each section (or evaluating the code in the Deployment Code section).
To see the apps on your phone, get and open the Wolfram Cloud app, then go to the WatchApps folder.
(Because of a temporary glitch with the preliminary version of the Wolfram Cloud app, you first need to go to Settings for the app and set Show Hidden Files on.)
To deploy the apps to your Apple Watch, touch the watch icon at the top of the WatchApps folder display on the phone, select the apps, and press Save.
Now you’re ready to run the apps on your watch.
(The preliminary version of the Wolfram Cloud app requires that this app is actively running on the phone for you to be able to run Wolfram Cloud-based apps on your watch.)

Exploring the Wolfram Language Code in This Notebook

You can edit and re-evaluate all the code in this notebook. Remember to use Shift+Enter to evaluate code.
If you want to save your changes, select File > Duplicate first to make a new copy.
To deploy new versions of apps, open the Deployment Code using the cell opener on the right, add your modifications, then evaluate. If you don’t change the name specified, your changed version will overwrite the existing one.
You can download this notebook to the Wolfram Desktop (or any Wolfram Language system, including Mathematica), and modify and redeploy directly from there.
WOLFRAM LANGUAGE CODE

Random Number

Deploy as App
In[]:=
RandomInteger[1000]
Out[]=
389

Deployment Code


Coin Flip

Deploy as App
In[]:=
RandomChoice
,

Out[]=

Deployment Code


Rock Paper Scissors

Deploy as App
In[]:=
RandomChoice
,
,

Out[]=

Deployment Code


Random Pokémon

Deploy as App
In[]:=
EntityValue[EntityValue["Pokemon","RandomEntity"],{"Image","Name"}]
Out[]=

,Nincada

Deployment Code


Word Inventor

Deploy as App
In[]:=
vowels={"a","e","i","o","u"};​​consonants=Complement[CharacterRange["a","z"],vowels];​​Style[StringJoin[Flatten[Table[{RandomChoice[consonants],RandomChoice[vowels]},{3}]]],150]
Out[]=
ketozo

Deployment Code


Kitty Clock

Deploy as App
ClockGaugeNow,PlotTheme"Minimal",GaugeMarkers
,
,None,BackgroundBlack,TicksStyleWhite,ImageSize330

Deployment Code


Pi Clock

Deploy as App
In[]:=
pi=Characters[ToString[N[Pi,65000]]];​​n=Length[time=Characters[DateString[{"Hour12Short","Minute"}]]];​​pos=First[First[SequencePosition[pi,time]]];​​Rasterize[Style[Column[{Grid[Partition[Join[Take[pi,14],Characters["..."],Take[pi,{pos-20+n,pos-1}],Style[#,Orange]&/@Take[pi,{pos,pos+n-1}],Take[pi,pos+{n,n+2}],Style[#,Orange]&/@Insert[Characters[" "],"|",8-n]],10],Spacings{0,0}],Style[Row[{Spacer[60],"digit ",pos}],Orange,36]},Spacings0],60,BackgroundBlack,FontColorWhite],BackgroundBlack]

Latitude / Longitude

Here & Now QR

Nearest Volcanoes

3D Topography

ISS Locator

Apple Quanting

Market Word Cloud

Currency Converter

Sunrise/Sunset

Temperature History

Sunburn Time

Email Backlog

Company Fridge

Data Droplets

Mail My Location

Birthday Countdown

Sample Generated App Code

World Clocks

Sample Generated App Code

You Clock

Sample Generated App Code