-
"Press any key" detectionWhat would be the simplest way to detect if *any* key is being pressed? No LAST_K trickery, I can't rely on that. It has to be reading the keyboard p…
[QUOTE=Crisis;734964]so you dont need ... />
(...)
5900 LET i=SGN PI: LET ii=IN 63486: IF ... GO TO 5900
5902 LET ei=ii-31
[/code ... />
10 LET A = IN 254 : IF A=191 OR A=255 THEN GO ... -
endless runner project..So I'm thinking of writing a small tutorial series on writing games for the speccy in C, and figured that an endless runner would be an easy example …
... ="Crisis;969901"]a simple "scroll" avoiding game that scrolls up is a ... br /> [code]
10 LET x=15: LET s=0
20 ... ;"*": PRINT
40 LET x=x+(INKEY$="p")-(INKEY ... $="o")
50 LET x=x+(x31)
... THEN STOP
90 LET s=s+10
... -
(Fixing) The Swordsman of Kraxis 7The Swordsman of Kraxis 7 ([url="https://worldofspectrum.org/software?id=0013314"]link[/url]) is an arcade adventure, from a type-in book (in BASIC).…
... a lot of text for now.
Anyway, let ... me just post a fixed version here (I ... /> 40 LET a$=INKEY$: IF a$>"e" AND a$5 AND g ... ****LEVEL 3****
1510 LET P=1
1515 RESTORE ... ",7
1695 LET V=0: LET P=2
... -
OUT to file, IN from fileOUT - sentences won't do much on emulators since they mostly communicate with external devices. If there was an emulator that would write the (last) …
... (last) OUT-ed value to a file and read the (last ... value, then someone could make a software version of his own ... instance :
You have built a standard IO-device that uses ... would read the value with LET A=IN 31.
In ... -
Scrolling string variablesCan anyone help me with this for a program I'm writing on the spectrum. There was a command in speccy basic that would let you scroll a string variab…
... speccy basic that would let you scroll a string variable left ... it?
eg
LET A$="ABCDEFG"
followed by this ... command would leave A$ then containing "GABCDEF" or ... The command might have been LET A$=A$+some expression, or something like ... -
ONELINER TEXTADVENTUREI had the idea to try to code a small textadventure in just one line of BASIC-code. Here is the result. Although short to play, have fun with it. [c…
... /> 10 LET c$=CHR$ 13: DIM r$(10,4
): LET a$="You ... are in a room."+c
$+"You ... 90),"0
.//",a$( TO 67)+"a key","05//",a
$( TO 67 ... found an exi
t","": LET p=1: FOR t=1 ... br /> "NSUR"(x)): NEXT x: LET t=t-1: N
An intriguing question...Well, intriguing for me anyway. As we all know, when calling a Machine Code function from BASIC, we use the USR (address) function. But for this to …
... all know, when calling a Machine Code function from BASIC ... needs to be preceded by a keyword:
... br /> PRINT USR xx
LET a=USR xx
... surely wouldn't matter for a one-off call). Or ... is it simply a question of personal preference?
Most pointless type-in?I think it was one I saw, probably in Program Pitstop(which mag did that?), to evaluate a string as a full expression, a la the Beeb: spend hours typ…
... that?), to evaluate a string as a full expression, a la the Beeb ... in the thing, then do a RANDOMIZE USR something to evaluate ... prefer, spend two seconds typing LET A=VAL A$, which does exactly the ... saw to "give" the Speccy a capability that was already built ...String slicing for UDG definitionHey everyone. Got a bit of a string slicing/string to variable conversion problem. 10 let a$="01100110" 20 let pokevalue=???? What expression do I…
Hey everyone.
Got a bit of a string slicing/string to ... .
10 let a$="01100110"
20 let pokevalue=????
What ... of the binary expression in a$?
I know ... or VAL$ somewhere, but being a little rusty in the old ...ZX-81 Ram Pack problemHi! I know this is a ZX Spectrum forum, but I am hoping someone here might be able to help me out... I have posted this to c.s.s. but noone was able…
... /> it won't even let me type the first line ... OK also.
I let the machine run for 25 ... 19456 STEP -1
20 LET A = INT(RND*255)
... N
And let it run - NO ERRORS whatsoever ...
addresses ? or even a possibility of 16k RamPack being ...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 …
... .
Here's a tip how to avoid this ... defaultvalue of an IN in a variable, something like this:< ... GO SUB 1000
20 LET A=IN 32766 : REM or ... REM INITIALISE DEFAULT
1010 LET A=IN 254 : REM ALL ... KEYS
1020 LET DEF=255
1030 IF ...Amazing Short Type-InsHey all ! Been having some pretty stressfull days lately so I tought I would type in some games. There was a very nice type-in book here in Slovenia…
... some games. There was a very nice type-in book ... POKE USR "a"+f,t: NEXT f
30 LET b$="8 ... CLS
40 LET x=10: LET y=19: LET a$=""
50 FOR ... f=10 TO 19: LET a$=a$+"10 ... SUB 220
70 LET z$=INKEY$: IF z$> ...Which would be fasterSay you want to use a variable value of 0 to 255 in a BASIC program, which way would be fastest? Say for arguments sake you wanted to use two variabl…
Say you want to use a variable value of 0 to ... 255 in a BASIC program, which way would ... b, like so:
LET a = b
or ... / PI
and if a function like in example 3 ...Bug in CONTINUE?I've found this anomaly in Spectrum Basic, but I don't remember have seen it in lists of ROM bugs: 10 FOR i=1 to 3 20 PRINT i 30 IF i=2 then PRINT a…
... IF i=2 then PRINT a
40 NEXT i
LET A=7
CONTINUE
C ... i=2 then PRINT ; : PRINT a
CONTINUE works as ... expected.
It's a known bug?IN bug detected todayAnyone familiar with this IN bug on the real machine. In FUSE I didn't get the same effect. Due to this bug my new ONELINER doesn't work. :( [code] …
... . :(
[code]
10 LET A=INT(IN 254/8)*8 ... ,0;IN 63486-A'IN 64510-A'IN 65022-A: GO TO 20 ...ONELINER : Finger TwisterFINGER TWISTER Do you all know TWISTER, that crazy game where you had to place your left foot on yellow, your right hand on green etc. etc. Well, n…
... br /> [code]
1 LET s=0: LET a=INT (IN 254/
32)*96: LET v=3 ... : DIM b$(3,6): LET c$="12345": F
OR ... QWERTASDFG"(y*5+x-5): LET b$(y,7
... s,"Lives="
;v: LET k=IN 63486-VAL b ... $(
3)-a: LET k=k=0: LET s=s+k ...+D and RAM Turbo interfaceJust a quick note to let a few guys in particular know that my RAM Turbo does in fact work with my +D interface. I checked continuity through the RA…
Just a quick note to let a few guys in particular know ... /> Now, I used to have a second RAM Turbo, and of ... course, my +D interface is a clone. The other RAM Turbo ... Turbo interfaces don't have a proper through port.
TAB not rightHi all, I am trying to get a print out on my Spectrum+2B. example:- 10 LET a$="Test" 20 LET b$="128k" 30 LPRINT a$;TAB 18;b$ I am trying to get it …
... /> I am trying to get a print out on my Spectrum ... :-
10 LET a$="Test"
20 LET b$="128k"
30 ... LPRINT a$;TAB 18;b ... one line and the 128k a line below.
What am ...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…
... Here's my attempt at a first-person-perspective 3d ... I'm sure the final LET t statement could be ... comfortably under one screen as a listing.[/INDENT][INDENT]Newbie ... as copied from BASin into a text file. There should ... CLS :\
READ o$,n,a,c,m:\
FOR t ...Computer & Video Games Book of Adventure, TheBelow is the spectrum listing from the "[URL="http://www.worldofspectrum.org/infoseekid.cgi?id=2000078"]Computer & Video Games Book of Adventure, The…
...
50 LET pn=0: LET in=1: LET ct=0: LET q$(2 ... here?": LET a$="run"
60 LET u$="takdrolooexapulchoopeclotiejumswieat"
70 LET f$="norsoueaswesup ... )=4 THEN LET p(4)=9: LET o$(4)="Tree": LET n(4 ... )=4: LET c(4)=-1: LET q$(4 ...Just wrote my first useful working Speccy BASIC program in years...A nice UK National Lottery number generator. And not just any lotto number generator either. This one generates 8 lines of 6 numbers without replace…
... idea for this a while back. There was a story in ... 6). Apparently he won a few grand and made it ... REM
90 LET c=1
100 LET numbersleft=49
105 REM a is the number ... 1 TO 49
130 LET a(n)=n
140 NEXT ...reading Hex[code]1 DIM a$(20,20) 2 DIM g$(16) 3 LET g$="\::\ \' \ '\ .\. \.:\:.\:'\':\''\..\: \ :\'.\.'" 4 BORDER 4 20 LET a$(1)="00000000000000000000" 21 LET …
... a$(20,20)
2 DIM g$(16)
3 LET ... /> 20 LET a$(1)="00000000000000000000"
21 LET a$(2)="0011111A111111110002"< ... basic to read hex as a number value
A = the number 10
A' will point to the ...Usr 0 ?I'm not sure I've ever seen this explained before, but why do some programs (only demos, as far as I can see, so far) need USR 0 mode when run on a 1…
... 0 mode when run on a 128K Spectrum?
... same as PRINT USR 0, LET a=USR 0, etc, of course ... , and the result is a 128K mode but with the ... to type USR 0? Surely a demo (or any other ... program that might require a USR 0 style setup) could ...[BASin] Bug report and question[B]1. Bug report:[/B] BASIC Editor behavior I'm using a variable to store the contents of the BC register. But the BASIC editor works strangely. I t…
...
I'm using a variable to store the contents ... position):
[code]10 LET a=USR 32000
20 PRINT ... a@[/code]Now, when I hit ... ]10 LET a=USR 32000
2020 PRINT a
@
print a[/code ...Couple of questions...Howdy, 1. Is there a decent way to get a random number in BASIC/MC? I've been using LET a=INT(RND*2)+1 but the numbers tend to stay at 1 or 2 most …
... 1. Is there a decent way to get a random number in ... ? I've been using LET a=INT(RND*2)+1 but ...
2. If I have a PAUSE statement after an INKEY ... $ statement, then when a key is pressed it passes ... statement. Is there a way to clear a keypress so that ...MOD calculator function?How do I for example, do LET a=(MOD n,9). I can do it a long winded way using cross-addition until the answer is a single digit. So 13763 MOD 9 wou…
... do I for example, do LET a=(MOD n,9).
I can do it a long winded way using cross ... -addition until the answer is a single digit.
So ...Vector font in BASiCHi guys) Some fifteen years ago I saw a quite short BASIC prog that could simulate a vector font with size/ thickness/ italicization params. I remem…
... : LET a$="VARIATIONS": LET y=54: LET x=80: LET o=1: LET t=2: LET l ... : LET a$="JFMAMJJASOND": LET y=4: LET x=24: LET o=1: LET h=1: LET l ... LET a$="HOWEVER OTHER": LET y=10: LET x=100: LET o=1: LET h=1: LET ...
