The Motorola M68HC11EVB
Please help with the assembly language used for this experiment using The Motorola M68HC11EVB
Program to get two bytes Erom terminal, multiplythe, and 'display resulting two bytes to terminal ADDRESSES MAY VARY BY BOARD OUTIBYT OUTCRLE INCHAR OUTSTRG SFFBB SFFC4 SFFCD SFFCT 58800 S00 RESHI RESLO MLTPL ML TPND FCB FCB FCE FCB 00 S00 8000 MULT MESG OUTSTRG OUTCRLE GET1BYT MLTPLE MESG OUTSTRG OUTCRLF GETIBYT MLTPN OUTCRLF MLTPLE MLTPND LDX JSR JSR OUTPUT CARRIAGE RETURN AND LINE FEED GET MULTIPLIER BYTE AND STORE IT STAA LDX JSR JSR JSR STAA JSR OUTPUT A CARRIAGE RETURN AND LINE FEED GET MULTIPLICAND BYTE AND STORE IT OUTPUT A CARRIAGE RETURN AND LINE FEED LOAD A WITH MULTIPLIER LOAD B WITH MULTIPLICAND LDAB MUL STAA STAB RESHI RESLO RESHI OUTIBYT OUTIBYT OUTCRLF MULT SUBROUTINE GET1BYT * SAVE RESULT HIGH AND LOW OUTPUT RESULTS HIGH AND LOW PUTPUT RESULTS HIGH AND LON JSR OUTPUT CARRIAGE RETUN AND LINE FEED LOOP BACK FOR ANOTHER PASS JSR Subroutine to get a byte from termina.l GET FIRST NIBBLE IN A MOVE IT TO UPPER NIBBLE POSITION GETIBYT JSR GETINIB LSLA LSLA LSLA STAA TEMP GETINIB SAVE IT IN A TEMPORARY MEMORY GET SESOND NIBBLE IN A COMBINE IT WITH FIRST NIBBLE ORAA RTS SUBROUTINE GETINIB Subroutine to get a nibble from terminal GET AN ASCII CHARACTER FROM TERMINAL REMOVE ASCII BIAS GETINIE INCHAR #830 #809 SUBA CMPA BLS ANDA EXIT * SDF SKIP AROUND IF ? 0-9 DIGIT MAKE IT CASE INSENSITIVE EXIT MESG RTS FCC FCB PLEASE ENTER A 2-DIGIT HEXADECIMAL NUMBER Program to get two bytes Erom terminal, multiplythe, and 'display resulting two bytes to terminal ADDRESSES MAY VARY BY BOARD OUTIBYT OUTCRLE INCHAR OUTSTRG SFFBB SFFC4 SFFCD SFFCT 58800 S00 RESHI RESLO MLTPL ML TPND FCB FCB FCE FCB 00 S00 8000 MULT MESG OUTSTRG OUTCRLE GET1BYT MLTPLE MESG OUTSTRG OUTCRLF GETIBYT MLTPN OUTCRLF MLTPLE MLTPND LDX JSR JSR OUTPUT CARRIAGE RETURN AND LINE FEED GET MULTIPLIER BYTE AND STORE IT STAA LDX JSR JSR JSR STAA JSR OUTPUT A CARRIAGE RETURN AND LINE FEED GET MULTIPLICAND BYTE AND STORE IT OUTPUT A CARRIAGE RETURN AND LINE FEED LOAD A WITH MULTIPLIER LOAD B WITH MULTIPLICAND LDAB MUL STAA STAB RESHI RESLO RESHI OUTIBYT OUTIBYT OUTCRLF MULT SUBROUTINE GET1BYT * SAVE RESULT HIGH AND LOW OUTPUT RESULTS HIGH AND LOW PUTPUT RESULTS HIGH AND LON JSR OUTPUT CARRIAGE RETUN AND LINE FEED LOOP BACK FOR ANOTHER PASS JSR Subroutine to get a byte from termina.l GET FIRST NIBBLE IN A MOVE IT TO UPPER NIBBLE POSITION GETIBYT JSR GETINIB LSLA LSLA LSLA STAA TEMP GETINIB SAVE IT IN A TEMPORARY MEMORY GET SESOND NIBBLE IN A COMBINE IT WITH FIRST NIBBLE ORAA RTS SUBROUTINE GETINIB Subroutine to get a nibble from terminal GET AN ASCII CHARACTER FROM TERMINAL REMOVE ASCII BIAS GETINIE INCHAR #830 #809 SUBA CMPA BLS ANDA EXIT * SDF SKIP AROUND IF ? 0-9 DIGIT MAKE IT CASE INSENSITIVE EXIT MESG RTS FCC FCB PLEASE ENTER A 2-DIGIT HEXADECIMAL NUMBER
