Jw_cad 情報交換室−その3New

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

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

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


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

Re:曖昧文字重複処理
 kojima  - 19/4/23(火) 12:42 -
batファイルにrubyスクリプトを記述するタイプの外部変形。
Rubyのインストールが必要。
※この掲示板からコピペすると、行頭に半角スペースが付加される場合があります。(行頭の半角スペースを削除してください)


@REM 重複した文字位置の整理
@echo off
REM #jww
REM #cd
REM #zz
REM #zc
REM #h3
REM #bz
REM #e
copy jwc_temp.txt temp.txt > nul
ruby -x %~f0 temp.txt > jwc_temp.txt
pause
goto end
#!ruby -Ks
include Math
def moji_zahyo(moji_x,moji_y,moji_l,moji_arg,moji_h,cc)
case cc
when 0
x,y=moji_x,moji_y
when 1
x=moji_x-moji_l/2*cos(moji_arg)
y=moji_y-moji_l/2*sin(moji_arg)
when 2
x=moji_x-moji_l*cos(moji_arg)
y=moji_y-moji_l*sin(moji_arg)
when 3
x=moji_x+moji_h/2*cos(moji_arg-PI/2)
y=moji_y+moji_h/2*sin(moji_arg-PI/2)
when 4
x=moji_x+moji_h/2*cos(moji_arg-PI/2)-moji_l/2*cos(moji_arg)
y=moji_y+moji_h/2*sin(moji_arg-PI/2)-moji_l/2*sin(moji_arg)
when 5
x=moji_x+moji_h/2*cos(moji_arg-PI/2)-moji_l*cos(moji_arg)
y=moji_y+moji_h/2*sin(moji_arg-PI/2)-moji_l*sin(moji_arg)
when 6
x=moji_x+moji_h*cos(moji_arg-PI/2)
y=moji_y+moji_h*sin(moji_arg-PI/2)
when 7
x=moji_x+moji_h*cos(moji_arg-PI/2)-moji_l/2*cos(moji_arg)
y=moji_y+moji_h*sin(moji_arg-PI/2)-moji_l/2*sin(moji_arg)
when8
x=moji_x+moji_h*cos(moji_arg-PI/2)-moji_l*cos(moji_arg)
y=moji_y+moji_h*sin(moji_arg-PI/2)-moji_l*sin(moji_arg)
end
return x,y
end
moji_zahyo_array=[];hch=[]
puts "hd","bz"
n1=0;n2=0
while ARGF.gets
xy=$_.split
if xy[0]=~/^hq/
elsif xy[0]=~/^hch/
xy.each{|item|hch<<item.to_f}
elsif xy[0]=~/^cn(\d+)/
print $_
cn=$1.to_i
case cn
when 0
moji_h=xy[2].to_f
else
moji_h=hch[cn]
end
elsif xy[0]=~/^cc/
print $_
cc=xy[0][2,1].to_i
elsif xy[0]=~/^ch/
n1 += 1
moji_x=xy[1].to_f
moji_y=xy[2].to_f
moji_l=hypot(xy[4].to_f,xy[3].to_f)
moji_arg=atan2(xy[4].to_f,xy[3].to_f)
x,y=moji_zahyo(moji_x,moji_y,moji_l,moji_arg,moji_h,cc)
if moji_zahyo_array.include?([x.round,y.round])
else
n2 += 1
print $_
moji_zahyo_array<<[x.round,y.round]
end
else
print $_
end
end
printf "h#削除された文字数#{n1-n2}\n"
__END__
:end


引用なし

パスワード


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

曖昧文字重複処理 補助員 19/4/23(火) 3:12
Re:曖昧文字重複処理 kojima 19/4/23(火) 12:42
Re:曖昧文字重複処理 柳 絮 19/4/23(火) 15:51
Re:曖昧文字重複処理 補助員 19/4/24(水) 1:57
Re:曖昧文字重複処理 kojima 19/4/24(水) 12:46
Re:曖昧文字重複処理 補助員 19/4/25(木) 13:52
発想の転換 文字をずらして中抜文字 kojima 19/5/25(土) 12:59
発想の転換 文字をずらして立体文字 kojima 19/5/25(土) 14:39

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

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