堆栈及其使用（举例篇）[作者：sossb]

疾风之狼

堆栈及其使用（举例篇）
  例如，在一个子程序中要用到寄存器A，X，Y和P。在进入子程序之后，首先要将这些寄存器的值存入堆栈保存起来，这称为保留现场。子程序的工作进行完准备返回主程序时，还要把原先保留起来的数据从堆栈中取出来，恢复各寄存器原先的状态，这称为恢复现场。保留现场与恢复现场时，对各寄存器进行操作的顺序是不能随意安排的，以免造成混乱。再有就是进栈与出栈的顺序恰好相反。
  子程序的起、止部分应当这样设计：
1 t7 M7 r/ p6 ]( x1 e8 J# y+ oSUB PHP ；P必须首先进栈
  PHA ；A进栈应在X，Y进栈之前
  TXA
0 |. B" Y$ \+ U  PHA ；X进栈要通过累加器A
  {) c7 m3 L. \/ k- ]0 B  TYA
8 t  w# ]. O3 q  PHA ；Y进栈也要通过累加器A
  ....；子程序的工作部分
: L: d# |6 _2 h) d3 I9 u& o+ Q9 b  PLA
  TAY ；Y最后进栈故最先出栈，Y出栈经过A
' E7 b: {% y! s: f1 }; E' ^& v  PLA
  TAX ；X出栈也经过A
  PLA ；A出栈
  PLP ；P最后出栈，否则其他指令会影响P的某些标志位
  RTS ；恢复现场后可以返回主程序
* ?" v1 z8 e0 S* ~0 v* h! w  6502在子程序执行完毕，遇到RTS指令时是怎样返回主程序的？我们知道，在这种非顺序执行的地方，必须给出跳转的目的地址，这个地址进入程序计数器PC后才能转向。那么这个跳转目的地址是如何得到的呢？原来，当执行JSR指令时，返回地址（也就是JSR指令码所在储存单元地址+2，或者说是JSR指令的第三字节的代码所在地址）自动从程序计数器PC压入堆栈。执行RTS指令时，要将返回地址从堆栈弹出送入程序计数器PC，PC值再自动加1，以指向下一条指令操作码的地址，因此必须记住这条规则：在执行RTS指令之前把在子程序中进栈的数据全部取出，但也不能从栈中取出过多的数据，否则会把返回地址丢掉。
  S+ T1 ]* }$ i  H1 E  自顶向下的程序设计方法有一条非常重要的原则：子程序应该只有一个入口和一个出口，假如有多个出口，则容易出现的错误之一就是可能忘记将子程序中进栈的内容从堆栈中取出，造成返回地址混乱。解决的办法也很简单：不使用很多RTS指令，而在需要返回的分支处用JMP指令跳转到唯一的一个出口处。
  为了方便，把保留现场与恢复现场这两个工作分别设计成子程序，是经验不足的程序员可能出现而又难于侦错的错误之一。
  L8 }5 w/ {- \( M! \  例：
SUB   JSR SAVE   ；
    .......   ；
& Y' @+ D# X) E/ `! V    JSR RESTORE ；
    RTS
! D/ ~( ^6 K2 W. SSAVE   PHP       ；
6 l9 U$ D% h8 A3 |) F$ D, |4 t    PHA
$ e; m: w, P- {- h    TXA
; B; i/ J5 [5 K  x4 a9 q    PHA
) o! r  i4 j3 m+ }9 T5 T$ i    TYA
    PHA
    RTS
8 p. S; Y4 ]( W: V# r6 Z  f4 ZRESTORE PLA
3 F2 }' ?+ F1 J: m+ A    TAY
    PLA
$ m6 F" ]( I6 G+ H    TAX
( M! m% f! X! A$ c1 ^  \    PLA
. Z2 f1 H8 n1 T" ^2 E    PLP
  N/ P1 k; A7 j; S$ e    RTS
  这样编写程序乍看起来是合理的，但实际执行的效果却与预想相差甚远：调用保留现场子程序的JSR指令指令把返回地址压入堆栈，然后转到SAVE子程序，将P、A、X、Y寄存器的值相继相继压入栈内，所以栈顶二数为Y、X的值。当SAVE子程序的返回指令RTS被执行时，6502从堆栈顶取出两个单元的内容作为返回地址送入PC计数器。而这两个单元中的内容根本不是返回地址，而是X、Y被保存起来的值，因此程序会返回到何处大概只有老天才能知道了。
" U  b& [7 E% H$ |& N/ X1 |( j& Q) T  同样的，恢复现场子程序也不能使用，因为进入RESTORE子程序时堆栈顶部存放的是返回地址而不是X、Y寄存器的值。
  不过从这个错误，我们可以得到一点启发：堆栈可以作为中继站，使数据能够在PC计数器与其它寄存器之间交换。
3 x, c; j2 N. ?. U9 n2 I                            -------by sossb