From: William Levak (wlevak_at_sdf.lonestar.org)
Date: 2008-02-26 08:07:57
On Tue, 26 Feb 2008, ruud.baltissen@abp.nl wrote:
> Hallo Spiro,
>
>
> This is the piece of code from the 1541:
>
> L_C245 cpx F1CNT ; ',' after '=' ?
> beq L_C24C ; no, ->
>
> ora #$04 ; set bit 2
>
> L_C24C ora #$03 ; set bit 0 and 1
> eor IMAGE
> sta IMAGE ; flag syntax test
>
> L_C254 lda IMAGE
> ldx INSTRU
> and TblSyntax-8,X ; combine with checkbyte
> ==> ^^^^^^^^^
>
> bne L_C260 ; faulty syntax, ->
>
> rts
>
> L_C260 sta ERWORD ; set error flag
>
> lda #$30
> jmp OutputErrorMsg ; 30, 'Syntax error'
>
>
> Tabel found at $FEAD:
>
> ;** Bytes for syntax check
> TblSyntax .by $51, $DD, $1C, $9E, $1C
> ;
> ; ^ ^
> ; | |
> ; +-------------------+---- why are these here?
Immers an Neufeld's book, Inside Commodore DOS, says that $51 is disk
copy, and $1C is load a file.
The "disk copy" is probably left over from the daul drives.
wlevak@sdf.lonestar.org
SDF Public Access UNIX System - http://sdf.lonestar.org
Message was sent through the cbm-hackers mailing list
Archive generated by hypermail pre-2.1.8.