Welcome, Guest
You have to register before you can post on our site.

Username
  

Password
  





Search Forums

(Advanced Search)

Forum Statistics
» Members: 296
» Latest member: DrJac2
» Forum threads: 1,027
» Forum posts: 6,211

Full Statistics

Online Users
There are currently 104 online users.
» 0 Member(s) | 101 Guest(s)
Facebook, Google, Yandex

Latest Threads
My computer is haunted!
Forum: Bug Reports
Last Post: zarsoft
05-22-2024, 10:30 AM
» Replies: 0
» Views: 142
Includes in ASM
Forum: How-To & Tutorials
Last Post: bracckets
04-04-2024, 12:17 AM
» Replies: 2
» Views: 1,252
Store array information i...
Forum: Help & Support
Last Post: rbiondi
03-10-2024, 09:42 PM
» Replies: 0
» Views: 817
ScrollLeft function scrol...
Forum: Bug Reports
Last Post: rbiondi
03-07-2024, 03:57 PM
» Replies: 2
» Views: 1,608
string.bas errors when co...
Forum: Bug Reports
Last Post: rbiondi
03-01-2024, 10:10 AM
» Replies: 2
» Views: 1,404
Using Beepola with ZX BAS...
Forum: How-To & Tutorials
Last Post: edtoo
02-29-2024, 09:47 AM
» Replies: 15
» Views: 36,721
Johnny Bravo
Forum: Gallery
Last Post: zarsoft
02-11-2024, 11:20 PM
» Replies: 0
» Views: 788
Compiling +D G+DOS progra...
Forum: ZX Basic Compiler
Last Post: boriel
01-22-2024, 08:32 AM
» Replies: 4
» Views: 9,857
VAL = ? (solved)
Forum: Bug Reports
Last Post: zarsoft
01-03-2024, 11:44 PM
» Replies: 8
» Views: 5,357
Wrong math (solved)
Forum: Bug Reports
Last Post: zarsoft
01-03-2024, 11:38 PM
» Replies: 4
» Views: 2,945

 
  My computer is haunted!
Posted by: zarsoft - 05-22-2024, 10:30 AM - Forum: Bug Reports - No Replies

My program gives intermittent errors.
The result also depends on the emulator.
What's going on here?
Program error? Is the compiler broken?

[Image: Trace.png]
files: files.zip

Print this item

  Includes in ASM
Posted by: bracckets - 03-27-2024, 03:16 PM - Forum: How-To & Tutorials - Replies (2)

Is it possible to use assembler includes in the inline ASM code blocks
so the assembler can be broken down into files, e.g.

INCLUDE maths.asm

Also is it possible to include binary files in the assembler e.g.

BINARY 'test.bin'

Thanks

Print this item

  Store array information in extended memory (128kb)
Posted by: rbiondi - 03-10-2024, 09:42 PM - Forum: Help & Support - No Replies

Hello,

Is it possible storing arrays and/or Strings in Zx Spectrum Extended Memory (128kb)? 
How could this would be accomplished?

Thank you very much!
Rogerio

Print this item

  ScrollLeft function scrolling more than 1 pixels left
Posted by: rbiondi - 03-01-2024, 10:42 AM - Forum: Bug Reports - Replies (2)

Hello,

I'm trying to use the ScrollLeft function to create a scrolling chart and the ScrollLeft function seems to be scrolling more than 1 pixel left. 
The screening area on the left also seems to be not to be pixel acurate. 

Sample program:

Code:
#include <scroll.bas>

INK 7
PAPER 0
CLS
sub square(x1 as UBYTE, y1 as UBYTE, x2 as UBYTE, y2 as UBYTE, color as UBYTE)
    DIM x AS UBYTE = 0
    DIM y AS UBYTE = 0
    FOR x = 0 TO x2 - x1
        PLOT INK color; x1 + x, y1
        PLOT INK color; x1 + x, y2
    NEXT x
    FOR y = 0 TO y2 - y1
        PLOT ink color; x1, y1 + y
        PLOT ink color; x2, y1 + y
    NEXT y
END SUB
SUB plott(x as FLOAT, y as FLOAT, sx as FLOAT, sy as FLOAT, x1 as UBYTE, y1 as UBYTE, x2 as UBYTE, y2 as UBYTE, color as UBYTE)
    DIM alfa AS UINTEGER
    DIM beta AS UINTEGER
    DIM mx AS UINTEGER
    alfa = ((x/sx) * (x2 - x1)) + x1
    beta = ((y/sy) * (y2 - y1)) + y1 + ((y2-y1)/2)
    ' Limites da tela
    IF alfa >= x2 - 1 then alfa = x2 - 1
    IF beta <= y1 + 1 then beta = y1 + 1
    mx = alfa mod x2
    IF alfa >= (x2-1) then
        ScrollLeft(x1 + 1, y1 + 1, x2 - 1, y2 - 1)
        alfa = x2-1
    END IF
    PRINT at 10,10; "alfa: "; alfa
    PRINT at 11,10; "beta: "; beta
    PLOT ink color; alfa, beta
