Water Sunlight

軽量プログラミングの文法 - JavaScript/Python

ユーザ用ツール

サイト用ツール

トレース:
sakura-macro

差分

このページの2つのバージョン間の差分を表示します。

この比較画面にリンクする

両方とも前のリビジョン 前のリビジョン
次のリビジョン 		前のリビジョン
sakura-macro [2022/01/13 09:35]
tanaka [cb_pic.js] 		sakura-macro [2022/02/01 10:31] (現在)
tanaka [visible_pack.js]
行 38: 行 38:
 // ----------------------------------------------- // -----------------------------------------------
 // １行の最大文字数を指定して改行を入れる // １行の最大文字数を指定して改行を入れる
-// 0x0Dが含まれる時は0x0Fに変換する(確認メッセージ有)+// ファイル名に.chopを付けて保存する（改行コードは入力する） 
 +// 0x0Dが含まれる時は確認メッセージ表示 
 +// [はい]：0x0D を 0x0F に変換する 
 +// [いいえ]: 何もしない 
 +// ※ 0x0D:'-'  0x0C:'+'  0x0F:' '
 // ----------------------------------------------- // -----------------------------------------------
 main(); main();
行 78: 行 82:
  // ペースト  // ペースト
  Editor.Paste(0);  Editor.Paste(0);
 +
 + // 改行コード
 + var code = parseInt(Editor.InputBox('[0]変換なし | [1]CRLF | [2]LF | [3]CR を入力して下さい。', 0));
 + if(isNaN(code)){
 + Editor.WarnMsg('改行コードの入力が無いので、ファイルを保存しません。');
 + return;
 + }
  
  // 名前を指定して保存  // 名前を指定して保存
  var fileName = Editor.GetFilename() + '.chop';  var fileName = Editor.GetFilename() + '.chop';
- Editor.FileSaveAs(fileName);+ Editor.FileSaveAs(fileName, 0, code);
 } }
 </sxh> </sxh>
行 186: 行 197:
 ===== xsort.js ===== ===== xsort.js =====
 <sxh javascript;title:xsort.js> <sxh javascript;title:xsort.js>
-TODO+// ----------------------------------------------- 
 +// 複数キーのソート 
 +// [入力方法]{開始位置}:{文字長},{開始位置}:{文字長},asc desc 
 +// ----------------------------------------------- 
 + 
 +main(); 
 + 
 +function main() { 
 + 
 + // キー 
 + var input = Editor.InputBox('{開始位置}:{文字長},{開始位置}:{文字長},asc desc'); 
 + if(!input) return; 
 + 
 + var keys = []; 
 + var inputWords = input.split(','); 
 + var orderWords = inputWords[inputWords.length-1].split(' '); 
 + if(inputWords.length - 1 == orderWords.length) { 
 + for(var i=0; i<inputWords.length-1; i++){ 
 + 
 + var words = inputWords[i].split(':'); 
 + if(words.length == 2){ 
 + var pos = 0; 
 + var len = 0; 
 + var order = ''; 
 +  
 + pos = parseInt(words[0]); 
 + len = parseInt(words[1]); 
 + order = orderWords[i]; 
 + 
 + var obj = new Key(pos, len, order); 
 + keys.push(obj); 
 + } 
 + } 
 + } else { 
 + Editor.ErrorMsg('キーの数とソート順の数があっていません。'); 
 + return; 
 + } 
 + 
 + // 行 
 + var items = []; 
 + for(var i=1; i<=Editor.GetLineCount(0); i++){ 
 + var line = GetLineStr(i); 
 + 
 + var itemKeys = []; 
 + for(var j=0; j<keys.length; j++){ 
 + itemKeys[j] = line.substr(keys[j].pos-1, keys[j].len); 
 + } 
 + 
 + var objItem = new Item(i, itemKeys); 
 + items.push(objItem); 
 + } 
 + 
 + // ソート 
 + items.sort(function(a, b) { 
 + 
 + for(var i=0; i<a.key.length; i++){ 
 +  
 + if(a.key[i] !== b.key[i]) { 
 + if (a.key[i] < b.key[i]) { 
 + return (keys[i].order.toUpperCase() == 'DESC') ? 1 : -1; 
 + } 
 + if (a.key[i] > b.key[i]) { 
 + return (keys[i].order.toUpperCase() == 'DESC') ? -1 : 1; 
 + } 
 + } 
 + } 
 +  
 + return 0; 
 + }); 
 + 
 + var sortTxt = ''; 
 + for(var i=0; i<items.length; i++){ 
 + sortTxt += GetLineStr(items[i].lineNo); 
 + } 
 +  
 + // 上書き 
 + Editor.SelectAll(); 
 + Editor.InsText(sortTxt); 
 +} 
 + 
 +function Key(pos, len, order) { 
 + this.pos = pos; 
 + this.len = len; 
 + this.order = order; 
 +} 
 + 
 +function Item(lineNo, key) { 
 + this.lineNo = lineNo; 
 + this.key = key; 
 +}
 </sxh> </sxh>
  
行 483: 行 583:
 // pic句のバイト数を集計 // pic句のバイト数を集計
 // PICTURE文字列がN, CR, DBはサポートしていません。 // PICTURE文字列がN, CR, DBはサポートしていません。
-// OCCURS と REDEFINES は出てきた数だけ数えます。+// REDEFINES と OCCURS は未サポートです。 
 +//  ・出現した時は警告を出します。 
 +//  ・出てきた数を数えて警告に表示します。
 // ----------------------------------------------- // -----------------------------------------------
    
行 826: 行 928:
  }  }
 } }
- + 
 +/** 
 + * オプション 
 + */ 
 +function getOption(option) { 
 + 
 + for(var index in option) { 
 + if(option[index]=='PACKED-DECIMAL' || option[index]=='COMP-3' || option[index]=='COMPUTATIONAL-3' 
 + || option[index]=='BINARY' || option[index]=='COMP'  || option[index]=='COMPUTATIONAL'){ 
 + return option[index]; 
 + } 
 + } 
 + return ''; 
 +} 
 /** /**
  * Pic配列を文字列に変換  * Pic配列を文字列に変換
行 839: 行 955:
  txt += '\t';  txt += '\t';
  txt += picArr[i].type;  txt += picArr[i].type;
 + var option = getOption(picArr[i].option)
 + if(option){
 + txt += ' ' + getOption(picArr[i].option);
 + }
  txt += '\t';  txt += '\t';
  txt += picArr[i].byte;  txt += picArr[i].byte;
行 853: 行 973:
  
 \\ \\
 +
sakura-macro.1642034132.txt.gz · 最終更新: 2022/01/13 09:35 by tanaka

ページ用ツール

特に明示されていない限り、本Wikiの内容は次のライセンスに従います： CC Attribution-Share Alike 4.0 International
CC Attribution-Share Alike 4.0 International Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki