WordReplace - Revision history

Instructor at 07:34, 7 February 2006

2006-02-07T07:34:32Z

â† Older revision		Revision as of 07:34, 7 February 2006
Line 8:		Line 8:
	____________________________________________________________________________		____________________________________________________________________________

	WordReplace v2.~~1 (replace or delete)~~		WordReplace v2.2
	____________________________________________________________________________		____________________________________________________________________________

Line 29:		Line 29:
	; +number* : word number from start multiple-replace		; +number* : word number from start multiple-replace
	; -number* : word number from end multiple-replace		; -number* : word number from end multiple-replace
	; + : replace ~~or delete~~ all founded		; + : replace all founded
	; +* : multiple-replace all founded		; +* : multiple-replace all founded
	; {} : if exists replace ~~or delete~~ all delimiters		; { : if exists replace all delimiters
	; from edges ~~(no errorlevel output)~~		; from left edge
	; {}* : if exists multiple-replace all ~~delimiters~~		; } : if exists replace all delimiters
	; from edges ~~(no errorlevel output)~~		; from right edge
			; {} : if exists replace all delimiters
			; from edges
			; {* : if exists multiple-replace all
			; delimiters from left edge
			; }* : if exists multiple-replace all
			; delimiters from right edge
			; {}* : if exists multiple-replace all
			; delimiters from edges
	;		;
	;[E]		;[E]
	; with errorlevel output		; with errorlevel output
	; IfErrors:		; IfErrors:
	; $var=1 word to replace ~~or delete~~ not found		; $var=1 word to replace not found
	; $var=2 no such word number		; $var=2 no such word number
	; $var=3 syntax error (Use: +1,-1,+1,-1,+,+,{},{})		; $var=3 syntax error (Use: +1,-1,+1,-1,+,+,{},{})
Line 139:		Line 147:
	StrCpy $9 ''		StrCpy $9 ''
	StrCpy $3 $2 1		StrCpy $3 $2 1
	StrCmp $3 'E' 0 +4		StrCpy $2 $2 '' 1
			StrCmp $3 'E' 0 +3
	StrCpy $9 E		StrCpy $9 E
	~~StrCpy $2 $2 '' 1~~
	goto -4		goto -4

			StrCpy $4 $2 1 -1
			StrCpy $5 ''
			StrCpy $6 ''
	StrLen $7 $0		StrLen $7 $0

	~~StrCpy~~ $~~4 $2 3~~		StrCmp $7 0 error1
	~~StrCpy~~ $~~5 $2 2~~		StrCmp $R0 '' error1
	StrCmp $4 '{}*' +3		StrCmp $3 '{' beginning
	StrCmp $5 '{}' +2		StrCmp $3 '}' ending errorchk
	~~goto~~ errorchk
	~~StrCmp $7 0 end~~		beginning:
	~~StrCpy $5 ''~~		StrCpy $8 $R0 $7
	~~StrCpy $6 ''~~		StrCmp $8 $0 0 +4
	StrCpy $3 $R0 $7
	StrCmp $3 $0 0 +4
	StrCpy $R0 $R0 '' $7		StrCpy $R0 $R0 '' $7
	StrCpy $5 '$1$5'		StrCpy $5 '$5$1'
	goto -4		goto -4
	StrCpy $3 $R0 '' -$7		StrCpy $3 $2 1
	StrCmp $3 $0 0 +4		StrCmp $3 '}' 0 merge

			ending:
			StrCpy $8 $R0 '' -$7
			StrCmp $8 $0 0 +4
	StrCpy $R0 $R0 -$7		StrCpy $R0 $R0 -$7
	StrCpy $6 '$6$1'		StrCpy $6 '$6$1'
	goto -4		goto -4
	StrCmp $4 '{}*' 0 +5
			merge:
			StrCmp $4 '*' 0 +5
	StrCmp $5 '' +2		StrCmp $5 '' +2
	StrCpy $5 $1		StrCpy $5 $1
Line 173:		Line 188:

	errorchk:		errorchk:
	~~StrCpy $3 $2 1~~
	~~StrCpy $2 $2 '' 1~~
	StrCmp $3 '+' +2		StrCmp $3 '+' +2
	StrCmp $3 '-' 0 error3		StrCmp $3 '-' 0 error3
	~~StrCmp $R0 '' error1~~
	~~StrCmp $7 0 error1~~

	~~StrCpy $4 $2 1 -1~~
	StrCpy $5 $2 1		StrCpy $5 $2 1
	IntOp $2 $2 + 0		IntOp $2 $2 + 0

