dcl_settings : default_dcl_settings { audit_level = 3; } //------------------------------------------------------------------------------ // Program Name: Bevel.dcl [Bevel R1] // Created By: Terry Miller (Email: terrycadd@yahoo.com) // (URL: https://autolisp-exchange.com) // Date Created: 1-20-06 // Function: Creates Bevel Dimensions // Note: Bevel.lsp requires the functions inside of GetIcon.lsp, // Dcl_Tiles.lsp and Text-Box.lsp. The associated files are // Bevel.lsp and Bevel.dcl. //------------------------------------------------------------------------------ // Revision History // Rev By Date Description //------------------------------------------------------------------------------ // 1 TM 1-20-06 Initial version //------------------------------------------------------------------------------ // Overview of Main Functions //------------------------------------------------------------------------------ // c:BVS - Bevel Settings allows the user to customize various Bevel settings. // c:BV and c:Bevel - Draws a Bevel. // BV - Bevel programming function to draw a Bevel. // Bevel - Calculates bevel based upon radian angle of slope //------------------------------------------------------------------------------ // Bevel_Settings - Dialog to customize Bevel Settings //------------------------------------------------------------------------------ Bevel_Settings : dialog { key = "Title"; label = ""; spacer; : row { alignment = centered; fixed_width = true; : column { : column {//< fixed_width = true; : row { : column { width = 13.76; fixed_width = true; spacer; : column { : text { key = "Text001"; label = "001";// Layer for Bevel alignment = left; } } } : image { key = "Image101"; width = 2.42; aspect_ratio = 1; color = 8; } : popup_list { key = "List001"; width = 18.59; fixed_width = true; } } }//> : column {//< fixed_width = true; : row { : column { width = 17.59; fixed_width = true; spacer; : column { : text { key = "Text002"; label = "002";// Text style & font alignment = left; } } } : popup_list { key = "List002"; width = 18.59; fixed_width = true; } } }//> : column {//< fixed_width = true; : row { : column { width = 17.59; fixed_width = true; spacer; : column { : text { key = "Text003"; label = "003";// Text height alignment = left; } } } : edit_box { key = "EditArchOrReal003"; edit_width = 16.59; fixed_width = true; } } }//> : column {//< fixed_width = true; : row { : column { width = 17.59; fixed_width = true; spacer; : column { : text { key = "Text004"; label = "004";// Dimension gap alignment = left; } } } : edit_box { key = "EditArchOrReal004"; edit_width = 16.59; fixed_width = true; } } }//> : column {//< fixed_width = true; : row { : column { width = 17.59; fixed_width = true; spacer; : column { : text { key = "Text005"; label = "005";// Bevel offset gap alignment = left; } } } : edit_box { key = "EditArchOrReal005"; edit_width = 16.59; fixed_width = true; } } }//> : column {//< fixed_width = true; : row { : column { width = 17.59; fixed_width = true; spacer; : column { : text { key = "Text006"; label = "006";// Fraction style alignment = left; } } } : popup_list { key = "List006"; width = 18.59; fixed_width = true; } } }//> : column {//< fixed_width = true; : row { : column { width = 17.59; fixed_width = true; spacer; : column { : text { key = "Text007"; label = "007";// Fraction position alignment = left; } } } : popup_list { key = "List007"; width = 18.59; fixed_width = true; } } }//> : column {//< fixed_width = true; : row { : column { width = 17.59; fixed_width = true; spacer; : column { : text { key = "Text008"; label = "008";// Fraction height scale alignment = left; } } } : popup_list { key = "ListInt008"; width = 18.59; fixed_width = true; } } }//> } : column { : image { alignment = centered; key = "Image011"; width = 36.92; height = 13.82; fixed_width = true; fixed_height = true; aspect_ratio = 1; color = -2; } : row {//< fixed_height = true; : toggle { key = "Toggle009"; } : column { width = 18.26; fixed_width = true; : column { : text { key = "Text009"; label = "009";// Remove leading blank alignment = left; horizontal_margin = none; } } } : toggle { key = "Toggle010"; } : column { width = 11.92; fixed_width = true; : column { : text { key = "Text010"; label = "010";// Add inch mark alignment = left; horizontal_margin = none; } } } }//> } } spacer; : row { alignment = centered; fixed_width = true; : ok_button { width = 11; } : cancel_button { width = 11; } : button { key = "Info"; label = "Info"; width = 11; fixed_width = true; } } }// Bevel_Settings //------------------------------------------------------------------------------