Papel se movimentando para baixo

 

Vimos na dica anterior o código para fazer com que o fundo fique fixo e o papel se movimente.

Vou deixar nesta dica, o código prontinho, para você usar, deixando o papel se movimentando para baixo.

1. Abra uma nova mensagem.

2. Apague tudo o que encontrar na aba "Origem" e cole o seguinte código:

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

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2719.2200" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff
background="endereço do papel de carta algo do tipo: C:\Arquivos de programas\Arquivos comuns\Microsoft Shared\Papel de carta\borboleta_mask.jpg">

<!--webbot bot="HTMLMarkup" alt="[&lt;b&gt;This is the OE5 Scroll Script&lt;/b&gt;]" StartSpan -->
<P></P>
<DIV id=imageholder
style="Z-INDEX: -1; LEFT: 0px; POSITION: absolute; TOP: 0px">
<SCRIPT language=VBScript>
<!--
direction="down"
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>
</DIV>

</BODY></HTML>

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

Veja um exemplo, clicando aqui.

Basta alterar o que deixei em vermelho (endereço do papel de carta) no código, mantendo as aspas.

Se quiser, você pode também inserir uma música, imagens, formatar moldura e barra de rolagem.

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

Os efeitos serão vistos apenas quando você clicar em "Visualizar".

Dica elaborada por Lilian Russo

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




.