#include <StringConstants.au3> ; to declare the Constants of StringRegExp
#include <Array.au3> ; UDF needed for _ArrayDisplay and _ArrayConcatenate
Local $sRegex = "在此输入你的正则表达式"
Local $sString = "A("Excalibur", "誓约胜利之剑", LONG_SWORD, (SPFX_NOGEN | SPFX_RESTR | SPFX_SEEK | SPFX_DEFN | SPFX_INTEL | SPFX_SEARCH), " & @CRLF & _
" 0, 0, PHYS(5, 10), DRLI(0, 0), NO_CARY, 0, A_LAWFUL, PM_KNIGHT, NON_PM, 4000L, NO_COLOR);" & @CRLF & _
"/*" & @CRLF & _
" * Stormbringer only has a 2 because it can drain a level," & @CRLF & _
" * providing 8 more." & @CRLF & _
" */" & @CRLF & _
"A("Stormbringer", "兴风者", RUNESWORD," & @CRLF & _
" (SPFX_RESTR | SPFX_ATTK | SPFX_DEFN | SPFX_INTEL | SPFX_DRLI), 0, 0," & @CRLF & _
" DRLI(5, 2), DRLI(0, 0), NO_CARY, 0, A_CHAOTIC, NON_PM, NON_PM, 8000L," & @CRLF & _
" NO_COLOR);" & @CRLF & _
"/*" & @CRLF & _
" * Mjollnir will return to the hand of the wielder when thrown" & @CRLF & _
" * if the wielder is a Valkyrie wearing Gauntlets of Power." & @CRLF & _
" */" & @CRLF & _
"A("Mjollnir", "雷神之锤", WAR_HAMMER, /* Mjo:llnir */" & @CRLF & _
" (SPFX_RESTR | SPFX_ATTK), 0, 0, ELEC(5, 24), NO_DFNS, NO_CARY, 0," & @CRLF & _
" A_NEUTRAL, PM_VALKYRIE, NON_PM, 4000L, NO_COLOR);" & @CRLF & _
"A("Cleaver", "撕裂者", BATTLE_AXE, SPFX_RESTR, 0, 0, PHYS(3, 6), NO_DFNS, NO_CARY, 0, A_NEUTRAL, PM_BARBARIAN, NON_PM, 1500L, NO_COLOR);" & @CRLF & _
"/*" & @CRLF & _
" * Grimtooth glows in warning when elves are present, but its" & @CRLF & _
" * damage bonus applies to all targets rather than just elves" & @CRLF & _
" * (handled as special case in spec_dbon())." & @CRLF & _
" */" & @CRLF & _
"A("Grimtooth", "邪兽之牙", ORCISH_DAGGER, (SPFX_RESTR | SPFX_WARN | SPFX_DFLAG2)," & @CRLF & _
" 0, M2_ELF, PHYS(2, 6), NO_DFNS," & @CRLF & _
" NO_CARY, 0, A_CHAOTIC, NON_PM, PM_ORC, 300L, CLR_RED);" & @CRLF & _
"/*" & @CRLF & _
" * Orcrist and Sting have same alignment as elves." & @CRLF & _
" *" & @CRLF & _
" * The combination of SPFX_WARN+SPFX_DFLAG2+M2_value will trigger" & @CRLF & _
" * EWarn_of_mon for all monsters that have the M2_value flag." & @CRLF & _
" * Sting and Orcrist will warn of M2_ORC monsters." & @CRLF & _
" */" & @CRLF & _
"A("Orcrist", "杀兽剑", ELVEN_BROADSWORD, (SPFX_WARN | SPFX_DFLAG2), 0, M2_ORC, PHYS(5, 0), " & @CRLF & _
" NO_DFNS, NO_CARY, 0, A_CHAOTIC, NON_PM, PM_ELF, 2000L, CLR_BRIGHT_BLUE); /* bright blue is actually light blue */"
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