Texto Fixo e Papel se Movimentando

Se você quiser fazer com que o fundo se mova e o texto se mantenha fixo, use o seguinte código, antes de </BODY> lá no finalzinho da aba Origem:

----------------------------------------------------------------------------------------------------------------------------------------------------------------
<!--webbot bot="HTMLMarkup" alt="[&lt;b&gt;This is the OE5 Scroll Script&lt;/b&gt;]" StartSpan --></P>
<DIV id=imageholder style="LEFT: 0px; POSITION: absolute; TOP: 0px; Z-INDEX: -1">
<SCRIPT language=VBScript>
<!--
direction="up"
sizew=300 ' enter the width of the scrolling image here
sizeh=416 ' enter the height of the scrolling image here
nail=0
source=document.body.background
tall=((screen.height\sizeh)+1)*2
wide=(screen.width\sizew)+1

if direction="up" then
max=tall
axis=sizeh
placement=0
reset=0
elseif direction="left" then
max=wide
axis=sizew
placement=0
reset=0
elseif direction="down" then
max=tall
axis=0
placement=-sizeh
reset=-sizeh
elseif direction="right" then
max=wide
axis=0
placement=-sizew
reset=-sizew
end if

document.write "<pre>"
for temp=0 to max
if direction="up" then
document.write "<img id=pics"&temp&" src><br>"
elseif direction="left" then
document.write "<img id=pics"&temp&" src>"
elseif direction="down" then
document.write "<img id=pics"&temp&" src><br>"
elseif direction="right" then
document.write "<img id=pics"&temp&" src>"
end if
document.all("pics"&temp).src=source
next
document.write "</pre>"

document.body.background=" "
window.status="Click the image to Stop or Restart the scroll"

sub scroll()
if nail=1 then
exit sub
end if
if placement < axis then
setTimeout "move", 1
else
placement=reset
setTimeout "move", 1
end if
end sub

sub move()
if direction="up" then
imageholder.style.top=-placement
elseif direction="left" then
imageholder.style.left=-placement
elseif direction="down" then
imageholder.style.top=placement
elseif direction="right" then
imageholder.style.left=placement
end if
placement=placement+1
setTimeout "scroll", 1
end sub

sub imageholder_onclick()
if nail=0 then
nail=1
else
nail=0
end if
scroll()
end sub

scroll()
-->
</SCRIPT>

-----------------------------------------------------------------------------------------------------------------------------------------------------------------


O "script" acima, fará com que sua imagem se movimente para cima, mas você poderá mudar a direção do movimento.

Veja o item que deixei em negrito lá no código:

direction="up"

Você pode alterar o "up" (para cima) para:

"down" (para baixo);

"left" (para a esquerda);

ou "right" (para a direita).

Lembre-se de deixar a direção a ser seguida entre aspas.

Prontinho!

É só aplicar um papel de carta, uma musiquinha e seu texto, na aba "Editar" e depois conferir os resultados em "Visualizar".

Veja um exemplo aqui.


(Para este script funcionar, confira esta dica)

Aqui você encontra vários papéis de carta para usar com esse script.

 

Aqui você encontra uma versão prontinha para e-mail desta dica. Está zipada no formato .eml (próprio para o Outlook Express)

(Lembre-se de que o efeito só será percebido quando clicamos em "Visualizar".)

(Dica elaborada por Lilian Russo)

Lilian Russo - Todos os Direitos Reservados - ©2002/2008




.