home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Acorn User 10
/
AU_CD10.iso
/
Archived
/
Updates
/
Flash
/
writeflash
/
Examples
/
fade
< prev
next >
Wrap
Text File
|
2000-04-19
|
626b
|
45 lines
#include FlashLibrary:Colours
FileVersion 1
FrameArea {
width 4000
height 3000
}
FrameRate 12.5
BgColour BLACK
// define a box that fills the entire screen
Shape {
id 1
fillstyle { solid BLACK } // fillstyle #1
selectfillstyle0 1
lineby { 0 3000 }
lineby { 4000 0 }
lineby { 0 -3000 }
lineby { -4000 0 }
}
// put the box on the screen
Place {
id 1
depth 1
matrix { 65536 0 0 }
}
ShowFrame { }
// fade in from black to white using a cxform
:for i = 1 to 15
// modify the character at depth 0
Place {
depth 1
cxform { 255 255 255 255 16*i 16*i 16*i 0 }
}
ShowFrame { }
:next