ASM80 BAUD96.A85


ISIS-II 8080/8085 MACRO ASSEMBLER, V2.0         MODULE   PAGE    1


  LOC  OBJ         SEQ         SOURCE STATEMENT

                      1 ;THIS ROUTINE SETS THE SERIAL CHANNELS 1 AND 2
                      2 ;BAUD RATES TO 9600.
                      3 
                      4         CSEG
                      5 
  0000 3E40           6 START:  MVI     A,040H  ;RESET THE 8251 USART
  0002 D3F5           7         OUT     0F5H
  0004 D3F7           8         OUT     0F7H
  0006 3E76           9         MVI     A,076H  ;SET 8253 TO MODE 3
  0008 D3F3          10         OUT     0F3H
                     11 
  000A 210800        12         LXI     H,008H  ;SET 9600 BAUD
  000D 7D            13         MOV     A,L
  000E D3F0          14         OUT     0F0H
  0010 7C            15         MOV     A,H
  0011 D3F0          16         OUT     0F0H
  0013 7D            17         MOV     A,L
  0014 D3F1          18         OUT     0F1H
  0016 7C            19         MOV     A,H
  0017 D3F1          20         OUT     0F1H
                     21 
  0019 3ECE          22         MVI     A,0CEH
  001B D3F5          23         OUT     0F5H    ;SET MULTIPLIER
  001D 3E25          24         MVI     A,025H
  001F D3F5          25         OUT     0F5H
  0021 3ECE          26         MVI     A,0CEH
  0023 D3F7          27         OUT     0F7H
  0025 3E25          28         MVI     A,025H
  0027 D3F7          29         OUT     0F7H
  0029 C9            30         RET
                     31 
  0000          C    32         END     START

PUBLIC SYMBOLS


EXTERNAL SYMBOLS


USER SYMBOLS
START  C 0000    

ASSEMBLY COMPLETE,  NO ERRORS