Specifications

, .
MOVETABLE:
OCH
't;
:
~
l
;SAM
INTERFACE
DB
DW
DB
DW
DB
DW
DB
DW
.
OBH,OBH
(EBOOTEND-EBOOT)
,I
I
AND
OFFH
;
READ
IN
EPROM
I
BOOT,EBOOT
30H
CHARLD,XCHARLD
;CHARACTER LOADER,
MAXIMUM
'48
BYTES:
;DESTINATION TS
SECOND
HOLE
IN
VDM
'
(XENDFL-EBOOTFL)
BOOTFL,EBOOTFL
OFFOOH,EBOOTFL
038h,ebootf1
OFFH
AND
OEFH
;BOOT
FAIL
;
DW
dw
DB
, . ENDSPACE
$,
24H
CEND4
EQU
$
·ENDSPACE CEND4'
ORG
500H
I
;END
OF
TABLE
,
;THIS
SECTION EXECUTES
IN
THE
VIDEO
MEMORY
TO
LOAD
;
XCHARLD:
CHARLO
;
EQU
;
THE
0
AND
80H
CHARACTER
POSITIONS
;
CODE
RUNS
AT
BOTSCREEN+80H
TO
BOTSCREEN+80H+48
I , ,
I'
BOTf?CREEN+80H
;RETURN
TO
BOOTSTRT
IS
ALREADY
ON
THE
STACK
LXI
CALL
B,BOTSCREEN
VSLOOP
,
;THIS
ADDRESS
MUST
CONTAIN
OOH
TO
,START
LXI
H,BOTSCREEN+20H
4C)CON~MOV~VI
A,16
CONTMOV
EQU
$-XCHARLD+CHARLD
MVI
M,080H
~"""-"7"""'"H~
DCR:
A
JRNZ
XCONTMOV
,CMA
,
;
STAX
'B
, I
; " '
XVSLOOP:
VSLOOP
EQU
$-XCHA1}LD+CHARLD
;
.************************************************** , ,
;
CODE
STARTING
FROM
HERE
~UST
,BE
\PRECISELY TIMED
·
,
,
I.
;CLEAR
ANY
PENDING IRQA INTERRqPTS
IN
PIAPORT
·
,
;WAIT FOR VERTICAL
SYNC
INTERRUPT
CYCLE
·
,
XWAITINTERRUPT:
WAIT
INTERRUPT
IN
ANA
JP
EQU
,$-XCHARLD+CHARLD
PIAPORT+1
A
;LOOK
FOR lRAQA INTERRUPT
WAITINTERRUPT
;12
T STATES
MVI
E,8
;WE
SHOULD
BE
AT
THE
HORIZONTAL
RETRACE
AT
THE
START
OF
THE
;FIRST
LINE
OF
VDM.
(OF020H)
;
XHSLOOP:
HSLOOP
EQU
$-XCHARLD+CHARLD