101 lines
2.7 KiB
Plaintext
101 lines
2.7 KiB
Plaintext
Name "BgImage.dll test"
|
|
|
|
OutFile "BgImage Test.exe"
|
|
|
|
XPStyle on
|
|
RequestExecutionLevel user
|
|
|
|
!define DEBUG
|
|
!macro GetReturnValue
|
|
!ifdef DEBUG
|
|
Pop $R9
|
|
StrCmp $R9 success +2
|
|
DetailPrint "Error: $R9"
|
|
!endif
|
|
!macroend
|
|
|
|
Function .onGUIInit
|
|
# the plugins dir is automatically deleted when the installer exits
|
|
InitPluginsDir
|
|
# lets extract some bitmaps...
|
|
File /oname=$PLUGINSDIR\1.bmp "${NSISDIR}\Contrib\Graphics\Wizard\llama.bmp"
|
|
File /oname=$PLUGINSDIR\2.bmp "${NSISDIR}\Contrib\Graphics\Checks\modern.bmp"
|
|
|
|
!ifdef DEBUG
|
|
# turn return values on if in debug mode
|
|
BgImage::SetReturn on
|
|
!endif
|
|
|
|
# set the initial background for images to be drawn on
|
|
# we will use a gradient from drak green to dark red
|
|
BgImage::SetBg /GRADIENT 0 0x80 0 0x80 0 0
|
|
!insertmacro GetReturnValue
|
|
# add an image @ (150,0)
|
|
BgImage::AddImage $PLUGINSDIR\2.bmp 150 0
|
|
!insertmacro GetReturnValue
|
|
# add the same image only transparent (magenta wiped) @ (150,16)
|
|
BgImage::AddImage /TRANSPARENT 255 0 255 $PLUGINSDIR\2.bmp 150 16
|
|
!insertmacro GetReturnValue
|
|
# create the font for the following text
|
|
CreateFont $R0 "Comic Sans MS" 50 700
|
|
# add a blue shadow for the text
|
|
BgImage::AddText "Testing 1... 2... 3..." $R0 0 0 255 48 48 798 198
|
|
!insertmacro GetReturnValue
|
|
# add a green shadow for the text
|
|
BgImage::AddText "Testing 1... 2... 3..." $R0 0 255 0 52 52 802 202
|
|
!insertmacro GetReturnValue
|
|
# add the text
|
|
BgImage::AddText "Testing 1... 2... 3..." $R0 255 0 0 50 50 800 200
|
|
!insertmacro GetReturnValue
|
|
# show our creation to the world!
|
|
BgImage::Redraw
|
|
# Refresh doesn't return any value
|
|
|
|
FunctionEnd
|
|
|
|
ShowInstDetails show
|
|
|
|
Section
|
|
# play some sounds
|
|
FindFirst $0 $1 $WINDIR\Media\*.wav
|
|
StrCmp $0 "" skipSound
|
|
moreSounds:
|
|
StrCmp $1 "" noMoreSounds
|
|
BgImage::Sound /WAIT $WINDIR\Media\$1
|
|
# Sound doesn't return any value either
|
|
MessageBox MB_YESNO "Another sound?" IDNO noMoreSounds
|
|
FindNext $0 $1
|
|
Goto moreSounds
|
|
|
|
noMoreSounds:
|
|
FindClose $0
|
|
skipSound:
|
|
|
|
# change the background image to Mike, tiled
|
|
BgImage::SetBg /TILED $PLUGINSDIR\1.bmp
|
|
!insertmacro GetReturnValue
|
|
# we have to redraw to reflect the changes
|
|
BgImage::Redraw
|
|
|
|
MessageBox MB_OK "Mike the llama"
|
|
|
|
# clear everything
|
|
BgImage::Clear
|
|
# Clear doesn't return any value
|
|
# set another gradient
|
|
BgImage::SetBg /GRADIENT 0xFF 0xFA 0xBA 0xAA 0xA5 0x65
|
|
!insertmacro GetReturnValue
|
|
# add some text
|
|
BgImage::AddText "A Desert for Mike" $R0 0 0 0 50 50 800 150
|
|
!insertmacro GetReturnValue
|
|
# add mike as an image
|
|
BgImage::AddImage $PLUGINSDIR\1.bmp 50 150
|
|
!insertmacro GetReturnValue
|
|
# again, we have to call redraw to reflect changes
|
|
BgImage::Redraw
|
|
SectionEnd
|
|
|
|
Function .onGUIEnd
|
|
BgImage::Destroy
|
|
# Destroy doesn't return any value
|
|
FunctionEnd |