scheme是lisp的一種

編輯器可以用emacs，網(wǎng)上有很多教導(dǎo)如何編寫(xiě)的

(begin?

(display "hello")

(newline))

編寫(xiě)完以.scm保存,這里保存為test.scm

然后sudo apt-get install racket ?//也可以安裝scm

Racket?(原名 PLT Scheme^[4][5]) 是個(gè)通用、多范型，屬于Lisp家族的函數(shù)式編程語(yǔ)言，它的設(shè)計(jì)目的其中之一是為了提供一種語(yǔ)言創(chuàng)造、設(shè)計(jì)與實(shí)作的平臺(tái)，Racket被廣泛應(yīng)用在腳本程式設(shè)計(jì)、通用程式設(shè)計(jì)、計(jì)算機(jī)科學(xué)教育和學(xué)術(shù)研究等不同領(lǐng)域。

運(yùn)行mzscheme或者scm，然后輸入(load "test.scm")，ok結(jié)果就出來(lái)了，可以(exit)退出

我這里用的是gimp測(cè)試,腳本必須編寫(xiě)在~/.gimp-2.6/scripts（為了運(yùn)行g(shù)imp）

qboxtest@qboxtest-G41D3:~/.gimp-2.6/scripts$ cat ff.scm?
(define (batch-resize pattern width height)
(let* ((filelist (cadr (file-glob pattern 1))))
(while (not (null? filelist))
(let* ((filename (car filelist))
(image (car (gimp-file-load RUN-NONINTERACTIVE filename filename)))
(drawable (car (gimp-image-get-active-layer image))))
(gimp-image-scale-full image width height INTERPOLATION-CUBIC)
(gimp-file-save RUN-NONINTERACTIVE image drawable filename filename)
(gimp-image-delete image))
(set! filelist (cdr filelist)))))

然后到含有JPG的文件夾下

gimp -i -b '(batch-resize "*.JPG" 604 453)' -b '(gimp-quit 0)'

修改尺寸

總結(jié)

以上是生活随笔為你收集整理的scheme语言编写运行的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。