第三章-交互式输入函数和屏幕输出函数.ppt

《第三章-交互式输入函数和屏幕输出函数.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第三章交互式输入函数和屏幕输出函数本章介绍AutoLISP系统提供的交互式输入函数和屏幕输出函数。交互式输入函数是提供用户通过输入设备（键盘、数字化仪和鼠标器）将数据输入给计算机的函数，屏幕输出函数是将运行结果通过输出设备（终端显示器）输出的函数，这些函数都是AutoLISP程序和用户间进行人机交互通讯时不可缺少的，也是非常重要的函数。3.1交互式输入函数我们已讲过在编程时，程序设计者可以用setq函数给变量赋值，但这些变量的值是固定的，在程序运行过程中用户是不能改变的，这样非常不方便，特别是在绘图时，无法实现参数化绘图。为此AutoLIS

2、P提供了人机交互式输入函数，这些函数使用户可以从键盘等输入设备输入数据，改变变量的值和给变量以初值等。下面介绍九种交互式输入函数，由于其前面三个字母为get，故又称get族函数GETINT输入整数函数GETREAL输入实数函数GETDIST输入距离函数GETPOINT输入点函数GETCORNER输入窗口函数GETSTRING输入字符串函数GETANGLE输入角度函数GETORIENT输入方位函数GETKWORD关键字输入函数另外还有一个为GET族函数提供各种关键字的函数INITGET，另一类输入函数，它的输入设备可以是外存磁盘，如：read

3、—char读一个字符函数read—line读一行字符串函数3.1.1GET输入输入函数get函数的通用调用格式是：(getxxx[〈提示〉])〈提示〉是可以任选的一个字符串，当调用getxxx函数时，程序暂停，等待用户输入。此时若有〈提示〉则提示的信息显示在屏幕上，用户根据提示的信息输入需要的数据，若输入的数据类型和范围正确，程序可继续进行，下面分别介绍这些函数。１.数的输入函数⑴整数输入函数GETINT调用格式(getint[〈提示〉])如上所述，〈提示〉是一个任选的字符串。功用该函数的功能是提供用户通过输入设备输入一个整型数，当执行该函

4、数时，机器暂停下来等待用户输入整型数后，程序继续进行，例如：(setqa(getint“enteranintegernumber：”))屏幕显示enteranintegernumber:50；此时用户可通过键盘输入一个整数，如50。该函数确认50是合乎要求的数据类型，程序继续运行，否则提示要求一个整数。Command：!a50求值结果执行该函数时，并不求值，只有当输入一个整型数后才返回求值结果即该整型数。如上例：(setqa(getint“enteranintegernumber：”))；为换行控制符返回值125enteranint

5、egernumber：125并将125赋给a如果输入不是整型数，而是直接回车或空格键，则返回nil，了解着一点很重要，它常被用于控制循环程序。注意getint函数在标准情况下只接受整型数，而且输入整型数范围必须在-32768到+32768之间，否则出错。⑵实型数输入函数GETREAL调用格式(getreal[〈提示〉])功用机器暂停等待用户输入一个数，（可以是实型数或整型数）求值结果不管输入的数是整型数或是实型数，均返回实型数，若直接回车，则返回nil。(setqa(getreal“enteranumber：”))enteranumb：5返

6、回值5.000000enteranumber：返回值nil⑶距离值输入函数GETDIST调用格式(getdist［〈基点〉〈提示〉］功用等待用户输入一个距离值。其中任选项〈基点〉是指定一个基点（二维点或三维点）。输入距离的方式有三种：①输入一个距离值的数，②可以在屏幕上指定两个点，该函数可自动量出这二点之间的距离，③指定一个基点并在屏幕上指定另一点，该函数可自动测量距离，当然此时亦可输入一个距离值。求值结果不管输入格式如何，该函数总是返回一个实型数。例如：(setqd(getdist))；等待输入一个距离，若回车或按空格键返回nil。(se

7、tqd(getdist“Howfar”))Howfar4返回值4.000000；输入一个数(setq(getdist“Howfar”))Howfar1,2Secondpoint5,2返回值4.000000；输入两个点(setqd(getdist/(1.05.5)“Howfar”))Howfar5.0,5.5返回值4.000000；基点和指定一点2.点的输入⑴点的输入函数GETPOINT调用格式(getpoint［〈基点〉〈提示〉］)功用执行该函数时，机器暂停，等待用户输入一点，若给定了任选项〈基点〉，则通过橡皮筋线可以观察输入点与给定点

8、〈基点〉的相对位置。求值结果返回值为实型数组成的表。例如：(setqp(getpoint“point”))point⑵窗口输入函数GETCORNER调用格式（getcorner［