Mercurial > hg > Members > kono > nitros9-code

comparison level1/modules/dw4read.asm @ 2743:b44abaa5da88

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Found that the lib folder was not being processed. Corrected issue.
author drencor-xeen
date Tue, 08 Jan 2013 14:01:56 -0600
parents d1976224b314
children 28ed72477814
comparison
equal deleted inserted replaced
2742:f9a8ae065f80 2743:b44abaa5da88
4 * 4 *
5 * DWRead - 6309 native Turbo Edition 115k / 230k 5 * DWRead - 6309 native Turbo Edition 115k / 230k
6 * Receive a response from the DriveWire server. 6 * Receive a response from the DriveWire server.
7 * Times out if no data received within 1.3 (0.66) seconds. 7 * Times out if no data received within 1.3 (0.66) seconds.
8 * 8 *
9 * THIS VERSION REQUIRES ONE OR MORE SYNC BYTES 9 * THIS VERSION REQUIRES ONE OR MORE SYNC BYTES
10 * WHERE THE THE FINAL SYNC BYTE IS $C0 AND ANY 10 * WHERE THE THE FINAL SYNC BYTE IS $C0 AND ANY
11 * PRECEDING SYNC BYTES ARE $FF. 11 * PRECEDING SYNC BYTES ARE $FF.
12 * 12 *
13 * THE DATA BYTES MUST BE TRANSMITTED IN REVERSE 13 * THE DATA BYTES MUST BE TRANSMITTED IN REVERSE
14 * BIT ORDER (MOST-SIGNIFICANT FIRST). 14 * BIT ORDER (MOST-SIGNIFICANT FIRST).
53 pshs d 53 pshs d
54 andd #$FCFC ; clear FIRQ enables 54 andd #$FCFC ; clear FIRQ enables
55 inca ; set CD FIRQ enable 55 inca ; set CD FIRQ enable
56 sta <$FF21 ; set new control state for PIA 1 56 sta <$FF21 ; set new control state for PIA 1
57 stb <$FF23 57 stb <$FF23
58 58
59 * Wait for Sync Byte(s) or Timeout 59 * Wait for Sync Byte(s) or Timeout
60 sync1 ldd #$0102 ; ACCA = serial in mask, ACCB = shift counter 60 sync1 ldd #$0102 ; ACCA = serial in mask, ACCB = shift counter
61 sync2 bita ,u ; sample input 61 sync2 bita ,u ; sample input
62 beq sync3 ; branch if low 62 beq sync3 ; branch if low
63 leax -1,x ; decrement timeout counter 63 leax -1,x ; decrement timeout counter
136 * 136 *
137 * DWRead - 6809 Turbo Edition 115k / 230k 137 * DWRead - 6809 Turbo Edition 115k / 230k
138 * Receive a response from the DriveWire server. 138 * Receive a response from the DriveWire server.
139 * Times out if no data received within 1.3 (0.66) seconds. 139 * Times out if no data received within 1.3 (0.66) seconds.
140 * 140 *
141 * THIS VERSION REQUIRES ONE OR MORE SYNC BYTES 141 * THIS VERSION REQUIRES ONE OR MORE SYNC BYTES
142 * WHERE THE THE FINAL SYNC BYTE IS $C0 AND ANY 142 * WHERE THE THE FINAL SYNC BYTE IS $C0 AND ANY
143 * PRECEDING SYNC BYTES ARE $FF. 143 * PRECEDING SYNC BYTES ARE $FF.
144 * 144 *
145 * THE DATA BYTES MUST BE TRANSMITTED IN REVERSE 145 * THE DATA BYTES MUST BE TRANSMITTED IN REVERSE
146 * BIT ORDER (MOST-SIGNIFICANT FIRST). 146 * BIT ORDER (MOST-SIGNIFICANT FIRST).