Specifications

REPT '?XO-'?XC
I
DB
ENDM
ENDIF
ENDM
ORG
°
DI
IMI
JMP START
'DW
VERSION
i
ENDSPACE $, OBH
ORG OBH
MOV. C,M
.IN
PIAPORT+3
JR
SKIPV
DB 0,0,0
SKIPV:
ORI
8
RAMLOOP:
OUT
PIAPORT+3
RAMRET:
MOV M,C
UNBOOT:
IN PIAPORT+3
ANI
OF7H
JR
RAMLOOP
ENDSPACE $, 34H
ORG 34H
i
.IN.TE.REI.X~-- . ..,.....,......-- .. ~-., .. __ ~_.:., .... _ ..... , ... ~ _ ..... .
i
CENDO
. ANI OF7H
OUT PIAPORT+3
INX SP
:
INX " 'SE
,MOV "M,C
IN PIAPORT+3
JR INTERFIX
1
EQU $
ENDSPACE CENDQ
°
iINIT
INTERRUPTS
, iNOTE: THIS CODE IS OVERLAID IN MEMORY/ROM
:i I I
i SECTION FOR ROUTINE TO TALK :'TO SAM, REGISTERS
;GO
:TO BOOT MODE TO GET TO SAM REGISTERS
;SHOULD
COME OUT TO JR I3H
~NOTE: ROOM FOR RST VEC~OR
iOVERLAID IN RAM AS A RETURN
iUNBOOT
iNOW OUTPUT-SHOULD BE ISH
iTHI$. ROUTINE ~S TO CATCH INTERRUPTS
i WHEN REPROGRAMING THE SAM .. ".,>.-- ..• - ... -- .. ---- .. ~.-.-----,--- ... - ..
.. i'THIS DOES NOT GET EXECUTED TWICE
iSAM INIT---CF LEO
iRl CLEAR
iRO CLEAR
;DISABLE OMNINET INTERRUPT-ALIASES TO TRACK
;SET DATA DIRECTION OF PIA B TO OUTPUT
;CRB
;CRA
;piaB DATA - density, ~ide; sal, alpha