Aide: ZX81 « BASIC » fonction Peek ...

Question

Je veux trouver le code d'un caractère imprimé ...

Voici le code:

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

Il devrait juste imprimer la valeur de code T

Je pourrais utiliser plus tard:

40 Print Peek (Code C) 

Ou quelque chose.

Mais le travail ne marche pas 10-30 bits. Il revient toujours '0' -Avec différentes lettres aussi: G, 'graphique noir' T et M,

Qu'est-ce que je fais mal?

-Est être utilisé pour la détection de collision.

Answer 1

le droit de jdehaan, l'impression du T sans ; arrière se déplace le curseur vers le bas à la ligne suivante après l'impression. (Avec ;, il est être une position à droite.)

Pour lire le personnage que vous souhaitez simplement écrit que vous auriez à revenir en arrière une position à nouveau:

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

me donne 57, qui est le code de caractère T.

Answer 2

Selon cette est la bonne adresse à coup d'oeil, mais peut-être que le curseur est pas à la bonne position? Si je me souviens bien (homme, qu'est-ce que tu fais avec cette vieille chose :-)! ) PRINT AT peut déplacer la position d'un curseur après le charbon imprimé (ou une ligne en dessous).