Jw_cad 相談室−その2 New

 Jw_cad についての相談の場としてお使いください
情報の交換には Jw_cad 情報交換室 をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください

2009年9月以前の発言過去ログのページからご覧ください。

それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。


  新規投稿 ┃ツリー表示 ┃スレッド表示 ┃一覧表示 ┃トピック表示 ┃番号順表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
73 / 1497     ←次へ | 前へ→

Re:文字の小数点を丸めたい
 いっち  - 17/6/1(木) 22:54 -
▼R.Nさん:

R.Nさん、こんばんは。

> スレ主さんの要望は、
ちょっと分かりませんが、少数1位にした後、色も含めて文字種と一致したら、
それに代えた方がいいかなって気がします。
もう少し、弄っていました。
バグあったら、ごめんなさい。

@if(0==1) // 文字の小数点を丸める
@echo off
REM #jww
REM #cd
REM #h3
REM #hc文字を選択してください
REM #g0
REM #zz
REM #bz
REM #e
cscript //nologo //e:jscript %0
rem pause
goto:eof
@end
function myround(cn) {
var temp = cn.split(/\s+/);
for (var i = 1; i < temp.length - 1; i++) {
temp[i] = Math.round(parseFloat(temp[i]) * 10) / 10;
}
return temp.join(" ");
}
blnflg = false;
with (new ActiveXObject("Scripting.FileSystemObject")) {
g = CreateTextFile("myfiles");
f = OpenTextFile("jwc_temp.txt");
while (!f.AtEndOfLine) {
line = f.ReadLine();
if (blnflg) {
if (/^cn0/ .test(line)) {
myss = (myround(line));
for (var j = 0; j < dic.Count; j++) {
if (strItems[j] == myss) {
myss = strKeys[j];
break;
}
}
g.WriteLine(myss);
} else {
g.WriteLine(line);
}
} else {
if (/^hq/ .test(line)) {
g.WriteLine("hd");
} else {
g.WriteLine(line);
}
if (/^hcw/i.test(line)) {
hcw = line.split(/\s+/).slice(1, 11);
} else if (/^hch/i.test(line)) {
hch = line.split(/\s+/).slice(1, 11);
} else if (/^hcd/i.test(line)) {
hcd = line.split(/\s+/).slice(1, 11);
} else if (/^hcc/i.test(line)) {
hcc = line.split(/\s+/).slice(1, 11);
} else if (/^bz/i.test(line)) {
dic = new ActiveXObject("Scripting.Dictionary");
for (i = 0; i < hcw.length; i++) {
dic("cn" + (i + 1)) =
"cn0 " + hcw[i] + " " + hch[i] + " " + hcd[i] + " " + hcc[i];
}
strVBKeys = new VBArray(dic.Keys());
strVBItems = new VBArray(dic.Items());
strKeys = strVBKeys.toArray();
strItems = strVBItems.toArray();
blnflg = true;
}
}
}
f.Close();
g.Close();
CopyFile("myfiles", "jwc_temp.txt")
DeleteFile("myfiles")
}


引用なし

パスワード


<Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/58.0.3029.110 Safari/537.36@KD113151236026.ppp-bb.dion.ne.jp>
・ツリー全体表示

文字の小数点を丸めたい Ibuki 17/5/31(水) 10:01
Re:文字の小数点を丸めたい 柳 絮 17/5/31(水) 10:32
わかりづらいかもですので修正します 柳 絮 17/6/1(木) 8:22
Re:わかりづらいかもですので修正します Ibuki 17/6/1(木) 13:27
あは、そうでしたか! 柳 絮 17/6/1(木) 15:30
Re:文字の小数点を丸めたい R.N 17/5/31(水) 21:22
Re:文字の小数点を丸めたい Ibuki 17/6/1(木) 13:39
Re:文字の小数点を丸めたい R.N 17/6/1(木) 15:49
Re:文字の小数点を丸めたい 柳 絮 17/6/1(木) 19:24
Re:文字の小数点を丸めたい Ibuki 17/6/3(土) 20:23
Re:文字の小数点を丸めたい Ibuki 17/6/3(土) 20:15
Re:文字の小数点を丸めたい いっち 17/6/1(木) 20:21
Re:文字の小数点を丸めたい R.N 17/6/1(木) 21:38
Re:文字の小数点を丸めたい いっち 17/6/1(木) 22:54
Re:文字の小数点を丸めたい いっち 17/6/2(金) 0:20
Re:文字の小数点を丸めたい 柳 絮 17/6/2(金) 7:30
もうひとつの外部変形 いっち 17/6/2(金) 9:28
Re:もうひとつの外部変形 マチャプチャレ 17/6/3(土) 14:11
Re:もうひとつの外部変形 いっち 17/6/3(土) 17:03
Re:文字の小数点を丸めたい いっち 17/6/2(金) 17:50
Re:文字の小数点を丸めたい R.N 17/6/2(金) 19:21
Re:文字の小数点を丸めたい Ibuki 17/6/3(土) 20:39
Re:文字の小数点を丸めたい O.M 17/6/11(日) 6:30

73 / 1497     ←次へ | 前へ→
  新規投稿 ┃ツリー表示 ┃スレッド表示 ┃一覧表示 ┃トピック表示 ┃番号順表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
 391911
ページ:  ┃  記事番号:  

C-BOARD Moyuku v1.03b3
Jw_cad Copyright (C)1997-2016 Jiro Shimizu & Yoshifumi Tanaka