Boriel Basic Forum - ZX Basic Compiler

Reading DATA

Wed, 20 Nov 2024 20:25:28 +0000

Lo siento si esto ha sido preguntado antes, pero no lo he encontrado.

Dado un proc como este:

Code:
const NumLocs as ubyte = 2

'enum Exits

    const ExitNorth as ubyte = 0

    const ExitSouth as ubyte = 1

    const ExitEast as ubyte = 2

    const ExitWest as ubyte = 3

    const ExitUp as ubyte = 4

    const ExitDown as ubyte = 5

    const NumExits as ubyte = 6

'end enum

dim locDescs(NumLocs) as string

dim locExits(NumLocs, NumExits) as integer

sub init_locs()

    'locDescs( 0 ) = "El lugar del alunizaje. La vaina abierta y sin  " _

    '   + "contenido parece una triste parodia de ella misma. " _

    '   + "Un valle natural conduce al sur."

    'locDescs( 1 ) = "El lugar del alunizaje. La vaina abierta y sin  " _

    '   + "contenido parece una triste parodia de ella misma. " _

    '   + "Un valle natural conduce al sur."

    restore LocData

    for i = 0 to NumLocs - 1

        print "numloc i:", i

        ' Read the desc

        read locDescs( i )

        print "read numloc i: "; i; locDescs( i )

        ' Read the exits

        for j = 0 to NumExits - 1

            print "numloc i:"; i; " exit "; j

            read locExits(i, j)

            print "numloc i:"; i; " exit "; j; " = "; locExits(i, j)

            input a

        next

    next

    return

    LocData:

    ' Loc 0 - Landing

    data "El lugar del alunizaje. La vaina abierta y sin  " _

      + "contenido parece una triste parodia de ella misma. " _

      + "Un valle natural conduce al sur."

    data -1, 1, -1, -1, -1, -1

    ' Loc 1 - Valley

    data "El lugar del alunizaje. La vaina abierta y sin  " _

      + "contenido parece una triste parodia de ella misma. " _

      + "Un valle natural conduce al sur."

    data 0, -1, -1, -1, -1, -1

end sub

El problema es el siguiente. Si descomento las primeras líneas y comento la línea

Code:
read locDescs( i )

y los data correspondientes, el programa parece que funciona. Pero si dejo el programa tal y como está, solo lee porquería en la posición i del vector locDescs, y el Speccy se reinicia. ¿No se pueden leer cadenas con READ? Según los docs, entiendo que sí...

New telegram channels

Mon, 18 Nov 2024 09:13:53 +0000

Hi, there

The forum is still alive, yes, but it's clear that the recent waves of spam attack have causes a great damage to our community :-(
In the meantime other tools and communities have emerged around instant messaging (Discord, Telegram, etc).

I've created two official Telegram channels (English, and Spanish). Please follow the invitation links if you're willing to join.

Boriel ZX Basic Compiler
Official channel (English Only)
Invite link:
https://t.me/+ag4E7W05dvRkZmZk

Boriel ZX Basic [ES] (Spanish official channel)
Sobre el compilador Boriel ZX Basic
Enlace de invitación:
https://t.me/+dSbWL8z8ol1lMjA0

Version 1.7.2 released!

Mon, 01 Jan 2024 19:38:24 +0000

Well, long time I don't announce new releases here (usually goes to Twitter or Mastodon).

! Fixes bugs related to using CONST strings
! Fixed a bug with local Arrays of Floats
! Fix PEEK (ULong, ...)
Other minor errors fixes and improvements
NextTool is now directly executable

Download it here: https://zxbasic.readthedocs.io/en/latest/archive/

ORG 60000 - LEN(compiled code) (solved)

Fri, 03 Dec 2021 09:54:54 +0000

Hi
I want to put the code on top memory.
How do I know the length of the compiled code?

ZX Basic syntax highlighter for Sublime Text

Sat, 23 Jan 2021 03:12:31 +0000

Hi all,

I have created a syntax highlighter for ZX BASIC for the editor Sublime Text. It's an excellent code editor which, like ZX BASIC itself, is available for Linux, Mac OS, and Windows.

Enjoy!

https://github.com/patters-syno/zx-basic-syntax

Code Size Limit

Fri, 18 Sep 2020 23:40:25 +0000

Hello,

I wonder what the limit is to code size with Boriel on:

48K
128K
ZX Spectrum Next?

Can I write my program without thinking about how Boriel is paging memory in the background?

Compiling pure Sinclair Basic

Fri, 10 Jul 2020 12:36:03 +0000

Hi,
As per the subject, I'm trying to compile pure Sinclair Basic but am getting the following errors which I can't find anything about.

bwall.bas:4: Error: invalid directive #Run
bwall.bas:4: Error: illegal preprocessor character '-'

bwall.bas:68: Error: invalid directive #End
bwall.bas:68: Error: illegal preprocessor character '-'

I used this command: 'zxb bwall.bas --tzx --BASIC --autorun --sinclair --explicit' to compile
but have also tried without '--sinclair' and '--explicit' with the same results.

