مكتبة أكواد للمواقع و المنتديات

مكتبة أكواد للمواقع و المنتديات $#@ قائمة رهيبة تظهر من الجانب الايسر


كود:
<style>
<!--

#slidemenubar, #slidemenubar2{
position:absolute;
left:-155px;
width:160px;
top:170px;
border:1.5px solid green;
background-color:lightyellow;
layer-background-color:lightyellow;
font:bold 12px Verdana;
line-height:20px;
}
-->
</style>
<script language="JavaScript1.2">

/*
Sliding Menu Bar Script-
Dynamic Drive ([ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
For full source code, installation instructions,
100's more DHTML scripts, and Terms Of
Use, visit dynamicdrive.com
*/

if (document.all)
document.write('<div id="slidemenubar2" style="left:-150" onMouseover="pull()" onMouseout="draw()">')
</script>
<layer id="slidemenubar" onMouseover="pull()" onMouseout="draw()">
<script language="JavaScript1.2">
var sitems=new Array()
var sitemlinks=new Array()

//extend or shorten this list
sitems[0]="الصفحة الرئيسية"
sitems[1]="الموقع الاول"
sitems[2]="الموقع الثانى"
sitems[3]="الموقع الثالث"
sitems[4]="الموقع الرابع"
sitems[5]="الموقع الخامس"
sitems[6]="الموقع السادس"
sitems[7]="الموقع السابع"
sitems[8]="الموقع الثامن"
sitems[9]="الموقع التاسع"
sitems[10]="الموقع العاشر"
sitems[11]="الموقع الحادى عشر"
sitems[12]="الموقع الثانى عشر"


//These are the links pertaining to the above text.
sitemlinks[0]="هنا تضع المواقع"
sitemlinks[1]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[2]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[3]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[4]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[5]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[6]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[7]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[8]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[9]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[10]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[11]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"
sitemlinks[12]="؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟"

for (i=0;i<=sitems.length-1;i++)
document.write('<a href='+sitemlinks[i]+'>'+sitems[i]+'</a><br>')
</script>
</layer>
<script language="JavaScript1.2">
function regenerate(){
window.location.reload()
}
function regenerate2(){
if (document.layers)
setTimeout("window.onresize=regenerate",400)
}
window.onload=regenerate2
if (document.all){
document.write('</div>')
themenu=document.all.slidemenubar2.style
rightboundary=0
leftboundary=-150
}
else{
themenu=document.layers.slidemenubar
rightboundary=150
leftboundary=10
}
function pull(){
if (window.drawit)
clearInterval(drawit)
pullit=setInterval("pullengine()",50)
}
function draw(){
clearInterval(pullit)
drawit=setInterval("drawengine()",50)
}
function pullengine(){
if (document.all&&themenu.pixelLeft<rightboundary)
themenu.pixelLeft+=5
else if(document.layers&&themenu.left<rightboundary)
themenu.left+=5
else if (window.pullit)
clearInterval(pullit)
}
function drawengine(){
if (document.all&&themenu.pixelLeft>leftboundary)
themenu.pixelLeft-=5
else if(document.layers&&themenu.left>leftboundary)
themenu.left-=5
else if (window.drawit)
clearInterval(drawit)
}
</script>
باحث سريع في ست شركات بحث


كود:
<script language="JavaScript">
<!--
current_site = "Yahoo"

var set_def = false

