الدمشقي
29-06-04, 01:51 am
محاولة لإضفاء طابع شخصي على سطح المكتب:
انسخ هذا الكود
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
body {
background-color: #004E98;
}
-->
</style></head>
<script language="javascript">
<!-- www.javascript.agoentgen.de -->
for (i=0; i<30 ;i++) {
document.write("<style type='text/css'>#m"+i+"{ position: absolute; left: 0px; top: 0px;}<\/style>\n")
}
</script>
<b>
</b>
</body>
<font face="Andalus">
<script language="javascript">
text="http://www.forum.buraydh.com/"
x=new Array()
y=new Array()
var ns4up = (document.layers) ? 1 : 0;
var ie4up = (document.all) ? 1 : 0;
var mx=0, my=0
document.write("<font color=\"#ff0022\">\n")
document.write("<tt><font size=\"+1>\">\n")
for (i=0; i<30 ;i++) {
document.write("<div id='m"+i+"'>"+text.substr(i,1)+"<\/div>\n")
x[i]=0
y[i]=0
}
document.write("<\/font><\/tt><\/font>\n")
if (ns4up) {
document.captureEvents(Event.MOUSEMOVE);
}
document.onmousemove = mm;
function mm(e){
mx = (ns4up) ? e.pageX : event.clientX+document.body.scrollLeft;
my = (ns4up) ? e.pageY : event.clientY+document.body.scrollTop;
}
mt()
function mt() {
x[0]=x[0]+(mx-x[0]+30)/3
y[0]=y[0]+(my-y[0]+30)/3
for (i=1; i<30; i++) {
x[i]=x[i]+(x[i-1]-x[i]+10)/3
y[i]=y[i]+(y[i-1]-y[i])/3
}
for (i=0; i<30; i++) {
if (ns4up) {
document.layers["m"+i].left=x[i]
document.layers["m"+i].top=y[i]
}
if (ie4up) {
document.all["m"+i].style.pixelLeft=x[i]
document.all["m"+i].style.pixelTop=y[i]
}}
setTimeout("mt()",10)
}
</script>
</font>
</html>
ثم افتح برنامج ماكروميديا دريم ويفر ومن أسفل صفحة البرنامج اختر Code فستفتح لك صفحة تحرير بها بعض الأوامر احذف كل ما تراه ... ثم الصق الكود الذي نسخته من هنا ..
احفظ عملك ثم اضغط F12 وسترى مؤشر الماوس في صفحة المستكشف تلحقه وصلة موقع منتدى بريده ...
لتغيير النص .... إرجع إلى صفحة ال Code في فرونت بيج ومن السطر رقم 25 أو 26 ستجد التالي:
text="http://www.forum.buraydh.com/"
غير النص الذي تراه بين قوسين إلى ما تريد ثم احفظ عملك...
احفظ الصفحة ... ثم من صفحة تغيير الخلفية في خصائص سطح المكتب (خصائص العرض) اختر استعراض واختر الصفحة التي حفظتها وستجد أنها أصبحت خلفية سطح المكتب...
أعتذر على الإطالة وعلى تواضع المشاركة....
أخوكم الدمشقي
انسخ هذا الكود
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
body {
background-color: #004E98;
}
-->
</style></head>
<script language="javascript">
<!-- www.javascript.agoentgen.de -->
for (i=0; i<30 ;i++) {
document.write("<style type='text/css'>#m"+i+"{ position: absolute; left: 0px; top: 0px;}<\/style>\n")
}
</script>
<b>
</b>
</body>
<font face="Andalus">
<script language="javascript">
text="http://www.forum.buraydh.com/"
x=new Array()
y=new Array()
var ns4up = (document.layers) ? 1 : 0;
var ie4up = (document.all) ? 1 : 0;
var mx=0, my=0
document.write("<font color=\"#ff0022\">\n")
document.write("<tt><font size=\"+1>\">\n")
for (i=0; i<30 ;i++) {
document.write("<div id='m"+i+"'>"+text.substr(i,1)+"<\/div>\n")
x[i]=0
y[i]=0
}
document.write("<\/font><\/tt><\/font>\n")
if (ns4up) {
document.captureEvents(Event.MOUSEMOVE);
}
document.onmousemove = mm;
function mm(e){
mx = (ns4up) ? e.pageX : event.clientX+document.body.scrollLeft;
my = (ns4up) ? e.pageY : event.clientY+document.body.scrollTop;
}
mt()
function mt() {
x[0]=x[0]+(mx-x[0]+30)/3
y[0]=y[0]+(my-y[0]+30)/3
for (i=1; i<30; i++) {
x[i]=x[i]+(x[i-1]-x[i]+10)/3
y[i]=y[i]+(y[i-1]-y[i])/3
}
for (i=0; i<30; i++) {
if (ns4up) {
document.layers["m"+i].left=x[i]
document.layers["m"+i].top=y[i]
}
if (ie4up) {
document.all["m"+i].style.pixelLeft=x[i]
document.all["m"+i].style.pixelTop=y[i]
}}
setTimeout("mt()",10)
}
</script>
</font>
</html>
ثم افتح برنامج ماكروميديا دريم ويفر ومن أسفل صفحة البرنامج اختر Code فستفتح لك صفحة تحرير بها بعض الأوامر احذف كل ما تراه ... ثم الصق الكود الذي نسخته من هنا ..
احفظ عملك ثم اضغط F12 وسترى مؤشر الماوس في صفحة المستكشف تلحقه وصلة موقع منتدى بريده ...
لتغيير النص .... إرجع إلى صفحة ال Code في فرونت بيج ومن السطر رقم 25 أو 26 ستجد التالي:
text="http://www.forum.buraydh.com/"
غير النص الذي تراه بين قوسين إلى ما تريد ثم احفظ عملك...
احفظ الصفحة ... ثم من صفحة تغيير الخلفية في خصائص سطح المكتب (خصائص العرض) اختر استعراض واختر الصفحة التي حفظتها وستجد أنها أصبحت خلفية سطح المكتب...
أعتذر على الإطالة وعلى تواضع المشاركة....
أخوكم الدمشقي