From 781f75cf21b89ad1300491a60e2951f45dd4978d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Remko=20Tron=C3=A7on?= <git@el-tramo.be>
Date: Sun, 27 Feb 2011 13:14:36 +0100
Subject: Sluift echobot.


diff --git a/Sluift/Examples/EchoBot.lua b/Sluift/Examples/EchoBot.lua
new file mode 100644
index 0000000..09da63b
--- /dev/null
+++ b/Sluift/Examples/EchoBot.lua
@@ -0,0 +1,27 @@
+--
+-- Copyright (c) 2010 Remko Tronçon
+-- Licensed under the GNU General Public License v3.
+-- See Documentation/Licenses/GPLv3.txt for more information.
+--
+
+--
+-- An XMPP Echoing Bot
+--
+-- This script logs into an XMPP server, sends initial presence,
+-- and then waits for incoming messages, and echoes them back.
+-- 
+-- The following environment variables are used:
+-- * SLUIFT_JID, SWIFT_PASS: JID and password to log in with
+-- * SLUIFT_DEBUG: Sets whether debugging should be turned on
+-- 
+
+require "sluift"
+
+sluift.debug = os.getenv("SLUIFT_DEBUG") or false
+
+c = sluift.new_client(os.getenv("SLUIFT_JID"), os.getenv("SLUIFT_PASS"))
+c:connect()
+c:send_presence("Send me a message")
+c:for_event(function(e) 
+		if e["type"] == "message" then c:send_message(e["from"], e["body"]) end 
+	end)
diff --git a/Sluift/Examples/Login.lua b/Sluift/Examples/Login.lua
new file mode 100644
index 0000000..52c1521
--- /dev/null
+++ b/Sluift/Examples/Login.lua
@@ -0,0 +1,24 @@
+--
+-- Copyright (c) 2010 Remko Tronçon
+-- Licensed under the GNU General Public License v3.
+-- See Documentation/Licenses/GPLv3.txt for more information.
+--
+
+-- This script logs into an XMPP server, and sends initial presence
+-- Useful as initialization script for an interactive session ('-i')
+-- 
+-- The following environment variables are used:
+-- * SLUIFT_JID, SWIFT_PASS: JID and password to log in with
+-- * SLUIFT_OPTIONS: Client options to use (e.g. "{compress = false}")
+-- * SLUIFT_DEBUG: Sets whether debugging should be turned on
+
+require "sluift"
+sluift.debug = os.getenv("SLUIFT_DEBUG") or false
+
+print("Connecting " .. os.getenv("SLUIFT_JID") .. " ...")
+c = sluift.new_client(os.getenv("SLUIFT_JID"), os.getenv("SLUIFT_PASS"))
+c:set_options(os.getenv("SLUIFT_OPTIONS") or {})
+c:connect()
+c:send_presence("")
+
+print("Connected ...")
diff --git a/Sluift/login.lua b/Sluift/login.lua
deleted file mode 100644
index 52c1521..0000000
--- a/Sluift/login.lua
+++ /dev/null
@@ -1,24 +0,0 @@
---
--- Copyright (c) 2010 Remko Tronçon
--- Licensed under the GNU General Public License v3.
--- See Documentation/Licenses/GPLv3.txt for more information.
---
-
--- This script logs into an XMPP server, and sends initial presence
--- Useful as initialization script for an interactive session ('-i')
--- 
--- The following environment variables are used:
--- * SLUIFT_JID, SWIFT_PASS: JID and password to log in with
--- * SLUIFT_OPTIONS: Client options to use (e.g. "{compress = false}")
--- * SLUIFT_DEBUG: Sets whether debugging should be turned on
-
-require "sluift"
-sluift.debug = os.getenv("SLUIFT_DEBUG") or false
-
-print("Connecting " .. os.getenv("SLUIFT_JID") .. " ...")
-c = sluift.new_client(os.getenv("SLUIFT_JID"), os.getenv("SLUIFT_PASS"))
-c:set_options(os.getenv("SLUIFT_OPTIONS") or {})
-c:connect()
-c:send_presence("")
-
-print("Connected ...")
-- 
cgit v0.10.2-6-g49f6