#include <StringConstants.au3> ; to declare the Constants of StringRegExp
#include <Array.au3> ; UDF needed for _ArrayDisplay and _ArrayConcatenate
Local $sRegex = "[幹乾淦贛干肏操糙去草塞賽]?[林賃吝零靈齡拎恁你他她它祂牠]([馬马量梁良糧涼娘妹媽]|老[師蘇詩屍濕溼]|奶奶|祖?(嬤|媽|罵))(的|樂|叻|垃|勒|咧|([基唧雞機激][掰歪]))?|[靠尻哭][杯倍背貝輩悖北盃悲卑揹腰邀妖夭幺么]|([基唧雞機激](車|[教轎窖嶠叫較趴葩]|[掰歪]))|(([魯盧擄虜盧爐]|[假呷吃甲賈卡]|[衝沖充銃欉謥]?[三殺沙砂啥])[小洨曉])|(破[麻目])|([俗卒][仔臘辣])|[賤屌肏操糙]|(幹(?![麻嘛嗎]|(啥|[蛇神什甚]麼|[好壞]事)))|(靠(?!在|的|他|你|妳|她))|([林賃吝拎恁你][霸爸北背])|([懶藍覽攬欖][教轎窖嶠叫較趴葩])|([白北度杜渡肚虎唬][爛濫纜藍覽懶])|(智[缺障仗丈瘴])|(去你的)|((?i)GG\s?IN\s?IN)|(想[樓揉])|(ㄈㄈ尺)|((?i)ccr|fuck|hell|shit|ass(hole)?|idiot|damn|bitch|phycho|bastard|Whore|Slut)"
Local $sString = "幹" & @CRLF & _
"幹嘛" & @CRLF & _
"幹麻" & @CRLF & _
"幹甚麼好事" & @CRLF & _
"幹他媽的" & @CRLF & _
"幹你娘" & @CRLF & _
"乾 " & @CRLF & _
"乾淨" & @CRLF & _
"乾林老師" & @CRLF & _
"靠 " & @CRLF & _
"靠北" & @CRLF & _
"靠你了" & @CRLF & _
"" & @CRLF & _
"靠北邊" & @CRLF & _
"靠杯" & @CRLF & _
"靠背" & @CRLF & _
"靠盃" & @CRLF & _
"靠腰" & @CRLF & _
"靠夭" & @CRLF & _
"哭夭" & @CRLF & _
"幹靈糧" & @CRLF & _
"去你的" & @CRLF & _
"去你媽的" & @CRLF & _
"" & @CRLF & _
"林北" & @CRLF & _
"恁北" & @CRLF & _
"恁娘" & @CRLF & _
"恁祖媽" & @CRLF & _
"機掰" & @CRLF & _
"賤" & @CRLF & _
"俗辣" & @CRLF & _
"他媽的" & @CRLF & _
"覽趴" & @CRLF & _
"懶趴" & @CRLF & _
"北爛" & @CRLF & _
"盧小" & @CRLF & _
"魯洨" & @CRLF & _
"色龜" & @CRLF & _
"肚爛" & @CRLF & _
"放屁" & @CRLF & _
"屁股" & @CRLF & _
"屌" & @CRLF & _
"啥小" & @CRLF & _
"三小" & @CRLF & _
"操" & @CRLF & _
"屁" & @CRLF & _
"唬爛" & @CRLF & _
"龜公" & @CRLF & _
"他奶奶的" & @CRLF & _
"犯賤" & @CRLF & _
"機車" & @CRLF & _
"智缺" & @CRLF & _
"你娘卡好" & @CRLF & _
"林老師" & @CRLF & _
"破麻" & @CRLF & _
"賽" & @CRLF & _
"操卒仔" & @CRLF & _
"操機歪" & @CRLF & _
"糙機掰" & @CRLF & _
"無懶趴" & @CRLF & _
"卡小" & @CRLF & _
"吃小" & @CRLF & _
"死魚眼" & @CRLF & _
"炭甲查某" & @CRLF & _
"糙你妹" & @CRLF & _
"GGININ" & @CRLF & _
"GG IN IN" & @CRLF & _
"GG IN IN DER" & @CRLF & _
"gginin" & @CRLF & _
"可惡 想揉" & @CRLF & _
"想揉" & @CRLF & _
"ㄈㄈ尺" & @CRLF & _
"" & @CRLF & _
"" & @CRLF & _
"英文原生：" & @CRLF & _
"CCR" & @CRLF & _
"Fuck off" & @CRLF & _
"Fuck" & @CRLF & _
"mother fucker" & @CRLF & _
"You SOB" & @CRLF & _
"son of a bitch" & @CRLF & _
"Go to hell" & @CRLF & _
"Shit-head" & @CRLF & _
"Asshole" & @CRLF & _
"You beast" & @CRLF & _
"Shit" & @CRLF & _
"fart" & @CRLF & _
"Idiot" & @CRLF & _
"damn it " & @CRLF & _
"God damn" & @CRLF & _
"God damn it" & @CRLF & _
"hypocrite" & @CRLF & _
"ass hole" & @CRLF & _
"ass licker" & @CRLF & _
"bitch " & @CRLF & _
"phycho" & @CRLF & _
"bastard" & @CRLF & _
"Whore" & @CRLF & _
"Slut" & @CRLF & _
"Shit-head" & @CRLF & _
""
Local $aArray = StringRegExp($sString, $sRegex, $STR_REGEXPARRAYGLOBALFULLMATCH)
Local $aFullArray[0]
For $i = 0 To UBound($aArray) -1
_ArrayConcatenate($aFullArray, $aArray[$i])
Next
$aArray = $aFullArray
; Present the entire match result
_ArrayDisplay($aArray, "Result")
Please keep in mind that these code samples are automatically generated and are not guaranteed to work. If you find any syntax errors, feel free to submit a bug report. For a full regex reference for AutoIt, please visit: https://www.autoitscript.com/autoit3/docs/functions/StringRegExp.htm