[Coco] SYSCALL syntax for BASIC09
coco at jechar.ca
coco at jechar.ca
Thu May 7 14:58:54 EDT 2020
I have a manual that describes OS9 Syscalls
but it does not explain how to use them
with Basic09.
I will show a shoret listing below with
line numbers added for reference and ???
indicateing the problem lines then I will
explain what the problem is with each line.
01 PROCEDURE politekey
02 TYPE registers=cc,a,b,dp:BYTE;x,y,u:INTEGER
03???DIM A:STRING[2]
04 DIM regs:registers
05 PARAM key:STRING[1]
06???A$="0A"
07 RUN GFX2("CURXY",0,0)
08 LOOP
09 RUN INKEY(key)
10 (* Exit LOOP/ENDLOOP on key press *)
11 EXITIF key<>"" THEN
12 ENDEXIT
13 (* F$Sleep call - rest of 100ms time slice. )
14 regs.x= 1
15 RUN syscall(A,regs)
16 RUN GFX2("CURXY",0,0)
17 PRINT " ";
18 ENDLOOP
19 END
So here In line Number 3 I do not know if I should use a two character
string "0A"
or a single byte Hex value A and if the latter do I declarew A$ as BYTE
or Integer.
In line Number 6 Should I have A="0A" or A=10 ?
Or Is my error someware else.
Charlie
More information about the Coco
mailing list