Jw_cad 情報交換室−その3New

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

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

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


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

Re:こんな外部変形?
 kojima  - 18/8/6(月) 21:17 -
>また、部分出力して、その出力データを再度選択し、合算・集計することもできます。
>(後で、データ再確認も、"楽"かもです)

部分出力?
エリア単位の小集計のこと?
エリア1の少集計とエリア2の少集計を選択して、エリア1とエリア2の合計を書き出す
ということならば、以下の外変で可能。

1、最初に掲載した外変でエリアごとに集計結果を書き出す。(書式例 AW/1:5)
2、1の集計結果を以下の外変で集計結果を全て選択して合計を書き出す。
個人的には必要? と思いますが。


REM 円内毎の文字の集計の合計
@echo off
REM #jww
REM #cd
REM #bz
REM #h3
REM #1集計値記入点を指示してください
REM #k|1)計算式無(L)|2)計算式有(R)|/_/a
REM #e
copy jwc_temp.txt temp.txt > nul
ruby -x %~f0 temp.txt %1> jwc_temp.txt
pause
goto end
#!ruby -Ks
while ARGV.size>1
case argument=ARGV.pop
when /\/a/
siki=argument[2..-1].to_i
end
end
puts "bz"
en_a=[];hch=[];cn_a=[];n=0;ch_a=[]
while ARGF.gets
xy=$_.split
if xy[0]=~/^hp1/
hpx,hpy=xy[1].to_f,xy[2].to_f
end
if xy[0]=~/^hch/
xy.each{|item|hch<<item.to_f}
end
if xy[0]=~/^cn(\d+)$/
n += 1
cn=$1.to_i
if cn==0
moji_h=xy[2].to_f if n==1
else
moji_h=hch[cn] if n==1
end
end
if xy[0]=~/^ch/
moji=$'.chomp if $_=~/\"/
if moji=~/\:(\d+)$/
ch_a<<[$`,$1 .to_i]
end
end
end
ch_a.sort!{|a,b|a[0]<=>b[0]}
if ch_a.size==0
printf("h#該当する文字はありません")
exit
end
hash={}
ch_a.each{|a,b|
if hash.key?(a)
hash[a] += b
else
hash[a]=b
end
}
x=hpx;y=hpy
hash2={}
ch_a.each{|a,b|
if hash2.key?(a)
hash2[a] << "+#{b}"
else
hash2[a]= "#{a}:計#{hash[a]}=#{b}"
end
}
array=[]
if siki==1
hash.each{|a,b|array<<sprintf("%s:計%d\n",a,b)}
else
hash2.each{|a,b|array<<sprintf("%s\n",b)}
end
array.sort!
array.each{|item|
printf("ch %.11f %.11f 1 0 \"%s\n",x,y,item)
y -= moji_h+1
}
__END__
:end

引用なし

パスワード


<Mozilla/5.0 (Windows NT 10.0; WOW64; Trident/7.0; rv:11.0) like Gecko@ai126168021220.40.access-internet.ne.jp>
・ツリー全体表示

建具個数拾い外部変形の難しさ 外注図面屋 18/5/26(土) 12:06
Re:建具個数拾い外部変形の難しさ Fu〜 18/5/26(土) 14:17
Re:建具個数拾い外部変形の難しさ 外注図面屋 18/5/26(土) 17:33
Re:建具個数拾い外部変形の難しさ 牛渡 18/7/10(火) 11:27
図形の検索・置換 kojima 18/7/21(土) 11:22
Re:建具個数拾い外部変形の難しさ マッチンのパパ 18/8/3(金) 15:43
こんな外部変形? kojima 18/8/4(土) 18:05
Re:こんな外部変形? R.N 18/8/4(土) 19:39
Re:こんな外部変形? kojima 18/8/4(土) 19:53
Re:こんな外部変形? R.N 18/8/4(土) 20:45
Re:こんな外部変形? kojima 18/8/6(月) 21:17
表記に変更 kojima 18/8/4(土) 22:13

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

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