function fetch() {

if (set_def == true) {

set_default = "t"

}else{

set_default = ""

}

tmp = document.SearchForm.Search.value;

stmp = "";

for (i=0 ; i <= tmp.length ; i++) {

if (tmp.charAt(i) == " ") {

stmp = stmp + "+";

} else {

stmp = stmp + tmp.charAt(i);

}

}

if (current_site == "Yahoo") {

top.location.href = "http://search.yahoo.com/bin/search?p=" + document.SearchForm.Search.value

}

if (current_site == "AltaVista") {

top.location.href = "http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=.&q=" + document.SearchForm.Search.value

}

if (current_site == "Lycos") {

top.location.href = "http://www.lycos.com/cgi-bin/pursuit?adv=%26adv%3B&cat=lycos&matchmode=and&query=" + document.SearchForm.Search.value + "&x=35&y=2"

}

if (current_site == "Excite") {

top.location.href = "http://www.excite.com/search.gw?c=web&search=" + document.SearchForm.Search.value + "&trace=a&x=31&y=20"

}

if (current_site == "Infoseek") {

top.location.href = "http://www.infoseek.com/Titles?qt=" + document.SearchForm.Search.value + "&col=WW&sv=IS&lk=noframes&nh=10"

}

if (current_site == "HotBot") {

top.location.href = "http://www.hotbot.com/?SW=web&SM=MC&MT=" + document.SearchForm.Search.value + "&DC=10&DE=2&RG=NA&_v=2&act.search.x=87&act.search.y=9"

}



return false;

}



function toggle_setdef() {

set_def = !(set_def);

}



function setsite(sitenow) {

current_site = sitenow;

}



// --></script>

<!-- A1 -->
<center><h1>Multiple Search Engines</h1></center>
<form method="GET" name="SearchForm" onsubmit="return fetch()">
<center><font size="-1">Yahoo</font><input type="radio" name="SITE" value="Yahoo" checked onclick="setsite('Yahoo')"> <font size="-1">AltaVista</font><input type="radio" name="SITE" value="AltaVista" onclick="setsite('AltaVista')"> <font size="-1">Lycos</font><input type="radio" name="SITE" value="Lycos" onclick="setsite('Lycos')"> <font size="-1">Excite</font><input type="radio" name="SITE" value="Excite" onclick="setsite('Excite')"> <font size="-1">Infoseek</font><input type="radio" name="SITE" value="Infoseek" onclick="setsite('Infoseek')"> <font size="-1">Hotbot</font><input type="radio" name="SITE" value="HotBot" onclick="setsite('HotBot')"></center>
<br>
<center><input type="Text" name="Search" size=30></center>
<br>
<br>
<center><input type="Submit" name="Submit"></center></form><hr>
<!-- -->
لعمل قائمة شفافة


كود:
<!-- Paste this between the HEAD tags of your html document -->

<script language="JavaScript">
var isIE4 = false;
function CheckBrowser()
{ if (navigator.appName == "Microsoft Internet Explorer" && navigator.appVersion.charAt(0) >= 4) { isIE4 = true; }}
function mOvr(src,clrOver)
{ if (!src.contains(event.fromElement)) { src.style.cursor = 'hand'; src.bgColor = clrOver; src.children.tags('A')[0].style.color = '#ffffff';}}
function mOut(src,clrIn)
{ if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn; src.children.tags('A')[0].style.color = '#ffffff';}}
function mClk(src)
{ if(event.srcElement.tagName=='TD'){src.children.ta gs('A')[0].click();} }
function mOvrTop(src,clrOver)
{ if (!src.contains(event.fromElement)) { src.style.cursor = 'hand'; src.bgColor = clrOver;}}
function mOutTop(src,clrIn)
{ if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn;}}
</script>


<!-- Paste this within the BODY of your document. Customize the table, colors, fonts, etc -->

<table cellspacing="3" cellpadding="0" border="0" width="420" align="center" bgcolor="#003366">
<tr>
<td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://www.yahoo.com/"><font face="Verdana" size="-2">YAHOO</font></a>
</td>
<td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://hotbot.lycos.com/"><font face="Verdana" size="-2">HOTBOT</font></a>
</td>
<td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://WWW.CNN.com/"><font face="Verdana" size="-2">CNN</font></a>
</td>
<td align="center" width="105" onmouseover="mOvr(this,'#9999cc');" onmouseout="mOut(this,'#666699');" onclick="mClk(this);" bgcolor="#666699">
<a style="color: #FFFFFF" href="http://www.faisal1.com/"><font face="Verdana" size="1">موقع فيـصـل</font></a>
</td>
</tr>
</table>
ثلوج متساقطة او ورود


