Ukážka
Script	<SCRIPT LANGUAGE=vbscript><!-- dim Veta,PocetPismen,i,z Sub window_onload z=1 Veta= "www.somr.szm.sk" 'nadpis casovac= window.setInterval ("animuj",200)'start PocetPismen = len(Veta) End Sub Sub Animuj i=i+z T1.innerText=left(Veta,i-1) 'text vlavo T2.innerText=mid(Veta,i,1) 'meniace sa pismeno T2.style.color="yellow" ' farba meniaceho sa pismena T3.innerText=right(Veta,pocetPismen-i) 'text vpravo if i=PocetPismen then z=-1 if i= 1 then z=1 End Sub --></SCRIPT>
Objekt	<SPAN ID =T1></SPAN> <SPAN ID =T2></SPAN> <SPAN ID =T3> </SPAN>