Jump to content

Циклы синумерик

Артур52

By Артур52,
in Sinumerik

 Share Followers 2

Recommended Posts

Артур52

Артур52 0

Posted
Posted

Доброго времени суток, кто-нибудь, знает как можно со станка скачать циклы (например cycle86.spf) или там какая-то защита стоит, чтобы нельзя было так сделать?

Link to post
Share on other sites


UnPinned posts
s_liam

s_liam 65

Posted
Posted
12.04.2023 в 17:23, Артур52 сказал:

Доброго времени суток, кто-нибудь, знает как можно со станка скачать циклы (например cycle86.spf) или там какая-то защита стоит, чтобы нельзя было так сделать?

В последнее время при поставке станков начали шифровать иногда. Требования сохранения интеллектуальной собственности. В любом случае, можно поглядеть в циклах - всё там лежит на стойке. Если они зашифрованы, то Вам каракули откроются.

Link to post
Share on other sites
Евгений_А

Евгений_А 3

Posted
Posted

Как-то в Иркутском техникуме мне удалось качнуть циклы с 808d SL 

Посмотри, подойдет ли тебе это: 

PROC CYCLE86 (REAL RTP,REAL RFP,REAL SDIS,REAL DP,REAL DPR,REAL DTB,INT SDIR,REAL RPA,REAL RPO,REAL RPAP,REAL POSS) SAVE SBLOF DISPLOF
;VERSION: 04.01.15.00 Oct 11, 2007
;CHANGE : 05.03.08.00 May 05, 2000
;Ausbohren 2, Ausdrehen
DEF AXIS _X,_Y,_Z
DEF REAL HH2
DEF INT HH7
DEF INT _ABS=1,_ORD=2,_APP=3
IF $P_GG[6]==2
_ABS=3 _ORD=1 _APP=2
ENDIF
IF $P_GG[6]==3
_ABS=2 _ORD=3 _APP=1
ENDIF
IF (ISAXIS(_APP)==0) GOTOF FEHL2
IF HH7 GOTOF _MM1B
_Z=$P_AXN3
IF(ISAXIS(_ABS)==1)
_X=$P_AXN1
ENDIF
IF(ISAXIS(_ORD)==1)
_Y=$P_AXN2
ENDIF
DPR=ABS(DPR) SDIS=ABS(SDIS)
IF (SDIR==3)OR(SDIR==4) GOTOF _MM00
STOPRE
SETAL(61102)
RET
_MM00:IF DPR==0 GOTOF _MM1 IF RTP==RFP GOTOF FEHL1
HH2=RFP-((RTP-RFP)/ABS(RTP-RFP)*DPR)
IF DP==0 GOTOF _MM0 IF DP==HH2 GOTOF _MM1
N10 MELDUNG(1)
_MM0:DP=HH2
_MM1:HH2=RTP-RFP
IF RFP==DP GOTOF _MM2 IF HH2==0 GOTOF _MM1A IF HH2/ABS(HH2)<>(RFP-DP)/ABS(RFP-DP) GOTOF FEHL1
_MM1A:HH7=1
_MM1B:M=SDIR
SBLON
N1 G0 G64 G90 AX[_Z]=RFP+SDIS*(RFP-DP)/ABS(RFP-DP)
SBLOF
N2 G1 AX[_Z]=DP
N3 G4 F=DTB
N4 SPOS=POSS
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_ORD)==1) AND (ISAXIS(_APP)==1)
N5 G91 G0 AX[_X]=RPA AX[_Y]=RPO AX[_Z]=RPAP
ELSE
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_APP)==1)
N51 G91 G0 AX[_X]=RPA AX[_Z]=RPAP
ELSE
IF(ISAXIS(_ORD)==1) AND (ISAXIS(_APP)==1)
N52 G91 G0 AX[_Y]=RPO AX[_Z]=RPAP
ELSE
GOTOF FEHL2
ENDIF
ENDIF
ENDIF
N6 G90 G0 AX[_Z]=RFP+SDIS*(RFP-DP)/ABS(RFP-DP)
SBLON
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_ORD)==1) AND (ISAXIS(_APP)==1)
N7 G91 AX[_X]=-RPA AX[_Y]=-RPO AX[_Z]=RTP-(RFP+SDIS*(RFP-DP)/ABS(RFP-DP))
ELSE
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_APP)==1)
N71 G91 AX[_X]=-RPA AX[_Z]=RTP-(RFP+SDIS*(RFP-DP)/ABS(RFP-DP))
ELSE
N72 G91 AX[_Y]=-RPO AX[_Z]=RTP-(RFP+SDIS*(RFP-DP)/ABS(RFP-DP))
ENDIF
ENDIF
SBLOF
_MM2:MSG("")
RET
N20 FEHL1:STOPRE
SETAL(61101)
RET
N30 FEHL2:STOPRE
SETAL(61005)
RET

 

