المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : سكربتات جافا مهم جدا وحلوه ^__^ لموقعك


Mohannad
01-05-2006, 03:28 PM
السلام عليكم اقدم لكم اكواد جافا

مهم وحلوه بنفس الوقت
كود شرات الزلزال يسولكك بالصفحه واهو موجود في المسنجر

<script language="JavaScript1.2">

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
function shake(n) {
if (self.moveBy) {
for (i = 10; i > 0; i--) {
for (j = n; j > 0; j--) {
self.moveBy(0,i);
self.moveBy(i,0);
self.moveBy(0,-i);
self.moveBy(-i,0);
}
}
}
}
// End -->
</script>

<form>
<p align="center"><input type="button"
value="اضغـــط هنـــا" onclick="shake(2)"> </p>
</form>

<p align="center"><a href="http://www.alq9ed.net"><font
color="#FF00FF" size="4"><strong>skone.com</strong></font></a></p>


كود محرك البحث

<script language="JavaScript"><!--
// START HIDE
var MAX_ENGINES = 35;
var tp='';
var tpp='';
var find = 'hunt';
var hold=0;
var hold2=0;
var gog=0;
var ap='';
function MakeArray(n) {
for (var i = 1; i <= n; i++) {
this[i] = 0;
}
this.maxlen = n;
this.len = 0;
return this;
}
var engs = new MakeArray(MAX_ENGINES);
function find_substring(needle, haystack) {
var i, needlen = needle.length, haylen = haystack.length;
for (i=0; i<=haylen-needlen; i++) {
if (needle == haystack.substring(i,i+needlen))
return i;
}
return false;
}
function Engine(name, opts, home, search) {
var gotcha = find_substring(find, search);
this.name = name;
this.opts = opts;
this.home = home;
this.pre_gotcha = search.substring(0,gotcha);
this.post_gotcha= search.substring(gotcha+find.length, search.length);
}
function Add(name, opts, home, search) {
engs.len++;
if (engs.len <= engs.maxlen) {
engs[engs.len] = new Engine(name, opts, home, search)
}
else {
alert ('Better increase MAX_ENGINES: ' + engs.Len + '>' + engs.maxlen)
}
}
function DisplayForm() {
document.writeln('<FORM Name=Gotchaform OnSubmit="HandleForm(this); return false">');
document.writeln('<strong></strong>&nbsp;<INPUT size=15 name="query">');
document.writeln('<strong></strong>&nbsp;<SELECT name="service">');
for (i=1; i <= engs.len; i++) {
document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);
}
document.writeln('</SELECT> &nbsp;<input type=submit value="Search"><br>');
document.writeln('</FORM>');
document.Gotchaform.query.focus()
}
function HandleForm(form){
var i, newq="", oldq=form.query.value;
for (i=0; i<oldq.length; i++) { // compress [ ]+ into \+
var thischar = oldq.charAt(i);
if (thischar =="+")newq += "%2B";
else
if (thischar != ' ')
newq += thischar;
else if (lastchar != ' ')
newq += '+';
lastchar = thischar;
}
var eng = engs[1+form.service.selectedIndex];
// Window
search=window.open(newq ? eng.pre_gotcha + newq + eng.post_gotcha : eng.home,"SmartSearch","scrollbars=yes,toolbar=yes,location=yes,directorie s=yes,status=yes,menubar=yes,resizable=yes,width=' 100%',hight='100%'");
}
Add("Alta Vista","SELECTED","http://altavista.digital.com/","http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=d&q=hunt");
Add("Yahoo!","","http://www.yahoo.com/","http://search.yahoo.com/bin/search?p=hunt" );
Add("DejaNews","","http://www.dejanews.com/","http://search.dejanews.com/nph-dnquery.xp?query=hunt&defaultOp=AND&svcclass=dncurrent&maxhits=25");
Add("HotBot","","http://www.search.hotbot.com","http://www.search.hotbot.com/search.html?MT=hunt&DC=25");
Add("Infoseek","","http://www.infoseek.com/Home?pg=Home.html&sv=A2","http://www.infoseek.com/Titles?qt=hunt&col=WW&sv=A2");
Add("Excite","","http://www.excite.com/","http://www.excite.com/search.gw?searchType=Concept&search=hunt&category=default");
Add("Lycos","","http://www.lycos.com/","http://www.lycos.com/cgi-bin/pursuit?query=hunt&backlink=639");
Add("Magellan","","http://www.mckinley.com/","http://www.mckinley.com/extsearch.cgi?query=hunt");
Add("OpenText","","http://search.opentext.com","http://search.opentext.com/omw/simplesearch?SearchFor=hunt&mode=and");
Add("WebCrawler","","http://webcrawler.com/","http://webcrawler.com/cgi-bin/WebQuery?searchText=hunt&maxHits=25");
// Software
Add("ZDNet Files","","http://www.zdnet.com/","http://www6.zdnet.com/cgi-bin/texis/swlib/hotfiles/search.html?Usrt=rel&Usrchtype=simple&Utext=hunt");
Add("Filez","","http://www.filez.com/","http://filez.com/cgi/filez.cgi?query=hunt&type=All+Files&hits=50&domain=World&doit=Search/");
Add("Shareware.com","","http://www.shareware.com/","http://search.shareware.com/code/engine/Find?logop=and&cfrom=quick&orfile=True&hits=25&search=hunt&category=All-Categories");
Add("PC Gamer","","http://www.pcgame.com/","http://www.pcgame.com/finder/search.cgi?key=hunt");
// Denmark
DisplayForm();
// STOP HIDE
// --></script>


