Liberty BASIC 5 - The parenthesis

[Marco Kurvers]

The parenthesis open color does not match the parenthesis close color and the command 'discard' works fine.

Here is an example. Copy this and run it. You can see the result of the color parenthesis and that 'discard()' does work. 


dim a(10)



x = int(rnd(0)*a(5)+4)

open "test" for graphics as #g

#g trapclose("Quit")

#g place(100, 100)

#g "|Dit is een test."

#g flush()



wait



sub Quit handle$

       #g discard()    'maakt flush geheugen weer vrij

       close #g

       end

end sub


Greetings.

[Gordon Rahman]

May 6, 2022 16:34:51 GMT -5 Marco Kurvers said:

 and that 'discard()' does work. 


insertdim a(10)
x = int(rnd(0)*a(5)+4)
open "test" for graphics as #g
#g trapclose("Quit")
#g place(100, 100)
#g "|Dit is een test."
#g flush() here
wait
Hello Marco,
That's right ... 


Gordon


sub Quit handle$
    #g discard() 'maakt flush geheugen weer vrij
    close #g
    end
end sub

Greetings.