added LSL2 stored procedures

LSL2/STPROC/FIRST_CAPS.txt

@@ -0,0 +1,17 @@
+Subroutine First_Caps(Conv, Ans, Branch, Return_data)
+
+Return_data = ""
+If Ans NE "" then
+	Convert @Upper_case to @Lower_case in Ans
+	Len_ans = Len(Ans)
+	For Loop = 1 to Len_ans
+		Cur_char = Ans[Loop, 1]
+		If (Loop EQ 1) OR (Ans[(Loop - 1), 1] EQ " ") then
+			Convert @Lower_case to @Upper_case in Cur_char
+		end
+		Return_data := Cur_char
+	Next Loop
+	Swap "C/o " with "c/o " in Return_data 
+end
+
+Return