2 ; Oliver Schmidt, 2012-10-16
4 ; unsigned char __fastcall__ _syschdir (const char* name);
8 .import diskinit, fnunit, curunit, initcwd
9 .importzp ptr1, tmp1, tmp2
11 ;--------------------------------------------------------------------------
21 ; Process first character
30 ; Process second character
37 stx tmp1 ; First digit
38 sta tmp2 ; Second digit
40 ; Multiply first digit by 10
51 ; Add second digit to product
57 ; Process third character
63 ; Check device readiness
71 lda fnunit ; Set by diskinit
73 jmp initcwd ; Returns with A = 0
75 ; Return with error in A
77 err: lda #9 ; "Ilegal device"
82 ;--------------------------------------------------------------------------