SCRIPT
Efeitos em seus e-mails
 
O SCRIPT é como se fosse um código para fazer os efeitos nos e-mails.
Para começarmos a fazer os nossos efeitos (SCRIPT) nos e-mails, temos que configurar o outlook, abra uma nova mensagem, clique em Exibir / (marque o campo: Editar código de fonte) Aparecerá 3 palavras na base inferior "Editar, Origem, Visualizar". Clique em Origem e cole o SCRIPT (que são esses códigos que fazem os efeitos) no final da linha inferior, se precisar dê um Enter primeiro antes de colocar o SCRIPT. Quando colocar o SCRIPT, e fizer as alterações necessárias, volte para Editar.
Agora vc pode escrever o que quiser e enviá-lo com seus efeitos.
 
 
 
1- Para fazer aparecer uma caixa com mensagem ao abrirem seu e-mail (lembrete):
Onde estiver marcado de vermelho, substitua pelo seu texto.
 

 
</HEAD>
<BODY background="" bgColor=#ffffff
onload="alert('Escreva aqui o seu texto \n
SCRIPT')">
<DIV>&nbsp;</DIV>
  
 
2 - Para fazer o texto rolar horizontal :
     faça o mesmo com o script abaixo
Vc pode também colar a caixa de texto e colocar o texto que quiser.
Para ampliar ou reduzir as letras acima clik 3 ou 4 vezes com o mouse sobre as letras / selecione / defina tamanho (pode mudar fonte e cor e corrigir ou mudar texto também )

 
 <DIV>&nbsp;</DIV>
<MARQUEE scrollAmount=3 scrollDelay=24><FONT color=#000000
face="Verdana">Escrever aqui o que quer que role horizontal</FONT></MARQUEE></FONT></FONT></BODY></HTML>
 
 
Escreve aqui o que quer que role horizontalmente
 
 

 
3 - Para fazer o texto Bater e Voltar:
     faça o mesmo com o script abaixo
Vc pode também colar a caixa de texto e colocar o texto que quiser.
 

 
<MARQUEE behavior=alternate style="FONT-SIZE: 36pt" ALIGN="middle"><FONT
color=#ff0000><FONT color=#000000><FONT color=#ff0000><FONT color=#000080
face="Poster Bodoni"><STRONG><FONT face=URWLatinoT size=4><EM>/&nbspBate e Volta /  clique aqui e coloque o texto</EM></FONT></STRONG></FONT></FONT></FONT></FONT></MARQUEE></FONT><BR><!-- |**|begin egp html banner|**| --><!-- |**|end egp html banner|**| --><BR></BODY></HTML>
 
 
Bate e Volta /  clique aqui e coloque o texto

 

 
 
 4 - Texto e figura em caixa subindo
 

 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY background="" bgColor=#ffffff bgProperties=fixed>
<DIV>&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV><STRONG><FONT color=#0000ff face=Arial></FONT></STRONG><EM><FONT
size=4>&nbsp;</FONT></EM></DIV>
<CENTER>
<TABLE background=file:///C%7C/imagem2/fundo2/lyellowtile.jpg border=1
cellPadding=40 cellSpacing=0 width="80%">
  <TBODY>
  <TR>
    <TD width="100%">
      <P>
      <CENTER><FONT size=2><FONT size=2></CENTER></FONT></FONT>
      <CENTER><FONT size=2>&nbsp;</CENTER>
      <DIV align=center>&nbsp;</DIV>
      <DIV align=justify>&nbsp;</DIV></FONT></TD></TR></TBODY></TABLE></CENTER>
<DIV>
<SCRIPT language=JavaScript1.2>
// change 1 to another integer to alter the scroll speed. Greater is faster
var speed=2
var currentpos=0,alt=1,curpos1=0,curpos2=-1
 
function initialize(){
startit()
}
 
function scrollwindow(){
if (document.all)
temp=document.body.scrollTop
else
temp=window.pageYOffset
if (alt==0)
alt=1
else
alt=0
if (alt==0)
curpos1=temp
else
curpos2=temp
if (curpos1!=curpos2){
if (document.all)
currentpos=document.body.scrollTop+speed
else
currentpos=window.pageYOffset+speed
window.scroll(0,currentpos)
}
else{
currentpos=0
window.scroll(0,currentpos)
}
}
 
function startit(){
setInterval("scrollwindow()",80)
}
window.onload=initialize
</SCRIPT>
</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>
<DIV>&nbsp;</DIV></DIV></BODY></HTML>
 

 
5 - Texto e figura em caixa dupla subindo

 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY background="" bgProperties=fixed>
<DIV>&nbsp;</DIV>
<CENTER>
<TABLE background=file:///C%7C/imagem2/fundo2/lyellowtile.jpg border=1
cellPadding=40 cellSpacing=0 width="80%">
  <TBODY>
  <TR>
    <TD width="100%">
      <P>
      <CENTER><FONT size=2><FONT size=2>&nbsp;</CENTER></FONT></FONT>
      <CENTER>
      <TABLE background=file:///C%7C/imagem2/fundo2/yellowplain.jpg border=1
      width="50%">
        <TBODY>
        <TR>
          <TD width="100%">
            <DIV align=center>&nbsp;</DIV></TD></TR></TBODY></TABLE></CENTER><FONT
      size=2>
      <DIV align=center><FONT color=#0000ff face="Tempus Sans ITC"
      size=4><STRONG></STRONG></FONT>&nbsp;</DIV>
      <DIV align=justify>&nbsp;</DIV>
      <DIV align=center>&nbsp;</DIV>
      <DIV align=justify>&nbsp;</DIV></FONT></TD></TR></TBODY></TABLE></CENTER>
<DIV>
<SCRIPT language=JavaScript1.2>
// change 1 to another integer to alter the scroll speed. Greater is faster
var speed=2
var currentpos=0,alt=1,curpos1=0,curpos2=-1
 
function initialize(){
startit()
}
 
function scrollwindow(){
if (document.all)
temp=document.body.scrollTop
else
temp=window.pageYOffset
if (alt==0)
alt=1
else
alt=0
if (alt==0)
curpos1=temp
else
curpos2=temp
if (curpos1!=curpos2){
if (document.all)
currentpos=document.body.scrollTop+speed
else
currentpos=window.pageYOffset+speed
window.scroll(0,currentpos)
}
else{
currentpos=0
window.scroll(0,currentpos)
}
}
 
function startit(){
setInterval("scrollwindow()",80)
}
window.onload=initialize
</SCRIPT>
</DIV>
<DIV>
<DIV>&nbsp;</DIV></DIV></BODY></HTML>
 
 
 
6- Para colocar o seu nome em movimento no e-mail quando passamos o mause
(colorido)

(só mude o nome de GUIABELENZINHO que está marcado de vermelho pelo seu)
Se vc quiser pode mudar a fonte e o tamanho da fonte ( mude o que está marcado de vermelho)
 

 
<STYLE>.spanstyle {
COLOR: #0066ff; FONT-FAMILY: Times New Roman; FONT-SIZE: 20pt; FONT-WEIGHT: normal; POSITION: absolute; TOP: -50px; VISIBILITY: visible
}
</STYLE>

</HEAD>
<BODY onload="javascript:pageonload()">

<script language="JavaScript">



var message=" GUIABELENZINHO";

var x,y;

var step=12;

var flag=0;



message=message.split("");

var xpos=new Array();

for (i=0;i<=message.length-1;i++) {

xpos[i]=-50;

}



var ypos=new Array();

for (i=0;i<=message.length-1;i++) {

ypos[i]=-50;

}



function handlerMM(e) {

x = (document.layers) ? e.pageX : document.body.scrollLeft+event.clientX+20;

y = (document.layers) ? e.pageY : document.body.scrollTop+event.clientY;

flag=1;

}



function makesnake() {

if (flag==1 && document.all) {

for (i=message.length-1; i>=1; i--) {

xpos[i]=xpos[i-1]+step;

ypos[i]=ypos[i-1];

}

xpos[0]=x+step;

ypos[0]=y;



for (i=0; i<=message.length-1; i++) {

var thisspan = eval("span"+(i)+".style");

thisspan.posLeft=xpos[i];

thisspan.posTop=ypos[i];

thisspan.color=Math.random() * 255 * 255 * 255 + Math.random() * 255 * 255 + Math.random() * 255;

}

}

else if (flag==1 && document.layers) {

for (i=message.length-1; i>=1; i--) {

xpos[i]=xpos[i-1]+step;

ypos[i]=ypos[i-1];

}

xpos[0]=x+step;

ypos[0]=y;



for (i=0; i<message.length-1; i++) {

var thisspan = eval("document.span"+i);

thisspan.left=xpos[i];

thisspan.top=ypos[i];

thisspan.color=Math.random() * 255 * 255 * 255 + Math.random() * 255 * 255 + Math.random() * 255;

}

}

}


