SAMURAI-LOGIC BLOG tag:www.samurai-logic.com,2008-03-29:/mt//1 2008-11-06T01:52:21Z 類い稀な突然変異系プログラマーのブログ・・・Pascalをマスターした世代前のプログラマが独り言を呟きながら１０数年ぶりにプログラムコードを書き出す。JavaScript 100% Stand alone のソースコードを公開開始！歴代の不滅のアルゴリズムの紹介は身近で解り易いExcel VBAを選択。 子曰わく、黙してこれを識し、学びて厭わず、人を誨えて倦まず。（孔子） Movable Type Pro 4.21-ja Search Gadget (Google Ajax Search API) tag:www.samurai-logic.com,2008:/mt//1.145 2008-11-03T03:37:31Z 2008-11-06T01:52:21Z ブログやウェブサイトの狭いスペースでも設置できる検索ガジェットです。小さくてもウェブ検索、イメージ検索、ビデオ検索、本の検索などが出来る優れものです。幅は290px、高さは180px に設定しています。高さは調整可能です。 ガジェットのコードです（コピペ用）。 ... WebMaster ブログやウェブサイトの狭いスペースでも設置できる検索ガジェットです。小さくてもウェブ検索、イメージ検索、ビデオ検索、本の検索などが出来る優れものです。幅は290px、高さは180px に設定しています。高さは調整可能です。 ガジェットのコードです（コピペ用）。

]]> Freedom and Equality - 自由と平等、心と知識、システムと歯車 tag:www.samurai-logic.com,2008:/mt//1.141 2008-10-15T09:09:38Z 2008-10-29T01:13:06Z 最近の独り言・・・ 自由と平等 人が怒るのは「平等性」を害されたとき。 関係の「平等性」を害してはいけない。 人が悲しむのは「自由」を失ったとき。 そして、人が喜ぶのは「自由」を得たとき。 労働は、人に「自由｣をあたえること。それによって対価相当の「自由」が与えられる。 自由の種類は選べない。 「自由」が欲しければ、多くの人に「自由｣を与えることだ。 人は人間性(自由と本質的平等)を失ってはいけ... WebMaster

最近の独り言・・・



自由と平等

人が怒るのは「平等性」を害されたとき。 関係の「平等性」を害してはいけない。
人が悲しむのは「自由」を失ったとき。 そして、人が喜ぶのは「自由」を得たとき。
労働は、人に「自由｣をあたえること。それによって対価相当の「自由」が与えられる。 自由の種類は選べない。
「自由」が欲しければ、多くの人に「自由｣を与えることだ。
人は人間性(自由と本質的平等)を失ってはいけない。
自分勝手と「自由」は全く違う。また、理に適った民主主義国家では、「自由と平等」は憲法で保障されている。

心とは

心とは、思考の流れ。
思考の流れによって生じる気持ち、感情・・・。
そして人の心は胸に感じるので、胸の感触を大事にする。

知識と理解

知識は重要ではない。
覚えればいいという考えは危険である。柔軟に理解を深めることが重要。
知識による障害は、型にはまった言葉や行動になって現われる。
無駄な知識によって束縛を受けると、同じ言葉や行動を繰り返し、機械的なマニュアル人間なってしまう。

システムと歯車

人や組織は社会のシステムの中で歯車の役割を持ち、その軸の役割を持つのが法則やアルゴリズム。

歯車は他の歯車とかみ合うこと(動力を持つこと)で生産性を持つようになる。もし軸がぶれてしまうと他の歯車に影響する。小さい歯車が安定性を失えばシステムからはじき出されるだけだが、大きな歯車が不安定になるとシステム全体に多大な影響を及ぼす。

世界は定量で構成されていて、何かが増加することも、減少することもあり得ない。

