<لغة البرنامج النصي = "جافا سكريبت">
<!-- ابدأ
فار str_in;
var str_out = "";
فار num_in;
فار num_out = "";
var e = "أدخل النص!";
الدالة str_to_num(النموذج) {
num_out = "";
if(form.input.value == "") تنبيه(e);
آخر {
str_in = escape(form.input.value);
ل(i = 0; i < str_in. length; i++) {
num_out += str_in.charCodeAt(i) - 23;
}
form.output.value = num_out;
form.input.value = "";
}
}
الدالة num_to_str(النموذج) {
str_out = "";
إذا (form.output.value == "") تنبيه (هـ)
آخر {
num_out =form.output.value;
ل(i = 0; i < num_out.length; i += 2) {
num_in = parseInt(num_out.substr(i,[2])) + 23;
num_in = unescape('%' + num_in.toString(16));
str_out += num_in;
}
form.input.value = unescape(str_out);
form.output.value = "";
}
}
// النهاية -->
</script>
<المركز>
<اسم النموذج = نموذج مشفر>
<الجدول>
<تر>
<td محاذاة = المركز>
<اسم الإدخال = نوع الإدخال = حجم النص = 40 قيمة = "JavaScript Fairyland">
</TD>
<td محاذاة = المركز>
<نوع الإدخال=قيمة الزر = "<--" onClick="javascript:num_to_str(this.form)">
<ر>
<input type=button value="-->" onClick="javascript:str_to_num(this.form)">
</TD>
<td محاذاة = المركز>
<اسم الإدخال=نوع الإخراج=حجم النص=40>
</TD>
</tr>
</الجدول>
</النموذج>
</مركز>