# pen test.bas



draw -1

top:



#i$=inkey$



#v=fn pen(0)

x=fn pen(1) : x$=x

y=fn pen(2): y$=y



draw x$,20,20,1

draw y$,20,35,1



goto top



    Source: geocities.com/greenchile505