diff options
| -rw-r--r-- | html/examples/multicrop.lua | 61 | ||||
| -rw-r--r-- | test/lua/multicrop.lua | 61 |
2 files changed, 122 insertions, 0 deletions
diff --git a/html/examples/multicrop.lua b/html/examples/multicrop.lua new file mode 100644 index 0000000..6af3e52 --- /dev/null +++ b/html/examples/multicrop.lua @@ -0,0 +1,61 @@ +-- lua5.1 multicrop.lua 100 500 100 500 *.jpg + +require"imlua" +require"imlua_process" + +err_msg = { + "No error.", + "Error while opening the file.", + "Error while accessing the file.", + "Invalid or unrecognized file format.", + "Invalid or unsupported data.", + "Invalid or unsupported compression.", + "Insuficient memory", + "Interrupted by the counter", +} + +x1 = arg[1] +x2 = arg[2] +y1 = arg[3] +y2 = arg[4] +filename1 = arg[5] +if (not x1 or not x2 or not y1 or not y2 or not filename1) then + print("Must have the rectangle coordinates and at least one file name as parameters.") + print(" Can have more than one file name as parameters and can use wildcards.") + print(" Usage:") + print(" lua multicrop.lua x1 x2 y1 y2 filename1 filename2 ...") + return +end + +print(">>> Crop of multiple images <<<") +print("") + +function ProcessImageFile(file_name) + print("Loading File: "..file_name) + image, err = im.FileImageLoad(file_name); + + if (err and err ~= im.ERR_NONE) then + error(err_msg[err+1]) + end + + new_image = im.ProcessCropNew(image, x1, x2, y1, y2) + + new_image:Save(file_name, "JPEG"); + + new_image:Destroy() + image:Destroy() + print("Done File.") + print("") +end + +file_count = 0 +for index,value in ipairs(arg) do + if (index > 4) then + ProcessImageFile(arg[index]) + file_count = file_count + 1 + end +end + +if (file_count > 1) then + print("Processed "..file_count.." Files.") +end diff --git a/test/lua/multicrop.lua b/test/lua/multicrop.lua new file mode 100644 index 0000000..6af3e52 --- /dev/null +++ b/test/lua/multicrop.lua @@ -0,0 +1,61 @@ +-- lua5.1 multicrop.lua 100 500 100 500 *.jpg + +require"imlua" +require"imlua_process" + +err_msg = { + "No error.", + "Error while opening the file.", + "Error while accessing the file.", + "Invalid or unrecognized file format.", + "Invalid or unsupported data.", + "Invalid or unsupported compression.", + "Insuficient memory", + "Interrupted by the counter", +} + +x1 = arg[1] +x2 = arg[2] +y1 = arg[3] +y2 = arg[4] +filename1 = arg[5] +if (not x1 or not x2 or not y1 or not y2 or not filename1) then + print("Must have the rectangle coordinates and at least one file name as parameters.") + print(" Can have more than one file name as parameters and can use wildcards.") + print(" Usage:") + print(" lua multicrop.lua x1 x2 y1 y2 filename1 filename2 ...") + return +end + +print(">>> Crop of multiple images <<<") +print("") + +function ProcessImageFile(file_name) + print("Loading File: "..file_name) + image, err = im.FileImageLoad(file_name); + + if (err and err ~= im.ERR_NONE) then + error(err_msg[err+1]) + end + + new_image = im.ProcessCropNew(image, x1, x2, y1, y2) + + new_image:Save(file_name, "JPEG"); + + new_image:Destroy() + image:Destroy() + print("Done File.") + print("") +end + +file_count = 0 +for index,value in ipairs(arg) do + if (index > 4) then + ProcessImageFile(arg[index]) + file_count = file_count + 1 + end +end + +if (file_count > 1) then + print("Processed "..file_count.." Files.") +end |