[総目次] [カテゴリ] [前]

POINT - [描画]

 [次] [次カテゴリ] [索　引]

POINT

… 画面指定座標の色を取得(16ビット値)

書　　式

POINT(X,Y)
 X: 色を取得するX座標
 Y: 色を取得するY座標

説　　明

指定した座標の色を、16ビット値で返します。


注意事項

COLORFG、COLORBGでは24ビットの1677万色が使用できますが、返される値は16ビット値で、0〜65535になります。

POINTで返された値を、RGB値に変更する方法については、サンプル 2を参考にしてください。


関連項目


サンプル

(サンプル 1)
REM 944BASIC 'POINTとPATTERN'
SETDIRECTORY 'F1:\944BASIC\'
SETPAGE 2: BITMAP '9B_REF.BMP',0,0
COLORFG 0,0,0:COLORBG 255,255,255
CLS: FONT 64
DIM B(11,11)
A='華'
LOCATE 0,0:PRINT A
FOR I=0 TO 11
 FOR J=0 TO 11
  IF POINT(J,I)=65535 THEN B(J,I)=3 ELSE B(J,I)=0
 NEXT J
NEXT I
PATTERN B,24,24,0,16,16,0
KEYWAIT

(サンプル 2)
REM 944BASIC 'POINTからRGB値へ'
COLORFG (RND+TIME)%140,(RND+TIME)%140,(RND+TIME)%140
BOXFILL 40,40,200,200
HEADER 'ﾍﾟﾝﾀｯﾁした周辺を明るく'
*LOOP SYNC
 IFBLK (PEN=2)
  X=PENX: Y=PENY: C=POINT(X,Y)
  R=INT(C/2048)*8
  G=(INT(C/64)%32)*8
  B=(INT(C)%32)*8
  IFBLK (R<239)*(G<239)*(B<239)
   COLORFG R+16,G+16,B+16
   BOXFILL X-1,Y-1,X+1,Y+1
  ENDIF
 ENDIF
GOTO *LOOP

[総目次] [カテゴリ] [前]

POINT - [描画]

 [次] [次カテゴリ] [索　引]