LibreCADをAutoHotkeyで半自動化してみる

LibreCADは海外製のフリーCADです。QCADの子供です、軽い分少し機能が劣ると思います。

ダウン先： LibreCAD – Free Open Source 2D CAD

AutoHotkeyは、ショートカットキーにスクリプトを登録し、小さな自動化するのが得意です。

コマンド（キー）中心のCADなら、結構自動で図形描いてもらえます。

ダウン先： AutoHotkey

半径（直径）入力で、円を描きます。　　C
1. LibreCADのコマンド説明

半径（直径）入力で、円を描きます。　　C

Cキーを押すと、入力画面が現れるので半径（直径）を入れれば円描きます。

動画で説明：

AutoHotkeyのコード：

c up::
    ;// GUI 作成
    Gui,Destroy  ;追加した
    Gui, +ToolWindow AlwaysOnTop ;; 最小・最大ボタンなし
    Gui, Font, S12  ;// フォントサイズ
    Gui, Add, Checkbox, x20 y25 w100 h25 v_diameter, 直径の時
    Gui, Add, Edit, x15 y60 w120 h30 vSize 
    Gui, Add, Button, x20 y100 w100 h25 gDrawCircle Default, OK
    ;;---------
    Gui, Show, x1500 h150 w150, 円作成 ;;Windowを表示
    Send,{Tab} ;;TAB {}が必要 Editにフォーカスを当てる
Return

;// 円作成のコマンドを連続で送る
DrawCircle:
    Gui, Submit ;;変数GET
    SetTitleMatchMode,1 ;;タイトル一致
    WinActivate, LibreCAD
    Loop, 8
    {
    send, ci
    send, {Enter}
    sleep, 500
    send, %Size% , %Size% ;;XY座標
    send, {Enter}
    send, %Size% ;;　半径
    send, {Enter}
    Size := Size-10
    }
Return