?login_element?

Subversion Repositories NedoOS

Rev

Rev 1874 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ; Copyright 2024 TIsland Crew
  2. ; SPDX-License-Identifier: Apache-2.0
  3.  
  4.     IFDEF AY56
  5.         INCLUDE "uart-ay-57600.asm"
  6.         MODULE      Uart
  7. init:
  8.         call UART5.RS232_INIT
  9.         xor a
  10.         jp UART5.RS232_CFGDTR
  11.  
  12. write       equ UART5.RS232_WR_BT
  13. uartRead    equ UART5.RS232_RD_BT
  14.  
  15. read:
  16.         push bc, de, hl
  17.         call uartRead
  18.         pop hl, de, bc
  19.         ret c
  20.         jr read
  21.  
  22.         ENDMODULE ; Uart
  23.     ELSE
  24.         INCLUDE "uart-ay-128k.asm"
  25.     ENDIF;UART_128K
  26.  
  27. ; EOF vim: et:ai:ts=4:sw=4: