Statistics: Posted by Tommy Jhon — Wed Feb 22, 2017 10:55 pm
Code:
PRINT BIN$(255) '1 byte(8 bits) maximumPRINT BIN$(32767) 'integer(2 byte, 15 bits) maximumPRINT BIN$(-32768) 'integer(2 byte, 16 bits) minimumPRINT BIN$(-1) 'all 16 bits on FUNCTION BIN$ (n%) max% = 8 * LEN(n%) ': MSB% = 1 'uncomment for 16 (32 or 64) bit returns FOR i = max% - 1 TO 0 STEP -1 'read as big-endian MSB to LSB IF (n% AND 2 ^ i) THEN MSB% = 1: B$ = B$ + "1" ELSE IF MSB% THEN B$ = B$ + "0" NEXTIF B$ = "" THEN BIN$ = "0" ELSE BIN$ = B$ 'check for empty stringEND FUNCTION
Statistics: Posted by burger2227 — Wed Feb 22, 2017 11:42 am
Statistics: Posted by Tommy Jhon — Wed Feb 22, 2017 12:01 am