AUTO TOOL ZERO SEKOILEE

[Kai]

Auto tool zero sekoilee.
Mulla on makrossa 36.5mm nousua kontaktin jälkeen.
Pari kertaa se toimii ja sitten yhtäkkiä se päättää lähteä suoraan ylöspäin sen 36.5 mm.
Osaako kukaan sanoa mistä se moisen rykärin saa

[saumik]

mikä nahka sulla on käytössä ja saisitko sen makron tänne niin katsotaan onko siinä jotain,mutta epäilen kyllä...

vika voi olla mekaaninen, tarkista nollauksen jälkeen  ,että palaako sulla kontaktiledi normaalisti,ei jää päälle esim vaikka terä nousee.

Ja vikanousuvaiheessa palaako kontaktiledi,eli onko saanut jostain kosketuksen.
-mika-

[Kai]

Tossa kuva makrosta,se on Jonnen ohjeilla tehty.

[saulij]

Tuossa näyttää käyvän sillai, että jos makroa ajettaessa z-arvo on pienempi kuin -20, se lähtee tietysti suuntaan -20 syötöllä 50, eli ylös ja sen jälkeen pikaliikeellä 35,6. Voisko olla näin?

[saumik]

Tässä olis "parannettu versio" auto zerosta, toimii loistavasti ja on tarkka...
Mutta tästä voit katella ja verrata koodia,nimittäin musta siitä sun koodista puuttuu jotain...
Tää koodi ei sovellu suoraan ,varmaankaan sun käyttöön ,mutta täs on hyvät toimintaselitykset :)

Eli tämä versio on mach2010 nahkan mukana tuleva loistava tekele muutenkin... suosittelen

Sub Main()
' Simple Auto Zero
' Based on the macros created be Big Tex -  May 25 2010
' and modified by Poppa Bear 11dec10


Dim ZNew, Zplate, ZMaxRetract, Zplatetomaterial
Dim XWork, YWork, XMachine, YMachine, ZMachine
Dim XScale, YScale, ZScale
Dim xtoprobe, ytoprobe
Dim PlateOffset, MatOffset, TotalOffset
Dim MatOffsetYN
Dim ZClear, ClearAllow
Dim CurrentFeed
Dim CurrentAbsInc
Dim Response

XWork = GetOEMDRO(800)  ' Get Current X Work Coordinate
YWork = GetOEMDRO(801)  ' Get Current Y Work Coordinate
XMachine = GetOemDRO(83)  ' Get Current X Machine Coordinate
YMachine = GetOemDRO(84)  ' Get Current Y Machine Coordinate
ZMachine = GetOemDRO(85)   ' Get Current Z Machine Coordinate
PlateOffset = GetUserDRO(1851)  ' Get Plate Thickness DRO
MatOffset = GetUserDRO(1815)  ' Get Material Offset DRO

If GetOEMLED(1863) Then  ' Set Flag if Material Offset is used
   MatOffsetYN=1
   Else
   MatOffsetYN=0
End If

'Get Axis Scale factors
ZScale = GetOEMDRO(61)

'Set All Axis' Scale to 1

Call SetOEMDRO(61,1)
Sleep(250)


CurrentFeed = GetOemDRO(818)  ' Get the current feedrate to return to later
CurrentAbsInc = GetOemLED(48)   ' Get the current G90/G91 state
Zclear=GetOEMDRO(1814) ' Get Z Clearance Plane from DRO

'//////// the block below will set all your reusable vars depending on Inch or mm.
'//////// this sets the vars so you only need ONE large block of probing code.

If GetOEMLED(801) Then  ' On = English Measure INCH

FirstProbeDist = 6.0 ' Probe down 6 inches
FirstRetractDist = 0.05 ' Then retract .05 inch
SecProbeDist = 0.25 ' Then probe down .25 inches
FirstProbeFeed = 10.0 ' First probe feed @ 10 ipm
SecondProbeFeed = 1.0 ' Second probe feed @ 1 ipm
ClearAllow = 0.125 ' Max Allowable Clearance = Z Machine Zero - .125in

Else ' Off = Metric Measure MM

