anchor.diff:  
   : fb8-toggle-cursor ( -- )
   	line# fb8-line2addr column# fb8-columns2bytes +
  -	char-height 2 - screen-width screen-depth * * +
  +	char-height 2 - screen-line-bytes * +
   	2 0 ?DO
   		dup char-width screen-depth * invert-region
  -		screen-width screen-depth * +
  +		screen-line-bytes +
   	LOOP drop
   ;
   
  
positive.code: : fb8-reset-screen ( -- ) ( Left as no-op by design ) ;
  
  : fb8-erase-screen ( -- )
  	frame-buffer-adr screen-height screen-width * screen-depth * fb8-erase-block
  ;
  
  : fb8-invert-screen ( -- )
  	frame-buffer-adr screen-height screen-width * screen-depth * invert-region
  ;
  
  : fb8-blink-screen ( -- ) fb8-invert-screen fb8-invert-screen ;
  
negative.code: 	>r
  	fb8-install
  	r> to screen-depth
  	screen-width screen-depth * to screen-line-bytes
  ;
  
  
  