for (i=0;i<=message.length-1;i++) {

document.write("<span id='span"+i+"' class='spanstyle'>");

document.write(message[i]);

document.write("</span>");

}


if (document.layers) {

document.captureEvents(Event.MOUSEMOVE);

}

document.onmousemove = handlerMM;

</script>
<script language="javascript">

function pageonload() {

makesnake();

window.setTimeout("pageonload();", 2);

}

</script>
 

 
 

 
7- Fazer o que tiver no e-mail subir
 

 

<SCRIPT language=JavaScript1.2>

/*
Advanced window scroller script-
By Website Abstraction (
www.wsabstract.com)
Over 200+ free JavaScripts here!
*/

var currentpos=0,alt=1,curpos1=0,curpos2=-1
function initialize(){
startit()
}
function scrollwindow(){
if (document.all)
temp=document.body.scrollTop
else
temp=window.pageYOffset
if (alt==0)
/*alt=1
else
alt=0*/ /*esta parte faz com que volte para o topo.*/
if (alt==0)
curpos1=temp
else
curpos2=temp
if (curpos1!=curpos2){
if (document.all)
currentpos=document.body.scrollTop+1
else
currentpos=window.pageYOffset+1
window.scroll(0,currentpos)
}
else{
currentpos=0
window.scroll(0,currentpos)
}
}
function startit(){
setInterval("scrollwindow()",50)
}
window.onload=initialize
</SCRIPT>

<META content="MSHTML 5.50.4134.600" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<STYLE></STYLE>

<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY background="" bgProperties=fixed text=#ffffff>
<DIV align=center>&nbsp;</DIV>
<FORM action=http://misc.webworld.nu/cgi-bin/referer.cgi method=post>
<DIV align=left>
<P><FONT color=#ffffff><I><B><FONT face="Baskerville Old Face"
size=5>&nbsp;&nbsp;&nbsp;</FONT></B></I></FONT></P></DIV></FORM></BODY></HTML>

 

8- Imagens no Mouse
 
Várias pessoas estavam querendo saber o script de imagens no mouse; é bem grande, mas quem quiser testar é só colocar o diretório da imagem aonde está escrito "IMAGEM" (sem se esquecer de deixar as aspas).
O diretório de imagem é por exemplo assim:
 "C:\Meus documentos\imagens\corac.gif" (colocando letras maiúsculas  e minúsculas exatamente como estão no seu computador)    
 EX: salve esta imagem como corac.gif ( Dentro dos Meus Documentos, Imagens)
Aí é só substiruir "IMAGEM" por "corac.gif"
  
O SCRIPT É O SEGUINTE:
 

 
<DIV id=dot0
style="LEFT: 0px; VISIBILITY: hidden; WIDTH: 9px; POSITION: absolute; TOP: 0px; HEIGHT: 12px"></DIV>
 
<META content="MSHTML 5.50.4134.600" name=GENERATOR>
<P></P>
<DIV id=dot1
style="LEFT: 122px; POSITION: absolute; TOP: 1371px; HEIGHT: 36px"><IMG alt=""
hspace=0 src="IMAGEM" align=baseline
border=0></DIV>
<DIV id=dot2
style="LEFT: 104px; POSITION: absolute; TOP: 1399px; HEIGHT: 24px"><IMG
height=21 src="IMAGEM" ></DIV>
<DIV id=dot3
style="LEFT: 67px; POSITION: absolute; TOP: 1413px; HEIGHT: 38px"><IMG height=21
src="IMAGEM" ></DIV>
<DIV id=dot4
style="LEFT: 32px; POSITION: absolute; TOP: 1424px; HEIGHT: 26px"><IMG height=21
src="IMAGEM" ></DIV>
<DIV id=dot5
style="LEFT: 73px; POSITION: absolute; TOP: 1443px; HEIGHT: 40px"><IMG height=21
src="IMAGEM" ></DIV>
<DIV id=dot6
style="LEFT: 128px; POSITION: absolute; TOP: 1453px; HEIGHT: 26px"><IMG
height=30 src="IMAGEM" ></DIV>
<P>
<SCRIPT language=JavaScript>
 
<!-- hide code
 
/*
script
*/
 

// T
// Y
 
var nDots = 7;
if (document.all&&window.print)
document.body.style.cssText="overflow-x:hidden;overflow-y:scroll"
var Xpos = 0;
var Ypos = 0;
 
  // fixed time step, no relation to real time
var DELTAT = .01;
  // size of one spring in pixels
var SEGLEN = 10;
  // spring constant, stiffness of springs
var SPRINGK = 10;
  // all the physics is bogus, just picked stuff to
  // make it look okay
var MASS = 1;
var GRAVITY = 50;
var RESISTANCE = 10;
  // stopping criterea to prevent endless jittering
  // doesn't work when sitting on bottom since floor
  // doesn't push back so acceleration always as big
  // as gravity
var STOPVEL = 0.1;
var STOPACC = 0.1;
var DOTSIZE = 11;
  // BOUNCE is percent of velocity retained when
  // bouncing off a wall
var BOUNCE = 0.75;
 
var isNetscape = navigator.appName=="Netscape";
 
  // always on for now, could be played with to
  // let dots fall to botton, get thrown, etc.
var followmouse = true;
 
var dots = new Array();
init();
 
function init()
{
    var i = 0;
    for (i = 0; i < nDots; i++) {
        dots[i] = new dot(i);
    }
   
    if (!isNetscape) {
        // I only know how to read the locations of the
        // <LI> items in IE
        //skip this for now
        // setInitPositions(dots)
    }
   
    // set their positions
    for (i = 0; i < nDots; i++) {
        dots[i].obj.left = dots[i].X;
        dots[i].obj.top = dots[i].Y;
    }
   
   
    if (isNetscape) {
        // start right away since they are positioned
        // at 0, 0
        startanimate();
    } else {
        // let dots sit there for a few seconds
        // since they're hiding on the real bullets
        setTimeout("startanimate()", 2000);
    }
}
 
 
 
function dot(i)
{
    this.X = Xpos;
    this.Y = Ypos;
    this.dx = 0;
    this.dy = 0;
    if (isNetscape) {  
        this.obj = eval("document.dot" + i);
    } else {
        this.obj = eval("dot" + i + ".style");
    }
}
 

function startanimate() {      
    setInterval("animate()", 20);
}
 

// This is to line up the bullets with actual LI tags on the page
// Had to add -DOTSIZE to X and 2*DOTSIZE to Y for IE 5, not sure why
// Still doesn't work great
function setInitPositions(dots)
{
    // initialize dot positions to be on top
    // of the bullets in the <ul>
    var startloc = document.all.tags("LI");
    var i = 0;
    for (i = 0; i < startloc.length && i < (nDots - 1); i++) {
        dots[i+1].X = startloc[i].offsetLeft
            startloc[i].offsetParent.offsetLeft - DOTSIZE;
        dots[i+1].Y = startloc[i].offsetTop +
            startloc[i].offsetParent.offsetTop + 2*DOTSIZE;
    }
    // put 0th dot above 1st (it is hidden)
    dots[0].X = dots[1].X;
    dots[0].Y = dots[1].Y - SEGLEN;
}
 
// just save mouse position for animate() to use
function MoveHandler(e)
{
    Xpos = e.pageX;
    Ypos = e.pageY;      
    return true;
}
 
// just save mouse position for animate() to use
function MoveHandlerIE() {
    Xpos = window.event.x + document.body.scrollLeft;
    Ypos = window.event.y + document.body.scrollTop;     
}
 
if (isNetscape) {
    document.captureEvents(Event.MOUSEMOVE);
    document.onMouseMove = MoveHandler;
} else {
    document.onmousemove = MoveHandlerIE;
}
 

function vec(X, Y)
{
    this.X = X;
    this.Y = Y;
}
 
// adds force in X and Y to spring for dot[i] on dot[j]
function springForce(i, j, spring)
{
    var dx = (dots[i].X - dots[j].X);
    var dy = (dots[i].Y - dots[j].Y);
    var len = Math.sqrt(dx*dx + dy*dy);
    if (len > SEGLEN) {
        var springF = SPRINGK * (len - SEGLEN);
        spring.X += (dx / len) * springF;
        spring.Y += (dy / len) * springF;
    }
}
 

