Text can now be formatted

- Added black to the colors
- Fixed setStroke to be skipped when needed

scripts/dojs.vbs

@@ -7,7 +7,7 @@ else
 	path = wScript.Arguments(0)
 	args = wScript.Arguments(1)
 	error = appRef.DoJavaScriptFile(path, Split(args, ","))
-	if Not error = "true" Then
+	if Not error = "true" and Not error = "[ActionDescriptor]" and Not error = "undefined" Then
 		Err.raise 1, "dojs.vbs", error
 	end if
 end if