[PCB_FORUM] Re: skill help

Many Thanks, Dave.

It works great, exactly what I need.
I tried something with the DBAssignNet but unsuccesfully.
As you can maybe guess, I am french and english skill documentation is
sometime difficult to understand/transcribe to what I need...
Does somebody know if I can find frenchies tutorials somewhere?

May I abuse?
I have to enter 72 times "aas" in Allegro, and click the shape.
Is there a quick way to make a loop with a command?
I tried a script with a repeat_again, but I can't stop the script...

I guess that there are some lines to add to the routine to permit it?
So I can search, but if you can tell me, it would be very nice.
(I have a board to route ;-)
The best would be that it detects all unassigned shapes on the active ETCH
layer and do a loop until there are no more.

If it is no long to do for a skill guru... thanks
If not, I will read, learn and try later.

Have a nice day.

    William.

----- Original Message ----- 
From: "Dave Elder" <dave.elder@xxxxxxxxxx>
To: <icu-pcb-forum@xxxxxxxxxxxxx>
Sent: Tuesday, March 08, 2005 9:41 PM
Subject: [PCB_FORUM] Re: skill help


> Try this:
>
> axlCmdRegister( "aas" 'Auto_Assign_Shape ?cmdType "interactive")
> defun(Auto_Assign_Shape ()
>  let((pin)
>   axlSetFindFilter(?enabled '(noall pins vias) ?onButtons '(noall pins
> vias))
>   pin = car(axlGetSelSet(axlSingleSelectPoint()))
>   axlClearSelSet()
>   axlSetFindFilter(?enabled '(noall shapes) ?onButtons '(noall shapes))
>   while(axlAddSelectPoint(pin ->xy), t)
>   axlDBAssignNet(axlGetSelSet(), pin ->net)
> ))
>
> Cheers, Dave
>
> William Billereau wrote:
>
> >Hello All.
> >
> >I have 72 shapes to manually assign with unnamed net(UNNAMED....) so I
start
> >to write a little skill routine.
> >(in fact,it is the same problem with named shapes, it misses a pick
feature
> >in the shape assignment Allegro's feature.)
> >I want it to allow me to click on a via or pin and then assign via/pin's
net
> >to the visible shape at via/pin's location
> >the routine:
> >
> >axlCmdRegister( "aas" 'Auto_Assign_Shape ?cmdType "interactive")
> >
> >defun(Auto_Assign_Shape ()
> >axlSetFindFilter(?enabled '(noall pins vias) ?onButtons '(noall pins
vias))
> >pin=car(axlGetSelSet(axlSingleSelectPoint()))
> >X_Loc=car(pin->xy)
> >Y_Loc=cadr(pin->xy)
> >Script_File=outfile("aas.scr" "w")
> >               fprintf(Script_File "setwindow pcb\n\nshape select\n")
> >               fprintf(Script_File "pick %f %f\n" X_Loc Y_Loc)
> >               fprintf(Script_File "setwindow form.mini\nFORM mini
> >dyns_netname %s\n" pin->net->name)
> >               fprintf(Script_File "setwindow pcb\n")
> >               fprintf(Script_File "done\n")
> >               close(Script_File)
> >axlShell("replay aas.scr")
> >)
> >
> >but this returns an error: "E- Form field label not found"
> >I guess it is the form field "dyns_netname" but it works via a script
> >replay!
> >I checked the dyns_shape in Allegro FORMPATH, the field name is OK
> >What's wrong?
> >
> >Any solution would be appreciate.
> >Thanks in advance.
> >
> >    William
> >
> >PS I tried to do it through axlShell:
> >
> >axlShell("setwindow pcb")
> >axlShell("shape select")
> >axlShell("pick $xloc $yloc") ;I think I need to use the axlSetVariable
(and
> >then unset) to do it via axlShell, isn't it?
> >No way with %f and %s to work with xy and netname?
> >but I have a new problem: how to convert X_Loc to string or int to be
able
> >to export it with axlSetVariable?
> >but even if I define xloc and yloc with test value like "2150.00"
"1234.56",
> >the axlShell("pick $xloc $yloc") does nothing in Allegro....(no error
> >message, but no shape selection)
> >
> >Thanks for these tips... I am a poor SKILL novice beginner....
> >
> >-----------------------------------------------------------
> >To subscribe/unsubscribe:
> > Send a message to icu-pcb-forum-request@xxxxxxxxxxxxx
> > with a subject of subscribe or unsubscribe
> >
> >To view the archives of this list please login at
> >http://www.freelists.org. Our list name is icu-pcb-forum
> >or go to http://www.freelists.org/archives/icu-pcb-forum/
> >
> >Problems or Questions:
> > Send an email to icu-pcb-forum-admins@xxxxxxxxxxxxx
> >
> >Want to post a job listing ?  DON'T DO IT HERE!
> >Better yet, join our jobs listing forum.
> >
> >SUBSCRIBE:  icu-jobs-forum-subscribe@xxxxxxxxxx
> >POST:       icu-jobs-forum@xxxxxxxxxx
> >-----------------------------------------------------------
> >
> >
> >
>
> =======================================================================
> This email, including any attachments, is only for the intended
> addressee.  It is subject to copyright, is confidential and may be
> the subject of legal or other privilege, none of which is waived or
> lost by reason of this transmission.
> If the receiver is not the intended addressee, please accept our
> apologies, notify us by return, delete all copies and perform no
> other act on the email.
> Unfortunately, we cannot warrant that the email has not been
>  altered or corrupted during transmission.
> =======================================================================
>
>

-----------------------------------------------------------
To subscribe/unsubscribe: 
        Send a message to icu-pcb-forum-request@xxxxxxxxxxxxx
        with a subject of subscribe or unsubscribe

To view the archives of this list please login at
http://www.freelists.org. Our list name is icu-pcb-forum
or go to http://www.freelists.org/archives/icu-pcb-forum/

Problems or Questions:
        Send an email to icu-pcb-forum-admins@xxxxxxxxxxxxx

Want to post a job listing ?  DON'T DO IT HERE!  
Better yet, join our jobs listing forum.

SUBSCRIBE:  icu-jobs-forum-subscribe@xxxxxxxxxx
POST:       icu-jobs-forum@xxxxxxxxxx
-----------------------------------------------------------

Other related posts: