?login_element?

Subversion Repositories NedoOS

Rev

Rev 1869 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download

  1.     device      zxspectrum128
  2.     IFDEF NEDOOS
  3.         DEFINE CRLF "\r\n"
  4.         MODULE nos
  5.             include "../_sdk/sysdefs.asm"
  6.         ENDMODULE
  7.         org nos.PROGSTART
  8.         ELSE
  9.         DEFINE CRLF "\r"
  10.         org 24576
  11.     ENDIF
  12. asmOrg:
  13.     align 256
  14.     jp start
  15.     include "vdp/index.asm"
  16.     include "utils/index.asm"
  17.     include "gopher/render/index.asm"
  18.     include "dos/index.asm"
  19.     include "gopher/engine/history/index.asm"
  20.     include "gopher/engine/urlencoder.asm"
  21.     include "gopher/engine/fetcher.asm"
  22.     include "gopher/engine/media-processor.asm"
  23.     include "gopher/gopher.asm"
  24.     include "drivers/index.asm"
  25.     include "screen/rtc.asm"
  26.  
  27.     IFDEF NEDOOS
  28.         include "screen/nedoscreen.asm"
  29.         include "player/vortexnedoos.asm"
  30.         include "player/mod-processor.asm"
  31. start:
  32. outputBuffer:
  33.         ld sp, 0x4000
  34.         ld c,nos.CMD_SETSYSDRV
  35.         ex af,af'  
  36.             call nos.BDOS
  37.         ELSE
  38.        include "player/vortex-processor.asm"
  39.        include "player/mod-processor.asm"
  40.        include "screen/screen.asm"
  41. start:
  42. outputBuffer:
  43.        di
  44.        xor a : ld (#5c6a), a  ; Thank you, Mario Prato, for feedback
  45.        ld (#5c00),a
  46.        ld sp, asmOrg
  47.        call Memory.init
  48.        xor a : out (#fe),a
  49.        ei
  50.    
  51.        ld a, 7 : call Memory.setPage
  52.        ;; Logo
  53.        ld hl, logo, b, Dos.FMODE_READ : call Dos.fopen
  54.        push af
  55.        ld hl, #c000, bc, 6912 : call Dos.fread
  56.        pop af
  57.        call Dos.fclose
  58.  
  59.        ld b, 50
  60. 1       halt
  61.        djnz 1b
  62.    ENDIF
  63.  
  64.    call TextMode.init
  65.         ld hl, initing : call TextMode.printZ
  66.    
  67.    IFNDEF NOINIT
  68.             call Wifi.init
  69.    ENDIF
  70.    
  71.    jp History.home
  72.  
  73. initing db "Initing Wifi...", CRLF, 0
  74. logo    db "browser/logo.scr", 0
  75. creds   db "browser/auth.pwd", 0
  76. outputBuffer2:
  77.    db  "ATE0", 0
  78.  
  79.    display "ENDS: ", $
  80.    display "Buff size", #ffff - $
  81.    IFDEF NEDOOS
  82.        savebin "moon.com", asmOrg, $ - asmOrg
  83.    ELSE
  84.                 IFDEF TRDOS
  85.                         SAVETRD "MOONR.TRD",|"moon.C",asmOrg, $ - asmOrg
  86.                 ELSE
  87.                         savebin "moon.bin", asmOrg, $ - asmOrg
  88.                 ENDIF        
  89.    ENDIF
  90.