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:
“His pain was too great. He begged me for the simple mercy of death. And I could do nothing else but help him leave a world that had become a sleepless, tortured nightmare to him.”
—Robert D. Andrews, and Nick Grindé. Dr. John Garth (Boris Karloff)
“The face we see was never young,
Nor could it ever have been old.
For he, to whom we had applied
Our shopmans test of age and worth,
Was elemental when he died,
As he was ancient at his birth:”
—Edwin Arlington Robinson (18691935)