#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Change2CUI=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include <WinAPI.au3>
#include "Quoted-printable.au3"

; Beispiel 1 :
; ------------
; --> Störung
_Decode('St=C3=B6rung')

; Beispiel 2 :
; ------------
; --> Dies ist ein längerer großer Text mit den Umlauten Ä Ö und Ü sowie ä ö und ü. Außerdem das sz, also ß und Zeichen wie ? % $ § & !
_Decode('Dies ist ein l=C3=A4ngerer gro=C3=9Fer Text mit den Umlauten =C3=84 =C3=96 und =C3=9C sowie =C3=A4 =C3=B6 und =C3=BC. Au=C3=9Ferdem das sz, also =C3=9F und Zeichen wie ? % $ =C2=A7 & !')

Func _Decode($sSourceString)
	Local Static $iCount = 1
	Local $sDestString = _QuotedPrintable_DecodeEncodedWord("=?utf-8?Q?" & $sSourceString & "?=")
	ConsoleWrite("+ Original : " & $sSourceString & @CRLF)
	ConsoleWrite("> Decoded  : " & _WinAPI_WideCharToMultiByte($sDestString, @Compiled ? 1 : 65001) & @CRLF)
	MsgBox(64, 'Beispiel '&$iCount&' : ', 'Original : ' & $sSourceString & @CRLF & @CRLF & 'Decoded : ' & $sDestString)
	$iCount += 1
EndFunc