Script JettyM

 

Instruções e Código HTML

 

INSTRUÇÕES:

Material:


- imagem da tile (251x259 px)
- imagem maior (488x359 px)
- imagem bfly1(20x15 px)
- imagem borboletinha.gif (40x40 px)
- arquivo musical



COMO FAZER:

Abra Nova Mensagem no Outlook Express, delete todo conteúdo da aba Origem

e cole o conteúdo do "Código JettyM", que se encontra no final dessa explicação, em azul.

 

Pela aba Editar você deve:


- formatar plano de fundo (usando a imagem da tile)
- formatar plano de fundo/som
- digitar seu texto

Pela aba Origem você deve:


- indicar o caminho da imagem maior
- indicar o caminho da imagem da bfly1.gif
- indicar o caminho imagem borbolrtinha.gif

No "JettyM" você irá encontrar o lugar correto de inserir essas imagens.

Você pode também alterar as cores das tabelas e barra de rolagem.

 


 

Pesquisa  by Inês

para os sites 

Toque de Arte e Caderninho

Instruções by Angela Glavam


Julho de 2007

Direitos reservados


Código JettyM

<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1252">
<STYLE>BODY {
BORDER-RIGHT: #959ead 10px groove; BORDER-TOP: #a3afbb 10px groove; OVERFLOW-X: hidden;

SCROLLBAR-HIGHLIGHT-COLOR: #a3afbb; BORDER-LEFT: #a3afbb 10px groove;

SCROLLBAR-SHADOW-COLOR: #a3afbb; SCROLLBAR-ARROW-COLOR: #a3afbb;

SCROLLBAR-TRACK-COLOR: #959ead; BORDER-BOTTOM: #959ead 10px groove;

SCROLLBAR-BASE-COLOR: #a3afbb
}
.DIV1 {
BORDER-RIGHT: #959ead 5px solid; PADDING-RIGHT: 10px; BORDER-TOP: #959ead 5px solid; PADDING-LEFT: 10px; FONT-SIZE: 12pt; RIGHT: 0px; FILTER: blendtrans; VISIBILITY: hidden; PADDING-BOTTOM: 10px; SCROLLBAR-HIGHLIGHT-COLOR: #a3afbb; OVERFLOW: auto; BORDER-LEFT: #a3afbb 5px solid; WIDTH: 488px; SCROLLBAR-SHADOW-COLOR: #a3afbb; COLOR: #b3bac4; SCROLLBAR-ARROW-COLOR: #a3afbb; PADDING-TOP: 10px; SCROLLBAR-TRACK-COLOR: #959ead; BORDER-BOTTOM: #959ead 5px solid; FONT-FAMILY: Bookman Old Style; SCROLLBAR-BASE-COLOR: #959ead; POSITION: absolute; TOP: 0px; HEIGHT: 125px; BACKGROUND-COLOR: #b3bac4
}
.img {
LEFT: -1800px; POSITION: absolute; TOP: -1800px
}
</STYLE>

<BODY bgColor=#a3afbb background="Caminho da imagem da tile de fundo - tile.jpg">&nbsp;</DIV>
<DIV><FONT face=Arial
size=2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</FONT></DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV><BR></DIV>
<DIV style="FONT: 10pt arial"><IMG class=img id=p1
src="Caminho da imagem maior">
<DIV class=div1 id=mess style="WIDTH: 491px; HEIGHT: 125px"
align=center></DIV><IMG class=img id=fl
src="Caminho da imagem bfly1.gif"> <IMG class=img id=fl2
src="Caminho da imagem borboletinha.gif">
<SCRIPT language=vbscript>
'------------------------------------------
'Stationery en script gemaakt door Jetty
'www.molehofje.com
'Tekst tussen deze lijnen aub laten staan
'------------------------------------------

a=0
b=0

Dim sch, scw, p1w, p1h, pp1t, pp1l, jr, jm, flw, flh, startw, starth, x, y, th, th1, fl2w, fl2h, x2, y2, start2w, start2h, th2, messw, messh


