FILENAME_MAX = 12+1
.elseif .defined(__LUNIX__)
FILENAME_MAX = 80+1
+.elseif .defined(__TELESTRAT__)
+FILENAME_MAX = 50+1
.else
FILENAME_MAX = 16+1
.endif
FNAME_LEN = 11 ; maximum length of file-name
-FILENAME_MAX = 100
+FILENAME_MAX = 200
; ---------------------------------------------------------------------------
; Zero page
SCRY := $224
ADSCRL := $218
ADSCRH := $21C
+IRQVECTOR := $2FA
; ---------------------------------------------------------------------------
# define FILENAME_MAX (12+1)
#elif defined(__LUNIX__)
# define FILENAME_MAX (80+1)
+#elif defined(__TELESTRAT__)
+# define FILENAME_MAX (50+1)
#else
# define FILENAME_MAX (16+1)
#endif
;
-; Oliver Schmidt, 18.04.2005
+; Jede (jede@oric.org) 24.09.2017
;
.export initcwd
initcwd:
+
ldx #PWD_PTR
BRK_TELEMON XVARS
- sta tmp1
- sty tmp1+1
-
+
+ sta ptr1
+ sty ptr1+1
+
ldy #$00
+
loop:
- lda (tmp1),y
+ lda (ptr1),y
beq done
sta __cwd,y
iny