Вывод списка инструмента в текст УП

[sikor 3]

а куда его вставлять? команда пользователя?

[Stanislav 16]

02.10.2013 в 14:22, MiRu сказал:

if {![ EQ_is_zero $tool_data_corner1_radius($nn) ] } {

Что значит эта запись 

if { ![EQ_is_zero $mom_spindle_speed] } {

EQ_is_zero

не нашел такой процедуры в tcl, но ее вызова очень много

[artem-nafanya 18]

4 минуты назад, Stanislav сказал:

Что значит эта запись 

if { ![EQ_is_zero $mom_spindle_speed] } {

EQ_is_zero

не нашел такой процедуры в tcl, но ее вызова очень много

! [EQ_is_zero проверяет что переменная $mom_spindle_speed не равна нулю.

Если без восклицательного знака, то наоборот, проверяет равна ли она нулю.

Изменено 23 июня 2023 пользователем artem-nafanya

[Stanislav 16]

8 минут назад, artem-nafanya сказал:

EQ_is_zero сравнивает равна ли нулю переменная $mom_spindle_speed

 

Можно сделать и так я полагаю?

if { !($mom_spindle_speed == 0) } {

 

или

 

if { $mom_spindle_speed != 0 } {

Изменено 23 июня 2023 пользователем Stanislav

[KrivoShip 2]

1 час назад, Stanislav сказал:

EQ_is_zero

Поищи в папке с NX файл ugpost_base.tcl, который подгружается постпроцессорами, и тогда вопросы отпадут.

[A_1 243]

7 часов назад, Stanislav сказал:

Можно сделать и так я полагаю?

if { !($mom_spindle_speed == 0) } {

 

или

 

if { $mom_spindle_speed != 0 } {

Здравствуйте. Не следует так сравнивать действительные числа на равенство или неравенство. Лучше сделать так:

if { abs($mom_spindle_speed)  < 0.001} {

или воспользоваться готовыми конструкциями:

if { [EQ_is_equal $mom_spindle_speed 0] } {

if { [EQ_is_gt $mom_spindle_speed 1000] } {