Sub Window_onload()
window.status=" ~~~ Script and design JettyM ~~~ "
sch=document.body.clientheight
scw=document.body.clientwidth
p1h=6
p1w=6
flw=75
flh=50
fl2w=75
fl2h=51
pp1t=(sch/2)-(p1h/2)
pp1l=0
startw=(scw/2)-(flw/2)
starth=1
start2w=(scw/2)-(fl2w/2)
start2h=1
x=0.5
y=3
x2=-0.5
y2=3
messh=125
messw=488
mess.style.postop=425
mess.style.posleft=(scw/2)-(messw/2)
ClearTimeOut(jr)
jr=SettimeOut ("start", 100)
End Sub

Sub scroll()
a=a+1
b=b
document.body.style.BackGroundPosition=a&" "&b
End Sub

Sub Start()
ClearTimeOut(jr)
pp1l=pp1l+4
pp1t=pp1t
p1.style.height=p1h
p1.style.width=p1w
p1.style.PosLeft=pp1l
p1.style.PosTop=pp1t
if pp1l=>(scw/2-(p1w/2+244)) then jr=SetTimeOut("grow", 34) else jr=SetTimeOut("start", 50)
End Sub

Sub grow()
ClearTimeOut(jr)
p1h=p1h
p1w=p1w+4
p1.style.height=p1h
p1.style.width=p1w
p1.style.PosLeft=pp1l
p1.style.PosTop=pp1t
if p1w=>488 then jr=SetTimeOut ("moveup", 34) else jr=SetTimeOut ("grow",50)
End Sub

Sub moveup()
ClearTimeOut(jr)
pp1l=pp1l
pp1t=pp1t-4
p1.style.height=p1h
p1.style.width=p1w
p1.style.PosLeft=pp1l
p1.style.PosTop=pp1t
if pp1t=<30 then jr=SetTimeOut("grow2", 34) else jr=SetTimeOut("moveup", 50)
End Sub

Sub grow2()
ClearTimeOut(jr)
p1h=p1h+4
p1w=p1w
p1.style.height=p1h
p1.style.width=p1w
p1.style.PosLeft=pp1l
p1.style.PosTop=pp1t
if p1h=>359 then jr=SetTimeOut ("scrollit", 34) else jr=SetTimeOut ("grow2",50)
End Sub

Sub scrollit()
ClearInterval (jm)
jm=SetInterval ("scroll",64)
th2=SetTimeOut ("message", 100)
End Sub

Sub message()
ClearTimeOut (th2)
mess.filters(0).Apply()
mess.style.visibility="visible"
mess.filters(0).Play(9.000)
th=SettimeOut ("molleke", 100)
th1=SettimeOut ("molleke3", 9000)
End Sub

Sub molleke()
ClearTimeOut (th)
startw=startw+x
starth=starth+y
fl.style.left=startw
fl.style.top=starth
if starth=>sch-flh then th=SetTimeOut ("molleke2", 100) else th=SetTimeout ("molleke", 100)
End Sub

Sub molleke2()
ClearTimeOut (th)
y=rnd*3
startw=(scw/2)-(flw/2)
starth=1
th=SettimeOut ("molleke", 100)
End Sub

Sub molleke3()
ClearTimeOut (th1)
start2w=start2w+x2
start2h=start2h+y2
fl2.style.left=start2w
fl2.style.top=start2h
if start2h=>sch-fl2h then th1=SetTimeOut ("molleke4", 100) else th1=SetTimeout ("molleke3", 100)
End Sub

Sub molleke4()
ClearTimeOut (th1)
y2=rnd*3
start2w=(scw/2)-(fl2w/2)
start2h=1
th2=SettimeOut ("molleke3", 100)
End Sub

Sub window_OnResize()
window_OnLoad
End sub


</SCRIPT>
</DIV>
<P>
&nbsp;</HTML>

 


 

 

 

Todo o material encontrado nesse site foi cedido, criado ou pesquisado  para uso restrito  no site. É proibida a retirada, reprodução, alteração ou adaptação de  qualquer material escrito, assim como de elementos gráficos concebidos com exclusividade para essas páginas.Todavia, se eventualmente for encontrado algum material que possa ser identificado por terceiros, daremos o crédito devido, mediante comunicado e apresentação das devidas provas.

 

design by Angela Maria Pereira Glavam

 

  Copyright © 2002 by Angela Maria P. Glavam® 

Todos os direitos reservados