6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2026-04-25 22:18:27 +00:00
Code Issues Projects Releases Wiki Activity

Cosmetic changes from Oliver Schmidt

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@3477 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2005-04-20 16:52:10 +00:00
parent fcd14f3d14
commit f3ac2be07d
2 changed files with 16 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files
libsrc/apple2/mli.s
+11 -11
View File
@@ -4,32 +4,32 @@
; Apple ProDOS 8 MLI
;
.import __dos_type
.import __dos_type
.include "mli.inc"
.include "mli.inc"
.bss
mliparam: .tag MLI
mliparam:.tag MLI
.data
callmli:
; Store parameters
sta call
stx mliparam
sta call
stx mliparam
; Check for ProDOS 8
lda __dos_type
beq oserr
lda __dos_type
beq oserr
; Call MLI and return
jsr ENTRY
call: .byte $00
.word mliparam
jsr ENTRY
call: .byte $00
.addr mliparam
rts
; Load oserror code and return
oserr: lda #$01 ; "Invalid MLI function code number"
oserr: lda #$01 ; "Invalid MLI function code number"
sec
rts