#include <MsgBoxConstants.au3> ; to declare the Constants of MsgBox
Local $sRegex = "(?s)M220 S100 ;Reset Feedrate"
Local $sString = ";FLAVOR:Marlin" & @CRLF & _
";TIME:61888" & @CRLF & _
";Filament used: 161.602m" & @CRLF & _
";Layer height: 0.26" & @CRLF & _
";MINX:5.123" & @CRLF & _
";MINY:7.763" & @CRLF & _
";MINZ:0.3" & @CRLF & _
";MAXX:294.329" & @CRLF & _
";MAXY:283.097" & @CRLF & _
";MAXZ:98.66" & @CRLF & _
";Generated with Cura_SteamEngine 4.11.0" & @CRLF & _
"M140 S60" & @CRLF & _
"M105" & @CRLF & _
"M190 S60" & @CRLF & _
"M104 S195" & @CRLF & _
"M105" & @CRLF & _
"M109 S195" & @CRLF & _
"M82 ;absolute extrusion mode" & @CRLF & _
"M201 X500.00 Y500.00 Z1000.00 E5000.00 ;Setup machine max acceleration" & @CRLF & _
"M203 X500.00 Y500.00 Z12.00 E120.00 ;Setup machine max feedrate" & @CRLF & _
"M204 P1250.00 R2250.00 T1250.00 ;Setup Print/Retract/Travel acceleration" & @CRLF & _
"M205 X10.00 Y10.00 Z0.40 E2.50 ;Setup Jerk" & @CRLF & _
"M220 S100 ;Reset Feedrate" & @CRLF & _
"M221 S100 ;Reset Flowrate" & @CRLF & _
"" & @CRLF & _
"G28 ; home all axes" & @CRLF & _
"M117 Purge extruder" & @CRLF & _
"G92 E0 ; reset extruder" & @CRLF & _
"G1 Z1.0 F3000 ; move z up little to prevent scratching of surface" & @CRLF & _
"G1 X2 Y20 Z0.3 F5000.0 ; move to start-line position" & @CRLF & _
"G1 X2 Y200.0 Z0.3 F1500.0 E15 ; draw 1st line" & @CRLF & _
"G1 X2 Y200.0 Z0.4 F5000.0 ; move to side a little" & @CRLF & _
"G1 X2 Y20 Z0.4 F1500.0 E30 ; draw 2nd line" & @CRLF & _
"G92 E0 ; reset extruder" & @CRLF & _
"G1 Z1.0 F3000 ; move z up little to prevent scratching of surface" & @CRLF & _
"G92 E0" & @CRLF & _
"G92 E0" & @CRLF & _
"G1 F2400 E-1.5" & @CRLF & _
";LAYER_COUNT:377" & @CRLF & _
";LAYER:0" & @CRLF & _
"M107" & @CRLF & _
"G1 F600 Z0.9" & @CRLF & _
";MESH:E.stl" & @CRLF & _
"G0 F7200 X183.805 Y131.583 Z0.9" & @CRLF & _
";TYPE:WALL-OUTER" & @CRLF & _
"G1 F600 Z0.3" & @CRLF & _
"G1 F2400 E0.24945" & @CRLF & _
"G1 F1200 X183.805 Y134.317 E0.65456" & @CRLF & _
"G1 X189.081 Y134.317 E1.43632" & @CRLF & _
"G1 X189.081 Y135.404 E1.59739" & @CRLF & _
"G1 X184.172 Y135.404 E2.32477" & @CRLF & _
"G1 X184.172 Y138.131 E2.72884" & @CRLF & _
"G1 X189.081 Y138.131 E3.45623" & @CRLF & _
"G1 X189.081 Y139.712 E3.69049" & @CRLF & _
"G1 X183.618 Y139.712 E4.49997" & @CRLF & _
"G1 X183.618 Y142.44 E4.90419" & @CRLF & _
"G1 X192.135 Y142.44 E6.16618" & @CRLF & _
"G1 X192.135 Y131.583 E7.77491" & @CRLF & _
"G1 X184.113 Y131.583 E8.96356" & @CRLF & _
"G0 F600 X183.805 Y131.583" & @CRLF & _
"G0 F7200 X183.805 Y132.583" & @CRLF & _
"G0 X182.617 Y132.583" & @CRLF & _
"G1 F2400 E7.46356" & @CRLF & _
"G1 F600 Z0.9" & @CRLF & _
"G0 F7200 X187.241 Y124.597 Z0.9" & @CRLF & _
"G1 F600 Z0.3" & @CRLF & _
"G1 F2400 E9.21301" & @CRLF & _
"G1 F1200 X186.584 Y124.662 E9.31083" & @CRLF & _
"G1 X185.952 Y124.854 E9.40871" & @CRLF & _
"G1 X185.37 Y125.165 E9.50648" & @CRLF & _
"G1 X184.86 Y125.586 E9.60447" & @CRLF & _
"G1 X184.441 Y126.095 E9.70216" & @CRLF & _
"G1 X184.13 Y126.678 E9.80007" & @CRLF & _
"G1 X183.938 Y127.309 E9.8978" & @CRLF & _
"G1 X183.874 Y127.968 E9.99591" & @CRLF & _
"G1 X183.938 Y128.625 E10.09372" & @CRLF & _
"G1 X184.13 Y129.256 E10.19145" & @CRLF & _
"G1 X184.442 Y129.84 E10.28956" & @CRLF & _
"G1 X184.86 Y130.349 E10.38715" & @CRLF & _
"G1 X185.372 Y130.768 E10.48518" & @CRLF & _
"G1 X185.954 Y131.079 E10.58296" & @CRLF & _
"G1 X186.586 Y131.271 E10.68083" & @CRLF & _
"G1 X187.243 Y131.336 E10.77865" & @CRLF & _
"G1 X187.9 Y131.271 E10.87648" & @CRLF & _
"G1 X188.532 Y131.079 E10.97435" & @CRLF & _
"G1 X189.116 Y130.767 E11.07246" & @CRLF & _
"G1 X189.625 Y130.347 E11.17024" & @CRLF & _
"G1 X190.044 Y129.838 E11.26793" & @CRLF & _
"G1 X190.355 Y129.255 E11.36584" & @CRLF & _
"G1 X190.547 Y128.624 E11.46357" & @CRLF & _
"G1 X190.612 Y127.965 E11.56169" & @CRLF & _
"G1 X190.547 Y127.309 E11.65937" & @CRLF & _
"G1 X190.355 Y126.677 E11.75724" & @CRLF & _
"G1 X190.044 Y126.094 E11.85515" & @CRLF & _
"G1 X189.624 Y125.583 E11.95316" & @CRLF & _
"G1 X189.114 Y125.165 E12.05086" & @CRLF & _
"G1 X188.53 Y124.854 E12.1489" & @CRLF & _
"G1 X187.899 Y124.662 E12.24663" & @CRLF & _
"G1 X187.547 Y124.627 E12.29905" & @CRLF & _
"G0 F600 X187.241 Y124.597" & @CRLF & _
"G0 F7200 X186.584 Y124.662" & @CRLF & _
"G0 X186.259 Y124.76" & @CRLF & _
"G0 X185.915 Y123.623"
Local $sSubst = "M220 S80 ;Reset Feedrate"
Local $sResult = StringRegExpReplace($sString, $sRegex, $sSubst)
MsgBox($MB_SYSTEMMODAL, "Result", $sResult)
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