Changeset 6674 for trunk/Ohana/src/kii/event/InterpretPresses.c

Timestamp:

Mar 24, 2006, 2:42:35 PM (20 years ago)

Author:

eugene

Message:

moved check_permissions to libohana, added buttons to Kii

File:

• trunk/Ohana/src/kii/event/InterpretPresses.c (modified) (2 diffs)

trunk/Ohana/src/kii/event/InterpretPresses.c

@@ -10 +10 @@
   
   if ((event[0].type == ButtonPress) && InPicture (event, &layout[0].picture)) {
-    Reorient (graphic, layout, event);
+    ReorientOnButton (graphic, layout, event);
   }
 
@@ -50 +50 @@
 }
 
+void ReorientOnButton (Graphic *graphic, Layout *layout, XButtonEvent *mouse_event) {
+
+  double X, Y;
+
+  Screen_to_Image (&X, &Y, (double)mouse_event[0].x, (double)mouse_event[0].y, layout);
+  X = 0.5*layout[0].matrix.Naxis[0] - X;
+  Y = 0.5*layout[0].matrix.Naxis[1] - Y;
+
+  switch (mouse_event[0].button) {
+    case 1:
+      Reorient (graphic, layout, X, Y, 0);
+      break;
+    case 2:
+      Reorient (graphic, layout, X, Y, -1);
+      break;
+    case 3:
+      Reorient (graphic, layout, X, Y, +1);
+      break;
+    default:
+      break;
+  }
+}