From: ·············@gmail.com
Subject: someone please make this code work on autocad 2008
Date: 
Message-ID: <5bf1693c-bb97-43a0-931b-0390a1e32bba@d1g2000hsg.googlegroups.com>
folks: I humbly request some kind hearted gentleman to help me on this
assignment.

I have a lisp file that is supposed to output a drawing on autocad
2008. but for some reason (maybe a bug, wrong code, wrong syntax/
grammer etc) when i load the lisp file onto autocad 2008, autocad 2008
keeps asking me to enter Dim.

Also, i would like to add that the lisp routine was written in 1989.

posted below is the entire code of pulley.lsp I don't know if i have
to check this google group to find out if someone has solved my
problem, in any case, if someone helps me, please email me at
·············@gmail.com



(command "cmdecho" "0")
(command "blipmode" "off")
(command "layer" "m" "pan" "c" "white" "pan" "lt" "dashed" "pan" "")
(command "layer" "m" "cen" "c" "red" "cen" "lt"	"center" "cen" "")
(command "layer" "m" "dim" "c" "cyan" "dim" "")
(command "ucsicon" "off")
(command "dim"	    "dimasz"   "2.5"	  "dimexe"   "1"
	 "dimexo"   "1"	       "dimtad"	  "on"	     "dimtih"
	 "off"	    "dimtoh"   "off"	  "dimclrt"  "bylayer"
	 "dimclre"  "bylayer"  "dimclrd"  "bylayer"  "dimdli"
	 "0"	    "dimtxt"   "2.5"	  "dimscale" "7"
	 "exit"
	)
(command "dim" "dimtofl" "1" "exit")
(command "layer" "s" "0" "")
(command "style" "romans" "romans" "" "" "0" "" "" "")
(command "ltscale" "50")
(command "zoom" "w" "-50,-50" "4900.000000,2650.000000")
(command "layer" "s" "cen" "")
(command "line"
	 "140.000000,2090.000000"
	 "1740.000000,2090.000000"
	 ""
)
(command "layer" "s" "0" "")
(command "line"
	 "1720.000000,2130.000000"
	 "1720.000000,2050.000000"
	 ""
)
(command "line"
	 "1720.000000,2130.000000"
	 "1610.000000,2130.000000"
	 ""
)
(command "line"
	 "1720.000000,2050.000000"
	 "1610.000000,2050.000000"
	 ""
)
(command "line"
	 "1610.000000,2130.000000"
	 "1610.000000,2050.000000"
	 ""
)
(command "line"
	 "1610.000000,2130.000000"
	 "1605.000000,2135.000000"
	 ""
)
(command "line"
	 "1610.000000,2050.000000"
	 "1605.000000,2045.000000"
	 ""
)
(command "line"
	 "1605.000000,2135.000000"
	 "1605.000000,2045.000000"
	 ""
)
(command "line"
	 "1605.000000,2135.000000"
	 "1435.000000,2135.000000"
	 ""
)
(command "line"
	 "1605.000000,2045.000000"
	 "1435.000000,2045.000000"
	 ""
)
(command "line"
	 "1435.000000,2135.000000"
	 "1435.000000,2045.000000"
	 ""
)
(command "line"
	 "1435.000000,2135.000000"
	 "1430.000000,2140.000000"
	 ""
)
(command "line"
	 "1435.000000,2045.000000"
	 "1430.000000,2040.000000"
	 ""
)
(command "line"
	 "1430.000000,2140.000000"
	 "1430.000000,2040.000000"
	 ""
)
(command "line"
	 "1430.000000,2140.000000"
	 "1375.000000,2140.000000"
	 ""
)
(command "line"
	 "1285.000000,2140.000000"
	 "605.000000,2140.000000"
	 ""
)
(command "line"
	 "515.000000,2140.000000"
	 "460.000000,2140.000000"
	 ""
)
(command "line"
	 "460.000000,2140.000000"
	 "460.000000,2040.000000"
	 ""
)
(command "line"
	 "1430.000000,2040.000000"
	 "460.000000,2040.000000"
	 ""
)
(command "line"
	 "460.000000,2140.000000"
	 "455.000000,2135.000000"
	 ""
)
(command "line"
	 "460.000000,2040.000000"
	 "455.000000,2045.000000"
	 ""
)
(command "line"
	 "455.000000,2135.000000"
	 "455.000000,2045.000000"
	 ""
)
(command "line"
	 "455.000000,2135.000000"
	 "285.000000,2135.000000"
	 ""
)
(command "line"
	 "455.000000,2045.000000"
	 "285.000000,2045.000000"
	 ""
)
(command "line"
	 "285.000000,2135.000000"
	 "285.000000,2045.000000"
	 ""
)
(command "line"
	 "285.000000,2135.000000"
	 "265.000000,2115.000000"
	 ""
)
(command "line"
	 "285.000000,2045.000000"
	 "265.000000,2065.000000"
	 ""
)
(command "line"
	 "265.000000,2115.000000"
	 "265.000000,2065.000000"
	 ""
)
(command "line"
	 "265.000000,2115.000000"
	 "155.000000,2115.000000"
	 ""
)
(command "line"
	 "265.000000,2065.000000"
	 "155.000000,2065.000000"
	 ""
)
(command "line"
	 "155.000000,2115.000000"
	 "155.000000,2065.000000"
	 ""
)
(command "layer" "s" "pan" "")
(command "line"
	 "1440.000000,2170.000000"
	 "1600.000000,2170.000000"
	 ""
)
(command "line"
	 "1600.000000,2170.000000"
	 "1600.000000,2010.000000"
	 ""
)
(command "line"
	 "1600.000000,2010.000000"
	 "1440.000000,2010.000000"
	 ""
)
(command "line"
	 "1440.000000,2010.000000"
	 "1440.000000,2170.000000"
	 ""
)
(command "line"
	 "1460.000000,2180.000000"
	 "1580.000000,2180.000000"
	 ""
)
(command "line"
	 "1580.000000,2180.000000"
	 "1580.000000,2000.000000"
	 ""
)
(command "line"
	 "1580.000000,2000.000000"
	 "1460.000000,2000.000000"
	 ""
)
(command "line"
	 "1460.000000,2000.000000"
	 "1460.000000,2180.000000"
	 ""
)
(command "line"
	 "290.000000,2170.000000"
	 "450.000000,2170.000000"
	 ""
)
(command "line"
	 "450.000000,2170.000000"
	 "450.000000,2010.000000"
	 ""
)
(command "line"
	 "450.000000,2010.000000"
	 "290.000000,2010.000000"
	 ""
)
(command "line"
	 "290.000000,2010.000000"
	 "290.000000,2170.000000"
	 ""
)
(command "line"
	 "310.000000,2180.000000"
	 "430.000000,2180.000000"
	 ""
)
(command "line"
	 "430.000000,2180.000000"
	 "430.000000,2000.000000"
	 ""
)
(command "line"
	 "430.000000,2000.000000"
	 "310.000000,2000.000000"
	 ""
)
(command "line"
	 "310.000000,2000.000000"
	 "310.000000,2180.000000"
	 ""
)
(command "layer" "s" "0" "")
(command "pline"		       "1395.000000,2290.000000"
	 "495.000000,2290.000000"      "495.000000,2300.000000"
	 "1395.000000,2300.000000"     "c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"		       "1395.000000,2290.000000"
	 "495.000000,2290.000000"      "495.000000,2282.000000"
	 "1395.000000,2282.000000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"		       "1395.000000,1890.000000"
	 "495.000000,1890.000000"      "495.000000,1880.000000"
	 "1395.000000,1880.000000"     "c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"		       "1395.000000,1890.000000"
	 "495.000000,1890.000000"      "495.000000,1898.000000"
	 "1395.000000,1898.000000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "line"
	 "1395.000000,2282.000000"
	 "1395.000000,1898.000000"
	 ""
)
(command "line"
	 "495.000000,2282.000000"
	 "495.000000,1898.000000"
	 ""
)
(command "pline"			"1385.000000,2140.000000"
	 "1375.000000,2140.000000"	"1375.000000,2180.000000"
	 "1385.000000,2180.000000"	"c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"		      "505.000000,2140.000000"
	 "515.000000,2140.000000"     "515.000000,2180.000000"
	 "505.000000,2180.000000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"			"1385.000000,2040.000000"
	 "1375.000000,2040.000000"	"1375.000000,2000.000000"
	 "1385.000000,2000.000000"	"c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"		      "505.000000,2040.000000"
	 "515.000000,2040.000000"     "515.000000,2000.000000"
	 "505.000000,2000.000000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command
  "pline"			  "1375.000000,2145.000000"
  "1285.000000,2145.000000"	  "1285.000000,2170.000000"
  "1305.000000,2170.000000"	  "1305.000000,2180.000000"
  "1375.000000,2180.000000"	  "c"
 )
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"			"515.000000,2145.000000"
	 "605.000000,2145.000000"	"605.000000,2170.000000"
	 "585.000000,2170.000000"	"585.000000,2180.000000"
	 "515.000000,2180.000000"	"c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command
  "pline"			  "1375.000000,2040.000000"
  "1285.000000,2040.000000"	  "1285.000000,2010.000000"
  "1305.000000,2010.000000"	  "1305.000000,2000.000000"
  "1375.000000,2000.000000"	  "c"
 )
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"			"515.000000,2040.000000"
	 "605.000000,2040.000000"	"605.000000,2010.000000"
	 "585.000000,2010.000000"	"585.000000,2000.000000"
	 "515.000000,2000.000000"	"c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "line"
	 "1375.000000,2135.000000"
	 "1285.000000,2135.000000"
	 ""
)
(command "line"
	 "1285.000000,2135.000000"
	 "1285.000000,2145.000000"
	 ""
)
(command "line"
	 "1285.000000,2145.000000"
	 "1375.000000,2145.000000"
	 ""
)
(command "line"
	 "1375.000000,2145.000000"
	 "1375.000000,2135.000000"
	 ""
)
(command "line"
	 "515.000000,2135.000000"
	 "605.000000,2135.000000"
	 ""
)
(command "line"
	 "605.000000,2135.000000"
	 "605.000000,2145.000000"
	 ""
)
(command "line"
	 "605.000000,2145.000000"
	 "515.000000,2145.000000"
	 ""
)
(command "line"
	 "515.000000,2145.000000"
	 "515.000000,2135.000000"
	 ""
)
(command "pline"			"1305.000000,2170.000000"
	 "1295.000000,2170.000000"	"1295.000000,2282.000000"
	 "1305.000000,2282.000000"	"c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"		      "585.000000,2170.000000"
	 "595.000000,2170.000000"     "595.000000,2282.000000"
	 "585.000000,2282.000000"     "c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"			"1305.000000,2010.000000"
	 "1295.000000,2010.000000"	"1295.000000,1898.000000"
	 "1305.000000,1898.000000"	"c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"		      "585.000000,2010.000000"
	 "595.000000,2010.000000"     "595.000000,1898.000000"
	 "585.000000,1898.000000"     "c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"		      "950.000000,2140.000000"
	 "940.000000,2140.000000"     "940.000000,2282.000000"
	 "950.000000,2282.000000"     "c"
	)
