share skill [Add symbol]

EDAstudent365

x_loc=nil

y_loc=nil

mir=nil

rot=0



axlCmdRegister( "add_sym" 'add_symbol ?cmdType "interactive")



defun(add_symbol (symb type)



;get design extents



case( type

   ( "p"

    type = "package"

   )

   ( "m"

     type = "mechanical"

   )

   ( "f"

     type = "format"

   )

   ( t

      printf("%s is not a legal symbol type. Use p m or f.\n" type)

   )

);endcase



position=axlEnterPoint()

x_loc=car(position)

y_loc=cadr(position)



place=axlDBCreateSymbol(list(symb type) x_loc:y_loc mir rot)



        if(place==nil then

                printf("Placement of symbol %s failed.\n" symb)

        else

                if(cadr(place)!=nil then

                        printf("DRC errors created when placing %s.\n" symb)

                ); end if cadr(place)

        );end if place1



);end defun add_symbol

davidquan73

thanks, great code