Am I doing this correctly? (Jupiter Ace)

[Crayon21]

I'm reading the Jupiter ace manual on redefining graphics and this segment has me stumped:
https://k1.spdns.de/Vintage/Sinclair/80 ... amming.pdf (page 71)

I define GR as stated

: GR
( 8 row numbers, ASCII code ` ) <--- confused about this bit
8 * 11263 + DUP
8 +
DO
I C! -1
+LOOP
;
GR expects 9 numbers on the stack. The top one is the ASCII code of the character
you want to redesign — 1 in our case — and the other eight are numbers describing
the eight rows of dots. The top row is furthest down in the stack, and the bottom row is
second from the top in the stack. To stack these eight numbers, type in

2 BASE C!
00000100
11110010
00010010
00011111
00100001
00100001
11111111
01100110
DECIMAL

Now all you need to type is 1 (for the ASCII code) and GR, and the character with
code 1 will be redesigned as an engine.

Then I do 1 and GR but the character doesn't come out. I wrote the program exactly as stated but I'm confused. Do I enter the number one after the other with the return key or so I just write them down one after the other? does it have to be in parentheses? The manual isn't clear on this, So I have come to you. 1 is the character code for A.

The manual isn't the worst out there but it's obviously not very helpful. I prefer the zx81 manual by steve vickers or the one that came with the vic 20.

[mrtinb]

In Forth, everything in parenthesis is a comment, like REM in Basic. I'm sure that is written in the book.

[1024MAK]

GR is the name of the word you have just defined. It defines the bit pattern.
To display the character use

Code: Select all

1 EMIT

Mark

[Crayon21]

In Forth, everything in parenthesis is a comment, like REM in Basic. I'm sure that is written in the book.

thanks for the help guys