15 lines
236 B
Plaintext
15 lines
236 B
Plaintext
|
set echo 0
|
|||
|
exit 1 if {#} != 2
|
|||
|
|
|||
|
catenate "{1}" >"{2}"
|
|||
|
open -t "{2}"
|
|||
|
replace <20>:/<2F> / 'let op' "{2}"
|
|||
|
set i 0
|
|||
|
loop
|
|||
|
replace /,[ <20>n]+/ " = {i}<7D>nlet op" "{2}" || break
|
|||
|
evaluate i += 1
|
|||
|
end
|
|||
|
replace /<2F>[<5B> ]/:<3A> " = {i}<7D>n" "{2}"
|
|||
|
|
|||
|
close -y "{2}"
|