「不安定な現象」と「不動の真実」は全く違う。不安定なものに心を振り回されてはいけない。

]]> Google Map and Ajax API Search Gadget tag:www.samurai-logic.com,2008:/mt//1.140 2008-10-11T09:37:49Z 2008-11-03T00:09:42Z 何らかの変更があったためコントロールが表示されなくなっていました。 11月3日 : 地図タイプをノーマルに設定したら回復しました。 Google Map と Ajax API Search 兼ねたガジェットです。左のガジェットはシンプル（Simple version）な方のガジェットです。クリックすると移動可能なマーカーが表示されます。ドラッグズームや経度、緯度などがクリックで表示されるFull... WebMaster

何らかの変更があったためコントロールが表示されなくなっていました。
11月3日 : 地図タイプをノーマルに設定したら回復しました。 		Google Map と Ajax API Search 兼ねたガジェットです。左のガジェットはシンプル（Simple version）な方のガジェットです。クリックすると移動可能なマーカーが表示されます。ドラッグズームや経度、緯度などがクリックで表示されるFull option バージョンもあります。 地図の左下の方にある小さいボタンを押すと上に検索ボックスが表示されます。もう一度押すと非表示になります。このガジェット一つで地図検索からウェブ、画像、動画、ブログ、本などのあらゆる検索が可能です。

下にある検索はグーグルローカルマップ検索です。地図上のレストラン、ホテルなどを様々な検索が出来ます。検索ボックスに「東京　ホテル」と書き込めば地域のホテルのマップ、住所等の情報が表示されます。

Full Option version:

Simple version:



これらのコードの幅は、420px と設定されています。大きさはブログやサイトのスペースに応じて設定してください。（w=420 の部分を変更すればOKです。）
このガジェットはiframeで生成されています。グーグルでカスタマイズした場合は、IEでY軸のスクロールが出来なくなります。

]]> JS Text Translation - Google gadget (翻訳ガジェット) tag:www.samurai-logic.com,2008:/mt//1.139 2008-10-09T23:46:25Z 2008-12-31T15:13:49Z Google の提供している Google Ajax Language API を利用した翻訳ガジェットです。現在35カ国語の言語の翻訳が出来ます。 Google Codeページ 言語選択はセレクトメニューのオプションが35 （言語）もあるので、マウスホイールで選択出来るようにしました。一応クッキーを使って最後に翻訳した言語を次回読み出したときに表示できるようにしてます。長い文章の翻訳はまだ出来... WebMaster

Google の提供している Google Ajax Language API を利用した翻訳ガジェットです。現在35カ国語の言語の翻訳が出来ます。

Google Codeページ

言語選択はセレクトメニューのオプションが35 （言語）もあるので、マウスホイールで選択出来るようにしました。一応クッキーを使って最後に翻訳した言語を次回読み出したときに表示できるようにしてます。長い文章の翻訳はまだ出来ませんが、日本語で200文字程度まで翻訳できます。英語は1000文字程度可能です。下のテキストエリアは翻訳した文章を再変換して文章の意味合いに違いがないか確認するためのものです。素早くできるので忙しい方は重宝すると思います。

]]>

this is Javascript code of mousewheel event that change options from select menu.

マウスホイールイベントを使ってセレクトメニューを変換するスクリプト

