PSET - [描画] |
||||||
… 点の描画
PSET X,Y
X: 表画面のX座標
Y: 表画面のY座標
表画面のX座標とY座標の位置に1ドットを描画します。座標はウィンドウの左上角が 0,0 です。
点の色には、COLORFGで指定した描画色が使用されます。
画面外の座標も指定できますが、実際に描画される範囲は、物理的な範囲の画面のみとなります。
COLORFG、LINE、BOX、BOXFILL、BOXCIRCLE、CIRCLE、PAINT
REM 944BASIC 'PSETサンプル(STAR?)'
COLORBG 0,0,0: CLS
FOR I=0 TO 64
SYNC
X=(RND+TIME)%239:Y=(RND+TIME)%239
COLORFG 211,192,236: PSET X,Y
FOR J=1 TO 2
COLORFG 211-J*64,192-J*64,236-J*64
PSET X-J,Y-J:PSET X+J,Y+J
PSET X+J,Y-J:PSET X-J,Y+J
PSET X,Y-J:PSET X,Y+J
PSET X+J,Y:PSET X-J,Y
NEXT J
WAIT 3
NEXT I
LOCATE 5,10: PRINT 'PUSH KEY'
KEYWAIT
PSET - [描画] |