createOctE2.il

; Function name: createOctE
; by akirt
;
; function description: create a octagon with a offset
;
; parameters description:cvID: the id of target cellview that the shape want to be drawn on
;			mat: specified material/layer
;			iX,iY: the center point of the rectangle
;			len1,cor1: length of edge
;			offset: 
;
;
; return value: 	the id of created octagon
;
; required fucntions: none (this is a independent function)

procedure(createOctE2(cvID mat iX iY len1 cor1 offset)
	prog((octagon)
		ratio=len1*1.0/(len1+cor1*2)
		octagon=dbCreatePolygon(cvID list(mat "drawing") list(iX-1.0*floor((len1/2+ratio*offset)*100)/100:iY+1.0*floor(((len1/2+cor1)+offset)*100)/100 iX+1.0*floor((len1/2+ratio*offset)*100)/100:iY+1.0*floor(((len1/2+cor1)+offset)*100)/100 iX+1.0*floor(((len1/2+cor1)+offset)*100)/100:iY+1.0*floor((len1/2+ratio*offset)*100)/100 iX+1.0*floor(((len1/2+cor1)+offset)*100)/100:iY-1.0*floor((len1/2+ratio*offset)*100)/100 iX+1.0*floor((len1/2+ratio*offset)*100)/100:iY-1.0*floor(((len1/2+cor1)+offset)*100)/100 iX-1.0*floor((len1/2+ratio*offset)*100)/100:iY-1.0*floor(((len1/2+cor1)+offset)*100)/100 iX-1.0*floor(((len1/2+cor1)+offset)*100)/100:iY-1.0*floor((len1/2+ratio*offset)*100)/100 iX-1.0*floor(((len1/2+cor1)+offset)*100)/100:iY+1.0*floor((len1/2+ratio*offset)*100)/100 ))

		octagon->len=len1+2*ratio*offset
		octagon->cor=cor1+offset*(1-ratio)

		return(octagon)
	);prog
);procedure