Link to post
Share on other sites
Артур52

Артур52 0

Posted
  • Author
Posted
17.04.2023 в 12:35, Евгений_А сказал:

Как-то в Иркутском техникуме мне удалось качнуть циклы с 808d SL 

Посмотри, подойдет ли тебе это: 


PROC CYCLE86 (REAL RTP,REAL RFP,REAL SDIS,REAL DP,REAL DPR,REAL DTB,INT SDIR,REAL RPA,REAL RPO,REAL RPAP,REAL POSS) SAVE SBLOF DISPLOF
;VERSION: 04.01.15.00 Oct 11, 2007
;CHANGE : 05.03.08.00 May 05, 2000
;Ausbohren 2, Ausdrehen
DEF AXIS _X,_Y,_Z
DEF REAL HH2
DEF INT HH7
DEF INT _ABS=1,_ORD=2,_APP=3
IF $P_GG[6]==2
_ABS=3 _ORD=1 _APP=2
ENDIF
IF $P_GG[6]==3
_ABS=2 _ORD=3 _APP=1
ENDIF
IF (ISAXIS(_APP)==0) GOTOF FEHL2
IF HH7 GOTOF _MM1B
_Z=$P_AXN3
IF(ISAXIS(_ABS)==1)
_X=$P_AXN1
ENDIF
IF(ISAXIS(_ORD)==1)
_Y=$P_AXN2
ENDIF
DPR=ABS(DPR) SDIS=ABS(SDIS)
IF (SDIR==3)OR(SDIR==4) GOTOF _MM00
STOPRE
SETAL(61102)
RET
_MM00:IF DPR==0 GOTOF _MM1 IF RTP==RFP GOTOF FEHL1
HH2=RFP-((RTP-RFP)/ABS(RTP-RFP)*DPR)
IF DP==0 GOTOF _MM0 IF DP==HH2 GOTOF _MM1
N10 MELDUNG(1)
_MM0:DP=HH2
_MM1:HH2=RTP-RFP
IF RFP==DP GOTOF _MM2 IF HH2==0 GOTOF _MM1A IF HH2/ABS(HH2)<>(RFP-DP)/ABS(RFP-DP) GOTOF FEHL1
_MM1A:HH7=1
_MM1B:M=SDIR
SBLON
N1 G0 G64 G90 AX[_Z]=RFP+SDIS*(RFP-DP)/ABS(RFP-DP)
SBLOF
N2 G1 AX[_Z]=DP
N3 G4 F=DTB
N4 SPOS=POSS
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_ORD)==1) AND (ISAXIS(_APP)==1)
N5 G91 G0 AX[_X]=RPA AX[_Y]=RPO AX[_Z]=RPAP
ELSE
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_APP)==1)
N51 G91 G0 AX[_X]=RPA AX[_Z]=RPAP
ELSE
IF(ISAXIS(_ORD)==1) AND (ISAXIS(_APP)==1)
N52 G91 G0 AX[_Y]=RPO AX[_Z]=RPAP
ELSE
GOTOF FEHL2
ENDIF
ENDIF
ENDIF
N6 G90 G0 AX[_Z]=RFP+SDIS*(RFP-DP)/ABS(RFP-DP)
SBLON
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_ORD)==1) AND (ISAXIS(_APP)==1)
N7 G91 AX[_X]=-RPA AX[_Y]=-RPO AX[_Z]=RTP-(RFP+SDIS*(RFP-DP)/ABS(RFP-DP))
ELSE
IF(ISAXIS(_ABS)==1) AND (ISAXIS(_APP)==1)
N71 G91 AX[_X]=-RPA AX[_Z]=RTP-(RFP+SDIS*(RFP-DP)/ABS(RFP-DP))
ELSE
N72 G91 AX[_Y]=-RPO AX[_Z]=RTP-(RFP+SDIS*(RFP-DP)/ABS(RFP-DP))
ENDIF
ENDIF
SBLOF
_MM2:MSG("")
RET
N20 FEHL1:STOPRE
SETAL(61101)
RET
N30 FEHL2:STOPRE
SETAL(61005)
RET

 

