skill program to create shape symbol

Hi Ole

Your program is great. It works very nice.
Funny because lately i made similar one. Only diference between them is that yours is cute and mine is not :)
Mine tho automaticaly opens allegro shape template and then promts for X Y and R :) then it makes three shapes.
One for etch
One for Paste mask
and one for Solder mask

Using the oportunity i would like to ask you something Ole.
Ok we now have the shape generation. What about making pad ? Is it possible to create a padstack like the one I can get from Pad Designer?

I have been trying to build a pad with the shapes created this way. I found a function that should work axlDBCreatePadStack but I cant generate .pad file
There is a piece of code to that function in algroskill.pdf
It may be that I dont understand the example. Am I doing something wrong ?
Here is a piece of my code:

Pad_list = cons(make_axlPadStackPad(?layer "TOP", ?type 'REGULAR, ?figure Shape_top_name ?figureSize x:y) nil)
Pad_list = cons(make_axlPadStackPad(?layer "PASTEMASK_TOP", ?type 'REGULAR, ?figure Shape_pm_name ?figureSize pmX:pmY) Pad_list)
Pad_list = cons(make_axlPadStackPad(?layer "SOLDERMASK_TOP", ?type 'REGULAR, ?figure Shape_sm_name ?figureSize smX:smY) Pad_list)
printf("Pad_list = %L\n",Pad_list)
Padstack = axlDBCreatePadStack("krzyhoo",nil, Pad_list nil)
printf("axlDBCreatePadStack = %L", Padstack)
axlPadStackToDisk("krzyhoo")

with those printfs i know that a dbid was created .. but not a .pad file, and axlPadStackToDisk function doesnt worka at all....

Do you have any ideas?

PS. This is my second post... And i dont like the form of it ... why my text is so condensed... no Enters no tabs ... everything so close together ... I made it so hard to read...
When i wrote it wasnt tlike this..

Hi Ole

Your program is great. It works very nice.
Funny because lately i made similar one. Only diference between them is that yours is cute and mine is not :)
Mine tho automaticaly opens allegro shape template and then promts for X Y and R :) then it makes three shapes.
One for etch
One for Paste mask
and one for Solder mask

Using the oportunity i would like to ask you something Ole.
Ok we now have the shape generation. What about making pad ? Is it possible to create a padstack like the one I can get from Pad Designer?

I have been trying to build a pad with the shapes created this way. I found a function that should work axlDBCreatePadStack but I cant generate .pad file
There is a piece of code to that function in algroskill.pdf
It may be that I dont understand the example. Am I doing something wrong ?
Here is a piece of my code:

Pad_list = cons(make_axlPadStackPad(?layer "TOP", ?type 'REGULAR, ?figure Shape_top_name ?figureSize x:y) nil)
Pad_list = cons(make_axlPadStackPad(?layer "PASTEMASK_TOP", ?type 'REGULAR, ?figure Shape_pm_name ?figureSize pmX:pmY) Pad_list)
Pad_list = cons(make_axlPadStackPad(?layer "SOLDERMASK_TOP", ?type 'REGULAR, ?figure Shape_sm_name ?figureSize smX:smY) Pad_list)
printf("Pad_list = %L\n",Pad_list)
Padstack = axlDBCreatePadStack("krzyhoo",nil, Pad_list nil)
printf("axlDBCreatePadStack = %L", Padstack)
axlPadStackToDisk("krzyhoo")

with those printfs i know that a dbid was created .. but not a .pad file, and axlPadStackToDisk function doesnt worka at all....

Do you have any ideas?

PS. This is my second post... And i dont like the form of it ... why my text is so condensed... no Enters no tabs ... everything so close together ... I made it so hard to read...
When i wrote it wasnt tlike this..