日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

scheme语言编写运行

發布時間:2023/12/20 编程问答 22 豆豆
生活随笔 收集整理的這篇文章主要介紹了 scheme语言编写运行 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

scheme是lisp的一種

編輯器可以用emacs,網上有很多教導如何編寫的

(begin?

(display "hello")

(newline))

編寫完以.scm保存,這里保存為test.scm

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

Racket?(原名 PLT Scheme[4][5]) 是個通用、多范型,屬于Lisp家族的函數式編程語言,它的設計目的其中之一是為了提供一種語言創造、設計與實作的平臺,Racket被廣泛應用在腳本程式設計、通用程式設計、計算機科學教育和學術研究等不同領域。

運行mzscheme或者scm,然后輸入(load "test.scm"),ok結果就出來了,可以(exit)退出

我這里用的是gimp測試,腳本必須編寫在~/.gimp-2.6/scripts(為了運行gimp)

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)'

修改尺寸

總結

以上是生活随笔為你收集整理的scheme语言编写运行的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。