结构分析、CAD Autolisp技术、软件使用技巧

2007年10月20日星期六

一些不错的建筑结构专业词典工具

建筑结构的各类词组，在金山词霸中总是找不到。

因此，我经常上采用如下的几个方法。

1.雅信翻译软件。
在此软件的建筑词库中，有大量的专业名词，整句翻译也不错，但若作为简单的翻译软件，则稍显复杂。

2.早期的“网络词海”
现在网站已经不存在了，是清华大学的一个页面，大概是98，99年的。

3.现在的“有道海量词典”
http://dict.yodao.com/
这个非常好，刚才查了好些名词，都有。鉴于家里已经装了宽带包月，此时用此网络词典就不成问题了。

4.华建词典
很早就有的一个词典软件，不过词汇量似乎不是很大。

5.规范
建筑结构规范中有一本专业名词，当时我做过一个excel表，现在经常用之查询。

6. 21世纪词典
这个待补上

2007年10月14日星期日

当老爸了

2007年10月10日晨5：54
小儿诞生，5斤8两
看着小生命睁开眼睛好奇的看着周围的世界，我很激动。
为了他，我必须做的更好。

2007年8月11日星期六

Autohotkey在TC中的应用—包括TrayIcon的Alt-Tab问题

Autohotkey在TC中的应用—包括TrayIcon的Alt-Tab问题

偶逛TC的wiki，才发现有脚本这一块，把喜欢的Autohotkey所有文章翻了一遍，找出几个自己喜欢的整理一下，可能是我孤陋寡闻，见笑了：）。也学习AHK是如何来控制TC的，以便以后DIY。

Autohotkey的应用请google一下，很简单的。

（http://chenqj.blogspot.com， qjchen）

1）让TC在trayicon的情况下ALT-TAB时不用再按enter，这个问题在TC论坛上也颇久了，G兄似乎也没有想去解决之。所以有如下ahk。
#Persistent
#SingleInstance force
#NoTrayIcon
SetTimer subTimer, 500
subTimer:
If WinActive( "ahk_class switchwin2" )
{
SendInput, {Enter}
}
Return

2）鼠标中键打开新的Tab（不一定很必要）
cm_OpenDirInNewTab := 3003
#IfWinActive ahk_class TTOTAL_CMD
$MButton::
MouseGetPos, , , , sControl
if (sControl != "TMyListBox1" and sControl != "TMyListBox2")
{
Send {MButton}
Return
}
Click
PostMessage 1075, %cm_OpenDirInNewTab%, 0
Return

3)通过热键调整splitter（就是用键盘调用窗口分隔条，可能是我愚笨，没有在TC的command中找到这个键盘快捷键）
http://www.ghisler.ch/wiki/index.php/AutoHotkey:_Popup_the_splitter_menu
; Win-G (Total Commander: splitter menu)
~#g::
if not WinActive( "ahk_class TTOTAL_CMD" )
Return

