programs/globTest.toby
changeset 1 d7cb562e4e24
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/programs/globTest.toby	Wed Apr 18 23:47:38 2001 +0000
@@ -0,0 +1,30 @@
+//---------------------------------------------------
+// If globals are working correctly, this should
+//  draw a line east, WAY off the edge of
+//  TurtleSpace. Otherwise, it'll just draw a 
+//  line somewhere other than due east, or maybe just
+//  draw a line about 5 pixels wide or give an error
+//  or something like that.
+//
+//Copyright (c) 1999 Lighting and Sound Technologies.
+// Written by Ryan C. Gordon.
+//---------------------------------------------------
+
+number thisIsGlobal = 90
+
+function main() returns nothing
+	disableFence()
+	turnRight(thisIsGlobal)
+	thisIsGlobal = 10000
+	testGlob()
+	goForward(thisIsGlobal)
+endfunction
+
+function testGlob() returns nothing
+	number thisIsGlobal
+
+	thisIsGlobal = 5
+endfunction
+
+
+