GLBasic - Simple OOP Test

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:

    A simple child,
    That lightly draws its breath,
    And feels its life in every limb,
    What should it know of death?
    William Wordsworth (1770–1850)

    First follow Nature, and your judgment frame
    By her just standard, which is still the same;
    Unerring Nature, still divinely bright,
    One clear, unchanged, and universal light,
    Life, force, and beauty must to all impart,
    At once the source, and end, and test of art.
    Alexander Pope (1688–1744)