-
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... works best when printing at Y,X coordinates can be reduced to ... you had to print at Y,X coordinates in many places, you ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... you had to print at Y,X coordinates in many places, you ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... />
LET x=1:
LET y=1:
cursorcoordinates< ... /> PRINT OVER 1;AT y,x*7-3;"???????";#1;AT 0 ... ,0;a$(y,x):
NEXT s:
INPUT a$(y,x):
NEXT j:
...
LET x=x+(k=56)*(x1):
LET y=y+(k=54)*(y1 ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... use "PRINT AT y,x", rather than "PRINT AT x,y" which many other ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
I was curious about how many of these optimizations could be reused in the original "Single letter version". This is what I got:
a) Move PRINT score/lives to the beginning (thus we don't need to initialize m anymore);
b) Use IF/ ... -
How to rotate an imageI'm working on an idea for a game and to test it I want to draw some graphics on the screen which are made up of 8x8 pixel squares (single characters…
... /> DRAW CHARACTER(x,y) AT (x,y)
NEXT x
NEXT y[/code]
x = 0 to width
DRAW CHARACTER(x,y) AT (height-y,x)
NEXT x ...
NEXT y[/code]
How to rotate an imageI'm working on an idea for a game and to test it I want to draw some graphics on the screen which are made up of 8x8 pixel squares (single characters…
... /> X' = cos(90) * X - sin(90) * Y
Y' = sin(90) * X + cos(90) * Y
Which simplifies nicely to:
X ... ' = 0 - Y
Y' = X
By storing ...New oneliners for 2008[INDENT][INDENT][INDENT]Here's my attempt at a first-person-perspective 3d game in one line of BASIC. It's called 'wormhole', and you've got to get t…
... thinking in terms of y,x instead of x,y for PRINT AT co ...Packing numbers in as least memory as possibleI am writing some code for drawing vector lines etc. on the screen. These need to be stored in memory and I want to pack them in a smaller area as po…
... can draw into 4 directions (-x,-y) (-x,y) (y,-x) (y,x)
So the first ...St. Michael Micromasters: Computer GamesHi, The [URL="http://www.worldofspectrum.org/infoseekid.cgi?id=2000988"]St. Michael Micromasters: Computer Games[/URL] book doesn't currently have a…
... 720 let v=x(g):let h=y(g):gosub 5000:print ... r=a-j*x:let c=b-j*y:gosub 4000: ... r=a-j*x:let c=b-j*y:gosub 4000: ... /> 360 input"another go (y/n)";a$
370 gosub ... 3000:if a$="y" then goto 200
... /> 370 if x>1 then let x=x-1:goto 330 ...Weird Computer GamesBook Title: [B][URL="http://www.worldofspectrum.org/infoseekid.cgi?id=2000411"]Weird Computer Games[/URL][/B] Page: 3, Program: Tower of Terror - [U…
...
90 cls:let y=2
100 for ... i
210 let y=14
220 for ... br /> 280 let x=0:let y=0:gosub 560
y=3:let k=400:let x=6+2* ...
610 print at y,x;a$:return
620 ... play"
690 input x$:cls:return
700 ...Computer BattlegamesBook Title: [B][URL="http://www.worldofspectrum.org/infoseekid.cgi?id=2000080"]Computer Battlegames[/URL][/B] Authors: [B]Daniel Isaaman & Jenny Tyle…
... for x=1 to 8
490 print chr$(w(x,y));< ... br /> 500 next x
510 print ...
520 next y
530 ... /> 220 let x=j*64-i : let y=p-y(j)
... 230 if x>-1 ...A BASIC compiler projectHi, I started my own BASIC compiler for the ZX Spectrum (and Z80 machines) 3 months ago. It's still in ALPHA stage (when it is mature, I will write …
Here's a simple 'Catch the bricks' game...
[code]
10 LET A$=">_'orange' on a spectrumalways wondered why spectrums could never seem to achieve the colour orange? wasn't one of the default colours, and don't remember seeing anything th…
...
20 FOR x=0 TO 31: FOR y=0 TO 21 ... PRINT AT y,x;CHR$ 144;
40 NEXT y: NEXT x
50 ...'orange' on a spectrumalways wondered why spectrums could never seem to achieve the colour orange? wasn't one of the default colours, and don't remember seeing anything th…
...
20 FOR x=0 TO 31: FOR y=0 TO 21 ... PRINT AT y,x;CHR$ 144;
40 NEXT y: NEXT x
50 ...Bresenhams circle algorithmI post here my final circle code to replace, if you want, the one in the ROM. It only uses integer math and runs very fast and is very compact. It is…
... .org $8000
; x^2+y^2=r^2 represents the ... br /> ld d,127 ;x co-ord of centre
ld l,a ;L is y ; init to radius
... ;L is y
jr nc,end_circle ;While (y > x)
...
inc h ;H is x
jr Loop ; ...Print ATHello, Can someone please tell me how to do a Print AT command? Thanks,
PRINT AT Y,X;"Foo"
Where X is 0 to 31 and Y is 0 to 21 (assuming no funny poking around in the system variables...)Print ATHello, Can someone please tell me how to do a Print AT command? Thanks,
... 16
LD a,10 (x-coord)
RST 16
LD a,20 (y-coord)
RST 16
y,x not PRINT at x,y. The manual has ...How would you make Cybernoid a better game.Following on from the Cecco thread, it might actually be quite interesting to hear people?s views on how they would improve the recognised ZX Spectru…
... = shoot
; E2, multiplier, x, y
; $01/$FF = slowest< ... /> ; x = $01 for right, $FF for left
; y = $ ... $00, $FF, $00, $FF ; x, y, x, y
DEFB $00, $FF, $FF ... $00, $FE ; up 8 x 2 speed
DEFB $E2 ... $00, $FE ; up 50 x 2 speed
DEFB $E1 ...Best way to store vector images in Sinclair BASIC?Let's forget for a moment that Sinclair BASIC is slow. If I have a picture made entirely of vector images, what would be the best way to store that d…
... then peek and draw. as Y can never go beyond 192 ... /> (px,py = plot y,x) (dx,dy=draw y,x) (*=a switch)
so ... until you stumble upon a y=193 in the stream, then ...Rainbow Generator for 48K Spectrum using PUSHThis is what I came up with from [B]gasman[/B]'s suggestions. It's stable in ZXSpin and ZX32 simulating a 48K Speccy. Anyone like to try it on the …
... -ordiante use
; PRINT AT y,x; #4; "some text";. All 256 ...Rainbow Generator for 48K Spectrum using PUSHThis is what I came up with from [B]gasman[/B]'s suggestions. It's stable in ZXSpin and ZX32 simulating a 48K Speccy. Anyone like to try it on the …
... 2
PRINT USR plot, y, x, colour :
REM plot= 4x4 ... plotmc, y=ycoord, x=xcoord, and colour
y,x and colour can ... ,Y,X,INT(RND*8 ) : REM PLOT Y,X RANDOM COLOUR
50 NEXT Y ... : NEXT X: PAUSE 0 ...Goldfinch - an open software stack for mass storageYep, another pet project of mine to compete with all the others I've started. But hey, if I didn't get distracted by things like this I'd just get di…
... /> FILE *in;
unsigned int x,y;
/* Open the block ... (y = 0; y < 256; y += 16)
{
for (x = 0; x < 16; x ... ++)
printf("%02x ", buffer[y|x]);
printf ...Russian Translations...As i have once again been reminded (by the "Homebrew games" thread), there are some funky looking Russian games that I can't play due to not understa…
... two numbers are the location y,x (down, across).
16 mean ...