function animate() {   
    // dots[0] follows the mouse,
    // though no dot is drawn there
    var start = 0;
    if (followmouse) {
        dots[0].X = Xpos;
        dots[0].Y = Ypos;      
        start = 1;
    }
   
    for (i = start ; i < nDots; i++ ) {
       
        var spring = new vec(0, 0);
        if (i > 0) {
            springForce(i-1, i, spring);
        }
        if (i < (nDots - 1)) {
            springForce(i+1, i, spring);
        }
       
        // air resisitance/friction
        var resist = new vec(-dots[i].dx * RESISTANCE,
            -dots[i].dy * RESISTANCE);
       
        // compute new accel, including gravity
        var accel = new vec((spring.X + resist.X)/ MASS,
            (spring.Y + resist.Y)/ MASS + GRAVITY);
       
        // compute new velocity
        dots[i].dx += (DELTAT * accel.X);
        dots[i].dy += (DELTAT * accel.Y);
       
        // stop dead so it doesn't jitter when nearly still
        if (Math.abs(dots[i].dx) < STOPVEL &&
            Math.abs(dots[i].dy) < STOPVEL &&
            Math.abs(accel.X) < STOPACC &&
            Math.abs(accel.Y) < STOPACC) {
            dots[i].dx = 0;
            dots[i].dy = 0;
        }
       
        // move to new position
        dots[i].X += dots[i].dx;
        dots[i].Y += dots[i].dy;
       
        // get size of window
        var height, width;
        if (isNetscape) {
            height = window.innerHeight + document.scrollTop;
            width = window.innerWidth + document.scrollLeft;
        } else {       
            height = document.body.clientHeight + document.body.scrollTop;
            width = document.body.clientWidth + document.body.scrollLeft;
        }
       
        // bounce of 3 walls (leave ceiling open)
        if (dots[i].Y >=  height - DOTSIZE - 1) {
            if (dots[i].dy > 0) {
                dots[i].dy = BOUNCE * -dots[i].dy;
            }
            dots[i].Y = height - DOTSIZE - 1;
        }
        if (dots[i].X >= width - DOTSIZE) {
            if (dots[i].dx > 0) {
                dots[i].dx = BOUNCE * -dots[i].dx;
            }
            dots[i].X = width - DOTSIZE - 1;
        }
        if (dots[i].X < 0) {
            if (dots[i].dx < 0) {
                dots[i].dx = BOUNCE * -dots[i].dx;
            }
            dots[i].X = 0;
        }
       
        // move img to new position
        dots[i].obj.left = dots[i].X;                  
        dots[i].obj.top =  dots[i].Y;          
    }
}
 
// end code hiding -->
 
</SCRIPT>
 
 

 
9- Imagens passeando no e-mail sem o mause
Várias pessoas estavam querendo saber o script de imagens passeando no e-mail sem o mouse; eu descobri um; é bem grande, mas quem quiser testar é só colocar o diretório da imagem aonde está escrito "IMAGEM" (sem se esquecer de deixar as aspas).
O diretório de imagem é por exemplo assim:
 "C:\Meus documentos\imagens\corac.gif" (colocando letras maiúsculas  e minúsculas exatamente como estão no seu computador)
EX: salve esta imagem como corac.gif ( Dentro dos Meus Documentos, Imagens)
Aí é só substiruir "IMAGEM" por "corac.gif"
  

<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY background="" bgProperties=fixed><FONT size=4>
<DIV align=center><FONT color=#8080c0 face="Poor Richard" size=5>.</FONT><IMG
id=pic0 src="IMAGEM
"
style="LEFT: 104px; POSITION: absolute; TOP: 1005px"> <IMG id=pic1
src="
IMAGEM
"
style="LEFT: 92px; POSITION: absolute; TOP: 903px"> <IMG id=pic2
src="IMAGEM
"
style="LEFT: 335px; POSITION: absolute; TOP: 940px"> <IMG id=pic3
src="
IMAGEM
"
style="LEFT: 295px; POSITION: absolute; TOP: 940px"> <IMG id=pic4
src="IMAGEM
"
style="LEFT: 29px; POSITION: absolute; TOP: 903px"> <IMG id=pic5
src="
IMAGEM
"
style="LEFT: 114px; POSITION: absolute; TOP: 946px"> <IMG id=pic6
src="IMAGEM
"
style="LEFT: 113px; POSITION: absolute; TOP: 994px"> <IMG id=pic7
src="
IMAGEM
"
style="LEFT: 72px; POSITION: absolute; TOP: 1019px"> <IMG id=pic8
src="IMAGEM
"
style="LEFT: 117px; POSITION: absolute; TOP: 903px"> <IMG id=pic9
src="
IMAGEM
"
style="LEFT: 23px; POSITION: absolute; TOP: 951px">
<SCRIPT language=VBSCRIPT>
REM GUIABELENZINHO
REM suporte@guiabelenzinho.com.br

REM IMPORTANT: Value in brackets for the arrays below taken from last image number.
REM The number in brackets for an array represent the total number of
REM items in the array. Note that the first item is number 0.

Dim w, wW, wH, an(9), x(9), y(9), ox(9), oy(9), c(9), cW, cH, sL, sT, numPics, capture

Set w=document.body

REM Initialize
sub setUp()
REM Get window dimensions
cW=w.clientWidth
cH=w.clientHeight
sL=w.scrollLeft
sT=w.scrollTop
capture=153
REM IMPORTANT: Enter number of last image here
numPics=9
for i=0 to numPics
randomize
REM Initially none are bouncing
c(i)=0
REM Number of pixels to move image per step
ox(i)=4
oy(i)=-4
REM Initial coordinates
an(i)=3.14159-i
x(i)=Int(SIN(an(i))* 50)+70
y(i)=Int(COS(an(i))* 50)+70
document.all("pic"&i).style.top=y(i)
document.all("pic"&i).style.left=x(i)
next
REM start bouncing
bnce
end sub

sub bnce()
ClearTimeOut(myTimer)
REM VBScript version of bounce routine
REM Loop for each object
for i=0 to numPics
if c(i)=1 then
REM This one is bouncing so check to see if
REM it is near the juggler. If too close, catch it.
if x(i)<50 and y(i)<50 then
c(i)=0
ox(i)=4
oy(i)=-4
end if
REM Calculate next move for bouncing object.
p="pic"&i
Set bal=document.all(p)
REM Increment position
x(i)=x(i)+ox(i)
y(i)=y(i)+oy(i)
REM Check for walls on right or left
if (x(i) + bal.offsetWidth > cW + sL) OR (x(i) <= sL) then
ox(i)=-ox(i)
if (x(i) < sL) then x(i) = sL
if (x(i) + bal.width > cW + sL) then x(i) = cW - bal.offsetWidth + sL
end if
REM Check for walls on bottom or top
if (y(i) + bal.offsetHeight > cH + sT) OR (y(i) <= sT+R) then
oy(i)=-oy(i)
if (y(i) < sT+R) then y(i) = sT+R
if (y(i) + bal.offsetHeight > cH + sT) then y(i) = cH - bal.offsetHeight + sT
end if
REM Position object
bal.style.posTop = y(i)
bal.style.posLeft = x(i)
else
REM Juggle the birds
an(i)=an(i)-.1
x(i)=Int(SIN(an(i))* 50)+70+sL
y(i)=Int(COS(an(i))* 50)+70+sT
document.all("pic"&i).style.top=y(i)
document.all("pic"&i).style.left=x(i)
REM Pick a number
sw=INT(rnd*1000)
REM If number is divisible by 333 then release bird.
if sw mod 333 = 0 then c(i)=1
end if
next
REM Repeat. If bounce is too fast, increase the number
REM in the line below from the default value of 12.
myTimer=SetTimeOut("bnce",12)
end sub

REM This sub starts the action as soon as the message is received.
sub window_OnLoad()
setUp
end sub

REM In case window is re-sized then re-calculate
sub window_OnResize()
setUp
end sub

REM In case text is scrolled, this keeps the bouncing objects inside the window.
sub window_OnScroll()
sL=w.scrollLeft
sT=w.scrollTop
end sub

</SCRIPT>
</DIV>
<DIV></DIV><FONT color=#8080c0
size=5></FONT><BR><TT><BR></TT><BR></FONT></BODY></HTML>
 

 
 
10- Efeito com fotos (enrolando e desenrolando)
  
É só colocar o diretório da imagem aonde está escrito "IMAGEM" (sem se squecer de deixar as aspas).
O diretório de imagem é por exemplo assim:
 "C:\Meus documentos\imagens\corac.gif" (colocando letras maiúsculas  e minúsculas exatamente como estão no seu computador)
EX: salve esta imagem como corac.gif ( Dentro dos Meus Documentos, Imagens)
Aí é só substiruir "IMAGEM" por "corac.gif"

 
<MARQUEE height="100%" scrollAmount=1 scrollDelay=32 width="12%"><IMG
align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<MARQUEE direction=right height="100%" scrollAmount=1 scrollDelay=32
width="12%"><IMG align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<MARQUEE height="100%" scrollAmount=1 scrollDelay=32 width="12%"><IMG
align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<MARQUEE direction=right height="100%" scrollAmount=1 scrollDelay=32
width="12%"><IMG align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<MARQUEE height="100%" scrollAmount=1 scrollDelay=32 width="12%"><IMG
align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<MARQUEE direction=right height="100%" scrollAmount=1 scrollDelay=32
width="12%"><IMG align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<MARQUEE height="100%" scrollAmount=1 scrollDelay=32 width="12%"><IMG
align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<MARQUEE direction=right height="100%" scrollAmount=1 scrollDelay=32
width="12%"><IMG align=baseline alt="" border=0 hspace=0
src="IMAGEM"></MARQUEE>
<P></P>
<DIV></DIV></BODY></HTML>
 
 

 
11-  Mensagem de proibição de cópia
 
