From: William Levak (wlevak_at_sdf.lonestar.org)
Date: 2008-02-28 07:30:17
This is the commented list from Immers and Neufeld:
Copyright 1984 by DATAMOST, Inc.
TC50 $C228 Check if there is any command left to
parse by checking the value of .Y set by
PARSE. If .Y=0, nothing left so branch
to TC75 ($C254) to check structure.
$C22B Store value from .Y in filetable, FILTBL
($027A),X. Set the pointer to the start
of filename #2, F2PNT ($0279) from the
current value of F1CNT ($0277).
$C234 Load .A with $8D (shifted CR) and JSR to
PARSE ($C268) to parse the rest of the
command. On return increment .X so it
points to the end of the string and put
the value into F2CNT ($0278). Decrement
the value of .X to restore its former
value.
$C23E Check if any wild cards were found by
PARSE in filename 2 by checking the
pattern flag, PATFLG ($028A). If any
were found, set 3 (P2) of IMAGE($028B).
TC60 $C245 Check if there was a second filename by
checking if .X = F1CNT. If second file
name is only 1 chr long, branch to TC70.
$C24A Set bit 2 to indicate that the command
implies more than one second file name.
TC70 $C24C Set bit 1 to indicate that a second
drive is specified and bit 0 to indicate
that a second file name is given. EOR
this with IMAGE (clears bit 0) and store
the result back into IMAGE ($028B)
TC75 $C254 Check IMAGE against the entry for that
command (CMD number from CMDNUM, $022A)
in the structure table, STRUCT ($FEA5+)
if match, syntax is OK; exit with an RTS
TC80 $C260 Store IMAGE in ERWORD ($026c). Load .A
with a $30 to indicate a bad syntax and
exit with a JMP tp CMDERR ($C1C8).
This looks to be a syntax check, with the table being masks to use with
the check.
On Wed, 27 Feb 2008, ruud.baltissen@abp.nl wrote:
> Hallo William,
>
>
>> What is the address of this piece of code?
>>
>>> L_C245 cpx F1CNT ; ',' after '=' ?
>>> beq L_C24C ; no, ->
>>>
>>> ora #$04 ; set bit 2
>>>
>>> L_C24C ora #$03 ; set bit 0 and 1
>
> Replace "L_" by "$".
>
>
> --
> ___
> / __|__
> / / |_/ Groetjes, Ruud
> \ \__|_\
> \___| URL: Ruud.C64.org
>
>
> De informatie in dit e-mailbericht is vertrouwelijk en uitsluitend bestemd voor de geadresseerde. Wanneer u dit bericht per abuis ontvangt, verzoeken wij u contact op te nemen met de afzender per kerende e-mail. Verder verzoeken wij u in dat geval dit e-mailbericht te vernietigen en de inhoud ervan aan niemand openbaar te maken. Wij aanvaarden geen aansprakelijkheid voor onjuiste, onvolledige dan wel ontijdige overbrenging van de inhoud van een verzonden e-mailbericht, noch voor daarbij overgebrachte virussen.
>
> Stichting Pensioenfonds ABP is gevestigd te Heerlen en ingeschreven bij de Kamer van Koophandel Zuid Limburg onder nummer: 41074000
>
>
> The information contained in this e-mail is confidential and may be privileged. It may be read, copied and used only by the intended recipient. If you have received it in error, please contact the sender immediately by return e-mail; please delete in this case the e-mail and do not disclose its contents to any person. We don't accept liability for any errors, omissions, delays of receipt or viruses in the contents of this message which arise as a result of e-mail transmission.
>
> Stichting Pensioenfonds ABP, having its registered office at Heerlen, is registered in the Traderegister of the Chamber of Commerce Zuid Limburg (Maastricht), the Netherlands, registration number: 41074000
>
>
>
>
>
> Message was sent through the cbm-hackers mailing list
>
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.