Перейти к публикации

Как уменьшить подачу СОЖ (CTX 410 V6)


Hitchok

Рекомендованные сообщения

Имеется сей станок. К нему идет установка-фильтр для очистки СОЖ с двумя насосами низкого и высокого давления, плюс транспортер для стружки со своим насосом, который перекачивает СОЖ из транспортера в фильтр для очистки. 

Включаю только насос низкого давления, но блин напор там такой, что СОЖ, соприкасаясь с режущим инструментом и деталью просто распыляется и, тем самым, быстро испаряется. Приходится доливать частенько. Напор там такой не нужен (20 л/мин). Так вот, у кого есть такой станок или схожая система подачи СОЖ: как уменьшить давление?

Изменено пользователем Hitchok
Ссылка на сообщение
Поделиться на других сайтах


UnPinned posts
1 час назад, EvUgol сказал:

шаровой кран поставить в систему

Тоже думал. Наверно так и сделаю.

Ссылка на сообщение
Поделиться на других сайтах

Краном вообще то регулируется расход, но никак не давление. Для регулировки давления предусмотрены специальные регуляторы.

А что происходит, когда включается насос высокого давления? Может они  (насосы) у вас перепутаны?

Ссылка на сообщение
Поделиться на других сайтах
В 07.11.2020 в 23:10, Anat2015 сказал:

Краном вообще то регулируется расход, но никак не давление. Для регулировки давления предусмотрены специальные регуляторы.

А что происходит, когда включается насос высокого давления? Может они  (насосы) у вас перепутаны?

Там всё корректно установлено. Они не так сильно отличаются (насосы), но насос высокого давления я вообще не пойму зачем нужен (херачит будь здоров).

Ссылка на сообщение
Поделиться на других сайтах

Насос высокого давления - это опция. По давлению насосы отличаются сильно. Видимо, по каким то особым технологическим условиям, высокое давление СОЖ применяется.

Ссылка на сообщение
Поделиться на других сайтах

После насоса поставьте тройник с тройника - один выход в станок,  на другой - кран и слив обратно в бак- открытием крана регулируйте давление-............... на здоровье.

Ссылка на сообщение
Поделиться на других сайтах
В 09.11.2020 в 15:22, andrey2147 сказал:

После насоса поставьте тройник с тройника - один выход в станок,  на другой - кран и слив обратно в бак- открытием крана регулируйте давление-............... на здоровье.

Да, такое решение и было принято.

Ссылка на сообщение
Поделиться на других сайтах

Присоединяйтесь к обсуждению

Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.

Гость
Ответить в тему...

