?login_element?

Subversion Repositories NedoOS

Rev

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

  1.     device      zxspectrum128
  2.     IFDEF NEDOOS
  3.         MODULE nos
  4.             include "../_sdk/sysdefs.asm"
  5.         ENDMODULE
  6.         org nos.PROGSTART
  7.     ELSE
  8.         org 24576
  9.     ENDIF
  10. asmOrg:
  11.     jp start
  12.    
  13. ; Generate version string
  14.     LUA ALLPASS
  15.     v = tostring(sj.get_define("V"))
  16.     maj = string.sub(v, 1,1)
  17.     min = string.sub(v, 2,2)
  18.     sj.insert_define("VERSION_STRING", "\"" .. maj .. "." .. min .. "\"")
  19.     ENDLUA
  20.  
  21.     include "vdp/index.asm"
  22.     include "utils/index.asm"
  23.     include "gopher/render/index.asm"
  24.     include "dos/index.asm"
  25.     include "gopher/engine/history/index.asm"
  26.     include "gopher/engine/urlencoder.asm"
  27.     include "gopher/engine/fetcher.asm"
  28.     include "gopher/engine/media-processor.asm"
  29.     include "gopher/gopher.asm"
  30.     include "drivers/index.asm"
  31.     IFNDEF NEDOOS
  32.     include "player/vortex-processor.asm"
  33.     include "screen/screen.asm"
  34.         ELSE
  35.     include "screen/nedoscreen.asm"
  36.     include "player/vortexnedoos.asm"
  37.     ENDIF
  38. start:
  39.  
  40.     IFNDEF NEDOOS
  41. outputBuffer:
  42.     di
  43.     ld sp, asmOrg
  44.     call Memory.init
  45.     ei
  46.    
  47.     ld a, 7 : call Memory.setPage
  48.     ;; Logo
  49.     ld hl, logo, b, Dos.FMODE_READ : call Dos.fopen
  50.     push af
  51.     ld hl, #c000, bc, 6912 : call Dos.fread
  52.     pop af
  53.     call Dos.fclose
  54.  
  55.     ld b, 150
  56. 1   halt
  57.     djnz 1b
  58.     ;; End of logo :-)
  59.  
  60.     ELSE
  61.         ld sp, 0x4000
  62.     ENDIF
  63.  
  64.     call TextMode.init
  65.  
  66.     IFDEF NEDOOSATM
  67.         call Wifi.init
  68.     ENDIF
  69.  
  70.     IFNDEF NEDOOS
  71.                 ld hl, initing : call TextMode.printZ
  72.         call Wifi.init
  73.     ENDIF
  74.    jp History.home
  75.  
  76.     IFDEF NEDOOS
  77. outputBuffer:  
  78.         ENDIF
  79.  
  80.  
  81. initing db "Initing Wifi...",13,10,0
  82. logo    db  "data/logo.scr", 0
  83.     display "ENDS: ", $
  84.     display "Buff size", #ffff - $
  85.     IFDEF NEDOOS
  86.         savebin "moon.com", asmOrg, $ - asmOrg
  87.     ELSE
  88.             savebin "moon.bin", asmOrg, $ - asmOrg
  89.     ENDIF
  90.