ansaurus

Question

Help: ZX81 'BASIC' Peek function...

Answer 1

A:

Here is a link to the addresses of the ZX81 system variables.

It may help you?

Andy 2010-07-07 16:42:34

I need beginner advice :) :(

James Rattray 2010-07-07 17:33:11

Answer 2

A:

Wow does this go back. I haven't used a ZX81, but I did write some games on a TRS-80 way back in the day.

The inner part:

(peek 16398 +256*peek 16399)

is pretty much taking the value of two memory locations (8 bit) and creating a 16 bit

number from them, which is then used as the address of the outer peek; you might rewrite this as:

addrToCheck = (peek 16398 +256*peek 16399)

pixelValue = peek(addrToCheck)

if pixelValue = code "blackpixel graphic" then...

I'm guessing that the 'addrToCheck' value is actually the character position in the game, expressed as an address on the screen. So if the value is not a wall, then you would update the values in address 16398 and 16399 with a new character position (using a 'poke', no doubt).

Hope this helps

jackjumper 2010-07-07 16:59:54

Character position in the game? How would I set that up?

James Rattray 2010-07-07 17:27:51

By picking a memory location (or locations, apparently, according to the original source) to use, initializing it to whatever screen memory location you want the character to start at, and going for it.

jackjumper 2010-07-08 18:57:11

Answer 3

+2 A:

PEEK(PEEK 16398+256*PEEK 16399) is an idiom meaning “get the character number at the current PRINT position”. This works because the two-byte word at 16398 is used by the ZX81 BASIC/ROM to store a pointer to the memory location in the screen data block corresponding to the PRINT position.

So to do collision detection, you'd first have to set:

PRINT AT X,Y;

co-ordinates to where the > is about to move, then read

LET C= PEEK(PEEK 16398+256*PEEK 16399)

then you can print the > on-screen (overwriting the previous character whose code is now in C) if you want to before doing the check:

IF C=128 THEN ...

(I'm guessing the character you want is the all-black character 128, █.)

Oh boy, do I feel old.

bobince 2010-07-07 18:12:02

Ok thanks alot. Sounds perfect. Let me try it, one problem: You said 'print at X,Y' where is about to move? to you mean where it is now moving? -I'm confused how you can print it, then after the peek bit you comment 'then you can print the >' do you print it twice? =/

James Rattray 2010-07-07 21:33:24

Emailed you. :)

James Rattray 2010-07-07 21:56:14

`PRINT AT` without a string just sets the print cursor position.

bobince 2010-07-07 22:48:17

Wow, I never knew that =] Thanks alot. -Thats the advice i needed =]

James Rattray 2010-07-08 06:57:18

I tried that... Keep getting 'C= 211'? =/ with letters and black graphics =/

James Rattray 2010-07-08 07:07:38

Nvm I peeked it too many times. But still keep getting 0 now... =/ -peek of address 16777 is 0 =/

James Rattray 2010-07-08 07:09:45

Ah, try `PRINT AT X,Y;` with a semicolon on the end (updated answer). I think without the semicolon, it goes onto the next line, which might put your positioning off.

bobince 2010-07-08 09:14:39

Thanks, works... Perfectly. :) Thanks so much :) I would give you more rep if possible =] You deserve it :)

James Rattray 2010-07-08 11:46:01

ansaurus

tags:

views:

answers:

Help: ZX81 'BASIC' Peek function...

related questions