jw_cad 外部変形 - (1139) clispで環境変数を使う -

外部変形は データのやり取りをテキストファイルで行うので プログラム言語は 自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。

 

clisp環境変数を使う

:clisp環境変数を使う
@echo off
set str=ようこそ ありがとう
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
  more +%%n %0 | clisp -q > nul
)
goto:eof

REM #jww
REM #e

#!この次の行からプログラムを書いてください
( ;jwc_temp.txt へ 出力
  with-open-file (g "jwc_temp.txt" :direction :output)
  (format g "h#str=~a~%" (ext:getenv "str"))
)