24 lines
464 B
NASM
24 lines
464 B
NASM
case on
|
|
|
|
* Location of command rec ptr on entry to an AppleTalk command procedure
|
|
* (in the system zero page, which is the current direct page)
|
|
cmdRecPtr gequ $80
|
|
|
|
* Bogus segment to go into the .root file and force generation of .a/.o file
|
|
bogus private
|
|
nop
|
|
end
|
|
|
|
* AppleTalk command procedure (which acts as a dispatcher for all commands)
|
|
cmdProc start
|
|
lda 3,s
|
|
pha
|
|
lda 3,s
|
|
pha
|
|
lda cmdRecPtr
|
|
sta 4,s
|
|
lda cmdRecPtr+2
|
|
sta 6,s
|
|
jml DispatchASPCommand
|
|
end
|