(define arr (array-create type-byte 10))
(bufset-u16 arr 0 65535)
(bufset-u16 arr 2 10)
(bufset-u16 arr 4 11700)
(and (= (bufget-u16 arr 0) 65535)
(= (bufget-u16 arr 2) 10)
(= (bufget-u16 arr 4) (mod 11700 65536)))