?php
$s
=
new
SWFShape(
)
;
$f1
=
$s
-
addFill(0xff
,
0
,
0)
;
$f2
=
$s
-
addFill(0xff
,
0x7f
,
0)
;
$f3
=
$s
-
addFill(0xff
,
0xff
,
0)
;
$f4
=
$s
-
addFill(0
,
0xff
,
0)
;
$f5
=
$s
-
addFill(0
,
0
,
0xff)
;
/
/
erreur
:
il
faut
déclarer
tous
les
styles
avant
/
/
de
les
utiliser
.
$s
-
setLine(40
,
0x7f
,
0
,
0)
;
$s
-
setLine(40
,
0x7f
,
0x3f
,
0)
;
$s
-
setLine(40
,
0x7f
,
0x7f
,
0)
;
$s
-
setLine(40
,
0
,
0x7f
,
0)
;
$s
-
setLine(40
,
0
,
0
,
0x7f)
;
$f
=
new
SWFFont('Techno.fdb')
;
$s
-
setRightFill($f1)
;
$s
-
setLine(40
,
0x7f
,
0
,
0)
;
$s
-
drawGlyph($f
,
'
!')
;
$s
-
movePen($f
-
getWidth('
!')
,
0)
;
$s
-
setRightFill($f2)
;
$s
-
setLine(40
,
0x7f
,
0x3f
,
0)
;
$s
-
drawGlyph($f
,
'#')
;
$s
-
movePen($f
-
getWidth('#')
,
0)
;
$s
-
setRightFill($f3)
;
$s
-
setLine(40
,
0x7f
,
0x7f
,
0)
;
$s
-
drawGlyph($f
,
'%')
;
$s
-
movePen($f
-
getWidth('%')
,
0)
;
$s
-
setRightFill($f4)
;
$s
-
setLine(40
,
0
,
0x7f
,
0)
;
$s
-
drawGlyph($f
,
'*')
;
$s
-
movePen($f
-
getWidth('*')
,
0)
;
$s
-
setRightFill($f5)
;
$s
-
setLine(40
,
0
,
0
,
0x7f)
;
$s
-
drawGlyph($f
,
'@')
;
$m
=
new
SWFMovie()
;
$m
-
setDimension(3000,2000)
;
$m
-
setRate(12.0)
;
$i
=
$m
-
add($s)
;
/
/
note
la
chaine
est
ici!!
!
$i
-
moveTo(1500-$f
-
getWidth("!#%*@")
/
2
,
1000+$f
-
getAscent()
/
2)
;
header('Content-type
:
application
/
x-shockwave-flash')
;
$m
-
output()
;
?
|