Simple OOP Test
TYPE Tvec x;y;z FUNCTION null: self.x = 0; self.y=0; ENDFUNCTION FUNCTION add: v AS Tvec INC self.x, v.x INC self.y, v.y INC self.z, v.z ENDFUNCTION ENDTYPE LOCAL vec AS Tvec, vec2 AS Tvec vec.null vec.x=50 vec2.x = 100 vec.add(vec2)Version 8 also has the ability to encrypt (using 128-bit Blowfish) and decrypt strings.
Read more about this topic: GLBasic
Famous quotes containing the words simple and/or test:
“Nothing can rightly compel a simple and brave man to a vulgar sadness.”
—Henry David Thoreau (1817–1862)
“Conventional manners are a kind of literacy test for the alien who comes among us.”
—Katharine Fullerton Gerould (1879–1944)