自动走10度线的skill 分享

melissa113

1. axlCmdRegister("tune" 'tune)
   
2. 
   
3. 
   
4. 
   
5. procedure(tune();set main function
   
6. (defun axlMyCancel ()
   
7. axlClearDynamics()
   
8. axlCancelEnterFun()
   
9. axlUIPopupSet(nil))
   
10. (defun axlMyDone ()
    
11. axlClearDynamics()
    
12. axlFinishEnterFun()
    
13. axlUIPopupSet(nil))
    
14. mypopup = axlUIPopupDefine( nil (list (list "MyCancel" 'axlMyCancel) (list "MyDone" 'axlMyDone)))
    
15. axlUIPopupSet( mypopup)
    
16. 
    
17. axlSetFindFilter(?enabled list( "noall" "clinesegs") ?onButtons list("noall" "clinesegs"))
    
18. axlClearSelSet(); set done and cancle cammand
    
19. 
    
20. while(axlSingleSelectBox()
    
21. design=axlGetSelSet()
    
22. length=length(design)
    
23. ;design_dbid1=car(axlGetSelSet())
    
24. design_dbid1=nth(0 design)
    
25. layer=design_dbid1->layer
    
26. startEnd1=design_dbid1->startEnd
    
27. a=nth(0 startEnd1)
    
28. b=nth(1 startEnd1)
    
29. xa=nth(0 a)
    
30. ya=nth(1 a)
    
31. xb=nth(0 b)
    
32. yb=nth(1 b)
    
33. xminmax=min(xa xb);left
    
34. xmaxmin=max(xa xb);right
    
35. yminup=max(ya yb);up
    
36. ymaxdown=min(ya yb);down
    
37. 
    
38. lineType=design_dbid1->lineType
    
39. ; get need to route cline
    
40. case(lineType
    
41. 
    
42. ;;the below is cline is horrizontal
    
43. (horizontal
    
44. ylist='()
    
45. allylist='()
    
46. for(l 1 length
    
47. mei_db=nth(l-1 design)
    
48. staEnd=mei_db->startEnd
    
49. width=mei_db->width
    
50. ma=nth(0 staEnd)
    
51. mb=nth(1 staEnd)
    
52. mxa=nth(0 ma)
    
53. mxb=nth(0 mb)
    
54. mxleft=min(mxa mxb)
    
55. mxright=max(mxa mxb)
    
56. xminmax=max(mxleft xminmax)
    
57. xmaxmin=min(mxright xmaxmin)
    
58. my=nth(1 ma)
    
59. ylist=cons(width ylist)
    
60. ylist=cons(mxright ylist)
    
61. ylist=cons(mxleft ylist)
    
62. ylist=cons(my ylist)
    
63. allylist=cons(ylist allylist)
    
64. );end for
    
65. ;get all need to route 10 degree information
    
66. paixudy=sortcar(allylist 'greaterp)
    
67. 
    
68. d=abs(xmaxmin-xminmax)-50
    
69. 
    
70. 
    
71. add_x=atof(axlUIPrompt("please enter addx_distance" "125"))
    
72. 
    
73. m=(floor d/(2*add_x)) ;route how much cycle
    
74. 
    
75. 
    
76. firstx=nth(1 nth(0 paixudy));get max y coodrinate clines x information
    
77. 
    
78. axlDeleteObject(design)
    
79. 
    
80. if(firstx==xminmax
    
81. then
    
82. 
    
83. 
    
84. rout=nth(0 paixudy)
    
85. qishiy=nth(0 rout)
    
86. qishix=nth(1 rout)
    
87. zhongx=nth(2 rout)
    
88. width=nth(3 rout)
    
89. xcank=xminmax+20
    
90. x0=xcank
    
91. wy1=qishiy-(add_x /5)
    
92. wy2=qishiy
    
93. path=axlPathStart(list(qishix:qishiy) width)
    
94. ;axlDBCreateLine(list(qishix:qishiy x0:qishiy) width layer)
    
95. axlPathLine( path, width, x0:qishiy)
    
96. 
    
97. for(k 1 m
    
98. wx1=x0+add_x
    
99. wx2=wx1+add_x
    
100. ; path=axlPathStart(list(x0:qishiy) width)
     
101. ;axlDBCreateLine(list(x0:qishiy wx1:wy1) width layer)
     
102. ; axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
103. axlPathLine( path, width, wx1:wy1)
     
104. axlPathLine( path, width, wx2:wy2)
     
105. 
     
106. x0=wx2
     
107. );for
     
108. ; path=axlPathStart(list(wx2:wy2) width)
     
109. ;axlDBCreateLine(list(wx2:wy2 zhongx:wy2) width layer)
     
110. axlPathLine( path, width, zhongx:wy2)
     
111. axlDBCreatePath( path, layer)
     
112. 
     
113. lasty1=wy1
     
114. lasty2=wy2
     
115. ;x0=xminmax+5
     
116. xlast=wx2
     
117. 
     
118. 
     
119. for(q 1 length-1
     
120. if((m==1) then
     
121. 
     
122. rout=nth(q paixudy)
     
123. chushiy=nth(0 rout)
     
124. chushix=nth(1 rout)
     
125. zhongx=nth(2 rout)
     
126. width=nth(3 rout)
     
127. spac=abs(qishiy-chushiy)
     
128. xcank=xcank-(sqrt(26)-5)*spac-0.01
     
129. x0=xcank
     
130. xmm=xminmax+20
     
131. wx1=xmm+add_x
     
132. wx2=wx1+add_x
     
133. dty=sqrt(26)*spac/5+0.002
     
134. wy1=lasty1-dty
     
135. wy2=lasty2-dty
     
136. path=axlPathStart(list(chushix:chushiy) width)
     
137. axlPathLine( path, width, x0:chushiy)
     
138. axlPathLine( path, width, wx1:wy1)
     
139. axlPathLine( path, width, (xlast+(sqrt(26)-5)*spac+0.01):chushiy)
     
140. axlPathLine( path, width, zhongx:chushiy)
     
141. axlDBCreatePath( path, layer)
     
142. qishiy=chushiy
     
143. lasty1=wy1
     
144. lasty2=wy2
     
145. xlast=wx2
     
146. else
     
147. 
     
148. rout=nth(q paixudy)
     
149. chushiy=nth(0 rout)
     
150. chushix=nth(1 rout)
     
151. zhongx=nth(2 rout)
     
152. width=nth(3 rout)
     
153. spac=abs(qishiy-chushiy)
     
154. xcank=xcank-(sqrt(26)-5)*spac-0.01
     
155. x0=xcank
     
156. xmm=xminmax+20
     
157. ;x0=xminmax+5
     
158. wx1=xmm+add_x
     
159. wx2=wx1+add_x
     
160. 
     
161. dty=sqrt(26)*spac/5+0.002
     
162. wy1=lasty1-dty
     
163. wy2=lasty2-dty
     
164. path=axlPathStart(list(chushix:chushiy) width)
     
165. ;axlDBCreateLine(list(chushix:chushiy x0:chushiy) width layer)
     
166. ;axlDBCreateLine(list(x0:chushiy wx1:wy1) width layer)
     
167. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
168. axlPathLine( path, width, x0:chushiy)
     
169. axlPathLine( path, width, wx1:wy1)
     
170. axlPathLine( path, width, wx2:wy2)
     
171. 
     
172. x0=wx2
     
173. for(k 1 m-2
     
174. 
     
175. wx1=x0+add_x
     
176. wx2=wx1+add_x
     
177. 
     
178. ;path=axlPathStart(list(x0:wy2) width)
     
179. ;axlDBCreateLine(list(x0:wy2 wx1:wy1) width layer)
     
180. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
181. axlPathLine( path, width, wx1:wy1)
     
182. axlPathLine( path, width, wx2:wy2)
     
183. 
     
184. x0=wx2
     
185. );for
     
186. wx1=x0+add_x
     
187. wx2=xlast+(sqrt(26)-5)*spac+0.01
     
188. ;path=axlPathStart(list(x0: wy2) width)
     
189. ;axlDBCreateLine(list(x0:wy2 wx1:wy1) width layer)
     
190. ;axlDBCreateLine(list(wx1:wy1 wx2:chushiy) width layer)
     
191. ;axlDBCreateLine(list(wx2:chushiy zhongx:chushiy) width layer)
     
192. axlPathLine( path, width, wx1:wy1)
     
193. axlPathLine( path, width, wx2:chushiy)
     
194. axlPathLine( path, width, zhongx:chushiy)
     
195. axlDBCreatePath( path, layer)
     
196. 
     
197. 
     
198. qishiy=chushiy
     
199. lasty1=wy1
     
200. lasty2=wy2
     
201. xlast=wx2
     
202. );if
     
203. );for
     
204. 
     
205. else
     
206. 
     
207. 
     
208. 
     
209. paixudy=reverse(paixudy)
     
210. rout=nth(0 paixudy)
     
211. qishiy=nth(0 rout)
     
212. qishix=nth(1 rout)
     
213. zhongx=nth(2 rout)
     
214. width=nth(3 rout)
     
215. xcank=xminmax+20
     
216. x0=xcank
     
217. wy1=qishiy+(add_x /5)
     
218. wy2=qishiy
     
219. path=axlPathStart(list(qishix:qishiy) width)
     
220. ; axlDBCreateLine(list(qishix:qishiy x0:qishiy) width layer)
     
221. axlPathLine( path, width, x0:qishiy)
     
222. for(k 1 m
     
223. wx1=x0+add_x
     
224. wx2=wx1+add_x
     
225. ; path=axlPathStart(list(x0:qishiy) width)
     
226. ;axlDBCreateLine(list(x0:qishiy wx1:wy1) width layer)
     
227. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
228. axlPathLine( path, width, wx1:wy1)
     
229. axlPathLine( path, width, wx2:wy2)
     
230. 
     
231. 
     
232. x0=wx2
     
233. );for
     
234. ;path=axlPathStart(list(wx2:wy2) width)
     
235. ; axlDBCreateLine(list(wx2:wy2 zhongx:wy2) width layer)
     
236. axlPathLine( path, width, zhongx:wy2)
     
237. axlDBCreatePath( path, layer)
     
238. lasty1=wy1
     
239. lasty2=wy2
     
240. ;x0=xminmax+5
     
241. xlast=wx2
     
242. 
     
243. 
     
244. for(q 1 length-1
     
245. if((m==1) then
     
246. 
     
247. rout=nth(q paixudy)
     
248. chushiy=nth(0 rout)
     
249. chushix=nth(1 rout)
     
250. zhongx=nth(2 rout)
     
251. width=nth(3 rout)
     
252. spac=abs(qishiy-chushiy)
     
253. xcank=xcank-(sqrt(26)-5)*spac-0.01
     
254. x0=xcank
     
255. xmm=xminmax+20
     
256. wx1=xmm+add_x
     
257. wx2=wx1+add_x
     
258. dty=sqrt(26)*spac/5+0.002
     
259. wy1=lasty1+dty
     
260. wy2=lasty2+dty
     
261. path=axlPathStart(list(chushix:chushiy) width)
     
262. axlPathLine( path, width, x0:chushiy)
     
263. axlPathLine( path, width, wx1:wy1)
     
264. axlPathLine( path, width, (xlast+(sqrt(26)-5)*spac+0.01):chushiy)
     
265. axlPathLine( path, width, zhongx:chushiy)
     
266. axlDBCreatePath( path, layer)
     
267. qishiy=chushiy
     
268. lasty1=wy1
     
269. lasty2=wy2
     
270. xlast=wx2
     
271. else
     
272. 
     
273. 
     
274. 
     
275. 
     
276. rout=nth(q paixudy)
     
277. chushiy=nth(0 rout)
     
278. chushix=nth(1 rout)
     
279. zhongx=nth(2 rout)
     
280. width=nth(3 rout)
     
281. spac=abs(qishiy-chushiy)
     
282. xcank=xcank-(sqrt(26)-5)*spac-0.01
     
283. x0=xcank
     
284. xmm=xminmax+20
     
285. ;x0=xminmax+5
     
286. wx1=xmm+add_x
     
287. wx2=wx1+add_x
     
288. 
     
289. dty=sqrt( 26)*spac/5+0.002
     
290. wy1=lasty1+dty
     
291. wy2=lasty2+dty
     
292. path=axlPathStart(list(chushix:chushiy) width)
     
293. ;axlDBCreateLine(list(chushix:chushiy x0:chushiy) width layer)
     
294. ;axlDBCreateLine(list(x0:chushiy wx1:wy1) width layer)
     
295. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
296. axlPathLine( path, width, x0:chushiy)
     
297. axlPathLine( path, width, wx1:wy1)
     
298. axlPathLine( path, width, wx2:wy2)
     
299. 
     
300. 
     
301. 
     
302. 
     
303. x0=wx2
     
304. for(k 1 m-2
     
305. 
     
306. wx1=x0+add_x
     
307. wx2=wx1+add_x
     
308. 
     
309. ; path=axlPathStart(list(x0:wy2) width)
     
310. ;axlDBCreateLine(list(x0:wy2 wx1:wy1) width layer)
     
311. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
312. axlPathLine( path, width, wx1:wy1)
     
313. axlPathLine( path, width, wx2:wy2)
     
314. 
     
315. x0=wx2
     
316. );for
     
317. wx1=x0+add_x
     
318. wx2=xlast+(sqrt(26)-5)*spac+0.01
     
319. ;path=axlPathStart(list(x0: wy2) width)
     
320. ;axlDBCreateLine(list(x0:wy2 wx1:wy1) width layer)
     
321. ;axlDBCreateLine(list(wx1:wy1 wx2:chushiy) width layer)
     
322. ;axlDBCreateLine(list(wx2:chushiy zhongx:chushiy) width layer)
     
323. axlPathLine( path, width, wx1:wy1)
     
324. axlPathLine( path, width, wx2:chushiy)
     
325. axlPathLine( path, width, zhongx:chushiy)
     
326. axlDBCreatePath( path, layer)
     
327. 
     
328. qishiy=chushiy
     
329. lasty1=wy1
     
330. lasty2=wy2
     
331. xlast=wx2
     
332. );if
     
333. );for lengthe-1
     
334. 
     
335. 
     
336. );if first==xminmax
     
337. 
     
338. 
     
339. 
     
340. );horizontal
     
341. 
     
342. 
     
343. 
     
344. 
     
345. 
     
346. 
     
347. 
     
348. 
     
349. (vertical
     
350. 
     
351. 
     
352. ylist='()
     
353. allylist='()
     
354. for(l 1 length
     
355. mei_db=nth(l-1 design)
     
356. staEnd=mei_db->startEnd
     
357. width=mei_db->width
     
358. ma=nth(0 staEnd)
     
359. mb=nth(1 staEnd)
     
360. mya=nth(1 ma)
     
361. myb=nth(1 mb)
     
362. myup=max(mya myb)
     
363. mydown=min(mya myb)
     
364. yminup=min(myup yminup);qu up min
     
365. ymaxdown=max(mydown ymaxdown);qu down max
     
366. mx=nth(0 ma)
     
367. ylist=cons(width ylist)
     
368. ylist=cons(mydown ylist)
     
369. ylist=cons(myup ylist)
     
370. ylist=cons(mx ylist)
     
371. allylist=cons(ylist allylist)
     
372. );for
     
373. paixudy=sortcar(allylist 'greaterp)
     
374. d=abs(yminup-ymaxdown)-50
     
375. ;mm=(floor d/add_x)
     
376. ;m=(floor mm/2)
     
377. add_x=atof(axlUIPrompt("please enter addx_distance" "125"))
     
378. m=(floor d/(2*add_x))
     
379. 
     
380. firsty=nth(1 nth(0 paixudy))
     
381. 
     
382. axlDeleteObject(design)
     
383. 
     
384. if((firsty==yminup)
     
385. then
     
386. 
     
387. a=1
     
388. rout=nth(0 paixudy)
     
389. qishix=nth(0 rout)
     
390. qishiy=nth(1 rout)
     
391. zhongy=nth(2 rout)
     
392. width=nth(3 rout)
     
393. ycank=yminup-10
     
394. y0=ycank
     
395. wx1=qishix-(add_x /5)
     
396. wx2=qishix
     
397. path=axlPathStart(list(qishix:qishiy) width)
     
398. 
     
399. axlPathLine( path, width, qishix:y0)
     
400. for(k 1 m
     
401. wy1=y0-add_x
     
402. wy2=wy1-add_x
     
403. 
     
404. axlPathLine( path, width, wx1:wy1)
     
405. axlPathLine( path, width, wx2:wy2)
     
406. 
     
407. y0=wy2
     
408. );for
     
409. 
     
410. axlPathLine( path, width, wx2:zhongy)
     
411. axlDBCreatePath( path, layer)
     
412. 
     
413. lastx1=wx1
     
414. lastx2=wx2
     
415. 
     
416. ylast=wy2
     
417. 
     
418. 
     
419. for(q 1 length-1
     
420. if((m==1) then
     
421. rout=nth(q paixudy)
     
422. chushix=nth(0 rout)
     
423. chushiy=nth(1 rout)
     
424. zhongy=nth(2 rout)
     
425. width=nth(3 rout)
     
426. spac=abs(qishix-chushix)
     
427. ycank=ycank+(sqrt(26)-5)*spac+0.01
     
428. y0=ycank
     
429. ymm=yminup-10
     
430. wy1=ymm-add_x
     
431. wy2=wy1-add_x
     
432. dtx=sqrt(26)*spac/5+0.002
     
433. wx1=lastx1-dtx
     
434. wx2=lastx2-dtx
     
435. path=axlPathStart(list(chushix:chushiy) width)
     
436. axlPathLine( path, width, chushix:y0)
     
437. axlPathLine( path, width, wx1:wy1)
     
438. axlPathLine( path, width, chushix:(ylast-(sqrt(26)-5)*spac-0.01))
     
439. axlPathLine( path, width, chushix:zhongy)
     
440. axlDBCreatePath( path, layer)
     
441. qishix=chushix
     
442. lastx1=wx1
     
443. lastx2=wx2
     
444. ylast=wy2
     
445. 
     
446. 
     
447. else
     
448. 
     
449. rout=nth(q paixudy)
     
450. chushix=nth(0 rout)
     
451. chushiy=nth(1 rout)
     
452. zhongy=nth(2 rout)
     
453. width=nth(3 rout)
     
454. spac=abs(qishix-chushix)
     
455. ycank=ycank+(sqrt(26)-5)*spac+0.01
     
456. y0=ycank
     
457. ymm=yminup-10
     
458. ;x0=xminmax+5
     
459. wy1=ymm-add_x
     
460. wy2=wy1-add_x
     
461. 
     
462. dtx=sqrt(26)*spac/5+0.002
     
463. wx1=lastx1-dtx
     
464. wx2=lastx2-dtx
     
465. path=axlPathStart(list(chushix:chushiy) width)
     
466. 
     
467. axlPathLine( path, width, chushix:y0)
     
468. axlPathLine( path, width, wx1:wy1)
     
469. axlPathLine( path, width, wx2:wy2)
     
470. 
     
471. 
     
472. 
     
473. y0=wy2
     
474. for(k 1 m-2
     
475. 
     
476. wy1=y0-add_x
     
477. wy2=wy1-add_x
     
478. 
     
479. ; path=axlPathStart(list(wx2:y0) width)
     
480. ;axlDBCreateLine(list(wx2:y0 wx1:wy1) width layer)
     
481. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
482. axlPathLine( path, width, wx1:wy1)
     
483. axlPathLine( path, width, wx2:wy2)
     
484. 
     
485. 
     
486. y0=wy2
     
487. );for
     
488. wy1=y0-add_x
     
489. wy2=ylast-(sqrt(26)-5)*spac-0.01
     
490. ; path=axlPathStart(list(wx2:y0) width)
     
491. ;axlDBCreateLine(list(wx2:y0 wx1:wy1) width layer)
     
492. ; axlDBCreateLine(list(wx1:wy1 chushix:wy2) width layer)
     
493. ;axlDBCreateLine(list(chushix:wy2 chushix:zhongy) width layer)
     
494. axlPathLine( path, width, wx1:wy1)
     
495. axlPathLine( path, width, chushix:wy2)
     
496. axlPathLine( path, width, chushix:zhongy)
     
497. axlDBCreatePath( path, layer)
     
498. 
     
499. 
     
500. qishix=chushix
     
501. lastx1=wx1
     
502. lastx2=wx2
     
503. ylast=wy2
     
504. );if
     
505. );for length-1
     
506. 
     
507. else
     
508. 
     
509. 
     
510. a=2
     
511. paixudy=reverse(paixudy)
     
512. rout=nth(0 paixudy)
     
513. qishix=nth(0 rout)
     
514. qishiy=nth(1 rout)
     
515. zhongy=nth(2 rout)
     
516. width=nth(3 rout)
     
517. ycank=yminup-10
     
518. y0=ycank
     
519. wx1=qishix+(add_x /5)
     
520. wx2=qishix
     
521. path=axlPathStart(list(qishix:qishiy) width)
     
522. ;axlDBCreateLine(list(qishix:qishiy qishix:y0) width layer)
     
523. axlPathLine( path, width, qishix:y0)
     
524. for(k 1 m
     
525. wy1=y0-add_x
     
526. wy2=wy1-add_x
     
527. ; path=axlPathStart(list(qishix:y0) width)
     
528. ;axlDBCreateLine(list(qishix:y0 wx1:wy1) width layer)
     
529. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
530. axlPathLine( path, width, wx1:wy1)
     
531. axlPathLine( path, width, wx2:wy2)
     
532. y0=wy2
     
533. );for
     
534. ;path=axlPathStart(list(wx2:wy2) width)
     
535. ;axlDBCreateLine(list(wx2:wy2 wx2:zhongy) width layer)
     
536. axlPathLine( path, width, wx2:zhongy)
     
537. axlDBCreatePath( path, layer)
     
538. 
     
539. lastx1=wx1
     
540. lastx2=wx2
     
541. ;x0=xminmax+5
     
542. ylast=wy2
     
543. 
     
544. 
     
545. for(q 1 length-1
     
546. if((m==1) then
     
547. rout=nth(q paixudy)
     
548. chushix=nth(0 rout)
     
549. chushiy=nth(1 rout)
     
550. zhongy=nth(2 rout)
     
551. width=nth(3 rout)
     
552. spac=abs(qishix-chushix)
     
553. ycank=ycank+(sqrt(26)-5)*spac+0.01
     
554. y0=ycank
     
555. ymm=yminup-10
     
556. wy1=ymm-add_x
     
557. wy2=wy1-add_x
     
558. dtx=sqrt(26)*spac/5+0.002
     
559. wx1=lastx1+dtx
     
560. wx2=lastx2+dtx
     
561. path=axlPathStart(list(chushix:chushiy) width)
     
562. axlPathLine( path, width, chushix:y0)
     
563. axlPathLine( path, width, wx1:wy1)
     
564. axlPathLine( path, width, chushix:wy2+(ylast-(sqrt(26)-5)*spac-0.01))
     
565. axlPathLine( path, width, chushix:zhongy)
     
566. axlDBCreatePath( path, layer)
     
567. qishix=chushix
     
568. lastx1=wx1
     
569. lastx2=wx2
     
570. ylast=wy2
     
571. 
     
572. 
     
573. else
     
574. rout=nth(q paixudy)
     
575. chushix=nth(0 rout)
     
576. chushiy=nth(1 rout)
     
577. zhongy=nth(2 rout)
     
578. width=nth(3 rout)
     
579. spac=abs(qishix-chushix)
     
580. ycank=ycank+(sqrt(26)-5)*spac+0.01
     
581. y0=ycank
     
582. ymm=yminup-10
     
583. ;x0=xminmax+5
     
584. wy1=ymm-add_x
     
585. wy2=wy1-add_x
     
586. 
     
587. dtx=sqrt(26)*spac/5+0.002
     
588. wx1=lastx1+dtx
     
589. wx2=lastx2+dtx
     
590. path=axlPathStart(list(chushix:chushiy) width)
     
591. ; axlDBCreateLine(list(chushix:chushiy chushix:y0) width layer)
     
592. ;axlDBCreateLine(list(chushix:y0 wx1:wy1) width layer)
     
593. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
594. axlPathLine( path, width, chushix:y0)
     
595. axlPathLine( path, width, wx1:wy1)
     
596. axlPathLine( path, width, wx2:wy2)
     
597. y0=wy2
     
598. 
     
599. for(k 1 m-2
     
600. 
     
601. wy1=y0-add_x
     
602. wy2=wy1-add_x
     
603. 
     
604. ; path=axlPathStart(list(wx2:y0) width)
     
605. ; axlDBCreateLine(list(wx2:y0 wx1:wy1) width layer)
     
606. ;axlDBCreateLine(list(wx1:wy1 wx2:wy2) width layer)
     
607. axlPathLine( path, width, wx1:wy1)
     
608. axlPathLine( path, width, wx2:wy2)
     
609. 
     
610. 
     
611. 
     
612. y0=wy2
     
613. );for
     
614. wy1=y0-add_x
     
615. wy2=ylast-(sqrt(26)-5)*spac-0.01
     
616. ; path=axlPathStart(list(wx2:y0 ) width)
     
617. ; axlDBCreateLine(list(wx2:y0 wx1:wy1) width layer)
     
618. ;axlDBCreateLine(list(wx1:wy1 chushix:wy2) width layer)
     
619. ;axlDBCreateLine(list(chushix:wy2 chushix:zhongy) width layer)
     
620. axlPathLine( path, width, wx1:wy1)
     
621. axlPathLine( path, width, chushix:wy2)
     
622. axlPathLine( path, width, chushix:zhongy)
     
623. axlDBCreatePath( path, layer)
     
624. 
     
625. 
     
626. qishix=chushix
     
627. lastx1=wx1
     
628. lastx2=wx2
     
629. ylast=wy2
     
630. );if m=1
     
631. );for
     
632. 
     
633. 
     
634. );if
     
635. 
     
636. 
     
637. 
     
638. );vertical
     
639. 
     
640. 
     
641. 
     
642. );case
     
643. 
     
644. );while
     
645. 
     
646. )

复制代码

grant30

melissa113 发表于 2010-8-11 13:26
回复 5# smile102
把我的tune.rar 解压缩到你的c:/skill 里面。
在你的/home/pcbenv/allegro.ilinit

終於找到好咚咚囉,謝謝拉

muluoairle

16.6打上第53号补丁之后，allegro自带10度线工具，很好用，命令是fiber_weave，大家可以试试。

似梦似醒

只有水平与垂直时可以，如果45度走线时也可以那就更好了。

ginooolu

可否请Melissa说明一下操作方法及效果呢？在下执行完tune后就跑出很多不受控制的Cline

qt_litao

还从来没有用过这种语言呢，不过仅仅用来画线，是不是有点夸张了。

melissa113

这个skill 针对高速信号线，而且是配对线。在水平和垂直的地方选中要需要走10度的线，程序会自动走成10度的线，不需要我们一对一对的走10度的线了
框选的线必须没有断点，否则就出错了。

melissa113

回复 5# smile102
把我的tune.rar 解压缩到你的c:/skill 里面。
在你的/home/pcbenv/allegro.ilinit
输入：load("c:/skill/tune.il")
开启你的allegro 输入command 命令tune
框选中水平或者垂直的一组对线的 clinesegs.这样你的水平或者垂直的线就变成10度的走线了。如图。有什么疑问可以问

melissa113

不好意思，我不会解密。

foxconnwj

试了一下，不错，但是只是在水平方向和垂直方向上可以将直线直接变成10度，最好是空间很大的情况下用，且对一个bus一起使用，不会产生DRC。

a_peter

真的很好用,可节省很多时间.太感谢了.

在走线space刚好时,会有DRC产生. 如 Space 设置15 MIL,
使用后会有14.99 MIL 的DRC产生.若能修改,就很完美了.

bairome

好东东，可我怎么下载不了~~

wangzhongyiacui

我也下载不了啊楼主，郁闷

wolf343105

能和deargs结合起来就更好了。

osinfo

看一下，谢谢！

antasy

太感谢了

jams0214

好东东，可我怎么下载不了~~

lh08101276

好东西~！顶起来