RST #10

[CityAceE]

Решил использовать процедуру RST#10.

Мне нужно, чтобы на экран постоянно выводились данные и экран по мере заполнения скроллировался. Однако на деле получается, что как только он заполняется, то всё вешается. При использовании подпрограммы вывода сообщения #0C0A получаю запрос "scroll?", но программа всё равно висит, ни на что не реагируя.

Перед использованием устанавливал поток 2 (вывод на основной экран).

Может надо ещё что-то предварительно делать?

Если ли выход кроме того, что писать вывод символов самому?

[Advertiser]

[caro]

Решил использовать процедуру RST#10.

Мне нужно, чтобы на экран постоянно выводились данные и экран по мере заполнения скроллировался. Однако на деле получается, что как только он заполняется, то всё вешается. При использовании подпрограммы вывода сообщения #0C0A получаю запрос "scroll?", но программа всё равно висит, ни на что не реагируя.

Перед использованием устанавливал поток 2 (вывод на основной экран).

Может надо ещё что-то предварительно делать?

Если ли выход кроме того, что писать вывод символов самому?

Попробуй вот так:

;=========================================
PRN_A:	push	hl
	PUSH	AF
	LD      (IY+52h),0FFh	;SCR_CT
	LD	HL,(5C8Fh)	;ATTR_T
	PUSH	HL
	LD	HL,(5C90h)	;MASK_T
	PUSH	HL
	LD	A,2
	CALL	1601h		;CHAN_OPEN
	POP	HL
	LD	(5C90h),HL
	POP	HL
	LD	(5C8Fh),HL
;
	POP	AF
	cp	TAB		; TAB
	jr	nz,no_tab
	ld	a,' '		;заменить на пробел
no_tab:	RST	10h
	pop	hl
	RET
;=========================================

[Vladson]

#5C8C ; SCR_CT (количество строк без 'scroll ?')

Моя наверное одна из первых супер-мега прог на ASM

; (c) 1992-1993 Vladson :)
	org	FFE6h
	ld	a,02h
	call	1601h
	ld	hl,0000h
	ld	a,FFh
	ld	(5C8Ch),a
	ld	a,(hl)
	cp	20h
	jr	c,$+7
	cp	80h
	jr	nc,$+3
	rst	10h
	inc	hl
	jr	$-16
; Даже не представляю, что я думал когда это писал.

[CityAceE]

caro, Vladson, спасибо! Завтра после работы продолжу эксперементы и опробую ваши предложения.