كود:
<BODY>

<SCRIPT LANGUAGE="JavaScript1.2">

<!-- Web Site: [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] -->

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] -->

<!-- Begin
var no = 25; // snow number
var speed = 10; // smaller number moves the snow faster
var snowflake = "snow.gif";

var ns4up = (document.layers) ? 1 : 0; // browser sniffer
var ie4up = (document.all) ? 1 : 0;
var dx, xp, yp; // coordinate and position variables
var am, stx, sty; // amplitude and step variables
var i, doc_width = 800, doc_height = 600;
if (ns4up) {
doc_width = self.innerWidth;
doc_height = self.innerHeight;
} else if (ie4up) {
doc_width = document.body.clientWidth;
doc_height = document.body.clientHeight;
}
dx = new Array();
xp = new Array();
yp = new Array();
am = new Array();
stx = new Array();
sty = new Array();
for (i = 0; i < no; ++ i) {
dx[i] = 0; // set coordinate variables
xp[i] = Math.random()*(doc_width-50); // set position variables
yp[i] = Math.random()*doc_height;
am[i] = Math.random()*20; // set amplitude variables
stx[i] = 0.02 + Math.random()/10; // set step variables
sty[i] = 0.7 + Math.random(); // set step variables
if (ns4up) { // set layers
if (i == 0) {
document.write("<layer name=\"dot"+ i +"\" left=\"15\" ");
document.write("top=\"15\" visibility=\"show\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></layer>");
} else {
document.write("<layer name=\"dot"+ i +"\" left=\"15\" ");
document.write("top=\"15\" visibility=\"show\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></layer>");
}
} else if (ie4up) {
if (i == 0) {
document.write("<div id=\"dot"+ i +"\" style=\"POSITION: ");
document.write("absolute; Z-INDEX: "+ i +"; VISIBILITY: ");
document.write("visible; TOP: 15px; LEFT: 15px;\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></div>");
} else {
document.write("<div id=\"dot"+ i +"\" style=\"POSITION: ");
document.write("absolute; Z-INDEX: "+ i +"; VISIBILITY: ");
document.write("visible; TOP: 15px; LEFT: 15px;\"><img src=\"");
document.write(snowflake + "\" border=\"0\"></div>");
}
}
}
function snowNS() { // Netscape main animation function
for (i = 0; i < no; ++ i) { // iterate for every dot
yp[i] += sty[i];
if (yp[i] > doc_height-50) {
xp[i] = Math.random()*(doc_width-am[i]-30);
yp[i] = 0;
stx[i] = 0.02 + Math.random()/10;
sty[i] = 0.7 + Math.random();
doc_width = self.innerWidth;
doc_height = self.innerHeight;
}
dx[i] += stx[i];
document.layers["dot"+i].top = yp[i];
document.layers["dot"+i].left = xp[i] + am[i]*Math.sin(dx[i]);
}
setTimeout("snowNS()", speed);
}
function snowIE() { // IE main animation function
for (i = 0; i < no; ++ i) { // iterate for every dot
yp[i] += sty[i];
if (yp[i] > doc_height-50) {
xp[i] = Math.random()*(doc_width-am[i]-30);
yp[i] = 0;
stx[i] = 0.02 + Math.random()/10;
sty[i] = 0.7 + Math.random();
doc_width = document.body.clientWidth;
doc_height = document.body.clientHeight;
}
dx[i] += stx[i];
document.all["dot"+i].style.pixelTop = yp[i];
document.all["dot"+i].style.pixelLeft = xp[i] + am[i]*Math.sin(dx[i]);
}
setTimeout("snowIE()", speed);
}
if (ns4up) {
snowNS();
} else if (ie4up) {
snowIE();
}
// End -->
</script>

</BODY>
حكمة تتغير


كود:
<script LANGUAGE="JavaScript">