É quando alguém for copiar sua figura ou papel de carta surge uma mensagem que vc irá colocar proibindo a cópia da sua figura.

 
<SCRIPT language=JavaScript><!--
 

function bethynha()
 
{
 
if (event.button==2)
 
{
 
window.alert('texto a ser exibido')
 
}
}
document.onmousedown=bethynha
// --></SCRIPT>
 
 
12-Mensagem Rolando na barra inferior
 
Coloque o seu texto onde está marcado de vermelho


 
<SCRIPT language=JavaScript>
<!--
ScrollSpeed = 250;  // milliseconds between scrolls
ScrollChars = 4;    // chars scrolled per time period
 
function SetupTicker() {
  // add space to the left of the message
  msg = "Coloque o texto desejado aqui   .";
   RunTicker();}
 
function RunTicker() {
  window.setTimeout('RunTicker()',ScrollSpeed);
  window.status = msg;
  msg = msg.substring(ScrollChars) + msg.substring(0,ScrollChars);}
SetupTicker();
 
<!-- end -->
</SCRIPT>
 </STRONG></FONT>
<DIV align=center>
<CENTER>
<DIV align=center>
<CENTER>&nbsp;</CENTER></DIV></CENTER></DIV></FONT></DIV></BODY></HTML>
 
 

 
13- Cartão virtual
 

 
 
<SCRIPT language=VBS>
'----------------------------------------------------------------------------
' MS OE5 Flippable Post Card, by Bill Scott
'----------------------------------------------------------------------------
' All HTML and script by Bill Scott, March, 2000
' billscott@redrivernet.com
 

' Flippable Post Card HTML and Script follows:
 
 Option Explicit
 

Dim bkg1aHTML, animated1aHTML
Dim errFlag1, errFlag2
 

Sub Window_OnLoad()
 errFlag1=0
 errFlag2=0
 
 note.style.posLeft=20
 note.style.posTop=10
 
 bkg1.style.posWidth=cardfront.style.posWidth-4
 bkg1.style.posHeight=cardfront.style.posHeight-4
 bkg1.style.posLeft=0
 bkg1.style.posTop=0
 
 On Error Resume Next
 postcardTitle.style.posLeft=cardfront.style.posleft+4+30
 if err.number>0 then
  errFlag2=1
  else
  postcardTitle.style.posTop=cardfront.style.posTop+4+30
  postcardTitle.style.visibility="visible"
 end if
 

 
 
 bkg1aHTML=bkg1.outerHTML
 
 On Error Resume Next
 animated1aHTML=animatedImage1.outerHTML
 if err.number>0 then
  errFlag1=1
  else
  animated1aHTML=Replace(animated1aHTML,"id=animatedImage1","id=animatedImage1a")
  cardback.insertAdjacentHTML "AfterBegin",animated1aHTML
  animatedImage1a.style.posLeft=(cardback.style.posWidth-4)-(animatedImage1a.style.posLeft+animatedImage1a.style.posWidth)
  animatedImage1a.style.filter="fliph(enabled=1) alpha(opacity=25, enabled=1)"
 end if
 
 bkg1aHTML=Replace(bkg1aHTML,"id=bkg1","id=bkg1a")
 cardback.insertAdjacentHTML "AfterBegin",bkg1aHTML
 bkg1a.style.filter="fliph(enabled=1) alpha(opacity=25, enabled=1)"
End Sub
 
Sub seeFront()
 cardback.style.visibility="hidden"
 cardfront.style.visibility="visible"
 if errFlag2=0 then postcardTitle.style.visibility="visible"
End Sub
 
Sub seeBack()
 if errFlag2=0 then postcardTitle.style.visibility="hidden"
 cardfront.style.visibility="hidden"
 cardback.style.visibility="visible"
End Sub
 
 

</SCRIPT>
 
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR></HEAD>
<BODY aLink=#0000ff bgColor=#ffffff link=#0000ff vLink=#0000ff>
<DIV style="FONTE: 10 areai"><BR>&nbsp;</DIV><BGSOUND balance=0 loop=infinite
src="IMAGEM DA CAPA" volume=-100>
<DIV>&nbsp;<SPAN id=__#Ath#SignaturePos__></SPAN>&nbsp;</DIV>
<DIV class=Title id=postcardTitle
style="LEFT: 20px; POSITION: absolute; TOP: 10px; VISIBILITY: hidden; Z-INDEX: 10"><FONT
size=6>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</FONT></DIV>
<DIV id=note
style="LEFT: -1800px; POSITION: absolute; TOP: -1800px; WIDTH: 700px"><B><I>Click
no cartão para ler o recado
!!</I></B> </DIV>
<DIV id=cardfront language=VBS onclick=seeBack
style="BORDER-BOTTOM: #ffffff 2px ridge; BORDER-LEFT: #ffffff 2px ridge; BORDER-RIGHT: #ffffff 2px ridge; BORDER-TOP: #ffffff 2px ridge; HEIGHT: 420px; LEFT: 20px; POSITION: absolute; TOP: 40px; VISIBILITY: visible; WIDTH: 700px"><!--ADD YOUR BACKGROUND IMAGE HERE. IMAGE WILL AUTOMATICALLY BE EXPANDED TO FILL POST CARD--><IMG
id=bkg1 src="IMAGEM DA CAPA"
style="LEFT: -1800px; POSITION: absolute; TOP: -1800px"> <!--THE ANIMATED BIRDS ARE HERE. IF YOU DON'T HAVE AN ANIMATED IMAGE, REMOVE THE NEXT LINE--></DIV>
<DIV id=cardback language=VBS onclick=seeFront
style="BORDER-BOTTOM: #ffffff 2px ridge; BORDER-LEFT: #ffffff 2px ridge; BORDER-RIGHT: #ffffff 2px ridge; BORDER-TOP: #ffffff 2px ridge; HEIGHT: 420px; LEFT: 20px; POSITION: absolute; TOP: 40px; VISIBILITY: hidden; WIDTH: 700px"><IMG
height=128 src="IMAGEM DO CANTO"
style="LEFT: 577px; POSITION: absolute; TOP: -5px" width=128>&nbsp;&nbsp;
<DIV
style="HEIGHT: 320px; LEFT: 15px; POSITION: absolute; TOP: 30px; WIDTH: 320px">
<DIV>
<DIV>&nbsp;</DIV></DIV></DIV>
<DIV
style="HEIGHT: 200px; LEFT: 390px; POSITION: absolute; TOP: 125px; WIDTH: 270px">
<DIV></DIV>
<DIV><STRONG><FONT face=Arial size=2>&nbsp;</FONT></STRONG></DIV></DIV><IMG
height=350 src="IMAGEM QUE DIVIDE A TELA"
style="LEFT: 341px; POSITION: absolute; TOP: 35px" width=17></DIV><!-- end banner --></BODY></HTML>
 
 
 
 
14-Barrinha de texto por letra
 

 
</STYLE>
 
<SCRIPT language=JavaScript>
<!-- hide from old browsers
var init_msg = "DIGITE SEU TEXTO"
var str = ""
var msg = ""
var leftmsg = ""
function setMessage()
{
if (msg == "")
{
str = " "
msg = init_msg
leftmsg = ""
}
 
if (str.length == 1)
{
 
while (msg.substring(0, 1) == " ")
{
leftmsg = leftmsg + str
str = msg.substring(0, 1)
msg = msg.substring(1, msg.length)
}
leftmsg = leftmsg + str
str = msg.substring(0, 1)
msg = msg.substring(1, msg.length)
for (var ii = 0; ii < 120; ii++)
{str = " " + str}
}
else
{
str = str.substring(10, str.length) // decrease str little by little
}
window.status = leftmsg + str
JSCTimeOutID = window.setTimeout('setMessage()',100)
}
<!-- done hiding -->
</SCRIPT>
 
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR></HEAD>
<BODY background=cid:048f01bfa450$61464f80$677fe0c8@gbl.com.br bgColor=#c0e0d8
onload="JSCTimeOutID = window.setTimeout('setMessage()',500);">&nbsp;</BODY></HTML>
 
 
 

 
15- Para colocar o seu nome em movimento no e-mail quando passamos o mause (2)
(Esse não é colorido)

 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff onload=makesnake()
style="OVERFLOW-X: hidden; OVERFLOW-Y: scroll; WIDTH: 100%">
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>
</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<STYLE>
.spanstyle {
 position:absolute;
 visibility:visible;
 top:-50px;
 font-size:15pt;
 font-family:comic sans ms;
      font-weight:bold;
 color:red;
}
</STYLE>
 
<SCRIPT>
 