If anybody has any ideas I would be really appreciative. Thanks.

Pass an Array to a Sub

Thu, 02 Apr 2020 09:30:04 +0000

Hello all,

I'm pretty new to ZX Basic so please forgive my possible beginner questions.

I'd like to pass an Array to a Sub but cannot seem to figure out how.

Code:
dim SortArray(10) as string

SUB SelectionSort (SortArray) 'Compile Error: Syntax Error. Unexpected token 'SortArray' 

  {Code}

END sub

'************************ Main ****************************

Let SortArray(0) = "Line 00"

Let SortArray(1) = "Line 02"

Let SortArray(2) = "Line 08"

Let SortArray(3) = "Line 06"

Let SortArray(4) = "Line 01"

Let SortArray(5) = "Line 03"

Let SortArray(6) = "Line 07"

Let SortArray(7) = "Line 04"

Let SortArray(8) = "Line 05"

SelectionSort(SortArray) ' Compile Error: Variable 'SortArray' is an array and cannot be used in this context

Thanks in advance for any insights

Usage of print42?

Sat, 01 Feb 2020 13:12:28 +0000

Hi.

I'm trying to use the print42 library but whenever I reference it my program can no longer compile, I get a "Undeclared variable printAt42Coords"

I have found an old thread from 2015 with the same problem which was solved, I have tried the -o0 optimization level but it does not make a difference.

Any idea?

Also, I see the print42 routine includes a "isAt:" label that checks for a char 22, what would be the correct syntax to use it?

Cheers.

Al's Spectrum Annual 2020

Thu, 23 Jan 2020 11:38:41 +0000

Hi fellas,

I just made Al's Spectrum Annual 2020, an annual magazine hosting my views about 25 games that I picked from those released in 2019, plus interviews to El Mundo del Spectrum and Bitmap Soft, and a behind-the-scenes article with facts and insight about my latest games, including of course my first ever game made with ZX-Basic, Ad Lunam.

Al's Spectrum Annual 2020 is available as a 32-pages A4 PDF file in Italian, English and Spanish. Download it for free at:

http://www.alessandrogrussu.it/annuario.html

Enjoy!

List of ZX Basic supported engines

Mon, 10 Dec 2018 07:56:00 +0000

Hi all

I'm gathering information about engines that support ZX Basic. So far, I found those:

- FASE: here and here
- Nirvana: here
- Nirvana+: here and here
- Bifrost* Engine: here
- Bifrost*2 Engine: here
- ZXodus][Engine: here and here (but engine download link is not found)

Do you have more information about them or more engines to add to the list? It would be nice to have a repository with all of them.

Cheers.

OVER - how it works?

Sun, 04 Nov 2018 17:57:48 +0000

Hi all

While testing my last game, I come with some issue that makes me wonder if I understood well how OVER works. AFAIK, OVER 0 is the default mode, so if I have...

Code:
OVER 1

PRINT "Hello";

OVER 0

... last OVER 0 will affect all screen and all PRINT, DRAW, CIRCLE, PLOT commands? Affect sprites that are already draw in screen? I had a strange behaviour with the sonar so I had to make a workaround. Anyway, I'd like to know how OVER really works.

Thanks and cheers.

Compiling +D G+DOS programs

Sun, 28 Oct 2018 19:40:33 +0000

Hello.

I have a lot of programs written in the +D G+DOS, but I have problems when I try to compile commands like: LOAD D*"filename" or LOAD d1"filename".

None of the commands to load or save files, or format disks, can be compiled.

The +D ROM is completely disassembled (http://www.biehold.nl/rudy/plusd/plusd.htm) but I don't have the knowledge to work from Basic with the +D "Machine Code".

Maybe it's possible to add in the future some options in the ZX Basic Compiler to allow work with G+DOS programs?

Thanks

New version 1.7.0 released!

Fri, 06 Oct 2017 22:17:12 +0000

Well, long time I don't announce new releases here (usually goes to Facebook or twitter).
This one is version 1.7.0 which includes:

- Some fixes and better stability
- Added (finally! 8) ) READ, DATA and RESTORE which, essentially work very much like the ones in Sinclair BASIC (i.e. DATA with complex expressions supported)
- Can now call SUBs with no parenthesis: mysub 1, 5, a, 3*c (expanded syntax)
- Can now call FUNctions with 1 or no parameters with no parenthesis.
Download it here: https://zxbasic.readthedocs.io/en/latest/archive/

Custom Fonts with ASM defb

Tue, 12 Sep 2017 12:26:54 +0000

Hola:

Quiero utilizar un set de caracteres personalizados que tengo en formato defb, pero no encuentro como hacerlo funcionar:

Code:
REM Fuente personalizada

POKE UINTEGER 23606,@Fuente-256

SUB Fuente()

  ASM

    defb 0,128,128,64,23,.........

    defb ...

  END ASM

END SUB

Que estoy haciendo mal?

Gracias por vuestra ayuda!