git.sur5r.net Git - cc65/blob - libsrc/geos-cbm/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             .export dio_params,dio_secnum
   9             .import popax,pushax,_dio_log_to_phys
  10             .importzp ptr1
  11
  12             .include "geossym.inc"
  13             .include "jumptab.inc"
  14             .include "dio.inc"
  15
  16 .bss
  17
  18 dio_secnum:
  19         .res 2
  20
  21 .code
  22
  23 dio_params:
  24         sta r4L
  25         stx r4H
  26
  27         jsr popax
  28         sta dio_secnum
  29         stx dio_secnum+1
  30
  31         jsr popax               ; get 3rd parameter
  32         pha                     ; save it
  33         txa
  34         pha
  35         jsr pushax              ; put it back
  36         pla                     ; restore it
  37         sta ptr1+1
  38         pla
  39         sta ptr1
  40         ldy #sst_driveno
  41         lda (ptr1),y
  42         clc
  43         adc #8
  44         jsr SetDevice           ; setup device, load driver
  45
  46         lda #<dio_secnum
  47         ldx #>dio_secnum
  48         jsr pushax
  49
  50         lda #<r1L
  51         ldx #>r1H
  52         jmp _dio_log_to_phys