Instructor at 11:24, 30 November 2005

2005-11-30T11:24:24Z

â† Older revision		Revision as of 11:24, 30 November 2005
Line 1:		Line 1:
	{{PageAuthor\|Instructor}}		{{PageAuthor\|Instructor}}

	~~== Links ==~~		{{User:Instructor/Headers/Template}}

	~~; Latest version of headers "nsh.zip":~~		== Function Description ==
	~~: http://forums.winamp.com/showthread.php?s~~=~~&threadid~~=~~203228&goto=lastpost~~

	~~If a function is used without header, put the function code in your script before calling it.~~

	~~== The~~ Function Description==

	<highlight-nsis>		<highlight-nsis>
Line 106:		Line 101:
	</highlight-nsis>		</highlight-nsis>

	== ~~The~~ Function Code==		== Function Code ==

	<highlight-nsis>		<highlight-nsis>

Instructor at 08:16, 7 September 2005

2005-09-07T08:16:33Z

â† Older revision		Revision as of 08:16, 7 September 2005
Line 13:		Line 13:
	____________________________________________________________________________		____________________________________________________________________________

	WordReplace v2.0 (replace or delete)		WordReplace v2.1 (replace or delete)
	____________________________________________________________________________		____________________________________________________________________________

Line 195:		Line 195:
	StrCpy $5 0		StrCpy $5 0
	StrCpy $2 $R0 $7 $5		StrCpy $2 $R0 $7 $5
	~~StrCmp $2$3 '' error1~~
	StrCmp $2 '' +4		StrCmp $2 '' +4
	StrCmp $2 $0 +5		StrCmp $2 $0 +6
	IntOp $5 $5 + 1		IntOp $5 $5 + 1
	goto -5		goto -4
			StrCmp $R0 $R1 error1
	StrCpy $R0 '$3$R0'		StrCpy $R0 '$3$R0'
	goto end		goto end

Instructor at 14:08, 4 July 2005

2005-07-04T14:08:33Z

