外部変形は データのやり取りをテキストファイルで行うので プログラム言語は 自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。
clispで文字を書く
:clispで文字を書く
@echo off
if not exist %~dpn0.lisp (
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
more +%%n %0 > %~dpn0.lisp
)
)
call %~dp0set "s" "%*" %~dpn0.txt
if not defined s set s=こんにちは
clisp %~dpn0.lisp
goto:eof
REM #jww
REM #0 位置を指示して下さい
REM #c 文字 =
REM #e
#!この次の行からプログラムを書いてください
(with-open-file (f "jwc_temp.txt" :direction :output)
(write-line (format nil "ch 0 0 1 0 \"~A" (ext:getenv "s")) f)
(close f)
)