《FORTRAN图形操作》PPT课件

《FORTRAN图形操作》PPT课件

ID:36683924

大小:1.02 MB

页数:24页

时间:2019-05-09

《FORTRAN图形操作》PPT课件_第1页
《FORTRAN图形操作》PPT课件_第2页
《FORTRAN图形操作》PPT课件_第3页
《FORTRAN图形操作》PPT课件_第4页
《FORTRAN图形操作》PPT课件_第5页
资源描述:

《《FORTRAN图形操作》PPT课件》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第十二章FORTRAN图形操作绘图基础QuickWin窗口的创建图形坐标系图形属性基本图形函数图形字符操作一、QuickWin绘图基础QuickWin支持以像素为基础的图形,其图形库包括了一套完整的图形函数集。1.QuickWin图形库MSFLIB.F90:绘图子程序的定义及接口MSFLIB.MOD:图形过程符号常量说明以及与绘图过程相关的结构体的定义2.QuickWin应用程序的创建二、QuickWin窗口的创建设置图形模式RESULT=SETWINDOWCONFIG(WC)RESULT为LOGICAL型变量,若调用成功,返回值为

2、.TRUE.,否则为.FALSE.。WC为WINDOWCONFIG结构体类型变量。TYPEWINDOWCONFIGINTEGER(2)NUMXPIXELS!X轴的像素个数INTEGER(2)NUMYPIXELS!Y轴的像素个数INTEGER(2)NUMTEXTCOLS!最大文本列数INTEGER(2)NUMTEXTROWS!最大文本行数INTEGER(2)NUMCOLORS!颜色索引数INTEGER(4)FONTSIZE!缺省的字体大小。CHARACTER(80)TITLE!窗口标题……ENDTYPEWINDOWCONFIG2.窗口

3、操作(1)打开子窗口OPEN(UNIT=n,FILE=‘USER’,TITLE=wname,IOFOCUS=status)(2)激活窗口result=SETACTIVEQQ(unit)(3)控制窗口的大小和位置result=SETWSIZEQQ(unit,winfo)winfo为结构体QWINFO类型。结构体QWINFO包含窗口的位置和大小信息,它在模块MSFLIB.MOD中的定义为:TYPEQWINFOINTEGER(2)TYPE!窗口类型INTEGER(2)X!左上角的X轴坐标INTEGER(2)Y!左上角的Y轴坐标INTEGE

4、R(2)H!窗口的高度INTEGER(2)W!窗口的宽度ENDTYPEQWINFOQWIN$MINQWIN$MAXQuickWin坐标系均为左手坐标系。默认为像素坐标系,坐标值为整数,从0开始计数,故分辨率为640×480的屏幕如下:三、图形坐标系将坐标原点设置在物理坐标点(x,y):CALLSETVIEWORG(x,y,t)其中(x,y)为新原点的物理坐标,t为XYCOORD结构体类型的变量。TYPExycoordINTEGER(2)xcoord!x坐标INTEGER(2)ycoord!y坐标ENDTYPExycoord视窗坐标:

5、实数坐标系result=SETWINDOW(finvert,wx1,wy1,wx2,wy2)其中,finvert为逻辑量,其值为真,则视窗的Y轴与视口Y轴相反,否则与视口坐标系相同。wx1、wy1、wx2、wy2均为双精度实型,(wx1,wy1)和(wx2,wy2)分别定义视窗的左下角和右上角,视窗原点由(wx1,wy1)和(wx2,wy2)的值所确定。设置了视窗坐标系,就不再需要进行数据转换工作,可调用绘图过程在子窗口中直接绘图。四、图形属性图形颜色RGB的色值由3字节组成,每一字节取值范围为0~255,分别代表蓝、绿、红三色的颜

6、色深度,各表示成2位16进制数字,从右往左依次为红、绿、蓝;数字越大,所对应的颜色强度越强。1.设置颜色result=SETCOLORRGB(color)result=SETBKCOLORRGB(color)result=SETTEXTCOLORRGB(color)color为Integer(4)型,一般用16进制表示颜色取值。例4设置绘图窗口为白色,用PRINT语句输出兰色文字,用OUTGTEXT函数输出红色字符。USEMSFLIBINTEGER(4)RESULTTYPE(XYCOORD)XYRESULT=SETBKCOLORRG

7、B(#FFFFFF)CALLCLEARSCREEN($GCLEARSCREEN)RESULT=SETTEXTCOLORRGB(#FF0000)PRINT*,"Thisisblue"RESULT=SETCOLORRGB(#0000FF)CALLMOVETO(20,20,XY)CALLOUTGTEXT("Thisisred")END要使设置的背景色发生作用,须使用CLEARSCREEN函数清空目标区域,线型线型(LineStyle)是点、横线和空格等按一定规律重复出现而形成的图案,是构成直线条的基本图元。CALLSETLINESTYLE

8、(mask)mask是一个16位二进制数,其中每位对应线型图元的一个像素。若位值为零,则像素保持当前背景色;若位值为1,则像素被置为当前前景色。缺省线型模式是#FFFF(实线)。如表所示,#FF00表示长虚线型,#F0F0表示短虚线型

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。