Fixed 0AB1 input argument count verification for string arrays. (#50)

* Fixed 0AB1 input argument count verification for string arrays.�Enabled using string array argument as module name in 0AB1.

* Added function comments.

* Updated parameter type checks.

cleo_sdk/CLEO.h

@@ -97,42 +97,96 @@ static const char* ToStr(eDataType type)
 	default: return "corrupted";
 	}
 }
+static bool IsImmInteger(eDataType type) // immediate/literal integer in code like 42
+{
+	switch (type)
+	{
+		case DT_BYTE:
+		case DT_WORD:
+		case DT_DWORD:
+			return true;
+	}
+	return false;
+}
+static bool IsImmFloat(eDataType type) // immediate/literal float in code like 42.0
+{
+	return type == DT_FLOAT;
+}
+static bool IsImmString(eDataType type) // immediate/literal string in code like "text"
+{
+	switch (type)
+	{
+		case DT_STRING:
+		case DT_TEXTLABEL:
+		case DT_VARLEN_STRING:
+			return true;
+	}
+	return false;
+}
+static bool IsVarString(eDataType type) // string variable
+{
+	switch (type)
+	{
+		case DT_LVAR_TEXTLABEL:
+		case DT_LVAR_TEXTLABEL_ARRAY:
+		case DT_LVAR_STRING:
+		case DT_LVAR_STRING_ARRAY:
+		case DT_VAR_TEXTLABEL:
+		case DT_VAR_TEXTLABEL_ARRAY:
+		case DT_VAR_STRING:
+		case DT_VAR_STRING_ARRAY:
+			return true;
+	}
+	return false;
+}
+static bool IsVariable(eDataType type) // can carry int, float, pointer to text
+{
+	switch (type)
+	{
+		case DT_VAR:
+		case DT_VAR_ARRAY:
+		case DT_LVAR:
+		case DT_LVAR_ARRAY:
+			return true;
+	}
+	return false;
+}
 static const char* ToKindStr(eDataType type)
 {
 	switch (type)
 	{
-	case DT_BYTE:
-	case DT_WORD:
-	case DT_DWORD:
-		return "int"; break;
-
-	case DT_FLOAT:
-		return "float"; break;
-
-	case DT_STRING:
-	case DT_TEXTLABEL:
-	case DT_LVAR_TEXTLABEL:
-	case DT_LVAR_TEXTLABEL_ARRAY:
-	case DT_LVAR_STRING:
-	case DT_LVAR_STRING_ARRAY:
-	case DT_VAR_TEXTLABEL:
-	case DT_VAR_TEXTLABEL_ARRAY:
-	case DT_VAR_STRING:
-	case DT_VAR_STRING_ARRAY:
-	case DT_VARLEN_STRING:
-		return "string"; break;
-
-	case DT_VAR:
-	case DT_VAR_ARRAY:
-	case DT_LVAR:
-	case DT_LVAR_ARRAY:
-		return "variable"; break;
-
-	case DT_END:
-		return "varArgEnd"; break;
-
-	default:
-		return "corrupted"; break;
+		case DT_BYTE:
+		case DT_WORD:
+		case DT_DWORD:
+			return "int"; break;
+
+		case DT_FLOAT:
+			return "float"; break;
+
+		case DT_STRING:
+		case DT_TEXTLABEL:
+		case DT_LVAR_TEXTLABEL:
+		case DT_LVAR_TEXTLABEL_ARRAY:
+		case DT_LVAR_STRING:
+		case DT_LVAR_STRING_ARRAY:
+		case DT_VAR_TEXTLABEL:
+		case DT_VAR_TEXTLABEL_ARRAY:
+		case DT_VAR_STRING:
+		case DT_VAR_STRING_ARRAY:
+		case DT_VARLEN_STRING:
+			return "string"; break;
+
+		case DT_VAR:
+		case DT_VAR_ARRAY:
+		case DT_LVAR:
+		case DT_LVAR_ARRAY:
+			return "variable"; break;
+
+		case DT_END:
+			return "varArgEnd"; break;
+
+		default:
+			return "corrupted"; break;
 	}
 }