外部変形は データのやり取りをテキストファイルで行うので プログラム言語は 自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。
tclshで文字を逆書きする
:tclshで文字を逆書きする
@echo off
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
copy jwc_temp.txt myfiles > nul
more +%%n %0 | tclsh - > jwc_temp.txt
)
goto:eof
REM #jww
REM #h3 範囲内の「文字」データのみを選択
REM #g1
REM #e
#!この次の行からプログラムを書いてください
set f [open myfiles]
foreach 0 [split [read $f] \n] {
switch -regexp -- $0 {
^hq { puts "hd"; continue }
^lg|^ly|^cn { puts $0; continue }
^c[hvsroptkz2] {
set i [string first \" $0]
set str [string range $0 [expr $i+1] end]
puts "[string range $0 0 $i][string reverse $str]"
}
}
}
close $f