sim710.scr
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:18k
- /*
- * sim710.scr - Copyright (C) 1999 Richard Hirst
- */
- /* Offsets from DSA, allow 128 elements of scatter/gather */
- ABSOLUTE dsa_select = 0
- ABSOLUTE dsa_msgout = 8
- ABSOLUTE dsa_cmnd = 16
- ABSOLUTE dsa_status = 24
- ABSOLUTE dsa_msgin = 32
- ABSOLUTE dsa_datain = 40 /* 8 * 128 = 1024 bytes */
- ABSOLUTE dsa_dataout = 1064 /* 8 * 128 = 1024 bytes */
- ABSOLUTE dsa_size = 2088
- ABSOLUTE reselected_identify = 0
- ABSOLUTE msgin_buf = 0
- /* Interrupt values passed back to driver */
- ABSOLUTE int_bad_extmsg1a = 0xab930000
- ABSOLUTE int_bad_extmsg1b = 0xab930001
- ABSOLUTE int_bad_extmsg2a = 0xab930002
- ABSOLUTE int_bad_extmsg2b = 0xab930003
- ABSOLUTE int_bad_extmsg3a = 0xab930004
- ABSOLUTE int_bad_extmsg3b = 0xab930005
- ABSOLUTE int_bad_msg1 = 0xab930006
- ABSOLUTE int_bad_msg2 = 0xab930007
- ABSOLUTE int_bad_msg3 = 0xab930008
- ABSOLUTE int_cmd_bad_phase = 0xab930009
- ABSOLUTE int_cmd_complete = 0xab93000a
- ABSOLUTE int_data_bad_phase = 0xab93000b
- ABSOLUTE int_msg_sdtr1 = 0xab93000c
- ABSOLUTE int_msg_sdtr2 = 0xab93000d
- ABSOLUTE int_msg_sdtr3 = 0xab93000e
- ABSOLUTE int_no_msgout1 = 0xab93000f
- ABSOLUTE int_no_msgout2 = 0xab930010
- ABSOLUTE int_no_msgout3 = 0xab930011
- ABSOLUTE int_not_cmd_complete = 0xab930012
- ABSOLUTE int_sel_no_ident = 0xab930013
- ABSOLUTE int_sel_not_cmd = 0xab930014
- ABSOLUTE int_status_not_msgin = 0xab930015
- ABSOLUTE int_resel_not_msgin = 0xab930016
- ABSOLUTE int_reselected = 0xab930017
- ABSOLUTE int_selected = 0xab930018
- ABSOLUTE int_disc1 = 0xab930019
- ABSOLUTE int_disc2 = 0xab93001a
- ABSOLUTE int_disc3 = 0xab93001b
- ABSOLUTE int_not_rej = 0xab93001c
- /* Bit field settings used to record status in SCRATCH */
- ABSOLUTE had_select = 0x01
- ABSOLUTE had_msgout = 0x02
- ABSOLUTE had_cmdout = 0x04
- ABSOLUTE had_datain = 0x08
- ABSOLUTE had_dataout = 0x10
- ABSOLUTE had_status = 0x20
- ABSOLUTE had_msgin = 0x40
- ABSOLUTE had_extmsg = 0x80
- /* These scripts are heavily based on the examples in the NCR 53C710
- * Programmer's Guide (Preliminary).
- */
- ENTRY do_select
- do_select:
- CLEAR TARGET
- MOVE SCRATCH0 & 0 TO SCRATCH0
- ; Enable selection timer
- MOVE CTEST7 & 0xef TO CTEST7
- SELECT ATN FROM dsa_select, reselect
- JUMP get_status, WHEN STATUS
- ; Disable selection timer
- MOVE CTEST7 | 0x10 TO CTEST7
- MOVE SCRATCH0 | had_select TO SCRATCH0
- INT int_sel_no_ident, IF NOT MSG_OUT
- MOVE SCRATCH0 | had_msgout TO SCRATCH0
- MOVE FROM dsa_msgout, when MSG_OUT
- ENTRY done_ident
- done_ident:
- JUMP get_status, IF STATUS
- redo_msgin1:
- JUMP get_msgin1, WHEN MSG_IN
- INT int_sel_not_cmd, IF NOT CMD
- ENTRY resume_cmd
- resume_cmd:
- MOVE SCRATCH0 | had_cmdout TO SCRATCH0
- MOVE FROM dsa_cmnd, WHEN CMD
- ENTRY resume_pmm
- resume_pmm:
- redo_msgin2:
- JUMP get_msgin2, WHEN MSG_IN
- JUMP get_status, IF STATUS
- JUMP input_data, IF DATA_IN
- JUMP output_data, IF DATA_OUT
- INT int_cmd_bad_phase
- get_status:
- ; Disable selection timer
- MOVE CTEST7 | 0x10 TO CTEST7
- MOVE FROM dsa_status, WHEN STATUS
- INT int_status_not_msgin, WHEN NOT MSG_IN
- MOVE FROM dsa_msgin, WHEN MSG_IN
- INT int_not_cmd_complete, IF NOT 0x00
- CLEAR ACK
- ENTRY wait_disc_complete
- wait_disc_complete:
- WAIT DISCONNECT
- INT int_cmd_complete
- input_data:
- MOVE SCRATCH0 | had_datain TO SCRATCH0
- ENTRY patch_input_data
- patch_input_data:
- JUMP 0
- MOVE FROM dsa_datain+0x0000, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0008, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0010, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0018, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0020, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0028, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0030, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0038, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0040, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0048, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0050, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0058, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0060, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0068, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0070, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0078, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0080, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0088, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0090, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0098, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00a0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00a8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00b0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00b8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00c0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00c8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00d0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00d8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00e0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00e8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00f0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x00f8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0100, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0108, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0110, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0118, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0120, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0128, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0130, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0138, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0140, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0148, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0150, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0158, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0160, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0168, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0170, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0178, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0180, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0188, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0190, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0198, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01a0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01a8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01b0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01b8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01c0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01c8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01d0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01d8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01e0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01e8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01f0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x01f8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0200, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0208, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0210, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0218, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0220, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0228, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0230, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0238, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0240, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0248, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0250, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0258, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0260, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0268, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0270, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0278, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0280, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0288, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0290, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0298, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02a0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02a8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02b0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02b8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02c0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02c8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02d0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02d8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02e0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02e8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02f0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x02f8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0300, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0308, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0310, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0318, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0320, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0328, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0330, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0338, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0340, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0348, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0350, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0358, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0360, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0368, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0370, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0378, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0380, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0388, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0390, WHEN DATA_IN
- MOVE FROM dsa_datain+0x0398, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03a0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03a8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03b0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03b8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03c0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03c8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03d0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03d8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03e0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03e8, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03f0, WHEN DATA_IN
- MOVE FROM dsa_datain+0x03f8, WHEN DATA_IN
- JUMP end_data_trans
- output_data:
- MOVE SCRATCH0 | had_dataout TO SCRATCH0
- ENTRY patch_output_data
- patch_output_data:
- JUMP 0
- MOVE FROM dsa_dataout+0x0000, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0008, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0010, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0018, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0020, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0028, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0030, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0038, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0040, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0048, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0050, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0058, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0060, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0068, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0070, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0078, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0080, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0088, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0090, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0098, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00a0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00a8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00b0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00b8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00c0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00c8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00d0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00d8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00e0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00e8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00f0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x00f8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0100, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0108, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0110, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0118, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0120, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0128, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0130, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0138, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0140, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0148, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0150, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0158, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0160, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0168, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0170, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0178, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0180, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0188, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0190, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0198, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01a0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01a8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01b0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01b8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01c0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01c8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01d0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01d8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01e0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01e8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01f0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x01f8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0200, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0208, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0210, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0218, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0220, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0228, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0230, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0238, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0240, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0248, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0250, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0258, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0260, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0268, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0270, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0278, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0280, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0288, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0290, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0298, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02a0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02a8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02b0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02b8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02c0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02c8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02d0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02d8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02e0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02e8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02f0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x02f8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0300, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0308, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0310, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0318, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0320, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0328, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0330, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0338, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0340, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0348, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0350, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0358, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0360, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0368, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0370, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0378, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0380, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0388, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0390, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x0398, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03a0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03a8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03b0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03b8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03c0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03c8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03d0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03d8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03e0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03e8, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03f0, WHEN DATA_OUT
- MOVE FROM dsa_dataout+0x03f8, WHEN DATA_OUT
- ENTRY end_data_trans
- end_data_trans:
- redo_msgin3:
- JUMP get_status, WHEN STATUS
- JUMP get_msgin3, WHEN MSG_IN
- INT int_data_bad_phase
- get_msgin1:
- MOVE SCRATCH0 | had_msgin TO SCRATCH0
- MOVE 1, msgin_buf, WHEN MSG_IN
- JUMP ext_msg1, IF 0x01 ; Extended Message
- JUMP ignore_msg1, IF 0x02 ; Save Data Pointers
- JUMP ignore_msg1, IF 0x03 ; Save Restore Pointers
- JUMP disc1, IF 0x04 ; Disconnect
- INT int_bad_msg1
- ignore_msg1:
- CLEAR ACK
- JUMP redo_msgin1
- ext_msg1:
- MOVE SCRATCH0 | had_extmsg TO SCRATCH0
- CLEAR ACK
- MOVE 1, msgin_buf + 1, WHEN MSG_IN
- JUMP ext_msg1a, IF 0x03
- INT int_bad_extmsg1a
- ext_msg1a:
- CLEAR ACK
- MOVE 1, msgin_buf + 2, WHEN MSG_IN
- JUMP ext_msg1b, IF 0x01 ; Must be SDTR
- INT int_bad_extmsg1b
- ext_msg1b:
- CLEAR ACK
- MOVE 2, msgin_buf + 3, WHEN MSG_IN
- INT int_msg_sdtr1
- disc1:
- CLEAR ACK
- ENTRY wait_disc1
- wait_disc1:
- WAIT DISCONNECT
- INT int_disc1
- ENTRY resume_msgin1a
- resume_msgin1a:
- CLEAR ACK
- JUMP redo_msgin1
- ENTRY resume_msgin1b
- resume_msgin1b:
- SET ATN
- CLEAR ACK
- INT int_no_msgout1, WHEN NOT MSG_OUT
- MOVE SCRATCH0 | had_msgout TO SCRATCH0
- MOVE FROM dsa_msgout, when MSG_OUT
- JUMP redo_msgin1
- get_msgin2:
- MOVE SCRATCH0 | had_msgin TO SCRATCH0
- MOVE 1, msgin_buf, WHEN MSG_IN
- JUMP ext_msg2, IF 0x01 ; Extended Message
- JUMP ignore_msg2, IF 0x02 ; Save Data Pointers
- JUMP ignore_msg2, IF 0x03 ; Save Restore Pointers
- JUMP disc2, IF 0x04 ; Disconnect
- INT int_bad_msg2
- ignore_msg2:
- CLEAR ACK
- JUMP redo_msgin2
- ext_msg2:
- MOVE SCRATCH0 | had_extmsg TO SCRATCH0
- CLEAR ACK
- MOVE 1, msgin_buf + 1, WHEN MSG_IN
- JUMP ext_msg2a, IF 0x03
- INT int_bad_extmsg2a
- ext_msg2a:
- CLEAR ACK
- MOVE 1, msgin_buf + 2, WHEN MSG_IN
- JUMP ext_msg2b, IF 0x01 ; Must be SDTR
- INT int_bad_extmsg2b
- ext_msg2b:
- CLEAR ACK
- MOVE 2, msgin_buf + 3, WHEN MSG_IN
- INT int_msg_sdtr2
- disc2:
- CLEAR ACK
- ENTRY wait_disc2
- wait_disc2:
- WAIT DISCONNECT
- INT int_disc2
- ENTRY resume_msgin2a
- resume_msgin2a:
- CLEAR ACK
- JUMP redo_msgin2
- ENTRY resume_msgin2b
- resume_msgin2b:
- SET ATN
- CLEAR ACK
- INT int_no_msgout2, WHEN NOT MSG_OUT
- MOVE SCRATCH0 | had_msgout TO SCRATCH0
- MOVE FROM dsa_msgout, when MSG_OUT
- JUMP redo_msgin2
- get_msgin3:
- MOVE SCRATCH0 | had_msgin TO SCRATCH0
- MOVE 1, msgin_buf, WHEN MSG_IN
- JUMP ext_msg3, IF 0x01 ; Extended Message
- JUMP ignore_msg3, IF 0x02 ; Save Data Pointers
- JUMP ignore_msg3, IF 0x03 ; Save Restore Pointers
- JUMP disc3, IF 0x04 ; Disconnect
- INT int_bad_msg3
- ignore_msg3:
- CLEAR ACK
- JUMP redo_msgin3
- ext_msg3:
- MOVE SCRATCH0 | had_extmsg TO SCRATCH0
- CLEAR ACK
- MOVE 1, msgin_buf + 1, WHEN MSG_IN
- JUMP ext_msg3a, IF 0x03
- INT int_bad_extmsg3a
- ext_msg3a:
- CLEAR ACK
- MOVE 1, msgin_buf + 2, WHEN MSG_IN
- JUMP ext_msg3b, IF 0x01 ; Must be SDTR
- INT int_bad_extmsg3b
- ext_msg3b:
- CLEAR ACK
- MOVE 2, msgin_buf + 3, WHEN MSG_IN
- INT int_msg_sdtr3
- disc3:
- CLEAR ACK
- ENTRY wait_disc3
- wait_disc3:
- WAIT DISCONNECT
- INT int_disc3
- ENTRY resume_msgin3a
- resume_msgin3a:
- CLEAR ACK
- JUMP redo_msgin3
- ENTRY resume_msgin3b
- resume_msgin3b:
- SET ATN
- CLEAR ACK
- INT int_no_msgout3, WHEN NOT MSG_OUT
- MOVE SCRATCH0 | had_msgout TO SCRATCH0
- MOVE FROM dsa_msgout, when MSG_OUT
- JUMP redo_msgin3
- ENTRY resume_rej_ident
- resume_rej_ident:
- CLEAR ATN
- MOVE 1, msgin_buf, WHEN MSG_IN
- INT int_not_rej, IF NOT 0x07 ; Reject
- CLEAR ACK
- JUMP done_ident
- ENTRY reselect
- reselect:
- ; Disable selection timer
- MOVE CTEST7 | 0x10 TO CTEST7
- WAIT RESELECT resel_err
- INT int_resel_not_msgin, WHEN NOT MSG_IN
- MOVE 1, reselected_identify, WHEN MSG_IN
- INT int_reselected
- resel_err:
- MOVE CTEST2 & 0x40 TO SFBR
- JUMP selected, IF 0x00
- MOVE SFBR & 0 TO SFBR
- ENTRY patch_new_dsa
- patch_new_dsa:
- MOVE SFBR | 0x11 TO DSA0
- MOVE SFBR | 0x22 TO DSA1
- MOVE SFBR | 0x33 TO DSA2
- MOVE SFBR | 0x44 TO DSA3
- JUMP do_select
- selected:
- INT int_selected