لمنع استخدام يمين الفأره


<!-- This script has been in the http://www.javascripts.com Javascript Public Library! -->
<!-- Note that though this material may have been in a public depository, certain author copyright restrictions may apply. -->
<html>
<head>
<title>My Script-by Me</title>
</head>
<script language="JavaScript1.2">
/*
No Right Click
by: Mondain
*/

if (window.Event) // Only Netscape will have the CAPITAL E.
document.captureEvents(Event.MOUSEUP); // catch the mouse up event

function nocontextmenu() // this function only applies to IE4, ignored otherwise.
{
event.cancelBubble = true
event.returnValue = false;

return false;
}

function norightclick(e) // This function is used by all others
{
if (window.Event) // again, IE or NAV?
{
if (e.which == 2 || e.which == 3)
return false;
}
else
if (event.button == 2 || event.button == 3)
{
event.cancelBubble = true
event.returnValue = false;
return false;
}

}

document.oncontextmenu = nocontextmenu; // for IE5+
document.onmousedown = norightclick; // for all others
</script>
<body>

<br>

Simba says Roar.<br>

</body>
</html>

<-- وهنا تكتب العباره اللتي تريدها ان تظهر للمستخدم عندما يضغط يمين الفأره -->



--------------------------- اكواد النشرات الأخباريه ^___^


كود شريط اخر الاخبار من قناة الجزيرة

<SCRIPT language=JavaScript><!--
var g=new Date(); g=g.getTime()%1000;
document.writeln('<iframe width=100% height=17 scrolling=no marginwidth=0 marginheight=0 frameborder=0 src=http://www.faisal1.com/News_Grab/jazeera.php>');
// --></SCRIPT>
<NOSCRIPT><!--webbot bot="HTMLMarkup" startspan --><IFRAME
marginWidth=0 marginHeight=0
frameBorder=0 width=0 scrolling=no
height=0><!--webbot bot="HTMLMarkup" endspan --><!--webbot bot="HTMLMarkup" startspan --></IFRAME></IFRAME><!--webbot bot="HTMLMarkup" endspan --></NOSCRIPT>
<body bgcolor="#ffffff">

كود اخر الاخبار من قناة الجزيرة على شكل قائمة أفقية متحركة


<SCRIPT language=JavaScript><!--
var g=new Date(); g=g.getTime()%1000;
document.writeln('<iframe width=100% height=100 scrolling=no marginwidth=0 marginheight=0 frameborder=0 src=http://faisal1.com/News_Grab/vjazeera.php>');
// --></SCRIPT>
<NOSCRIPT><IFRAME
marginWidth=0 marginHeight=0
frameBorder=0 width=0 scrolling=no
height=0></IFRAME></NOSCRIPT>


اخر الاخبار من موقع البي بي سي

<SCRIPT language=JavaScript><!--
var g=new Date(); g=g.getTime()%1000;
document.writeln('<iframe width=100% height=30 scrolling=no marginwidth=0 marginheight=0 frameborder=0 src=http://www.faisal1.com/bbc1m.php>');
// --></SCRIPT>
<NOSCRIPT><!--webbot bot="HTMLMarkup" startspan --><IFRAME
marginWidth=0 marginHeight=0
frameBorder=0 width=0 scrolling=no
height=0><!--webbot bot="HTMLMarkup" endspan --><!--webbot bot="HTMLMarkup" startspan --></IFRAME></IFRAME><!--webbot bot="HTMLMarkup" endspan --></NOSCRIPT>

أخبار المفكرة الإسلامية

<p align="center"><!--webbot bot="HTMLMarkup" startspan --><p align="center"><!--webbot bot="HTMLMarkup" startspan --><P align="left" class="para">
<iframe id='myframe' src=' http://islammemo.cc/news/bar.asp?bgcolor_var=white&fgcolor_var=black&fontname_var=tahoma&fontsize_var=4&fontbold_var=1&fontitalic_var=0&fontunderline_var=0&direction_var=right' frameBorder='no' width='100%' height='100%'></iframe>
</P>

<!--webbot bot="HTMLMarkup" endspan -->
</p>

الاخبار من محيط

<SCRIPT language=JavaScript><!--
var g=new Date(); g=g.getTime()%1000;
document.writeln('<iframe width=100% height=30 scrolling=no marginwidth=0 marginheight=0 frameborder=0 src=http://us.moheet.com/asp/country_m.asp?m=23>');
// --></SCRIPT>
<NOSCRIPT><!--webbot bot="HTMLMarkup" startspan --><IFRAME
marginWidth=0 marginHeight=0
frameBorder=0 width=0 scrolling=no
height=0><!--webbot bot="HTMLMarkup" endspan --><!--webbot bot="HTMLMarkup" startspan --></IFRAME></IFRAME><!--webbot bot="HTMLMarkup" endspan --></NOSCRIPT>


