+
−!ifdef MAKEFILE
+
−  !verbose 0
+
−!else
+
−  !define VERSION 1.1
+
−!endif
+
−;!define BETA
+
−!define BETA_IP 192.168.0.253
+
−!define BETA_PORT 8765
+
−SetCompress off
+
−XPStyle on
+
−Icon Update.ico
+
−Name "ExperienceUI Downloader"
+
−Caption "ExperienceUI Update Wizard"
+
−OutFile ..\Updater.exe
+
−ChangeUI all ..\..\UIs\tinyui.exe
+
−SubCaption 3 " "
+
−SubCaption 4 " "
+
−InstallColors 0x000000 0xFFFFFF
+
−BrandingText " "
+
−CompletedText "Done."
+
−!define VER_MAJOR 1
+
−!define VER_TENS 1
+
−!define VER_ONES 0
+
−
+
−Page custom welcome lock
+
−Page custom infonotice lock
+
−Page instfiles
+
−
+
−Function welcome
+
−LockWindow on
+
−SetOutPath $TEMP
+
−File Updater.ini
+
−InstallOptions::initDialog /NOUNLOAD $TEMP\Updater.ini
+
−Pop $1
+
−SetCtlColors $1 0xFFFFFF 0xFFFFFF
+
−GetDlgItem $0 $1 1200
+
−SetCtlColors $0 0xC0C0C0 0xFFFFFF
+
−CreateFont $2 "Verdana" 28 100
+
−SendMessage $0 0x30 $2 ""
+
−GetDlgItem $0 $1 1201
+
−SetCtlColors $0 0x000000 transparent
+
−CreateFont $2 "MS Sans Serif" 8 700
+
−SendMessage $0 0x30 $2 ""
+
−!ifdef BETA
+
−SendMessage $0 0xC 0 "STR:This is a ßeta release."
+
−!endif
+
−GetDlgItem $0 $1 1202
+
−SetCtlColors $0 0x000000 transparent
+
−CreateFont $2 "MS Sans Serif" 8 350
+
−SendMessage $0 0x30 $2 ""
+
−!ifdef BETA
+
−SendMessage $0 0xC 0 "STR:This updater will fail unless you have a computer with the IP address ${BETA_IP} on your network, and it has the file xpui/updates.ini on port ${BETA_PORT}.  Please e-mail dandaman32@users.sourceforge.net for an updated version of this program!"
+
−!endif
+
−LockWindow off
+
−InstallOptions::show
+
−FunctionEnd
+
−
+
−Function infonotice
+
−SetOutPath $TEMP
+
−File Updater.ini
+
−WriteINIStr $TEMP\Updater.ini "Field 1" Left -173
+
−InstallOptions::initDialog /NOUNLOAD $TEMP\Updater.ini
+
−Pop $1
+
−SetCtlColors $1 0xFFFFFF 0xFFFFFF
+
−GetDlgItem $0 $1 1200
+
−SetCtlColors $0 0xC0C0C0 0xFFFFFF
+
−CreateFont $2 "Verdana" 28 100
+
−SendMessage $0 0x30 $2 ""
+
−SendMessage $0 0xC 0 "STR:privacy notice"
+
−GetDlgItem $0 $1 1201
+
−SetCtlColors $0 0x000000 transparent
+
−CreateFont $2 "MS Sans Serif" 8 700
+
−SendMessage $0 0x30 $2 ""
+
−SendMessage $0 0xC 0 "STR:Your privacy is important."
+
−GetDlgItem $0 $1 1202
+
−SetCtlColors $0 0x000000 transparent
+
−CreateFont $2 "MS Sans Serif" 8 350
+
−SendMessage $0 0x30 $2 ""
+
−SendMessage $0 0xC 0 "STR:This program does not send any information about to or your computer to anyone.  The only thing it does is download a text file from my web server and check its version information."
+
−LockWindow off
+
−InstallOptions::show
+
−FunctionEnd
+
−
+
−Function lock
+
−LockWindow on
+
−FunctionEnd
+
−
+
−Function .onUserAbort
+
−LockWindow off
+
−FunctionEnd
+
−
+
−!define LVM_DELETEALLITEMS 0x1009
+
−!macro CLS
+
−Push $0
+
−FindWindow $0 "#32770" "" $HWNDPARENT
+
−GetDlgItem $0 $0 1016
+
−SendMessage $0 ${LVM_DELETEALLITEMS} 0 0
+
−Pop $0
+
−!macroend
+
−
+
−Section
+
−LockWindow off
+
−GetDlgItem $0 $HWNDPARENT 1044
+
−ShowWindow $0 0
+
−GetDlgItem $0 $HWNDPARENT 3
+
−ShowWindow $0 0
+
−FindWindow $0 "#32770" "" $HWNDPARENT
+
−GetDlgItem $0 $0 1004
+
−ShowWindow $0 0
+
−FindWindow $0 "#32770" "" $HWNDPARENT
+
−GetDlgItem $0 $0 1027
+
−ShowWindow $0 0
+
−GetDlgItem $0 $HWNDPARENT 1
+
−ShowWindow $0 0
+
−DetailPrint "Connecting to the Internet..."
+
−Dialer::AttemptConnect
+
−IfErrors noie3
+
−Pop $R0
+
−!insertmacro CLS
+
−DetailPrint "Connecting to the Internet...$R0"
+
−StrCmp $R0 "online" connected      
+
−MessageBox MB_OK|MB_ICONSTOP "The ExperienceUI was unable to establish a connection to the Internet.  A few possible reasons for this are:$\n$\n1) You have an Internet provider that requires authentication (such as dial-up) and you did not supply a valid$\n     username or password.$\n2) Your firewall is preventing this program ($CMDLINE) from accessing the Internet.$\n3) You do not have an Internet connection set up on this computer.$\n$\nThe updater cannot continue.  Please click OK to exit."
+
−Call cleanup
+
−Abort "Unable to connect."
+
−noie3:
+
−!insertmacro CLS
+
−DetailPrint "Connecting to the Internet...cannot find IE3 or later"
+
−MessageBox MB_OK|MB_ICONINFORMATION "The ExperienceUI has detected that you do not have Microsoft Internet Explorer 3 or later installed.  The automatic internet connection feature requires MSIE3 or later to work right.$\n$\nPlease connect to the Internet now, and then click OK to continue updating the ExperienceUI."
+
−connected:
+
−!ifdef BETA
+
−  nsisdl::download /TRANSLATE "Downloading the update information file..." "Initializing..." " " " " " "  s " "                        "Time left: %d %s%s"   "http://${BETA_IP}:${BETA_PORT}/xpui/Updates.ini" "$TEMP\xpuiupd.ini"
+
−    !else
+
−  nsisdl::download /TRANSLATE "Downloading the update information file..." "Initializing..." " " " " " "  s " "                        "Time left: %d %s%s"   http://xpui.sourceforge.net/bin/Updates.ini "$TEMP\xpuiupd.ini"
+
−!endif
+
−Pop $0
+
−StrCmp $0 success GoodINI
+
−MessageBox MB_OK|MB_ICONINFORMATION "The ExperienceUI updater was unable to download the update information file from the web site.$\nThe web server may be down, or there may be a problem with your Internet connection.$\n$\nError: $0"
+
−Call cleanup
+
−SetDetailsPrint textonly
+
−DetailPrint "The updater cannot continue. Click Cancel to exit."
+
−SetDetailsPrint listonly
+
−Abort "Release info download failed: $0"
+
−Goto Done
+
−GoodINI:
+
−DetailPrint "Checking version..."
+
−DetailPrint "  Current: ${VERSION}"
+
−ReadINIStr $0 $TEMP\xpuiupd.ini ExperienceUI Display
+
−DetailPrint "  Latest: $0"
+
−ReadINIStr $1 $TEMP\xpuiupd.ini ExperienceUI Major
+
−ReadINIStr $2 $TEMP\xpuiupd.ini ExperienceUI Tens
+
−ReadINIStr $3 $TEMP\xpuiupd.ini ExperienceUI Ones
+
−ReadINIStr $4 $TEMP\xpuiupd.ini ExperienceUI Size
+
−IntCmp $1 ${VER_MAJOR} "" "" Updates
+
−IntCmp $2 ${VER_TENS} "" "" Updates
+
−IntCmp $3 ${VER_ONES} "" "" Updates
+
−Goto NoUpdates
+
−Updates:
+
−ReadINIStr $5 $TEMP\xpuiupd.ini ExperienceUI Class
+
−ReadINIStr $6 $TEMP\xpuiupd.ini ExperienceUI HighlightsLine1
+
−ReadINIStr $7 $TEMP\xpuiupd.ini ExperienceUI HighlightsLine2 
+
−ReadINIStr $8 $TEMP\xpuiupd.ini ExperienceUI TimeID
+
−DetailPrint "Update ready!"
+
−MessageBox MB_YESNO|MB_ICONQUESTION "An update is available!$\n$\nYour version: ${VERSION}$\nNew version: $0 (Release ID: $8) $\n$\nThis update is classified as $5.$\n$\nRelease highlights:$\n$6$\n$7$\n$\nDownload it now? (size: ~$4kb)" IDYES Download
+
−DetailPrint "Update found, but not downloaded."
+
−Goto done
+
−Download:
+
−!ifdef BETA
+
−nsisdl::download /TRANSLATE "Downloading ExperienceUI version $0..."  "Connecting to server..." second minute hour s "%dKB (%d%%) of %dKB at %d.%01dKB/second" "; Time left: %d %s%s" http://${BETA_IP}:${BETA_PORT}/xpui/$0/ExperienceUISetup$0.exe "$DESKTOP\ExperienceUI Setup $0.exe"
+
−!else
+
−nsisdl::download /TRANSLATE "Downloading ExperienceUI version $0..."  "Connecting to server..." second minute hour s "%dKB (%d%%) of %dKB at %d.%01dKB/second" "; Time left: %d %s%s" http://internap.dl.sourceforge.net/sourceforge/xpui/ExperienceUISetup$0.exe "$DESKTOP\ExperienceUI Setup $0.exe"
+
−!endif
+
−Pop $0
+
−StrCmp $0 cancel DLCancelled
+
−StrCmp $0 success "" DLError
+
−MessageBox MB_OK|MB_ICONINFORMATION "The file was downloaded successfully to your Desktop."
+
−DetailPrint "Update found and downloaded successfully."
+
−Goto done
+
−DLCancelled:
+
−DetailPrint "Download cancelled."
+
−MessageBox MB_OK|MB_ICONINFORMATION "The download was cancelled."
+
−Goto done
+
−DLError:
+
−SetDetailsPrint textonly
+
−DetailPrint "The updater cannot continue. Click Cancel to exit."
+
−SetDetailsPrint listonly
+
−Call Cleanup
+
−Abort "Download error: $0"
+
−MessageBox MB_OK|MB_ICONINFORMATION "The updater was unable to download the file from the web site.$\n$\nThe following error occurred:$\n$0"
+
−Goto done
+
−NoUpdates:
+
−DetailPrint "No updates available."
+
−MessageBox MB_OK|MB_ICONINFORMATION "No updates are available at this time.  Please try again later.$\n$\nCurrent version: ${VERSION}$\nLatest version: $0$\n"
+
−Done:
+
−Call Cleanup
+
−SectionEnd
+
−
+
−Function cleanup
+
−SetDetailsPrint none
+
−Delete $TEMP\xpuiupd.ini
+
−SetDetailsPrint both
+
−FindWindow $R0 "#32770" "" $HWNDPARENT
+
−GetDlgItem $R0 $R0 1016
+
−ShowWindow $R0 5
+
−GetDlgItem $R0 $HWNDPARENT 1
+
−ShowWindow $R0 5
+
−Functionend