|
本章介绍的函数、语句及操作有:
☆绘图语句
POINT(画点) CLS(清屏) LINE(画线) CIRCLE(画弧)
注:显示图形时
第一条语句必须是CLSC (在图形显示时清除荧光屏),最后一条语句必须是END,否则看不到图形
绘图语句 POINT X(坐标),Y(坐标),Color(显示颜色)
1、 POINT X,Y,Color
在指定位置上画点,把屏幕分成了128行(水平向),240列(垂直向)象素点,X坐标从左往右数是0到239,
Y坐标从上往下数是0到127,因此,(0,0)点在显示器左端的最下方,而(239,127)点在右上角。
自变量X和Y可以是数字常数、变量或表达式,它们不需要是整数,因为POINT(x,y)中取x和y的整数部分。
POINT(x,y)的有效范围:
0 < x < 240
0 < y < 128
例如1:在显示器上显示多个随机亮点。
10 LINE 0,0,240,128,50,1 '填充矩形
20 FOR I=1 TO 50000 
30 POINT RND(240),RND(128),0
40 NEXT
50 END '绘图时,END语句是必须的,否则看不到图形
RUNT '打入"运行图形"命令
例如2:在显示器上描绘指数曲线
10 CLSC '图形时清屏
20 FOR I=1 TO 200 STEP 0.5
25 A=I^2
30 POINT I,A/200,0
40 NEXT
50 END '显示图形时,END语句是必须的,否则看
不到图形
2、 CLS (在非图形显示时清除荧光屏)
CLSC (在图形显示时清除荧光屏)
“清除荧光屏”显示器上的全部所有内容都被擦去。
无论什么时候,你只想在显示器上显示感兴趣的东西时,可先使用CLS。
3、 LINE
画任意两点之间的直线,并且可设置线的宽度
功能:画任意两点之间的直线,并且可设置线的宽度。
参数: X0 直线起点的x坐标值
Y0 直线起点的y坐标值
X1 直线终点的x坐标值
Y1 直线终点的y坐标值
W 线宽(0-50)当线宽大于等于50时,是填充矩形
C 显示颜色
说明:操作失败原因是指定地址超出有效范围
LINE X0,Y0,X1,Y1,W,C
例:LINE X起点坐标,Y起点坐标,X终点坐标,Y终点坐标,W线宽,C颜色
LINE X0,Y0,X1,Y1,W,C
例1:在屏幕上画一条斜线,线宽=1,颜色=0
10 LINE 0,0,239,127,50,1 '当线宽>=50时,是填充矩形,颜色=1
20 LINE 0,0,239,127,1,0 '在屏幕上画一条斜线,线宽=1,颜色=0
30 END '画图时END语句不能少,遇到END语句,可以看到图形,按任意键退出
RUNT '运行图形命令
例如2:在显示器上描绘指数曲线
10 CLSC '图形时清屏
20 FOR J=1 TO 200 STEP 0.5
30 X1=J
40 IF X1>=239 THEN X1=239
50 Y1=(X1^2)/200
60 IF Y1>=127 THEN Y1=127
70 LINE X0,Y0,X1,Y1,5,0
80 X0=X1:Y0=Y1
90 NEXT
100 END
4 CIRCLE x,y,r,360,c '画圆
CIRCLE C x,y,r,360,c '画圆填充
CIRCLE x,y,r,s,e,c '画弧
x= 圆心的x轴坐标值
y= 圆心的y轴坐标值
s= 起始角度(0-359度)
e= 终止角度(0-359度)
r= 圆的半径终点
c= 显示颜色
说明:操作失败原因是指定地址超出有效范围。
例:随机取圆心 X,Y坐标,和半径R,显示图形
10 CLSC'图形时清屏
20 XX=RND(240)'取随机数(圆心X)
30 YY=RND(128)'取随机数(圆心Y)
40 R=RND(50)'取随机数(半径R)
50 IF R<15 THEN R=15'当半径小于15时,把半径设为15
60 FOR I=2 TO R
70 CIRCLE C XX,YY,I,360,0'画圆并填充,显示颜色=0
80 NEXT
90 IF R<15 THEN R=15'当半径小于15时, 把半径设为15
100 FOR I=2 TO R
110 CIRCLE C XX,YY,I,360,1'画圆并填充,显示颜色=1
120 NEXT
130 GOTO 20
RUNT '打入运行命令
此时可以在屏幕上看到显示效果
当按下 Pause 键时,显示暂停,再按下 Esc 键退出,
当暂停时,按任意键继续运行,在退出后,键入CONT恢复运行。
|