/*
Cursor Trailor Text- By Peter Gehrig (
http://www.24fun.ch/)
Permission given to Dynamicdrive.com to feature script in it's archive.
For full source code, installation instructions, and 1000's more DHTML scripts,
visit http://dynamicdrive.com
*/
 
var x,y
var step=20
var flag=0
 
// Your snappy message. Important: the space at the end of the sentence!!!
var message="AQUI VC ESCREVE O QUE QUER QUE APAREçA NO CURSOR DO MOUSE"
message=message.split("")
 
var xpos=new Array()
for (i=0;i<=message.length-1;i++) {
 xpos[i]=-50
}
 
var ypos=new Array()
for (i=0;i<=message.length-1;i++) {
 ypos[i]=-50
}
 
function handlerMM(e){
 x = (document.layers) ? e.pageX : document.body.scrollLeft+event.clientX
 y = (document.layers) ? e.pageY : document.body.scrollTop+event.clientY
 flag=1
}
 
function makesnake() {
 if (flag==1 && document.all) {
     for (i=message.length-1; i>=1; i--) {
      xpos[i]=xpos[i-1]+step
   ypos[i]=ypos[i-1]
     }
  xpos[0]=x+step
  ypos[0]=y
 
  for (i=0; i<message.length-1; i++) {
      var thisspan = eval("span"+(i)+".style")
      thisspan.posLeft=xpos[i]
   thisspan.posTop=ypos[i]
     }
 }
 
 else if (flag==1 && document.layers) {
     for (i=message.length-1; i>=1; i--) {
      xpos[i]=xpos[i-1]+step
   ypos[i]=ypos[i-1]
     }
  xpos[0]=x+step
  ypos[0]=y
 
  for (i=0; i<message.length-1; i++) {
      var thisspan = eval("document.span"+i)
      thisspan.left=xpos[i]
   thisspan.top=ypos[i]
     }
 }
  var timer=setTimeout("makesnake()",30)
}
 
</SCRIPT>
 
<SCRIPT>
<!-- Beginning of JavaScript -
 
for (i=0;i<=message.length-1;i++) {
    document.write("<span id='span"+i+"' class='spanstyle'>")
 document.write(message[i])
    document.write("</span>")
}
 
if (document.layers){
 document.captureEvents(Event.MOUSEMOVE);
}
document.onmousemove = handlerMM;
 
// - End of JavaScript - -->
</SCRIPT>
</BODY></HTML>
 
 

 
16-  imagem passeando pelo e-mail
 

 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><BASE
href=file://C:\PROGRA~1\COMMON~1\MICROS~1\STATIO~1\>
<STYLE></STYLE>
 
<META content='"MSHTML 4.72.3110.7"' name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2014.210" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2614.3401" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2014.210" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3401" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.3017.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2722.2800" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY background="" bgColor=#ffffff>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; PADDING-LEFT: 5px">
  <BLOCKQUOTE
  style="BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; PADDING-LEFT: 5px">
    <BLOCKQUOTE
    style="BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px; PADDING-LEFT: 5px">
      <BLOCKQUOTE
      style="BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px">
        <DIV><FONT size=3><IMG alt="Milton Ró" border=0 hspace=0 name=bounce
        src="IMAGEM"
        style="HEIGHT: 83px; LEFT: 0px; POSITION: absolute; WIDTH: 98px">
        <SCRIPT language=JavaScript>
function bounce1(){
window.tm=setInterval('bounceIt()',2);
}
function bounce2(){
clearInterval(window.tm);
}
      var x=5;
      var y=2;
      var offsetx=2;
      var offsety=2;
        function bounceIt() {
        var el = document.all.bounce;
        x+=offsetx;
        y+=offsety;
        if ((x+el.offsetWidth>document.body.clientWidth+document.body.scrollLeft) || (x<=document.body.scrollLeft)) {
          offsetx=-offsetx;
          if (x<document.body.scrollLeft) x=document.body.scrollLeft;
          if (x+el.width>document.body.clientWidth+document.body.scrollLeft)
            x=document.body.clientWidth-el.offsetWidth+document.body.scrollLeft;
        };
        if ((y+el.offsetHeight>document.body.clientHeight+document.body.scrollTop) || (y<=document.body.scrollTop)) {
          offsety=-offsety;
          if (y<document.body.scrollTop) y=document.body.scrollTop;     
          if (y+el.offsetHeight>document.body.clientHeight+document.body.scrollTop)
            y=document.body.clientHeight-el.offsetHeight+document.body.scrollTop;
        };
        el.style.posTop = y;
        el.style.posLeft = x;
      }
window.onload=bounce1;
window.onunload=bounce2;
</SCRIPT>
         </FONT></DIV></BLOCKQUOTE></BLOCKQUOTE></BLOCKQUOTE></BLOCKQUOTE></BODY></HTML>
 
 

 
17- QUADRADINHO


<BODY bgColor=#ffffff>
<DIV>
<P>&nbsp;</P>
<CENTER>
<TABLE border=7 cols=1 width="93%">
  <TBODY>
  <TR>
    <TD align=middle>
      <P align=center><FONT color=#000000>&nbsp;
</FONT></P></TD></TR></TBODY></TABLE></CENTER></DIV>
 
 
 
 
18- QUADRA COM FOTO, TEXTO E BARRINHA
 


<BODY bgColor=#ffffff><FONT face=Arial size=2>
<DIV align=center>
<TABLE background="" border=6 borderColorDark=#a489a2 borderColorLight=#a489a2
cellPadding=10 height=200 width=200>
  <TBODY>
  <TR>
    <TD height=281 width=311>
      <P align=center>&nbsp;</P></FONT></TD></TR>
  <TR>
    <TD height=82 vAlign=top width=380>
      <DIV align=center><FONT color=#5048b8 face=Duchess size5></FONT></DIV>
      <DIV align=center>&nbsp;</DIV>
  <TR>
    <TD height=42 width=380>
      <DIV align=center><FONT size=5><FONT face=Christie>
      <MARQUEE>
      <DIV align=right>a *** Lista Noites *** Idoso = Sabedoria.
      ~</DIV></MARQUEE></FONT></FONT></DIV></TD></TR></TBODY></TABLE></DIV></FONT></BODY></HTML>
 
 
 
 
19- MENSAGEM QUE SE ABRE NA TELA
 


<BODY background=cid:00fd01bfbf67$ad518200$ae65fea9@micro8 bgColor=#ffffff
bgProperties=fixed link=#ccc999 text=#ccc999 vLink=#ccc999>
<DIV align=center>&nbsp;</DIV></STYLE>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<DIV style="FONT: 10pt arial">
<DIV>&nbsp;</DIV></DIV>
<DIV><BR></DIV><BGSOUND balance=0 loop=infinite
src="C:\WINDOWS\MEDIA\Claire de Lune de Debussy.rmi" volume=-40>
<DIV align=center><FONT face="Comic Sans MS" size=5><FONT
color=#808080><BR><BR><BR><BR></FONT></DIV></FONT>
<DIV align=center>&nbsp;</DIV>
<DIV align=center><FONT color=#808080 face="Comic Sans MS"
size=5>&nbsp;</FONT></DIV>
<DIV align=center>&nbsp;</DIV>
<STYLE>.intro {
 BACKGROUND-COLOR: #000000
; BORDER-BOTTOM: #ccc999
 0px solid; BORDER-LEFT: #ccc999
 0px solid; BORDER-RIGHT: #ccc999
 0px solid; BORDER-TOP: #ccc999
 0px solid; LEFT: 0px; POSITION: absolute; TOP: 0px; layer-background-color: 000000
}
</STYLE>
 
<DIV align=center>
<DIV class=intro id=i1></DIV></DIV>
<DIV align=center>
<DIV class=intro id=i2></DIV></DIV>
<SCRIPT language=JavaScript1.2>
 
/*
Left-Right Curtain Script-
© Dynamic Drive (www.dynamicdrive.com)
For full source code, installation instructions,
100's more free DHTML scripts, and Terms Of
Use, visit dynamicdrive.com
*/
 
var speed=20
var temp=new Array()
var temp2=new Array()
if (document.layers){
for (i=1;i<=2;i++){
temp[i]=eval("document.i"+i+".clip")
temp2[i]=eval("document.i"+i)
temp[i].width=window.innerWidth/2
temp[i].height=window.innerHeight
temp2[i].left=(i-1)*temp[i].width
}
}
else if (document.all){
var clipright=document.body.clientWidth/2,clipleft=0
for (i=1;i<=2;i++){
temp[i]=eval("document.all.i"+i+".style")
temp[i].width=document.body.clientWidth/2
temp[i].height=document.body.offsetHeight
temp[i].left=(i-1)*parseInt(temp[i].width)
}
}
 
 
function openit(){
window.scrollTo(0,0)
if (document.layers){
temp[1].right-=speed
temp[2].left+=speed
if (temp[2].left>window.innerWidth/2)
clearInterval(stopit)
}
else if (document.all){
clipright-=speed
temp[1].clip="rect(0 "+clipright+" auto 0)"
clipleft+=speed
temp[2].clip="rect(0 auto auto "+clipleft+")"
if (clipright<=0)
clearInterval(stopit)
}
}
 
