;; #LAYOUT# STD *        #TAKE
;; #LAYOUT# *   *        #IGNORE

; Not on a Blade, whose Terminal Card holds the screen editor (src/kernal/arnitech)
!ifndef CONFIG_ARNITECH_BLADE {

;
; Well-known Kernal routine, described in:
;
; - [CM64] Computes Mapping the Commodore 64 - $EA24
;
; Sets USER to the colour RAM location of PNT's screen line. Screen RAM starts on a
; kilobyte boundary, as the VIC-II fetches it, so the line's place within its kilobyte
; is its place in the colour RAM.
;


screen_calculate_USER:

	lda PNT+0
	sta USER+0
	lda PNT+1
	and #$03
	ora #>COLOR_RAM
	sta USER+1

	rts

} ; CONFIG_ARNITECH_BLADE