منتدى طانطان للبرمجة
أهلا وسهلا بك زائرنا الكريم، إذا كانت هذه زيارتك الأولى للمنتدى، .يشرفنا أن تقوم بالتسجيل من أعلى الصفحة إذا رغبت بالمشاركة في المنتدى.
منتدى طانطان للبرمجة
أهلا وسهلا بك زائرنا الكريم، إذا كانت هذه زيارتك الأولى للمنتدى، .يشرفنا أن تقوم بالتسجيل من أعلى الصفحة إذا رغبت بالمشاركة في المنتدى.
منتدى طانطان للبرمجة
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

منتدى طانطان للبرمجة

كل ما يخص الحاسوب من مكونات ، صيانة ، لغات برمجة و تقنيات حديثة
 
الرئيسيةأحدث الصورالتسجيلدخول

 

 نص يظهر بطريقة الآلة الكاتبة

اذهب الى الأسفل 
كاتب الموضوعرسالة
Admin
Admin



عدد المساهمات : 84
نقاط : 215
تاريخ التسجيل : 24/06/2010

نص يظهر بطريقة الآلة الكاتبة Empty
مُساهمةموضوع: نص يظهر بطريقة الآلة الكاتبة   نص يظهر بطريقة الآلة الكاتبة I_icon_minitimeالسبت فبراير 25, 2012 7:21 pm

الكود:
<p id='anima' style="position:absolute;font-size:20;background-color:white;">
</p>
<br>
<br>

<script language="JavaScript">

// Visit http://www.star28.com/ 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>
الرجوع الى أعلى الصفحة اذهب الى الأسفل
https://tantanpro.1fr1.net
 
نص يظهر بطريقة الآلة الكاتبة
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1
 مواضيع مماثلة
-
» درس فوتوشوب دمج صورتين بطريقة احترافيه جداً

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتدى طانطان للبرمجة :: المنتديات و تصميم المواقع :: كيف تتعامل مع موقعك :: التقنيات المتقدمة :: أكواد التومبلايت :: أكواد الجافا إسكريبتJAVA-
انتقل الى: