Помощь: ZX81 'Basic' Peek Функция ...
Вопрос
Я хочу найти код напечатанного персонажа ...
Это код:
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,
Что я делаю неправильно?
- использоваться для обнаружения столкновения.
Решение
Право Jdehaan, печатая T
Без трения ;
переместит курсор вниз на следующую строку после печати. (С участием ;
, Это будет одна позиция вправо.)
Читать персонаж, который вы только что написали, вам придется снова вернуть позицию:
PRINT AT 2,2;"T";AT 2,2;
PRINT PEEK(PEEK 16398+PEEK 16399*256)
дает мне 57
, который является кодом персонажа для T.
Другие советы
Согласно с это Это правильный адрес для заглядывания, но, возможно, курсор не находится в правильном положении? Если я хорошо помню (человек, что ты делаешь с этим старым :-)! ) Печать может перемещать курсор на одну позицию после печатного символа (или одной строки).