Macro 3D taster op Edingcnc

[Muis]

Beste forumleden,

Heb laadst een simpele 3D taster gekregen. Het in binnenwerk zitten 3 micro schakelaartjes, was wel benieuwd of dat voor mij nauwkeurig genoeg is om b.v.b. een 0 punt van een gat automatisch te bepalen. Nu de vraag kan iemand mij helpen aan een geschikte macro en hoe ik dat dan in het programma van Eding CNC moet plaatsen.

Gr. Jan

[audiomanics]

Ik meen dat in de manual van EdingCNC al een kant en klare macro staat voor een 3D-taster (op blz 138)
Die kun je in de Macro.cnc opnemen onder een vrije functietoets naar keuze. (kan prima met notepad of wordpad)
De macro kun je ook nog aanpassen naar eigen smaak, maar dan moet je eerst eens proberen de macro door te lezen en begrijpen wat daar staat.

Kees

[Muis]

Bedankt Kees,
Ik had in het programma zelf gekeken daar zag ik hem niet. Zal even kijken wat ik er van kan bakken, je kent mij een beetje , software en ik hebben een nou eenmaal een slechte relatie
Gr.Jan

[audiomanics]

Anders staan er hier op het forum nog wel een paar van die kant en klare macro's.. Ik heb ze nog niet voor je opgezocht, maar ik ben ze al een paar keer tegen gekomen..

Kees

[Muis]

Heb inmiddels in de handleiding gekeken en daar staat een code van Bert in, op zich knippen en plakken. Alleen zal er nog gepuzzeld worden wat hij dan gaat doen. En inderdaad kon ik mij wat herrineren dat op het forum over geschreven is maar kon het met zoektermen niet 123 vinden van daar mijn schrijven Kees. Zal der es wat heel voorzichtig mee vogelen. Ben doodsbang dat ik de besturing in de war schop zodat ik daar weer hulp nodig heb. Ik mis teveel basis kennes mede omdat ik dat altijd gedonder mee heb.

Gr. Jan

[keesfrees]

heb je dit al gezien ?
grote contouren taster macro ?
viewtopic.php?f=39&t=11551

[audiomanics]

Hier mijn macro, die moet je mogelijk hier of daar nog wat aanpassen aan je eigen machine, dus eerst even vrij in de lucht uittesten, voor je je probe prakt..

Code: Selecteer alles

Sub user_4 ;F5
Msg "zoek midden binnen cirkel" 
   F90              ;speed for x,y
   DlgMsg "diameter" mm 1 
   If [#5398==1] 
     #102 = [#1 + 10]   ;max dist to cylinder
     #103 = 4         ;thickness tool
     #101 = #5001      ;current x
     G91               ;relative move
     G38.2 x-#102         ;move left till touch
     G90               ;absolute move

     if [#5067 == 1]      ;did we touch?
       #100 = #5061
       g0 x#101
       G91
       G38.2 x#102
       G90

       if [#5067 == 1]      ;did we touch?
         #104 =[[#5061-#100]/2]  ;<=radius
         G92 x[#104]
         g0 x0
         #101 = #5002   ;current y
         G91
         G38.2 y-#102
         G90

         if [#5067 == 1]      ;did we touch?
            #100 = #5062
            g0 y#101
            G91
            G38.2 y#102
            G90

            if [#5067 == 1]      ;did we touch?
              #105=[[#5062-#100]/2]
              G92 y[#105]
              g0 y0
              F30

              G0 x[#104-1]
              G91
              G38.2 x#102
              G90
              #106=#5061

              G0 x-[#104-1]
              G91
              G38.2 x-#102
              G90
               #107 = [#106 + #103 - #5061]

              G0 x0
              G0 y[#105-1]
              G91
              G38.2 y#102
              G90
              #106=#5062

              G0 y-[#105-1]
              G91
              G38.2 y-#102
              G90
               msg " diameter x = " #107 " diameter y = "[#106 + #103 - #5062] 
              G0 x0Y0
             
              G91
              G0 Z20 
              G90
            else
              ErrMsg "Probe missed Y-high"
            endif
          else
            ErrMsgmsg "Probe missed Y-low"
          endif
        else
          ErrMsg "Probe missed X-right"
        endif
      else
        ErrMsg "Probe missed X-left"
      endif 
      m30
    Endif
 Endsub

[Muis]

Bedankt mannen, ga er eens voor zitten,
Zodra er vorderingen zijn meld ik mij weer.

Gr. Jan

[Muis]

ja ja de macro is geplaatst na wat proberen en werkt bijna, na de 4 punten te hebben aangeraakt wil de z-as naar boven en geeft een error het zal nog een regel in de macro zijn misschien waar een hoogte wordt opgegeven buiten bereik van mijn machine. Dit nog even na pluizen en aanpassen verwacht ik.
Nu wil ik eigenlijk het icoontje nog aanpassen weet wel waar ze staan en geprobeerd het blanco bmp bestandje in paint aan te passen dat wil nog niet enige sugestie?

Gr. Jan

[carlo]

goeiemorgen
weet welk icoon je genomen hebt
neem nu als vb user 19

als ik icons\op_f_key\user\ u19.bmp in paint inlaad en er iets mee doe en op sla en dan edingcnc opstart is de verandering te zien

als je dan de tekst die verschijnt als je met de muis over het icoon gaat wilt veranderen moet je in de
"CncTranslationsUnicode.txt" file de tekst aanmaken
user 19 bestaat echter niet maar dan ga naar het einde van de file
daar staat een lege groep
maak daar een copie van en plaats deze er onder bij (de laatste moet leeg zijn)
vul dan de nodige gegevens in in de voorlaatste groep
-----------------
01-ENG: hier schrijf je dan "user19"
02-GER:
03-DUT: tekst die moet verschijnen "3d-taster"
04-ITA:
05-FRE:
06-ESP:
07-POR:
08-TUR:
09-JAP:
10-GRC:
11-HUN:
12-CZE:
13-HKR:
14-CN-:
15-KOR:
16-NW1:
17-NW2:
18-NW3:
-----------------
zorg dat je volledige groep neemt en de volgorde behoudt

hoop dat dit helpt

mvg
carlo