-
Fast and easy read/write of attributes?What are the fastest or easiest ways to check the attributes of tiles on the screen, in BASIC? It seems to be a great way of storing object info. …
... /> 3 BORDER 1: PAPER 5: CLS: PAPER 7:
FOR y=1 TO 20: PRINT ... $ 18+CHR$ 1+CHR$ 17+CHR$ 0+CHR$ 16+CHR$ 2+"AB":
LET b$=CHR$ 19+CHR$ 1 ... +CHR$ 17+CHR$ 5 ... -
Dock's ZX Maze gameI'm hoping to finish a simple maze game in ZX Spectrum BASIC this week, as part of the Ludumdare Retro challenge. I used to dabble in speccy basic on…
... 3: RETURN
38 LET j1= 0: LET j2= 1: LET s=2 ... THEN
BEEP .03,-5: LET r=r+j1: ... 20,16; BRIGHT 1;CHR$ (CODE i$-11):
LET c=c+1 OR ... c=3: LET y$=SCREEN$(r ... =ATTR(r-1,k): PRINT z$;INK 5;x$: POKE ... /> 305 IF s="5" AND i$ -
Dock's ZX Maze gameI'm hoping to finish a simple maze game in ZX Spectrum BASIC this week, as part of the Ludumdare Retro challenge. I used to dabble in speccy basic on…
... 3: RETURN
38 LET j1= 0: LET j2= 1: LET s=2 ... THEN
BEEP .03,-5: LET r=r+j1: ... 20,16; BRIGHT 1;CHR$ (CODE i$-11):
LET c=c+1 OR ... c=3: LET y$=SCREEN$(r ... =ATTR(r-1,k): PRINT z$;INK 5;x$: POKE ... /> 305 IF s="5" AND i$ -
SpecBAS / SpecOS documentationHi, I just find out about SpecBAS and I was so impressed by the new functions while retaining compatibility with ZX Basic that I've been playing wit…
... broken or disabled in 0.809
ZXASCII
AUTO -1
20 PLOT SCRw/2,0: DRAW INK 7;0,SCRw
30 PLOT 0,SCRh/2 ... : DRAW SCRw,0
40 PRINT AT 0,30;"==";AT 3 ... /> 300 SPRITE OVER jj,5
310 SPRITE SHOW jj: ... -
Basic program malfunctionHello. Please does anyone know why this basic program 10 LET x=0 20 LET x=x+0.1 30 print x 40 if x<>1 then goto 20 50 STOP does not properly work o…
... ,76,204,204,204,
0.5 127,127,255,255,255 ... calculation loop is just line 20, everything else is just setup ... /> IF n(1)>=n(3) OR n(1)+n(2)>n(3) OR STR$ FN ... : DIM y$(mi+1+md): LET s=0
20 LET s=s ... -
Block RoutineHi Folks, I want to draw a block on the screen dependent on providing the X,Y,W,H values. I came up with the following: [CODE]100 LET l$=" …
... and ZX Spectrum+ Graphics" book 3 by Piers Letcher I came ... ,h,v)=USR 63000
2 REM FAST
10 CLS ... /> 22 PAUSE 0
25 LET i=FN a(5,5,20,15)
7011 DATA 0,9,86,1,8
7012 DATA 0,9,94 ... ,E
AND 7
OR A
RRA
RRA ... -
BLOG- ZXSporgBasic RPG development thread- Inspired by the Spectrum 30 show, and after a six-month wait while I was busy playing loads of gigs, I have decided to do a spot of Spectrum coding…
... a wall to 0 and a door to 1 in the maze ... straightforward to plot as INVERSE 0 or 1 when I draw the map ... sporg basic v0pt027 20140912
20 REM changes this version: print ... -
Game of Life.Last year (I think) or maybe the year before, I entered a Game of Life simulator into the CSS CGC compo but for the Sinclair ZX81. I decided to port…
... 0 or 1 neighbours then it dies.
[*]If a live cell has 2 or 3 ... with a small number of 1-or-2 phase shapes scattered around the ... LOAD "Life9cd"CODE cd
5 LET InitG=FN p(cd ... $(20,32): DIM p$(20*32*3):
LET g$(1)=n$: LET g$(20 ... -
Game of Life.Last year (I think) or maybe the year before, I entered a Game of Life simulator into the CSS CGC compo but for the Sinclair ZX81. I decided to port…
... 's checking "7" or "6", 21 should be 20.
[/list]
2):
LET GenPG=FN p ... 0,0; PAPER 1,,AT 21,0,,:
DIM g$(20,32): DIM p$(20*32*3 ...
21 PRINT AT 0,0;"move:5,6,7,8; mark:SPC ... -
Did Sinclair pioneer 'tiny' computers?Most computers of the time were fairly large-ish The Atari 8-bit, the Apple II, The c64 looks at least twice the size of the rubber key speccy. Th…
... .com, which may be more or less accurate. I didn't ... 21.8 x 19.2 x 3.2 cm, 0.246 kg
ZX ... 3 cm, 0.55 kg
Sord M5 26.2 x 18.5 x 3 ... 34.8 x 20.8 x 5.6 cm, 1.7 kg[/code ... -
Raycasting (3D Games!) with SpecBAS<div><font face="Arial, Verdana"><span style="font-size: 13.3333330154419px; line-height: normal;">Here's one I wrote just recently. I wanted to see …
... ) BASE 0: GO SUB 35040 LET px,py=1.5,rs=2,ms=.06 ... ,omx,omy,os,oh1,oh2=0,pla ... ;0,0 TO w-1,h/2 FILL : RECTANGLE INK 48;0,h/2 TO w-1 ... ,h-1 ... FILL 70 FOR x=0 TO ... -
Raycasting (3D Games!) with SpecBAS<div><font face="Arial, Verdana"><span style="font-size: 13.3333330154419px; line-height: normal;">Here's one I wrote just recently. I wanted to see …
And finally Part 3!
Here's the full ... the program (line 20). Set it to 1 if you want full ... BASE 0: GO SUB 37040 LET px,py=1.5,rs=2,ms=.06 ... ,omx,omy,os,oh1,oh2=0, ... pla=IIF(map(px+1,py)=0,0.001,90 ... SIN pla80 LET cx=2*x/w-1,rx=px,ry= ... -
Just Speccy 128Wow, got home and found that I have received a parcel from Zaxon containing a Just Speccy 128 PCB :-) B-)<br>Now all I need is a parts list, th…
... as it's all 5V or 3.3V circuitry. For these ... rated capacitors are fine (or a higher voltage as ... -3560100nF 50V Y5V-P-5-08mm-Suntan-Radial-Ceramic ... -3454100nF 100V X7R-P-2-54mm-Suntan-Radial-Ceramic ... voltage regulator chip, LM2596S-5.0 (5V output version), these ... -
Floating Point Package Math48<br>I came across a neat little floating point package for the z80 and I'm adapting it now to work with z88dk and sdcc. There is an interesting…
...
ftoh(a, out, -1, FTOA_FLAG_HASH);
printf("Float was ... or "546.43e-20", and hex floats as in "0xa.54p+2" or ... is in binary 1000.*2^(-4) = 0.1000 = 0.5 base 10.
0.b0523b1f1c * 2^(3) * 2^(-39)
< ... -
Features that are still wanted in Spectrum emulation.Features that are still wanted in Spectrum emulation. 4 USB joystick/gamepad input for real multiplayer games - Yes, Bomb Munchies.... - Sinclair 12…
... 55 is due to the +3 and +2A(black) will only ... be like the +2A and +3. The SAM’s built-in ... used to allow Sinclair 2 joystick (keys 1–5) as well, achieved by ... cheap nasty interfaces decode using ‒‒‒‒‒‒‒‒ / 0‒0‒‒‒‒‒ or ‒‒‒‒‒‒‒‒ / ‒00‒‒‒‒‒, though?
For ... -
Short & Amusing (was: Soduko Solver)Looking for some ideas for simple but fun programs, I came across this brute force soduko solver which might amuse: [code] // zcc +zx -vn -startu…
... to compile (about 15-20 mins with that optimization level ... movements. biyubi@gmail.com Nov/20/2009 |
| o On ... for final piece (3=N, 4=B, 5=R, 6=Q ... z
#define v X(0,0,0,21,
#define Z ... 2,6^y);Z nh|d?0:p,L-N,h+1,G[1 ... Z++O>98?O=20:e-O);P N+ ... -
Calling in some help?Hi guys. As you may know, I released the 'non beta' of the Vulcan expansion pack. OK so it ended up having a single minor, easily fixable bug. But…
... need a programmer permenantly or full time or anything. Once I' ... - Road network. 0 is up, 1 is across, 2 is down, 3 is back ... />
Currently, there are 5 areas of my snapshot which ... />
41127 supplies axis 0 20 beginning of road network at ... -
40 Column Printing RoutineI've written a 40 column printing routine, which I'd like to share... It's my first piece of 'public' code so go easy on me! I don't think it is a…
... add hl,de ; hl=hl*5
ex de,hl ; de ... call pch_to_screen
;; scan line 5
ld a,(hl) ; data ... ; mask AND screen
or b ; OR data
ld (hl),a ... 0
.byte 1, 66, 20, 136, 0, 2, 40, 158
.byte 11, 192, 3 ... -
ZX Spectrum issue 2 has only blue tintsRecently I've bought a 16k speccy and ran into some issues with it. Faulty keyboard, broken caps, no stable frequency, faulty lower RAM chip, it bein…
... FOR N= 0 TO 7
20 FOR M = 1 TO 3
... run it.
(2) Assume that the subcarrier frequency ... covered.
(5) If no colour can be ... the edge connector (underside) or at VR1 and VR2. Examination ... the 4A, 4B, 5 and 6A versions.[/quote] -
My new Punk music radio showHi folks, just posting that i now do a punk music radio show on the internet if anybody fancies a listen, i play punk, OI!, folk punk, goth, bit of t…
... /> 1. Ignite - Ash return (3:39)
2. The ... 4:52)
20. Patti Smith - ... - Personal Edge (0:59)
25 ... . Antisect - Education Or Idoctrination (2:03)
39 ... Troops of Tomorrow (5:38)
74. ... -
Dead issue 3b with black and white barsHi all, I've been donated an issue 3b which has some nice black and white bars with a few flashing blocks. I've done a few RAM tests and could spo…
...
Issue 3 (working):
1 3.1M
2 0
3 0
4 ... 8.2M
5 0
6 3 ... /> 1 3.3M
2 20 ohms
3 0
4 8.0M
5 0
or not I have no ... -
1986-2016.I'm early, but I'm tired of 1985. So here's the annual thirty-years after topic about Speccy games.
... totally monochrome. [b]0,5/5[/b]
[img ... that terrible. [b]1/5[/b]
Check ... and dull. [b]3/5[/b]
[img ... game on Speccy 2.0 actually? Which surprised ... frustratingly unplayable and / or unintentionally comical. Keep ... the last 15-20 years cos' of ... -
A z88dk + sp1 demo (with source)Since nowadays people are still wondering about how difficult it is to make something in z88dk, I thought I just put a very simple demo to show how e…
... {2, 2, 28, 20}; // full screen minus border
struct sp1_Rect levelbrect = {0, 0, 32 ... ,2,0},
{0,96,56,1,1}, {0,160,88,2,0}, {0,160,120,2,0}, {0,160,56,2,0}, {0,0,0,Opus Discovery "the big switch on" (after 20 years)I have a few of these Opus Discovery's with different Eproms in that have not been swiched for 15-20 years or so . I am in no rush to switch any on …
... 2.2
Version 2.2 retains all the features of 2.1 ... 1,253,127,175,243,237,121,195,234,0
20 ... br /> 3) CLEAR command ... disk or ram ... br /> 5) T channel ...A few questions about sound and keys in BASICIf I want sound in my BASIC game I have to use BEEP right ? It seems to lock up the CPU for far too long . On Arjun's page I found how to use CALL 94…
... it works:
$028e. 5 KEY_SCAN {001} the keyboard scanning ... pressing more than two keys, or pressing two keys and neither ... 1f 31 00011111
3 14 20 00010100 E 15 21 00010101 ... 03 3 00000011 Y 02 2 00000010 H 01 1 00000001 B 00 0 ...Anagram creation - not as easy as it looks?I'm writing a story and I have a mystery villain who is never revealed. My main clue was to have been that every alias he uses is an anagram of the f…
... 3 DEF FN p(a)=PEEK a+256*PEEK (a+1)
5 ... "then press ENTER ";a$
20 POKE 23658,8: INPUT "Name ... GO TO 20
21 DIM n(26,2): LET ... LET name=name+1: PRINT #0;AT 0,0;name,,AT 0,8;
< ... 0: IF n(c,2) THEN
LET n(c,2)=n(c,2)-1 ...