FirstProbeDist = 150.0 ' Probe down 150mm
FirstRetractDist = 1.0 ' Then retract 1mm
SecProbeDist = 6.0 ' Then probe down 6mm
FirstProbeFeed = 250.0 ' First probe feed @ 250 mm/min
SecondProbeFeed = 25.0 ' Second probe feed @ 25 mm/min
ClearAllow = 2.0 ' Max Allowable Clearance = Z Machine Zero - 2mm

End If

'//////// Error Condition checking code

If GetOemLED(16)<>0 Then ' Check for Machine Coordinates
Code "(Please change to working coordinates)"
Exit Sub ' Exit if in Machine Coordinates
End If

If GetOemLED(825)<>0 Then
Code "(Z-Plate Grounded Check connection and try again)"
Exit Sub ' Exit if probe is tripped
End If

If PlateOffset < 0 Then
Code "(Plate Thickness < 0 - Please Correct and try again)"
Exit Sub ' Exit If Plate Thickness is less than 0
End If

If MatOffsetYN=1 Then
   If MatOffset < 0 Then
   Code "(Warning - Material Offset < 0)"
   Sleep(3000)
   End If
End If

If ZClear <= 0 Then
Code "(Clearance Plane Must > 0 - Please Reset)"
Exit Sub ' Exit If Clearance Plane is less than  or equal to 0
End If


If MatOffsetYN=1 Then  ' If Use Material Offset = Yes
   TotalOffset = PlateOffset - MatOffset
   Else
   TotalOffset = PlateOffset
End If


'//////// Start Probing Code, Probe In -Z direction.
'//////// The vars will be Inch or Metric from above if/else statment

sleep(1000) ' Pause for 1 second to give time to position probe plate

Code "F" & FirstProbeFeed ' Set feedrate to 10 ipm or 300mm/min

Code "(Z-akselia nollataan.....)" ' Puts this message in the status bar

ZNew = (GetOEMDro(802) - FirstProbeDist ) ' Probe move to current Z - 6 inches
Code "G90 G31 Z" & Znew

While IsMoving() ' Wait for probe move to finish
Wend

ZNew = GetVar(2002) ' Read the touch point
Code "G0 Z" & ( ZNew + FirstRetractDist ) ' Move up .05 inch or 1mm in case of overshoot

While IsMoving()
Wend

Code "F" & SecondProbeFeed ' Set feedrate to 1 ipm or 25mm/min

ZNew = (GetOEMDro(802) - SecProbeDist ) ' Probe move to current Z - .25 inches
Code "G90 G31 Z" & Znew

While IsMoving()
Wend

ZNew = GetVar(2002) ' Read the touch point
Code "G0 Z" & ZNew ' Move back to hit point in case of overshoot

While IsMoving()
Wend

Call SetOEMDRO (802, TotalOffset) ' Set the Z axis DRO to plate thickness
sleep(500) ' Pause for DRO to update.

'Make Sure Z Clearance Plane is below Home Switch. If not, Notify User and Proceed.
ZMaxRetract = Abs(GetOemDRO(85)) - ClearAllow ' Distance to Home Switch - Clearance Allowance


If ZClear - TotalOffset > ZMaxRetract Then

Response = MsgBox ("VAROITUS !!!" & (Chr(13)) & "Z-akseli menossa alle rajakatkaisijan." & (Chr(13)) & "Paina OK jos haluat jatkaa" & (Chr(13)) & "Tai paina Cancel keskeyttääksesi",49,"Insufficient Z Clearance!!")

   If Response = 1 Then ' If OK
      ZClear = TotalOffset + ZMaxRetract ' Retract to Z Machine zero - .125in or 2mm
      ElseIf Response = 2 Then ' If Cancel
      Exit Sub
   End If
End If

Code "G0 Z" & ZClear ' Retract to Z Clearance Plane

While IsMoving()
Wend

Call SetOEMDRO(61,ZScale)
Sleep(250)

Code "(Z-akseli on nollattu !.)"


If CurrentAbsInc = 0 Then 'if G91 was in effect before then return to it
Code "G91"
End If



End Sub 

             
     
ps, itellä ollu muutaman vuoden käytössä ja toimii ku junan vessa

-mika-

