Forum
Portal

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

Username
  

Password
  

Search Forums

(Advanced Search)

Forum Statistics
» Members: 262
» Latest member: iamrick9211
» Forum threads: 1,074
» Forum posts: 6,438

Full Statistics

Online Users
There are currently 382 online users.
» 0 Member(s) | 379 Guest(s)
Bing, Google, Yandex

Latest Threads
Exploring AP33 Coin's Imp...
Forum: News
Last Post: iamrick9211
Yesterday, 10:44 PM
» Replies: 0
» Views: 8
Strange Happenings
Forum: Bug Reports
Last Post: boriel
05-23-2025, 09:15 AM
» Replies: 4
» Views: 2,073
.tap file code not execut...
Forum: Help & Support
Last Post: Zoran
04-28-2025, 10:59 AM
» Replies: 4
» Views: 2,259
Exit from more than one l...
Forum: Wishlist
Last Post: Duefectu
04-23-2025, 10:06 PM
» Replies: 3
» Views: 1,909
put small ASM programs li...
Forum: How-To & Tutorials
Last Post: Zoran
04-18-2025, 02:02 PM
» Replies: 6
» Views: 4,508
Creating +3 Menus - Loadi...
Forum: Help & Support
Last Post: merlinkv
04-16-2025, 02:08 PM
» Replies: 6
» Views: 3,080
Randomize not very random...
Forum: Help & Support
Last Post: Zoran
04-08-2025, 10:40 AM
» Replies: 4
» Views: 2,918
Scope rules
Forum: Bug Reports
Last Post: Zoran
04-04-2025, 09:46 AM
» Replies: 2
» Views: 1,611
Using constants not allow...
Forum: Bug Reports
Last Post: baltasarq
03-19-2025, 10:00 PM
» Replies: 8
» Views: 4,019
404 page not found
Forum: Documentation
Last Post: boriel
03-08-2025, 07:16 PM
» Replies: 5
» Views: 4,902

 
  Different result than expected when poking to screen
Posted by: emook - 12-10-2016, 09:31 PM - Forum: ZX Basic Compiler - Replies (5)

Hello,

In normal basic we can do this following code :

Code:
10 BORDER 0: PAPER 0: INK 6: CLS
20 FOR i=1 TO 7
30 FOR y=0 TO 21
40 FOR x=0 TO 31
50 LET l=22528+x+y*32
60 POKE l,8*i
70 NEXT x
80 NEXT y
90 NEXT i

[Image: tK1VcJ5.png]

To fill the screen with the desired colour (I know this example seems pointless, but the same method to poke a screen char is used quite a bit for me)

however, in ZXB it only seems to pokes to the top third of the screen :

Code:
border 0
paper 0
ink 6
cls

dim i as ubyte
dim x as ubyte
dim y as ubyte
dim l as uinteger

FOR i=1 TO 6
FOR y=0 TO 23
FOR x=0 TO 31
l=22528+x+y*32
POKE l,8*i
NEXT
NEXT
NEXT

[Image: UdGaSL2.png]

Anyone know what I am doing wrong here?

Thanks!

Print this item

  [universal-ladybug] first test
Posted by: nitrofurano - 12-10-2016, 05:39 PM - Forum: Other Archs - Replies (1)

