![]() | |
| Home Page | Mark Forums Read | Today's Posts | My Replies | Classifieds | Reviews | Photo Gallery | Web Links | Share Files | Advertise With Us | Ad List |
| |||||||
| Parametric Programing (custom macro b, fadal macro, okuma user task) |
| This forum is sponsored by: |
![]() |
| | LinkBack | Thread Tools | Search this Thread | Display Modes |
|
#1
| ||||
| ||||
Its a 3 day public holiday. I have been ill for 2 of them and the boss wants to know if I can program this by Wednesday? Can you guys help? As you can see in the diagram I have broken it into 6 stages. The first is simple. Everything else is a bit harder. I am using 1 tool throughout so keeping the tool on the workpiece as often as possible gives me a completed workpiece faster. What I do know are:- STL=110 BAR=110(may change) To get TG:- GAP=(LPY-(STL*2))/100+1 SPA=_I(GAP) TG=(LPY-(STL*2))/SPA Heres what I have for stage 1:- N10 G71 LX=1980 LY=810 LZ=40 HC1 Z=PRK N11 STL=110 BAR=110 N12 GAP=(LPY-(STL*2))/100+1 SPA=_I(GAP) TG=(LPY-(STL*2))/SPA N20 X-5 Y=STL Z=PRK PRZ=2 F20 G40 TP1 L=PON N30 G1 X=(LPX/2)+(BAR/2) N40 G1 Y=LPY-STL N50 G1 XI=-BAR N60 G1 Y=STL N70 G1 X=LPX+5 N90 G1 X=LPX-BAR N100 G1 Y=LPY-STL N110 G1 X=LPX+5 N120 G1 X-5 N130 G1 X=BAR N140 G1 Y=STL This completes stage 1 |
|
#2
| ||||
| ||||
| Stage 2 My Trig is very rusty. But this worked... AN1 = TAN((LPX/2-(BAR*1.5)/(LPY-(STL/2))) AN2 = 90-AN1 VE1 = (VEE/2)/(SIN(AN1)) VE2 = (VEE/2)/(SIN(AN2)) In Biesse Speak:- N13 VEE=110 N14 AN1= _A((LPX/2-(BAR*1.5))/(LPY-(STL*2) AN2=90-AN1 N15 VE1=(VEE/2)/(_S(AN1)) VE2=(VEE/2)/(_S(AN2)) Code for stage 2:- :1 N140 G1 X=STL+VE1 N150 BS+ BA=AN2 N160 G1 X=BAR Y=LPY-STL-VE1 BA=AN1+90 N170 G1 X=(LPY/2)-(BAR/2)-VE2 Y=STL N180 BS+ BA=AN1+90 N190 G1 X=BAR+VE2 Y=STL BA=AN2 ; 1/2 CROSS TO BE ROTATED AND REPEATED Last edited by bigz1; 06-08-2010 at 03:01 AM. |
|
#3
| ||||
| ||||
| For stage 3 and 4 I am hoping to use a toolpath as in attached both starting from the top rh corner of each path. I could use SPA as a counter for the to stop the lines overiding LPY-STL and trig for their length. But have no idea how to stop the lines overiding the VEE in the other toolpath parametrically. Any ideas would be appreciated. |
|
#5
| ||||
| ||||
| Stage 3 and 4 have taken longer than expected, but now work. Stage 4 could have less jumps if I used L=PSU(but I try and avoid lifting the bit as it slows the time to complete the piece). Stage 3 N200 HI3=HI2 :HI3 = 0 OR LESS STAGE 3 FINISHES N210 JM!(HI3=>0):6 N220 G1 XI=HI YI=TG :2 N230 JM!(HI3=>0):6 N240 XI=HI3 N250 JM:5 :3 N260 JM!(HI3=>0):6 N270 XI=-HI3 N280 JM:4 :4 N290 HI3=HI3-(2*HI) N300 JM!(HI3=>0):6 N310 XI=HI YI=TG N320 JM:2 :5 N330 HI3=HI3-(2*HI) N340 JM!(HI3=>0):6 N350 XI=-HI YI=TG N360 JM:3 :5 N370 L=PSU Stage 4 N380 BB=1 LET(TG-VE1)/_C(AN1) LEN=LET*_S(AN1) ;BB=GAP COUNTER LEN IS STARTING LENGTH (couldn't get tan(posibly my poor maths) so I used COS then SIN) N390 X=BAR Y=STL+TG PRF=2 F20 G40 TP1 L=PON N400 G1 XI=LEN :7 N410 JM!(BB=SPA/2-0.5):8 ;IF LAST ASCENDING LINE IS NOT CENTRE OF APEX? LIFT BIT AND MOVE N420 L=PSU N430 YI=TG PRF=2 F20 G40 TP1 L=PON N440 BB=BB+1 N450 JM:10 (Section 7 could be deleted if I used PSU and PON for the diagonal moves) :8 N460 JM!(BB=<SPA/2):9 ;ARE HORIZONTAL LINES LESS THAN HALFWAY? N470 JM(BB=SPA-1):12 ;IS SECTION 4 COMPLETE? N480 XI=HI YI=TG ;ASCENDING GAP MOVE N490 BB=BB+1 N500 JM:10 :9 N510 JM(BB+SPA-1):12 :IS SECTION COMPLETE? N520 XI=-HI YI=TG ;DESCENDING GAP MOVE N530 BB=BB+1 :10 N540 G1 X=BAR ; LINE TO LEFT N550 JM(BB=SPA-1):12 ;IS SECTION COMPLETE? N550 YI=TG :GAP MOVE IN Y AXIS N560 BB=BB+1 N570 JM(BB=SPA-1):12 ;IS SECTION COMPLETE? N580 JM!(BB<SPA/2):1 N590 XI=LEN+((BB-1)*HI) ;ASCENDING HORIZONTAL LINE LENGTH N600 JM:7 :11 N610 XI=LEN+((SPA-(BB+1))*HI) ;DESCENDING HORIZONTAL LINE LENGTH N620 JM:9 :12 N630 L=PSU The pprogram works well the only problem I could forsee is if the cross got really WIDE or the door height was really small some extra jumps would be necessary in Section 4. Otherwise it works perfect. Still working out the rotate comand but getting close to an answer. |
| Sponsored Links |
|
#6
| |||
| |||
| someone is having fun! waking up in the night with biesse codes floating in front of your eyes? lol just received my new 335 biesse (93 model) -easier to convert than the 321 model as it doesnt have serial comms. started the mach/galil conversion on it last night. then stuff like this will be easy! imagine a nicely v carved door. mmmmmmm
__________________ so much to learn, so much to pass on. |
|
#7
| ||||
| ||||
Instead of teasing me. How about figuring out how to mirror code in the y axis?????? So i can complete the final stage. I think it has something to do with working tables and the fixed cycle PM. Good luck with the conversion an how about a thread on it? |
|
#9
| ||||
| ||||
| Yeap i have got the rotate to work to complete stage 5:- :12 N630 L=PSU N640 X=LPX/2-(BAR*0.5) Y=LPY-STL-VE1 G40 TP1 L=PON N650 X0=LPX/2+(BAR+0.5) YO=LPY N660 RT=180 N670 CC=CC+1 N680 L=PSU N690 JM(CC=1):1 What I need to do is now mirror stages 2,3,4 and 5 to complete stage 6. |
|
#11
| |||
| |||
| for anything im going to repeat i normally start at the centre of the repeat job so its simply a matter of changing xo= to xo= (new position) this way you can also use it as a sub routine and call with just xo and yo = coordinates in your case the second offset is twice your bar plus the hatch code width. id like the full code listing when its done. i could do with some new doors! bigz has cracked biesse code ! in a strange sort of way. well done you have learnt well. do you get extra beer and chips for this? find me a job over there
__________________ so much to learn, so much to pass on. |
![]() |
| Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) | |
| Thread Tools | Search this Thread |
| Display Modes | |
| |
Similar Threads | ||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| 840D control - repeat problem | Finndus | Siemens Sinumerik CNC controls | 0 | 04-19-2010 06:19 AM |
| Need Help!- Biesse Rover A3.30 problem | rliovic | WoodWorking | 0 | 02-09-2010 01:33 PM |
| Biesse pendular machining problem | majstor76 | CNC Machining Centers | 3 | 01-26-2009 01:13 PM |
| 10M Can not Helical repeat L(x) Problem | the professor | Fanuc | 3 | 10-31-2007 10:52 AM |