fl

4 fwrite sd_dump


\ Display Block(512bytes) inside SD-card
\ ( n -- )  n:block number
: sd_dump
." Block Number:" dup . cr
hex
\ Read 1 Block(512bytes) from SD-card
sd_blockread  
             
tbuf sd_cogbuf
d32 0 do
     i d16 u* .word _ecs 
     2dup          
     \ Copy 8Long(32bytes) from Cog memory to tbuf
     4 cog>mem     
	tbuf d16 bounds
	do
		i C@ .byte space
	loop     
     \ Display ASCII
	space 
     tbuf d16 bounds
	do
		i C@ dup bl h7E between invert if drop h2E then emit
	loop
     cr
     \ next Cog memory
     4 +      
loop     
cr
2drop
decimal
;     
     
...