Jw_cad 相談室−その2 New

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

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

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


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

Re:色の違う文字の一括サイズ変更
 外変勉強中  - 22/6/29(水) 17:04 -
 AWKの外変が使える環境でしたらコピペして試してみて下さい。


--------文字一括倍率.bat---------ここから----------------
@REM 【文字一括倍率】
@echo off
REM #jww
REM #cd
REM #h3
REM #g1
REM #hc 【文字一括倍率】範囲選択
REM #c 文字幅 倍率 (無指定 1.0) : /_AW
REM #c 文字高 倍率 (無指定 1.0) : /_BH
REM #hr
REM #e

copy jwc_temp.txt temp.txt > nul
jgawk -f 文字一括倍率.awk temp.txt %1 %2 > jwc_temp.txt
--------文字一括倍率.bat---------ここまで----------------


#--------文字一括倍率.awk--------ここから--------------
BEGIN{
hw=1;
hh=1
print "hd"
lg_flag=0
ly_flag=0
cn_flag=0
for(i=2;i<=ARGC-1;i++){
if(ARGV[i]~/^AW/){ hw = substr(ARGV[i],3)*1}
if(ARGV[i]~/^BH/){ hh = substr(ARGV[i],3)*1}
ARGV[i]="";
}
}
/^lg/ {
print;
if(lg_flag==0){
first_lg=$0;
lg = toupper(substr($0,3));
lg_h = hexdec(lg)
}
lg_flag++
}
/^ly/ {
print;
if(ly_flag==0){
first_ly=$0;
ly = toupper(substr($0,3));
ly_h = hexdec(lg)
}
ly_flag++
}
/^hcw/{split($0,apw)}
/^hch/{split($0,aph)}
/^hcd/{split($0,apd)}
/^hcc/{split($0,apc)}
/^cn"/{print}
/^cn[1-9]/{
cn =substr($0,3)
pw=apw[cn+1];
ph=aph[cn+1];
pd=apd[cn+1];
pc=apc[cn+1];
printf("cn0 %g %g %g %d\n",pw*hw,ph*hh,pd*hw,pc);
if(cn_flag == 0){
first_cn=$0
}
cn_flag++
}
/^cn0/{
printf("%s %g %g %g %d\n",$1,$2*hw,$3*hh,$4*hw,$5);
}
/^c[hvsroptkz2]/{print}
#
END{
print first_lg
print first_ly
print first_cn
}
function hexdec(str){
gsub("A","10",str); gsub("B","11",str)
gsub("C","12",str); gsub("D","13",str)
gsub("E","14",str); gsub("F","15",str)
return(str)
}


引用なし

パスワード


<Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/103.0.0.0 Safari/537.36@p1439224-ipngn4401niigatani.niigata.ocn.ne.jp>
・ツリー全体表示

色の違う文字の一括サイズ変更 ジェネ 22/6/29(水) 10:48
Re:色の違う文字の一括サイズ変更 Since Dos 22/6/29(水) 14:46
Excel文字外変セット OM 22/7/12(火) 20:58
Re:Excel文字外変セット「文字サイズ一括変更 文字... Since Dos 22/7/12(火) 21:24
Re:Excel文字外変セット「文字サイズ一括変更 文字... OM 22/7/12(火) 21:52
Re:Excel文字外変セット「文字サイズ一括変更 文字... Since Dos 22/7/12(火) 22:46
Re:Excel文字外変セット「文字サイズ一括変更 文字... OM 22/7/12(火) 22:50
Re:Excel文字外変セット 文字サイズ一括変更 Since Dos 22/7/12(火) 23:26
Re:色の違う文字の一括サイズ変更 外変勉強中 22/6/29(水) 17:04
Re:色の違う文字の一括サイズ変更 ジェネ 22/6/30(木) 12:11
Re:色の違う文字の一括サイズ変更 外変勉強中 22/7/2(土) 16:47
Re:色の違う文字の一括サイズ変更 ジェネ 22/7/4(月) 10:44
Re:色の違う文字の一括サイズ変更 外変勉強中 22/7/4(月) 18:05
Re:色の違う文字の一括サイズ変更 ジェネ 22/7/5(火) 11:20
Re:色の違う文字の一括サイズ変更 外変勉強中 22/7/5(火) 13:43
Re:色の違う文字の一括サイズ変更 ジェネ 22/7/6(水) 13:34
Re:色の違う文字の一括サイズ変更 外変勉強中 22/7/6(水) 15:57
Re:色の違う文字の一括サイズ変更 外変勉強中 22/7/6(水) 16:18
Re:色の違う文字の一括サイズ変更 ジェネ 22/7/7(木) 10:15
Re:色の違う文字の一括サイズ変更 96saka 22/7/1(金) 2:09
Re:色の違う文字の一括サイズ変更 ジェネ 22/7/1(金) 10:30
Re:色の違う文字の一括サイズ変更 96saka 22/7/1(金) 17:16
Re:色の違う文字の一括サイズ変更 ジェネ 22/7/4(月) 10:57
Excel VBAで試しに作ってみました SAM 22/7/9(土) 21:10

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

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