[an error occurred while processing this directive]
|
ORG 0x100
OutText:
bsf PCLATH,4
call Text1
clrf PCLATH
goto
ORG 0x1000
Text1:
movf n_char,w
addwf PCL,f
nop
retlw 'и'
retlw 'к'
retlw 'в'
retlw 'о'
retlw 'н'
retlw 'а'
retlw 'т'
retlw 'с'
retlw 'У'
или так
ORG 0x100
ClearROM:
bsf PCLATH,4
goto ClrROM
Exit_ClrROM
ORG 0x1000
ClrROM:
;тело
;программы
clrf PCLATH
goto Exit_ClrROM
второй вариант можно применить если не хватает глубины стека
С Уважением, Сергей.
E-mail: info@telesys.ru