13.07.2015 Views

apple-pascal-1.3-manual

apple-pascal-1.3-manual

apple-pascal-1.3-manual

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

;As you will see,. CONST LENGTH.PUBLIC I. PRIVATE PRETusing these requires the utmost care!;All 3 of these are in the global data segment;of MAIN, only PRET is not accessible by MAIN .ZIZRET. EQU.EQUil2MOVA DRMDVADRLDYPLASTAINVPLASTADEYI I, ZlRET,ZRET@ZRET,Y@ZRET,Y;Use macro MOVADR to;move global addresses into zero page;Store return address in private global area.;Low byte.;High byte.; IfSECPLATAXSBCINVPLASTASBCBCCINT is >= LENGTH then store it inLENTMPLEN+1RETURN;Low byte of INT; I NT - LENGTH;High byte of INT;Branch if INT < LENGTH;StoreDEYTXASTALDAINVSTAINT in I@ZI, YTMP@ZI, Y;Low byte;High byteRETURNLDAPHADEYLDAPHARTS@ZRET,Y@ZRET,Y;High byte.;Low byte.II-280Appendix 2C: Overview of Program Preparation Stages

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!