それ以前に、一行で終わる IF 文に ENDIF は不要です。 それと、DIM X=200:Y=200 って、エラーにならない? たぶん、DIM X,Y:X=200:Y=200 でないと、エラーになると思うけど…。