From ba02aa671915031844b5f6584df8a3944801aabe Mon Sep 17 00:00:00 2001 From: Oto Ciulis Date: Sun, 17 Nov 2024 18:44:28 -0800 Subject: [PATCH] Adding script to remove directories and files --- scripts/installer.nsh | 63 +------------------------------------------ 1 file changed, 1 insertion(+), 62 deletions(-) diff --git a/scripts/installer.nsh b/scripts/installer.nsh index 43257a4c..ec29530f 100644 --- a/scripts/installer.nsh +++ b/scripts/installer.nsh @@ -1,67 +1,6 @@ !include 'LogicLib.nsh' -!define UnStrStr "!insertmacro UnStrStr" - -!macro UnStrStr ResultVar String SubString - Push `${String}` - Push `${SubString}` - Call UnStrStr - Pop `${ResultVar}` -!macroend - -Function UnStrStr -/*After this point: - ------------------------------------------ - $R0 = SubString (input) - $R1 = String (input) - $R2 = SubStringLen (temp) - $R3 = StrLen (temp) - $R4 = StartCharPos (temp) - $R5 = TempStr (temp)*/ - - ;Get input from user - Exch $R0 - Exch - Exch $R1 - Push $R2 - Push $R3 - Push $R4 - Push $R5 - - ;Get "String" and "SubString" length - StrLen $R2 $R0 - StrLen $R3 $R1 - ;Start "StartCharPos" counter - StrCpy $R4 0 - - ;Loop until "SubString" is found or "String" reaches its end - ${Do} - ;Remove everything before and after the searched part ("TempStr") - StrCpy $R5 $R1 $R2 $R4 - - ;Compare "TempStr" with "SubString" - ${IfThen} $R5 == $R0 ${|} ${ExitDo} ${|} - ;If not "SubString", this could be "String"'s end - ${IfThen} $R4 >= $R3 ${|} ${ExitDo} ${|} - ;If not, continue the loop - IntOp $R4 $R4 + 1 - ${Loop} - -/*After this point: - ------------------------------------------ - $R0 = ResultVar (output)*/ - - ;Remove part before "SubString" on "String" (if there has one) - StrCpy $R0 $R1 `` $R4 - - ;Return output to user - Pop $R5 - Pop $R4 - Pop $R3 - Pop $R2 - Pop $R1 - Exch $R0 -FunctionEnd +${UnStrStr} Section uninstall ClearErrors