<!-- Begin
var a = Math.random() + ""
var rand1 = a.charAt(5)
quotes = new Array
quotes[1] = "لايلدغ المؤمن من جحر مرتين"
quotes[2] = "لا يرمي الناس بالحجارة من كان بيته من زجاج"
quotes[3] = "اللهم علمني ما نسيت و ذكرني بما جهلت"
quotes[4] = "إن الله و ملائكته يصلون على النبي يا أيها اللذين آمنوا صلوا و سلموا عليه تسليما"
quotes[5] = "إنما الأعمال بالنيات "
quotes[6] = "اهلا بكم في صفحتي"
quotes[7] = "خير الامور أوسطها"
quotes[8] = "لتكن كبيرة أو صغيرة فهي بلادي و ليكن بعيد أو قريب فه ابن بلدي - مثل صيني"
quotes[9] = "لا إله إلا الله"
quotes[0] = "بلادي و إن جارت علي عزيزة"
var quote = quotes[rand1]
document.write(quote);
// End -->
لشرح الرابط عند مرور الماوس


كود:
head

<STYLE TYPE="text/css">
<!--
BODY {OVERFLOW:scroll;OVERFLOW-X:hidden}
.DEK {POSITION:absolute;VISIBILITY:hidden;Z-INDEX:200;}
//-->
</STYLE>


وهذا يوضع في الـ body

<DIV ID="dek" CLASS="dek"></DIV>
<SCRIPT TYPE="text/javascript">
<!--
Xoffset=-60; // modify these values to ...
Yoffset= 20; // change the popup position.

var nav,old,iex=(document.all),yyy=-1000;
if(navigator.appName=="Netscape"){(document.layers)?nav=true:old=true;}

if(!old){
var skn=(nav)?document.dek:dek.style;
if(nav)document.captureEvents(Event.MOUSEMOVE);
document.onmousemove=get_mouse;
}

function popup(msg,bak){
var content="<TABLE WIDTH=200 BORDER=1 BORDERCOLOR=black CELLPADDING=2 CELLSPACING=0 "+
"BGCOLOR="+bak+"><TD ALIGN=center><FONT COLOR=white SIZE=4>"+msg+"</FONT></TD></TABLE>";
if(old){alert(msg);return;}
else{yyy=Yoffset;
if(nav){skn.document.write(content);skn.document.c lose();skn.visibility="visible"}
if(iex){document.all("dek").innerHTML=content;skn.visibility="visible"}
}
}

function get_mouse(e){
var x=(nav)?e.pageX:event.x+document.body.scrollLeft;s kn.left=x+Xoffset;
var y=(nav)?e.pageY:event.y+document.body.scrollTop;sk n.top=y+yyy;
}

function kill(){
if(!old){yyy=-1000;skn.visibility="hidden";}
}

//-->
</SCRIPT>

اما هذه العبارة فتوضع داخل قوسي عنوان الرابطة وذلك بعد علامة التنصيص الاخيره قبل القوس

ONMOUSEOVER="popup('Link description here','yellow')"; ONMOUSEOUT="kill()"

بهذا الشكل

<p align="center"><a href="http://amory.8m.com" ONMOUSEOUT="kill()" ; ONMOUSEOVER="popup('زورونا تجدوا ما يسركم','blue')"><font face="Tahoma">عموري</font></a></p>
رقم سري لدخول الصفحة


كود:
<form>
<p>ENTER USER NAME :
<input type="text" name="text2">
</p>
<p> ENTER PASSWORD :
<input type="password" name="text1">
<input type="button" value="Check In" name="Submit" onclick=javascript:validate(text2.value,"ضع هنا اليوزرنيم",text1.value,"ضع هنا الباسوورد") >
</p>

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

function validate(text1,text2,text3,text4)
{
if (text1==text2 && text3==text4)
load('هنا تضع عنوان صفحة للذي يدخل باسوورد صح');
else
{
load('هنا تضع عنوان صفحة للذي يدخل باسوورد خطأ');
}
}
function load(url)
{
location.href=url;
}
</script>