GordCaswell

Bart.SAdjustKeysFromFreematPortable.nsi

Sep 16th, 2011
274
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.     AdjustKeys:
  2.         IfFileExists "$SETTINGSDIRECTORY\${NAME}Settings.ini" "" LaunchNow
  3.             ReadINIStr $LASTDRIVEROOT "$SETTINGSDIRECTORY\${NAME}Settings.ini" "${NAME}Settings" "LastDrive"
  4.             StrCmp $LASTDRIVEROOT "$DRIVEROOT" LaunchNow
  5.  
  6.         ${registry::Read} "HKCU\Software\${APPNAME}\FreeMat v4.0\mainwindow" "cdlist" $0 $1
  7.         ${If} $0 != ""
  8.             ${WordReplace} $0 "$LASTDRIVEROOT" "$DRIVEROOT" "+" $2
  9.             ${registry::Write} "HKCU\Software\${APPNAME}\FreeMat v4.0\mainwindow" "cdlist" $2 $1 $R0
  10.             Sleep 100
  11.         ${EndIf}
  12.  
  13.         ${registry::Read} "HKCU\Software\${APPNAME}\FreeMat v4.0\editor" "recentFileList" $0 $1
  14.         ${If} $0 != ""
  15.             ${WordReplace} $0 "$LASTDRIVEROOT" "$DRIVEROOT" "+" $2
  16.             ${registry::Write} "HKCU\Software\${APPNAME}\FreeMat v4.0\editor" "recentFileList" $2 $1 $R1
  17.             Sleep 100
  18.         ${EndIf}
  19.  
  20.         ${registry::Read} "HKCU\Software\${APPNAME}\FreeMat v4.0\editor" "last_session_list" $0 $1
  21.         ${If} $0 != ""
  22.             ${WordReplace} $0 "$LASTDRIVEROOT" "$DRIVEROOT" "+" $2
  23.             ${registry::Write} "HKCU\Software\${APPNAME}\FreeMat v4.0\editor" "last_session_list" $2 $1 $R2
  24.             Sleep 100
  25.         ${EndIf}
  26.  
  27.         ${registry::Read} "HKCU\Software\${APPNAME}\FreeMat v4.0\interpreter" "path" $0 $1
  28.         ${If} $0 != ""
  29.             ${WordReplace} $0 "$LASTDRIVEROOT" "$DRIVEROOT" "+" $2
  30.             ${registry::Write} "HKCU\Software\${APPNAME}\FreeMat v4.0\interpreter" "path" $2 $1 $R3
  31.             Sleep 100
  32.         ${EndIf}
  33.  
  34.         ${registry::Read} "HKCU\Software\${APPNAME}\FreeMat v4.0" "root" $0 $1
  35.         ${If} $0 != ""
  36.             ${WordReplace} $0 "$LASTDRIVEROOT" "$DRIVEROOT" "+" $2
  37.             ${registry::Write} "HKCU\Software\${APPNAME}\FreeMat v4.0" "root" $2 $1 $R4
  38.             Sleep 100
  39.         ${EndIf}
Add Comment
Please, Sign In to add comment