Tuossa vielä linkki jos kiinnostaa...

http://home.comcast.net/~cncwoodworker/2010.html

[Kai]

Mulla on 6axis screen,voiko tota 2010 versiota käyttää onko siinä näytöt 5 akselille?
Mä luulen tietäväni mitä en saa tehdä jotta se toimii,mutta lisää sekoilua oli tulossa.
Kun ajan normaalia g-koodia,ja jos pysäytän koneen stop-painikkeella, pysäktyy liike ja kara,sen jälkeen käyntiin uudestaan käsikapulan spindlellä lähtee kara pyörimään,sitten vaan start painiketta,ja sen jälkeen pienen hetken päästä se lähtee kääntämään A-akselia  ylöspäin,josta seuraa kunnon kolari,ellen ehdi pysäyttää.
Miten se voi saada sellasen hepulin että lähtee kääntäämään A-akselia?
Tossa on sellanen työstö jota teen>>http://screencast.com/t/cYD2L2X5MK70
Tossa sen kappaleen työstöradat>>http://screencast.com/t/xcVlpBZoL
Ei siinä tason jyrsinnässä ole mitään A-kääntöä,siinä on B-akselin kääntö,mutta kun se lähtee kääntää A-akselia.
Huomasin tätä palaa ajaessa että ei ne akselit ole vielläkään kohdallaan,mutta tolla neliökäännöllä sen saa tarkistettua mihin suunta pitää pöytää kääntää että menee suoraan.
Tolla samalla tavalla laitoin Rolandin koneen kulkee suoraan.

[Kai]

Onko täällä ketään jolla olisi toimiva työkalun mittaus systeemi,kun en saa omaani toimimaan?
Kai

[asetukset]

asiata en mitään tiedä mutta tuolla jotain juttua http://idea2reallife.wordpress.com/2011/09/13/diy-cnc-part-65-auto-tool-zero-mach3-config-guide/ 
ja tuola https://www.google.fi/search?q=mach3+tool+height+macro&biw=1920&bih=915&source=lnms&tbm=isch&sa=X&ei=WhGAVMXLN-H6ygP8mIHADg&ved=0CAYQ_AUoAQ#imgdii=_

[Kai]

Mä etsin henkilöä jolla ne toimii,noi ohjeet ei minua auta.
Siis auto tool zero toimivaksi.

[Kai]

On tää yhtä helvettiä kun työkalu pituus ei pysy paikallaan,eikä auto tool zero toimi.
Eikö todellakaan löydy ketään joka sen homman hallitsee, ja pystyisi auttamaan.
Kai

[Kai]

Eikö oikeasti löydy yhtään äijää joka voisi tai viitsisi tai osaisi auttaa tän paskan mach3 auto tool zeron kanssa?
Jos sellanen ihminen löytyy niin voi ottaa yhteyttä privana jos ei kehtaa julkisesti.
Kai

[saulij]

Sulla on ilmeisesti melko samankokoisia (pituisia) teriä aina käytössä. Tee pieni teline, jossa voit esiasetella terään lukittavan renkaan. Tämä rengas vastaa aina karan holkkiin. Tällöin ei tarvitse mittailla teriä erikseen, koska ne asettuvat aina saman pituisiksi holkkiin. Teriä saa myös valmiiksi rengastettuina... jostain.

[Ozz]

Pakko kysyä semmoinen että mikä Mach3:sen versio sulla on?

Ootko kattonut tätä keskustelua: http://www.cnc-tekniikka.com/CNC-forum1/index.php?topic=2479.msg12874#msg12874

[Kai]

Mach3 versio on R3.043.066

[Kai]

Tossa on sellaset asetukset joilla se menee metallin pintaan ja nousee ylös 0.1mm
Jos joku voisi kertoa mitä tohon täytyy lisätä että se tallentaa halutun syvyyden miinus puolelle.
Eli nyt tallentuu se paikka johon se nousee.
Siitä sitten MDI käskyllä -1.85mm ja ollaan z-nollassa,mutta ei tää pitäisi olla näin vaikeaa.
Call Set DRO kenttä on ilmeisesti se paikka jolla siihen voi vaikuttaa,mutta kun en tajua mitään.