×   Вставлено в виде отформатированного текста.   Вставить в виде обычного текста

  Разрешено не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отобразить как ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставить изображения напрямую. Загрузите или вставьте изображения по ссылке.

  • Сейчас на странице   0 пользователей

    Нет пользователей, просматривающих эту страницу.




  • Сообщения

    • gudstartup
      там же не написано   про то что надо отключить функцию а написано про линейку. можно перемещать по х при движении по z и у вас все будет параллельно. так же и в случае Виктора если при повороте оси b на 90 градусов в плоскости zy перемещать ось z то  индикатор будет смещаться в случае если ось z не перпендикулярна оси b или наоборот но если в какой то точке на столе вы захотите поставить индикатор в 0 то это можно сделать или доворотом оси b или смещением оси y. именно это и делает компенсация
    • Alex1986
      Можно, пожалуйста, подробнее, ни я ни мои коллеги такого ранее не делали...
    • dicty
      Не пробовал, потому что в том макросе идет отбор деталей из листового материала, а они как раз мне и не нужны. Razvertka All_example.swp UPD: Пробовал, не отрабатывает, выдаёт ошибку
    • stoomb
      Правда теперь почему то на ускоренном 25 и 50 процентов начал летать очень быстро. А между 50 и 100% вообще нет разницы Может я конечно пока искал 315 параметр что то другое поменял случайно
    • Kelny
    • Kelny
      Обычно высокая точность для плат не требуется. Может быть именно вам требуется большая точность. Если подходить к вопросу более научно, то надо бы выбрать наимболее часто используемые элементы и вычислить среднюю массу, а так вычислить коэффициент заполняемости платы элементами, в этом случае добавка к плотности текстолита будет более точной и обдуманной.   Но часто требуется масса не плат, а всего изделия в целом и иногда центр тяжести - усреднённые массы в этом случае обычно дают примемлемый результа, а основная масса обычно от металлических деталей (мелкими элементами на плате часто можно пренебречь).   Наоборот подход проще, не под каждую плату, а подо все платы и не важно сколько там компонентов, но весь объём будет расчитан по плотности немного больше чем имеет плотность стеклотекстолита (ну или объём элементов по плотности стеклотестолита - как вам больше нравится). А вот особенно тяжёлые элементы можно всё таки выделять в отдельные детали и подгонять плотность для получения нужной массы, например, большие элменты, транформаторы и т.п. Ошибка при таком подходе возможна, но и точность массы для плат не очень часто требуется в электронных устройствах. Платы не самые тяжёлые элементы в блоках.
    • Lmstr
      А ну и те тоже, вроде как, от производителя стояли. 
    • Docuk1
      @Leon Доброго дня! в макросе Roughness (простановка общей шероховатости), есть малая неприятность: если активный вид не лист, а любой вид, то обозначение ставится относительно этого вида см.эскиз. Пытался перед вставкой сменить активный вид, но что-то не выходит. Можно как-то подкорректировать?   вставлял вот этот кусок кода в разные места кода, особенно в кнопку "ок" Dim swView As SldWorks.View Dim swDraw As SldWorks.DrawingDoc Dim bRet As Boolean Set swDraw = ModelDoc2 Set swView = swDraw.ActiveDrawingView If Not swView Is Nothing Then Debug.Print swView.GetName2 Set swView = swDraw.GetFirstView bRet = swDraw.ActivateView(swView.GetName2) Debug.Print "  Active view = " & swView.GetName2 End If  
    • dicty
      Всем здравствуйте! Для файлов DXF довольно много прекрасных макросов, и с GUI, и -без, а вот для IGS (SAT, STEP,Parasolid) - как-то скудно (или плохо искал). Пользуемся простеньким макросом (по сути - файл/сохранить как/IGS) для экспорта IGS для лазерного трубореза , который при активации в сборке вываливает в то же место, и сборка, файлы (с учетом конфигураций добавляется -01, 02 в имя файла). Потом долго и нудно удаляем ненужные, сопоставляя спецификацию с отображённым материалом, количеством и добавляя Материал и Количество к имени файла (так уж привыкли на производстве).   Вопрос  в том, чтобы в имя файла добавлять пользовательские свойства, после этого просто удаляются из общей массы ненужные файлы, глядя на Материал в названии файла.  Ну а количество берется тоже из свойств (макрос записывает значение для макроса DXF) Кто-то может помочь с макросом? Или, возможно, идеей? (в древней теме про такой же вопрос @Kelny отсылал к хелпу, но моих компетенций, видимо недостаточно для осовения этой науки)    Макрос, который создает DXF выдает нам название файла и формирует папки в виде: Const OUT_NAME_TEMPLATE As String = "[Развертка]\Толщина <$CLPRP:Толщина листового металла>мм\<_FileName_> (исп.<_ConfName_>) - <$PRP:SWP-Материал> - <$CLPRP:Толщина листового металла>мм - R <$CLPRP:Радиус сгиба> - K <$CLPRP:Допуск сгиба>  <$PRP:Qty> шт..dxf"   Вот что-то примерное и хотелось бы для IGS. Сейчас вот это работает:   Option Explicit Dim swApp        As SldWorks.SldWorks Dim swModel      As SldWorks.ModelDoc Dim nPath        As String Dim FileName     As String Dim NewFileName  As String    Sub main()     Set swApp = Application.SldWorks     Set swModel = swApp.ActiveDoc              If swModel Is Nothing Then         swApp.SendMsgToUser2 "Please open a SolidWork Part/Assembly first and try again!!", swMbWarning, swMbOk     Exit Sub End If              If swModel.GetType = swDocDRAWING Then         swApp.SendMsgToUser2 "Please open a SolidWork Part/Assembly first and try again!!", swMbWarning, swMbOk     Exit Sub End If              nPath = Left(swModel.GetPathName, InStrRev(swModel.GetPathName, ".") - 1)         swModel.SaveAs nPath & ".igs"                     FileName = nPath & ".igs" End Sub
    • Ветерок
      Есть тема про мониторы. Там есть ответы про все К (в том числе и мой ответ, повторять не буду). Эта тема про компьютеры, а не про мониторы.
×
×
  • Создать...