â† Older revision		Revision as of 14:08, 4 July 2005
Line 2:		Line 2:

	== Links ==		== Links ==

	; Latest version of headers "nsh.zip":		; Latest version of headers "nsh.zip":
	: http://forums.winamp.com/showthread.php?s=&threadid=203228&goto=lastpost		: http://forums.winamp.com/showthread.php?s=&threadid=203228&goto=lastpost

	If a function is used without an header, ~~you should~~ put the function ~~below~~ in your script before calling it.		If a function is used without header, put the function code in your script before calling it.

			== The Function Description==

	~~== The Function ==~~		<highlight-nsis>
	<highlight-nsis>/*		____________________________________________________________________________
	~~______________________________________________________________________________~~

	WordReplace v2.0 (replace or delete)		WordReplace v2.0 (replace or delete)
	~~______________________________________________________________________________~~		____________________________________________________________________________


Line 44:		Line 46:
	; $var=1 word to replace or delete not found		; $var=1 word to replace or delete not found
	; $var=2 no such word number		; $var=2 no such word number
	; $var=3 syntax error (Use: +1,-1,+1,-1,+,{},~~...~~)		; $var=3 syntax error (Use: +1,-1,+1,-1,+,+,{},{})
	;[]		;[]
	; no errorlevel output (default)		; no errorlevel output (default)
Line 50:		Line 52:
	;		;
	$var ;output (result)		$var ;output (result)
			</highlight-nsis>


	Example (replace):		<b>Example (replace):</b>
	Section		<highlight-nsis>Section
	${WordReplace} "C:\io.sys C:\logo.sys C:\WINDOWS" "SYS" "bmp" "+2" $R0		${WordReplace} "C:\io.sys C:\logo.sys C:\WINDOWS" "SYS" "bmp" "+2" $R0
	; $R0="C:\io.sys C:\logo.bmp C:\WINDOWS"		; $R0="C:\io.sys C:\logo.bmp C:\WINDOWS"
	SectionEnd		SectionEnd
			</highlight-nsis>

	Example (delete):		<b>Example (delete):</b>
	Section		<highlight-nsis>Section
	${WordReplace} "C:\io.sys C:\logo.sys C:\WINDOWS" "SYS" "" "+" $R0		${WordReplace} "C:\io.sys C:\logo.sys C:\WINDOWS" "SYS" "" "+" $R0
	; $R0="C:\io. C:\logo. C:\WINDOWS"		; $R0="C:\io. C:\logo. C:\WINDOWS"
	SectionEnd		SectionEnd
			</highlight-nsis>

	Example (multiple-replace 1):		<b>Example (multiple-replace 1):</b>
	Section		<highlight-nsis>Section
	${WordReplace} "C:\io.sys C:\logo.sys C:\WINDOWS" " " " " "+1*" $R0		${WordReplace} "C:\io.sys C:\logo.sys C:\WINDOWS" " " " " "+1*" $R0
	; +1* or +2* or +3* or +4* or +5* or +6*		; +1* or +2* or +3* or +4* or +5* or +6*
	; $R0="C:\io.sys C:\logo.sys C:\WINDOWS"		; $R0="C:\io.sys C:\logo.sys C:\WINDOWS"
	SectionEnd		SectionEnd
			</highlight-nsis>

	Example (multiple-replace 2):		<b>Example (multiple-replace 2):</b>
	Section		<highlight-nsis>Section
	${WordReplace} "C:\io.sys C:\logo.~~sysSYS~~ C:\WINDOWS" "sys" "bmp" "+*" $R0		${WordReplace} "C:\io.sys C:\logo.sysSYSsys C:\WINDOWS" "sys" "bmp" "+*" $R0
	; $R0="C:\io.bmp C:\logo.bmp C:\WINDOWS"		; $R0="C:\io.bmp C:\logo.bmp C:\WINDOWS"
	SectionEnd		SectionEnd
			</highlight-nsis>

	Example (multiple-replace 3):		<b>Example (multiple-replace 3):</b>
	Section		<highlight-nsis>Section
	${WordReplace} "~~###C~~:\io.sys C:\logo.sys C:\~~WINDOWS###~~" "#" "\|" "{}*" $R0		${WordReplace} "sysSYSsysC:\io.sys C:\logo.sys C:\WINDOWSsysSYSsys" "sys" "\|" "{}*" $R0
	; $R0="\|C:\io.sys C:\logo.sys C:\WINDOWS\|"		; $R0="\|C:\io.sys C:\logo.sys C:\WINDOWS\|"
	SectionEnd		SectionEnd
			</highlight-nsis>

	Example (With errorlevel output):		<b>Example (With errorlevel output):</b>
	Section		<highlight-nsis>Section
	${WordReplace} "C:\io.sys C:\logo.sys" "sys" "bmp" "E+3" $R0		${WordReplace} "C:\io.sys C:\logo.sys" "sys" "bmp" "E+3" $R0
	; $R0="2" (no such word number "+3")		; $R0="2" (no such word number "+3")
Line 95:		Line 103:

	end:		end:
	SectionEnd*/		SectionEnd
			</highlight-nsis>

	~~;---------------------------------------------------------------------------~~		== The Function Code==

			<highlight-nsis>
	Function WordReplace		Function WordReplace
	!define WordReplace `!insertmacro WordReplaceCall`		!define WordReplace `!insertmacro WordReplaceCall`

ConversionBot: Adding new author and category links.

2005-06-24T14:11:00Z

Adding new author and category links.

â† Older revision		Revision as of 14:11, 24 June 2005
Line 1:		Line 1:
	{~~\|align=right~~		{{PageAuthor\|Instructor}}
	~~\|<small>Author: [[~~{~~{ns:2}}:Instructor~~\|Instructor~~]] ([[{{ns:3}}:Instructor\|talk]], [[{{ns:-1}~~}~~:Contributions/Instructor\|contrib]])</small>~~
	\|}
	~~<br style="clear:both;">~~
	== Links ==		== Links ==
	; Latest version of headers "nsh.zip":		; Latest version of headers "nsh.zip":
Line 274:		Line 272:
	</highlight-nsis>		</highlight-nsis>

	[[~~{{ns:14}}~~:String Functions]]		[[Category:String Functions]]

ConversionBot: Updated by user: Instructor (talk, contrib).

