زائر الليل مبدع .. بحق
أحترام القوانين : عضـِـوْيُتـً?• : 12 مشآرڪآتي• : 719 مْـوَـآضْـيَـع?• : 609 بُـلاآآدٍيـ?• :
| موضوع: كود نص يظهر بطريقة الآلة الكاتبة 5/5/2011, 2:37 am | |
| كود رائع - الكود:
-
<p id='anima' style="position:absolute;font-size:20;background-color:white;"> </p> <br> <br> <script language="JavaScript"> // Visit [url=http://www.star28.com/]http://www.star28.com/[/url] for more code <!-- Begin text = "مرحبا بكم في منتديات مرهف الاحساس للتصميم د....."; word = text.split('~'); i = -1; //letter count j = 0; //which word in array is to be spelled start = 0; //variable to hold cycles of the blink scount = 0; //variable to hold cycles of the mispell function checkIt() { with(document.all.anima) { if(innerText.charAt(innerText.length-1) == "_") { innerText = innerText.substring(0, innerText.length - 1); return true; } else { innerText = innerText + "_"; return false; } } } function blinkfor(count, timing) { with(document.all.anima) { if(start < count) { if(checkIt()) { start++; } mistake = 'blinkfor('+count+','+timing+')'; setTimeout('eval(mistake)', timing); } else { start = 0; i++; call_It(); } } } function mispell(offset,correction) { with(document.all.anima) { if(scount < offset) { if(!checkIt()) { innerText = innerText.substring(0, innerText.length-2) + "_"; scount++; } mistake = 'mispell(' + offset + ', "' + correction + '")'; setTimeout("eval(mistake)", 150); } else { if(correction == '' && scount == offset ) { i = i - offset; scount++; } if(offset > 0) { if(checkIt()) { innerText += correction.charAt(correction.length - offset) + "_"; offset--; } mistake = 'mispell(' + offset + ',"' + correction + '")'; setTimeout("eval(mistake)", 150); } else { scount = 0; j++; innerText = innerText.substring(0, innerText.length - 1); call_It(); } } } } function spellit(string) { with(document.all.anima) { if(i <= string.length) { if(string.charAt(i) == '/') { NumErrs = string.charAt(i + 1); NewLets = string.substring(i + 2, i + NumErrs); mispell(NumErrs,NewLets); } else if(i <= string.length - 1) { i++; innerText = string.substring(0,i) + "_"; mistake = 'spellit("' + string + '")'; setTimeout("eval(mistake)", 150); } else { innerText = string.substring(0, i); j++; call_It(); } } } } function call_It() { with(document.all) { if(i == -1){ blinkfor(4, 150); } else if(j <= word.length - 1) { spellit(anima.innerText + " " + word[j]); } else { blinkfor(100,230); } } } if(document.all) { call_It(); } // End --> </script>
| |
|
عمري ما تمنيت شي المشرف العام للموقع
أحترام القوانين : عضـِـوْيُتـً?• : 65 مشآرڪآتي• : 8682 مْـوَـآضْـيَـع?• : 4377 بُـلاآآدٍيـ?• :
| موضوع: رد: كود نص يظهر بطريقة الآلة الكاتبة 5/5/2011, 10:09 am | |
| يسلمو ع الطرح
ويعطيك العافيه
لك التحية | |
|