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:
“If when a businessman speaks of minority employment, or air pollution, or poverty, he speaks in the language of a certified public accountant analyzing a corporate balance sheet, who is to know that he understands the human problems behind the statistical ones? If the businessman would stop talking like a computer printout or a page from the corporate annual report, other people would stop thinking he had a cash register for a heart. It is as simple as that—but that isn’t simple.”
—Louis B. Lundborg (1906–1981)
“The final test of a novel will be our affection for it, as it is the test of our friends, and of anything else which we cannot define.”
—E.M. (Edward Morgan)