Allow arbitrary syndromes for add-thought

Closes DFHack/dfhack#904

add-thought.lua

@@ -14,8 +14,22 @@ local utils=require('utils')
 
 function addEmotionToUnit(unit,thought,emotion,severity,strength,subthought)
     local emotions=unit.status.current_soul.personality.emotions
-    if not (type(emotion)=='number') then emotion=df.emotion_type[emotion] end
-    if not (type(thought)=='number') then thought=df.unit_thought_type[thought] end
+    if not (type(emotion)=='number') then
+        emotion=df.emotion_type[emotion]
+    end
+    local properThought=nil
+    if not (type(thought)=='number') then
+        properThought=df.unit_thought_type[thought]
+        if not properThought then
+            for k,syn in ipairs(df.global.world.raws.syndromes.all) do
+                if syn.syn_name==thought then
+                    properThought=df.unit_thought_type['Syndrome']
+                    subthought=syn.id
+                    break
+                end
+            end
+        end
+    end
     emotions:insert('#',{new=df.unit_personality.T_emotions,
     type=emotion,
     unk2=1,