组装（68k）堆栈操作

Question

我无法使此代码正常工作，并希望在此处获得一些见解。

该程序应该从输入（> 0和< 300）中读取两个数字并输出它们的总和和乘积。我们应该使用堆栈将值传递给子例程。

我的程序运行并读取输入并显示输出，但它不是正确的输出。我假设我的堆栈操作已关闭，但我无法弄清楚缺少的东西。

这是我的代码到目前为止。

编辑：我有一个功能代码，除了乘法部分。我确信堆栈中的下一个项目是输入数字，但Multiplier子例程不计算正确的产品值。任何人都可以看看这个子程序，并检查什么是错的？ ORG $ 1000 START：;程序的第一条指令

* Put program code here 

First: 
    move #14,D0  Display string 
    lea  prompt1,A1 
    trap #15  
    move #4,D0  Input num1 to D1 
    trap #15 
    move.l D1,-(SP) push num1 to stack 
    move.l D1,D4  move num1 to keep 

    move.l #300,D2  Upper limit 
    cmp  D1, D2  Compare user input to upper lim 
    bhi  Second 
    blo  Error1 

Second:  
    move #14,D0  Display string 
    lea  prompt2,A1 
    trap #15  
    move #4,D0  Input num2 
    trap #15 
    move.l D1,-(SP) push num2 
    move.l #0,-(SP) make room for sum on the stack 
    move.l D1,D5  move num2 to keep 

    move.l #300,D2  Upper limit 
    cmp  D1, D2  Compare user input to upper lim 
    bhi  MoveOn 
    blo  Error2 

MoveOn: 
    *add 
    bsr  Adder 
    move.l (SP)+,D1 pull sum, D1 = sum 
    lea  (8,SP),SP clean up stack 
    move #14,D0  Display string 
    lea  result1,A1 
    trap #15 
    move #3,D0 
    trap #15 

    bsr  newLine 

    move.l D4,-(SP) push num1 to stack 
    move.l D5,-(SP) push num2 to stack 

    *multiply 
    bsr  Multiplier 
    move.l (SP)+,D1 pull product, D1 = prod 
    lea  (8,SP),SP clean up stack 
    move #14,D0  Display string 
    lea  result2,A1 
    trap #15 
    move #3,D0 
    trap #15 

    SIMHALT    ; halt simulator 

Error1: 
    move #14,D0 
    lea  error,A1 
    trap #15 
    move (SP)+,D3 Pull incorrect num1 from stack 
    bsr  newLine 
    bra  First 

Error2: 
    move #14,D0 
    lea  error,A1 
    trap #15 
    move (SP)+,D3 Pull incorrect num2 from stack 
    bsr  newLine 
    bra  Second 



*---------------------------- 
     offset 4+4 
sum  ds.l 1 
num2 ds.l 1 
num1 ds.l 1 
     org  * 

Adder 
    link A0,#0   create stack frame 
    move.l (num1,A0),D0 
    add.l (num2,A0),D0 
    move.l D0,(sum,A0)  
    move.l (SP)+,D0   
    unlk A0 
    rts 

*---------------------------- 
    offset 4+4 
prod ds.l 1 
num4 ds.l 1 
num3 ds.l 1 
     org  * 

Multiplier 
    link A0,#0   create stack frame 
    move.l (num3,A0),D0  
    mulu (num4,A0),D0  
    move.l D0,(prod,A0)  
    move.l (SP)+,D0   
    unlk A0 
    rts 

newLine 
    movem.l d0/a1,-(SP)   push d0 & a1 
    move #14,d0    task number into D0 
    lea  crlf,a1    address of string 
    trap #15     display return, linefeed 
    movem.l (SP)+,d0/a1   restore d0 & a1 
    rts       return 

* Put variables and constants here 
prompt1 dc.b 'Sláðu inn fyrri tölu: ',0 
prompt2 dc.b 'Sláðu inn seinni tölu: ',0 
error dc.b '** Tala er ekki á réttu bili, reyndu aftur **',0 
result1 dc.b 'Summa talnanna er: ',0 
result2 dc.b 'Margfeldi talnanna er: ',0 
crlf dc.b $d,$a,0 
    END START  ; last line of source 

Answer 1

陷阱有点像您要跳转的子例程指针。如果是子程序（使用JSR或BSR跳转），68k需要“记住你从哪里来”。为此，他保存了地址的4个字节（实际上是PC），其中称为子程序。 区别在于陷阱函数在superviseur模式下运行。所以在一个陷阱函数里面，你可以写你想要的地方，做你想要的东西，因为你处于superviseur模式。 由于监控模式保存在状态寄存器中，这意味着在进入陷阱功能之前，68k必须保存两台PC才能返回AND状态寄存器。 PC是4个字节，SR是2，因此68k使用SP上的6个字节来保护数据。 因此，首先，你必须做到： move.w D0， - （SP） move.l D1， - （SP） 陷阱＃15 addq.l＃6，SP 别忘后添加到SP陷阱调用，以纠正事实，在陷阱之前，你已经改变了堆栈。 在陷阱函数内部，你必须考虑68也已经把东西放在SP中的事实。 因此，您必须添加6个字节（SR为2个字节，PC为4个）到SP上使用的偏移量，以便取回放在其上的值。 在本例中，您可以使用陷阱功能读取值： move.l 6（SP） - > D1 move.w 8（SP） - > D0

而且，它取决于你救什么在你的SP里面有陷阱功能。

对不起，我的雅达利机器离我很远，所以没有测试;所以，我不记得，如果68K堆栈第一SR那么PC或PC，然后堆栈... :(

希望这有助于西港岛线问候 彼得