1
0
mirror of https://github.com/cc65/cc65.git synced 2024-10-30 12:28:25 +00:00
cc65/libsrc/atari/diopncls.s

47 lines
823 B
ArmAsm
Raw Normal View History

;
; Christian Groessler, October 2000
;
; This file provides the __dio_open and __dio_close functions
; Since on the Atari no real open and close is necessary, they
; do not much. The __dio_open queries the sector size of the
; drive which is later used by the _dio_read and _dio_write
; functions.
;
; unsigned char __fastcall__ _dio_open (_driveid_t drive_id);
; unsigned char __fastcall__ _dio_close (_driveid_t drive_id);
;
.export __dio_open,__dio_close
.export sectsizetab
.include "atari.inc"
.bss
sectsizetab:
.res NUMDRVS * 2
.code
.proc __dio_open
asl a ; make index from drive id
tax
lda #128 ; currently hardcoded (until I get an 815 :-)
sta sectsizetab,x
lda #0
sta sectsizetab+1,x
; fall thru to __dio_close
.endproc
.proc __dio_close
lda #0
tax
rts ; return no error
.endproc