Added eval selection(#127)
This commit is contained in:
11
examples/projects/print-files.lisp
Normal file
11
examples/projects/print-files.lisp
Normal file
@@ -0,0 +1,11 @@
|
||||
(clear)
|
||||
|
||||
(defn print-file
|
||||
(name index)
|
||||
(fill
|
||||
(text 0
|
||||
(add
|
||||
(mul index 40) 50) 40 name) "red"))
|
||||
|
||||
(each
|
||||
(files) print-file)
|
||||
Reference in New Issue
Block a user