CCG 10
|
|
Bonjour,
Voici ma tentative
d'explications.
J'ai essayé de faire
simple, n'hésitez pas à poser vos questions ;-)
---------------------------------
<HTML>
<HEAD>
<TITLE>Mettez votre titre ici, ou supprimez toute cette ligne</TITLE> <!--La balise
STYLE suivante définit la position et le style de la
transition (Modifiez les
valeurs en violet) :
TOP : en %, en points (pt) ou en pixels (px) définit la marge
du haut
(mettez la à 0 si vous voulez une transition sur tout le
fond)
LEFT : idem pour la marge de gauche
(mettez la à 0 si vous voulez une transition sur tout le
fond)
WIDTH : indiquez ici (en %, pt
ou px) la largeur de vos images
(mettez la à 110% si vous voulez une transition sur tout le
fond)
HEIGHT : idem pour leur
hauteur
(mettez la à 105% si vous voulez une transition sur tout le
fond)
Les quatre BORDER (right=droit, left=gauche, top=haut,
bottom=bas) définissent le style de
bordure des images.
Si vous ne voulez pas de bordure, supprimez ces quatre
lignes, ou mettez la valeur "2px" à "0px"
#df1d66 est la couleur de
chaque bordure. Changez-là. (vous n'êtes pas obligés de faire un cadre
d'une seule couleur)
L'épaisseur des bords est
définie par la valeur "2px". Modifiez-la.
"ouset" définit le style de bordure. Vous pouvez essayer
d'autres valeurs :
inset, none, dotted, dashed,
solid, double, groove, ridge...
-->
<STYLE>.FS { POSITION: absolute; VISIBILITY: hidden; TOP: 18%; LEFT: 6%;
WIDTH: 266px; HEIGHT: 260px; BORDER-RIGHT: #df1d66 2px outset;
BORDER-LEFT: #df1d66 2px outset; BORDER-TOP: #df1d66 2px outset; BORDER-BOTTOM: #df1d66 2px outset } </STYLE> </HEAD> <!-- La balise BODY ci-dessous définit le corps du
message.
bgcolor =
couleur du fond
Si vous ne voulez pas de cadre "général", supprimez les quatre
lignes de "style=BORDER...outset"
ou mettez la
valeur "4px" à "0px" -->
<BODY bgColor=#000000 bgProperties=fixed scroll=no style="BORDER-RIGHT: #df1d66 4px outset; BORDER-LEFT: #df1d66 4px outset; BORDER-TOP: #df1d66 4px outset; BORDER-BOTTOM: #df1d66 4px outset"> <!-- En avant
la musique ;-)
Si vous n'en
mettez pas (dommage...) supprimez toute la ligne-->
<BGSOUND src="Indiquez ici le chemin de votre fichier son" balance=0 volume=0> <!--Passons
aux images de la transition
Le nombre des
images n'étant pas défini dans le <SCRIPT>, vous pouvez ajouter ou
supprimer
autant d'images
que vous le souhaitez, en supprimant ou copiant/collant une
ligne...
cool, nan
?!-->
<SPAN id=LesImages> <IMG class=FS src="Indiquez ici le chemin de votre fichier image n°1"> <IMG class=FS src="Indiquez ici le chemin de votre fichier image n°2"> <IMG class=FS src="Indiquez ici le chemin de votre fichier image n°3"> <IMG class=FS src="Indiquez ici le chemin de votre fichier image n°4"> <!-- La balise MARQUEE définit le mouvement du
texte.
Supprimez-là
si vous voulez le figer, ou si vous ne mettez pas de texte-->
<MARQUEE scrollAmount=1 scrollDelay=2 direction=up behavior=slide loop=infinite height="550%"> <!-- La balise DIV
définit le style du texte :
FONT-FAMILY : la
police de caractère
FONT-SIZE : sa taille en pt ou px
COLOR : sa couleur
FONT-WEIGHT : ici pour mettre en gras
TOP : marge du haut
LEFT : de gauche
WIDTH : largeur du texte
HEIGHT : hauteur
Saisissez votre blabla dessous... -->
<DIV id=texte style="FONT-FAMILY: verdana; FONT-SIZE: 10pt; COLOR: #df1d66; FONT-WEIGHT: bold; POSITION: absolute; TOP: 0%; LEFT: 330px; WIDTH: 50%; HEIGHT: 100%"> <BR><BR><BR><BR><BR><BR><BR><BR><BR>
Mettez votre texte ici.<BR><BR><BR> ... A moins que vous n'ayez rien à dire
!<BR><BR>
(M'enfin, "c'est pas parce qu'on n'a rien à dire..." !
;-)<BR><BR><BR>
...<BR> ...<BR>
</DIV> <!-- Et voici le script
les quatre
valeurs (20000,21000,23000,25000) influencent le délai
d'affichage de chaque image.
Pour une transition plus rapide, mettez des chiffres
moins élevés.
-->
<SCRIPT language=VBScript>
//---O'M-niprésence---septembre 2000---Richard
Dutil//
dim nx,ny
dim k,z,LaPhrase,Image,temps
temps=array(20000,21000,23000,25000) sub window_onload
z=0 set Image=LesImages.all.tags("IMG") k=0:z=Image.length SetTimeOut "signe",120000 TransImage end sub sub TransImage Image(k).style.filter="blendTrans" Image(k).filters(0).Apply() Image(k).style.visibility = "visible" Image(k).filters(0).Play(2) k=k+1:if k=z then exit sub settimeout "Transimage",temps(k) end sub sub
signe
texte.style.filter="blendTrans" texte.filters(0).Apply() texte.style.visibility = "visible" texte.filters(0).Play(15) end sub </SCRIPT>
</SPAN> </BODY> </HTML> -------------------------------------------------------------
Voilà...
En cas d'erreurs, merci de me corriger...
;-)
En cas de non-erreur, merci de compléter
;-))
A vous le micro ;-)
Martine N.
|
|