function gogo(){
stopit=setInterval("openit()",100)
}
gogo()
 
</SCRIPT>
<BR></BODY></HTML>
 
 
 

 
20- OUTRO E_MAIL COLORINDO
Coloque o texto em branco para dar melhor efeito


<!-- START OF SCRIPT --><!-- Paste this code into HEAD of your document  -->
<SCRIPT language=Javascript>
 
<!-- Begin
var COLOR = 999999
var woot = 0
function stoploop() {
document.bgColor = '#000000';
clearTimeout(loopID);
}
function loopBackground() {
if (COLOR > 0) {
document.bgColor = '#' + COLOR
COLOR -= 111111
loopID = setTimeout("loopBackground()",1)
} else {
document.bgColor = '#000000'
woot += 10
COLOR = 999999
COLOR -= woot
loopID = setTimeout("loopBackground()",1)
   }
}
// End -->
</SCRIPT>
 
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>
<DIV style="FONT: 10pt arial">
<DIV>&nbsp;</DIV></DIV>
<DIV><BR></DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV><BGSOUND balance=0 loop=2
src="cid:013301bfd9e2$321163e0$cf81f4c8@default" volume=0>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV style="FONT: 10pt arial">
<DIV>&nbsp;</DIV></DIV>
<DIV><BR></DIV>
<DIV>&nbsp;</DIV>
<DIV style="FONT: 10pt arial"></DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<CENTER>
<FORM name=background>&nbsp;</FORM>
<FORM name=background><FONT color=#ffffff
face="Courier New"><STRONG></STRONG></FONT></FORM>
<FORM name=background><INPUT onclick=loopBackground() type=button value="Ler a mensagem">
<BR><INPUT onclick=stoploop() type=button value=Parar> </FORM></CENTER><!-- END OF SCRIPT -->
<DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV></DIV>
<CENTER><A href="http://click.egroups.com/1/631/5/_/176990/_/948070407/"
target=egnewwin>
<CENTER><FONT color=white></FONT></CENTER></A><!-- end banner --></CENTER><!-- |**|end egp html banner|**| --><!-- |**|begin egp html banner|**| --><!-- |**|end egp html banner|**| --><!-- |**|begin egp html banner|**| --></BODY></HTML>
 
 
 
 
21- FOTO QUE CRESCE NA TELA COM UM CLIQUE
 

<SCRIPT language=VBS>
'----------------------------------------------------------------------------
' Thumbnail Graphic with Message, by Bill Scott
'----------------------------------------------------------------------------
' All HTML and script by Bill Scott, March, 2000
' billscott@redrivernet.com
 
' Thumbnail Graphic with Message HTML and Script follows:
 
 Option Explicit
 
Dim thumbnailHTML
Dim note1, note2
 
 note1="Click aqui para ver a imagem"
 note2="Click aqui para ver o texto"
 
Sub Window_OnLoad()
 dummyspacer.style.backgroundColor=textbox.style.backgroundColor
 spacerText.innerText=" "
 
 Image1.style.posLeft=20
 Image1.style.posTop=40
 
 thumbnailHTML=Image1.outerHTML
 thumbnailHTML=Replace(thumbnailHTML,"id=Image1","id=thumbnail align=left")
 thumbnailHTML=Replace(thumbnailHTML,"seeText","seeImage")
 textbox.insertAdjacentHTML "AfterBegin",thumbnailHTML
 thumbnail.style.posWidth=100
 thumbnail.style.posHeight=100
 thumbnail.style.borderStyle="solid"
 thumbnail.style.borderColor="#000000"
 thumbnail.style.borderWidth="1px"
 thumbnail.style.posLeft=0
 thumbnail.style.posTop=0
 thumbnail.style.visibility="visible"
 textbox.style.visibility="visible"
End Sub
 
Sub seeText()
 note.innerText=note1
 Image1.style.visibility="hidden"
 textbox.style.visibility="visible"
 thumbnail.style.visibility="visible"
End Sub
 
Sub seeImage()
 note.innerText=note2
 textbox.style.visibility="hidden"
 thumbnail.style.visibility="hidden"
 Image1.style.visibility="visible"
End Sub
 
</SCRIPT>
 
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR><BGSOUND balance=0
loop=infinite src="c:\teste\40.jpg" volume=0>
<DIV>&nbsp;</DIV>
<DIV style="FONT: 10pt arial">&nbsp;</DIV>
<DIV><BR>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #800000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px">
  <DIV class=noteStyle id=note
  style="LEFT: 20px; POSITION: absolute; TOP: 10px">Click aqui para ver aimagem</DIV><!--ADD YOUR IMAGE HERE. BE SURE TO SPECIFY ITS WIDTH AND HEIGHT--><IMG
  id=Image1 language=VBS onclick=seeText
  src="COLOQUE AQUI SUA FOTO"
  style="BORDER-BOTTOM: #ae9ec6 6px ridge; BORDER-LEFT: #ae9ec6 6px ridge; BORDER-RIGHT: #ae9ec6 6px ridge; BORDER-TOP: #ae9ec6 6px ridge; CURSOR: hand; HEIGHT: 303px; LEFT: -1800px; POSITION: absolute; TOP: -1800px; VISIBILITY: hidden; WIDTH: 300px">
 
  <DIV id=textbox language=VBS onclick=seeImage
  style="BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM: #000000 1px solid; BORDER-LEFT: #000000 1px solid; BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; CURSOR: hand; HEIGHT: 300px; LEFT: 20px; PADDING-BOTTOM: 20px; PADDING-LEFT: 20px; PADDING-RIGHT: 20px; PADDING-TOP: 20px; POSITION: absolute; TOP: 40px; VISIBILITY: hidden; WIDTH: 60%">
  <TABLE align=left bgColor=#c0c0c0 cellPadding=0 cellSpacing=0 height=100
  id=dummyspacer width=100>
    <TBODY>
    <TR>
      <TD class=noteStyle id=spacerText>Don't delete this
  spacer</TD></TR></TBODY></TABLE>
  <DIV><FONT color=#000000
  face=Arial>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<FONT
  face="Bookman Old Style"
  size=2><STRONG>Milton Ró<BR>&nbsp;<BR></STRONG></FONT></FONT></DIV>
  <DIV><FONT color=#000000 face="Bookman Old Style" size=2><STRONG><FONT
  face=Arial>Digite aqui o seu texto do&nbsp;tamanho que ele for sem se
  preoculpar com o tamanho da foto que funciona independente do
  texto
</FONT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  </STRONG></FONT></DIV></DIV></BLOCKQUOTE><BR></SCRIPT></BODY></HTML>
 
 
 
 
22- MENSAGEM QUE ABRE E FECHA
 


<SCRIPT>
<!-- Beginning of JavaScript -
 
// pause between the messages (microseconds)
var waitabit=2000
 
// numbers of transmissionblenders
var spannumber=20
 
// borderwidth of messagebox
var borderwidth=54
 
// bordercolor of messagebox
var bordercolor="cc6666"
 
// width and height of the messagebox (pixels)
var boardwidth=800
var boardheight=600
// backgroundcolor of messagebox
var bgcolor="ffcccc"
 
// fontfamily, fontsize, fontcolor, fontweight
var thisfontfamily="Comic Sans MS"
var thisfontcolor="990000"
var thisfontsize="20"
var thisfontweight="bold"
 
// distance to left side of browermargin (pixels)
var xscreenmargin=50
 
// distance to top of of browsermargin (pixels)
var yscreenmargin=20
 
// messages
var message=new Array()
message[0]="Aqui vc"
message[1]="digita o seu"
message[2]="texto e tb"
message[3]="pode alterar"
message[4]="o numero de linhas"
message[5]="e mudar tb"
message[6]="as cores"
message[7]="do fundo"
message[8]="ou a velocidade"
message[9]="beijos"
message[10]="marques"
message[11]="fim"
 

// colors transmission blenders
var col=new Array()
col[0]="ff9999"
col[1]="ff9999"
col[2]="ff9999"
col[3]="ff9999"
col[4]="ff9999"
col[5]="ff9999"
col[6]="ff9999"
col[7]="ff9999"
col[8]="ff9999"
col[9]="ff9999"
col[10]="ff9999"
col[11]="ff9999"
col[12]="ff9999"
col[13]="ff9999"
 

// various variables. No need to change them.
var i_span=0
var i_maxspan=50
var i_message=0
var timer
var rand
 

function randommaker(range) {  
 rand=Math.ceil(range*Math.random())
    return rand
}
 