1    /**************************************************************
2     MouseWheel Event Listener Functions
3    
4     (C) 2007 Samurai-Logic.com
5    ***************************************************************/
6    
7    function load(){
8       if(/msie|chrome|opera/i.test(navigator.userAgent)){
9        window.onmousewheel=document.onmousewheel= showTime;
10       document.onmousemove = musMove;
11      }
12      else if(/apple/i.test(navigator.userAgent)){ 
13       window.addEventListener( "mousewheel", showTime, false );
14        window.addEventListener("mousemove", musMove,true);
15      } 
16      else if(/gecko/i.test(navigator.userAgent)){
17       window.addEventListener( "DOMMouseScroll", showTime, false );
18        window.addEventListener("mousemove", musMove,true);
19      }
20   
21   }
22   
23   function musMove(e){
24       if (document.all) //IE 
25       { x= document.body.scrollLeft+event.clientX; y= document.body.scrollTop+event.clientY; }
26       else /*if(document.getElementById)*/ { x= e.pageX;  y= e.pageY;}
27   }
28   
29   function showTime(e){
30       //if(mouse) return; mouse=true; 
31       var delta;
32       if(window.event && window.event.wheelDelta) delta = window.event.wheelDelta;
33       else if(e.wheelDalta) delta = e.wheelDelta;
34       else delta = -(e.detail);  //Mozilla  
35   
36       delta = (delta<0)? -1 : 1;
37       
38       //temp=document.getElementById("fs");  
39       //var pointL=eval((temp.style.left).replace(/px/,""));    //find out left of fs 
40   
41       if(x>=208)        {el=document.getElementById("fs"); temp=0;}
42       else if(y>234 && x<100)    {el=document.getElementById("src2");temp=5;}
43       else if(y>234)        {el=document.getElementById("dst2");temp=4;}
44       else if(x<100)        {el=document.getElementById("src");temp=2;}
45       else if(y<31)        {el=document.getElementById("ff"); temp=1;}
46       else if(y>134)        {el=document.getElementById("dst");temp=3;}
47       else return;
48   
49       eL=eval((el.style.left).replace(/px/,""));
50       eW=eval(parseInt((el.style.width).replace(/px/,"")) + eL);
51       eT=eval((el.style.top).replace(/px/,""));
52       eH=eval(parseInt((el.style.height).replace(/px/,"")) + eT);
53   
54       if((x<eW && x>eL && y<eH && y>eT)){
55          stopDefault(e); 
56          var i=el.selectedIndex;
57          el.selectedIndex=i+delta;
58   
59          if(temp==0) $fs(el);
60          else if(temp==1) $ff(el);
61          else if(temp==2) {var src=$id("src").value;  src.selectedIndex+=delta;}
62          else if(temp==3) {var dst=$id("dst").value;  dst.selectedIndex+=delta;}
63          else if(temp==4) {var dst=$id("dst2").value; dst.selectedIndex+=delta;}
64          else if(temp==5) {var src=$id("src2").value; src.selectedIndex+=delta;}
65       }
66       return;
67   }
68   
69   function stopDefault(e) { // stop default mousewheel event 
70         if (document.all) { //IE 
71               event.returnValue = false;
72               event.cancelBubble = true;
73         } else {
74             if(e.stopPropagation){ e.stopPropagation(); } 
75             if(e.preventDefault) { e.preventDefault();  }           
76         }
77       return false;
78   }
79   

Gadget code : Google Ajax Language API

