Atari 400 Technical Reference Manual page 311

ERR LINE ADDR B1 B2 B3 B4 SIO ( SERIAL BUS INPUT/OUTPUT CONTROLLER ) PAGE 50
2167
2168
2169
2170
2171 LOAD BUFFER POINTER SUBROUTINE
2172
2173 LOAD BUFFER POINTER WITH DCB BUFFER INFORMATION
2174
2175 EB6A 18 LDPNTR: CLC
2176 EB6B AD 04 03 LOA DBUFLO
2177 EB6E 85 32 STA BUFRLO
2178
EB70
60 08 03
ADC DBYTLO
2179 EB73 85 34 STA BFENLO
iALSO SET BUFFER END
+
1 ADDRESS
2180
2181 EB75 AD 05 03 LDA DBUFHI
2182 EB78 85 33 STA BUFRHI
2183 EB7A 6D 09 03 ADC DBYTHI
2184 EB7D 85 35 STA BFENHI
2185
2186 EB7F 60 RTS iRETURN
2187
2188
2189
2190
2191
2192
2193
2194
2195
;
CASSETTE HANDLING CODE
2196
2197 EB80 AD 03 03 CASENT: LOA DSTATS
2198 EB83 10 2E BPL CASRED iBRANCH IF INPUT FROM CASSETTE
2199
2200
i
WRITE A RECORD
2201
2202
EB85 A9 CC LDA #B600LO iSET BAUD RATE TO 600
2203 EB87 80 04 D2 STA AUDF3
2204 EB8A A9 05 LDA #B600HI
2205 EB8C 8D 06 D2 STA AUDF4
2206
2207 EB8F 20 F2 EB JSR SENDEN iTURN ON POKEY MARK TONE
2208
2209 EB92 AO OF LOY #WSIRG iLOAD SHORT WRITE INTER RECORD GAP TIME
2210 EB94 AD OB 03 LDA DAUX2
2211 EB97 30 02 BMI SRTIRO iBRANCH IF SHORT GAP IS DESIRED
2212
2213 EB99 AO B4 LDY #WIRGLO iSET WRITE IRG TIME
2214 EB9B A2 00 SRTIRO: LDX
#WIRGHI
2215 EB9D 20 B9 ED JSR SETVBX
2216
2217 EBAO A9 34 LOA
#MOTRGO
2218 EBA2 8D 02 03 STA PACTL
i
TURN ON MOTOR
2219
2220 EBA5 AD 17 03 TIM IT: LDA TIMFLG iLOOP UNTIL DONE