function showimages() {
    if (i_span <= spannumber-1) {
    var thisspan = eval("document.all.span"+i_span+".style")
    thisspan.visibility="VISIBLE"
 thisspan.backgroundColor=col[randommaker(col.length-1)]
    timer=setTimeout("showimages()",20)
    i_span++
    }
    else {
    i_span--
    clearTimeout(timer)
 
    mesdiv.innerHTML="<span style='position:absolute;top:10px'>"+message[i_message]+"</span>"
    i_message++
    if (i_message>=message.length) {i_message=0}
    timer=setTimeout("hideimages()",20)
    }
}
 
function hideimages() {
    if (i_span >= 0) {
    var thisspan = eval("document.all.span"+i_span+".style")
    thisspan.visibility="HIDDEN"
    timer=setTimeout("hideimages()",1)
    i_span--
    }
    else {
    clearTimeout(timer)
    i_span=0
    timer=setTimeout("showimages()",waitabit)
    }
}
document.write('<body bgcolor=#FFFFFF>')
 
document.write("<div id='mesdiv' style='position:absolute;top:"+yscreenmargin+"px;left:"+xscreenmargin+"px; width:"+boardwidth+"px;height:"+boardheight+"px;background-color:"+bgcolor+";overflow:hidden;text-align:center;font-family:"+thisfontfamily+";font-size:"+thisfontsize+";font-weight:"+thisfontweight+";color:"+thisfontcolor+"'></div>")
 
document.write("<div id='maindiv' style='position:absolute;top:"+(yscreenmargin-borderwidth)+"px;left:"+(xscreenmargin-borderwidth)+"px; width:"+(boardwidth+2*borderwidth)+"px;height:"+(boardheight+borderwidth)+"px;overflow:hidden;border-color:"+bordercolor+";border-style:groove;border-width:"+borderwidth+"px'>")
 
for (i=0;i<=spannumber;i++) {
 var spanwidth=Math.ceil((boardwidth-borderwidth)/spannumber)
 var spanleft=Math.ceil(i*((boardwidth-borderwidth)/spannumber))
    document.write("<span id='span"+i+"' style='position:absolute;left:"+spanleft+"px;width:"+spanwidth+"px;height:"+(boardheight-borderwidth)+"px;visibility:hidden'>")
    document.write("</span>")
    }
document.write("</div>")
 
showimages()
 
document.write()
 
// - End of JavaScript - -->
</SCRIPT>
 
 
 
23- TEXTO COLORIDO
 

<SCRIPT language=JavaScript>
 
function infoscroll(seed,looped)
{
  var text1  = "  ";
  var text2  = "                               ";       
  var msg=text1+text2;
  var putout = " ";
  var c   = 1;
 
  if (looped > 10)
  {  window.status="<!>";  }
  else if (seed > 100)
  {
     seed--;
     var cmd="infoscroll(" + seed + "," + looped + ")";
     timerTwo=window.setTimeout(cmd,100);
  }
  else if (seed <= 100 && seed > 0)
  {
    for (c=0 ; c < seed ; c++)
    {  putout+=" ";  }
    putout+=msg.substring(0,100-seed); 
    seed--;
    var cmd="infoscroll(" + seed + "," + looped + ")";
    window.status=putout;
    timerTwo=window.setTimeout(cmd,100);
  }
  else if (seed <= 0)
  {
    if (-seed < msg.length)
    {
      putout+=msg.substring(-seed,msg.length);
      seed--;
      var cmd="infoscroll(" + seed + "," + looped + ")";
      window.status=putout;
      timerTwo=window.setTimeout(cmd,100); // 100
    }
    else
    {
      window.status=" ";
      looped += 1;
      var cmd = "infoscroll(100," + looped + ")";
      timerTwo=window.setTimeout(cmd,75); // 75
    }
  }
}
// -->
 
<!--
infoscroll(100,1)
// -->
</SCRIPT>
 
<SCRIPT language=JavaScript>
var NumWords = 0;  // global
 
function parseText(str)
{
var a = str.split(" ");
NumWords = a.length;
for (var i = 0; i < NumWords; i++)
  {
  a[i] = "<SPAN ID=TXT"+i+"> " + a[i] + " </SPAN>";
  }
return a.join(" ");
}
 
function blinkWords()
{
var red = Math.floor(Math.random()*50);
var green = Math.floor(Math.random()*50);
var blue = Math.floor(Math.random()*256);
 
for (var i = 0; i < NumWords; i++)
  {
  var o = document.all("TXT"+i);
  if (Math.random() < 0.5)
    {
    var r = Math.floor(red+(24*((o.offsetTop+o.offsetHeight)/o.offsetHeight))*30)%256;
    var g = Math.floor(green + o.offsetLeft/3) % 256;
    var b = (blue);
    o.style.color = r << 16 | g << 8 | b;
    }
  else
    {
    o.style.color = "#d3d3d3";
    }
  }
}
 
function blinkText(str, speed)
{
document.write(parseText(str));
window.setInterval("blinkWords()", speed);
}
</SCRIPT>
 
<STYLE></STYLE>
 
<META content="MSHTML 5.00.3013.2600" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<DIV>&nbsp;</DIV><BGSOUND balance=0 loop=infinite
src="cid:011d01bfdafb$5cd6f120$0100007f@jurema" volume=0>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;&nbsp; </DIV>
<DIV id=BTXT
style="BACKGROUND: #000000; FONT-SIZE: 30px; HEIGHT: 125px; WIDTH: 750px; font-name: Comix Sans MS">
<SCRIPT language=JavaScript>
blinkText("<center>digite aqui<br><br>O seu texto<br>lembrando que cada<br>mas vc pode<br>terminar o script<br>A hora que quiser<br>sem problema<br>Milton Ró</center>", 100);
 
</SCRIPT>
</DIV><IMG height=1 id=muse1 src="" width=1>
<SCRIPT language=VBScript>
' VBScript Example
Dim Music1
Dim line1
Music1=muse1.src
line1="<BGSOUND balance=0 loop=3 volume=150 src="&Music1&">"
Document.Writeln line1
</SCRIPT>
 <!-- |**|begin egp html banner|**| --><!-- |**|end egp html banner|**| --><!-- |**|begin egp html banner|**| --></BODY></HTML>
 
 

 
24- Objeto flutuante na tela com texto na barra
 

 
</STYLE>
 
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY background="COLOQUE AQUI UMA FOTO" bgColor=#ffffff
link=#ff379b
style="BACKGROUND-ATTACHMENT: scroll; BACKGROUND-POSITION: 0% 0%; COLOR: #ff379b; FONT: 16pt 'Cheltenhm BT' normal; MARGIN-LEFT: 0px; MARGIN-RIGHT: 0px; MARGIN-TOP: 20px"
vLink=#ff379b>
<DIV style="FONT: 15pt arial">
<DIV>&nbsp;</DIV></DIV>
<DIV><BR></DIV><BGSOUND balance=0 loop=infinite
src="COLOQUE AQUI A MESMA FOTO" volume=-180><BASE href=\><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><BASE
</STYLE>
</BODY></HTML>
</STYLE>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<P><STRONG><A href="DIGITE AQUI UM TEXTO">
<MARQUEE behavior=alternate scrollAmount=1 scrollDelay=3><IMG alt="MARQUES"
src="COLOQUE AQUI A MESMA FOTO"></MARQUEE></A></STRONG></P></SCRIPT>
 
 
 
 
 
25- E-MAIL COLORIDO
 

 
<SCRIPT language=JavaScript>
 
 
 
 
function toRadian( deg ) {
 
  return ( deg / 180.0 * Math.PI );
 
}
 
 
 
