lisp+dcl+紧密_LISP与DCL

选出《钢构

CAD

》中的任一个实例作为范例

此处选其中的

“

连续编号

”

程序

AAA : dialog{

label="

钢

构

C A D ---

连

续

编

号

" ;

key="dial";

:row { //

无框水平排列

:boxed_row//

有框水平排列

:image//

幻灯显示框

{

key="HD-01";

width=25;//

显示框宽

height=1;

color=0;

fixed_width=true;

}

:radio_column{//

其下为无框竖向平排列

:boxed_radio_column{//

其下为有框竖向平排列

:row{

:edit_box{label="

文字高度

:";key="VZG";width=5;}

:edit_box{label="

起点编号

:";key="QDH";width=5;}

}

:radio_row {//

无加框行

:bo