Search found 2187 matches

by XavSnap
Sat Mar 22, 2025 2:22 am
Forum: Spectrum BASIC
Topic: Fill subroutine for Spectrum BASIC
Replies: 5
Views: 454

Re: Fill subroutine for Spectrum BASIC

Yep! Just place several filling points... Were is the UDG filling solution, by create a "rectangle" subroutine how put solid 8x8 pixels blocs. And tag triangulars UDG blocs on the vectorial lines... It's faster, but can't fill all over include surfaces. An ASM routine is slow too, but more convenien...
by XavSnap
Fri Mar 21, 2025 7:30 am
Forum: ZX BASIC
Topic: Is this a typo?
Replies: 4
Views: 435

Re: Is this a typo?

I dryed to type it... A RUN save the program, but stop after the "LET BET=100" command. (0/2)! The gosub line can't be deleted, edited or launched. It's a bug? :ugeek: No... Just move extra lines to the proper location, and the game will init the Variables. The program can't launch the initializatio...
by XavSnap
Fri Mar 21, 2025 6:46 am
Forum: ZX BASIC
Topic: Is this a typo?
Replies: 4
Views: 435

Re: Is this a typo?

Hi, You can't enter lines without poking the line data index. You had to renum the type-ins lines or move extra lines: 1 REM BLACKJACK 2 GOSUB 7999 3 LET B$="..." 7999 LET BET=100 8000 ... 9998 SAVE "BLACKJACK" 9999 RUN Then Line 2 is protected from the LIST/EDIT command. "LIST 2" will point to the ...
by XavSnap
Fri Mar 21, 2025 6:27 am
Forum: Spectrum BASIC
Topic: Fill subroutine for Spectrum BASIC
Replies: 5
Views: 454

Re: Fill subroutine for Spectrum BASIC

10 CLS:CIRCLE 100,100,50 20 LET X=100 30 LET Y=50 40 GO SUB 1000 50 STOP 1010 LET MIN=X:LET MAX=X 1020 IF POINT(MIN-1,Y) THEN GO TO 1050 1030 LET MIN=MIN-1:GO TO 1020 1050 IF POINT(MAX+1,Y) THEN GO TO 1100 1060 LET MAX=MAX+1:GO TO 1050 1100 PLOT MAX,Y:DRAW MIN-MAX,0:LET Y=Y+1:IF POINT(X,Y) THEN RET...
by XavSnap
Fri Mar 21, 2025 5:19 am
Forum: Spectrum BASIC
Topic: Fill subroutine for Spectrum BASIC
Replies: 5
Views: 454

Re: Fill subroutine for Spectrum BASIC

Code: Select all

  10 LET a=0
  20 LET a=a+1
  25 PRINT AT 0,0;a
  30 GO SUB 20
  40 PRINT a
Spectrum 16k: 2876 calls
Spectrum 48k: 13801 calls
by XavSnap
Fri Mar 21, 2025 4:59 am
Forum: Spectrum BASIC
Topic: Fill subroutine for Spectrum BASIC
Replies: 5
Views: 454

Re: Fill subroutine for Spectrum BASIC

Hi, Yes, at each GO SUB, the BASIC store the line number at the top of memory and add this data each time. The RETURN delete the previous data and swap to the last one. This code use the GO SUB stack and add 3 bytes at the top of the RAM for each GO SUB. A thousand call without RETURN take two thous...
by XavSnap
Fri Mar 21, 2025 12:21 am
Forum: ZX BASIC
Topic: Is this a typo?
Replies: 4
Views: 435

Re: Is this a typo?

by XavSnap
Thu Mar 20, 2025 6:53 pm
Forum: Hardware
Topic: Timex 2068
Replies: 6
Views: 776

Re: Timex 2068

On the Spectrum emulator, try to feed the RAM with a DIM.

10 DIM A$(15500)
RUN

And try to test upper values.to get the "Out of memory" error, to test the upper memory.
by XavSnap
Thu Mar 20, 2025 6:42 pm
Forum: Hardware
Topic: Timex 2068
Replies: 6
Views: 776

Re: Timex 2068

This screen seem to be a faulty RAM, but the diagnostic ROM is ok. Try to check the RAM power supply, and change the faulty capacitors if there are any. Check the BASIC ROM pins if on chip support.(unplug and replug it) Check the RAM chips too. Schematic: https://www.timexsinclair.com/wp-content/upl...
by XavSnap
Thu Mar 20, 2025 12:59 am
Forum: Hardware
Topic: Timex 2068
Replies: 6
Views: 776

Re: Timex 2068

Hi, Try to put a cardboard or piece of paper (1mm thickness and electrical insulator) in the ROM edge connector, and restart the computer. If the computer run the BASIC ROM, you had to change the femal edge connector on the mother board. Two pins seem folded, and are shortcuted in the connector when...