|
processor 6502
|
|
|
|
org $a000-2 ; so we can write the ...
|
|
.word $a000 ; cartridge 2-byte header
|
|
.word Start ; start vector
|
|
.word Start ; RESTORE vector
|
|
.byte $41, $30, $c3, $c2, $cd ; "A0CBM"
|
|
|
|
Start:
|
|
lda $9004
|
|
WaitLine;
|
|
cmp $9004
|
|
beq WaitLine
|
|
sta $900f
|
|
jmp Start
|
|
|