Create Contour

From Macros Wiki
Jump to: navigation, search
Create Contour
frame 240, 16, 180,204, "Part Data"
dialog "Create Contour", 250, 250, 440, 320
font "Arial", 12
!    l1 = long length
!    l2 = short length
!    h1 = long height
!    h2 = short height
!    r1 = large fillet
!    r2 = small fillet
image 20, 20, 200,200, "CreateContour.bmp"
 
label 260, 39, 70, 24, "L1"
label 260, 69, 70, 24, "L2"
label 260, 99, 70, 24, "H1"
label 260, 129, 70, 24, "H2"
label 260, 159, 70, 24, "R1"
label 260, 189, 70, 24, "R2"
 
input 340, 35, 70, 24, l1, 5
input 340, 65, 70, 24, l2, 3
input 340, 95, 70, 24, h1, 4
input 340, 125, 70, 24, h2, 2
input 340, 155, 70, 24, r1, 0.6
input 340, 185, 70, 24, r2, 0.3
 
cancel 260, 240, 70, 24, "cancel me"
ok 340, 240, 70, 24, "its ok"
 
load_defaults
save_defaults
load_position