2005-06-24T09:42:45Z

Updated by user: Instructor (talk, contrib).

Show changes

ConversionBot: Added category links.

2005-04-30T22:01:31Z

Added category links.

â† Older revision		Revision as of 22:01, 30 April 2005
Line 286:		Line 286:
	FunctionEnd		FunctionEnd
	</highlight-nsis>		</highlight-nsis>

			[[{{ns:14}}:String Functions]]

ConversionBot: Updated author links.

2005-04-30T03:06:14Z

Updated author links.

@@ Line 1: / Line 1: @@
 == Links ==
 ; Latest version of headers "nsh.zip":
@@ Line 282: / Line 286: @@
 FunctionEnd
 </highlight-nsis>

ConversionBot: Updated author and download links, and changed format of some pages.

2005-04-23T12:43:07Z

Updated author and download links, and changed format of some pages.

â† Older revision		Revision as of 12:43, 23 April 2005
Line 283:		Line 283:
	</highlight-nsis>		</highlight-nsis>

			Page author: [[User:Instructor\|Instructor]]
	Page author: Instructor

ConversionBot: Wikipedia python library

2005-04-09T20:48:25Z

Wikipedia python library

New page

== Links ==
; Latest version of headers "nsh.zip":
: http://forums.winamp.com/showthread.php?s=&threadid=203228&goto=lastpost

== The Function ==
<highlight-nsis>/*
______________________________________________________________________________

WordReplace v2.0 (replace or delete)
______________________________________________________________________________

2004 Shengalts Aleksander (Shengalts@mail.ru)

Replace or delete word from string.

Syntax:

Push "[string]" ;[string]
; input string
Push "[word1]" ;[word1]
; word to replace or delete
Push "[word2]" ;[word2]
; replace with (if empty delete)
Push "[E][options]" ;[options]
; +number : word number from start
; -number : word number from end
; +number* : word number from start multiple-replace
; -number* : word number from end multiple-replace
; + : replace or delete all founded
; +* : multiple-replace all founded
; {} : if exists replace or delete all delimiters
; from edges (no errorlevel output)
; {}* : if exists multiple-replace all delimiters
; from edges (no errorlevel output)
;
;[E]
; with errorlevel output
; IfErrors:
; $var=1 word to replace or delete not found
; $var=2 no such word number
; $var=3 syntax error
; (Use: +1,-1,+1*,-1*,+,+*,{},{}*)
;[]
; no errorlevel output (default)
; If some errors found then (result=input string)
;
Call WordReplace ;call function
;
Pop $var ;output (result)

Example (replace):
Section
Push "C:\io.sys C:\logo.sys C:\WINDOWS"
Push "SYS"
Push "bmp"
Push "+2"
Call WordReplace
Pop $R0 ;now contain: "C:\io.sys C:\logo.bmp C:\WINDOWS"
SectionEnd

Example (delete):
Section
Push "C:\io.sys C:\logo.sys C:\WINDOWS"
Push "SYS"
Push ""
Push "+"
Call WordReplace
Pop $R0 ;now contain: "C:\io. C:\logo. C:\WINDOWS"
SectionEnd

Example (multiple-replace 1):
Section
Push "C:\io.sys C:\logo.sys C:\WINDOWS"
Push " "
Push " "
Push "+1*" ; +1* or +2* or +3* or +4* or +5* or +6*
Call WordReplace
Pop $R0 ;now contain: "C:\io.sys C:\logo.sys C:\WINDOWS"
SectionEnd

Example (multiple-replace 2):
Section
Push "C:\io.sys C:\logo.sysSYSsys C:\WINDOWS"
Push "sys"
Push "bmp"
Push "+*"
Call WordReplace
Pop $R0 ;now contain: "C:\io.bmp C:\logo.bmp C:\WINDOWS"
SectionEnd

Example (multiple-replace 3):
Section
Push "sysSYSsysC:\io.sys C:\logo.sys C:\WINDOWSsysSYSsys"
Push "sys"
Push "|"
Push "{}*"
Call WordReplace
Pop $R0 ;now contain: "|C:\io.sys C:\logo.sys C:\WINDOWS|"
SectionEnd

Example (With errorlevel output):
Section
Push "C:\io.sys C:\logo.sys"
Push "sys"
Push "bmp"
Push "E+3"
Call WordReplace
Pop $R0 ;now contain: "2" (no such word number "+3")

IfErrors 0 noerrors
MessageBox MB_OK 'Errorlevel=$R0' IDOK end

noerrors:
MessageBox MB_OK 'No errors'

end:
SectionEnd*/

