suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

absorbing image library implementation from wescheme. up to underlay/align and going down the file.

Browse Source
This commit is contained in:
Danny Yoo 2011-07-12 15:26:55 -04:00
parent 6d70e2f5f0
commit cb42484e3b
1 changed files with 87 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

112
image/private/js-impl.js
View File

@ -103,6 +103,13 @@ var checkFontWeight = plt.baselib.check.makeCheckArgumentType(
isFontWeight, isFontWeight,
'font weight'); 'font weight');
var checkPlaceX = plt.baselib.check.makeCheckArgumentType(
isPlaceX,
'x-place');
var checkPlaceY = plt.baselib.check.makeCheckArgumentType(
isPlaceX,
'y-place');
@ -203,58 +210,77 @@ EXPORTS['image-url'] =
}); });
// // FIXME EXPORTS['open-image-url'] =
// EXPORTS['open-image-url'] = plt.baselib.functions.renameProcedure(EXPORTS['image-url'],
// makePrimitiveProcedure( 'open-image-url');
// 'open-image-url',
// 1,
// function(MACHINE) {
// ...
// });
EXPORTS['overlay'] = EXPORTS['overlay'] =
makePrimitiveProcedure( makePrimitiveProcedure(
'overlay', 'overlay',
plt.baselib.arity.makeArityAtLeast(2), plt.baselib.arity.makeArityAtLeast(2),
function(MACHINE) { function(MACHINE) {
var img1 = checkImage(MACHINE, "overlay", 0); var img1 = checkImage(MACHINE, "overlay", 0);
var img2 = checkImage(MACHINE, "overlay", 1); var img2 = checkImage(MACHINE, "overlay" 1);
var restImages; var restImages = [];
for (var i = 2; i < MACHINE.argcount; i++) { for (var i = 2; i < MACHINE.argcount; i++) {
restImages.push(checkImage(MACHINE, "overlay", i)); restImages.push(checkImage(MACHINE, "overlay", i));
} }
var img = makeOverlayImage(img1, img2, 0, 0); var img = makeOverlayImage(img1, img2, "middle", "middle");
for (var i = 0; i < restImages.length; i++) { for (var i = 0; i < restImages.length; i++) {
img = makeOverlayImage(img, restImages[i], 0, 0); img = makeOverlayImage(img, restImages[i], "middle", "middle");
} }
return img; return img;
}); });
EXPORTS['overlay/xy'] = EXPORTS['overlay/xy'] =
makePrimitiveProcedure( makePrimitiveProcedure(
'overlay/xy', 'overlay/xy',
4, 4,
function(MACHINE) { function(MACHINE) {
var img1 = checkImage("overlay/xy", 0); var img1 = checkImage(MACHINE, "overlay/xy", 0);
var deltaX = checkReal("overlay/xy", 1); var deltaX = checkReal(MACHINE, "overlay/xy", 1);
var deltaY = checkReal("overlay/xy", 2); var deltaY = checkReal(MACHINE, "overlay/xy", 2);
var img2 = checkImage("overlay/xy", 2); var img2 = checkImage(MACHINE, "overlay/xy", 3);
return makeOverlayImage(img1.updatePinhole(0, 0), return makeOverlayImage(img1.updatePinhole(0, 0),
img2.updatePinhole(0, 0), img2.updatePinhole(0, 0),
jsnums.toFixnum(deltaX), jsnums.toFixnum(deltaX),
jsnums.toFixnum(deltaY)); jsnums.toFixnum(deltaY));
}); });
// FIXME
// EXPORTS['overlay/align'] =
// makePrimitiveProcedure( EXPORTS['overlay/align'] =
// 'overlay/align', makePrimitiveProcedure(
// ???, 'overlay/align',
// function(MACHINE) { plt.baselib.arity.makeArityAtLeast(4),
// ... function(MACHINE) {
// }); var placeX = checkPlaceX(MACHINE, "overlay/align", 0);
var placeY = checkPlaceY(MACHINE, "overlay/align", 1);
var img1 = checkImage(MACHINE, "overlay/align", 2);
var img2 = checkImage(MACHINE, "overlay/align", 3);
var restImages = [];
for (var i = 4; i < MACHINE.argcount; i++) {
restImages.push(checkImage(MACHINE, "overlay/align", i));
}
var img = makeOverlayImage(img1,
img2,
placeX.toString(),
placeY.toString());
for (var i = 0; i < restImages.length; i++)
img = makeOverlayImage(img,
restImages[i],
placeX.toString(),
placeY.toString());
return img;
});
EXPORTS['underlay'] = EXPORTS['underlay'] =
makePrimitiveProcedure( makePrimitiveProcedure(
@ -275,6 +301,7 @@ EXPORTS['underlay'] =
return img; return img;
}); });
EXPORTS['underlay/xy'] = EXPORTS['underlay/xy'] =
makePrimitiveProcedure( makePrimitiveProcedure(
'underlay/xy', 'underlay/xy',
@ -290,13 +317,34 @@ EXPORTS['underlay/xy'] =
-(jsnums.toFixnum(deltaY))); -(jsnums.toFixnum(deltaY)));
}); });
// EXPORTS['underlay/align'] = EXPORTS['underlay/align'] =
// makePrimitiveProcedure( makePrimitiveProcedure(
// 'underlay/align', 'underlay/align',
// ???, plt.baselib.arity.makeArityAtLeast(4),
// function(MACHINE) { function(MACHINE) {
// ... var placeX = checkPlaceX(MACHINE, "underlay/align", 0);
// }); var placeY = checkPlaceY(MACHINE, "underlay/align", 1);
var img1 = checkImage(MACHINE, "underlay/align", 2);
var img2 = checkImage(MACHINE, "underlay/align", 3);
var restImages = [];
for (var i = 4; i < MACHINE.argcount; i++) {
restImages.push(checkImage(MACHINE, "underlay/align", i));
}
var img = makeOverlayImage(img2,
img1,
placeX.toString(),
placeY.toString());
for (var i = 0; i < restImages.length; i++)
img = makeOverlayImage(restImages[i],
img,
placeX.toString(),
placeY.toString());
return img;
});
// EXPORTS['beside'] = // EXPORTS['beside'] =
// makePrimitiveProcedure( // makePrimitiveProcedure(