nedoOS socket sample

main:
    ld de,SOCK_STREAM+(AF_INET<<8)
    OS_NETSOCKET
    ld a,l
    or a
    jp m,?C_EXIT
    ld (soc1),a

    ld a,(soc1)
    ld de,inetad
    OS_NETCONNECT
    ld hl,get_str_end-get_str
    ld de,get_str
    ld a,(soc1)
    OS_WIZNETWRITE
mainrdloop
    ld hl,1024
    ld de,rxbuf
    ld a,(soc1)
    OS_WIZNETREAD
main0:
    ld a,(soc1)
    OS_NETSHUTDOWN
    cp SHUT_RDWR
    jr z,main0
    jp 0x0000
get_str
    defb 'GET /cspr/index.htm HTTP/1.1',13,10
    defb 'Host: dimkam.ru',13,10
    defb 13,10
get_str_end
inetad:
    defb 0,80
    defb 188,35,5,239