;---------------------------------------------------------------------------
Function WordReplace
Exch $2
Exch
Exch $1
Exch
Exch 2
Exch $0
Exch 2
Exch 3
Exch $R0
Exch 3
Push $3
Push $4
Push $5
Push $6
Push $7
Push $8
Push $9
Push $R1
ClearErrors

StrCpy $R1 $R0
StrCpy $9 ''
StrCpy $3 $2 1
StrCmp $3 'E' 0 +4
StrCpy $9 E
StrCpy $2 $2 '' 1
goto -4

StrLen $7 $0

StrCpy $4 $2 3
StrCpy $5 $2 2
StrCmp $4 '{}*' +3
StrCmp $5 '{}' +2
goto errorchk
StrCmp $7 0 end
StrCpy $5 ''
StrCpy $6 ''
StrCpy $3 $R0 $7
StrCmp $3 $0 0 +4
StrCpy $R0 $R0 '' $7
StrCpy $5 '$1$5'
goto -4
StrCpy $3 $R0 '' -$7
StrCmp $3 $0 0 +4
StrCpy $R0 $R0 -$7
StrCpy $6 '$6$1'
goto -4
StrCmp $4 '{}*' 0 +5
StrCmp $5 '' +2
StrCpy $5 $1
StrCmp $6 '' +2
StrCpy $6 $1
StrCpy $R0 '$5$R0$6'
goto end

errorchk:
StrCpy $3 $2 1
StrCpy $2 $2 '' 1
StrCmp $3 '+' +2
StrCmp $3 '-' 0 error3
StrCmp $R0 '' error1
StrCmp $7 0 error1

StrCpy $4 $2 1 -1
StrCpy $5 $2 1
IntOp $2 $2 + 0
StrCmp $2 0 0 one
StrCmp $5 0 error2
StrCpy $3 ''

all:
StrCpy $5 0
StrCpy $2 $R0 $7 $5
StrCmp $2$3 '' error1
StrCmp $2 '' +4
StrCmp $2 $0 +5
IntOp $5 $5 + 1
goto -5
StrCpy $R0 '$3$R0'
goto end
StrCpy $2 $R0 $5
IntOp $5 $5 + $7
StrCmp $4 '*' 0 +3
StrCpy $6 $R0 $7 $5
StrCmp $6 $0 -3
StrCpy $R0 $R0 '' $5
StrCpy $3 '$3$2$1'
goto all

one:
StrCpy $5 0
StrCpy $8 0
goto loop

preloop:
IntOp $5 $5 + 1

loop:
StrCpy $6 $R0 $7 $5
StrCmp $6$8 0 error1
StrCmp $6 '' minus
StrCmp $6 $0 0 preloop
IntOp $8 $8 + 1
StrCmp $3$8 +$2 found
IntOp $5 $5 + $7
goto loop

minus:
StrCmp $3 '-' 0 error2
StrCpy $3 +
IntOp $2 $8 - $2
IntOp $2 $2 + 1
IntCmp $2 0 error2 error2 one

found:
StrCpy $3 $R0 $5
StrCmp $4 '*' 0 +5
StrCpy $6 $3 '' -$7
StrCmp $6 $0 0 +3
StrCpy $3 $3 -$7
goto -3
IntOp $5 $5 + $7
StrCmp $4 '*' 0 +3
StrCpy $6 $R0 $7 $5
StrCmp $6 $0 -3
StrCpy $R0 $R0 '' $5
StrCpy $R0 '$3$1$R0'
goto end

error3:
StrCpy $R0 3
goto error
error2:
StrCpy $R0 2
goto error
error1:
StrCpy $R0 1
error:
StrCmp $9 'E' +3
StrCpy $R0 $R1
goto +2
SetErrors

end:
Pop $R1
Pop $9
Pop $8
Pop $7
Pop $6
Pop $5
Pop $4
Pop $3
Pop $2
Pop $1
Pop $0
Exch $R0
FunctionEnd
</highlight-nsis>

Page author: Instructor