Вид для печати
Добрый вечер всем. У кого есть и кому не жалко, поделитесь готовыми рабочими процедурами:
1) печати 42 символа в строке ( в идеале, работающей с полноценным набором из 256 символов, с матрицей 8 на 8, где все символы прижаты к левому краю)
2) процедурой, которая переводит текстовую строку, в которой написано число, в собственно число. Те текст "32000" в число 32000.
Знаю, что в ревю такое было, но большинство журналов на zxpress отсканировано так, что вместо кода каша...
вдруг поможет, 64 символа выкладывали на восе
и ещё на 40 символов тут
https://i.imgur.com/OYGCb50.png
У меня такая есть в библиотеке для компилятора ZX Like Pascal, скачай и зайди в файл libasm.lib через любой текстовый редактор. Там много процедур на ассемблере, в том числе и эта.Цитата:
Сообщение от STD
топикстартер по ходу, говорит про это:Цитата:
Сообщение от Destr
PR_б4_R LD В,'FОNTб4;
Ага. Есть там такое. Поэтому проще найти оригинал (журнал в trd/scl, книгу в pdf...) и набирать процедуры уже оттуда руками, ибо качество распознанного текста на zxpress никакое. Но зато легко можно найти в какой книге/журнале есть нужная информация.Цитата:
Сообщение от Bedazzle
Есть такое.Цитата:
Сообщение от Bedazzle
В приложениях часто бывают готовые листинги (у электронных журналов).
ZX-Guide №1 (Ассемблер/Этюды)
Быстрая печать буквы 6x8 (экран в DE):
Если шрифт упирается в 0, то уберите LDКод:PUSH DE
LD L,A
LD B,C
LD A,2
RRCA
DJNZ $-1
LD (PRN+1),A
LD H,'FONT
LD B,8
PRGO PUSH HL
LD L,(HL)
PRN LD H,1
PR1 ADD HL,HL
ADD HL,HL
JR NC,PR1
LD A,(DE)
OR H
LD (DE),A
INC E
LD A,L
LD (DE),A
DEC E
INC D
POP HL
INC H
DJNZ PRGO
POP DE
B,8,а DJNZ PRGO замените на JR NZ,PRGO.
Регистр C должен содержать 7,5,3 или 1,
причем 7 соответствует нулевой координате
буквы внутри знакоместа(x mod 8=0). Букв в
шрифте 256,и все они прижаты к левому краю
(можно сдвинутые на одну точку вправо).Как
надо изменять C:
Код:LD A,C
SUB 6
JR NC,$+5
INC E
AND 7
LD C,A
Спасибо, всем кто откликнулся, все посмотрю, попробую.
- - - Добавлено - - -
Уф...., Andrew771, спасибо за твою библиотеку, много чего интересного там. Процедуру перевода строки в число нашел, выдрал, изучил, алгоритм понял. Но в шапке процедуры у тебя, если я процедуру правильно понял, несколько неверный коммент для использующих ее стоит. У тебя там написано:
; вход: hl=адрес строки
а на самом деле hl, исходя из процедуры, сначала указывает на байт, определяющий длину преобразуемой строки и только после него начинается сама преобразуемая строка символов, т.е. правильнее было бы так:
; вход: hl= адрес байта,определяющего длину строки; hl+1 - адрес строки
а то пока я первую часть процедуры понял, все эти СР 6, СР 5, СР 4..... думал с ума сойду..... 8)
Но все равно ОГРОМНОЕ спасибо!!!
Да, так и есть. В этой библиотеке и при компиляции с Паскаля я так каждую строку храню: первый байт - длина строки, потом сами символы строки.Цитата:
Сообщение от STD
Ну это ж как никак древняя паскалевская традиция:)Цитата:
Сообщение от Andrew771