Index: util/fp2anim
===================================================================
--- util/fp2anim	(revision 462)
+++ util/fp2anim	(revision 463)
@@ -20,6 +20,8 @@
 awk -v "photo=$photo" -v "grid_unit=$grid_unit" -v "diamond=$diamond" -v "annotation=$annotation" '
 
 BEGIN {
+	diamond_x = 0
+	diamond_y = 0
 	q="\""
 
 	ds = 100*20
@@ -321,7 +323,16 @@
 
 }
 
+/Mark[ \t]*[(]/ {
+	directive(")")
+	sub(".*Mark[ \t]*[(]", "", $0)
+	sub(")$", "", $0)
 
+	diamond_x = $1*100
+	diamond_y = $2*100
+}
+
+
 function layer_3d(name, color,  offs)
 {
 	if ((offs == "") || (offs == 1))
@@ -404,7 +415,7 @@
 
 	if (diamond) {
 		print "macro push annotation"
-		print "lines", -ds,0,   0,ds,   ds,0,   0,-ds,   -ds,0
+		print "lines", diamond_x-ds, diamond_y,   diamond_x,diamond_y+ds,   diamond_x+ds,diamond_y,   diamond_x,diamond_y-ds,   diamond_x-ds,diamond_y
 		print "endmacro"
 	}