git.sur5r.net Git - cc65/blob - libsrc/geos/disk/dio_params.s

   1 ;
   2 ; Maciej 'YTM/Elysium' Witkowiak
   3 ; 2.7.2001
   4 ;
   5 ; this function is used by dio_read and dio_write to fix parameters (secnum)
   6 ; this function calls SetDevice so that more than one drive can be used at once
   7
   8         .import         popax,pushax,_dio_log_to_phys
   9         .importzp       ptr1
  10         .export         dio_params,dio_secnum
  11         .include        "../inc/geossym.inc"
  12         .include        "../inc/jumptab.inc"
  13         .include        "../inc/dio.inc"
  14
  15 .bss
  16 dio_secnum:     .res 2
  17
  18 .code
  19 .proc   dio_params
  20
  21         sta r4L
  22         stx r4H
  23
  24         jsr popax
  25         sta dio_secnum
  26         stx dio_secnum
  27
  28         jsr popax               ; get 3rd parameter
  29         pha                     ; save it
  30         txa
  31         pha
  32         jsr pushax              ; put it back
  33         pla                     ; restore it
  34         sta ptr1+1
  35         pla
  36         sta ptr1
  37         ldy #sst_driveno
  38         lda (ptr1),y
  39         clc
  40         adc #8
  41         jsr SetDevice           ; setup device, load driver
  42
  43         lda #<dio_secnum
  44         ldx #>dio_secnum
  45         jsr pushax
  46
  47         lda #<r1L
  48         ldx #>r1H
  49         jmp _dio_log_to_phys
  50
  51 .endproc