first test for the Universal Lady Bug arcade machine
( <!-- m --><a class="postlink" href="http://www.boriel.com/wiki/en/index.php/ZX_BASIC:Released_Programs_-_UniversalLadyBug">http://www.boriel.com/wiki/en/index.php ... salLadyBug</a><!-- m --> )



Attached Files
.zip   example01e_improving.zip (Size: 35.7 KB / Downloads: 944)
Print this item

  [omori-carjamboree] first test
Posted by: nitrofurano - 12-08-2016, 02:06 PM - Forum: Other Archs - No Replies

first test for the Omori’s Car Jamboree arcade machine
( the wiki page related to this thread is at <!-- m --><a class="postlink" href="http://www.boriel.com/wiki/en/index.php/ZX_BASIC:Released_Programs_-_OmoriCarJamboree">http://www.boriel.com/wiki/en/index.php ... arJamboree</a><!-- m --> )



Attached Files
.zip   example01f_improving.zip (Size: 32.05 KB / Downloads: 973)
Print this item

  [sun-markham] first test
Posted by: nitrofurano - 12-07-2016, 08:16 PM - Forum: Other Archs - No Replies

first test for the Sun-Markham arcade machine
( <!-- m --><a class="postlink" href="http://www.boriel.com/wiki/en/index.php/ZX_BASIC:Released_Programs_-_SunMarkham">http://www.boriel.com/wiki/en/index.php ... SunMarkham</a><!-- m --> )



Attached Files
.zip   example01d_fixingtiles_3bitdepth.zip (Size: 26.5 KB / Downloads: 923)
Print this item

  [taito-kusayakyuu] first test
Posted by: nitrofurano - 12-07-2016, 03:20 PM - Forum: Other Archs - No Replies

first test for the Taito-Kusayakyuu arcade machine
( the wiki page related to this thread is at <!-- m --><a class="postlink" href="http://www.boriel.com/wiki/en/index.php/ZX_BASIC:Released_Programs_-_TaitoKusayakyuu">http://www.boriel.com/wiki/en/index.php ... Kusayakyuu</a><!-- m --> )



Attached Files
.zip   example01d_improving.zip (Size: 35.14 KB / Downloads: 993)
Print this item

  Just a little test
Posted by: emook - 12-06-2016, 01:29 AM - Forum: Gallery - Replies (1)

Some IM music playback. Music converted with Autosirli from the mastersystem into Vortex Tracker, then some INS and OUTS.

[Image: tgxWTml.png]



Attached Files
.zip   combined_edited_3.zip (Size: 6.88 KB / Downloads: 1011)
Print this item

  Just something silly
Posted by: emook - 12-06-2016, 01:27 AM - Forum: Gallery - Replies (3)

[Image: tgxWTml.png]

Some IM music converted from the MS using AutoSirli and Vortextracker. Code could be massively optimised!

EDIT

source now available : http://zxbasic.uk/files/source.rar



Attached Files
.zip   combined_edited_3.zip (Size: 6.88 KB / Downloads: 958)
Print this item

  [olympia-dday] first test
Posted by: nitrofurano - 12-04-2016, 12:22 PM - Forum: Other Archs - No Replies

first test for the Olympia’s D-Day arcade machine
( the wiki page related to this thread is at <!-- m --><a class="postlink" href="http://www.boriel.com/wiki/en/index.php/ZX_BASIC:Released_Programs_-_OlympiaDDay">http://www.boriel.com/wiki/en/index.php ... lympiaDDay</a><!-- m --> )



Attached Files
.zip   example01e_improving.zip (Size: 30.31 KB / Downloads: 950)
Print this item

  [kiwako-mrjong] first test
Posted by: nitrofurano - 12-03-2016, 02:21 PM - Forum: Other Archs - Replies (1)

first test for the kiwako’s Mr. Jong arcade machine
( the wiki page related to this thread is at - <!-- m --><a class="postlink" href="http://www.boriel.com/wiki/en/index.php?title=ZX_BASIC:Released_Programs_-_KiwakoMrJong">http://www.boriel.com/wiki/en/index.php ... wakoMrJong</a><!-- m --> )



Attached Files
.zip   example01e_improving.zip (Size: 29.47 KB / Downloads: 1001)
Print this item

  [wing-superwing] first test
Posted by: nitrofurano - 12-02-2016, 06:08 PM - Forum: Other Archs - No Replies

first test for the Wing’s Super Wing arcade machine
( <!-- m --><a class="postlink" href="http://www.boriel.com/wiki/en/index.php/ZX_BASIC:Released_Programs_-_WingSuperWing">http://www.boriel.com/wiki/en/index.php ... gSuperWing</a><!-- m --> )



Attached Files
.zip   example01d_improving.zip (Size: 21.97 KB / Downloads: 944)
Print this item