clase pulga derivada_de form
publicos:
el objeto tempo es un timer
el objeto fig es un bitmap("pulga.PNG")
los objetos x,y son cantidades
el objeto dado es un random

mensajes:
pulga
{
pulga.manejador(pulga.paint, pinte)
pulga.manejador(pulga.mousedown, pegaron)
pulga.manejador(tempo.tick, avisaron)
fig.maketransparent
copie 100 en x,y
tempo.start
copie 100 en tempo.interval
}

pegaron(deme ww, deme h es un mouseeventargs)
{
es (h.x>x & h.x<x+fig.width) & (h.y>y & h.y<y+fig.height)?
si:es h.button=mousebuttons.left?
   si:tempo.stop
   no:es h.button=mousebuttons.right?
      si:tempo.start 
}

pinte(deme xx, deme ch es un painteventargs)
{
ch.graphics.drawimage(fig,x,y)
}

avisaron(deme yy, deme d es un eventargs)
{
copie dado.next(0,1000) en x
copie dado.next(0,750) en y
pulga.refresh
}