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:
“Generosity is a part of my character, and I therefore hasten to assure this Government that I will never make an allegation of dishonesty against it wherever a simple explanation of stupidity will suffice.”
—Lever Leslie, Baron (1905–1977)
“A decent provision for the poor is the true test of civilization.”
—Samuel Johnson (1709–1784)