add ihp stuff?

This commit is contained in:
Julian Daube 2018-12-14 14:11:21 +01:00
parent 4f25a4a4aa
commit ea4c5c25fd

View File

@ -270,6 +270,23 @@ debug = nil
;when(isstart ind_createStart(id start whalv ndir)) ;when(isstart ind_createStart(id start whalv ndir))
;when((n<=1) ind_createEnd(id end whalv ndir)) ;when((n<=1) ind_createEnd(id end whalv ndir))
when((and (not non_of_that_ihp_rubbish) isstart)
(dbCreateRect
id
'("IND" "drawing")
list(-whalv:(r+whalv) whalv:(r-whalv))
)
(dbCreateLabel
id
'("TEXT" "drawing")
0:r
"L2_TM2"
"centerCenter"
"R0"
"roman"
whalv
)
)
n -= 1 n -= 1
(output "n=%L\n", n) (output "n=%L\n", n)
@ -621,21 +638,26 @@ defun(drawInductor (n r width pitch)
("GatPoly" "nofill") ("GatPoly" "nofill")
("Activ" "nofill") ("Activ" "nofill")
("PWell" "block") ("PWell" "block")
("NoRCX" "drawing")
) )
) )
( gndShieldLayer "ilList" '("Metal1" "drawing")) ( gndShieldLayer "ilList" '("Metal1" "drawing"))
( non_of_that_ihp_rubbish "boolean" nil)
) )
(let (let
() ()
(setup) (setup)
; (print blockLayers)
(drawInductor turns radius width pitch) (drawInductor turns radius width pitch)
(when gndshield (when gndshield
(drawGndShield radius+gndoverlap gndShieldLayer gndwidth gndpitch gndwindow) (drawGndShield radius+gndoverlap gndShieldLayer gndwidth gndpitch gndwindow)
) )
(when (not non_of_that_ihp_rubbish)
(when blockLayers (when blockLayers
(drawBlockLayers radius+gndoverlap blockLayers) (drawBlockLayers radius+gndoverlap blockLayers)
) )
)
) )
) )