外部変形は データのやり取りをテキストファイルで行うので プログラム言語は 自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。
rubyでソリッド図形の円環を描く
:rubyでソリッド図形の円環を描く
@echo off
set c=%*
if defined c call:set %c%
if exist %~dpn0.txt (
for /f "tokens=*" %%a in (%~dpn0.txt) do call:set %%a
)
if not defined w set w=1
if not defined r2 set r2=0.5
if defined c (
echo %w% %r2% > %~dpn0.txt
)
ruby -x %0 jwc_temp.txt
goto:eof
REM #jww
REM #1-%d 中心点を指示してください
REM #2%d 円周上の点を指示してください
REM #c 扁平率(0.1～10.0) w, 内円半径比 r2/r =
REM #e
:set
if not defined w set w=%1
if not defined r2 set r2=%2
goto:eof
#!ruby -Ks -an -i.bak
BEGIN { include Math }
case $_
when /^hk/ then hk = $F[1].to_f
when /^hp1/ then p1 = $F[1, 2].map { |x| x.to_f }
when /^hp2/ then p2 = $F[1, 2].map { |x| x.to_f }
x1, y1, x2, y2 = (p1 + p2)
r, g, b = 0, 128, 128
puts "lc10 %s" % [r + 256 * g + 256 * 256 * b]
r = hypot(x2 - x1, y2 - y1)
w = ENV["w"].to_f
d = hk * PI / 180
r2 = r * ENV["r2"].to_f
puts "so" + " %s %s" * 4 % [x1, y1, r, w, d, 0, 2 * PI, r2]
end
__END__
