-
VariablesVariable Help: Can BASIC discriminate between odd and even variables? If so, what simple syntax can express it?
... /> 10 DEF FN m(x,y) = x - INT (x/y) * y
20 PRINT FN m ... -
Strange layout of Spectrum video memoryHello, does anyone have an idea why the Spectrum's video memory has such a strange layout? I understand that a resolution of 256x192 is an easy mean…
... /> 0 1 0 t t Y Y Y y y y x x x x x
Sinclair layout:
0 1 0 t t y y y Y Y Y x x x x x
[/code]
Where ... no.
YQuickest Assembly to find if point in rectangleWhat is the fastest way to see if a point is in a rectangle. e.g rectangle is 10,10 100,10 100,40 10,40 how do i know if a point (e.g 20,20) is in…
... bottom right)
; b=x , c=y (x,y point to test)
; if x>=x1 then
; if x=y1 then
; if yQuickest Assembly to find if point in rectangleWhat is the fastest way to see if a point is in a rectangle. e.g rectangle is 10,10 100,10 100,40 10,40 how do i know if a point (e.g 20,20) is in…
Cool BASIC tricks and tips!Following on from Dunny's excellent suggestion of a compendium of BASIC tips + tricks, I believe it would be better to have a topic dedicated to it. …
... ...).
10 LET x=0: LET y=10
20 LET ... s$
40 PRINT AT y,x;s$(f); FLASH 1;"|"; FLASH ... x=x+1
70 IF x>31 THEN LET x=0: LET y=y ... +1
80 NEXT f
x and y ...Cool BASIC tricks and tips!Following on from Dunny's excellent suggestion of a compendium of BASIC tips + tricks, I believe it would be better to have a topic dedicated to it. …
...
Chr$ 22 = At 22,y,x
Chr$ 23 = Tab 23 ... ,x
Chr$ 24-Chr$ 31= ...udg collision detectionhow do I detect a collision between udgs in basic?
... ]
10 LET X=10 : LET Y=14 : GO SUB 1000 ...
1010 LET A=SCREEN$(Y,X)
1020 POKE 23606,0 ...BASIC question (in both ways)hi, im fairly new to spectrum stuff.. I bought one a couple of days ago.. im trying to write a basic program that opens a window (drawn with DRAW com…
... 10 LET X=100: LET Y=100
20 PLOT X,Y: DRAW 50 ... /> 30 PRINT AT 21-(y/8),x/8;"Hello"
Y,X instead of X,Y. The Lowres screen ... you need to divide the Y by 8, and then ... subtracting from 21. The X coordinate is a straight divide ...IN command in BASIC to read keyboardThis weekend on a Sinclair meeting we had some BASIC-games using IN to control the character. The maker of the game assumed that the result of an IN …
...
20 CLS : LET x=15: LET y=11: LET ox=15 ... =11
30 PRINT AT y,x;"*": IF OXX OR OYY THEN ... ;" "
35 LET OY=Y: LET OX=X
40 IF IN ... left=leftin AND x>0 THEN LET x=x-1
50 ... =RIGHTin AND x0 THEN LET Y=Y-1
70 IF IN ...print at line 22 and 23I have a faint recollection of POKES to allow print at 22,x and 23,x, anyone know what they are? (rather than using the print #0 #1 stuff..)
My way to print at line 23:
[code]
10 POKE 23659,0 : IF Yprint at line 22 and 23I have a faint recollection of POKES to allow print at 22,x and 23,x, anyone know what they are? (rather than using the print #0 #1 stuff..)
What am I writing , I use this method in MC.
In BASIC I would do this:
10 IF YProblem with rotating procedureHi folks! I wrote a proc in z80 asm, based on: x' = x * cos (z) - y * sin (z) y' = x * sin (z) + y * cos (z) I used a precalculated table of sin a…
... /> [code]x = x - y>>n /* for some constant n */
y = y + x> ...Graphics in Basic??What is the fastest way to draw high rez graphics in Basic. Andrew.
... SET1
110 PRINT AT y,x;"ABCDEFGH"
120 PRINT AT ... ;"IJKLMNOP"
130 PRINT AT y+2;"QRSTU";
140 GOSUB ... "ABC"
160 PRINT AT Y+3,x;"DEFGHIJK"
[/code]
Who knows how to program a "pathfinder"?Hi all. I like to play games like "Colour Lines" and I think, I will create a version of this game for the SAM Coupe. It looks easy - until this "dam…
... PRINT AT y,x;"."
420 LET y$=b$(y,x,1): LET x$=b$(y,x,2 ... )
430 IF x$" " THEN LET y ... =VAL y ... $: LET x=VAL x ...New Scumball 2 game!This game was posted in another thread some time ago now but after the ongoing Cybernoid discussion I thought I'd just overhaul the graphics a little…
... objects
db 8, 5 ; y,x
db 5, 25
db 8, 8 ;y,x
[/code]Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
... printed in basic at coordinates x and y?
For example ... x=15: let y:11
20 print at y,x; "K"
X ... will be moving between 0-31 and y ...Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
In BASIC:
[CODE]
DEF FN a(y,x)=16384+x+(y-INT (y/32))*32+INT (y/8)*2048
[/CODE]Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
... FN a(y,x)=16384+x+(y-INT (y/32))*32+INT (y/8)*2048
y,x)=16384+x+(y-INT (y/8)*8)*32+INT (y/8)*2048 ...Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
... function that actually copies an Y,X screen coordinate directly unto a ...Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
... FN a(y,x)=16384+x+(y-INT (y/8)*8)*32+INT (y/8)*2048 ... /> DEF FN a(y,x)=16384+x+32*y+1792*INT(y/8)
[/code ...Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
For a function that gives you each line too:
[code]
DEF FN a(y,x,l)=16128+x+32*y+1792*INT(y/8)+l*256
[/code]
Where l takes the values 1 to 8. Change the 16128 to 16384 if you want to use 0-7 for the line numbers.Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
... FN a(y,x)=16384+x+(y-INT (y/8)*8)*32+INT (y/8)*2048 ...Getting scr addresses from x and yCould someone please tell me how to calculate the 8 screen addresses corresponding to a character printed in basic at coordinates x and y? For examp…
... can
a) handle your (y,x) to screen address and
x and y
getaddr:
... copy the character located at (y,x) on the screen
; ... x defb 0 ; x character position (input; 0-31)
y defb 0 ; y ...
