いつもの奴(32bitの&HAARRGGBB)からイスターリャさんのおっしゃっている奴に変換するために使用する関数を前作っていたので貼っておきますね(3号、BIGでの動作確認はしましたが4はわからん)
DEF RGB32_16(ARGB%)
VAR A%,R%,G%,B%
RGBREAD ARGB% OUT A%,R%,G%,B%
RETURN VAL("&B"+BIN$(R% DIV 8,5)+BIN$(G% DIV 8,5)+BIN$(B% DIV 8,5)+STR$(A%==255))
END