1    /*-------------------------------------------------*/
2        Gadget code : Google Ajax Language API
3        8 Oct. 2008 Samurai-logic.com
4    /*-------------------------------------------------*/
5        google.load("language", "1");
6        google.setOnLoadCallback(init);
7    
8        function init() {
9        var src  = $id('src');
10       var src2 = $id('src2');
11       var dst  = $id('dst');
12       var dst2 = $id('dst2');
13       var i=0;
14   
15         for (l in google.language.Languages) {
16       var lng = l.charAt(0)+(l.toLowerCase()).substring(1,l.length);//.toLowerCase(); 
17   
18       var lngCode = google.language.Languages[l];
19   
20       if (google.language.isTranslatable(lngCode)){
21           src.options.add(new Option(lng, lngCode));
22           src2.options.add(new Option(lng, lngCode));
23           dst.options.add(new Option(lng, lngCode));
24           dst2.options.add(new Option(lng, lngCode));
25           }
26         }
27       if (navigator.cookieEnabled){
28         var txt=document.cookie;        // "formula=10/19/19/10;" 
29         var txt=txt.replace(/[^\/\d]/g,"");
30         cx=new Array();  cx=txt.split("/");
31       }
32   
33       if(!/\d/.test(cx[0]))cx[0]=10;  //10=en, 19=ja 
34       if(!/\d/.test(cx[1]))cx[1]=19;
35       if(!/\d/.test(cx[2]))cx[2]=19;
36       if(!/\d/.test(cx[3]))cx[3]=10;
37   
38       src.selectedIndex=parseInt(cx[0]);  // selectIndex is index number of select 
39       dst.selectedIndex=parseInt(cx[1]);
40       src2.selectedIndex=parseInt(cx[2]);
41       dst2.selectedIndex=parseInt(cx[3]);
42   
43       google.language.getBranding('branding');//google logo 
44       submitChange(1);    //1=true ==> area1 
45       }
46   
47       function submitChange(num) {
48       if(num){
49           var temp = new String(tt[N]);    //temp=string value of current textarea 
50           var val  = $id(temp).value;    //val = data in current textarea 
51           var src  = $id('src').value;    //src language 
52           var dest = $id('dst').value;    //destination language 
53           google.language.translate(val, src, dest, $Res);//HTTP_Request 
54       }else{
55           var val  = $id("area1").value;    //area1 is 2nd textarea 
56           var src  = $id('src2').value;
57           var dest = $id('dst2').value;
58           google.language.translate(val, src, dest, $Res2);//need another function($Res) 
59       }
60       Save();        //save src, dst to cookie 
61       return false;
62       }
63   
64       function $Res(result) {
65       var res = $id("area1");
66       if (result.translation) {
67         var str = result.translation.replace(/&#39;|&#039(\;)?/g,"'").replace(/&quot;/g,"\"").replace(/&amp;/g,"&"); //.replace('>', '&gt;').replace('<', '&lt;'); 
68         res.value = str;
69       }else{
70         res.value = "Error Translating";
71       }
72       }
73   
74       function $Res2(result) {
75       var res = $id("area2");
76       if (result.translation) {
77         var str = result.translation.replace(/&#39;|&#039(\;)?/g,"'").replace(/&quot;/g,"\"").replace(/&amp;/g,"&"); //.replace('>', '&gt;').replace('<', '&lt;'); 
78         res.value = str;
79       }else{
80         res.value = "Error Translating";
81       }
82       }
83   

]]> Javascript Base64 encoder & decoder(Google Gadget) tag:www.samurai-logic.com,2008:/mt//1.138 2008-10-04T21:22:46Z 2008-10-11T22:24:18Z Javascript base64 encoder and decoder. 手軽に Base64 エンコード（暗号化） &amp デコード（解読）ができる Google gadget を作りました。 使い方は、上のテキストエリアに貼り付けてボタンを押すだけです。貼り付けるエリアは、data1,data2, data3, data4 の4ヶ所あります。ソースコードもBase64 function... WebMaster

Javascript base64 encoder and decoder.

手軽に Base64 エンコード（暗号化） & デコード（解読）ができる Google gadget を作りました。

