dead
Code này mình fix không còn lỗi nữa. Các bạn dán vào wap mình là ok
<div class="phdr">Giải mã Morse</div>
<!--parser:xtscript-->
get str
var $text = $str
var $spc = call chr $val=32;
if $str !=
var $str = call str_replace $subject=$str;$search=$spc$spc;$replace=/;
var $str = call str_replace $subject=$str;$search=$spc;$replace=+;
var $str = call str_replace $subject=$str;$search=-----;$replace=0;
var $str = call str_replace $subject=$str;$search=----.;$replace=9;
var $str = call str_replace $subject=$str;$search=---..;$replace=8;
var $str = call str_replace $subject=$str;$search=--...;$replace=7;
var $str = call str_replace $subject=$str;$search=-....;$replace=6;
var $str = call str_replace $subject=$str;$search=.....;$replace=5;
var $str = call str_replace $subject=$str;$search=....-;$replace=4;
var $str = call str_replace $subject=$str;$search=...--;$replace=3;
var $str = call str_replace $subject=$str;$search=..---;$replace=2;
var $str = call str_replace $subject=$str;$search=....;$replace=H;
var $str = call str_replace $subject=$str;$search=...-;$replace=V;
var $str = call str_replace $subject=$str;$search=-.--;$replace=Y;
var $str = call str_replace $subject=$str;$search=-..-;$replace=X;
var $str = call str_replace $subject=$str;$search=.---;$replace=1;
var $str = call str_replace $subject=$str;$search=-...;$replace=B;
var $str = call str_replace $subject=$str;$search=--..;$replace=Z;
var $str = call str_replace $subject=$str;$search=--.-;$replace=Q;
var $str = call str_replace $subject=$str;$search=.---;$replace=J;
var $str = call str_replace $subject=$str;$search=.-..;$replace=L;
var $str = call str_replace $subject=$str;$search=-.-.;$replace=C;
var $str = call str_replace $subject=$str;$search=..-.;$replace=F;
var $str = call str_replace $subject=$str;$search=.--.;$replace=P;
var $str = call str_replace $subject=$str;$search=-.-;$replace=K;
var $str = call str_replace $subject=$str;$search=.--;$replace=W;
var $str = call str_replace $subject=$str;$search=---;$replace=O;
var $str = call str_replace $subject=$str;$search=-..;$replace=D;
var $str = call str_replace $subject=$str;$search=--.;$replace=G;
var $str = call str_replace $subject=$str;$search=.-.;$replace=Q;
var $str = call str_replace $subject=$str;$search=...;$replace=S;
var $str = call str_replace $subject=$str;$search=..-;$replace=U;
var $str = call str_replace $subject=$str;$search=..;$replace=I;
var $str = call str_replace $subject=$str;$search=.-;$replace=A;
var $str = call str_replace $subject=$str;$search=-.;$replace=N;
var $str = call str_replace $subject=$str;$search=--;$replace=M;
var $str = call str_replace $subject=$str;$search=.;$replace=E;
var $str = call str_replace $subject=$str;$search=-;$replace=T;
var $str = call str_replace $subject=$str;$search=/;$replace=$spc;
var $str = call str_replace $subject=$str;$search=+;$replace=;
print <div class="list1" align="center"><b style="color:red">$str</b></div>
endif
Print <div class="list1" align="center"><form method="post">Nhập mã Morse<br /><textarea name="str" cols="40" rows="10">$text</textarea> <br /> <input type="submit" value="Chuyển" /> </form></div>
<!--/parser:xtscript-->
<div class="rmenu" align="">
<b>Quy ước:</b><br>
- Dấu <b style="color:red">.</b> đại diện cho kí hiệu tít<br>
- Dấu <b style="color:red">-</b> đại diện cho kí hiệu te<br>
- Các <b style="color:red">kí tự</b> cách nhau bằng <b style="color:red">1</b> dấu cách (space)<br>
- Các <b style="color:red">từ</b> cách nhau bằng <b style="color:red">2</b> dấu cách (space)
</div>
Copy code