Mercurial > hg > Members > kono > nitros9-code

changeset 1615:dc3272e71faa

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
rb1773.asm: updated comments sysgo.asm: uses new 'date' pseudo-op boot_idelba.asm: reads ALL 512 byte of a sector, not just first 256
author boisy
date Wed, 23 Jun 2004 21:10:56 +0000
parents 6c53cd87473a
children 04bd37a4ba38
files level1/modules/boot_idelba.asm level1/modules/rb1773.asm level1/modules/sysgo.asm
diffstat 3 files changed, 14 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/level1/modules/boot_idelba.asm	Tue Jun 22 22:29:38 2004 +0000
+++ b/level1/modules/boot_idelba.asm	Wed Jun 23 21:10:56 2004 +0000
@@ -169,7 +169,7 @@
          sta   DevHead,y  0L0d/0hhh device=LBA 
 RdyHuh1  lda   Status,y   is IDE ready for commands? 
          anda  #BusyBit+DrdyBit   ready ? 
-         cmpa  #%01000000
+         cmpa  #DrdyBit
          bne   RdyHuh1    loop until Drdy=1 and Busy=0
 
          lda   #$01       only one at a time 
@@ -194,6 +194,9 @@
          std   ,x++       into RAM 
          inc   ,s
          bpl   BlkLp      go get the rest 
+b@       lda   RData,y	  read remainig 256 bytes
+         dec   ,s
+         bne   b@
          puls  b
 
 *         lda   Status,y   check for error-bit 
--- a/level1/modules/rb1773.asm	Tue Jun 22 22:29:38 2004 +0000
+++ b/level1/modules/rb1773.asm	Wed Jun 23 21:10:56 2004 +0000
@@ -346,9 +346,9 @@
          beq   L0115          No, all drives can read single, skip ahead
          bitb  #DNS.MFM       Can our path dsc. handle double density?
          beq   erbtyp         No, illegal
-L0115    bita  #FMT.TDNS      Is new disk 96 tpi?
-         beq   L011D          No, all drives handle 48 tpi, so skip ahead
-         bitb  #DNS.DTD       Can path dsc. handle 96 tpi?
+L0115    bita  #FMT.TDNS      Is new disk 96/135 tpi?
+         beq   L011D          No, so skip ahead
+         bitb  #DNS.DTD       Can path dsc. handle 96/135 tpi?
          beq   erbtyp         No, illegal
 L011D    bita  #FMT.SIDE      Is new disk double sided?
          beq   L0128          No, all drives handle single sided, we're done
@@ -585,7 +585,7 @@
          ldy   >sectbuf,u     Get sector buffer ptr
          andb  #%00000100     512 byte sector?
          beq   L028D          No, skip ahead
-         ldd   >loglsn,u       Get OS9's sector #
+         ldd   >loglsn,u      Get OS9's sector #
          andb  #$01           Odd/even sector?
          beq   L028D          Even; compare first half
          leay  >$0100,y       Odd, compare second half
--- a/level1/modules/sysgo.asm	Tue Jun 22 22:29:38 2004 +0000
+++ b/level1/modules/sysgo.asm	Wed Jun 23 21:10:56 2004 +0000
@@ -65,10 +65,13 @@
          fcc   /.0/
          fcb   '0+NOS9Minor
          fcb   C$CR,C$LF
+         IFNE  TEST
+         fcc   "** PRE-RELEASE TEST VERSION **"
+         fcb   C$CR,C$LF
+         ENDC
 * For ROM version, cut down on verbage
          IFEQ  ROM
-*         fcc   "Release Date: May 14, 2004"
-         fcc   "ALPHA VERSION!!!!"
+         date
          fcb   C$CR,C$LF
          fcc   !http://www.nitros9.org!
          fcb   C$CR,C$LF
@@ -114,7 +117,7 @@
 
 * Default time packet
 *               YY/MM/DD HH:MM:SS
-DefTime  fcb   104,05,01,00,00,59
+DefTime  fcb    70,11,20,00,00,59
 
          IFEQ  Level-1
 * BASIC reset code