Subversion Repositories NedoOS

    device      zxspectrum128
    IFDEF NEDOOS
        DEFINE CRLF "\r\n"
        MODULE nos
            include "../_sdk/sysdefs.asm"
        ENDMODULE
        org nos.PROGSTART
        ELSE
        DEFINE CRLF "\r"
        org 24576
    ENDIF
asmOrg:
    align 256 ;╨▓╤А╨╡╨╝╨╡╨╜╨╜╨╛
    jp start
; Generate version string
    LUA ALLPASS
    v = tostring(sj.get_define("V"))
    maj = string.sub(v, 1,1)
    min = string.sub(v, 2,2)
    sj.insert_define("VERSION_STRING", "\"" .. maj .. "." .. min .. "\"")

    b = tostring(sj.get_define("BLD"))
    sj.insert_define("BUILD_STRING", "\"" .. b .. "\"")
    ENDLUA

    include "vdp/index.asm"
    include "utils/index.asm"
    include "gopher/render/index.asm"
    include "dos/index.asm"
    include "gopher/engine/history/index.asm"
    include "gopher/engine/urlencoder.asm"
    include "gopher/engine/fetcher.asm"
    include "gopher/engine/media-processor.asm"
    include "gopher/gopher.asm"
    include "drivers/index.asm"
    IFNDEF NEDOOS
    include "player/vortex-processor.asm"
    include "screen/screen.asm"
        ELSE
    include "screen/nedoscreen.asm"
    include "player/vortexnedoos.asm"
    ENDIF
start:
        IFNDEF NEDOOS
outputBuffer:
    di
    xor a : ld (#5c6a), a  ; Thank you, Mario Prato, for feedback
    ld (#5c00),a
    ld sp, asmOrg
    call Memory.init
    xor a : out (#fe),a
    ei
   
    ld a, 7 : call Memory.setPage
    ;; Logo
    ld hl, logo, b, Dos.FMODE_READ : call Dos.fopen
    push af
    ld hl, #c000, bc, 6912 : call Dos.fread
    pop af
    call Dos.fclose

    ld b, 50
1   halt
    djnz 1b
    ;; End of logo :-)

    ELSE
        ld sp, 0x4000
        ld c,nos.CMD_SETSYSDRV
        ex af,af'  
            call nos.BDOS
    ENDIF
 
    call TextMode.init
        ld hl, initing : call TextMode.printZ
        call Wifi.init

   jp History.home

    IFDEF NEDOOS
outputBuffer:  
        ENDIF

initing db "Initing Wifi...", CRLF, 0
logo    db "browser/logo.scr", 0
creds   db "browser/auth.pwd", 0

    display "ENDS: ", $
    display "Buff size", #ffff - $
    IFDEF NEDOOS
        savebin "moon.com", asmOrg, $ - asmOrg
    ELSE
                IFDEF TRDOS
                        SAVETRD "MOONR.TRD",|"moon.C",asmOrg, $ - asmOrg
                ELSE
                        savebin "moon.bin", asmOrg, $ - asmOrg
                ENDIF        
    ENDIF
outputBuffer2:
    db  "ATE0", 0