#cs Example:

Local $a =4, $b = 5, $column = 14
_ConsoleDebugCondition('Bedingung-False', $a=$b, @ScriptLineNumber, $column)

_ConsoleDebugCondition('Bedingung-True', $a<>$b, @ScriptLineNumber)

_ConsoleDebugColor('Text grün', @ScriptLineNumber, $column, 11)

_ConsoleDebugColor('Text orange', @ScriptLineNumber, $column, 12)
​
​_ConsoleDebugColor('Text rot o. Spalte', @ScriptLineNumber, 0, 10)

; Output:
!@@ Debug(753,14) : Bedingung-False
>@@ Debug(755) : Bedingung-True
+@@ Debug(757,14) : Text grün
-@@ Debug(759,14) : Text orange
!@@ Debug(761) : Text rot o. Spalte
#ce


#cs
$iStyleErr    Standard
    4  (>)     blau
   10  (!)     rot
   11  (+)     grün
   12  (- <)   orange
#ce
Func _ConsoleDebugColor($sText, $iLine, $iCol=0, $iStyleErr=10)
	Local $sStyle
	Switch $iStyleErr
		Case 4
			$sStyle = '>'
		Case 10
			$sStyle = '!'
		Case 11
			$sStyle = '+'
		Case 12
			$sStyle = '-'
	EndSwitch
	ConsoleWrite(StringFormat('%s@@ Debug(%d%s) : %s', $sStyle, $iLine, ($iCol > 0 ? ',' & $iCol : ''), $sText) & @CRLF)
EndFunc

Func _ConsoleDebugCondition($sText, $bCondition, $iLine, $iCol=0, $iStyleTrue=4, $iStyleFalse=10)
	_ConsoleDebugColor($sText, $iLine, $iCol, ($bCondition ? $iStyleTrue : $iStyleFalse))
EndFunc