بحث متقدم | التسجيل
الويب العربي
  تسجيل دخول
 
   
   

  ملاحظة
الموقع متاح للإطلاع والقراءة فقط، المشاركة والمواضيع الجديدة غير متاحة حالياً لحين تطوير الموقع.




الموقع متاح للإطلاع والقراءة فقط، المشاركة والمواضيع الجديدة غير متاحة حالياً لحين تطوير الموقع.

عـودة للخلف   الويب العربي المركز التعليمي المجاني قسم المنتديات

 
 
خيارات الموضوع طريقة العرض
  #1  
قديم 12-10-2007, 03:09 AM
nabduae nabduae غير متصل
عضو
 
تاريخ التسجيل: Aug 2007
مشاركة: 182
مستوى تقييم العضوية: 17
nabduae is on a distinguished road
الافتراضي

<script LANGUAGE="JavaScript">

/*
By Wee Family psweesam@singnet.com.sg <mailtosweesam@singnet.com.sg>
Featured on eqla3 soft (<http://eqla3soft.com>)
For this and over 400+ free scripts, visit <http://javascriptkit.com>
*/

function calc() {
first = dcidocument.loveform.name1.value.toUpperCase();
firstlength = dcidocument.loveform.name1.value.length;
second = dcidocument.loveform.name2.value.toUpperCase();
secondlength = dcidocument.loveform.name2.value.length;
var LoveCount=0;

for (Count=0; Count < firstlength; Count++) {



letter1=first.substring(Count,Count+1);

if (letter1=='L') LoveCount+=2;
if (letter1=='O') LoveCount+=2;
if (letter1=='V') LoveCount+=2;
if (letter1=='E') LoveCount+=2;
if (letter1=='Y') LoveCount+=3;
if (letter1=='O') LoveCount+=1;
if (letter1=='U') LoveCount+=3;
}


for (Count=0; Count < secondlength; Count++) {
letter2=second.substring(Count,Count+1);
if (letter2=='L') LoveCount+=2;
if (letter2=='O') LoveCount+=2;
if (letter2=='V') LoveCount+=2;
if (letter2=='E') LoveCount+=2;
if (letter2=='Y') LoveCount+=3;
if (letter2=='O') LoveCount+=1;
if (letter2=='U') LoveCount+=3;
}

amount=0;

if (LoveCount> 0) amount= 5-((firstlength+secondlength)/2)
if (LoveCount> 2) amount= 10-((firstlength+secondlength)/2)
if (LoveCount> 4) amount= 20-((firstlength+secondlength)/2)
if (LoveCount> 6) amount= 30-((firstlength+secondlength)/2)
if (LoveCount> 8) amount= 40-((firstlength+secondlength)/2)

if (LoveCount>10) amount= 50-((firstlength+secondlength)/2)

if (LoveCount>12) amount= 60-((firstlength+secondlength)/2)
if (LoveCount>14) amount= 70-((firstlength+secondlength)/2)
if (LoveCount>16) amount= 80-((firstlength+secondlength)/2)
if (LoveCount>18) amount= 90-((firstlength+secondlength)/2)
if (LoveCount>20) amount=100-((firstlength+secondlength)/2)
if (LoveCount>22) amount=110-((firstlength+secondlength)/2)
if (firstlength==0 || secondlength==0) amount= "Err";
if (amount < 0) amount= 0;
if (amount >99) amount=99;

dcidocument.loveform.output.value=amount+"%";



}


</script>


<center><table width=600 cellpadding=1 cellspacing=0 border=0><tr>
<td align=center valign=top>
</TD>
</TR></TABLE>
</CENTER>

<DIV align="center"><CENTER>
<p><b><span lang="ar-sa">اختبار الحب</span></b></p>
اختبار الحب بين شخصين ... اكتب اسم الشخص الاول ثم اسم الشخص الثاني واضفط على احسب
<span lang="ar-sa">... تكتب الأسماء بالحروف الإنجليزية فقط</span>.

<FORM name="loveform">

<P><INPUT value="name1" name="name1" type="text" size="20"> +
<INPUT

value="name2" name="name2" type="text" size="20"> = <INPUT value name="output" type="text" size="6"> <BR>

<BR>

<INPUT value="احســب" name="calculate" type="button" value="calculate"

onclick="calc()"> </P>



</FORM>

</CENTER></DIV>

<p align="center"><font face="arial" size="-2">This free script provided by<br>
</font>
<a href="http://www.eqla3soft.com"><span lang="en-us">
<font face="arial, helvetica" size="-2">eqla3soft.com</font></span></a></p>





 




قوانين المشاركة
لا يمكنك إضافة موضوع جديد
لا يمكنك الرد على المواضيع
لا يمكنك إضافة مرفقات
لا يمكنك تعديل مشاركاتك

كود vB متاح
كود [IMG] متاح
كود HTML مغلق
إنتقل إلى


جميع الأوقات بتوقيت مكة المكرمة. الساعة الآن » 01:36 PM.

Powered by vBulletin
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.


 
 »  خدمات البرمجة   »  رئيسية الدليل
  »  خدمات التصميم   »  الأمن والحماية
  »  الدعاية والتسويق
  »  الدعم والتطوير
  »  الشركات الرسمية
  »  حجز دومينات
  »  خدمات الإستضافة
 
 
  »  مكتبة الإستايلات   »  رئيسية المكتبة
  »  أكواد برمجية   »  أدوات الويب ماسترز
  »  مكتبة الهاكات   »  أدوات المصممين
  »  سكربتات متنوعة
  »  مجلات إلكترونية
  »  بلوكات متنوعة
  »  ثيمات مختلفة
 
 

صحيفة متخصصة في متابعة أخبار وجديد الإنترنت العربي
والحوارات الصحفية ومعلومات تقنية متنوعة .

   
 
 

للتواصل مع فريق عمل الويب العربي
يمكنك ذالك من خلال مركز الدعم والمساندة.

 الدعم الفني |  اعتماد العضويات |  قوانين الإنتساب |  إتفاقية الإستخدام |  أهداف الويب العربي |  دليل الشركات |  مكتبة الويب |  صحيفة الويب العربي |  الرئيسية