使い方は、上のテキストエリアに貼り付けてボタンを押すだけです。貼り付けるエリアは、data1,data2, data3, data4 の4ヶ所あります。ソースコードもBase64 function の中に文字コード変換のスクリプトを書いてます。下に書いている Javascript のソースコードもシンプルにしましたので(120行くらい)、少しは分かりやすいと思います。対応文字コードは1～3バイトまでです。4バイト以上はまず使うことはないので一般的にテキストエリアに貼り付ける範囲内のものはBase64暗号化・解読が可能です。

    1バイト
  • ASCIIの全て(実装系によりJIS X 0201/Windows-31Jの当該エリアの場合あり)
      • 2バイト
  • JIS X 0208の非漢字の一部
      • 3バイト
  • JIS X 0201の8ビット文字(半角カタカナ)
  • JIS X 0208の漢字エリアの全て
  • JIS X 0212の漢字エリアの全て
  • JIS X 0213の第3・4水準漢字の一部
  • Windows-31Jの拡張文字エリア全て
    • 『ウィキペディア（Wikipedia）』

    Google Gadget の貼り付けコードです。ブログやウェブページに貼り付けられます。

    Source code of Base64_encode, Base64_decode Javascript function.

    1    /****************************************************************************
    2     Javascript Base64 encoder and decoder
    3    
    4     4 Oct. 2008 Samurai-Logic.com
    5    ****************************************************************************/
    6    
    7    var chrs="ABCDEFGHIJKLMNOPQRSTUVWXYZ";    //grobal variable 
    8    
    9    function Base64_encode(str2){
    10   
    11   chrs+=chrs.toLowerCase()+"0123456789+/";
    12   
    13   str2=str2.replace(/\n/g,""); 
    14   
    15   str=[];
    16   var out="";
    17   var j=str2.length;
    18   var z=0;
    19   /*---------------------------------------------------------
    20    In case char is more than 2 bite
    21   ----------------------------------------------------------*/
    22       for (var i=0; z<j;i++) {
    23          var x=str2.charCodeAt(z);
    24   
    25           if(x<128) str[i]=str2.charCodeAt(z);    //  1 Bite(0x00-0x7f) 
    26   
    27           else if(x<2048) {            //  2 Bites(0x80-0x7ff) 
    28           str[i++] = ((192) | (x >> 6));
    29           str[i] = ((128) | (x & 63));
    30   
    31               }else if (x < 65536){        //  3 Bites(0x800-0xffff)=2sup16 
    32                   str[i++] = ((224) | ( x >> 12 ));
    33                   str[i++] = ((128) | ((x >> 6 ) & 63)); //3f=63 
    34                   str[i] = ((128) | ( x & 63));
    35   
    36               }else{                // 4 Bites return; 
    37           out=("4 Bites character is not suported"); return; //will never happen here 
    38               }
    39       z++;
    40       }
    41   
    42   /*------------------------------------------------------
    43    Base64 encode
    44   -------------------------------------------------------*/
    45   
    46       var temp=str.length;
    47   
    48       for (var i = 0; i < temp; i += 3){
    49   
    50       var len = ((temp-i)>=3)? 3 : temp-i;
    51   
    52           out += chrs.charAt((str[i] >> 2))
    53   
    54           if (len == 1){        //1 bite 
    55               out += chrs.charAt((str[i] & 3) << 4) + "==";
    56   
    57           } else if (len == 2) {    //2 bites 
    58               out    += chrs.charAt(((str[i] & 3) << 4) | (str[i+1] >> 4))
    59                   +  chrs.charAt ((str[i+1] & 15) << 2) + "=";
    60   
    61           } else {        //3 bites 
    62               out    += chrs.charAt(((str[i] & 3) << 4) | (str[i+1] >> 4))
    63                   +  chrs.charAt(((str[i+1] & 15) << 2) | (str[i+2] >> 6))
    64                   +  chrs.charAt ((str[i+2] & 63));    /* NOTE:63=0x3f, 15=0xf . */
    65           }
    66       }
    67   return out;
    68   }
    69   

    ]]>     Javascript Compressor (Modified 1 Oct. 2008) tag:www.samurai-logic.com,2008:/mt//1.135 2008-09-29T22:06:43Z 2008-10-15T22:31:06Z Javascript Compressor がほぼ完成しました。正規表現のエラーチェックと括弧の数を数えてエラーがある場合に表示されます。Compression Ratio も表示させるようにしました。 以前の記事を改良しました。 正規表現部分の[ ] 内の"/" とスペースがあった場合に圧縮時に（スペースがある場合のみ）スペースが消てしまうので今回は、ループさせてRegExp をecmasc... WebMaster Javascript Compressor がほぼ完成しました。正規表現のエラーチェックと括弧の数を数えてエラーがある場合に表示されます。Compression Ratio も表示させるようにしました。

    以前の記事を改良しました。

    正規表現部分の[ ] 内の"/" とスペースがあった場合に圧縮時に（スペースがある場合のみ）スペースが消てしまうので今回は、ループさせてRegExp をecmascript 評価 (eval)してチェックするようにしました。
    例： exp=/[ / ]/;
    通常は、exp=/[ \/ ]/; と書くのですが、実際に正規表現の [ ] 内に"/" があってもjavascript ではエラーになりません。普通に書くと、/ ==> \/, space ==> \s となるのですが、文字コードなどが絡んでどうしても特殊な書き方が必要な例もあるかもしれないのでそれに対応しました。Javascript のコードはとても柔軟性が高いのでまだ100%とは言えないかもしれませんが、一般的なJavascriptのコードではエラーはないと思います。

    また今回、Javascript Code Prettifier もセレクトメニューに追加しました。

    こちらの記事に詳細があります。使い方はただ貼り付けるだけなので簡単です。（js ファイルなどのセットアップせずに何ヶ所でも貼り付けられます。）

    見た目は下にあるJavascript compressor のソースコードのようになります。

    Google Gadget の貼り付けコードです。ブログやウェブページに貼り付けられます。

    Source code of modified Javascript Compressor function.

    Modified on 1 Oct. 2008

    1    /****************************************************************
    2     2008 (C)samurai-logic.com
    3    
    4     Javascript Compressor
    5    
    6     Last Modified 1 Oct. 2008
    7    ****************************************************************/
    8    function $compress(str){
    9    
    10   var Size=str.length;
    11   
    12   //if(/\n/g.test(str)) return("no end of line"); 
    13   
    14   str=str.replace(/\t+/g," ");
    15   
    16   Reg=/([^\d\w]\n[^\d\w]|[^\d\w]\s[^\d\w]|[\d\w]\s[^\d\w\$\_\#]|[^\d\w]\s[\d\w])/;
    17   
    18   //Exp=/[^\\]\/[^\/]*([\s\,\;]*)((\,\s*(\"|\')|(\w+)\s*\(\s*\/*)[\s\S]+|\/\/[\s\S]+|\/\*[\s\S]+|\s{2,}[\s\S]+|\s*)\n*/; 
    19   //Exp=/[^\\]\/([^\/])?(\s)*(([\,\s]*(\"|\')|(\w+)\s*\(\s*\/*)[\s\S]+|\/\/[\s\S]+|\/\*[\s\S]+|\s{2,}[\s\S]+|\s*)\n*/; 
    20   
    21   //Basic Exp 
    22   Exp=/[^\\]\/([^\/])/;
    23   
    24   chr=/(\(|\=|\[|\:|\||\&|\!|\,)/; // new reg 
    25   
    26   //d_q=/([^\\]\"[^\"]*[^\:]|[^\"]\"[\s]*[\:\,\}\]\)\;\.])/; 
    27   //s_q=/([^\\]\'[^\']*[^\:]|[^\']\'[\s]*[\:\,\}\]\)\;\.])/; 
    28   //d_q=/([^\\]\"|[^\"]\")/; 
    29   //s_q=/([^\\]\'|[^\']\')/; 
    30   
    31   //modified 1 Oct. 2008  don't need to replace \\\" and \\\'... 
    32   d_q=/[^\\]\"/; //replace(/\\\\|\\\"/g,"xx") temp before search(d_q) 
    33   s_q=/[^\\]\'/; //replace(/\\\\|\\\'/g,"xx") temp before search(s_q) 
    34   
    35   bracket=new Array();
    36   
    37   bracket[0]=0; bracket[1]=0; bracket[2]=0; bracket[3]="";
    38   
    39   var CODE  = "";  
    40   var cmt   = false;
    41   var arg   = -1;
    42   var pos = end = 0;
    43   var last=" ";
    44   var temp="";
    45   var LEN=str.length;
    46   var retrn = false; // for regexp "return /pat/.test()" 
    47   
    48       while (pos >= 0){
    49       var key_q = str.charAt(pos);
    50       var key_c = str.substr(pos,2);
    51       var key_r = last + key_c;
    52   
    53       if((pos>6)&&(str.substr(pos-6,6)=="return")&&(/^[\s\n]*\/[^\/\*]/.test(str.substring(pos,LEN))))retrn=true;
    54   
    55       if (key_q=="'")          { arg = 0; pos++; }     //find pos of keyword ' 
    56       else if (key_q=='"')  { arg = 1; pos++; }     //find pos of keyword " 
    57       else if ((key_q=='/') && (key_c!="//") && (key_c!="/*") && ((chr.test(last) || (retrn))))
    58                     { arg = 4; pos++;  }     //find pos of keyword / 
    59       else if (key_c=="//") { arg = 2; pos+=2; }    //find pos of keyword // 
    60       else if (key_c=="/*") { arg = 3; pos+=2; }    //find pos of keyword /* 
    61       else              { arg =-1; pos++; }
    62   
    63       if (arg>=0){    //if keyword is found 
    64   
    65          if      (arg==0) { temp=(str.substring(pos-1, LEN).replace(/\\\\|\\\"/g,"xx")); end = temp.search(s_q)+pos; temp=null;}
    66          else if (arg==1) { temp=(str.substring(pos-1, LEN).replace(/\\\\|\\\'/g,"xx")); end = temp.search(d_q)+pos; temp=null;}
    67   
    68          else if (arg==4) { var eol  = str.indexOf("\n", pos);    // find end of line 
    69                     if(eol==-1){return(CODE+"\nerror : no end of line");}
    70                     var temp = next = (str.substring(pos-1,eol+2).replace(/\\\\/g,"xx"));    // end+2 ==> \n 
    71                     end = 0;    var t_l=temp.length-2; retrn=false; 
    72   
    73                   while(end<t_l-1){ //(str.substring(pos-1,end+1))==> /pat/ 
    74               
    75                      var isReg=true;
    76   
    77                      next=(temp.substring(end,t_l+1)); // store temp to next 
    78   
    79                        end=parseInt(end+next.search(Exp)+2); //alert("next="+next); //find next key / 
    80   
    81                      try{ eval(temp.substring(0,end));}catch(e){isReg=false; var err=(e);}
    82   
    83                      if(isReg) break;
    84                   }
    85   
    86                   end=parseInt(end+pos-2); temp=null; next=null;
    87   
    88                     if(!(isReg)){bracket[3]+=err+" : "+(str.substring(pos-1,end+1))+" pos ="+pos;}
    89                    }
    90       
    91          else if (arg==2) { end = str.indexOf("\n", pos);   pos--; cmt = true; }
    92   
    93          else    /*arg==3*/  { end = str.indexOf("*/", pos); pos--; end++; //pos-- because 2 char "/*" 
    94                          if (end == 0) cmt = false; //if not found(avoid error) 
    95                          else         cmt = true; }
    96   
    97          if (end <= 0) end=str.length-1; end++;
    98   
    99          if (cmt==false) CODE += str.substring(pos-1,end);//alert(str.substring(pos-1,end+1)); 
    100  
    101         pos=end; //if(arg==4) pos++; // end=pos at "/" so add 1 
    102  
    103         cmt=false;  //at last, end up with pos=0  
    104  
    105      }else{ // else keyword is not found 
    106  
    107        if((last==";") && (key_q=="}")){ key_q="/**/"; bracket[1]--;} //replace(/\;\}/g,"}"); 
    108  
    109         if (!(Reg.test(key_r))) { CODE += key_q; last=key_q;}
    110  
    111         switch(key_q){
    112          case "(" : bracket[0]++; break;
    113          case ")" : bracket[0]--; break;
    114          case "{" : bracket[1]++; break;
    115          case "}" : bracket[1]--; break;
    116          case "[" : bracket[2]++; break;
    117          case "]" : bracket[2]--; 
    118         }
    119          if(pos>=str.length) pos=-1;
    120      } 
    121     }
    122    str=null;
    123  
    124    CODE=CODE.replace(/^\s+/,"").replace(/[\s\n]*$/,"").replace(/\;\/\*\*\//g,"}");
    125  
    126    var j=CODE.length;
    127    var el=$id("ratio");//el.style.backgroundColor="#000"; 
    128    el.innerHTML="Compression Ratio:"+j+"/"+Size+"="+eval(j/Size).toFixed(5);
    129  
    130    var hr ="\n/*------------------------------------\n";
    131    var hr2="\n------------------------------------*/\n";
    132  
    133    if (eval(bracket[0]+bracket[1]+bracket[2])!=0) 
    134      CODE+=hr+"Check pair of brackets. \n () :"+bracket[0]+"; {} :"+bracket[1]+"; [] : "+bracket[2]+hr2;
    135    if (bracket[3]!="")
    136      CODE+=hr+"Check Syntax of RegExp. \n"+(bracket[3]).replace(/xx/g,"\\\\")+hr2;
    137  
    138    return(CODE);
    139  }
    140  

    Modified on 29 Sep. 2008

    1    /****************************************************************
    2     2008 (C)samurai-logic.com
    3    
    4    
    5     Javascript Compressor
    6    
    7     Last Modified 29 Sep. 2008
    8    ****************************************************************/
    9    function $compress(str){
    10   
    11   var Size=str.length;
    12   
    13   //if(/\n/g.test(str)) return("no end of line"); 
    14   
    15   str=str.replace(/\t+/g," ");
    16   
    17   Reg=/([^\d\w]\n[^\d\w]|[^\d\w]\s[^\d\w]|[\d\w]\s[^\d\w\$\_\#]|[^\d\w]\s[\d\w])/;
    18   
    19   //Exp=/[^\\]\/[^\/]*([\s\,\;]*)((\,\s*(\"|\')|(\w+)\s*\(\s*\/*)[\s\S]+|\/\/[\s\S]+|\/\*[\s\S]+|\s{2,}[\s\S]+|\s*)\n*/; 
    20   //Exp=/[^\\]\/([^\/])?(\s)*(([\,\s]*(\"|\')|(\w+)\s*\(\s*\/*)[\s\S]+|\/\/[\s\S]+|\/\*[\s\S]+|\s{2,}[\s\S]+|\s*)\n*/; 
    21   
    22   //Basic Exp 
    23   Exp=/[^\\]\/([^\/])/;
    24   
    25   chr=/(\(|\=|\[|\:|\||\&|\!|\,)/; // new reg 
    26   
    27   //these RegExp don't need to replace(/\\\\/g,"xx")...but just in case. 
    28   d_q=/([^\\]\"[^\"]*[^\:]|[^\"]\"[\s]*[\:\,\}\]\)\;\.])/;
    29   s_q=/([^\\]\'[^\']*[^\:]|[^\']\'[\s]*[\:\,\}\]\)\;\.])/;
    30   
    31   // Basic RegExp 
    32   //d_q=/([^\\]\"|[^\"]\")/; 
    33   //s_q=/([^\\]\'|[^\']\')/; 
    34   
    35   bracket=new Array();
    36   
    37   bracket[0]=0; bracket[1]=0; bracket[2]=0; bracket[3]="";
    38   
    39   var CODE  = "";        //new string for compressed code 
    40   var cmt   = false;    //cmt=true, char is comment.< -- > cmt=false, char is code. 
    41   var arg   = -1;        //arg decide the keyword to find 
    42   var pos = end = 0;    //pos = postion of open keyword, end = postion of close keyword 
    43   var last=" ";        //last is last char which store to CODE 
    44   var temp="";        //temp is to find another keyword 
    45   var LEN=str.length;
    46   var retrn = false;    // for regexp "return /pat/.test()" 
    47   
    48      /*-----------------------------------------------
    49    While loop begin. check each char in string
    50    ------------------------------------------------*/
    51       while (pos >= 0){
    52       var key_q = str.charAt(pos);    //keyword quot 
    53       var key_c = str.substr(pos,2);    //keyword comment 
    54       var key_r = last + key_c;    //keyword to test key_q is necessary 
    55   
    56       if((pos>6)&&(str.substr(pos-6,6)=="return")&&(/^[\s\n]*\/[^\/\*]/.test(str.substring(pos,LEN))))retrn=