DEF BALL X,Y,R,RGB1,RGB2 GCIRCLE X,Y,R,RGB1 GPAINT X,Y,RGB2 END とすれば、呼び出すときに BALL X,Y,R,RGB(255,255,255),RGB(255,255,255) みたいに使えますよ