| mustapha |
09-06-2007 17:43 |
أكـواد خــياليــه لـ أصحاب المواقع والمنتديات
السلام عليكم ورحمة الله وبركاته
أكـواد خــياليــه لـ أصحاب المواقع والمنتديات
بسم الله نبدا
اخر تحديث للصفحه بالتاريخ واليوم
كود:
<SCRIPT ************************="******************************">
<!-- This script and many more are available free online at -->
<!-- The ****************************** Source!! http://www.geocities.com/planet9000 -->
<!-- Begin
var days = new Array(8);
days[1] = "الاحد";
days[2] = "الاثنين";
days[3] = "الثلاثاء";
days[4] = "الاربعاء";
days[5] = "الخميس";
days[6] = "الجمعة";
days[7] = "السبت";
var months = new Array(13);
months[1] = "January";
months[2] = "February";
months[3] = "March";
months[4] = "April";
months[5] = "May";
months[6] = "June";
months[7] = "July";
months[8] = "August";
months[9] = "September";
months[10] = "October";
months[11] = "November1";
months[12] = "December";
var dateObj = new Date(document.lastModified)
var wday = days[dateObj.getDay() + 1]
var lmonth = months[dateObj.getMonth() + 1]
var date = dateObj.getDate()
var fyear =+ dateObj.getYear()
document.write(wday + ", " + lmonth + " " + date + ", " + fyear)
// End -->
</SCRIPT>
أبراج صينية ( كذب المنجمون ولو صدقوا )
ضع هذا الجزء بين وسمي <body/>هنا<body> :
كود:
<script ************************="******************************">
<!--
function getpet () {
var toyear = 1997;
var birthyear = document.frm.inyear.value;
var birthpet="Ox"
x = (toyear - birthyear) % 12
if ((x == 1) || (x == -11)) {
birthpet="فأر" }
else {
if (x == 0) {
birthpet="ثور" }
else {
if ((x == 11) || (x == -1)) {
birthpet="نمر" }
else {
if ((x == 10) || (x == -2)) {
birthpet="أرنب" }
else {
if ((x == 9) || (x == -3)) {
birthpet="تنين" }
else {
if ((x == 8) || (x == -4)) {
birthpet="ثعبان" }
else {
if ((x == 7) || (x == -5)) {
birthpet="حصان" }
else {
if ((x == 6) || (x == -6)) {
birthpet="خروف" }
else {
if ((x == 5) || (x == -7)) {
birthpet="قرد" }
else {
if ((x == 4) || (x == -8)) {
birthpet="دجاج" }
else {
if ((x == 3) || (x == -9)) {
birthpet="كلب" }
else {
if ((x == 2) || (x == -10)) {
birthpet="خنزير" }
}
}
}
}
}
}
}
}
}
}
}
document.frm.birth.value = birthpet;
}
// -->
</script>
<p>أدخل تاريخ ميلادك. مثلاً: "1975" </p>
<form NAME="frm">
<p><input TYPE="text" SIZE="4" NAME="inyear" value="1975">
<input TYPE="button" VALUE="اضغط هنا لمعرفة برجك"
onClick="getpet()"> <br>
</p>
<p><input TYPE="text" SIZE="9" NAME="birth"> </font></p>
</form>
لعمل خلفيه مضيئه
كود:
<script ************************="******************************">
<!-- This script and many more are available free online at -->
<!-- The ****************************** Source!! http://******************************.internet.com -->
<!-- Hide from old browsers
var Color= new Array(9);
Color[1] = "ff";
Color[2] = "ee";
Color[3] = "dd";
Color[4] = "cc";
Color[5] = "bb";
Color[6] = "aa";
Color[7] = "99";
Color[8] = "88";
Color[9] = "77";
Color[10] = "66";
Color[11] = "55";
Color[12] = "44";
Color[13] = "33";
Color[14] = "22";
Color[15] = "11";
Color[16] = "00";
/* Do not display text on a fading background. Instead, let it
fade in and out once or twice, then load a new page. */
function fadeIn(where) {
if (where >= 1) {
document.bgColor="#" + Color[where] +"0000";
where -= 1;
setTimeout("fadeIn("+where+")", 15);
} else {
setTimeout(, 15);
}
}
function fadeOut(where) {
if (where <=16) {
document.bgColor="#" + Color[where] +"0000";
where += 1;
setTimeout("fadeOut("+where+")", 15)
} else {
setTimeout("fadeIn(16)", 15);
// ************************************************.href="http://www.netscape.com/";
}
}
// Unhide -->
</script>
ثم انسخ هذا ***** في منطقة الجسم
<body onload="fadeIn(16)">
لجعل الصفحه تهتز لفتره وجيزه عند دخولها
كود:
<script ************************="******************************">
<!---
bName = navigator.appName;
bVer = parseInt(navigator.appVersion);
if (bName == "Netscape" && bVer == 3) ver = "n3";
else if (bName == "Netscape" && bVer == 2) ver = "n2";
else if (bName == "Netscape" && bVer >= 4) ver = "n4";
else if (bName == "Microsoft Internet Explorer" && bVer == 2) ver = "e3";
else if (bName == "Microsoft Internet Explorer" && bVer > 2) ver = "e4";
if (navigator.appVersion.indexOf("Mac") != -1) ver+="m";
function shake() {
if (ver == "n4" || ver == "n4m" || ver == "e4" || ver == "e4m") {
for (i = 10; i > 0; i--) {
for (z = 4; z > 0; z--) {
self.moveBy(0,i);
self.moveBy(i,0);
self.moveBy(0,-i);
self.moveBy(-i,0);
} }
}
}
setTimeout(,5000);
// --->
</script>
لمنع الزر الأيمن على الصور فقط
كود:
<script ************************="******************************1.2">
/*
Disable right click script II (on images)- By Dynamicdrive.com
For full source, Terms of service, and 100s DTHML scripts
Visit http://www.dynamicdrive.com
*/
var clickmessage="Right click disabled on images!"
function disableclick(e) {
if (document.all) {
if (event.button==2||event.button==3) {
if (event.srcElement.tagName=="IMG"){
alert(clickmessage);
return false;
}
}
}
else if (document.layers) {
if (e.which == 3) {
alert(clickmessage);
return false;
}
}
else if (document.getElementById){
if (e.which==3&&e.target.tagName=="IMG"){
alert(clickmessage)
return false
}
}
}
function associateimages(){
for(i=0;i<document.images.length;i++)
document.images[i].onmousedown=disableclick;
}
if (document.all)
document.onmousedown=disableclick
else if (document.getElementById)
document.onmouseup=disableclick
else if (document.layers)
associateimages()
</script>
واخير وايس اخرا تقبلو تحياتي psv |
