新人来学习，感谢罗老师分享
本帖最后由 峰庄0507 于 2023-12-8 14:59 编辑
AndyY 发表于 2015-3-12 20:47
谢谢罗老师，提交作业~~~
第一个作业，在前辈基础上进行了修改defun( ttt ()
let(( box box1 box2)
box = cBox()
box1 = cdr(cdr(box))
box2 = cdr(cdr(box1))
printf("Width: %.2f Height: %.2f\n" car( box2) cadr( box2))
printf("Coord1:( %.2f %.2f ) Coord2:(%.2f %.2f)" car( box) cadr( box) car( box1) cadr( box1))
)
)
defun( cBox ()
let(( selBox width1 Height1)
selBox = axlEnterBox()
width1 = abs(xCoord(car( selBox)) - xCoord(cadr( selBox)))
Height1 = abs(yCoord(car( selBox)) - yCoord(cadr( selBox)))
xLD = xCoord(car( selBox))
yLD = yCoord(cadr( selBox))
xRU = xCoord(cadr( selBox))
yRU = yCoord(car( selBox))
list( xLD yLD xRU yRU width1 Height1)
)
)
good
hello.thank you very much!
111111
继续学习，继续学习
好好学习 天天向上
非常好很有用哈哈哈哈哈哈哈
感谢分享！！！！！！！！！！！！！
内容学习，请通过