PEN
PEN ON|OFF
Enables/Disables the pen/mouse/tap mechanism. See function
n = PEN(value)
for information on how to read data from
tap, mouse or pen.
Example
pen on
print "Press left mouse button or tab screen. Press q to quit."
while(1)
if(pen(3)) then
pen(4)
PosX = pen(5)
PosY = locate 1,0: print "Click/tap at position: " + PosX + " , " + PosY
endif
inkey()
k = if(len(k) == 1 AND k == "q") then end
showpage
delay(20)
wend
pen off
Code samples using PEN
004 loops.bas
006 arrays+.bas
100lines.bas
2048.bas
2048.bas
3d_palmx.bas
3d_torus.bas
3dtictac.bas
3dtorus.bas
3dttt.bas
3dttt.bas
4tune.bas
7gables.bas
agendus.bas
ai.bas
anball 1.0.bas
angel feather.bas
anomail.bas
Another center finder.bas
another look at trig functions.bas
balls.bas
base64.bas
betrayal: crows ii.bas
bezier's autograph book.bas
bezier_pen.bas
bezierbounce.bas
Blackbox.bas
blackbox.bas
boing.bas