?php
$m
=
new
SWFMovie(
)
;
$m
-
setDimension(11000
,
8000)
;
$m
-
setBackground(0x00
,
0x00
,
0x00)
;
$m
-
add(new
SWFAction(
"
this.quality
=
0
;
/
frames.visible
=
0
;
startDrag('
/
mouse'
,
1)
;
"))
;
/
/
sprite
de
suivi
de
souris
$t
=
new
SWFSprite()
;
$i
=
$m
-
add($t)
;
$i
-
setName('mouse')
;
$g
=
new
SWFGradient()
;
$g
-
addEntry(0
,
0xff
,
0xff
,
0xff
,
0xff)
;
$g
-
addEntry(0.1
,
0xff
,
0xff
,
0xff
,
0xff)
;
$g
-
addEntry(0.5
,
0xff
,
0xff
,
0xff
,
0x5f)
;
$g
-
addEntry(1.0
,
0xff
,
0xff
,
0xff
,
0)
;
/
/
gradient
$s
=
new
SWFShape()
;
$f
=
$s
-
addFill($g
,
SWFFILL_RADIAL_GRADIENT)
;
$f
-
scaleTo(0.03)
;
$s
-
setRightFill($f)
;
$s
-
movePenTo(-600
,
-600)
;
$s
-
drawLine(1200
,
0)
;
$s
-
drawLine(0
,
1200)
;
$s
-
drawLine(-1200
,
0)
;
$s
-
drawLine(0
,
-1200)
;
/
/
on
en
fait
un
sprite
pour
utiliser
la
fonction
multColor(
)
$p
=
new
SWFSprite()
;
$p
-
add($s)
;
$p
-
nextFrame()
;
/
/
Ajoute
la
forme
ici
,
chaque
forme
dans
une
couleur
différente
$q
=
new
SWFSprite()
;
$q
-
add(new
SWFAction("gotoFrame(random(7)+1)
;
stop()
;"))
;
$i
=
$q
-
add($p)
;
$i
-
multColor(1.0
,
1.0
,
1.0)
;
$q
-
nextFrame()
;
$i
-
multColor(1.0
,
0.5
,
0.5)
;
$q
-
nextFrame()
;
$i
-
multColor(1.0
,
0.75
,
0.5)
;
$q
-
nextFrame()
;
$i
-
multColor(1.0
,
1.0
,
0.5)
;
$q
-
nextFrame()
;
$i
-
multColor(0.5
,
1.0
,
0.5)
;
$q
-
nextFrame()
;
$i
-
multColor(0.5
,
0.5
,
1.0)
;
$q
-
nextFrame()
;
$i
-
multColor(1.0
,
0.5
,
1.0)
;
$q
-
nextFrame()
;
/
/
Enfin
,
le
code
de
l'action
$p
=
new
SWFSprite()
;
$i
=
$p
-
add($q)
;
$i
-
setName('frames')
;
$p
-
add(new
SWFAction(
"
dx
=
(
/
:mousex
-
/
:lastx)
/
3
+
random(10)-5
;
dy
=
(
/
:mousey
-
/
:lasty)
/
3
;
x
=
/
:mousex
;
y
=
/
:mousey
;
alpha
=
100
;
"))
;
$p
-
nextFrame()
;
$p
-
add(new
SWFAction(
"
this.x
=
x
;
this.y
=
y
;
this.alpha
=
alpha
;
x
+=
dx
;
y
+=
dy
;
dy
+=
3
;
alpha
-=
8
;
"))
;
$p
-
nextFrame()
;
$p
-
add(new
SWFAction("prevFrame()
;
play()
;"))
;
$p
-
nextFrame()
;
$i
=
$m
-
add($p)
;
$i
-
setName('frames')
;
$m
-
nextFrame()
;
$m
-
add(new
SWFAction(
"
lastx
=
mousex
;
lasty
=
mousey
;
mousex
=
/
mouse.x
;
mousey
=
/
mouse.y
;
++num
;
if(num
==
11
)
num
=
1
;
removeClip('char
'
num)
;
duplicateClip(
/
frames
,
'char
'
num
,
num)
;
"))
;
$m
-
nextFrame()
;
$m
-
add(new
SWFAction("prevFrame()
;
play()
;"))
;
header('Content-type
:
application
/
x-shockwave-flash')
;
$m
-
output()
;
?
|