Отправлено Y123 20 октября 2004 г. 12:56 В ответ на: Как заставить... отправлено SVO 19 октября 2004 г. 16:55

;%%%%%%%%%%%%%%%%%%%%%
.MACRO Return_to @0
;Return from Top of Stack
Stack_ptr_to_pre_Return_State:
ldi temp,low(RAMEND-2)
out SPL,temp ; Set stack pointer to last internal RAM location
ldi temp,high(RAMEND-2)
out SPH,temp

;Load return Choise_Addres
ldi temp,low(@0)
sts Stack_Top_L,temp
ldi temp,high(@0)
sts Stack_Top_H,temp

;return to Choise_Addres
ret
.ENDMACRO

;%%%%%%%%%%%%%%%%%%%%%

Return_to Choise_Addres

вставляю перед ret в подпрограмме
( хотя выход по рету макроса, рет подпрограммы
оставляю для завершенности кода при чтении)