(command "pline"		      "950.000000,2282.000000"
	 "940.000000,2282.000000"     "940.000000,2232.000000"
	 "950.000000,2232.000000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"		      "950.000000,2040.000000"
	 "940.000000,2040.000000"     "940.000000,1898.000000"
	 "950.000000,1898.000000"     "c"
	)
(command "pline"		      "950.000000,1898.000000"
	 "940.000000,1898.000000"     "940.000000,1948.000000"
	 "950.000000,1948.000000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "layer" "s" "dim" "")
(command "dim"			  "hor"
	 "1385.000000,2180.000000"
	 "1395.000000,2180.000000"
	 "1395.000000,2240.000000"
	 "10.0"			  "e"
	)
(command "text" "1435.000000,2210.000000" "18" "0" "TYP")
(command "dimtix" "1")
(command "dim"			  "hor"
	 "1305.000000,2290.000000"
	 "1395.000000,2290.000000"
	 "1395.000000,2315.000000"
	 "90.0"			  "e"
	)
(command "dim"			  "hor"
	 "1395.000000,2290.000000"
	 "1520.000000,2090.000000"
	 "1520.000000,2365.000000"
	 "125.0"		  "e"
	)
(command "dim"			  "hor"
	 "1395.000000,2290.000000"
	 "495.000000,2290.000000" "1395.000000,2365.000000"
	 "900.0ñ6.0"		  "e"
	)
(command "dim"			 "hor"
	 "495.000000,2290.000000"
	 "370.000000,2090.000000"
	 "370.000000,2365.000000"
	 "125.0"		 "e"
	)
(command "dim"			 "hor"
	 "370.000000,2090.000000"
	 "285.000000,2090.000000"
	 "370.000000,2365.000000"
	 "85.0"			 "e"
	)
(command "dim"			 "hor"
	 "285.000000,2090.000000"
	 "155.000000,2090.000000"
	 "285.000000,2365.000000"
	 "130.0"		 "e"
	)
(command "dim"			   "hor"
	 "370.000000,2090.000000"  "1520.000000,2090.000000"
	 "370.000000,2415.000000"  "1150.0 BRG.CRS."
	 "e"
	)
(command "dim"			  "hor"
	 "1720.000000,2090.000000"
	 "155.000000,2090.000000" "370.000000,2465.000000"
	 "1565.0ñ1.0"		  "e"
	)
(command "luprec" "1")
(command "dimtp" "+12.0")
(command "dimtm" "+3.0")
(command "dimtol" "1")
(command "dim"			 "ver"
	 "495.000000,1890.000000"
	 "495.000000,2290.000000"
	 "115.000000,2290.000000"
	 ""			 "e"
	)
(command "dimtol" "0")
(command "dim"		       "leader"
	 "1330.000000,2140.000000"
	 "1540.000000,2240.000000"
	 ""		       "%%UKEY"
	 "e"
	)
(command "dim"			"leader"
	 "1380.000000,2030.000000"
	 "1540.000000,1970.000000"
	 ""			"%%ULOCK PLATE"
	 "e"
	)
(command "dim"		       "leader"
	 "1330.000000,2030.000000"
	 "1540.000000,1910.000000"
	 ""		       "%%UHUB"
	 "e"
	)
(command "dim"		       "leader"
	 "1300.000000,1990.000000"
	 "1540.000000,1850.000000"
	 ""		       "%%UDISC"
	 "e"
	)
(command "dim"			  "leader"
	 "1330.000000,1880.000000"
	 "1540.000000,1790.000000"
	 ""			  "%%URUBBER LAGGING 10 THK"
	 "e"
	)
(command "text"	"1560.000000,1760.000000" "18" "0" "WITH HB GROOVE")
(command "dim"			 "leader"
	 "1170.000000,1898.000000"
	 "1220.000000,1948.000000"
	 "1270.000000,1748.000000"
	 ""			 "%%USHELL"
	 "e"
	)
(command "dim"			 "leader"
	 "945.000000,1923.000000"
	 "995.000000,1973.000000"
	 "1045.000000,1748.000000"
	 ""			 "%%U1M DISC"
	 "e"
	)
(command "dim"			"leader"
	 "720.000000,2065.000000"
	 "720.000000,1748.000000"
	 "680.000000,1748.000000"
	 ""			"%%USHAFT"
	 "e"
	)
(command "text"	"1675.000000,2150.000000" "18" "90" "COUPLING SIDE")
(command "layer" "s" "cen" "")
(command "line"
	 "40.000000,1250.000000"
	 "1640.000000,1250.000000"
	 ""
)
(command "layer" "s" "0" "")
(command "line"
	 "1620.000000,1290.000000"
	 "1620.000000,1210.000000"
	 ""
)
(command "line"
	 "1620.000000,1290.000000"
	 "1510.000000,1290.000000"
	 ""
)
(command "line"
	 "1620.000000,1210.000000"
	 "1510.000000,1210.000000"
	 ""
)
(command "line"
	 "1510.000000,1290.000000"
	 "1510.000000,1210.000000"
	 ""
)
(command "line"
	 "1510.000000,1290.000000"
	 "1505.000000,1295.000000"
	 ""
)
(command "line"
	 "1510.000000,1210.000000"
	 "1505.000000,1205.000000"
	 ""
)
(command "line"
	 "1505.000000,1295.000000"
	 "1505.000000,1205.000000"
	 ""
)
(command "line"
	 "1505.000000,1295.000000"
	 "1335.000000,1295.000000"
	 ""
)
(command "line"
	 "1505.000000,1205.000000"
	 "1335.000000,1205.000000"
	 ""
)
(command "line"
	 "1335.000000,1295.000000"
	 "1335.000000,1205.000000"
	 ""
)
(command "line"
	 "1335.000000,1295.000000"
	 "1330.000000,1300.000000"
	 ""
)
(command "line"
	 "1335.000000,1205.000000"
	 "1330.000000,1200.000000"
	 ""
)
(command "line"
	 "1330.000000,1300.000000"
	 "1330.000000,1200.000000"
	 ""
)
(command "line"
	 "1330.000000,1300.000000"
	 "755.000000,1299.500000"
	 ""
)
(command "line"
	 "1330.000000,1200.000000"
	 "755.000000,1200.500000"
	 ""
)
(command "line"
	 "755.000000,1299.500000"
	 "360.000000,1300.000000"
	 ""
)
(command "line"
	 "755.000000,1200.500000"
	 "360.000000,1200.000000"
	 ""
)
(command "line"
	 "360.000000,1300.000000"
	 "360.000000,1200.000000"
	 ""
)
(command "line"
	 "360.000000,1300.000000"
	 "355.000000,1295.000000"
	 ""
)
(command "line"
	 "360.000000,1200.000000"
	 "355.000000,1205.000000"
	 ""
)
(command "line"
	 "355.000000,1295.000000"
	 "355.000000,1205.000000"
	 ""
)
(command "line"
	 "355.000000,1295.000000"
	 "185.000000,1295.000000"
	 ""
)
(command "line"
	 "355.000000,1205.000000"
	 "185.000000,1205.000000"
	 ""
)
(command "line"
	 "185.000000,1295.000000"
	 "185.000000,1205.000000"
	 ""
)
(command "line"
	 "185.000000,1295.000000"
	 "165.000000,1275.000000"
	 ""
)
(command "line"
	 "185.000000,1205.000000"
	 "165.000000,1225.000000"
	 ""
)
(command "line"
	 "165.000000,1275.000000"
	 "165.000000,1225.000000"
	 ""
)
(command "line"
	 "165.000000,1275.000000"
	 "55.000000,1275.000000"
	 ""
)
(command "line"
	 "165.000000,1225.000000"
	 "55.000000,1225.000000"
	 ""
)
(command "line"
	 "55.000000,1275.000000"
	 "55.000000,1225.000000"
	 ""
)
(command "line"
	 "1620.000000,1261.000000"
	 "1526.000000,1261.000000"
	 ""
)
(command "arc"
	 "1526.000000,1261.000000"
	 "1515.000000,1250.000000"
	 "1526.000000,1239.000000"
)
(command "line"
	 "1526.000000,1239.000000"
	 "1620.000000,1239.000000"
	 ""
)
(command "arc"
	 "1259.000000,1264.000000"
	 "1273.000000,1250.000000"
	 "1259.000000,1236.000000"
)
(command "line"
	 "1259.000000,1236.000000"
	 "1199.000000,1236.000000"
	 ""
)
(command "arc"
	 "1199.000000,1236.000000"
	 "1185.000000,1250.000000"
	 "1199.000000,1264.000000"
)
(command "line"
	 "1199.000000,1264.000000"
	 "1259.000000,1264.000000"
	 ""
)
(command "arc"
	 "431.000000,1264.000000"
	 "417.000000,1250.000000"
	 "431.000000,1236.000000"
)
(command "line"
	 "431.000000,1236.000000"
	 "491.000000,1236.000000"
	 ""
)
(command "arc"
	 "491.000000,1236.000000"
	 "505.000000,1250.000000"
	 "491.000000,1264.000000"
)
(command "line"
	 "491.000000,1264.000000"
	 "431.000000,1264.000000"
	 ""
)
(command "line"
	 "55.000000,1257.000000"
	 "153.000000,1257.000000"
	 ""
)
(command "arc"
	 "153.000000,1257.000000"
	 "160.000000,1250.000000"
	 "153.000000,1243.000000"
)
(command "line"
	 "153.000000,1243.000000"
	 "55.000000,1243.000000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimtix" "1")
(command "dim"			  "hor"
	 "1515.000000,1250.000000"
	 "1620.000000,1250.000000"
	 "825.000000,1380.000000" "105.0"
	 "e"
	)
(command "dim"			  "hor"
	 "1505.000000,1250.000000"
	 "1620.000000,1250.000000"
	 "825.000000,1420.000000" "115.0"
	 "e"
	)
(command "dim"			  "hor"
	 "1335.000000,1250.000000"
	 "1620.000000,1250.000000"
	 "655.000000,1460.000000" "285.0"
	 "e"
	)
(command "dim"			  "hor"
	 "1273.000000,1250.000000"
	 "1620.000000,1250.000000"
	 "593.000000,1500.000000" "362.0"
	 "e"
	)
(command "dim"			  "hor"
	 "1185.000000,1250.000000"
	 "1620.000000,1250.000000"
	 "505.000000,1540.000000" "450.0"
	 "e"
	)
(command "dim"			  "hor"
	 "1175.000000,1250.000000"
	 "1620.000000,1250.000000"
	 "495.000000,1580.000000" "460.0"
	 "e"
	)
(command "dim"			 "hor"
	 "160.000000,1250.000000"
	 "55.000000,1250.000000" "-495.000000,1380.000000"
	 "105.0"		 "e"
	)
(command "dim"			 "hor"
	 "185.000000,1250.000000"
	 "55.000000,1250.000000" "-495.000000,1420.000000"
	 "130.0"		 "e"
	)
(command "dim"			 "hor"
	 "355.000000,1250.000000"
	 "55.000000,1250.000000" "-325.000000,1460.000000"
	 "300.0"		 "e"
	)
(command "dim"			 "hor"
	 "417.000000,1250.000000"
	 "55.000000,1250.000000" "-263.000000,1500.000000"
	 "362.0"		 "e"
	)
(command "dim"			 "hor"
	 "505.000000,1250.000000"
	 "55.000000,1250.000000" "-175.000000,1540.000000"
	 "450.0"		 "e"
	)
(command "dim"			 "hor"
	 "515.000000,1250.000000"
	 "55.000000,1250.000000" "-165.000000,1580.000000"
	 "460.0"		 "e"
	)
(command "luprec" "1")
(command "dimtol" "1")
(command "dimtp" "1.0")
(command "dimtm" "1.0")
(command "dim"			 "hor"
	 "1620.000000,1250.000000"
	 "55.000000,1250.000000" "-495.000000,1620.000000"
	 ""			 "e"
	)
(command "dim"			 "ver"
	 "845.000000,1299.500000"
	 "845.000000,1200.500000"
	 "845.000000,1200.500000"
	 " "			 "e"
	)
(command "luprec" "3")
(command "dimtp" "0.0")
(command "dimtm" "0.5")
(command "ucs" "z" "90")
(command "dim"		      "leader"
	 "1200.500000,-845.000000"
	 "1150.500000,-845.000000"		   ""
	 ""		      "exit"
	)
(command "ucs" "z" "-90")
(command "dim"			  "ver"
	 "1275.000000,1300.000000"
	 "1275.000000,1200.000000"
	 "1275.000000,1200.000000"
	 " "			  "e"
	)
(command "dimtp" "0.025")
(command "dimtm" "-0.003")
(command "ucs" "z" "90")
(command "dim"		       "leader"
	 "1200.000000,-1275.000000"
	 "1150.000000,-1275.000000"
	 ""		       ""
	 "exit"
	)
(command "ucs" "z" "-90")
(command "text" "1305.000000,1000.000000" "18" "90" "k6")
(command "dim"			  "ver"
	 "1420.000000,1295.000000"
	 "1420.000000,1205.000000"
	 "1420.000000,1205.000000"
	 " "			  "e"
	)
(command "dimtp" "0.000")
(command "dimtm" "0.087")
(command "ucs" "z" "90")
(command "dim"		       "leader"
	 "1205.000000,-1420.000000"
	 "1155.000000,-1420.000000"
	 ""		       ""
	 "exit"
	)
(command "ucs" "z" "-90")
(command "text" "1450.000000,1005.000000" "18" "90" "h9")
(command "dim"			  "ver"
	 "1560.000000,1290.000000"
	 "1560.000000,1210.000000"
	 "1560.000000,1210.000000"
	 " "			  "e"
	)
(command "dimtp" "0.013")
(command "dimtm" "0.009")
(command "ucs" "z" "90")
(command "dim"		       "leader"
	 "1210.000000,-1560.000000"
	 "1160.000000,-1560.000000"
	 ""		       ""
	 "exit"
	)
(command "ucs" "z" "-90")
(command "text" "1590.000000,1010.000000" "18" "90" "j6")
(command "dim"			 "ver"
	 "415.000000,1300.000000"
	 "415.000000,1200.000000"
	 "415.000000,1200.000000"
	 " "			 "e"
	)
(command "dimtp" "0.025")
(command "dimtm" "-0.003")
(command "ucs" "z" "90")
(command "dim"		      "leader"
	 "1200.000000,-415.000000"
	 "1150.000000,-415.000000"		   ""
	 ""		      "exit"
	)
(command "ucs" "z" "-90")
(command "text" "445.000000,1000.000000" "18" "90" "k6")
(command "dim"			 "ver"
	 "270.000000,1295.000000"
	 "270.000000,1205.000000"
	 "270.000000,1205.000000"
	 " "			 "e"
	)
(command "dimtp" "0.000")
(command "dimtm" "0.087")
(command "ucs" "z" "90")
(command "dim"		      "leader"
	 "1205.000000,-270.000000"
	 "1155.000000,-270.000000"		   ""
	 ""		      "exit"
	)
(command "ucs" "z" "-90")
(command "text" "300.000000,1005.000000" "18" "90" "h9")
(command "dim"			 "ver"
	 "125.000000,1275.000000"
	 "125.000000,1225.000000"
	 "125.000000,1225.000000"
	 " "			 "e"
	)
(command "dimtp" "0.012")
(command "dimtm" "0.007")
(command "ucs" "z" "90")
(command "dim"		      "leader"
	 "1225.000000,-125.000000"
	 "1175.000000,-125.000000"		   ""
	 ""		      "exit"
	)
(command "ucs" "z" "-90")
(command "text" "155.000000,1025.000000" "18" "90" "j6")
(command "dimtol" "0")
(command "layer" "s" "0" "")
(command "text" "845.000000,900.000000" "21" "0" "%%USHAFT")
(command "text"	"545.000000,850.000000"	"18" "0" "%%UQTY%%U  - 1NO")
(command "text"			   "945.000000,850.000000"
	 "18"			   "0"
	 "%%UDES%%U  - (FINISHED SHAFT)"
	)
(command "text"			"545.000000,800.000000"
	 "18"			"0"
	 "%%UWT%%U   - 82.48 Kg"
	)
(command "text"	"945.000000,800.000000"	"18" "0" "%%UMATL%%U - EN8")
(command "layer" "s" "0" "")
(command "pline"		  "265.000000,620.000000"
	 "a"			  "ce"
	 "300.000000,500.000000"  "335.000000,620.000000"
	 "l"			  "335.000000,600.000000"
	 "265.000000,600.000000"  "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "layer" "s" "dim" "")
(command "dimlfac" "0.400000")
(command "luprec" "3")
(command "dimtol" "1")
(command "dimtix" "1")
(command "dimtp" "0.000000")
(command "dimtm" "0.200000")
(command "dim"			"ver"
	 "300.000000,375.000000"
	 "300.000000,600.000000"
	 "143.750000,500.000000"
	 ""			"e"
	)
(command "dimtix" "0")
(command "dimtp" "0.000000")
(command "dimtm" "0.052000")
(command "dim"			"hor"
	 "265.000000,620.000000"
	 "335.000000,620.000000"
	 "300.000000,687.500000"
	 ""			"e"
	)
(command "dimtix" "1")
(command "dimtol" "0")
(command "dim"			 "hor"
	 "175.000000,500.000000" "425.000000,500.000000"
	 "300.000000,312.500000" "%%c100"
	 "e"
	)
(command "layer" "s" "0" "")
(command "arc"
	 "377.500000,235.000000"
	 "412.500000,200.000000"
	 "377.500000,165.000000"
)
(command "line"
	 "377.500000,165.000000"
	 "222.500000,165.000000"
	 ""
)
(command "arc"
	 "222.500000,165.000000"
	 "187.500000,200.000000"
	 "222.500000,235.000000"
)
(command "line"
	 "222.500000,235.000000"
	 "377.500000,235.000000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimtol" "1")
(command "dimtix" "0")
(command "dimtoh" "1")
(command "dimtp" "0.000000")
(command "dimtm" "0.052000")
(command "dim"			"ver"
	 "412.500000,165.000000"
	 "412.500000,235.000000"
	 "437.500000,297.500000"
	 ""			"e"
	)
(command "dimtol" "0")
(command "dimtix" "1")
(command "dimtoh" "0")
(command "dim"			"hor"
	 "187.500000,200.000000"
	 "412.500000,200.000000"
	 "300.000000,110.000000"
	 "90.0"			"e"
	)
(command "dim"		     "leader"		 "215.625000,200.000000"
	 "125.000000,270.000000"		 ""
	 "%%UKEY"	     "e"
	)
(command "dim"		     "leader"		 "187.500000,200.000000"
	 "125.000000,130.000000"		 ""
	 "%%U16THK"	     "e"
	)
(command "layer" "s" "0" "")
(command "line"
	 "475.000000,165.000000"
	 "515.000000,165.000000"
	 ""
)
(command "line"
	 "515.000000,165.000000"
	 "515.000000,235.000000"
	 ""
)
(command "line"
	 "515.000000,235.000000"
	 "475.000000,235.000000"
	 ""
)
(command "line"
	 "475.000000,235.000000"
	 "475.000000,165.000000"
	 ""
)
(command "dimtol" "1")
(command "dimtix" "0")
(command "dimtp" "0.000000")
(command "dimtm" "0.110000")
(command "layer" "s" "dim" "")
(command "dim"			"hor"
	 "475.000000,165.000000"
	 "515.000000,165.000000"
	 "515.000000,102.500000"
	 ""			"e"
	)
(command "dimtol" "0")
(command "dimlfac" "1")
(command "layer" "s" "0" "")
(command "text"	"50.000000,50.000000" "18" "0" "%%UQTY%%U  - 1NO")
(command "text"			"450.000000,50.000000"
	 "18"			"0"
	 "%%UDES%%U  - 16X28X90.0"
	)
(command "text"			 "50.000000,0.000000"
	 "18"			 "0"
	 "%%UWT%%U   - 0.32X2=0.63 Kg"
	)
(command "text"	"450.000000,0.000000" "18" "0" "%%UMATL%%U - EN8")
(command "layer" "s" "0" "")
(command "pline"		   "1072.500000,596.144423"
	 "a"			   "ce"
	 "1100.000000,500.000000"  "1127.500000,596.144423"
	 "l"			   "1127.500000,577.500000"
	 "1072.500000,577.500000"  "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "layer" "s" "dim" "")
(command "dimlfac" "0.400000")
(command "luprec" "3")
(command "dimtol" "1")
(command "dimtix" "1")
(command "dimtp" "0.000000")
(command "dimtm" "0.200000")
(command "dim"			 "ver"
	 "1100.000000,400.000000"
	 "1100.000000,577.500000"
	 "975.000000,500.000000" ""
	 "e"
	)
(command "dimtix" "0")
(command "dimtp" "0.000000")
(command "dimtm" "0.052000")
(command "dim"			 "hor"
	 "1072.500000,596.144423"
	 "1127.500000,596.144423"
	 "1100.000000,662.500000"
	 ""			 "e"
	)
(command "dimtix" "1")
(command "dimtol" "0")
(command "dim"			 "hor"
	 "1000.000000,500.000000"
	 "1200.000000,500.000000"
	 "1100.000000,337.500000"
	 "%%c80"		 "e"
	)
(command "layer" "s" "0" "")
(command "arc"
	 "1203.750000,227.500000"
	 "1231.250000,200.000000"
	 "1203.750000,172.500000"
)
(command "line"
	 "1203.750000,172.500000"
	 "996.250000,172.500000"
	 ""
)
(command "arc"
	 "996.250000,172.500000"
	 "968.750000,200.000000"
	 "996.250000,227.500000"
)
(command "line"
	 "996.250000,227.500000"
	 "1203.750000,227.500000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimtol" "1")
(command "dimtix" "0")
(command "dimtoh" "1")
(command "dimtp" "0.000000")
(command "dimtm" "0.052000")
(command "dim"			 "ver"
	 "1231.250000,172.500000"
	 "1231.250000,227.500000"
	 "1256.250000,290.000000"
	 ""			 "e"
	)
(command "dimtol" "0")
(command "dimtix" "1")
(command "dimtoh" "0")
(command "dim"			 "hor"
	 "968.750000,200.000000" "1231.250000,200.000000"
	 "1100.000000,102.500000"
	 "105.0"		 "e"
	)
(command "dim"		     "leader"
	 "1001.562500,200.000000"		 "906.250000,255.000000"
	 ""		     "%%UKEY"		 "e"
	)
(command "dim"		     "leader"		 "968.750000,200.000000"
	 "906.250000,145.000000"		 ""
	 "%%U14THK"	     "e"
	)
(command "layer" "s" "0" "")
(command "line"
	 "1293.750000,172.500000"
	 "1328.750000,172.500000"
	 ""
)
(command "line"
	 "1328.750000,172.500000"
	 "1328.750000,227.500000"
	 ""
)
(command "line"
	 "1328.750000,227.500000"
	 "1293.750000,227.500000"
	 ""
)
(command "line"
	 "1293.750000,227.500000"
	 "1293.750000,172.500000"
	 ""
)
(command "dimtol" "1")
(command "dimtix" "0")
(command "dimtp" "0.000000")
(command "dimtm" "0.110000")
(command "layer" "s" "dim" "")
(command "dim"			 "hor"
	 "1293.750000,172.500000"
	 "1328.750000,172.500000"
	 "1328.750000,110.000000"
	 ""			 "e"
	)
(command "dimtol" "0")
(command "dimlfac" "1")
(command "layer" "s" "0" "")
(command "text"	"800.000000,50.000000" "18" "0"	"%%UQTY%%U  - 1NO")
(command "text"			"1200.000000,50.000000"
	 "18"			"0"
	 "%%UDES%%U  - 14X22X105"
	)
(command "text"	"800.000000,0.000000" "18" "0" "%%UWT%%U   - 0.25 Kg")
(command "text"	"1200.000000,0.000000" "18" "0"	"%%UMATL%%U - EN8")
(command "layer" "s" "0" "")
(command "pline"		   "1932.500000,560.000000"
	 "a"			   "ce"
	 "1950.000000,500.000000"  "1967.500000,560.000000"
	 "l"			   "1967.500000,548.750000"
	 "1932.500000,548.750000"  "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "layer" "s" "dim" "")
(command "dimlfac" "0.400000")
(command "luprec" "3")
(command "dimtol" "1")
(command "dimtix" "1")
(command "dimtp" "0.000000")
(command "dimtm" "0.200000")
(command "dim"			 "ver"
	 "1950.000000,437.500000"
	 "1950.000000,548.750000"
	 "1871.875000,500.000000"
	 ""			 "e"
	)
(command "dimtix" "0")
(command "dimtp" "0.000000")
(command "dimtm" "0.043000")
(command "dim"			 "hor"
	 "1932.500000,560.000000"
	 "1967.500000,560.000000"
	 "1950.000000,625.000000"
	 ""			 "e"
	)
(command "dimtix" "1")
(command "dimtol" "0")
(command "dim"			 "hor"
	 "1887.500000,500.000000"
	 "2012.500000,500.000000"
	 "1950.000000,375.000000"
	 "%%c50"		 "e"
	)
(command "layer" "s" "0" "")
(command "arc"
	 "2063.750000,217.500000"
	 "2081.250000,200.000000"
	 "2063.750000,182.500000"
)
(command "line"
	 "2063.750000,182.500000"
	 "1836.250000,182.500000"
	 ""
)
(command "arc"
	 "1836.250000,182.500000"
	 "1818.750000,200.000000"
	 "1836.250000,217.500000"
)
(command "line"
	 "1836.250000,217.500000"
	 "2063.750000,217.500000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimtol" "1")
(command "dimtix" "0")
(command "dimtoh" "1")
(command "dimtp" "0.000000")
(command "dimtm" "0.043000")
(command "dim"			 "ver"
	 "2081.250000,182.500000"
	 "2081.250000,217.500000"
	 "2106.250000,280.000000"
	 ""			 "e"
	)
(command "dimtol" "0")
(command "dimtix" "1")
(command "dimtoh" "0")
(command "dim"			 "hor"
	 "1818.750000,200.000000"
	 "2081.250000,200.000000"
	 "1950.000000,92.500000" "105.0"
	 "e"
	)
(command "dim"		      "leader"
	 "1851.562500,200.000000"
	 "1756.250000,235.000000"		   ""
	 "%%UKEY"	      "e"
	)
(command "dim"		      "leader"
	 "1818.750000,200.000000"
	 "1756.250000,165.000000"		   ""
	 "%%U9THK"	      "e"
	)
(command "layer" "s" "0" "")
(command "line"
	 "2143.750000,182.500000"
	 "2166.250000,182.500000"
	 ""
)
(command "line"
	 "2166.250000,182.500000"
	 "2166.250000,217.500000"
	 ""
)
(command "line"
	 "2166.250000,217.500000"
	 "2143.750000,217.500000"
	 ""
)
(command "line"
	 "2143.750000,217.500000"
	 "2143.750000,182.500000"
	 ""
)
(command "dimtol" "1")
(command "dimtix" "0")
(command "dimtp" "0.000000")
(command "dimtm" "0.090000")
(command "layer" "s" "dim" "")
(command "dim"			 "hor"
	 "2143.750000,182.500000"
	 "2166.250000,182.500000"
	 "2166.250000,120.000000"
	 ""			 "e"
	)
(command "dimtol" "0")
(command "dimlfac" "1")
(command "layer" "s" "0" "")
(command "text"	"1675.000000,50.000000"	"18" "0" "%%UQTY%%U  - 1NO")
(command "text"			"2075.000000,50.000000"
	 "18"			"0"
	 "%%UDES%%U  - 9X14X105"
	)
(command "text"		       "1675.000000,0.000000"
	 "18"		       "0"
	 "%%UWT%%U   - 0.10 Kg"
	)
(command "text"	"2075.000000,0.000000" "18" "0"	"%%UMATL%%U - EN8")
(command "luprec" "1")
(command "pline"			"3175.000000,2440.000000"
	 "3175.000000,2447.500000"	"2500.000000,2447.500000"
	 "2500.000000,2440.000000"	"c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"			"3175.000000,2140.000000"
	 "3175.000000,2132.500000"	"2500.000000,2132.500000"
	 "2500.000000,2140.000000"	"c"
	)
(command "hatch" "ansi31" "50" "90" "l" "")
(command "pline"			"3175.000000,2440.000000"
	 "3175.000000,2434.000000"	"2500.000000,2434.000000"
	 "2500.000000,2440.000000"	"c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"			"3175.000000,2140.000000"
	 "3175.000000,2146.000000"	"2500.000000,2146.000000"
	 "2500.000000,2140.000000"	"c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "line"
	 "2500.000000,2440.000000"
	 "2500.000000,2140.000000"
	 ""
)
(command "line"
	 "3175.000000,2440.000000"
	 "3175.000000,2140.000000"
	 ""
)
(command "layer" "s" "cen" "")
(command "line"
	 "2485.000000,2290.000000"
	 "3190.000000,2290.000000"
	 ""
)
(command "layer" "s" "0" "")
(command "dimtix" "1")
(command "dimtol" "1")
(command "dimtm" "6.0")
(command "dimtp" "6.0")
(command "luprec" "1")
(command "dimlfac" "1.333333")
(command "layer" "s" "dim" "")
(command "dim"			  "hor"
	 "2500.000000,2440.000000"
	 "3175.000000,2440.000000"
	 "3175.000000,2490.000000"
	 ""			  "e"
	)
(command "dimtp" "12.0")
(command "dimtm" "3.0")
(command "dim"			  "ver"
	 "2500.000000,2440.000000"
	 "2500.000000,2140.000000"
	 "2450.000000,2290.000000"
	 ""			  "e"
	)
(command "dimtol" "0")
(command "dimtix" "0")
(command "dimtoh" "1")
(command "dim"			  "ver"
	 "2837.500000,2140.000000"
	 "2837.500000,2146.000000"
	 "2837.500000,2190.000000"
	 ""			  "e"
	)
(command "dimtoh" "0")
(command "layer" "s" "0" "")
(command "text"		       "2437.500000,2040.000000"
	 "18"		       "0"
	 "%%UQTY%%U  - 1NO"
	)
(command "text"			    "2837.500000,2040.000000"
	 "18"			    "0"
	 "%%UDES%%U  - (FINISHED SHELL)"
	)
(command "text"			"2437.500000,1990.000000"
	 "18"			"0"
	 "%%UWT%%U   - 69.60 Kg"
	)
(command "text"	"2837.500000,1990.000000" "18" "0" "%%UMATL%%U - MS")
(command "line"
	 "3426.000000,2104.331874"
	 "3699.000000,2104.331874"
	 ""
)
(command "line"
	 "3426.000000,2104.331874"
	 "3426.000000,2475.668126"
	 ""
)
(command "line"
	 "3426.000000,2475.668126"
	 "3699.000000,2475.668126"
	 ""
)
(command "line"
	 "3699.000000,2475.668126"
	 "3699.000000,2104.331874"
	 ""
)
(command "line"
	 "3426.000000,2475.668126"
	 "3426.000000,2505.668126"
	 ""
)
(command "line"
	 "3426.000000,2505.668126"
	 "3699.000000,2505.668126"
	 ""
)
(command "line"
	 "3699.000000,2505.668126"
	 "3699.000000,2475.668126"
	 ""
)
(command "line"
	 "3426.000000,2104.331874"
	 "3699.000000,2475.668126"
	 ""
)
(command "dimlfac" "3.33333333")
(command "layer" "s" "dim" "")
(command "dim"			  "ver"
	 "3426.000000,2104.331874"
	 "3426.000000,2475.668126"
	 "3376.000000,2290.000000"
	 ""			  "e"
	)
(command "dim"			  "hor"
	 "3426.000000,2104.331874"
	 "3699.000000,2104.331874"
	 "3426.000000,2039.331874"
	 ""			  "e"
	)
(command "dim"			  "aligned"
	 "3426.000000,2104.331874"
	 "3699.000000,2475.668126"
	 "3537.500000,2315.000000"
	 ""			  "e"
	)
(command "dim"			  "ver"
	 "3699.000000,2475.668126"
	 "3699.000000,2505.668126"
	 "3724.000000,2515.668126"
	 " "			  "e"
	)
(command "dim"			  "leader"
	 "3714.000000,2540.668126"
	 "3699.000000,2540.668126"
	 ""			  "100 PREPINCHING ALLOW"
	 "e"
	)
(command "layer" "s" "0" "")
(command "line"
	 "2695.000000,1398.500000"
	 "2695.000000,1781.500000"
	 ""
)
(command "line"
	 "2695.000000,1781.500000"
	 "2705.000000,1781.500000"
	 ""
)
(command "line"
	 "2705.000000,1781.500000"
	 "2705.000000,1398.500000"
	 ""
)
(command "line"
	 "2705.000000,1398.500000"
	 "2695.000000,1398.500000"
	 ""
)
(command "layer" "s" "cen" "")
(command "line"
	 "2680.000000,1590.000000"
	 "2720.000000,1590.000000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimlfac" "1")
(command "dimtol" "1")
(command "dimtp" "0")
(command "dimtm" "0.5")
(command "dim"			  "hor"
	 "2695.000000,1781.500000"
	 "2705.000000,1781.500000"
	 "2720.000000,1781.500000"
	 ""			  "e"
	)
(command "dim"			  "ver"
	 "2695.000000,1398.500000"
	 "2695.000000,1781.500000"
	 "2550.000000,1781.500000"
	 ""			  "e"
	)
(command "dimtp" "0.5")
(command "dimtm" "0")
(command "dimtix" "1")
(command "dim"			  "ver"
	 "2695.000000,1510.000000"
	 "2695.000000,1670.000000"
	 "2625.000000,1670.000000"
	 ""			  "e"
	)
(command "dimtix" "0")
(command "dimtol" "0")
(command "layer" "s" "0" "")
(command "text"		       "2591.500000,1290.000000"
	 "18"		       "0"
	 "%%UQTY%%U  - 2NO"
	)
(command "text"			    "2991.500000,1290.000000"
	 "18"			    "0"
	 "%%UDES%%U  - (FINISHED DISK)"
	)
(command "text"			    "2591.500000,1240.000000"
	 "18"			    "0"
	 "%%UWT%%U   - 7.47X2=14.93 Kg"
	)
(command "text"	"2991.500000,1240.000000" "18" "0" "%%UMATL%%U - MS")
(command "circle"
	 "3041.500000,1590.000000"
	 "80.000000"
)
(command "circle"
	 "3041.500000,1590.000000"
	 "191.500000"
)
(command "layer" "s" "cen" "")
(command "line"
	 "2830.000000,1590.000000"
	 "3253.000000,1590.000000"
	 ""
)
(command "line"
	 "3041.500000,1378.500000"
	 "3041.500000,1801.500000"
	 ""
)
(command "layer" "s" "0" "")
(command "layer" "s" "0" "")
(command "line"
	 "3519.500000,1398.500000"
	 "3519.500000,1781.500000"
	 ""
)
(command "line"
	 "3519.500000,1781.500000"
	 "3529.500000,1781.500000"
	 ""
)
(command "line"
	 "3529.500000,1781.500000"
	 "3529.500000,1398.500000"
	 ""
)
(command "line"
	 "3529.500000,1398.500000"
	 "3519.500000,1398.500000"
	 ""
)
(command "layer" "s" "cen" "")
(command "line"
	 "3504.500000,1590.000000"
	 "3544.500000,1590.000000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimlfac" "1")
(command "dimtol" "1")
(command "dimtp" "0")
(command "dimtm" "0.5")
(command "dim"			  "hor"
	 "3519.500000,1781.500000"
	 "3529.500000,1781.500000"
	 "3544.500000,1781.500000"
	 ""			  "e"
	)
(command "dim"			  "ver"
	 "3519.500000,1398.500000"
	 "3519.500000,1781.500000"
	 "3374.500000,1781.500000"
	 ""			  "e"
	)
(command "dimtol" "0")
(command "dimtix" "1")
(command "dim"			  "ver"
	 "3519.500000,1448.500000"
	 "3519.500000,1731.500000"
	 "3449.500000,1731.500000"
	 ""			  "e"
	)
(command "dimtix" "0")
(command "dimtol" "0")
(command "layer" "s" "0" "")
(command "text"		       "3416.000000,1290.000000"
	 "18"		       "0"
	 "%%UQTY%%U  - 1NO"
	)
(command "text"			     "3816.000000,1290.000000"
	 "18"			     "0"
	 "%%UDES%%U  - (FINISHED 1M DISK)"
	)
(command "text"			"3416.000000,1240.000000"
	 "18"			"0"
	 "%%UWT%%U   - 4.11 Kg"
	)
(command "text"	"3816.000000,1240.000000" "18" "0" "%%UMATL%%U - MS")
(command "circle"
	 "3866.000000,1590.000000"
	 "141.500000"
)
(command "circle"
	 "3866.000000,1590.000000"
	 "191.500000"
)
(command "layer" "s" "cen" "")
(command "line"
	 "3654.500000,1590.000000"
	 "4077.500000,1590.000000"
	 ""
)
(command "line"
	 "3866.000000,1378.500000"
	 "3866.000000,1801.500000"
	 ""
)
(command "layer" "s" "0" "")
(command "pline"			"2660.000000,922.800000"
	 "2660.000000,970.000000"	"2700.000000,970.000000"
	 "2700.000000,990.000000"	"2840.000000,990.000000"
	 "2840.000000,922.800000"	"c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"			"2660.000000,710.000000"
	 "2660.000000,650.000000"	"2700.000000,650.000000"
	 "2700.000000,630.000000"	"2840.000000,630.000000"
	 "2840.000000,710.000000"	"c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "line"
	 "2660.000000,922.800000"
	 "2670.000000,910.000000"
	 ""
)
(command "line"
	 "2670.000000,910.000000"
	 "2840.000000,910.000000"
	 ""
)
(command "line"
	 "2670.000000,910.000000"
	 "2670.000000,710.000000"
	 ""
)
(command "line"
	 "2660.000000,922.800000"
	 "2660.000000,710.000000"
	 ""
)
(command "line"
	 "2840.000000,922.800000"
	 "2840.000000,710.000000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimlfac" "0.5")
(command "dim"			 "ver"
	 "2660.000000,710.000000"
	 "2660.000000,910.000000"
	 "2635.000000,910.000000"
	 "100%%c"		 "e"
	)
(command "luprec" "1")
(command "dimtol" "1")
(command "dimtp" "0")
(command "dimtm" "0.1")
(command "dim"			 "ver"
	 "2660.000000,650.000000"
	 "2660.000000,970.000000"
	 "2585.000000,990.000000"
	 ""			 "e"
	)
(command "dimtp" "20")
(command "dimtm" "0")
(command "dim"			 "ver"
	 "2840.000000,630.000000"
	 "2840.000000,990.000000"
	 "2915.000000,990.000000"
	 ""			 "e"
	)
(command "dimtol" "0")
(command "dim"			 "hor"
	 "2660.000000,650.000000"
	 "2700.000000,630.000000"
	 "2660.000000,580.000000"
	 ""			 "e"
	)
(command "dim"			 "hor"
	 "2660.000000,650.000000"
	 "2840.000000,630.000000"
	 "2660.000000,530.000000"
	 ""			 "e"
	)
(command "dimlfac" "1")
(command "layer" "s" "0" "")
(command "text"	"2540.000000,460.000000" "18" "0" "%%UQTY%%U  - 2NO")
(command "text"			   "2940.000000,460.000000"
	 "18"			   "0"
	 "%%UDES%%U  - (FINISHED HUB)"
	)
(command "text"			    "2540.000000,410.000000"
	 "18"			    "0"
	 "%%UWT%%U   - 11.59X2=23.18 Kg"
	)
(command "text"	"2940.000000,410.000000" "18" "0" "%%UMATL%%U - MS")
(command "layer" "s" "cen" "")
(command "line"
	 "3120.000000,760.000000"
	 "3520.000000,760.000000"
	 ""
)
(command "line"
	 "3320.000000,560.000000"
	 "3320.000000,960.000000"
	 ""
)
(command "layer" "s" "0" "")
(command "circle"
	 "3320.000000,760.000000"
	 "180.000000"
)
(command "dimtoh" "1")
(command "dimlfac" "0.5")
(command "luprec" "0")
(command "layer" "s" "dim" "")
(command "dim" "dia" "3435.701770,897.888000" "" "" "exit")
(command "layer" "s" "pan" "")
(command "circle"
	 "3320.000000,760.000000"
	 "160.000000"
)
(command "layer" "s" "dim" "")
(command "dim" "dia" "3465.009246,827.618922" "" "" "exit")
(command "layer" "s" "pan" "")
(command "circle"
	 "3320.000000,760.000000"
	 "140.000000"
)
(command "layer" "s" "0" "")
(command "circle" "3320.000000,620.000000" "8.000000")
(command "array"	"l"	       ""	      "p"
	 "3320.000000,760.000000"      "3"	      "360"
	 "y"
	)
(command "arc"
	 "3292.000000,856.000000"
	 "3320.000000,660.000000"
	 "3348.000000,856.000000"
)
(command "line"
	 "3348.000000,856.000000"
	 "3348.000000,872.800000"
	 ""
)
(command "line"
	 "3348.000000,872.800000"
	 "3292.000000,872.800000"
	 ""
)
(command "line"
	 "3292.000000,872.800000"
	 "3292.000000,856.000000"
	 ""
)
(command "luprec" "3")
(command "dimtol" "1")
(command "dimtp" "0.000000")
(command "dimtm" "0.052000")
(command "layer" "s" "dim" "")
(command "dim"			 "hor"
	 "3292.000000,866.400000"
	 "3348.000000,866.400000"
	 "3320.000000,990.000000"
	 ""			 "e"
	)
(command "dimtp" "0.200000")
(command "dimtm" "0.000000")
(command "dimtix" "1")
(command "dim"			 "ver"
	 "3320.000000,660.000000"
	 "3292.000000,872.800000"
	 "3115.000000,760.000000"
	 ""			 "e"
	)
(command "dim"		       "leader"
	 "3320.000000,612.000000"
	 "3370.000000,530.000000"
	 ""		       "M6HOLE 15DEEP"
	 "e"
	)
(command "text"			"3387.000000,503.000000"
	 "18"			"0"
	 "%%U(3Nos) EQUISPACED"
	)
(command "text"	"3387.000000,472.000000" "18" "0" "%%UON 140.OP.C.D")
(command "layer" "s" "0" "")
(command "pline"		      "3775.000000,810.500000"
	 "3775.000000,850.000000"     "3785.000000,850.000000"
	 "3785.000000,810.500000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "pline"		      "3775.000000,709.500000"
	 "3775.000000,670.000000"     "3785.000000,670.000000"
	 "3785.000000,709.500000"     "c"
	)
(command "hatch" "ansi31" "50" "0" "l" "")
(command "line"
	 "3775.000000,810.500000"
	 "3775.000000,709.500000"
	 ""
)
(command "line"
	 "3785.000000,810.500000"
	 "3785.000000,709.500000"
	 ""
)
(command "line"
	 "3775.000000,760.000000"
	 "3785.000000,760.000000"
	 ""
)
(command "layer" "s" "dim" "")
(command "dimlfac" "1")
(command "dimtol" "0")
(command "luprec" "0")
(command "dim"			 "ver"
	 "3775.000000,709.500000"
	 "3775.000000,810.500000"
	 "3750.000000,760.000000"
	 "101%%c"		 "e"
	)
(command "dim"			 "ver"
	 "3775.000000,670.000000"
	 "3775.000000,850.000000"
	 "3720.000000,760.000000"
	 "180%%c"		 "e"
	)
(command "dimtix" "0")
(command "dim"			 "hor"
	 "3775.000000,670.000000"
	 "3785.000000,670.000000"
	 "3780.000000,620.000000"
	 ""			 "e"
	)
(command "layer" "s" "cen" "")
(command "line"
	 "3950.000000,760.000000"
	 "4170.000000,760.000000"
	 ""
)
(command "line"
	 "4060.000000,650.000000"
	 "4060.000000,870.000000"
	 ""
)
(command "layer" "s" "0" "")
(command "circle" "4060.000000,760.000000" "90.000000")
(command "dimtoh" "1")
(command "luprec" "0")
(command "layer" "s" "dim" "")
(command "dim" "dia" "4117.850885,828.944000" "" "" "exit")
(command "layer" "s" "pan" "")
(command "circle"
	 "4060.000000,760.000000"
	 "70.000000"
)
(command "layer" "s" "dim" "")
(command "dim" "dia" "4123.441545,789.583278" "" "" "exit")
(command "layer" "s" "0" "")
(command "circle" "4060.000000,690.000000" "4.000000")
(command "array"	"l"	       ""	      "p"
	 "4060.000000,760.000000"      "3"	      "360"
	 "y"
	)
(command "circle"
	 "4060.000000,760.000000"
	 "50.500000"
)
(command "layer" "s" "dim" "")
(command "dim"		       "dia"
	 "4047.375000,781.867141"
	 ""		       "3945.000000,875.000000"
	 "exit"
	)
(command "dim"		       "leader"
	 "4060.000000,686.250000"
	 "4110.000000,620.000000"
	 ""		       "%%c8HOLES(3Nos)"
	 "e"
	)
(command "text"	"4127.000000,593.000000" "18" "0" "%%UEQUISPACED ON")
(command "text"	"4127.000000,562.000000" "18" "0" "%%U140.OP.C.D")
(command "text"			    "4127.000000,521.000000"
	 "18"			    "0"
	 "%%UNOTE%%U To be drilled along"
	)
(command "text"			 "4127.000000,490.000000"
	 "18"			 "0"
	 "with HUB in one setting"
	)
(command "layer" "s" "0" "")
(command "text"	"3760.000000,370.000000" "18" "0" "%%UQTY%%U  - 2NO")
(command "text"			      "4160.000000,370.000000"
	 "18"			      "0"
	 "%%UDES%%U  - (FINISHED LOCK PLATE)"
	)
(command "text"			   "3760.000000,320.000000"
	 "18"			   "0"
	 "%%UWT%%U   - 1.37X2=2.74 Kg"
	)
(command "text"	"4160.000000,320.000000" "18" "0" "%%UMATL%%U - MS")
(command
  "text"			    "3760.000000,220.000000"
  "18"				    "0"
  "%%UNOTE%%U:- Material to be taken from Disc"
 )
(command "text"			"3760.000000,170.000000"
	 "18"			"0"
	 "plate of higher pulley"
	)
(command "text"			    "3760.000000,70.000000"
	 "18"			    "0"
	 "%%UTOTAL WEIGHT%%U - 198.03 Kgs"
	)
(command "zoom" "e")

From: ·····@rogers.com
Subject: Re: someone please make this code work on autocad 2008
Date: 
Message-ID: <59f38990-8d37-4788-ad65-7bcf2d4f7e43@a23g2000hsc.googlegroups.com>
On Apr 28, 1:00 pm, ·············@gmail.com wrote:
> folks: I humbly request some kind hearted gentleman to help me on this
> assignment.
>
> I have a lisp file that is supposed to output a drawing on autocad
> 2008. but for some reason (maybe a bug, wrong code, wrong syntax/
> grammer etc) when i load the lisp file onto autocad 2008, autocad 2008
> keeps asking me to enter Dim.
>
> Also, i would like to add that the lisp routine was written in 1989.
>
> posted below is the entire code of pulley.lsp I don't know if i have
> to check this google group to find out if someone has solved my
> problem, in any case, if someone helps me, please email me at
> ·············@gmail.com
>
> (command "cmdecho" "0")
> (command "blipmode" "off")
> (command "layer" "m" "pan" "c" "white" "pan" "lt" "dashed" "pan" "")
> (command "layer" "m" "cen" "c" "red" "cen" "lt"   "center" "cen" "")
>  .......

Hi there,

As Pascal mentions, this is a forum for ANSI Common Lisp. But there
seems to be a quick fix to your script, so I'll reply.

Replace all occurances of "command" with "vl-cmdf". Then place the
following expression at the very top of the script:   (vl-load-com)

I ran a quick test on 2008 using these changes and was able to
generate AutoCAD entities. You can also consult the group
"autodesk.autocad.customization"  for all things Auto/Visual Lisp
related.

-BMC-
From: ······@gmail.com
Subject: Re: someone please make this code work on autocad 2008
Date: 
Message-ID: <de51e4d8-3ccc-4eb5-956b-ed7d35b6309b@y18g2000pre.googlegroups.com>
·············@gmail.com wrote:
«
folks: I humbly request some kind hearted gentleman to help me on this
assignment.

I have a lisp file that is supposed to output a drawing on autocad
2008....
»

> As Pascal mentions, this is a forum for ANSI Common Lisp.
> ....
> -BMC-

Thank you for your help on AutoCAD lisp. However, this forum is not
for Common Lisp only.

Execusing me for barging in, but there are many Common Lisp fuckheads
here that takes any chance to introduce their politics. This happens
regularly.

I've been using newsgroups since 1995, and online forums since 1991,
daily. This newsgroup post, should not be mistaken as a polite message
or diplomacy, nor is it to chance a change for the better. This post,
is to tell you Common Lispers in comp.lang.lisp: FUCK YOU AND DIE.

For those of you emacs lisp users and newLisp, i'd very much be
delighted to see more of your posts. Thank you.

Best wishes to our world,

  Xah
  ···@xahlee.org
∑ http://xahlee.org/

☄
From: Pascal J. Bourguignon
Subject: Re: someone please make this code work on autocad 2008
Date: 
Message-ID: <7cd4o9hpp4.fsf@pbourguignon.anevia.com>
·············@gmail.com writes:

> folks: I humbly request some kind hearted gentleman to help me on this
> assignment.
>
> I have a lisp file that is supposed to output a drawing on autocad
> 2008. but for some reason (maybe a bug, wrong code, wrong syntax/
> grammer etc) when i load the lisp file onto autocad 2008, autocad 2008
> keeps asking me to enter Dim.

We're not very good with autocad here, you know.  We mostly discuss
Common Lisp actually.

You may try:
    news:alt.cad.autocad
    news:comp.cad.autocad


-- 
__Pascal Bourguignon__