莫尔斯电码

2008-10-02 10:23:00 | 【
请输入纯英文语句

在《无间道》里梁朝伟和黄秋生的秘密通话武器就是莫尔斯电码,本程序可以对纯英文字母进行莫尔斯电码翻译,非常酷哟

查看全部代码 View Code

第一步:
在<head>区添加以下代码

<SCRIPT LANGUAGE="JavaScript">

        /*****************************************************
         *  Share JavaScript (http://www.ShareJS.com)
         * 使用此脚本程序,请保留此声明
         * 获取此脚本以及更多的JavaScript程序,请访问 http://www.ShareJS.com
         ******************************************************/
    
<!-- Begin
function translate(form) {
letters = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ .,?:-!";
morse = new Array(
".-","-...","-.-.","-..",".","..-.",
"--.","....","..",".---","-.-",".-..",
"--","-.","---",".--.","--.-",".-.",
"...","-","..-","...-",".--","-..-",
"-.--","--..",".-","-...","-.-.","-..",
".","..-.","--.","....","..",".---",
"-.-",".-..","--","-.","---",".--.",
"--.-",".-.","...","-","..-","...-",
".--","-..-","-.--","--.."," ",".-.-.-",
"--..--","..--..","---...","-....-","!");

form.output.value = "";
var input = form.input.value;
output = "";
for(count = 0; count < input.length; count++) {
daChar = input.charAt(count);
for (i = 0; i < letters.length; i++) {
if (daChar == letters.charAt(i)) {
output += morse[i];
break;
      }
   }
}
form.output.value = output;
}
//  End -->
</script>



第二步:
在<body>区添加以下代码

<center>
<form>
<table>
<tr>
<td align=center>
请输入纯英文语句<br>
<textarea name=input cols=50 rows=4 wrap=physical />
</td>
</tr>
<tr>
<td align=center>
<input type=button value="翻译!" onClick="javascript:translate(this.form)">
</td>
</tr>
<tr>
<td align=center>
<textarea name=output cols=50 rows=4 wrap=physical />
</td>
</tr>
</table>
</form>
</center>

下载"莫尔斯电码"

  • 本地下载
  • 本地下载2
上一篇: KB和MB相互转换  
下一篇: ASCII 码转换器

相关资源