解释:

  1. CLS:清空屏幕
  2. SCREEN 12:设置屏幕模式
  3. COLOR 15:设置画笔颜色为白色
  4. CIRCLE (200,200),100,2:画一个以(200,200)为中心,半径为100,边框宽度为2的圆,代表蓝色环
  5. CIRCLE (300,300),100,3:画一个以(300,300)为中心,半径为100,边框宽度为3的圆,代表黄色环
  6. CIRCLE (400,200),100,4:画一个以(400,200)为中心,半径为100,边框宽度为4的圆,代表黑色环
  7. CIRCLE (500,300),100,5:画一个以(500,300)为中心,半径为100,边框宽度为5的圆,代表绿色环
  8. CIRCLE (600,200),100,1:画一个以(600,200)为中心,半径为100,边框宽度为1的圆,代表红色环
  9. FOR i = 1 TO 5:循环5次,分别填充五个圆
  10. CIRCLE (200 + i * 100,200),90,i, , , , , , FILL:以(200 + i * 100,200)为中心,半径为90,填充颜色为i代表的颜色,填充圆形
  11. NEXT i:结束循环
  12. FOR i = 1 TO 5:循环5次,分别画五个圆心
  13. CIRCLE (200 + i * 100,200),10,0:以(200 + i * 100,200)为中心,半径为10,画一个填充颜色为0(黑色)的圆,代表五环的中心
  14. NEXT i:结束循环
  15. DOLOOP UNTIL INKEY$ <> "":程序进入无限循环,直到用户按下任意键结束程序。

原文地址: https://www.cveoy.top/t/topic/bOZI 著作权归作者所有。请勿转载和采集!

免费AI点我,无需注册和登录