function toHex( dec ) {
 
  Hex = new Array( "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "A", "B", "C", "E", "E", "F" );
 
  base=16; 
 
  total="";
 
  for ( i = parseInt(dec, 10) ; i > 0 ; i = parseInt(i/base) )
 
     eval( "total = Hex[" + ( i % base) + "]  + total + ''");
 
  return ( dec > 15 ) ? total : ( "0" + total);
 
}
 
 
 
var step=1;      
 
var turn=0;
 
var id;
 
function ccbg(){
 
 turn = ( turn + step ) % 3600;
 
 window.status=turn;
 
 document.bgColor= ( toHex( ( 255 * Math.abs( Math.sin( toRadian((turn*1.1)) ) ) ) ) ) +
 
                                    ( toHex( (255 * Math.abs( Math.sin( toRadian((turn*1.9)) ) ) ) ) ) +
 
                                    ( toHex( (255 * Math.abs( Math.sin( toRadian((turn*1.5)) ) ) ) ) );
 
 id=setTimeout("ccbg()",25);
 
}
 
 
 
 
 
file://-->
 
 
 
 
</SCRIPT>
</BODY></HTML>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR><BR>
<CENTER>
<FORM><INPUT name=Iniciar onclick=ccbg() type=button value=Iniciar> </FORM>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P></CENTER></BODY></HTML>
 
 
 
26- VER HD
 


  <SCRIPT language=JavaScript><!--
if (navigator.appName == 'Microsoft Internet Explorer'){
 
 document.write('<center>')
 document.write('<object id="browserIcons" classid="clsid:8856F961-340A-11D0-A96B-00C04FD705A2" align="baseline" border="0" width="520" height="180">')
 document.write('<param name="Location" value="c:">')
 document.write('<param name="AlignLeft" value="1">')
 document.write('<param name="AutoSize" value="0">')
 document.write('<param name="AutoSizePercentage" value="100">')
 document.write('<param name="AutoArrange" value="0">')
 document.write('<param name="NoClientEdge" value="false">')
 document.write('<param name="ViewMode" value="4">')
 document.write('</object>')
 document.write('</center><br>')
}
 
// --></SCRIPT>
 
 
 

 
27- MOVE BARRINHA LATERAL
 


<DIV id=imageholder
style="LEFT: 0px; POSITION: absolute; TOP: 0px; Z-INDEX: -1">
<SCRIPT language=VBScript>
<!--
direction="acima"   ' mude a direção do deslocamento aqui: "acima" ou "esquerda" ou "abaixo" ou "direita"
sizew=250 ' entre com a largura da imagem a ser deslocada aqui
sizeh=108 ' entre com a altura da imagem a ser deslocada aqui
nail=0
source=document.body.background
tall=((screen.height\sizeh)+1)*1
wide=(screen.width\sizew)+1
 
if direction="acima" then
 max=tall
 axis=sizeh
 placement=0
 reset=0
elseif direction="esquerda" then
 max=wide
 axis=sizew
 placement=0
 reset=0
elseif direction="abaixo" then
 max=tall
 axis=0
 placement=-sizeh
 reset=-sizeh
elseif direction="direita" then
 max=wide
 axis=0
 placement=-sizew
 reset=-sizew
end if
 
document.write "<pre>"
for temp=0 to max
 if direction="acima" then
  document.write "<img id=pics"&temp&" src><br>"
  elseif direction="esquerda" then
  document.write "<img id=pics"&temp&" src>"
 elseif direction="abaixo" then
  document.write "<img id=pics"&temp&" src><br>"
 elseif direction="direita" 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="Clique na imagem para parar ou continuar o deslocamento"
 
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="acima" then
  imageholder.style.top=-placement 
 elseif direction="esquerda" then
  imageholder.style.left=-placement
 elseif direction="abaixo" then
  imageholder.style.top=placement
 elseif direction="direita" 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>
 
 
 

 
28- TEXTO EMBAÇADO
 

<SCRIPT language=javaScript>
<!-- Beginning of JavaScript -
 
var thissize=30
var textfont="Verdana"
 
var textcolor= new Array()
textcolor[0]="EEEEEE"
textcolor[1]="DDDDDD"
textcolor[2]="CCCCCC"
textcolor[3]="AAAAAA"
textcolor[4]="888888"
textcolor[5]="666666"
textcolor[6]="555555"
textcolor[7]="444444"
textcolor[8]="333333"
textcolor[9]="222222"
textcolor[10]="111111"
textcolor[11]="000000"
 
var message = new Array()
message[0]="Digite os texto"
message[1]="De acordo"
message[2]="Com o numero"
message[3]="De linha que"
message[4]="Necessitar"
message[5]="O restante"
message[6]="Pode ser deletado"
message[7]="BEIJOS"
message[8]="Milton Ró"
 
var i_blurstrength=20
var i_message=0
var i_textcolor=0
 
function blurtext() {  
 if(document.all) {
  if (i_blurstrength >=-2) {
   if (i_textcolor >=textcolor.length-1) {i_textcolor=textcolor.length-1}
   blurthis.innerHTML="<span id='blurpit1' style='position:absolute;visibility:visible;width:600px; top:5px;left:5px;filter:blur(add=0,strength="+i_blurstrength+",direction=90);font-family:"+textfont+";font-size:"+thissize+"pt;color:"+textcolor[i_textcolor]+"'>"+message[i_message]+"</span>";
  document.close()
  i_blurstrength=i_blurstrength-2
  i_textcolor++
  var timer=setTimeout("blurtext()",50)
  }
  
  else {
   if (i_textcolor >=textcolor.length-1) {i_textcolor=textcolor.length-1}
   blurthis.innerHTML="<span id='blurit1' style='position:absolute;visibility:visible;width:600px; top:5px;left:5px;filter:blendTrans(duration=4.2);font-family:"+textfont+";font-size:"+thissize+"pt;color:FF0000'>"+message[i_message]+"</span>";
   i_message++
   if (i_message>=message.length){i_message=0}
   
   i_blurstrength=20
   i_textcolor=0
   clearTimeout(timer)
   var timer=setTimeout("blurtext()",2000)
  }
 } 
}
 
// - End of JavaScript - -->
</SCRIPT>
 
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#fffaf0 onload=blurtext()>
<DIV style="FONT: 10pt arial">
<DIV>&nbsp;</DIV></DIV>
<DIV><BR></DIV>
<DIV>&nbsp;</DIV>
<DIV style="FONT: 10pt arial">
<DIV>&nbsp;</DIV></DIV>
<DIV><BR></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT face=Arial size=2><BR>&nbsp;</DIV></FONT>
<DIV>&nbsp;</DIV>
<DIV id=mainbod
style="LEFT: 10px; POSITION: absolute; TOP: 180px; VISIBILITY: visible"></DIV>&nbsp;
 
<DIV id=blurthis style="POSITION: absolute; VISIBILITY: visible"></DIV>&nbsp;
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV></BODY></HTML>
 
 
 
 
29- Borda colorida
 

</FONT></DIV></BLOCKQUOTE></BLOCKQUOTE>

<STYLE>BODY {

BORDER-BOTTOM: #0000ff 15px ridge; BORDER-LEFT: #0000ff 15px ridge; BORDER-RIGHT: #0000ff 15px ridge; BORDER-TOP: #0000ff 15px ridge

}

</STYLE>

</BODY></HTML>

 


30- FUNDO FIXO

 
 
<BODY background=cid:005001bf1c2a$4cf51ec0$0100007f@andersof bgColor=#ffffff
bgProperties=fixed>
 
 

 
31- MOVE O FUNDO PARA CIMA
 

 
<META content="MSHTML 5.00.2919.6307" name=GENERATOR>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<DIV style="FONT: 10pt arial">
<DIV>&nbsp;</DIV></DIV>
<DIV><BR></DIV>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
 
<DIV>&nbsp;</DIV>
<DIV id=imageholder
style="LEFT: 0px; POSITION: absolute; TOP: 0px; Z-INDEX: -1">
<SCRIPT language=VBScript>
placement=0
nail=0
max=2
 
for temp=0 to max
 document.write "<img id=pics"&temp&" src><br>"  
next
 
DIM newarray
newarray=Array(pics0,pics1,pics2)
for temp=0 to max
newarray(temp).src=document.body.background
next
 
document.body.background=" "
window.status="Click na imagem para ela parar de rolar"
 
sub scroll()
 if nail=1 then
  exit sub
 end if
 if  placement < pics0.height then
  setTimeout "move", 1
 else
  placement=0
  setTimeout "move", 1
 end if
end sub
 
sub move()
  imageholder.style.top=-placement
  placement=placement+1
  setTimeout "scroll", 1
end sub
 
sub imageholder_onclick()
 if nail=0 then
  nail=1
 elseif nail=1 then
  nail=0
 end if
 scroll()
end sub
 
scroll()
 
</SCRIPT>
</DIV></BODY></HTML>
 
 
 
 

 
32- MOVE AS LETRAS PARA CIMA
 

 
<DIV>&nbsp;</DIV>
<SCRIPT language=JavaScript1.2>
 

/*
Advanced window scroller script-
By MARQUES
Over 200+ free JavaScripts here!
*/
 
var currentpos=0,alt=1,curpos1=0,curpos2=-1
function initialize(){
startit()
}
function scrollwindow(){
if (document.all)
temp=document.body.scrollTop
else
temp=window.pageYOffset
if (alt==0)
/*alt=1
else
alt=0*/ /*esta parte faz com que volte para o topo.*/
if (alt==0)
curpos1=temp
else
curpos2=temp
if (curpos1!=curpos2){
if (document.all)
currentpos=document.body.scrollTop+1
else
currentpos=window.pageYOffset+1
window.scroll(0,currentpos)
}
else{
currentpos=0
window.scroll(0,currentpos)
}
}
function startit(){
setInterval("scrollwindow()",40)
}
window.onload=initialize
</SCRIPT>
</BODY></HTML>
 
 
 
 Moldura para fotos

 
<CENTER>
  <TABLE border=6 borderColorDark=#005782 borderColorLight=#60a0d0 cellPadding=7
  cellSpacing=12 width="20%">
    <TBODY>
    <TR>
      <TD width="100%"></TD></TR></TBODY></TABLE></CENTER></DIV>
  <P align=center><BR></P></FONT></DIV></BLOCKQUOTE></BODY></HTML>
 

 

Qualquer dúvida, mande um e-mail

bete@guiabelenzinho.com.br