Jw_cad 相談室−その2 New

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

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

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


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

Re:文字サイズ変更の外部変形を探しています。
 kojima  - 17/6/9(金) 22:05 -
▼kenjiさん:
>外部から頂いた他CADデータが沢山有り、文字サイズに関して変更枚数が多くて困っています。
> 以下の外部変形を御存じないでしょうか?
>
> 1.任意サイズ文字で、横幅を縦高に、縦高を横幅に、のように合わせられる。
> 2.文字のサイズを、1.2倍とか倍数を入力して変更する。
> 3.文字間隔だけ変更する。
>
> 宜しくお願い致します。

本当に実用的なのか? ですが、
横幅と縦高の入替、一括拡大、文字間隔だけの変更は可能です。

バッチファイルにRubyスクリプトを記述するタイプの外部変形です。
Rubyのインストール等の方法は割愛します。


@REM 文字の幅・高入替/一括拡大/間隔変更
@echo off
goto %1
REM #jww
REM #cd
REM #hm|1)幅・高入替(L)|2)一括拡大(R)|3)間隔変更|
REM #:1
REM #zz
REM #zc
REM #h3
REM #bz
REM #e
REM #:2
REM #zz
REM #zc
REM #h3
REM #c拡大率 無指定:1/_/a
REM #bz
REM #e
REM #:3
REM #zz
REM #zc
REM #h3
REM #c文字間隔(図寸) 無指定:0/_/a
REM #bz
REM #e
:1
echo h#1> test.txt
copy jwc_temp.txt temp.txt > nul
ruby -x %~f0 temp.txt > jwc_temp.txt
pause
goto end
:2
echo h#2> test.txt
copy jwc_temp.txt temp.txt > nul
ruby -x %~f0 temp.txt %2 > jwc_temp.txt
pause
goto end
:3
echo h#3> test.txt
copy jwc_temp.txt temp.txt > nul
ruby -x %~f0 temp.txt %2 > jwc_temp.txt
pause
goto end
#!ruby -Ks
def moji_a(file,hcw,hch,hcd,hcc)
f=open(file,"r")
while f.gets
xy=$_.split
if xy[0]=~/^hcw/
xy.each{|item|hcw<<item.to_f}
elsif xy[0]=~/^hch/
xy.each{|item|hch<<item.to_f}
elsif xy[0]=~/^hcd/
xy.each{|item|hcd<<item.to_f}
elsif xy[0]=~/^hcc/
xy.each{|item|hcc<<item.to_i}
end
end
f.close
end
def moji_syu(xy,hcw,hch,hcd,hcc)
if xy.size==1
i=xy[0][2..-1].to_i
moji_w=hcw[i]
moji_h=hch[i]
moji_d=hcd[i]
moji_c=hcc[i]
else
moji_w=xy[1].to_f
moji_h=xy[2].to_f
moji_d=xy[3].to_f
moji_c=xy[4].to_i
end
return moji_w,moji_h,moji_d,moji_c
end
spec=""
open("test.txt","r"){|f|spec=f.gets}
hcw=[];hch=[];hcd=[];hcc=[]
moji_a("temp.txt",hcw,hch,hcd,hcc)

puts "hd"
if spec=~/^h#1/
while ARGF.gets
xy=$_.split
if xy[0]=~/^hq/
elsif xy[0]=~/^cn(\d+)/
moji_w,moji_h,moji_d,moji_c=moji_syu(xy,hcw,hch,hcd,hcc)
puts "cn0 #{moji_h} #{moji_w} #{moji_d} #{moji_c}"
else
print $_
end
end
elsif spec=~/^h#2/
by=1.0
while ARGV.size>1
case argument=ARGV.pop
when /\/a/
by=argument[2..-1].to_f
end
end
while ARGF.gets
xy=$_.split
if xy[0]=~/^hq/
elsif xy[0]=~/^cn(\d+)/
moji_w,moji_h,moji_d,moji_c=moji_syu(xy,hcw,hch,hcd,hcc)
puts "cn0 #{moji_w*by} #{moji_h*by} #{moji_d*by} #{moji_c}"
else
print $_
end
end
else
moji_d2=0
while ARGV.size>1
case argument=ARGV.pop
when /\/a/
moji_d2=argument[2..-1].to_f
end
end
while ARGF.gets
xy=$_.split
if xy[0]=~/^hq/
elsif xy[0]=~/^cn(\d+)/
moji_w,moji_h,moji_d,moji_c=moji_syu(xy,hcw,hch,hcd,hcc)
puts "cn0 #{moji_w} #{moji_h} #{moji_d2} #{moji_c}"
else
print $_
end
end
end
__END__
:end


引用なし

パスワード


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

文字サイズ変更の外部変形を探しています。 kenji 17/6/8(木) 19:18
Re:文字サイズ変更の外部変形を探しています。 R.N 17/6/9(金) 20:07
Re:文字サイズ変更の外部変形を探しています。 kenji 17/6/10(土) 1:58
Re:文字サイズ変更の外部変形を探しています。 kojima 17/6/9(金) 22:05
Re:文字サイズ変更の外部変形を探しています。 kenji 17/6/10(土) 2:31
Re:文字サイズ変更の外部変形を探しています。 kojima 17/6/10(土) 20:04
Re:文字サイズ変更の外部変形を探しています。 O.M 17/6/11(日) 6:03

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

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