lay_13a - delay for 13 * ACC + 12 cycles; called by get_char and put_char *
**
* input cond. - ACC set to appropriate value (13 * ACC + 12 cycles) *
* output cond. - ACC = 0 *
* stack used - 0 bytes *
* variables used - none *
* ROM used - 7 bytes *
****************************************** ************************************ _13a nop; [2] this is a 13-cycle loop
nop; [2]
tsta; [3]
deca; [3] decrement loop count
bne delay_13a; [3] loop if count not zero
rts; [6] exit (delay_13a)
****************************************** ************************************
**
* Interrupt and Reset vectors for Main Routine *
**
****************************************** ************************************
org RESET
fdb main
