Updates to the igjaruk-quest

src/scripts/default.lua

@@ -1,3 +1,63 @@
+function unitid(u)
+  return u.name .. " (" .. itoa36(u.id) .. ")"
+end
+
+function teleport_all(map, grave)
+  print("- teleporting all quest members to the grave")
+  local index
+  for index in map do
+    local r = map[index]
+	local u
+	for u in r.units do
+	  u.region = grave
+	  print ("  .teleported " .. unitid(u))
+	  grave:add_notice("Ein Portal öffnet sich, und " .. u.name .. " erscheint in " .. grave.name)
+	end
+  end
+end
+
+function wyrm()
+ print("- running the wyrm quest")
+ local grave = get_region(-9995,4)
+ local plane = find_plane_id("arena")
+ local map = {}
+ local mapsize = 0
+ for r in regions() do
+   mapsize=mapsize+1
+   map[mapsize] = r
+ end
+
+ local u
+ for u in grave.units do
+   if u.faction.id~=atoi36("rr") then
+     teleport_all(map, grave)
+	 break
+   end
+ end
+
+ local index
+ for index in map do
+  local r = map[index]
+  if r.x~=grave.x or r.y~=grave.y then
+   if (math.mod(r.x,2)==math.mod(get_turn(),2)) then
+     r:add_notice("Eine Botschaft von Igjarjuk, Herr der Wyrme: 'Die Zeit des Wartens ist beinahe vorrüber. Euer Fürst kehrt aus dem Grabe zurück.'")
+   else
+     r:add_notice("Eine Botschaft von Gwaewar, Herr der Greife: 'Das Ende naht. Igjarjuk ist aus seinem Grab auferstanden. Eilt, noch ist die Welt zu retten!'")
+   end
+  end
+ end
+
+ local gryph=get_unit(atoi36("gfd4"))
+ local igjar=get_unit(atoi36("igjr"))
+ if grave~=nil and gryph~=nil and igjar~=nil then
+  gryph.region=grave
+  igjar.region=grave
+  grave:add_notice("Eine Botschaft von Gwaewar, Herr der Greife: 'Ihr, die Ihr die Strapazen der letzten Jahre überstanden habt: Lasst nicht zu, dass Igjarjuk wieder in die Welt der Lebenden zurückkehrt. Vernichtet das Auge - jetzt und hier!'")
+  grave:add_notice("Eine Botschaft von Igjarjuk, Herr der Wyrme: 'Gwaewar, Du wirst dereinst an Deinem Glauben an das Gute in den Sterblichen verrecken... So wie ich es einst tat. Der Krieg ist die einzige Sprache die sie verstehen, und derjenige, der mir hilft, wird ihn gewinnen.'")
+ end
+
+end
+
 function write_emails()
   local locales = { "de", "en" }
   local files = {}
@@ -35,6 +95,10 @@ function process(orders)
   -- run the turn:
   read_orders(orders)
   process_orders()
+  
+  -- igjarjuk special
+  wyrm()
+
   write_passwords()
   write_reports()