Bu sayfada Bilgisayar Programlama kategorisindeki Web Programlama forumunda Bazı Güzel Kodlar (HTML) başlıklı konu tartışılıyor; Kodları fareyle seçerek ctrl+c ile kopyalayıp ctrl+v ile de not defterine yapıştırın. Her kod için yeni bir not defteri açın ...
Kodları fareyle seçerek ctrl+c ile kopyalayıp ctrl+v ile de not defterine yapıştırın. Her kod için yeni bir not defteri açın ve her kodu da kod.html olarak kaydedin. Diğer bir koda geçerseniz kod1.html, kod2.html olarak kaydedin.
--------------------------------
Fareyi Vurmaya ve Takip Etmeye Çalışan Kareler
--------------------------------
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<title>z-mouse_animasyonu-1</title>
<script language="JavaScript">
<!-- Mouse attack Script by kurt.grigg@virgin.net
var speed=20,divTop=0,divLeft=0,angle=0,ypos=0,xpos=0,amount=13;
if (document.layers){
for (i = 0; i < amount; i++)
{document.write('<layer name=nsa'+i+' top=0 left=0 width='+i/3+' height='+i/3+' bgcolor=#ffffff></layer>');}
window.captureEvents(Event.MOUSEMOVE);
function nsMouse(evnt){
xpos=evnt.pageX;ypos=evnt.pageY;
}
window.onMouseMove = nsMouse;
}
else if (document.all){
document.write('<div style="position:absolute;top:0px;left:0px">');
document.write('<div style="position:relative">');
for (i = 0; i < amount; i++)
{document.write('<div id=k style="position:absolute;top:0px;left:0px;width:'+i/3+';height:'+i/3+';background:#ffffff;font-size:'+i/3+'"></div>')}
document.write('</div></div>');
function iMouse(){xpos=event.x;ypos=document.body.scrollTop+event.y}
document.onmousemove = iMouse;
}
function getAngle(){
Y = ypos - divTop;X = xpos - divLeft;angle = Math.round(Math.atan2(Y,X) * 180/Math.PI);
if (angle < 0)angle += 360;
}
function bomb(){
if (document.layers){
Yscroll=window.pageYOffset;
ybase=Math.round(Math.random()*window.innerHeight);xbase=Math.ro und(Math.random()*window.innerWidth);
yybase=window.innerHeight-10;xxbase=window.innerWidth-10;
}
else if (document.all){
Yscroll=document.body.scrollTop;
ybase=Math.round(Math.random()*window.document.body.offsetHeight );xbase=Math.round(Math.random()*window.document.body.offsetWidt h);
xxbase=window.document.body.offsetWidth-10;yybase=window.document.body.offsetHeight-10;
}
if ((xbase > 10 && xbase < xxbase) && (ybase > 10 && ybase < yybase))
bomb();
else
{
if ((divLeft > xpos-speed/1.5) && (divLeft < xpos+speed/1.5) && (divTop >= ypos-speed/1.5) && (divTop <= ypos+speed/1.5))
{divTop=ybase+Yscroll;divLeft=xbase}
y = Math.round(speed*Math.sin(angle*Math.PI/180));x = Math.round(speed*Math.cos(angle*Math.PI/180));
divTop+=y;divLeft+=x;
getAngle();
T=setTimeout('bomb()',20);
}
}
function Split(){
Clrs=new Array('fff000','ffffff','ffa500')
var ntscp=document.layers,msie=document.all;
if (document.layers){
for (i = 0; i < amount; i++)
{
if (i < amount-1)
{ntscp['nsa'+i].top=ntscp['nsa'+(i+1)].top;ntscp['nsa'+i].left=ntscp['nsa'+(i+1)].left}
else
{ntscp['nsa'+i].top=divTop;ntscp['nsa'+i].left=divLeft}
}
}
else if (document.all){
for (i = 0; i < amount; i++)
{
if (i < amount-1)
{msie.k[i].style.top=msie.k[i+1].style.top;msie.k[i].style.left=msie.k[i+1].style.left}
else
{msie.k[i].style.top=divTop;msie.k[i].style.left=divLeft}
}
}
for (i=0; i < amount-1; i++)
{
for (n=0; n < Clrs.length; n++)
{var x=Math.round(Math.random()*n)}
if (document.layers){ntscp['nsa'+i].bgColor=Clrs[x]}
else if (document.all){msie.k[i].style.background=Clrs[x]}
}
setTimeout("Split()",20);
}
function StArT(){bomb();Split()}
window.onload=StArT;
//-->
</script></head>
<body bgcolor="#000000" text="#FFFFFF">
</body>
</html>
---------------------------
Fareyi Takip Eden Yazı
---------------------------
<html>
<head>
<script language="JavaScript">
<!--
var x,y
var step=20
var flag=0
var message="sayborg"
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 : event.clientX
y = (document.layers) ? e.pageY : 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("document.all.span"+(i)+".style")
thisspan.posLeft=xpos[i]
thisspan.posTop=ypos[i]
}
}
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()",10)
}
Bir gün Yunanlılar, anneannemin annesinin ve diğer vatandaşlarımızın üzerine gaz dökmüşlerdi. Onları tam yakacaklarken Atatürk'ten bir telgraf geldi: "Eğer bir Türk'ün kılına bile zarar gelirse orada taşın üzerinde taş koymam." yazıyordu. Yunanlılar korktular ve yakamadılar. O yüce insanın sayesinde yaşıyorum. Bu vatandan çıkar sağlayıp tekrar bu vatana ihanet edenler şerefsizdir.
----------------------------------
Değişik Bir Şekilde Açılan Pencereler
----------------------------------
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
-----------------------------------------------------
Sitenin Yüklenme Durumunu Durum Çubuğunda Gösteren Kod
-----------------------------------------------------
<SCRIPT language=VBScript>
<!--
Dim Bar, Line, SP
Bar = 0
Line = "|"
sP = 100
Function Window_onLoad()
Bar = 95
sP = 10
END Function
Function Count()
If Bar < 100 Then
Bar = Bar + 1
Window.Status = "Yükleniyor: " & Bar & "%" & " " & String(Bar, Line)
setTimeout "Count()", SP
Else
Window.Status = "Yükleme Bitti"
Document.Body.Style.Display = ""
End If
End Function
Call Count()
-->
</SCRIPT>
------------------------------
Sayfanız Kare Kare Açılsın
------------------------------
var espeed=300
var counter=1
var temp=new Array()
var temp2=new Array()
var ns4=document.layers?1:0
var ie4=document.all?1:0
var ns6=document.getElementById&&!document.all?1:0
////////Code for Netscape NS 4+////
if (ns4){
for (i=1;i<=25;i++){
temp[i]=eval("document.p"+i+".clip")
temp2[i]=eval("document.p"+i)
temp[i].width=window.innerWidth/5
temp[i].height=window.innerHeight/5
}
for (i=1;i<=5;i++)
temp2[i].left=(i-1)*temp[i].width
for (i=6;i<=10;i++){
temp2[i].left=(i-6)*temp[i].width
temp2[i].top=temp[i].height
}
for (i=11;i<=15;i++){
temp2[i].left=(i-11)*temp[i].width
temp2[i].top=2*temp[i].height
}
for (i=16;i<=20;i++){
temp2[i].left=(i-16)*temp[i].width
temp2[i].top=3*temp[i].height
}
for (i=21;i<=25;i++){
temp2[i].left=(i-21)*temp[i].width
temp2[i].top=4*temp[i].height
}
}
function erasecontainerns(){
window.scrollTo(0,0)
var whichcontainer=Math.round(Math.random()*25)
if (whichcontainer==0)
whichcontainer=1
if (temp2[whichcontainer].visibility!="hide")
temp2[whichcontainer].visibility="hide"
else{
while (temp2[whichcontainer].visibility=="hide"){
whichcontainer=Math.round(Math.random()*25)
if (whichcontainer==0)
whichcontainer=1
}
temp2[whichcontainer].visibility="hide"
}
if (counter==25)
clearInterval(beginerase)
counter++
espeed-=10
}
////////End code for NS 4+////////
///////////Code for IE 4+ and NS6/////////
if (ie4||ns6){
var containerwidth=ns6?parseInt(window.innerWidth)/5-3 :
parseInt(document.body.clientWidth/5)
var containerheight=ns6?parseInt(window.innerHeight)/5-2 :
parseInt(document.body.offsetHeight/5)
for (i=1;i<=25;i++){
temp[i]=ns6?document.getElementById("p"+i).style :
for (i=1;i<=5;i++)
temp[i].left=(i-1)*containerwidth
for (i=6;i<=10;i++){
temp[i].left=(i-6)*containerwidth
temp[i].top=containerheight
}
for (i=11;i<=15;i++){
temp[i].left=(i-11)*containerwidth
temp[i].top=2*containerheight
}
for (i=16;i<=20;i++){
temp[i].left=(i-16)*containerwidth
temp[i].top=3*containerheight
}
for (i=21;i<=25;i++){
temp[i].left=(i-21)*containerwidth
temp[i].top=4*containerheight
}
}
function erasecontainerie(){
window.scrollTo(0,0)
var whichcontainer=Math.round(Math.random()*25)
if (whichcontainer==0)
whichcontainer=1
if (temp[whichcontainer].visibility!="hidden")
temp[whichcontainer].visibility="hidden"
else{
while (temp[whichcontainer].visibility=="hidden"){
whichcontainer=Math.round(Math.random()*25)
if (whichcontainer==0)
whichcontainer=1
}
temp[whichcontainer].visibility="hidden"
}
if (counter==25){
clearInterval(beginerase)
if (ns6){
for (i=1;i<26;i++)
temp[i].display="none"
}
}
counter++
espeed-=10
}
/////////End IE 4+ code////////
if (ns4)
beginerase=setInterval("erasecontainerns()",espeed)
else if (ie4||ns6){
beginerase=setInterval("erasecontainerie()",espeed)
}
</script>
</body>
---------------------------------
Durum Çubuğundaki Hareket Eden Yazı
---------------------------------
<script language="Javascript">
<!--
var x = 0
var speed = 90
var text = "sayborg2"
var course =76
var text2 = text
function Scroll() {
window.status = text2.substring(0, text2.length)
if (course < text2.length) {
setTimeout("Scroll2()", speed)
}
else {
text2 = " " + text2
setTimeout("Scroll()", speed);
}
}
function Scroll2() {
window.status = text2.substring(x, text2.length)
if (text2.length - x == text.length) {
text2 = text
x = 0
setTimeout("Scroll()", speed);
}
else {
x++
setTimeout("Scroll2()", speed);
}
}
Scroll()
//-->
</script>
Kodlar hakkında yorumunuzu bekliyorum ve kodları beğenen arkadaşlara çok teşekkür ediyorum. Gerçi bu kodlar başkalarının eseri. Bu kodları yapanlar da iyi yapmış diyorum.
<SCRIPT language=JavaScript1.2>
function glowit(which){
if (document.all.glowtext[which].filters[0].strength==3)
document.all.glowtext[which].filters[0].strength=2
else
document.all.glowtext[which].filters[0].strength=3
}
function glowit2(which){
if (document.all.glowtext.filters[0].strength==3)
document.all.glowtext.filters[0].strength=2
else
document.all.glowtext.filters[0].strength=3
}
function startglowing(){
if (document.all.glowtext&&glowtext.length){
for (i=0;i<glowtext.length;i++)
eval('setInterval("glowit('+i+')",150)')
}
else if (glowtext)
setInterval("glowit2(0)",150)
}
if (document.all)
window.onload=startglowing
</SCRIPT>
<SPAN id=glowtext>
<A href="http://www.hardwaremania.com/" target=_blank><FONT size=10>HARDWAREMANİA</FONT></A>
--------------------------------
Durum Çubuğundaki Titreyen Yazı
--------------------------------
<script
language="JavaScript"><!--
setInterval("sabit()",5);setInterval("yenile()",1800000);self.fo cus();
function sabit(){window.status="sayborg2"}
function yenile(){self.focus()}; //--></script>
-------------------------------
Sayfanın Renkli Açılması
-------------------------------
<!-- All material copyright Markland Communities, Inc., 1995, 1996,
1997, 1998, 1999 -->
<!-- Thank you for examining our code. -->
<!-- revision 3-28-99 bsm -->
<!-- big revision 10-29-99 cm -->
<html>
<head>
<meta http-equiv="Content-Type"
content="text/html; charset=windows-1254">
<meta name="resource-type" content="document">
<meta name="description"
content="WackyHTML - This site is all about doing wacky, crazy, stupid
things with HTML. DHTML, HTML 4 are used to great effect.
WebDevelopersJournal.com presents the HTML your mother never told you
----------------------------
Title Bar (Başlık Çubuğu)'da Kayan Yazı
----------------------------
<script language="JavaScript">
<!--
var left="[";
var right="]";
var msg="----------Hardwaremania----------";
var speed=200;
function scroll_title() {
document.title=left+msg+right;
msg=msg.substring(1,msg.length)+msg.charAt(0);
setTimeout("scroll_title()",speed);
}
scroll_title();
// End -->
</script>
-------------------------------------------------------
Status Barda (Durum Çubuğunda) Ard Arda Gelen Mesajlar
-------------------------------------------------------
<script language="JavaScript">
<!--
// HAZIRLAYAN VE SUNANA Macho_M muratus
var current = 0
var x = 0
var y = 0
var speed = 100
var speed2 = 2000
function initArray(n) {
this.length = n;
for (var i =1; i <= n; i++) {
this[i] = ' '}}
typ = new initArray(8)
typ[0]="sayborg2 derler bana..."
typ[1]="Bir Hardwaremania bağımlısıyım."
typ[2]="Bu HTML kodunu sizler için seçtim, umarım beğenirsiniz."
typ[3]="Nasıl, güzel olmuş mu?"
typ[4]="Bütün üyelere iyi günler."
typ[5]="Görüşmek üzere..."
function typnslide() {
var m = typ[current]
window.status = m.substring(0, x++)
if (x == m.length + 1) {x = 0
setTimeout("typnslide2()", speed2)}
else {setTimeout("typnslide()", speed)}}
function typnslide2() {var m = typ[current]
window.status = m.substring(m.length, y++)
if (y == m.length) {y = 0
current++
if (current > typ.length - 1)
{current = 0}
setTimeout("typnslide()", speed)}
else{setTimeout("typnslide2()", speed)}}
typnslide();
//-->
</script>
Umarım bu kodları da beğenirsiniz. Şahsen benim çok hoşuma gitti. Yeni kodlar bulursam yazacağım. İyi günler.
Arkadaşlar neden sustunuz? Artık canavar gibi kodlar yazamıyor muyum? Hadi birşeyler söyleyin. Nasıl olmuş? Devam ettireyim mi? Siz susunca sanki bu kodlar okunmuyormuş gibi hissediyorum. En çok beğendiğiniz kod hangisi? Ona benzer kodlar bulmaya çalışayım mı?
---------------------------------------------------------------------------
Durum Çubuğundaki Yazıyı Yoketme (Linkin üzerine gelinse bile yazı görünmez.)
---------------------------------------------------------------------------
----------------------------------
Kırmızıdan Sarıya Döngü Yapan Yazı
----------------------------------
<h2>
<script language="JavaScript1.2">
var message="sayborg2"
var neonbasecolor="red"
var neontextcolor="yellow"
var flashspeed=100 //in milliseconds
///No need to edit below this line/////
var n=0
if (document.all||document.getElementById){
document.write('<font color="'+neonbasecolor+'">')
for (m=0;m<message.length;m++)
document.write('<span
//Change all letters to base color
if (n==0){
for (m=0;m<message.length;m++)
//eval("document.all.neonlight"+m).style.color=neonbasecolor
crossref(m).style.color=neonbasecolor
}
//cycle through and change individual letters to neon color
crossref(n).style.color=neontextcolor
if (n<message.length-1)
n++
else{
n=0
clearInterval(flashing)
setTimeout("beginneon()",1500)
return
}
}
function beginneon(){
if (document.all||document.getElementById)
flashing=setInterval("neon()",flashspeed)
}
beginneon()
// 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;
// Positive XGRAVITY pulls right, negative pulls left
// Positive YGRAVITY pulls down, negative up
var XGRAVITY = 0;
var YGRAVITY = 50;
// RESISTANCE determines a slowing force proportional to velocity
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()", 1000);
}
}
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;
}
// 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 + XGRAVITY,
(spring.Y + resist.Y)/ MASS + YGRAVITY);
LinkBack URL
About LinkBacks
Alıntı Yap
