pt:readbyte [BASIC 256 - Language Documentation]

# BASIC 256 - Language Documentation

pt:readbyte

## ReadByte

### Formato

readbyte
readbyte()
readbyte(filenumber)

### Descrição

Lê e devolve o próximo byte (8 bits) como um número de 0 a 255 de um ficheiro aberto. Se o número de ficheiro não for especificado então o zero (0) será assumido.
O ficheiro deve ser aberto com a instrução Openb para que a tradução ASCII CR/LF não ocorra.

### Exemplo

    cls
    f$ = "binary.dat"
    print "new file"
    openb f$
    reset
    for t = 1 to 20
       n = r()
       print n+" ";
       writebyte n
    next t
    print
    close
    print "open and read"
    openb f$
    while not eof
       print readbyte()+" ";
    end while
    print
    print "position to 10 and read"
    seek 10
    while not eof
       print readbyte()+" ";
    end while
    print
    close
    end
    function r()
       r = int(rand*256)
    end function

mostará qualquer coisa como…

    new file
    181 163 155 23 46 93 122 212 178 225 1 62 113 130 202 52 185 51 37 165
    open and read
    181 163 155 23 46 93 122 212 178 225 1 62 113 130 202 52 185 51 37 165
    position to 10 and read
    1 62 113 130 202 52 185 51 37 165

### Também

Close, Eof, Open, Openb, ReadByte, Readline, Reset, Write, Writebyte, Writeline, Exists, Seek, Size

pt/readbyte.txt · Last modified: 2012/12/19 08:55 by m_santos