view lib/kreiderclib/gs2.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 gs2.r

 section code

* OS-9 system function equates

I$GetStt equ $8d 

_gs_rdy: ldb   #1 
 lda   3,s 
 os9 I$GetStt 
 lblo  _os9err 
 clra   
 rts    
_gs_eof: ldb   #6 
 bra   L0015 
_gs_opt: ldb   #0 
 ldx   4,s 
L0015 lda   3,s 
 os9 I$GetStt 
 bra   L0042 
_gs_devn: ldb   #$0e 
 ldx   4,s 
 lda   3,s 
 os9 I$GetStt 
 bcs   L0042 
L0027 lda   ,x+ 
 bpl   L0027 
 anda  #$7f 
 sta   -1,x 
 clr   ,x 
 rts    
_gs_gfd: pshs  y 
 ldb   #$0f 
 lda   5,s 
 ldx   6,s 
 ldy   8,s 
 os9 I$GetStt 
 puls  y 
L0042 lbra  _sysret 

 endsect