WinGet sf_aControls, ControlList
Loop Parse, sf_aControls, `n
{
StringLeft sf_sTemp, A_LoopField, 6
if (sf_sTemp = "TPanel")
{
ControlGetPos Cx,Cy,Cw,Ch, %A_LoopField%
if (Cw < 16)
{
ControlClick %A_LoopField%, A,,RIGHT
Break
}
}
}
Return

4）TC Fav Menu
http://www.ghisler.ch/wiki/index.php/AutoHotkey:_TC_Fav_Menu
文件较大
这个可以把TC的收藏夹也作为可以为资源管理器所用，也可以作为Open和save时候所用

5）在TC的标题栏里面显示文件路径（这个是用来开心的吧:P，自己加点什么有趣的信息上去TITLE）
#Persistent
SetTimer subTimer, 250
subTimer:
if WinActive( "ahk_class TTOTAL_CMD" )
{
ControlGetText sPath, TMyPanel2
StringMid sPath, sPath, 1, StrLen(sPath) -1
WinGetTitle sWindowTitle
if ( sWindowTitle != sPath )
WinSetTitle %sPath%
}
Return

6）在进度条上显示进度的已用时间，剩余时间，总时间，和开始结束时间
http://www.ghisler.ch/wiki/index.php/AutoHotkey:_Show_elapsed_/_remaining_/_total_/_start_/_finish_times_in_title_bar_of_progress_dialogs
代码颇长。
在进度条激活的情况下，按shift键就可以了。

7）给工具栏图标Toolbar Icon增加弹出菜单，可以多项启动参数。
http://www.ghisler.ch/wiki/index.php/AutoHotkey:_Popup_menu_for_button_bar_or_F4

8）最大化窗口的情况下，双击窗口的最左边或者最右边将去到相应的根目录
RegRead, DoubleClickSpeed, HKEY_CURRENT_USER, Control Panel\Mouse, DoubleClickSpeed
If DoubleClickSpeed =
DoubleClickSpeed = 500

~LButton::
IfWinActive, ahk_class TTOTAL_CMD
{
If A_TimeSinceThisHotkey >= %DoubleClickSpeed%
ClickCount = 0
MouseGetPos, xcoordinate
If xcoordinate = 4
{
ClickCount++
PostMessage 1075, 4001, , , ahk_class TTOTAL_CMD
}
If (xcoordinate = A_ScreenWidth+3)
{
ClickCount++
PostMessage 1075, 4002, , , ahk_class TTOTAL_CMD
}
If ClickCount = 2
{
PostMessage 1075, 2002, , , ahk_class TTOTAL_CMD
ClickCount = 0
}
}
Return

有空把其他几个脚本的也翻一遍，看看有没有什么好的。

2007年8月3日星期五

关于制作多张图片的拼接图

关于制作多张图片的拼接图
问题提出：有100多张图片，想制作比较满意的索引图（大致可以看清，但不能太清晰以防被直接盗用）。
photoshop肯定是可以做到，有些麻烦，方法可能很多，我用了三种。
1）picasa的工具--创建--图片拼接
缺点：可选项太少，大小无法控制。

2）直接用图片浏览软件看，滚屏抓图
这个是我当时采用的方法，用Totalcmd看缩略图，可以控制图片预览大小，背景，行列数。其他软件均可做到。而后滚屏抓图。
3）Picture Merge Genius。
所谓术业有专攻，它的功能就是拼图，而且只是横竖拼图。容易用，也可以方便调整几个图片的相对位置，效果如下。

2007年8月1日星期三

Joseflin的100多道几何作图题目

在Mjtd的几何算法板块，Joseflin版主热心贡献的大量题目，无疑是该版的支柱，相信每一个对画图有浓厚兴趣的朋友都希望能全部尝试一遍，我完成了一小部分，还有不少没有完成，而且经常忘记题目是在挑战几之中。

贸贸然的将Joseflin版主的1~100号题目做成小图索引，并配上链接，在经过版主的允许之后，发在了Mjtd版，也在这里备份一下。

Artrage2.5 是个很好玩的绘图软件

似乎2.5多了一些特性。
Artrage除了细腻的笔触之外，它的stencil（镂空模板），tracing（底图模仿），ref（参考画）等都有着和实际绘画接近的概念。
唯美的界面也让人心怡。
小侄子经常用它乱涂乱画。

如何批量修改Acad中标注的字体高度

如何批量修改Acad中标注的字体高度

方法1：
用qselect命令选取所需要的标注
在properties（属性）窗口统一修改高度

方法2
打dim命令，键入ov，要求输入系统变量名称，键入dimtxt，给出新高度，选取标注。

方法2其实是更加古老的方法的，至少R14是可以用的。

看来Acad本身的命令还是很丰富的，至少像用circle的3p tan tan tan方法来画阿波罗尼斯圆的我就没有掌握的很好。

2007年7月26日星期四

唯美壁纸

http://www.cnbeta.com/articles/33913.htm

这里发了几个zol的壁纸，果然很漂亮

2007年7月12日星期四

在明经通道mjtd的几何版做的题目

几何作图一直是我的喜爱，大概在初中的时候就学的很有意思了，现在茶余饭后常去mjtd的几何作图区逛逛，做做题目，放松一下。
半年多来，做了如下一些题目，也记录一下

个人对明经通道的几个完成情况
（1）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=52643&replyID=42316&skin=1
Joseflin兄的挑战39
方法：旋转法构建三角形内比例长度的线段
（2）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=52163&replyID=42437&skin=1
tqr兄的画梯形
方法：外切圆的四边形对边和相等
（3）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=56222&replyID=42500&skin=1
tqr兄的圆周上的圆
方法：弧角和圆心角规律
（4）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=52733&replyID=42414&skin=1
http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=52733&replyID=42553&skin=1
Joseflin兄的挑战44，ahlzl的经典题目
方法：比例三角形的方法
（5）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=55212&replyID=42574&skin=1
highflybird兄的题目，三角形内一点的三个角相等
方法：三角形的某角补角等于其两内角和
（6）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=55175&replyID=42675&skin=1
ahlzl的题目，世界名题
方法：看书
（7）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=56380&replyID=43034&skin=1
Joseflin的挑战103，两圆和切圆
方法：Maple计算
（8）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=52550&replyID=43176&skin=1
Joseflin的挑战34，矩形和多个外切圆
方法：挺弱的，计算法
（9）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=55608&replyID=43177&skin=1
highflybird兄的一元二次方程求解
方法：射影定理
（10）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=57082&replyID=43185&skin=1
原创：圆内弦长相等
（11）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=57103&replyID=43268&skin=1
题目：1，已知垂足点，求三角形
2，已知中线，角平分线，高线，画三角形
方法：来源自许莼舫的几何画图
（12）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=57116&replyID=43329&skin=1
题目：1，平分四边形
2，平分三角形
方法：乱想
（13）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=55022&replyID=43559&skin=1
Joseflin兄的挑战86，梯形内画三切弧
方法：Maple硬算，觉得缺条件
（14）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=57307&replyID=44155&skin=1
http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=57307&replyID=44505&skin=1
题目：1. 对三角形内找点分面积
2. 三角形内边找等边▲
方法：看书和乱想
（15）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=58054&replyID=47932&skin=1
Joseflin的挑战105，三角形计算
方法：射影定理
（16）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=58086&replyID=48030&skin=1
题目：1.光线反射问题
2.圆内三角形周长最短问题
（17）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=58134&replyID=48376&skin=1
highflybird的三角形分割问题
方法：有一定的证明原理
（18）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=59511&replyID=54711&skin=1
tqr的画正方形问题
方法：旋转和scale
（19）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=60105&replyID=57257&skin=1
tqr的画梯形
方法：第二次采用插值法，第一次在三角形内等边三角形处用到
（20）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=59990&replyID=57277&skin=1
Joseflin的挑战111，矩形内的切圆
方法：插值法，到两点的距离成比例的轨迹是圆
（21）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=55151&replyID=57324&skin=1
Joseflin的挑战91，方形内半圆，求点与顶点，切点的距离成比例
方法：插值法，了解到插值法的妙处和缺点
（22）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=60220&replyID=57808&skin=1
Joseflin的挑战114，两圆内多切圆
方法：缩放和一些几何性质
（23）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=53253&replyID=57822&skin=1
Joseflin的挑战63，三角形内直线+两切圆
方法：Python编程
（24）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=60256&replyID=57949&skin=1
题目：盒子内放棋子的问题
方法：《中学生数理化》
（25）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=52142&replyID=57966&skin=1
Joseflin的挑战25，梯形内切圆
方法：Maple，不得已
（26）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=60597&replyID=59539&skin=1
http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=60597&replyID=59656&skin=1
Joseflin的挑战122，椭圆
方法：狂算丢人法
（27）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=60644&replyID=59729&skin=1
题目：定周长题及三圆相切题
方法：看书，椭圆求法
（28）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=60975&replyID=61417&skin=1
tqr的画椭圆题
方法：缩放法，缩放的过程中不影响长度比值，个人很自豪的一道解法
（29）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=61103&replyID=62005&skin=1
Joseflin的挑战132，内切圆题
方法：椭圆求法
（30）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=61098&replyID=62104&skin=1
Joseflin的挑战131，方形内切圆题
方法：构建法
（31）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=61136&replyID=62113&skin=1
题目：角平分线题
方法：来源《数学竞赛题》
（32）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=61148&replyID=62168&skin=1
题目：圆内线段相等题
方法：来自《几何变换》
（33）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=61204&replyID=62600&skin=1
Joseflin的挑战133，三角形题
方法：垂直平分线题
（34）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=61232&replyID=62727&skin=1
Joseflin的挑战137，求证题
方法：变画图为求证
（35）http://www.mjtd.com/BBS/dispbbs.asp?BoardID=37&ID=61493&replyID=64158&skin=1
Joseflin的挑战142，长度相等题
方法：几何变换的平移

opendcl的博客和论坛和highflybird兄的应用

在jtbworld里面看到的

http://www.opendcl.com/
http://www.opendcl.com/forum/

它的论坛和theswamp用的是同个架构软件，个人挺喜欢。

highflybird兄最近写了一个很高级的物体跟随反应器

发起时间：2007年07月08日17点53分">[原创]：十年磨一剑--openDCL和反应器
http://www.xdcad.net/forum/showthread.php?s=&threadid=637122

写的很好，佩服佩服

订阅：博文 (Atom)