Hyvä homma... ne kaksi rivin poistoa tekee sen että probella nollakohta otetaan joka lävistyksessä nyt se tehdään vain ekassa ja aina kun siirrytään yli määritelty matka
Tämä jakso sallii sinun katsoa tämän jäsenen kaikkia viestejä. Huomaa, että näet vain niiden alueiden viestit, joihin sinulla on nyt pääsy.
Näytä viestit MenuLainaus käyttäjältä: Dezoltc - 18.02.24 - klo:14:22Ei anna tehdä noilla muutoksilla.Jos käytit txt pohjaa jonka laitoin niin tarkista että ekalle riville ei jäänyt "Testi postaus " sen jälkeen tuleva asia "ctrl = event:GetTextCtrl()" kuuluu riville
Antaa virhekoodin...
Lua: Syntax error during pre-compilation
...\Owner\AppData\Roaming\SheetCam TNG\posts\PlasmaRotary Mach3 2.scpost:16: '<eof>' expected near 'end'
Lainaus käyttäjältä: Dezoltc - 17.02.24 - klo:15:38Mulla on suoraan jotenkin kötöstetty kaarijännite THC:n.Juuh tuossa koodissa näkee selvästi että G31 kutsutaan joka leikkauksessa.
Plasma ei ole cnc versio vaikka konepoltin onkin.
Kattelin noita vanhoja koodeja.
Tolla samaisellla koodilla oon tehnyt ja tossa on probe nollaus joka kerta.
Mikö ton on muuttanut?
Toi taukokin ihmetyttää kun sellasta ei ole ennen ollut.
Lainaus käyttäjältä: Dezoltc - 17.02.24 - klo:11:08Haki kyllä korkeuden proben avulla mutta vain ekalla leikkauksella.No niin nyt päästään asiaan.
Ja ihme taukoja pitää...
Jos klikka THC käyttöön niin pysähtyy kokonaan.
Odottaa ilmeisesti ARC on tietoa.
Lainaus käyttäjältä: Dezoltc - 16.02.24 - klo:20:13https://youtu.be/c9hfjux3g8E?si=2Q3WVYyCWktbD3HBOliko pokeys jo tuossa toiminnassa? jos oli niin postaatko koodin...
Tolla videolla oon saanut Proben toimiin normi leikkauksena.
Toi erotus levypinnasta siihen kun raja reagoi pitää syöttää g-koodiin jos on paljon.
Jos käytössä on THC niin ei taida olla väliä.
Haluasin noi ominaisuudet toimiin Rotary Plasmassa...
Lainaus käyttäjältä: Dezoltc - 16.02.24 - klo:17:49Toi ohje on MACH4 ohjelmaan.Siinä on Mach3 ja Mach 4 ohje molemmat samassa pdf:ssä... pitää vaan tarkasti lukea kun ne on peräkkäin..
Lainaus käyttäjältä: Dezoltc - 16.02.24 - klo:17:49MACH3 on erilainen, säädöt tehdään tosta Plasmasensin näytöltä.Niinkuin totesin säädöt tehdään THC päästä. THC on plasmasens tässä tapauksessa.
Lainaus käyttäjältä: Dezoltc - 16.02.24 - klo:17:49Johdotin PROBEn ja kokeilin mutta ei vielä toiminut ohjelman kautta.Harvassa plasmassa levyn pintaa probetetaan kun oletuksena pöytä on 0 taso ja cam:ltä tulee levyn paksuus tieto joka offsettaa polttimen kun sytytys tapahtuu niin THC hoitaa lopun korkeus säädön.
Rajatieto tulee kyllä kortille.
Pitääkö tossa g-koodissa olla joku jotta Probe hakee levypinnan ja siitä aloittaa ohjelman?
LainaaSub Main() 'made it a sub, so you can return on "show stopper" errors
'Option Explicit 'Written by Big-Tex Dec 26 2010 Updated Jun 3 2014
'Mod pb 11dec10
Dim ZNew, Zplate, Zrestposition, ZMaterialmachcoord, ZPlatejobcoord, Zplatetomaterial
Dim xjobcoord, yjobcoord, xmachcoord, ymachcoord, zmachcoord
Dim xprobeloc, yprobeloc, xtoprobe, ytoprobe, PlateOffset
Dim CurrentFeed, Zretract
Dim CurrentAbsInc
xjobcoord = GetDRO(0) 'get current job coordinate for X
yjobcoord = GetDRO(1) 'get current job coordinate for Y
xmachcoord = GetOemDRO(83) 'get current machine coordinate for X
ymachcoord = GetOemDRO(84) 'get current machine coordinate for Y
zmachcoord = GetOemDRO(85) 'get current machine coordinate for Z
xprobeloc = GetUserDRO(1100) 'get X machine coordinate location of the touch plate
yprobeloc = GetUserDRO(1101) 'get Y machine coordinate location of the touch plate
xtoprobe = (xprobeloc - xmachcoord + xjobcoord) 'calculate the X move from the current location to the touch plate
ytoprobe = (yprobeloc - ymachcoord + yjobcoord) 'calculate the Y move from the current location to the touch plate
PlateOffset = GetUserDRO(1151) 'get plate offset DRO
CurrentFeed = GetOemDRO(818) 'get the current feedrate to return to later
Zretract = GetOemDRO(1202) 'get Z tool change location
CurrentAbsInc = GetOemLED(48) 'Get the current G90/G91 state
'//////// 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 'first probe travel
FirstRetractDist = 0.1 'first probe retract travel
SecProbeDist = 0.25 'second probe travel
FirstProbeFeed = 10 'First Probe Feed Speed
SecondProbeFeed = 2 'Second Probe Feed Speed
Else 'OFF = Metric Measure MM
FirstProbeDist = 150.0 'first probe travel
FirstRetractDist = 3.0 'first probe retract travel
SecProbeDist = 6.0 'second probe travel
FirstProbeFeed = 300 'First Probe Feed Speed
SecondProbeFeed = 50 'Second Probe Feed Speed
End If
'//////// Error Condition checking code
If GetOemLED(16)<>0 Then 'Checks for machine coordinates
Code "(Please change to working coordinates)"
Exit Sub 'ERROR! exit the macro
End If
If GetOemLED(825)<>0 Then
Code "(Z-Plate Grounded Check connection and try again)"
Exit Sub 'ERROR! exit the macro
End If
'//////// Start Probing Code, Probe In -Z direction.MOVABLE PROBE PLATE
'//////// The vars will be Inch or Metric from above if/else statment
sleep(1000) 'pause 1 seconds to give time to position probe plate
Code "F" & FirstProbeFeed 'slow down feedrate to 10 ipm
ZNew = ( GetDro(2) - FirstProbeDist ) 'probe move to current z - 6 inches
Code "G90 G31Z" & ZNew
While IsMoving() 'wait for probe move to finish
Wend
ZNew = GetVar(2002) 'read the touch point
Code "G0 Z" & ( ZNew + FirstRetractDist ) 'move back to hit point incase there was overshoot +.1
While IsMoving ()
Wend
Code "F" & SecondProbeFeed 'slow down feedrate to 2 ipm
ZNew = ( GetDro(2) - SecProbeDist ) 'probe move to current z - .25 inches
Code "G90 G31Z" & ZNew
While IsMoving() 'wait for probe move to finish
Wend
ZNew = GetVar(2002) 'read the touch point
Code "G0 Z" & ZNew 'move back to hit point incase there was overshoot
While IsMoving ()
Wend
Call SetDro (2, PlateOffset) 'set the Z axis DRO to plate thickness
sleep(250) 'pause for Dro to update.
Code "G53 G0 Z" & Zretract
While IsMoving ()
Wend
Code "F" & CurrentFeed 'returns to prior feed rate
'//////// End Probing Code,
If GetOEMLED(801) Then 'ON = English Measure INCH
Code "(Z axis is now zeroed in English Units)" 'puts this message in the status bar
Else 'OFF = Metric Measure MM
Code "(Z axis is now zeroed in Metric Units)" 'puts this message in the status bar
End If
If CurrentAbsInc = 0 Then 'if G91 was in effect before then return to it
Code "G91"
End If
Lainaus käyttäjältä: Dezoltc - 12.02.24 - klo:18:36Tossa on pari katkaisua.No niin lähetäänpä purkamaan asiaa...
Tuolla sheetcamissa on monta vaihtoehtoa Rotary plasmalle ja missään koodissa en ole nähnyt probea taikka THC
Lainaus käyttäjältä: kkkalle - 09.02.24 - klo:20:52Tämmöiset stepperit Y:lle 2 kpl ja X:lle 1 kpl Z:lle tulee pienempi 3.5NmEi tuossa dokumentissa ainakaan mainita mitään kiihdytys ja jarrutus rampeista... Ihan normi ohjaimelta se näyttää... Kerta ei driveri voi tietää mitä kuormaa se ajaa... se voi vain tietää paikoituksen missä moottori on ja missä sen pitäisi olla.
https://www.upload.sorotec.de/doku/manuals/DS_iHSS86en_soro.pdf
Näissä näkyy olevan sisäisesti tehdyt kiihdytys ja jarrutus rampit.
Sivu luotiin 0.013 sekunnissa 29:lla kyselyllä.