?login_element?

Subversion Repositories NedoOS

Rev

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

  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.     xor a : ld (#5c6a), a  ; Thank you, Mario Prato, for feedback
  44.     ld (#5c00),a
  45.     ld sp, asmOrg
  46.     call Memory.init
  47.     xor a : out (#fe),a
  48.     ei
  49.    
  50.     ld a, 7 : call Memory.setPage
  51.     ;; Logo
  52.     ld hl, logo, b, Dos.FMODE_READ : call Dos.fopen
  53.     push af
  54.     ld hl, #c000, bc, 6912 : call Dos.fread
  55.     pop af
  56.     call Dos.fclose
  57.  
  58.     ld b, 150
  59. 1   halt
  60.     djnz 1b
  61.     ;; End of logo :-)
  62.  
  63.     ELSE
  64.         ld sp, 0x4000
  65.     ENDIF
  66.  
  67.     call TextMode.init
  68.  
  69.     IFDEF NEDOOSATM
  70.         call Wifi.init
  71.     ENDIF
  72.  
  73.     IFNDEF NEDOOS
  74.                 ld hl, initing : call TextMode.printZ
  75.     IFNDEF EMU
  76.         call Wifi.init
  77.     ENDIF
  78.     ENDIF
  79.    jp History.home
  80.  
  81.     IFDEF NEDOOS
  82. outputBuffer:  
  83.         ENDIF
  84.  
  85.  
  86. initing db "Initing Wifi...",13,10,0
  87. logo    db  "data/logo.scr", 0
  88.     display "ENDS: ", $
  89.     display "Buff size", #ffff - $
  90.     IFDEF NEDOOS
  91.         savebin "moon.com", asmOrg, $ - asmOrg
  92.     ELSE
  93.             savebin "moon.bin", asmOrg, $ - asmOrg
  94.     ENDIF
  95.