-
ZX81 Basic questionI just got a ZX81 off Ebay and when it arrived it has an Atari joystick hardwired into it. It does work as moving the joystick replicates certain key…
... a label with the following PEEK values on it.
PEEK 16421
up = 239 ... to go about incorporating those PEEK commands into a simple program ... screen, I never really used PEEK commands when basic programming and ... -
48k to 128k upgrade - problemsHi friends! I built 128k upgrade according to the [url]http://hw.speccy.cz/128krebuild.html[/url]. After I powered on my Speccy it said hello with s…
... program and without DivIDE? PRINT PEEK 23732 + PEEK 23733 * 256 gave me ... -
saving part of a BASIC programHere's a short routine to save part of a BASIC program. The idea is that it can be merged into a program and then used to save sub-routines, etc. to …
... /> DEF FN p(a)=PEEK a+fg*PEEK (a+1)
9990 ... =l1:
LET l1=PEEK a0*fg+PEEK (a0+1):
LET ... -
Cronosoft Inlays - Wanted! Missing in the archiveI was using Infoseek for a wjile and realized that there are many of the inlays from the games released by Cronosoft missing. I have them, most of t…
Stuff found in Sherlock's box.haha who can make the best joke! Seriously though, had a peek inside the box before I put it on ebay and there was a load of pieces of (what I assum…
... />
Seriously though, had a peek inside the box before I ...Game GuidesDo you buy game guides? I know some people buy them at the same time they buy the game which seems a bit pointless really. The only time I bought on…
... couldn't help having a peek at the guide if I ...Amazonia (BUGFIX)This is a bugfix for game [URL="http://www.worldofspectrum.org/infoseekid.cgi?id=0027280"]Amazonia[/URL], please add the following "known errors" des…
... =40645 TO 40662: POKE f,PEEK (f+2): NEXT f: POKE ... =43762 TO 43815: POKE f,PEEK (f+1): NEXT f: POKE ...storing machine code in BASICA couple of years ago I posted a routine for storing machine code between PROG & VARS, based on an idea in Toni Baker's "Mastering Machine Code". Thi…
... /> DEF FN p(a)=PEEK a+256*PEEK (a+1):
DEF ... /c starts: ";mc'"NOT " AND PEEK (mc-2)13";"OK": STOP ...Spectrum 48K - upper memory MIAI have recently acquired a ZX Spectrum which, according to the sticker on the bottom, should be a 48K model. It's an Issue 3 board, with upper memory…
... see the extended memory. PRINT PEEK 23732 + PEEK 23733 * 256 returns 32767 ... . PRINT PEEK 23733 returns 127.
...more on storing mazesPrompted by Wookiee's escapades, I've been pondering on how to use DATA statements directly for displaying background graphics, thus avoiding the dup…
... & modified in situ with PEEK & POKE (m$(n) can ... DEF FN p(a)=PEEK a+256*PEEK (a+1):
DEF ... 2)-1
73 IF PEEK a>=217 THEN
POKE a,PEEK a-201: POKE a+1 ... 172 THEN
POKE a,PEEK a-150: POKE a+1 ...stuck on recursive functionI want this function to PEEK 'l' bytes from memory starting at 's' and return them as a string, but however much I fiddle about with quoting and pare…
I want this function to PEEK 'l' bytes from memory starting ... FN j$(s,l)=CHR$ PEEK (s)+VAL$ "FN j$(s ...Multicolour demo using z88dk + BIFROST* (+source)This is just a demo to show how to show multicolour using z88dk, using the BIFROST* engine (more info [URL="http://www.worldofspectrum.org/forums/sho…
Issue 3B only sees 16k (and RAMTOP NO GOOD on loading)A ZX+ with issue 3B board that i got recently, does not see anything more than 32768 (sometimes 37267..) on "PRINT PEEK 23732 + PEEK 23733 * 256 (Ent…
... 32768 (sometimes 37267..) on "PRINT PEEK 23732 + PEEK 23733 * 256 (Enter)".
Difficult to find upper RAM fault.I've recently repaired an issue 3B 48K Spectrum that had a tricky to diagnose upper RAM fault, so I thought I'd post a report of what I found here. …
... for a 48K Spectrum. Using PEEK to examine the system variable ... it to various values and PEEK to see whether the RAM ...Speed tip - "e" notationHi Folks, Whilst reading my "new" Sinclair ZX Spectrum BASIC manual I came across "e" notation again. In MRT I have the following line which is use…
... h=([COLOR="Red"]65536[/COLOR]*PEEK [COLOR="red"]23674[/COLOR ... ]+256*PEEK [COLOR="red"]23673[/COLOR]+PEEK [COLOR="red"] ... m=([COLOR="red"]65536[/COLOR]*PEEK [COLOR="red"]23674[/COLOR ... ]+256*PEEK [COLOR="red"]23673[/COLOR]+PEEK [COLOR="red"] ...Screen2StringFurther to writing that BASIC one-liner to redirect CAT to a string I thought that I'd do a general redirection routine for anything which normally p…
... DEF FN p(a)=PEEK a+256*PEEK (a+1): DEF FN ...enhanced GOSUB/GOTO (in BASIC)Further to my previous post under "BREAK from GOSUB" here's the two ideas mentioned there put together. Note that to keep it quick it expects the DEF…
... ): DEF FN p(a)=PEEK a+256*PEEK (a+1):
DEF ... p(gs):
LET gss=PEEK (gs+2): IF FN p ...Dimming the screen...Hi Folks, I was hoping someone on here could help me with a wee machine code routine. I have written the following example in BASIC: [CODE]100 REM…
... 23231: POKE a,PEEK a-(64 AND PEEK a>64): NEXT ...Spectrum 48K - upper memory problemsHi I have a ZX Spectrum 48K issue 3B which does not see upper memory. On PRINT PEEK 23732+256*PEEK 23733 i got result 32767. POKE 32768,85 and PRINT …
... br /> On PRINT PEEK 23732+256*PEEK 23733 i got result ... POKE 32768,85 and PRINT PEEK 32768 gave result 95< ... POKE 32768,170 and PRINT PEEK 32768 gave result 170
PEEK 32768 gave result 10< ... br /> PRINT PEEK 32769 and above (to ...A "bit" of a curiosityHaving to use a bit of m/code to do the AND in that key check function, I was prompted to revisit the "AND,XOR,OR,...for BASIC" topic and came up wit…
... /> RESTORE llll: LET da=PEEK 23639+256*PEEK 23640+8:
POKE ...Issue 2 headache!Ive got an issue 2 here that firstly had a blown regulator (fixed), now its reading as a 16k machine (its fully populated), ive replaced and socketed…
... no faults, but typing PRINT PEEK 23732 + PEEK 23733 * 256 I get ... type POKE 44052,85 : PRINT PEEK 44052, answer=85
Followed ... by POKE 44052,170 : PRINT PEEK 44052, answer=170
Ideas for speeding up this BASIC routine?This loop can take up to 2 minutes to run, depending upon the content of the screen being scanned, about 70% of that time being taken up by lines 105…
This loop can take up to 2 minutes to run, depending upon the content of the screen being scanned, about 70% of that time being taken up by lines 1055 (50 secs) & 1075 (35 secs). Any suggestions on how to speed up those two parts (other than rewriting ...Query about memorySo I know this has been asked a lot and I beg your brief indulgence. I have scanned through a lot of old threads already but I'm trying to improve m…
... check,
[QUOTE]PRINT PEEK 23733 and then [ENTER]
PEEK 23733. 127 could be an ... board. Which is correct, can PEEK 23733 ever return 128?
saving time populating large arraysI use a variation on this idea for storing machine code at the end of programs without interfering with LIST, then it occurred to me that it would al…
... DEF FN p(a)=PEEK a+256*PEEK (a+1):
DEF ... (vars):
POKE 23627,PEEK 23670: POKE 23628,PEEK 23671: PRINT "d ... (vars):
POKE 23627,PEEK 23670: POKE 23628,PEEK 23671: PRINT "d ... STEP -1: LET sum=sum+PEEK (vars-offset-n)*n: NEXT ...Asking for help: ZXBC to ASM routine translationHallo, In order to save some bytes and gain speed, I'm asking for translation of a very simple ZXBC routine to Assembler [code] sub light(x as uinteg…
Hallo,
In order to save some bytes and gain speed, I'm asking for translation of a very simple ZXBC routine to Assembler
[code]
sub light(x as uinteger,y as uinteger,intensity as ubyte)
dim adr as Uinteger
if xRaffaele Cecco in html5 book authoring shockI wasn't sure where this belonged, but felt I had to share it somewhere, I was just looking around for a techie book on html5, and my jaw dropped on …
... uses, basically to have a peek inside his mind (I'm ...A 128 Routine to Put Tokens in StringsI was writing a DEF FN on the +128k and decided that I'd had enough of not being able to put function tokens in strings without a great palaver and s…
... ):
LET la=256*PEEK (a+1)+PEEK (a+2): LET ll ... b=b+1: LET p=PEEK b: IF p=14 THEN ... /> DEF FN p(a)=PEEK a+256*PEEK (a+1)
[/code ...16k --> 48kI bought a zx and found out it was a 16k since when I execute PRINT PEEK 23733 I get 127 Does it mean I get a lesser model? What limitations do I h…
... when I execute
PRINT PEEK 23733
I get 127 ...
