您所在位置：主题：我编的很简单的圆形移动程序，帮忙看看那出错啊？？
脉脉秋波
[专家分：0] 发布于 2005-10-30 10:15:00
DECLARE SUB yuan (a, b, c, d)
SCREEN 13
FOR a = 1 TO 50
CALL yuan(a, 100, 20, 12)
FOR i = 1 TO 100
NEXT i
CALL yuan(a, 100, 20, 0)
NEXT a
END
SUB yuan (a, b, c, d)
CIRCLE (20 + a, b), c, d
PAINT (20 + a, b), d, d
END SUB
我预想的结果是红色的实心园，从右向左移动，为什么运行后没显示啊[em10]
SCREEN 13
FOR a = 1 TO 50
CALL yuan(a, 100, 20, 12)
FOR i = 1 TO 100
NEXT i
CALL yuan(a, 100, 20, 0)
NEXT a
END
SUB yuan (a, b, c, d)
CIRCLE (20 + a, b), c, d
PAINT (20 + a, b), d, d
END SUB
我预想的结果是红色的实心园，从右向左移动，为什么运行后没显示啊[em10]
