📄 screwlib.lsp
字号:
(defun scr_lib(type_scr item_nam)
(cond
((= "SHCSM" type_scr)
(cond
((= "spec" item_nam)
'("M1.6" "M2" "M2.5" "M3" "M4" "M5" "M6" "M8" "M10" "M12" "M14" "M16" "M20" "M24")
)
((= "d_ct" item_nam)
'(1.6 2.0 2.5 3.0 4.0 5.0 6.0 8.0 10.0 12.0 14.0 16.0 20.0 24.0 )
)
((= "d_ch" item_nam)
'(3.0 3.8 4.5 5.5 7.0 8.5 10.0 13.0 16.0 18.0 21.0 24.0 30.0 36.0 )
)
((= "cs" item_nam)
'(1.5 1.5 2.0 2.5 3.0 4.0 5.0 6.0 8.0 10.0 12.0 14.0 17.0 19.0 )
)
((= "cb" item_nam)
'(15 16 17 18 20 22 24 28 32 36 40 44 52 60 )
)
((= "cl" item_nam)
'(("4" "5" "6" "7" "8" "9" "10" "11" "12" "14" "15" "16" )
("4" "5" "6" "7" "8" "9" "10" "11" "12" "14" "15" "16" "18" "20" )
("4" "5" "6" "7" "8" "9" "10" "11" "12" "14" "15" "16" "18" "20"
"22" "25" )
("4" "5" "6" "7" "8" "9" "10" "11" "12" "14" "15" "16" "18" "20"
"22" "25" "30" "35" "40" "45" "50" )
("4" "5" "6" "7" "8" "9" "10" "11" "12" "14" "15" "16" "18" "20"
"22" "25" "28" "30" "35" "40" "45" "50" "55" "60" "65" "70" "75" )
("5" "6" "7" "8" "9" "10" "11" "12" "14" "15" "16" "18" "20" "22"
"25" "28" "30" "35" "40" "45" "50" "55" "60" "65" "70" "75" )
("6" "7" "8" "9" "10" "11" "12" "14" "15" "16" "18" "20" "22" "25"
"28" "30" "32" "35" "40" "45" "50" "55" "60" "65" "70" "75" "80" "85"
"90" "95" "100" "110" "120" )
("8" "9" "10" "11" "12" "14" "15" "16" "18" "20" "22" "25" "28" "30"
"32" "35" "38" "40" "45" "50" "55" "60" "65" "70" "75" "80" "85" "90"
"95" "100" "105" "110" "115" "120" "125" "130" "140" "150" )
("10" "11" "12" "14" "15" "16" "18" "20" "22" "25" "28" "30" "32" "35"
"38" "40" "45" "50" "55" "60" "65" "70" "75" "80" "85" "90" "95" "100"
"105" "110" "115" "120" "125" "130" "140" "150" )
("15" "16" "18" "20" "22" "25" "28" "30" "32" "35" "38" "40" "45" "50"
"55" "60" "65" "70" "75" "80" "85" "90" "95" "100" "105" "110" "115" "120"
"125" "130" "140" "150" "160" "170" "180" "190" "200" "210" "220" )
("25" "28" "30" "32" "35" "38" "40" "45" "50" "55" "60" "65" "70" "75"
"80" "85" "90" "95" "100" "110" "120" )
("25" "28" "30" "32" "35" "38" "40" "45" "50" "55" "60" "65" "70" "75"
"80" "85" "90" "95" "100" "105" "110" "115" "120" "125" "130" "140" "150" "160"
"180" "200" )
("40" "45" "50" "55" "60" "65" "70" "75" "80" "85" "90" "95" "100" "110"
"120" "130" "140" "150" "160" "180" "200" )
("55" "60" "65" "70" "75" "80" "85" "90" "100" "110" "120" "130" "140" "150"
"160" "180" "200" )
)
)
)
)
((= "SHCSB" type_scr)
(cond
((= "spec" item_nam)
'("1/8\"BSW" "5/32\"BSW" "3/16\"BSW" "1/4\"BSW" "5/16\"BSW" "3/8\"BSW" "7/16\"BSW" "1/2\"BSW"
"5/8\"BSW" "3/4\"BSW")
)
((= "d_ct" item_nam)
'(0.125 0.156 0.187 0.250 0.312 0.375 0.437 0.500
0.625 0.750)
)
((= "d_ch" item_nam)
'(0.219 0.267 0.312 0.375 0.437 0.563 0.625 0.750
0.875 1.000)
)
((= "cs" item_nam)
'(0.093 0.125 0.156 0.187 0.218 0.312 0.312 0.375
0.500 0.563)
)
((= "cb" item_nam)
'(0.750 0.750 0.875 1.000 1.125 1.250 1.375 1.500
1.750 2.000)
)
((= "cl" item_nam)
'(("1/4\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"")
("1/4\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"")
("1/4\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\""
"1-3/4\"" "2\"" "2-1/4\"" "2-1/2\"" "2-3/4\"" "3\"" )
("3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\""
"2\"" "2-1/4\"" "2-1/2\"" "2-3/4\"" "3\"" "3-1/4\"" "3-1/2\"" )
("3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\""
"2\"" "2-1/4\"" "2-1/2\"" "2-3/4\"" "3\"" "3-1/4\"" "3-1/2\"" "4\""
"4-1/2\"" "5\"" "5-1/2\"" "6\"" )
("1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"" "2\""
"2-1/4\"" "2-1/2\"" "2-3/4\"" "3\"" "3-1/4\"" "3-1/2\"" "4\"" "4-1/2\""
"5\"" "5-1/2\"" "6\"" )
("3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"" "2\"" "2-1/2\"" "3\"" )
("1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"" "2\"" "2-1/4\"" "2-1/2\"" "2-3/4\""
"3\"" "3-1/4\"" "3-1/2\"" "4\"" "4-1/2\"" "5\"" "5-1/2\"" "6\""
"7\"" "8\"" )
("1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"" "2\"" "2-1/4\"" "2-1/2\"" "2-3/4\""
"3\"" "3-1/2\"" "4\"" "4-1/2\"" "5\"" "5-1/2\"" "6\"" "7\""
"8\"" )
("1-1/4\"" "1-1/2\"" "1-3/4\"" "2\"" "2-1/4\"" "2-1/2\"" "3\"" "3-1/2\""
"4\"" "4-1/2\"" "5\"" "5-1/2\"" "6\"" "7\"" "8\"" )
)
)
((= "cll" item_nam)
'((0.250 0.375 0.500 0.625 0.750 1.000 1.250 1.500 )
(0.250 0.375 0.500 0.625 0.750 1.000 1.250 1.500 )
(0.250 0.375 0.500 0.625 0.750 1.000 1.250 1.500
1.750 2.000 2.250 2.500 2.750 3.000 )
(0.375 0.500 0.625 0.750 1.000 1.250 1.500 1.750
2.000 2.250 2.500 2.750 3.000 3.250 3.500 )
(0.375 0.500 0.625 0.750 1.000 1.250 1.500 1.750
2.000 2.250 2.500 2.750 3.000 3.250 3.500 4.000
4.500 5.000 5.500 6.000 )
(0.500 0.625 0.750 1.000 1.250 1.500 1.750 2.000
2.250 2.500 2.750 3.000 3.250 3.500 4.000 4.500
5.000 5.500 6.000 )
(0.750 1.000 1.250 1.500 1.750 2.000 2.500 3.000 )
(1.000 1.250 1.500 1.750 2.000 2.250 2.500 2.750
3.000 3.250 3.500 4.000 4.500 5.000 5.500 6.000
7.000 8.000 )
(1.000 1.250 1.500 1.750 2.000 2.250 2.500 2.750
3.000 3.500 4.000 4.500 5.000 5.500 6.000 7.000
8.000 )
(1.250 1.500 1.750 2.000 2.250 2.500 3.000 3.500
4.000 4.500 5.000 5.500 6.000 7.000 8.000 )
)
)
)
)
((= "SHSSM" type_scr)
(cond
((= "spec" item_nam)
'("M3" "M4" "M5" "M6" "M8" "M10" "M12" "M16")
)
((= "d_ct" item_nam)
'(3.0 4.0 5.0 6.0 8.0 10.0 12.0 16.0)
)
((= "cs" item_nam)
'(1.5 2.0 2.5 3.0 4.0 5.0 6.0 8.0)
)
((= "cz" item_nam)
'(0.5 0.75 0.75 1.0 1.25 1.5 1.75 2.0)
)
((= "cl" item_nam)
'(("3" "4" "5" "6" "8" "10" "12" "16" "20")
("4" "5" "6" "8" "10" "12" "16" "20")
("5" "6" "8" "10" "12" "16" "20" "25" "30")
("6" "8" "10" "12" "16" "20" "25" "30" "35" "40" "45" "50")
("8" "10" "12" "16" "20" "25" "30" "35" "40" "45" "50")
("10" "12" "16" "20" "25" "30" "35" "40" "45" "50")
("12" "16" "20" "25" "30" "35" "40" "45" "50")
("16" "20" "25" "30" "35" "40" "45" "50")
)
)
)
)
((= "SHSSB" type_scr)
(cond
((= "spec" item_nam)
'("1/8\"BSW" "5/32\"BSW" "3/16\"BSW" "1/4\"BSW" "5/16\"BSW" "3/8\"BSW"
"1/2\"BSW")
)
((= "d_ct" item_nam)
'(0.125 0.156 0.187 0.250 0.312 0.375
0.500)
)
((= "cs" item_nam)
'(0.0625 0.078 0.0935 0.125 0.156 0.187
0.250)
)
((= "cz" item_nam)
'(0.02 0.03 0.03 0.04 0.05 0.06
0.08)
)
((= "cl" item_nam)
'(("1/8\"" "5/32\"" "3/16\"" "1/4\"" "5/16\"" "3/8\"")
("5/32\"" "3/16\"" "1/4\"" "5/16\"" "3/8\"" "1/2\"")
("3/16\"" "1/4\"" "5/16\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"")
("1/4\"" "5/16\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\""
"1-1/2\"" "2\"")
("5/16\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\""
"2\"")
("3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "2\"")
("1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "2\"")
)
)
((= "cll" item_nam)
'((0.125 0.156 0.188 0.250 0.312 0.375)
(0.156 0.188 0.250 0.312 0.375 0.500)
(0.188 0.250 0.312 0.375 0.500 0.625 0.750 1.000)
(0.250 0.312 0.375 0.500 0.625 0.750 1.000 1.250
1.500 2.000)
(0.312 0.375 0.500 0.625 0.750 1.000 1.250 1.500
2.000)
(0.375 0.500 0.625 0.750 1.000 1.250 1.500 2.000)
(0.500 0.625 0.750 1.000 1.250 1.500 2.000)
)
)
)
)
((= "SHFSM" type_scr)
(cond
((= "spec" item_nam)
'("M4" "M5" "M6" "M8" "M10" "M12")
)
((= "d_ct" item_nam)
'(4.0 5.0 6.0 8.0 10.0 12.0)
)
((= "d_ch" item_nam)
'(8.0 8.0 12.0 16.0 20.0 24.0)
)
((= "cs" item_nam)
'(2.5 2.5 4.0 5.0 6.0 8.0)
)
((= "ck" item_nam)
'(2.3 2.3 3.3 4.4 5.5 6.5)
)
((= "cl" item_nam)
'(("8" "10" "12" "14" "16" "20")
("8" "10" "12" "14" "16")
("12" "14" "16" "20" "25" "30")
("12" "14" "16" "20" "25" "30")
("16" "20" "25" "30")
("20" "25" "30" "35" "40" "45" "50")
)
)
)
)
((= "SHFSB" type_scr)
(cond
((= "spec" item_nam)
'("1/8\"BSW" "5/32\"BSW" "3/16\"BSW" "1/4\"BSW" "5/16\"BSW" "3/8\"BSW"
"1/2\"BSW")
)
((= "d_ct" item_nam)
'(0.125 0.156 0.187 0.250 0.312 0.375
0.500)
)
((= "d_ch" item_nam)
'(0.250 0.312 0.375 0.500 0.625 0.750
1.000)
)
((= "cs" item_nam)
'(0.083 0.094 0.125 0.156 0.187 0.250
0.312)
)
((= "ck" item_nam)
'(0.073 0.087 0.105 0.137 0.160 0.200
0.270)
)
((= "cl" item_nam)
'(("3/16\"" "1/4\"" "5/16\"" "3/8\"" "1/2\"")
("1/4\"" "5/16\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"")
("1/4\"" "5/16\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"")
("5/16\"" "3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"")
("3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"")
("3/8\"" "1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"" "2\"")
("1/2\"" "5/8\"" "3/4\"" "1\"" "1-1/4\"" "1-1/2\"" "1-3/4\"" "2\"")
)
)
((= "cll" item_nam)
'((0.187 0.250 0.312 0.375 0.500)
(0.250 0.312 0.375 0.500 0.625 0.750)
(0.250 0.312 0.375 0.500 0.625 0.750 1.000)
(0.312 0.375 0.500 0.625 0.750 1.000 1.250 1.500 1.750)
(0.375 0.500 0.625 0.750 1.000 1.250 1.500 1.750)
(0.375 0.500 0.625 0.750 1.000 1.250 1.500 1.750 2.000)
(0.500 0.625 0.750 1.000 1.250 1.500 1.750 2.000)
)
)
)
)
)
)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -