OSDN Git Service
(root)
/
fast-forth
/
master.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
V161
[fast-forth/master.git]
/
ADDON
/
SD_TOOLS.asm
diff --git
a/ADDON/SD_TOOLS.asm
b/ADDON/SD_TOOLS.asm
index
23f7724
..
e920292
100644
(file)
--- a/
ADDON/SD_TOOLS.asm
+++ b/
ADDON/SD_TOOLS.asm
@@
-30,7
+30,7
@@
SECT_D
DisplaySector
mDOCOL ;
.word UDDOT ; ud -- display the double number
DisplaySector
mDOCOL ;
.word UDDOT ; ud -- display the double number
- .word lit,
1E00h,lit,200h,DUMP
;
+ .word lit,
BUFFER,lit,200h,DUMP
;
.word EXIT ;
; ----------------------------------;
.word EXIT ;
; ----------------------------------;
@@
-53,12
+53,11
@@
Clust_ClustProcess
; dump FAT1 sector of last entry
; ----------------------------------;
; dump FAT1 sector of last entry
; ----------------------------------;
- FORTHWORD "FAT_D" ;VWXY Display FATsector
+ FORTHWORD "FAT_D" ;VWXY Display
first
FATsector
; ----------------------------------;
SUB #4,PSP ;
MOV TOS,2(PSP) ;
; ----------------------------------;
SUB #4,PSP ;
MOV TOS,2(PSP) ;
- MOV &FATsector,0(PSP) ; FATsectorLO
- ADD &OrgFAT1,0(PSP) ;
+ MOV &OrgFAT1,0(PSP) ;
MOV #0,TOS ; FATsectorHI = 0
JMP SECT_D ;
; ----------------------------------;
MOV #0,TOS ; FATsectorHI = 0
JMP SECT_D ;
; ----------------------------------;
@@
-68,8
+67,7
@@
Clust_ClustProcess
; FORTHWORD "FAT1_D" ; Display FATsector
;; ----------------------------------;
; MOV &OrgFAT1,Y ;
; FORTHWORD "FAT1_D" ; Display FATsector
;; ----------------------------------;
; MOV &OrgFAT1,Y ;
-;AddFATsector ;
-; ADD &FATsector,Y ; FATsectorLO
+;FAT1_D_Next ;
; SUB #4,PSP ;
; MOV TOS,2(PSP) ; save TOS
; MOV Y,0(PSP) ;
; SUB #4,PSP ;
; MOV TOS,2(PSP) ; save TOS
; MOV Y,0(PSP) ;
@@
-82,7
+80,7
@@
Clust_ClustProcess
; FORTHWORD "FAT2_D" ; Display FATsector
;; ----------------------------------;
; MOV &OrgFAT2,Y ;
; FORTHWORD "FAT2_D" ; Display FATsector
;; ----------------------------------;
; MOV &OrgFAT2,Y ;
-; JMP
AddFATsector
;
+; JMP
FAT1_D_Next
;
;; ----------------------------------;
;; ----------------------------------;