外部変形を考える　＠ｓｂ

@REM 線･円の属性を表示する(mm)
@echo off
goto do%1
REM #jww
REM #cd
rem #hm |1)線属性(L)|2)円属性(R)|
rem #:1
REM #zz
rem #mc
REM #1ln指示線をｸﾘｯｸ
rem #c
REM #hr
REM #e
rem #:2
REM #zz
rem #mc
REM #1ci指示線をｸﾘｯｸ
rem #c
REM #hr
REM #e
:do1
copy jwc_temp.txt temp.txt > nul
del jwc_temp.txt
ruby -Ks 属性表示.rb temp.txt > jwc_temp.txt
goto end
:do2
copy jwc_temp.txt temp.txt > nul
del jwc_temp.txt
ruby -Ks 属性表示.rb temp.txt > jwc_temp.txt
goto end
:end

def main
zward=[]
while ARGF.gets
xy =split
if xy[0]=~/^z1/
zward<<"ﾊｯﾁ属性"
end
if xy[0]=~/^z2/
zward<<"図形属性"
end
if xy[0]=~/^z3/
zward<<"寸法属性"
end
if xy[0]=~/^msg/
zward<<"寸法図形属性"
end
if xy[0]=~/^z4/
zward<<"建具属性"
end
if xy[0]=~/^ql/
zward<<"曲線属性"
end
if xy[0]=~/^BL/
zward<<"ﾌﾞﾛｯｸ図形属性"
end
end
if zward.size==0
ward="属性はありません"
else
ward=zward.join("\s")
end
printf("h#%s\n",ward)
end
main()