grab the examples

Author: deft-code

general.lua

@@ -0,0 +1,38 @@
+say("I Am the Very Model of a Modern Major-General")
+
+wait(seconds(10))
+
+send("soldier", "Report in")
+
+function even(id)
+  return id % 2 == 0
+end
+
+self = even(me().Id)
+
+done = false
+
+id = me().Id
+
+spawn("secretary", function()
+  say("I am the secretary")
+  wait(minutes(1))
+  say("We're done here")
+  done = true
+  send(id, "Go home")
+end)
+
+while not done do
+  msg = wait(any_msg())
+  if msg.Src.Kind == "soldier" then
+    if self == even(msg.Src.Id) then
+      send(msg.Src.Id, "Prepare for battle")
+    else
+      say("I don't like %s", msg.Src.Name)
+    end
+  elseif msg.Src.Kind == "orc" then
+    say("We'll handle you %s", msg.Src.Name)
+  end
+end
+
+say("I guess we're done")

orc.lua

@@ -0,0 +1,11 @@
+say("I live to serve")
+
+wait(seconds(me().Id*2))
+
+say("I'm getting impatient")
+
+wait(seconds(20))
+
+say("I'm done waiting")
+
+send("soldier", "Die human!")

soldier.lua

@@ -0,0 +1,28 @@
+say("Soldier on duty!")
+
+msg = wait(msg_from("general"))
+
+send(msg.Src.Id, "Reporting for duty")
+
+which, msg = wait(any(msg_from("general"), seconds(20)))
+
+attacking = false
+if which == 1 then
+  say("The general says %q", msg.Msg)
+  attacking = true
+else
+  say("forever alone :.(")
+end
+
+repeat
+  which, msg = wait(any(msg_from("orc"), seconds(20)))
+  if which == 1 then
+    if attacking then
+      say("Attack %s", msg.Src.Name)
+    else
+      say("Run Away! Run Away!")
+    end
+  end
+until which == 2
+
+say("To the tavern to celebrate")