standard GfxLib speed

[Aquarius]

I wanted to make a mouse cursor. But the screencopy is sooooo slow. WHY? In 640x480x24 mode on my P500MHz the cursor jumps and it looks like it's about 10-15 FPS.

Here is the sample code. Any ideas gow to make it faster/more efficient?

Code:

screen 18, 24, 2, 1
screenset 1,0

line (0,0)-(27,27), rgb(255,0,255), BF
line (0,0)-(27,27), rgb(255,255,255)
dim cursor((28 * 28 * 4) + 4)
get (0,0)-(27,27), cursor

do
   if MULTIKEY(&h01) then end
   getmouse mx,my
   cls
   circle (320, 240), 200, rgb(255,0,0)
   put (mx, my), cursor, TRANS
   screencopy 1,0
loop