Groups > comp.sys.acorn.programmer > #6219

Instability in rectangular cursor

From	Richard Ashbery <basura@invalid.addr.uk>
Newsgroups	comp.sys.acorn.programmer
Subject	Instability in rectangular cursor
Date	2020-11-13 13:17 +0000
Organization	None
Message-ID	<58cec65a21basura@invalid.addr.uk> (permalink)

Show all headers | View raw

Are there any BASIC programmers out there who may have missed my
posting on ROOL > Forums > General about an issue with a routine that
simply animates a rectangular cursor across the screen by moving the
mouse? The mouse overlays another horizontal rectangle but in so doing
results in instability and spoils the rendering. Any solutions would
be welcome.

MODE 1920,1080,32
PX%=0
PY%=0
REPEAT
  GCOL 0,0,255
  RECTANGLE FILL 0,0,3838,100
  MOUSE MX%,MY%,MB%
  GCOL 255,0,0
  RECTANGLE FILL PX%-50,PY%,100
  IF MX%<PX% THEN : PX%=PX%-1 : ENDIF
  IF MX%>PX% THEN : PX%=PX%+1 : ENDIF
UNTIL0

Back to comp.sys.acorn.programmer | Previous | Next — Next in thread | Find similar | Unroll thread

Thread

Instability in rectangular cursor Richard Ashbery <basura@invalid.addr.uk> - 2020-11-13 13:17 +0000
  Re: Instability in rectangular cursor Steve Drain <steve@kappa.me.uk> - 2020-11-13 14:10 +0000
    Re: Instability in rectangular cursor Richard Ashbery <basura@invalid.addr.uk> - 2020-11-13 17:12 +0000
      Re: Instability in rectangular cursor Steve Fryatt <news@stevefryatt.org.uk> - 2020-11-13 19:24 +0000
        Re: Instability in rectangular cursor Steve Drain <steve@kappa.me.uk> - 2020-11-13 20:33 +0000

csiph-web