(defun C:t1()
    (setq pa(getpoint "\n请输入三角形的直角坐标点:"))
    (setq ww(getreal "\n请输入三角形底边长:"))
    (setq hh(getreal "\n请输入三角形的高:"))
    (setq pb(polar pa 0 ww))
    (setq pc(polar pa (/ pi 2) hh))
    (command "pline" pa pb pc "c")
    (princ)
    )

绘制三角形lisp源码分享如下相关推荐

  1. 基于免费人脸识别的闸机开发及源码分享

    最近公司要开发一款人脸识别的闸机,就是在现有闸机上将一个小屏的识别装置,人脸识别成功后将闸机打开. 项目源码在 : https://gitee.com/panmingzhi/ArcSoftFace.g ...

  2. 图元变形lisp源码_收集和整理的lisp源码 收集整理出来的lisp源代码 - 下载 - 搜珍网...

    压缩包 : d376dc2568cd94474be5e8006a7f032.rar 列表 收集和整理的lisp源码/AALINE--绘制多线.LSP 收集和整理的lisp源码/aat--自动标注圆.椭 ...

  3. c语言球球半径,C/C++编程笔记:C语言开发球球大作战(源码分享),你想试试吗?...

    原标题:C/C++编程笔记:C语言开发球球大作战(源码分享),你想试试吗? 游戏背景 <球球大作战>是Superpop一款自主研du发的免费手机网络游戏. 以玩家间的实时互动PK产生游戏乐 ...

  4. “图片差异检查”辅助工具(即“大家来找茬”辅助工具)源码分享

    忽然心血来潮,想写一个辅助工具,让朋友们在"大家来找茬"之类的游戏中可以少费一些眼睛. 在Java方面我是新手,在折腾了一段时间后,终于还是写出了一个基本可用的测试版程序.详细的使 ...

  5. 人脸识别的闸机开发经验及源码分享

    最近公司要开发一款人脸识别的闸机,就是在现有闸机上将一个小屏的识别装置,人脸识别成功后将闸机打开. 项目源码在 : https://gitee.com/panmingzhi/ArcSoftFace.g ...

  6. ROS人机交互软件源码分享

    ROS人机交互软件源码分享 1.前言 看过之前两篇文章的朋友,应该都知道,这里写了一个ROS人机交互软件. 关于 网友对 "Robot One" 使用情况,我也不太清楚(尴尬-), ...

  7. 注册与验证码php源代码,PHP+javascript制作带提示的验证码源码分享

    经常看的别人网站上输完验证码,可以直接判断正确与否,感觉体验非常不错,赶紧给自己网站也加上,源码分享给大家 html代码: 简单验证码 验证码: 看不清 请输入验证码 JS代码: function c ...

  8. 贪吃蛇小游戏源码分享

    创建2个文件夹,一个是放源码还有一个文件夹是发图片的. 然后创建三个实体类. package com.Bubbles.snake; import javax.swing.*; import java. ...

  9. ios开发学习-手势交互(Gesture)效果源码分享

    qianqianlianmeng ios开发学习-手势交互(Gesture)效果源码分享 All Around Pull View 介绍:实现视图四个方向(上下左右)都能够拖动更新(pull to r ...

最新文章

  1. TCP滑动窗口(Sliding Window)原理
  2. 标准的JS里,eval和window.eval属于不同的语法!
  3. ffmpeg mac 批量脚本_使用批处理脚本(BAT)调用FFMPEG批量编码视频
  4. 开启Python之路
  5. Python+tkinter不允许退出程序的思路和实现
  6. 网站测试自动化系统—在测试代码中硬编码测试数据
  7. wubi安裝ubuntukylin 14.04过程以及基本配置
  8. 楚留香服务器维护时间,《一梦江湖》手游官方网站_《楚留香》现已全面升级重制-3月9日维护更新公告...
  9. python程序分析csv文件并绘制趋势图
  10. 1 Framework inner error (expect END descriptor with depth 1 but get another
  11. 手机与存储卡空间大小剩余怎么获取
  12. 佳音图php,PHP5实例教程 简简单单生成条形码
  13. 企业防病毒体系建设的探讨
  14. 外边距合并及解决方法
  15. 如何绘制UML用例图
  16. mysqld_multi关闭不了mysql
  17. win7系统重装之u盘装系统教程,u盘安装win7系统
  18. Keil4和Proteus8的联调方法小叙
  19. [渝粤教育] 武汉船舶职业技术学院 Adobe Illustrator 图形图像制作 参考 资料
  20. 物盾安全汤晓冬:工业互联网企业如何应对高发的供应链安全风险?

热门文章

  1. 加班最勤奋的往往是失败者,他们只是在拼命杀死自己|真实故事
  2. 如何把学计算机说得清新脱俗,如何把文献综述写得清新脱俗?
  3. 简洁明了的ReentrantReadWriteLock总结
  4. eu.org申请免费域名 免费域名申请教程
  5. 71.android 简单的电话录音并保存到本地(来电和去电都支持)
  6. 无线路由器的妙用 不用开电脑也能下载
  7. XMind ? 有道云笔记?为什么我会选择 Effie
  8. AS3933 寄存器配置
  9. 英语题目翻译—— 917:Knight Moves
  10. 考研英语 小作文模板