summaryrefslogtreecommitdiff
path: root/vector.mod/vector.bmx
diff options
context:
space:
mode:
authorIan C <ianc@noddybox.co.uk>2005-08-24 00:25:34 +0000
committerIan C <ianc@noddybox.co.uk>2005-08-24 00:25:34 +0000
commit2afd44a7ba2c1d8b9c162ab9c6ccdfbd9f1310c0 (patch)
tree78500e65ec89fc6972d514b20f65cc022657fed7 /vector.mod/vector.bmx
parentf37162283c31f6a48dc8f2dd9e7059c741618fc9 (diff)
Changed typenames to Blitz standard naming. Added unimplemented TVector.
Diffstat (limited to 'vector.mod/vector.bmx')
-rw-r--r--vector.mod/vector.bmx35
1 files changed, 35 insertions, 0 deletions
diff --git a/vector.mod/vector.bmx b/vector.mod/vector.bmx
new file mode 100644
index 0000000..c2ca8a4
--- /dev/null
+++ b/vector.mod/vector.bmx
@@ -0,0 +1,35 @@
+Module noddybox.vector
+
+ModuleInfo "Framework: Simple Vector class"
+ModuleInfo "Copyright: Public Domain"
+ModuleInfo "Author: Ian Cowburn"
+ModuleInfo "Version: $Revision$"
+
+' $Id$
+
+Import brl.Basic
+
+Strict
+
+Type TVector
+
+ ' These are considered private
+ '
+ Field v:Float[4,4]
+
+ ' Creates a new vector
+ '
+ ' x - X componenent
+ ' y - Y componenent
+ ' z - Z componenent
+ '
+ ' Returns null for invalid parameters.
+ '
+ Function Create:TVector(x:Float, y:Float, z:Float)
+ Local o:TVector
+
+ o=New TVector
+
+ Return o
+ End Function
+End Type