]> git.xonotic.org Git - xonotic/xonotic.git/blobdiff - misc/mediasource/menuskins/wickedx/png-tga.scm
move mediasource out to an extra repo
[xonotic/xonotic.git] / misc / mediasource / menuskins / wickedx / png-tga.scm
diff --git a/misc/mediasource/menuskins/wickedx/png-tga.scm b/misc/mediasource/menuskins/wickedx/png-tga.scm
deleted file mode 100755 (executable)
index 0905030..0000000
+++ /dev/null
@@ -1,24 +0,0 @@
-;Converts .png image files to .tga.
-;Input: fileIN, fileOUT, grayscale (0=no, 1=yes), alpha 0.5 (0=no, 1=yes)
-
-(define (png-tga fileIn fileOut gray alpha)
-       (let*
-               (
-                       (image (car (gimp-file-load 1 fileIn fileIn)))
-                       (layer (car (gimp-image-get-active-layer image)))
-               )
-
-               (if (= gray 1)
-                       (gimp-desaturate-full layer 1)
-               )
-
-               (if (= alpha 1)
-                       (gimp-layer-set-opacity layer 50.0)
-               )
-
-               (set! layer (car (gimp-image-merge-visible-layers image 1)))
-               (file-tga-save 1 image layer fileOut fileOut 1 0)
-               (gimp-image-delete image)
-       )
-)
-