Конверсия числа со стека калькулятора в символьную строку.

 При использовании встроенного калькуля- тора результаты находятся на вершине каль- куляторного стека в интегральной форме. Для их печати существует подпрограмма Print_FP.Но она печатает стандартными сре- дствами, которые в настоящее время исполь- зуются редко. Обычно программа работает с собственной процедурой печати, например, 42 символа в строке. Ее можно связать с новым потоком. Но при этом необходимо до- вольно тесное общение с операционной сис- темой Спекки.Предпочтительней просто скон- вертировать это число в строку символов и распоряжаться ею по своему усмотрению. Но программа для такого преобразования будет довольно сложной и громоздкой. Проще вос- пользоваться имеющимися в ПЗУ.

 Первое, что приходит в голову - Print_ FP. Она печатает число с вершины стека калькулятора в текущий поток. Значит нужно подменить процедуру вывода символа на про- цедуру пересылки байта в память. Но слиш- ком уж громоздко. Однако Print_FP при сво- ей работе создает символьное представление числа, и лишь затем вызывает процедуру пе- чати. Буфер находится в рабочей области калькулятора по адресу #5CA1-#5CAA.Это две ячейки памяти калькулятора MEM3 и MEM4. Теперь достаточно просто в качестве проце- дуры вывода для потока поставить RET и вызвать Print_FP, чтобы считать строковое представление числа. Это уже проще, хотя все равно нужно возиться с каналами. Проще всего воспользоваться для этого функцией калькулятора STR$. Конвертер занимает 7 байт.

	CONVERT RST     #28        ; вызов калькулятора
	        DB      #2E,#38    ; Команды калькулятора:
	                           ; STR$ преобразует число в стринг.
	                           ; Теперь на стеке параметры этого
	                           ; стринга. В DE-адрес, в BC-длина.
	                           ; END_CALC - выход из калькулятора.
	        CALL    #2BF1      ; Подпрограмма STK-FETCH переписы-
	                           ; вает число со стека калькулятора
	                           ; в регистры A,B,C,D,E. А так как
	                           ; после операции STR$ в стеке нахо-
	                           ; дятся параметры стринга, то они
	                           ; переносятся в пары DE и BC.
	        RET