github.com/MicroCoreLabs.Projects
1
0
Fork 0
mirror of synced 2026-01-28 13:08:43 +00:00
Code Issues Packages Projects Releases Wiki Activity

Uploaded_7_12_2023

Browse Source
This commit is contained in:
MicroCoreLabs
2023-07-12 10:16:22 -07:00
parent 13141f89aa
commit da74153d98
1 changed files with 21 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
MCL68/MCL68_with_BASIC/mcl68.ino
View File

@@ -23,6 +23,9 @@
// Revision 2 11/5/2022 // Revision 2 11/5/2022
// Swapped incorrect stacking order for exception handler and RTE opcode // Swapped incorrect stacking order for exception handler and RTE opcode
// //
// Revision 3 7/12/2023
// Updated RTE opcode and A-Line,F-Line traps per David Rumball
//
// //
//------------------------------------------------------------------------ //------------------------------------------------------------------------
// //
@@ -631,6 +634,10 @@ void Exception_Handler(unsigned int vector_number)
vector_number = BIU_IACK(); // Fetch the vector from the BIU IACK Cycle vector_number = BIU_IACK(); // Fetch the vector from the BIU IACK Cycle
} }
if ( (vector_number == 10) || (vector_number == 11) { // for the Line-A and Line-F trap the PC is 2 less
mc68k_pc -=2 ;
}
Push(mc68k_pc&0xFFFF); // Stack the lower PC Push(mc68k_pc&0xFFFF); // Stack the lower PC
Push(mc68k_pc>>16); // Stack the upper PC Push(mc68k_pc>>16); // Stack the upper PC
Push(mc68k_flags_copy); // Stack the Original copy of the Flags Push(mc68k_flags_copy); // Stack the Original copy of the Flags
@@ -1208,13 +1215,21 @@ void op_UNLK()
// ---------------------------------------------------------------------- // ----------------------------------------------------------------------
void op_RTE() void op_RTE()
{ {
uint16_t temp_flags;
if (mc68k_flag_S==0x0) { Exception_Handler(8); } // Verify that supervisor privilege is set if (mc68k_flag_S==0x0) { Exception_Handler(8); } // Verify that supervisor privilege is set
else else
{ {
Update_System_Flags(Pop()); // Pop the SR Flags //Update_System_Flags(Pop()); // Pop the SR Flags
mc68k_pc = Pop()<<16; // Pop the upper PC //mc68k_pc = Pop()<<16; // Pop the upper PC
mc68k_pc = mc68k_pc | Pop(); // Pop the lower PC //mc68k_pc = mc68k_pc | Pop(); // Pop the lower PC
BIU_Jump(mc68k_pc); // Jump to the new PC //BIU_Jump(mc68k_pc); // Jump to the new PC
temp_flags = Pop();
mc68k_pc = Pop()<<16;
mc68k_pc = mc68k_pc | Pop();
Update_System_Flags(temp_flags);
BIU_Jump(mc68k_pc);
} }
return; return;
} }