peek - ヘルプ: ZX81 'BASIC' Peek 機能…

Question

印刷された文字のコードを見つけたい...

これはコードです：

10 Print AT 2,2; "T"
20 Let C=Peek(Peek 16398+256*Peek 16399)
30 Print Peek(C)

Tのコード値を出力するだけです

後で使用できます：

40 Print Peek (Code C)

か何か。

しかし、10-30 ビットは機能しません。常に '0' を返します - 異なる文字でも: G,T 'black graphic' と M,

私は何を間違っていますか？

-衝突検出に使用されます。

score 1 · Accepted Answer

jdehaanの右、T末尾なしで印刷すると、印刷後;にカーソルが次の行に移動します。（を使用;すると、右に1つの位置になります。）

書いたばかりの文字を読むには、もう一度位置を戻す必要があります。

PRINT AT 2,2;"T";AT 2,2;
PRINT PEEK(PEEK 16398+PEEK 16399*256)

57Tの文字コードであるを与えてくれます。

score 1 · Accepted Answer

これによると、覗くのは正しいアドレスですが、カーソルが正しい位置にないのではないでしょうか? 私がよく覚えていれば（男、あなたはその古いもので何をしているのですか:-)！）PRINT ATは、カーソルを印刷された文字の1つ後ろ（または1行下）に移動する可能性があります。

2 に答える 2