Рбота со сканером (центроискателем)

Mach, популярные и не очень CAD, CAM. Обсуждение и разработка программ для управления станками.

Рбота со сканером (центроискателем)

Сообщение sim4 » 05 ноя 2019, 22:01

Приветствую.
Кто нибудь сможет помочь со скриптом. Требуется отсканировать блинчик по двум осям X и Y (центроискателем)
Запускаю аддон (самопис кривой :wik: ) ничего не получается. Где ошибка,
Код: Выделить всёРазвернуть
XWidth = GetUserDRO( 1001 )
YWidth = GetUserDRO( 1004 )
Stepx = GetUserDRO (1005)
Feed =  GetUserDRO( 1008 )

' now open a digitize.tap file
' all code commands then go to file.
OpenTeachFile "Digitize.tap"

code " (Digitize File) "
' set the current location to 0,0,0 and open the file
code "M40"
code "G92X0Y0"
code "F" & Feed
direction = 0
' first iterative loop
for y = 0 to XWidth step Stepx
    if direction = 1 then
       direction = 0
     else
       direction = 1
    end if
    for x = 0 to YWidth step Stepx
       if direction = 1 then   
           code "G0X" & y & "Y" & x
      else
           code "G0X" & y & "Y" & YWidth - x
      end if
      code " G31 Y" & Stepx
       code " G0 Y" & YWidth 
  Next
Next
if direction = 1 then   
           code "G0X" & XWidth & "Y" & YWidth
      else
           code "G0X" & 0 & "Y" & YWidth
      end if


code "G01X0Y0" & Safe
code "G0X0Y0 "
code "M30"

CloseTeachFile
call LoadStandardLayout()
call LoadTeachFile()

sim4
Новичок
 
Сообщения: 7
Зарегистрирован: 20 окт 2019, 12:51
Репутация: 0
Настоящее имя: Дмитрий

Re: Рбота со сканером (центроискателем)

Сообщение aftaev » 05 ноя 2019, 22:10

А код М40 работает?
Дилетанту сложные вещи кажутся очень простыми, и только профессионал понимает насколько сложна самая простая вещь
Кто хочет - ищет возможности, кто не хочет - ищет оправдание.
Найди работу по душе и тебе не придется работать.
aftaev
Зачётный участник
Зачётный участник
 
Сообщения: 32022
Зарегистрирован: 04 апр 2010, 19:22
Откуда: Казахстан. Шымкент
Репутация: 5721
Медальки:

Re: Рбота со сканером (центроискателем)

Сообщение sim4 » 05 ноя 2019, 22:14

aftaev писал(а):А код М40 работает?

Информации по этому коду нет. Но я понял это открытие файла для записи.Он работает.
Был такой код по нему сканер начинает бежать но при первом срабатывании останавливается и все.
А по идее должен отойти и продолжить дальше записав в фаил.
Код: Выделить всёРазвернуть
XWidth = GetUserDRO( 1001 )
YWidth = GetUserDRO( 1004 )
Stepx = GetUserDRO (1005)
Feed =  GetUserDRO( 1008 )

' now open a digitize.tap file
' all code commands then go to file.
OpenTeachFile "Digitize.tap"

code " (Digitize File) "
' set the current location to 0,0,0 and open the file
code "M40"
code "G92X0Y0"
code "F" & Feed
direction = 0
' first iterative loop
for y = 0 to XWidth step Stepx
    if direction = 1 then
       direction = 0
     else
       direction = 1
    end if
    for x = 0 to YWidth step Stepx
       if direction = 1 then   
           code "G0X" & y & "Y" & x
      else
           code "G0X" & y & "Y" & YWidth - x
      end if
     
  Next
Next
if direction = 1 then   
           code "G0X" & XWidth & "Y" & YWidth
      else
           code "G0X" & 0 & "Y" & YWidth
      end if


