diff --git a/point32.bm b/point32.bm
new file mode 100644
index 0000000..df61e11
--- /dev/null
+++ b/point32.bm
@@ -0,0 +1,13 @@
+$if Point32 = undefined then
+$let Point32 = defined
+function Point32~& (x as long, y as long)
+    select case _pixelsize
+    case 1
+        Point32 = _palettecolor(point(x,y), _source)
+    case 4
+        Point32 = point(x, y)
+    case else 
+        Point32 = 0
+    end select
+end function
+$end if
\ No newline at end of file