?login_element?

Subversion Repositories NedoOS

Rev

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

  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.         halt
  9.     xor a : in a, (#fe) : cpl : and 31 : jr z, .wait
  10.     call TextMode.cls
  11.     jp History.back
  12.  
  13.     endmodule