Вы находитесь здесь

Форум

[Script] Word 2000

Автор Replies
MarkZ Saturday 28 July 2012 at 14:03
MarkZAnonymous

Bonjour,

this is my first try for Microsoft Word 2000.
Although already deprecated, someone might find it useful.
The script includes the Compatibility Pack, i.e. it's possible to edit .docx files.

Cheers,

Markus

# Date : (2012-07-27 22-00)
# Last revision : (2012-07-27 22-00)
# Wine version used : 1.2.3
# Distribution used to test : Lubuntu 12.04
# Author : MarkZ (http://www.markz.de)

#!/bin/bash
[ "$PLAYONLINUX" = "" ] && exit 0
source "$PLAYONLINUX/lib/sources"

TITLE="Microsoft Word 2000"
PREFIX="Word2000"
PATCH1="MS Office 2000 Service Pack 3"
PATCH2="Web Archive Converter"
PATCH3="MS Office Compatibility Pack"

POL_SetupWindow_Init
 
POL_Debug_Init

POL_SetupWindow_presentation "$TITLE" "Microsoft" "http://www.microsoft.com" "MarkZ (http://www.markz.de)" "$PREFIX"
 
POL_Wine_SelectPrefix "$PREFIX"
POL_Wine_PrefixCreate "1.2.3"

POL_Call POL_install_mfc42
# being able to install jet40 and mdac28 via function call would be neat
#POL_Call POL_install_jet40
#POL_Call POL_install_mdac28

POL_System_TmpCreate "$PREFIX"

# Installing main program
cd "$POL_System_TmpDir"
POL_SetupWindow_message "$(eval_gettext 'Please insert $TITLE disc')" "$TITLE"
POL_SetupWindow_cdrom
POL_SetupWindow_check_cdrom "SETUP.EXE"
POL_Wine_WaitBefore "$TITLE"
POL_Wine start /unix "$CDROM/SETUP.EXE"
POL_Wine_WaitExit "$TITLE"

cd "$POL_System_TmpDir"

PVERSION1="$PATCH1, $PATCH2"
PVERSION2="$PATCH3"
POL_SetupWindow_message "$(eval_gettext 'Welcome in the patch $PVERSION1 and $PVERSION2 installer for $TITLE')" "$TITLE"

# language setting
POL_SetupWindow_menu "$(eval_gettext 'Which language version would you like to install?')" "$TITLE" "$(eval_gettext 'English')~$(eval_gettext 'German')" "~"
VERSION="$APP_ANSWER"
# SP3 = Service Pack 3; WARCHCONV = Web Archive Converter; COMPPACK = Compatibility Pack
case "$VERSION" in
  "$(eval_gettext 'English')") 
    LINK_SP3="http://download.microsoft.com/download/office2000/SP/3/WIN98MeXP/EN-US/O2kSp3.exe"
    LINK_WARCHCONV="http://download.microsoft.com/download/word2000/WArchCn/2000/WIN98/EN-US/WArchCnv.exe"
    LINK_COMPPACK="http://download.microsoft.com/download/9/2/2/9222D67F-7630-4F49-BD26-476B51517FC1/FileFormatConverters.exe" ;;
  "$(eval_gettext 'German')")
    LINK_SP3="http://download.microsoft.com/download/office2000/SP/3/WIN98MeXP/DE/O2kSp3.exe"
    LINK_WARCHCONV="http://download.microsoft.com/download/word2000/warchcn/2000/WIN98/DE/WArchCnv.exe"
    LINK_COMPPACK="http://download.microsoft.com/download/e/4/9/e4996d8f-838e-4b75-8685-1e6134762992/FileFormatConverters.exe" ;;
esac
# more languages might be added

# installing Service Pack 3
POL_SetupWindow_question "$(eval_gettext 'Installing: ')$PATCH1?" "$TITLE"
if [ "$APP_ANSWER" == "TRUE" ]; then
  POL_Download "$LINK_SP3"
  POL_Wine_WaitBefore "$PATCH1"
  POL_Wine start /unix "$POL_System_TmpDir/O2kSp3.exe"
  POL_Wine_WaitExit "$PATCH1"
fi

# installing Web Archive Converter
POL_SetupWindow_question "$(eval_gettext 'Installing: ')$Title $PATCH2?" "$TITLE"
if [ "$APP_ANSWER" == "TRUE" ]; then
  # Outlook Express 5 or higher is required; Outlook Express 6 comes bundled with Internet Explorer 6
  POL_Call POL_install_ie6
  cd "$POL_System_TmpDir"
  POL_Download "$LINK_WARCHCONV"
  POL_Wine_WaitBefore "$TITLE $PATCH2"
  POL_Wine start /unix "$POL_System_TmpDir/WArchCnv.exe"
  POL_Wine_WaitExit "$Title $PATCH2"
fi

# installing Compatibility Pack
POL_SetupWindow_question "$(eval_gettext 'Installing: ')$PATCH3?" "$TITLE"
if [ "$APP_ANSWER" == "TRUE" ]; then
  POL_Download "$LINK_COMPPACK"
  POL_Wine_WaitBefore "$PATCH3"
  POL_Wine start /unix "$POL_System_TmpDir/FileFormatConverters.exe"
  POL_Wine_WaitExit "$PATCH3"
fi
 
POL_System_TmpDelete
 
POL_Shortcut "WINWORD.EXE" "Word 2000"
POL_Shortcut "PHOTOED.EXE" "Microsoft Photo Editor" # if Photo Editor has been installed
 
POL_SetupWindow_message "$(eval_gettext '$TITLE has been successfully installed.')" "$TITLE"

POL_SetupWindow_Close
exit

Вы находитесь здесь: Index > Your creations. > [Script] Word 2000