Add files via upload

olsky · May 31, 2016 · 3dc592a · 3dc592a
1 parent c24df64
commit 3dc592a
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/examples/simple.pl b/examples/simple.pl
@@ -0,0 +1,7 @@
+:- use_module(library(mqtt)).
+
+simple_pub(Topic, Value) :-
+  mqtt_connect(A, 'localhost', 1883, [alias(swi_mqtt), client_id(swi_mqtt_client), keepalive(120), is_async(false)]),
+  mqtt_pub(A, Topic, Value),
+  mqtt_disconnect(A).
+