2 ; Ullrich von Bassewitz, 17.11.2002
4 ; Common stuff for the read/write routines
10 .importzp ptr1, ptr2, ptr3, tmp2
12 .include "filedes.inc"
15 ;--------------------------------------------------------------------------
16 ; rwcommon: Pop the parameters from stack, preprocess them and place them
17 ; into zero page locations. Return carry set if the handle is invalid,
18 ; return carry clear if it is ok. If the carry is clear, the handle is
28 sta ptr1+1 ; Remember -count-1
36 sta ptr3+1 ; Clear ptr3
38 jsr popax ; Get the handle