E0DISP.MAC

;IFNDEF	TabStep
;****************************************************
;    SC80 text screen editor    (C) TCHV,1989-93    *
;                                                   *
;  E0DISP.MAC - Display dependent macro definitions *
;                                                   *
;          This file is for Original 32k version    *
;****************************************************
TabStep		equ	8
;LimitedCharSet	equ	1

IFDEF	CPM
ScrXOffset	equ	0
ScrYOffset	equ	2
ScrWidth	equ	80
ScrHeight	equ	25


; LogicWidth must be multiple of 4
LogicWidth	equ	80;76 ; 78 - 8 trailing blank symbols - 5 end blank symbols
LogicHeight	equ	ScrHeight

ELSE
IFDEF PALMIRA
	ScrXOffset	equ	4
	ScrYOffset	equ	2
ELSE
	ScrXOffset	equ	8
	ScrYOffset	equ	3
ENDIF
ScrWidth	equ	78
ScrHeight	equ	25

LogicWidth	equ	64 ; 78 - 8 trailing blank symbols - 5 end blank symbols
LogicHeight	equ	ScrHeight-2

ENDIF
ScrSize		equ	(ScrHeight+5)*ScrWidth
;ScrStart	equ	76D0h ; Display buffer start

; Start address of physical screen - visible characters
ScrOffset	equ	ScrYOffset*ScrWidth+ScrXOffset
;VRAM		equ	ScrStart+ScrOffset
SetScrAddr	macro
		endm

WriteNextSym	macro
		mov	m,a
		inx	h
		endm

space		equ	20h
IFDEF	PALMIRA
HRTC		equ	9;0Ah
CURSOR_BLOCK	equ	0E0h-80h+HRTC
CURSOR_LINE	equ	0D0h-80h+HRTC
ELSE
CURSOR_BLOCK	equ	0E3h
CURSOR_LINE	equ	0D3h
ENDIF

;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
;ENDIF