?login_element?

Subversion Repositories NedoOS

Rev

Rev 126 | Blame | Compare with Previous | Last modification | View Log | Download

  1.         device zxspectrum128
  2.  
  3.         org #7ff1
  4. start
  5.         disp #1eb4
  6.  
  7.         ld a,77h
  8.         out (3),a
  9. wdn     in a,(4)
  10.         rla
  11.         jr c,wdn
  12.         ret
  13.  
  14. wdy     in a,(4)
  15.         rla
  16.         jr nc,wdy
  17.         ret
  18.  
  19.  
  20.         di
  21.         ld (#1234),sp
  22.         ld a,77h
  23.         out (3),a
  24.         ld a,77h
  25.         out (3),a
  26.         ld a,77h
  27.         out (3),a
  28.         ld a,77h
  29.         out (3),a
  30.         db ' hello! '
  31.  
  32.         ent
  33.  
  34. len equ $-start
  35.  
  36.         savebin "disp_missed_code.bin",start,len
  37.