From 206776b0658ff6358546d7b039e2a3aacda2409a Mon Sep 17 00:00:00 2001
From: Omar Rizwan <omar@omar.website>
Date: Thu, 28 Jul 2022 17:00:37 -0400
Subject: new Hex calibration

---
 virtual-programs/tags-and-calibration.folk | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'virtual-programs')

diff --git a/virtual-programs/tags-and-calibration.folk b/virtual-programs/tags-and-calibration.folk
index 6709e0b1..1d61419f 100644
--- a/virtual-programs/tags-and-calibration.folk
+++ b/virtual-programs/tags-and-calibration.folk
@@ -2,12 +2,21 @@ if {[info hostname] != "folk0"} { return }
 
 package require math::linearalgebra
 
+# camera (tag) point -> projection point
+# calibration for Interact
 set points {
 	{880.8 121.2 1420 300}
 	{909.4 358.4 1420 780}
 	{459.7 168.2 500 300}
 	{465.4 378.6 500 780}
 }
+# calibration for Hex
+set points {
+	{218.5 77.5 500 300}
+	{274.3 470.8 500 1860}
+	{911.9 474.5 3340 1860}
+	{965.4 113.3 3340 300}
+}
 for {set i 0} {$i < [llength $points]} {incr i} {
     lassign [lindex $points $i] x$i y$i u$i v$i
 }
-- 
cgit v1.2.3