端末のSSからスクフェスのカード部分を切り抜くやつ

CardCut.scm

(define (script-fu-CardCut img layer)

		(gimp-image-rotate img 2)
		(gimp-image-resize img 1080 1520 0 -201)
		(gimp-layer-resize-to-image-size layer)
		(gimp-displays-flush)

) ;end of define

(script-fu-register
	"script-fu-CardCut"
	"<Image>/Script-Fu/CardCut"
	"Cut image to the card size"
	"aiwas"
	"copyright 2014, aiwas"
	"Nov 19, 2014"
	"RGB*, GRAY*"

    SF-IMAGE        "Image"     0
    SF-DRAWABLE     "Drawable"  0
) ;end of register