Major update:

Add new features to claim and unclaim.
Sort help from a-z.
Sort functions into diff lua files.

diplomacy_events.lua

@@ -0,0 +1,89 @@
+function factions.start_diplomacy(name, faction)
+	for l, i in pairs(factions.get_faction_list()) do
+		local fac = factions.factions.get(i)
+		if i ~= name and not (faction.neutral[i] or faction.allies[i] or faction.enemies[i]) then
+			if factions_config.faction_diplomacy == true then
+				factions.new_neutral(name, i)
+				factions.new_neutral(i, name)
+			else
+				factions.new_enemy(name, i)
+				factions.new_enemy(i, name)
+			end
+		end
+	end
+end
+
+function factions.new_alliance(name, faction)
+	local bfaction = factions.factions.get(name)
+	
+    bfaction.allies[faction] = true
+    factions.on_new_alliance(name, faction)
+    if bfaction.enemies[faction] then
+        factions.end_enemy(name, faction)
+    end
+	if bfaction.neutral[faction] then
+        factions.end_neutral(name, faction)
+    end
+    
+	factions.factions.set(name, bfaction)
+end
+
+function factions.end_alliance(name, faction)
+    local bfaction = factions.factions.get(name)
+	
+	bfaction.allies[faction] = nil
+    factions.on_end_alliance(name, faction)
+    
+	factions.factions.set(name, bfaction)
+end
+
+function factions.new_neutral(name, faction)
+	local bfaction = factions.factions.get(name)
+	
+    bfaction.neutral[faction] = true
+    
+	factions.on_new_neutral(name, faction)
+    if bfaction.allies[faction] then
+        factions.end_alliance(name, faction)
+    end
+    if bfaction.enemies[faction] then
+        factions.end_enemy(name, faction)
+    end
+    
+	factions.factions.set(name, bfaction)
+end
+
+function factions.end_neutral(name, faction)
+    local bfaction = factions.factions.get(name)
+	
+	bfaction.neutral[faction] = nil
+    factions.on_end_neutral(name, faction)
+    
+	factions.factions.set(name, bfaction)
+end
+
+function factions.new_enemy(name, faction)
+	local bfaction = factions.factions.get(name)
+	
+	bfaction.enemies[faction] = true
+    factions.on_new_enemy(name, faction)
+	
+    if bfaction.allies[faction] then
+        factions.end_alliance(name, faction)
+    end
+	
+	if bfaction.neutral[faction] then
+        factions.end_neutral(name, faction)
+    end
+    
+	factions.factions.set(name, bfaction)
+end
+
+function factions.end_enemy(name, faction)
+    local bfaction = factions.factions.get(name)
+	
+	bfaction.enemies[faction] = nil
+    factions.on_end_enemy(name, faction)
+    
+	factions.factions.set(name, bfaction)
+end