2018-08-14 18:14:32 +00:00
|
|
|
;c02 Program Initialization Code for Vic-20 with at 8K Expansion
|
2018-01-28 18:30:49 +00:00
|
|
|
|
2020-10-19 19:42:10 +00:00
|
|
|
INCLUDE "vicequ.a02" ;Include VIC 20 Common Code
|
|
|
|
|
|
2018-01-28 18:30:49 +00:00
|
|
|
;Video RAM and ROM
|
2018-08-02 09:10:14 +00:00
|
|
|
VICSCN EQU $1000 ;Video Screen Memory Area (Unexpanded)
|
|
|
|
|
CHRROM EQU $8000 ;Character Generator ROM
|
|
|
|
|
VICCLR EQU $9400 ;Color RAM (Unexpanded)
|
2018-01-28 18:30:49 +00:00
|
|
|
|
2018-08-19 22:24:02 +00:00
|
|
|
;Machine Language Basic Stub
|
|
|
|
|
ORG $1201 ;Start of Basic Program
|
|
|
|
|
BASIC: DC $0C, $12 ;Pointer to Next Line
|
|
|
|
|
DC $00, $00 ;Line Number (0)
|
|
|
|
|
DC $9E ;SYS
|
|
|
|
|
DC $20 ;' '
|
|
|
|
|
DC $34,$36,$32,$32 ;"4622"
|
|
|
|
|
DC $00 ;End of Line Marker
|
|
|
|
|
DC $00, $00 ;End of Basic Program
|
2018-08-02 09:10:14 +00:00
|
|
|
|
2020-10-19 19:42:10 +00:00
|
|
|
INCLUDE "vicasm.a02" ;Include VIC 20 Common Code
|
|
|
|
|
INCLUDE "prbyte.a02" ;PRBYTE and PRHEX routines
|
