From a92d9807237a024106b67f045822679f7ee4df54 Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sat, 14 Mar 2009 21:18:50 +0000
Subject: merge with current trunk (just update)

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1634 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 unicode/installer/settings/functions.nsh | 124 ++++++++++++++++++++++++++++++-
 1 file changed, 123 insertions(+), 1 deletion(-)

(limited to 'unicode/installer/settings/functions.nsh')

diff --git a/unicode/installer/settings/functions.nsh b/unicode/installer/settings/functions.nsh
index 8345c4cc..bbd4fea2 100644
--- a/unicode/installer/settings/functions.nsh
+++ b/unicode/installer/settings/functions.nsh
@@ -74,4 +74,126 @@ FunctionEnd
 
 !macro nsProcess::Unload
 	nsProcess::_Unload
-!macroend
\ No newline at end of file
+!macroend
+
+Function OnCheckbox
+	GetDlgItem $R0 $HWNDPARENT 1
+	Pop $0 # HWND
+	${NSD_GetState} $0 $1
+	IntCmp $1 1 _Next _Close
+		_Next:
+		SendMessage $R0 ${WM_SETTEXT} 0 "STR:$(button_next)"
+		goto _done
+		_Close:
+		SendMessage $R0 ${WM_SETTEXT} 0 "STR:$(button_close)"
+	_done:
+FunctionEnd
+
+Function VersionCompare
+	!define VersionCompare `!insertmacro VersionCompareCall`
+ 
+	!macro VersionCompareCall _VER1 _VER2 _RESULT
+		Push `${_VER1}`
+		Push `${_VER2}`
+		Call VersionCompare
+		Pop ${_RESULT}
+	!macroend
+ 
+	Exch $1
+	Exch
+	Exch $0
+	Exch
+	Push $2
+	Push $3
+	Push $4
+	Push $5
+	Push $6
+	Push $7
+ 
+	begin:
+	StrCpy $2 -1
+	IntOp $2 $2 + 1
+	StrCpy $3 $0 1 $2
+	StrCmp $3 '' +2
+	StrCmp $3 '.' 0 -3
+	StrCpy $4 $0 $2
+	IntOp $2 $2 + 1
+	StrCpy $0 $0 '' $2
+ 
+	StrCpy $2 -1
+	IntOp $2 $2 + 1
+	StrCpy $3 $1 1 $2
+	StrCmp $3 '' +2
+	StrCmp $3 '.' 0 -3
+	StrCpy $5 $1 $2
+	IntOp $2 $2 + 1
+	StrCpy $1 $1 '' $2
+ 
+	StrCmp $4$5 '' equal
+ 
+	StrCpy $6 -1
+	IntOp $6 $6 + 1
+	StrCpy $3 $4 1 $6
+	StrCmp $3 '0' -2
+	StrCmp $3 '' 0 +2
+	StrCpy $4 0
+ 
+	StrCpy $7 -1
+	IntOp $7 $7 + 1
+	StrCpy $3 $5 1 $7
+	StrCmp $3 '0' -2
+	StrCmp $3 '' 0 +2
+	StrCpy $5 0
+ 
+	StrCmp $4 0 0 +2
+	StrCmp $5 0 begin newer2
+	StrCmp $5 0 newer1
+	IntCmp $6 $7 0 newer1 newer2
+ 
+	StrCpy $4 '1$4'
+	StrCpy $5 '1$5'
+	IntCmp $4 $5 begin newer2 newer1
+ 
+	equal:
+	StrCpy $0 0
+	goto end
+	newer1:
+	StrCpy $0 1
+	goto end
+	newer2:
+	StrCpy $0 2
+ 
+	end:
+	Pop $7
+	Pop $6
+	Pop $5
+	Pop $4
+	Pop $3
+	Pop $2
+	Pop $1
+	Exch $0
+FunctionEnd
+
+Function ReadFileLine
+Exch $0 ;file
+Exch
+Exch $1 ;line number
+Push $2
+Push $3
+ 
+  FileOpen $2 $0 r
+ StrCpy $3 0
+ 
+Loop:
+ IntOp $3 $3 + 1
+  ClearErrors
+  FileRead $2 $0
+  IfErrors +2
+ StrCmp $3 $1 0 loop
+  FileClose $2
+ 
+Pop $3
+Pop $2
+Pop $1
+Exch $0
+FunctionEnd
\ No newline at end of file
-- 
cgit v1.2.3