<< Previous Message Main Index Next Message >>
<< Previous Message in Thread This Month Next Message in Thread >>
Date   : Fri, 14 Sep 2018 16:14:48 +0100
From   : soruk@... (Michael McConnell)
Subject: Announce: Brandy Basic - with teletext?!

Thank you for this, much appreciated.

I've also just committed a fix in Git for the INKEY issue.

-- Michael

On 06/09/18 17:59, gARetH baBB wrote:
> On Mon, 3 Sep 2018, Michael McConnell wrote:
> 
>> ... and a Videotex client written in BASIC as one of the examples.
> 
> You probably want to replace PROCvdu with something like
> 
>    370DEFPROCvdu(M%)
>    380IF M% >= 32 THEN VDU (M% OR 128)
>    390CASE M% OF
>    400WHEN 27: REPEAT N%=BGET#X%: UNTIL N%<>-1: VDU (N%+64): scan%+=(N%=77)
>    410WHEN 8: IF POS=0 AND VPOS=0 THEN VDU 31,39,23 ELSE VDU 8
>    415WHEN 9: IF POS=39 AND VPOS=23 THEN VDU 30 ELSE VDU 9
>    420WHEN 10: IF VPOS<23 THEN VDU 10 ELSE VDU 31,POS,0
>    425WHEN 11: IF VPOS>0 THEN VDU 11 ELSE VDU 31,POS,23
>    430WHEN 12, 13, 30: VDU M%
>    440WHEN 17: ON
>    450WHEN 20: OFF
>    460ENDCASE
>    465IF VPOS=24 THEN VDU 31,POS,0
>    470ENDPROC
> 
> to give slightly better cursor handling.
> 
> I would also suggest
> 
>    295IF I%>139 AND I%<144 THEN I%=I%-132
> 
> except there seems to be some odd behaviour with INKEY and cursor keys.
<< Previous Message Main Index Next Message >>
<< Previous Message in Thread This Month Next Message in Thread >>