?login_element?

Subversion Repositories NedoOS

Rev

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

  1.     module ScreenViewer
  2. display:
  3.     call Console.waitForKeyUp
  4.     ld a, 7 : call Memory.setPage
  5.     ld hl, outputBuffer, de, #c000, bc, 6912 : ldir
  6.     call TextMode.disable
  7. .wait
  8.     xor a : in a, (#fe) : cpl : and 31 : jr z, .wait
  9.     call TextMode.cls
  10.     jp History.back
  11.  
  12.     endmodule