【正文】 // restore X register RTS } els。// actual load, low word LDY 0,Y 。// restore page register PULX 。// actual load, low word LDY 0,Y 。// put it onto the stack STAB 0,X 。// save X register __PIC_JSR(_GET_PAGE_REG) BEQ L_NOPAGE LDAA 0,X 。// restore page register PULA 。// actual load, overwrites page of address LDY 1,Y 。// save page register STAB PAGE_ADDR 。// restore X register RTS } else /* USE_SEVERAL_PAGES */ __asm { PSHA 。// actual load, overwrites page of address LDY 1,Y 。// restore A register PULX 。// actual load, overwrites offset of address STAA 0,X 。// set page register LDAB 0,Y 。// save A register LDAA 0,X 。// restore A register RTS } endif /* USE_SEVERAL_PAGES */ } /* _LOAD_FAR_24 This runtime routine is used to access paged memory via a runtime function. It may also be used if the piler option Cp is not used with the runtime argument. Arguments : offset part of an address in the Y register page part of an address in the B register Result : value to be read in the Y:B registers all other registers remains unchanged all page register still contain the same value _LOAD_FAR_24 */ ifdef __cplusplus extern C endif pragma NO_ENTRY pragma NO_EXIT pragma NO_FRAME void NEAR _LOAD_FAR_24(void) { if USE_SEVERAL_PAGES __asm { PSHX 。// actual load, overwrites address 東北大學(xué)秦皇島分校畢業(yè)設(shè)計（論文） 第 頁 STAA PAGE_ADDR 。// save page register STAB PAGE_ADDR 。// restore X register RTS } else /* USE_SEVERAL_PAGES */ __asm { PSHA 。// restore X register RTS L_NOPAGE: LDY 0,Y 。// restore page register PULA 。// set page register LDY 0,Y 。// save A register LDAA 0,X 。// restore A register RTS } endif /* USE_SEVERAL_PAGES */ } /* _LOAD_FAR_16 This runtime routine is used to access paged memory via a runtime function. It may also be used if the piler option Cp is not used with the runtime argument. Arguments : offset part of an address in the Y register page part of an address in the B register Result : value to be read in the Y register all other registers remains unchanged all page register still contain the same value _LOAD_FAR_16 */ ifdef __cplusplus extern C endif pragma NO_ENTRY pragma NO_EXIT pragma NO_FRAME void NEAR _LOAD_FAR_16(void) { if USE_SEVERAL_PAGES __asm { PSHX 。// actual load, overwrites page STAA PAGE_ADDR 。// save page register STAB PAGE_ADDR 。// restore X register RTS } else /* USE_SEVERAL_PAGES */ __asm { 東北大學(xué)秦皇島分校畢業(yè)設(shè)計（論文） 第 頁 PSHA 。// restore X register RTS L_NOPAGE: LDAB 0,Y 。// restore page register PULA 。// set page register LDAB 0,Y 。// save A register LDAA 0,X 。// set page register RTS } endif /* USE_SEVERAL_PAGES */ } /* _LOAD_FAR_8 This runtime routine is used to access paged memory via a runtime function. It may also be used if the piler option Cp is not used with the runtime argument. Arguments : offset part of an address in the Y register page part of an address in the B register Result : value to be read in the B register all other registers remains unchanged all page register still contain the same value _LOAD_FAR_8 */ ifdef __cplusplus extern C endif pragma NO_ENTRY pragma NO_EXIT pragma NO_FRAME void NEAR _LOAD_FAR_8(void) { if USE_SEVERAL_PAGES __asm { PSHX 。// set page register L_NOPAGE: PULX 。// sets zero flag RTS } } endif /* defined(__EPAGE__) */ endif /* defined(__PPAGE__) */ endif /* defined(__DPAGE__) */ endif /* USE_SEVERAL_PAGES */ /* _SET_PAGE Runtime routine to set the right page register. This routine is used if the piler does not know the right page register, . if the option Cp is used for more than one page register or if the runtime option is used for one of the Cp options. Arguments : offset part of an address in the Y register page part of an address in the B register Result : page part written into the correct page register. the old page register content is destroyed all processor registers remains unchanged _SET_PAGE */ ifdef __cplusplus extern C endif pragma NO_ENTRY pragma NO_EXIT pragma NO_FRAME void NEAR _SET_PAGE(void) { if USE_SEVERAL_PAGES __asm { PSHX 。// not in any allowed page area 。// test of higher bound of EPAGE BHI L_NOPAGE FOUND_EPAGE: LDX EPAGE_ADDR 。 !defined( __PPAGE__) */ if defined(__EPAGE__) ifdef __cplusplus 東北大學(xué)秦皇島分校畢業(yè)設(shè)計（論文） 第 頁 extern C endif pragma NO_ENTRY pragma NO_EXIT pragma NO_FRAME static void NEAR _GET_PAGE_REG(void) { /*l