?login_element?

Subversion Repositories NedoOS

Rev

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

  1. renderPlainTextScreen:
  2.     ld a, 255
  3.     ld (oldminutes), a
  4.     call prepareScreen
  5.    
  6.     ld hl, (page_offset)        ; HL - offset to 0 Row on screen
  7.     ld bc,hl                    ; BC - offset to C Row on screen
  8.     call Render.findLine        ;BC - Search this line  HL - Return pointer to page with offset
  9.     ld a, h
  10.     or l
  11.     jr z, .exit2
  12.     xor a
  13.     add CURSOR_OFFSET : ld d, a, e, 1 : call TextMode.gotoXY
  14.     call print70Text
  15.     ld b, PER_PAGE -1
  16. .loop
  17.     push bc
  18.     ld a, PER_PAGE
  19.     sub b
  20.     ld e,a
  21.     ld bc, 1
  22.     call Render.findLine2   ;BC - Search this line  HL - Return pointer to page with offset
  23.     ld a, h
  24.     or l
  25.     jr z, .exit
  26.     ld a, e
  27.     add CURSOR_OFFSET : ld d, a, e, 1 : call TextMode.gotoXY
  28.     call print70Text
  29.     pop bc
  30.     djnz .loop
  31.     ret
  32. .exit
  33.     pop bc
  34.     djnz .loop
  35. .exit2
  36.     call showCursor
  37.     ret
  38. plainTextLoop:
  39.     call printRTC
  40.     call Console.getC
  41.  
  42.     cp '1' : jp z, History.back
  43.     cp '2' : jp z, navigate
  44.     cp '5' : jp z, textUp
  45.     cp '8' : jp z, textDown
  46.     cp Console.KEY_LT : jp z, textUp
  47.     cp Console.KEY_RT : jp z, textDown
  48.  
  49.     cp Console.KEY_DN : jp z, textDown
  50.     cp 'a' : jp z, textDown
  51.  
  52.     cp Console.KEY_UP : jp z, textUp
  53.     cp 'q' : jp z, textUp
  54.    
  55.     cp 'h' : jp z, History.home
  56.     cp 'H' : jp z, History.home
  57.  
  58.     cp 'b' : jp z, History.back
  59.     cp 'B' : jp z, History.back
  60.    
  61.     cp 'd' : jp z, inputHost
  62.     cp 'D' : jp z, inputHost
  63.  
  64.     cp Console.BACKSPACE : jp z, History.back
  65.    
  66.     IFDEF MSX
  67.         cp ESC : jp z, exit
  68.     ENDIF
  69.      
  70.     IFDEF GS
  71.     cp 'M' : call z, GeneralSound.toggleModule
  72.     cp 'm' : call z, GeneralSound.toggleModule
  73.     ENDIF
  74.  
  75.     IFDEF TIMEX80
  76.     cp 'T' : call z, TextMode.toggleColor
  77.     cp 't' : call z, TextMode.toggleColor
  78.     ENDIF
  79.  
  80.     jp plainTextLoop
  81.  
  82.  
  83. textDown:
  84.     ld hl,(page_offset)
  85.     ld de,PER_PAGE
  86.     add hl,de
  87.     ld (page_offset), hl
  88.     call renderPlainTextScreen
  89.     jp plainTextLoop
  90.  
  91. textUp:
  92.     ld a, (page_offset) : cp 0 : jr nz, .textUp2
  93.     ld a, (page_offset + 1) : cp 0 : jr nz, .textUp2
  94.     jp plainTextLoop
  95.  
  96. .textUp2:
  97.     ld hl,(page_offset)
  98.     ld de,PER_PAGE
  99.     sbc hl,de
  100.     ld (page_offset), hl
  101.     call renderPlainTextScreen
  102.     jp plainTextLoop    
  103.