楽になるかは解りませんが、GSPOITのあとビット演算で16bitに変換してるのであれば、GSAVEで1ピクセルだけ配列に読み込むのもありかも。 ↓こんな感じだとしたら P=GSPOIT(0,0) X=((P>>8)AND &HF800)OR((P>>5)AND &H7C0)OR((P>>2)AND &H3E)OR(P<0) ↓速さは変わらないし(むしろほんのちょっと速い)コードは短めです:) GSAVE 0,0,1,1,A,1:X=A[0]