view lib/kreiderclib/defdrive.as @ 3141:717ced83b885

coco3: Build SD card device descriptors for CoCo3FPGA Added "CC3FPGAFLAGS = $(AFLAGS) -DCC3FPGA=1 $(FLAGS)" to "level2/coco3/modules/makefile" for flagging Coco3FPGA specific features in modules sources. Added "llcoco3fpga", "ddsd0_coco3fpga", "sd0_coco3fpga", and "sd1_coco3fpga" to the "coco3/modules/makefile" - RBF section, which also now adds all to the "NITROS9/MODULES/RBF" on all disk images for building new Coco3FPGA disks from NitrOS9. Added new descriptor section to the "level2/coco3/modules/makefile" reflecting the new Coco3FPGA SD card descriptors and their flags.
author Bill Pierce <merlinious999@gmail.com>
date Sat, 04 Feb 2017 11:06:28 +0100
parents 1647f1874cdf
children
line wrap: on
line source

* Disassembly by Os9disasm of defdrive.r

* class D external label equates

D0000 equ $0000 

* class X external label equates

X0000 equ $0000 

 section bss

* Uninitialized data (class B)
B0000 rmb 12 
* Initialized Data (class G)

 endsect 

 section code

getdrive: pshs  u 
 leas  -7,s 
 clra   
 clrb   
 pshs  d 
 ldd   #$000c 
 pshs  d 
 leax  >L0061,pcr 
 pshs  x 
 lbsr  modlink 
 leas  6,s 
 std   ,s 
 cmpd  #-1 
 beq   L005b 
 ldd   ,s 
 ldx   ,s 
 addd  16,x 
 std   5,s 
 leau  B0000,y 
 bra   L0033 
L002f ldb   4,s 
 stb   ,u+ 
L0033 ldx   5,s 
 leax  1,x 
 stx   5,s 
 ldb   -1,x 
 stb   4,s 
 bgt   L002f 
 ldb   4,s 
 clra   
 andb  #$7f 
 stb   ,u+ 
 clra   
 clrb   
 stb   ,u 
 ldd   ,s 
 pshs  d 
 lbsr  munlink 
 leas  2,s 
 leax  B0000,y 
 tfr   x,d 
 bra   L005d 
L005b clra   
 clrb   
L005d leas  7,s 
 puls  u,pc 
L0061 rola   
 jmp   9,s 
 fcb $74 
 fcb $00 

 endsect