О, спасибо большое. А нету случайно ещё циклов? Желательно от cycle81.spf до cycle89..spf и cycle70.spf.

Link to post
Share on other sites
Евгений_А

Евгений_А 3

Posted
Posted

Поблагодарить можно "пальцем вверх" )) Конечно есть, этож я для примера выложил. Мне проще будет вам на почту скинуть...

  • Нравится 1
Link to post
Share on other sites
Артур52

Артур52 0

Posted
  • Author
Posted
13 часов назад, Евгений_А сказал:

Поблагодарить можно "пальцем вверх" )) Конечно есть, этож я для примера выложил. Мне проще будет вам на почту скинуть...

khafizovartur102@gmail.com. В личку не получилось написать.

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Followers 2
Go to topic listing

  • Recently Browsing   0 members

    No registered users viewing this page.


  • Сообщения

    • Maik812
      Заполнение спецификации в ручном режиме.

      By Maik812 · Posted

      В самой детали так и прописываешь в полях Раздел- покупные изделия.. Какой САПР? Сами детали в каком? там и прописываешь. Рабоатет в Компасе и в Солиде Ну чтоб выбрать и массово заполнить не проблема у меня :) Прописываешь прям раздел ="Покупные" в Компас в один один тоже самое но плагин Komas3d.wdx
    • Maik812
      Выведение спецификации из Солид в Эксель

      By Maik812 · Posted

      Работает вроде с 2017, там суть данные по детали в деталь записываются , вот их и выводи. а ВСЕ ЧТО ПО СВЯЗКИ ТС ЭТО УЖЕ ПО РАБОТЕ С САМИМИ ФАЙЛАМИ И ТД.
    • Александр1979
      Подходит ли мотор к приводу

      By Александр1979 · Posted

      Нужно устанавливать тип двигателя 501
    • Мария1111
      Выведение спецификации из Солид в Эксель

      By Мария1111 · Posted

      Спасибо, разобралась) 
    • Viktor2004
      Подходит ли мотор к приводу

      By Viktor2004 · Posted

      да. Купили два двигателя. Один греется сильнее, второй слабее. На одном энкодер не работает, оба после перемещения градусов на 20 начинают сходить с ума и дергаться в разные стороны. Вот я не понимаю, то ли привод неисправен, то ли движки, то ли я с параметрами что-то напутал Все это покупалось черт знает где, б/у-шное Для проверки переставляю исправный энкодер на оба движка
    • Ветерок
      Выведение спецификации из Солид в Эксель

      By Ветерок · Posted

      Если вы задали всё в одном месте, то оно и будет в одном месте. Наверное, так: В Уравнениях создаете глобальную переменную. Присваиваете ей нужное значение (длина или площадь, или габарит). Для каждой величины своя переменная. Потом создаете новое Свойство и для него указываете из списка нужную переменную. Для каждой переменой своё Свойство. После этого в столбце таблицы можно выбрать нужное Свойство.
    • AlexKaz
      Консорциум Росатома анонсировал выход новго продукта САРУС.PLM

      By AlexKaz · Posted

      На 3 лярда баксов можно на Луне поселение основать, а тут софт написать не могут...
    • Александр1979
      Подходит ли мотор к приводу

      By Александр1979 · Posted

      Посмотрите в руководстве B-65412EN-02 https://www.scribd.com/document/343182233/B-65412EN-02   Загрузить руководство можно через сайт https://scribd.vpdfs.com/ Это происходит даже если двигатель без нагрузки работает?
    • Vova
      Пятничный натюрморт

      By Vova · Posted

      Пятница начинается с ☕️ IMG_9753.MOV
    • Viktor2004
      Подходит ли мотор к приводу

      By Viktor2004 · Posted

      Уважаемые коллеги, подскажите, подходит ли мотор к приводу. Тип двигателя установил 255, параметры двигателя установились автоматически, параметры оси ввел с приложенного листа. После включения привод выдал ошибку SV0466 и я поменял в параметре 2165 значение 25 которое было автоматически установлено на 40 Двигатель вроде работает, но греется как сволочь и вырубает по SOFTERMAL  
×
×
  • Create New...