Mercurial > hg > Members > kono > nitros9-code
comparison level1/modules/dw3.asm @ 2720:482a547d5155 lwtools-port
Fixed so OP_DWINIT puts response in globals
OP_SETTIME not sent unless response from OP_DWINIT from server is 128
author | Boisy Pitre <boisy.pitre@nuance.com> |
---|---|
date | Thu, 26 Jul 2012 12:19:43 -0500 |
parents | 8399491c0821 |
children | 22bdfbe8bc68 |
comparison
equal
deleted
inserted
replaced
2719:2fda91bdc268 | 2720:482a547d5155 |
---|---|
124 endc | 124 endc |
125 jsr DW$Write,u ; call DWrite | 125 jsr DW$Write,u ; call DWrite |
126 leas 1,s ; leave one byte on stack for response | 126 leas 1,s ; leave one byte on stack for response |
127 | 127 |
128 ; read protocol version response, 1 byte | 128 ; read protocol version response, 1 byte |
129 leax ,s ; point X to stack head | 129 ldx #D.DWSrvID |
130 ldy #1 ; 1 byte to retrieve | 130 ldy #1 ; 1 byte to retrieve |
131 jsr DW$Read,u ; call DWRead | 131 jsr DW$Read,u ; call DWRead |
132 beq InstIRQ ; branch if no error | 132 beq InstIRQ ; branch if no error |
133 leas 3,s ; error, cleanup stack (u and 1 byte from read) | 133 leas 3,s ; error, cleanup stack (u and 1 byte from read) |
134 lbra InitEx ; don't install IRQ handler | 134 lbra InitEx ; don't install IRQ handler |
135 | 135 |
136 * install ISR | 136 * install ISR |
137 InstIRQ | 137 InstIRQ |
138 puls a,u ; a has proto version from server.. not used yet | 138 puls a,u |
139 | 139 |
140 ifgt Level-1 | 140 ifgt Level-1 |
141 ldx <D.DWStat | 141 ldx <D.DWStat |
142 else | 142 else |
143 ldx >D.DWStat | 143 ldx >D.DWStat |