code "G01X0Y0" & Safe
code "G0X0Y0 "
code "M30"

CloseTeachFile
call LoadStandardLayout()
call LoadTeachFile()
sim4
Новичок
 
Сообщения: 7
Зарегистрирован: 20 окт 2019, 12:51
Репутация: 0
Настоящее имя: Дмитрий

Re: Рбота со сканером (центроискателем)

Сообщение aftaev » 06 ноя 2019, 06:34

Программу нужно по шагово отлаживать в VB Script Editot.
Дилетанту сложные вещи кажутся очень простыми, и только профессионал понимает насколько сложна самая простая вещь
Кто хочет - ищет возможности, кто не хочет - ищет оправдание.
Найди работу по душе и тебе не придется работать.
aftaev
Зачётный участник
Зачётный участник
 
Сообщения: 32022
Зарегистрирован: 04 апр 2010, 19:22
Откуда: Казахстан. Шымкент
Репутация: 5721
Медальки:

Re: Рбота со сканером (центроискателем)

Сообщение sim4 » 06 ноя 2019, 10:42

aftaev писал(а):Программу нужно по шагово отлаживать в VB Script Editot.

Есть возожмность помочь?
sim4
Новичок
 
Сообщения: 7
Зарегистрирован: 20 окт 2019, 12:51
Репутация: 0
Настоящее имя: Дмитрий

Re: Рбота со сканером (центроискателем)

Сообщение sim4 » 06 ноя 2019, 11:39

Как я понимаю на выходе должен бытьтакой код.
Код: Выделить всёРазвернуть
(Digitize File) 
M40
G92X0Y0
F100
G31X0Y10
G0X1Y0
G31X1Y10
G0X2Y0
G31X2Y10
G0X3Y0
G31X3Y10
G0X4Y0
G31X4Y10
G0X5Y0

А по факту получается такой.
Код: Выделить всёРазвернуть
M40
G92X0Y0
F100
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X0Y1
G31X1Y10
G31X1Y9
G31X1Y8
G31X1Y7
G31X1Y6
G31X1Y5
G31X1Y4
G31X1Y3
G31X1Y2
G31X1Y1
G31X1Y0
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X2Y1
G31X3Y10
G31X3Y9
G31X3Y8
G31X3Y7
G31X3Y6
G31X3Y5
G31X3Y4
G31X3Y3
G31X3Y2
G31X3Y1
G31X3Y0
G31X4Y1
G31X4Y1
sim4
Новичок
 
Сообщения: 7
Зарегистрирован: 20 окт 2019, 12:51
Репутация: 0
Настоящее имя: Дмитрий

Re: Рбота со сканером (центроискателем)

Сообщение PLOT » 19 ноя 2019, 02:16

А какая вообще задача стоит? Вы этим скриптом хотите писать G-code, сохранять его, а потом запускать его, чтобы найти центр?
Не слишком ли заморочено? По моему проще прям кнопкой вызвать код сканирования, как мне кажется - это проще.
Подписывайтесь на канал YouTube Game Of CNC
А это сайтик сбаценный на тильде, с информацией о нас и нашей работе - заходите

Приглашаем всех хейтеров в гости, обсудим ваши вопросы лично, заснимем все на видео и покажем публично. Контакты наши не трудно найти :)
Аватара пользователя
PLOT
Мастер
 
Сообщения: 220
Зарегистрирован: 24 июн 2019, 16:09
Откуда: Москва
Репутация: 16
Настоящее имя: Семен


Вернуться в Windows / Mach

Кто сейчас на конференции

Зарегистрированные пользователи: and361, Antony_, Argon-11, Bing [Bot], CNC-Logic, dimedved, dredivan, gendos, Gestap, Google [Bot], keyy, Kiriba, Kriegplot, NickSon, seet46, shatrovmaxim, sima8520, tsurika, VGG, Yandex [bot], Кашин, Валерий78

Reputation System ©'