Mercurial > hg > Members > kono > nitros9-code
changeset 272:d9f3cf7bfc28
oscode for Dragon 64 now in oscode.asm as conditional assembly
author | boisy |
---|---|
date | Sun, 21 Jul 2002 06:23:48 +0000 |
parents | 058259f5dedb |
children | ed5795e619c7 |
files | level1/modules/oscode_d64.asm level1/modules/sysgo.asm |
diffstat | 2 files changed, 3 insertions(+), 72 deletions(-) [+] |
line wrap: on
line diff
--- a/level1/modules/oscode_d64.asm Sun Jul 21 06:04:55 2002 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,71 +0,0 @@ -******************************************************************** -* oscode - OS-9 Level One V1.2 bootstrap code -* -* $Id$ -* -* Ed. Comments Who YY/MM/DD -* ------------------------------------------------------------------ -* From Dragon - -* org $2600 - nam Bootstrap - ttl Dragon Bootstrap code - -os9start equ $EF00 -os9size equ $0F80 - -Start fcc "OS" - - clr >$FF03 - clr >$FF01 - sta >$FFDF - ldb #6 - ldx #$FFC6 -L0010 sta ,x++ - decb - bne L0010 - sta 1,x - -* clear screen at $8000 - ldx #$8000 - ldy #$0200 - lda #$60 -L0020 sta ,x+ - leay -$01,y - bne L0020 - -* Write "OS9 BOOT" to the screen - ldx #$810C - leay <BootMsg,pcr - ldb #BootMLen -L002E lda ,y+ - sta ,x+ - decb - bne L002E - tst <$72 - beq L004C - -* Move the kernel to top part of RAM - leau >Start,pcr - ldx #os9size - ldy #os9start -L0044 lda ,u+ - sta ,y+ - leax -$01,x - bne L0044 - -* Jump to OS9 -L004C jmp >os9start+$4F After the move, this is like jumping to L004F -L004F leax <end,pcr - ldd $09,x - jmp d,x - -BootMsg fcc "OS" - fcb $79 - fcb $60 - fcb 'B - fcb 'O - fcb 'O - fcb 'T -BootMLen equ *-BootMsg -end equ *
--- a/level1/modules/sysgo.asm Sun Jul 21 06:04:55 2002 +0000 +++ b/level1/modules/sysgo.asm Sun Jul 21 06:23:48 2002 +0000 @@ -42,7 +42,9 @@ fcc ".0" fcb 48+OS9Minor fdb C$CR,C$LF - fcc "COPR. 2002 ACADIAN EMBEDDED" + fcc !'PHOENIX' RELEASE 08/01/2002! + fdb C$CR,C$LF + fcc "HTTP://COCOOS9.SOURCEFORGE.NET" fdb C$CR,C$LF fcc "COPR. 1980 BY MOTOROLA INC. AND" fdb C$CR,C$LF