كود اخر الاخبار من الاي إف بي

<SCRIPT language=JavaScript><!--
var g=new Date(); g=g.getTime()%1000;
document.writeln('<iframe width=100% height=45 scrolling=no marginwidth=0 marginheight=0 frameborder=0 src=http://www.asharqalawsat.com/scrollafp.asp>');
// --></SCRIPT>
<NOSCRIPT><!--webbot bot="HTMLMarkup" startspan --><IFRAME
marginWidth=0 marginHeight=0
frameBorder=0 width=0 scrolling=no
height=0><!--webbot bot="HTMLMarkup" endspan --><!--webbot bot="HTMLMarkup" startspan --></IFRAME></IFRAME><!--webbot bot="HTMLMarkup" endspan --></NOSCRIPT>

------------------------------------------
خدمة الأمثال والأحكام العشوائية

<SCRIPT language=JavaScript><!--
var g=new Date(); g=g.getTime()%1000;
document.writeln('<iframe width=60% height=35 scrolling=no marginwidth=0 marginheight=0 frameborder=0 src=http://faisal1.com/services/wq/wqh.php>');
// --></SCRIPT>
<NOSCRIPT><!--webbot bot="HTMLMarkup" startspan --><IFRAME
marginWidth=0 marginHeight=0
frameBorder=0 width=0 scrolling=no
height=0><!--webbot bot="HTMLMarkup" endspan --><!--webbot bot="HTMLMarkup" startspan --></IFRAME></IFRAME><!--webbot bot="HTMLMarkup" endspan --></NOSCRIPT>


محرك بحث دومين


<!-- This script has been in the http://www.javascripts.com Javascript Public Library! -->
<!-- Note that though this material may have been in a public depository, certain author copyright restrictions may apply. -->
<HTML>
<HEAD>
<META NAME="GENERATOR" CONTENT="Adobe PageMill 3.0 Win">
<TITLE>Domain Name Search</TITLE>
</HEAD>
<BODY LINK="#990000" VLINK="#990000">

<FORM METHOD="POST" ACTION="http://click.linksynergy.com/fs-bin/statform"
ENCTYPE="x-www-form-urlencoded">
<P><CENTER><INPUT TYPE="hidden" NAME="id" VALUE="SBfxAUmUKPo"><INPUT
TYPE="hidden" NAME="offerid" VALUE="6822"><INPUT TYPE="hidden"
NAME="bnid" VALUE="2"><INPUT TYPE="hidden" NAME="subid" VALUE="">
<INPUT TYPE="hidden" NAME="lang" VALUE="es"><TABLE WIDTH="120"
BORDER="0" CELLSPACING="0" CELLPADDING="4" BGCOLOR="#EEEEEE">
<TR>
<TD COLSPAN="2" BGCOLOR="#0080a0">
<B><FONT COLOR="#ffffff" SIZE="-1" FACE="Arial">الباحث عن الدومين</FONT></B></TD>

</TR>
<TR VALIGN="TOP" WIDTH="150">
<TD>
<B><FONT COLOR="#000000" SIZE="-2" FACE="Arial">Search here</FONT></B>
<INPUT TYPE="text" NAME="domain" SIZE="15" MAXLENGTH="22"></TD>
<TD WIDTH="50" VALIGN="BOTTOM">
<INPUT TYPE="submit" NAME="" VALUE="ابحث">
</TD>
</TR>
<TR>
<TD COLSPAN="2">
<FONT COLOR="#000080" SIZE="-2" FACE="Arial">
</FONT></TD>

</TR>
</TABLE><IMG SRC="http://ad.linksynergy.com/fs-bin/show?id=SBfxAUmUKPo&bids=6822&type=5"
WIDTH="1" HEIGHT="1" BORDER="0" NATURALSIZEFLAG="0" ALIGN="BOTTOM"></CENTER></FORM>

</BODY>
</HTML>

<!-- Simba says Roar. -->


لجعل المتصفح تحرك لاعلى ولأسفل اتوماتيكي

<script language="JavaScript1.2">

//change 1 to another integer to alter the scroll speed. Greater is faster
var speed=1
var currentpos=0,alt=1,curpos1=0,curpos2=-1
function initialize(){
startit()
}
function scrollwindow(){
if (document.all)
temp=document.body.scrollTop
else
temp=window.pageYOffset
if (alt==0)
alt=1
else
alt=0
if (alt==0)
curpos1=temp
else
curpos2=temp
if (curpos1!=curpos2){
if (document.all)
currentpos=document.body.scrollTop+speed
else
currentpos=window.pageYOffset+speed
window.scroll(0,currentpos)
}
else{
currentpos=30
window.scroll(0,currentpos)
}
}
function startit(){
setInterval("scrollwindow()",30)
}
window.onload=initialize
</script>


وسلامتكم اتمنى ان تنال على اعجابكم وتستفيدو منها اخوكم بو راشد
وملاحظه : انا ماسويتها بس جمعتها لكم