END SUB
square(10, 15, 80, 60, 6)
DIM dia AS INTEGER
DIM valor AS float = 0
DIM incremento AS FLOAT = 1
' Create a sample scrolling chart
FOR dia = 1 TO 5000
    plott(dia, valor, 360, 100000, 10, 15, 80, 60, 6)
    valor = valor + 1000 * incremento
    IF valor > 49000 then incremento = -1
    IF valor < -49000 then incremento = 1
NEXT dia


Thank you very much!

Print this item

  string.bas errors when compiling with strict
Posted by: rbiondi - 02-23-2024, 11:29 AM - Forum: Bug Reports - Replies (2)

Hello,

I'm trying to compile my program with --strict option and getting some errors in string.bas:


Code:
zxbasic/src/arch/zx48k/library/string.bas:124: error: strict mode: missing type declaration for 's$'

I just fixed and tried to create a branch and send a merge request to zxbasic git repository but I'm not authorized.


Thank you,
Rogerio

Print this item

  Johnny Bravo
Posted by: zarsoft - 02-11-2024, 11:20 PM - Forum: Gallery - No Replies

To play online, click HERE.

[Image: Johnny%20Bravo%20-%20Run%20Johnny%20Run%...oft%5d.png]

Print this item

  Version 1.7.2 released!
Posted by: boriel - 01-01-2024, 07:38 PM - Forum: ZX Basic Compiler - No Replies

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/

Print this item

Photo Mimex
Posted by: rbiondi - 12-31-2023, 11:08 PM - Forum: Gallery - No Replies

Hi,

I hope you and your families had a Merry Christmas.

I'm publishing this post before the end of this year (2023)  to announce a new game in development for the ZX Spectrum Computers (ZX Spectrum 128 and ZX Spectrum Next).

BOVESPA (B3) is the Brazilian Stock Exchange. It was formerly called "Bolsa de Valores de São Paulo"  before changing its name to B3 (Brasil, Bolsa, Balcão), founded on August 23, 1890.

If you want to know more about B3, follow this link.

MIMEX is a game inspired by the Magnavox Odyssey 2 game "The Great Wall Street Treasure Hunt" from the Strategy Series. 
Odyssey 2  was marketed here in Brazil by Philips and this was my first videogame.  I received it from my parents as a Christmas Gift, in 1983, with the large Wall Street box, that was the first game I played on this system. It was a deception because I was only 8 years old and could barely pass the Level 1 game (buy and sell stocks). But 40 years passed since then and now I'm older, stronger, smarter and faster Wink , and I'm finishing my MBA in Capital Markets and Investments, so I just wanted to recreate a much improved version of the childwood game with the following features:

- Buy and Sell Stocks (Level 1);
- Buy and Sell Treasure Bills (Improved Level2);
- Buying on Margin (Improved Level 3);
- Buy and Sell PUT or CALL Options (Improved  Level 4);
- IR (Investor Relations Events) - 1:2 splits, 2:1 grouping, dividend payments, judicial recoveries and bankruptcies;
- Much Improved Market Engine, written from scratch;
- Updated tickers (Brazilian B3);
- Updated news headlines; 

Other improvements in consideration:

- 4 Players (instead of the original 2 players);
- Game length selection (1 - 5 years) ;
- Other secret improvements to be disclosed in the future;

[Image: dI%2BeNV.png]

Best regards and a happy new year to all!
Rogerio Biondi


More info:

https://rbiondi.itch.io/mimex

Print this item

  Rounding float numbers to 2 decimal places
Posted by: rbiondi - 12-29-2023, 10:41 PM - Forum: How-To & Tutorials - Replies (2)

Hello,

I need to round or at least truncate a Float variable to 2 decimal places.
Do you know how this could be accomplished since there's no ROUND function?

Thank you very much,
Rogerio

Print this item

  Jesus versus The Romans
Posted by: zarsoft - 12-27-2023, 12:51 AM - Forum: Gallery - No Replies

To play online click HERE
[Image: Jesus%20versus%20The%20Romans%20(Boriel)...oft%5d.png]

Print this item